Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

помогите пожалуйста с фильтрами!!! [D5, D6, D7, Win95/98, WinXP]


belpyro ©   (2004-11-08 21:21:00) 

Уважаемые мастера!
У меня возникла такая проблема:
есть сигнал состоящий из комбинации трех частот в достаточно низкочастотной области - сотни герц (435, 500, 555, 625, 705, 795, 900). Необходимо достаточно четко их определить (это команды телеуправления усилительной станцией), чтобы определить какая команда пришла на вход звуковой карты компьютера. Может вы подскажете существуют ли методы программного определения либо спец компоненты для Делфи типа частотомера? и как это можно реализовать? Использовал компоненты MMtools, но существующий там фильтр не обеспечивает узкую полосу пропускания (десятки герц). Помогите если знаете, пожалуйста!
С уважением!
belpyro


Jeer   (2004-11-09 10:04:00) [1]

Алгоритм Герцеля - разновидность ДПФ.
Используется в тоновом декодировании DTMF.

function Goertzel(Buffer:array of double; frequency, samplerate: double):double;
var
 Qkn, Qkn1, Qkn2, Wkn, Mk : double;
 i : integer;
begin
Qkn:=0; Qkn1:=0;
Wkn:=2*PI*frequency/samplerate;
Mk:=2*Cos(Wkn);
for i:=0 to (Length(Buffer)-1) do begin
  Qkn2 := Qkn1; Qkn1 := Qkn;
  Qkn  := Buffer[i] + Mk*Qkn1 - Qkn2;
end;
Result := sqrt(Qkn*Qkn + Qkn1*Qkn1 - Mk*Qkn*Qkn1);
end;

Или использовать узкополосные нерекурсивные цифровые фильтры.

В любом случае предварительно сделать расчет по полосе исходя из требований (уровень, нестабильность, помехи)


programania   (2004-11-09 01:01:00) [2]

Попробуйте умножить сигнал на SIN или/и COS этих частот
и просуммировать произведения,
на какой частоте синусоиды максимум, та частота и пришла.


Jel   (2004-11-08 22:36:00) [3]

ИМХО должно помочь быстрое преобразование Фурье (FFT) помучай поисковики на эту тему.


Наверх

Титульная страница Поиск, карта сайта Написать письмо