Сигнальные процессоры. Аксенов В.П. - 120 стр.

m=1:maxt;
con2=length(z21);
figure
subplot(1,2,1)
plot(m,z21)                   % график мгновенной частоты FВХ (m)
grid on                       % время t = m/FS
title ('частота входного сигнала от m');
      % расчет мгновенной частоты по трем точкам выходного сигнала s1(t)
z1=0.5; z22(1) = 0.5;
for m = 2:maxt
if abs(s1(m+1)) > 0.02 z1 =0.5*(s1(m)+s1(m+2))/s1(m+1);
end
if m > 1 z22(m) = z22(m-1);
end
if abs(z1) > 1 z1 = sign(0.5*(s1(m)+s1(m+2))/s1(m+1));
end
z22(m) = Fs*acos(z1)/(2*pi); % расчет частоты выходного сигнала
end
m=1:maxt;
subplot(1,2,2)
plot(m,z22)                % график мгновенной частоты FВЫХ (m)
grid on                   % время t = m/FS
title ('частота выходного сигнала от m');


                                                                ПРИЛОЖЕНИЕ 7

      Синтез режекторного КИХ-фильтра при частотной манипуляции


%         Режекторный КИХ-фильтр, частотная манипуляция
%         окно Кайзера
clear all; % уничтожаем все переменные
A = 5; Fs =32000; V = 1100; % амплитуда, частота дискрет - ии, скорость
Rp = 0.8; Rs = 30; % пульсации и минимальное ослабление в децибелах
Kp =(10^(Rp/10)-1)^0.5; Km = 10^(-Rs/20); % пересчет Rp, Rs в абсолют-ные значения



                                            120