Передача дискретной информации и телеграфия. Бажанов В.Л. - 9 стр.

UptoLike

ВУЗ: 

СамГУПС | Самара

Составители: 

Рубрика: 

9
Дискретный фильтр реализован по упрощенной вычислительной процедуре (14).
Информационный сигнал и сигнал помехи имеют вид синусоид, у которых значения
амплитуды и частоты задаются пользователем. В качестве параметров настройки
предусматривается ввод постоянной времени фильтра и величины шага
дискретизации.
Программа вычисляет квадратичные оценки (22) и (23) (См. строки 205 и 210),
рассчитывает показатель эффективности P
ok
(строка 222), выводит для просмотра на
дисплей три графика:
•
информационный сигнал - X
и
(t);
•
сигнал помехи – X
п
(t);
•
исходный сигнал – X(t) = X
и
(t) + X
п
(t).
Ниже приведен текст программы «Filtr-RC» с комментариями.
Программа «Filtr-RC»
10 ' Цифровой фильтр - аналог RC фильтра 1-го порядка
15 ' С возможностью вывода от 1-го до 3-х графиков одновременно.
20 SCREEN 12: KEY OFF
30 DIM X(3000), Y(3000), Z(3000)
40 CLS
50 INPUT " Введите (через запятую) амплитуду и частоту синусоидального
информационного сигнала - A, W = ", Am, w
60 INPUT " Введите амплитуду и частоту синусоидального сигнала помехи -
Ap, Wp = ", Ap, Wp
70 INPUT " Введите постоянную времени фильтра Tф (c) ", TF
80 INPUT " Введите шаг дискретизации по времени j (c) ", j
90 Q = INT(TF / j) ' Q - cтепень фильтрации
100 Fx = 0 ' Исходное состояние фильтра
105 Tc = 2 * 3.14 / w ' Период информационного сигнала
110 k2 = INT(Tc / j) ' Число шагов j в периоде Tc
120 REM ********************************************************
125 PRINT : PRINT " Формирование массивов X,Y,Z"
130 REM ********************************************************
140 Wc = 0: Wf = 0 ' Начальное значение квадратичных оценок нулевое
150 FOR i = 0 TO 2 * k2 + 2 ' Расчетный цикл
160 XX = Am * SIN(w * j * i)' Информационный (полезный) сигнал
170 Fp = Ap * SIN(Wp * j * i)' Сигнал помехи (RND(1) - .5)
180 YY = XX + Fp ' Исходный сигнал (информационный + помеха)
190 Fx = Fx + (YY - Fx) / Q ' Фильтpация сигнала.
200 IF i < k2 THEN GOTO 220 ' Фильтрация должна вработаться.
REM На сколько исходный сигнал отличается от полезного.
205 Wc = Wc + (Fp ^ 2) * j
REM На сколько фильтрованный сигнал
отличается от полезного.
210 Wf = Wf + ((Fx - XX) ^ 2) * j

Страницы