Digitální ekvalizér s kompresorem dynamiky

| Kategorie: Diplomové, bakalářské práce  | Tento dokument chci!

Cílem práce je realizace digitálního ekvalizéru s kompresorem dynamiky. Diplomová práce je zaměřena na srovnání funkcí a parametrů jednotlivých digitálních signálových procesorů, určených výhradně pro zpracování zvukových signálů. Obsahuje podrobný rozbor dílčích bloků pro signálové zpracování v obvodu AD1953 a možnosti ovládání programovatelných parametrů těchto bloků uživatelem. Práce dále obsahuje srovnání vybraných A/D převodníků spolu s popisem zvoleného obvodu UDA1361TS. Také je uvedeno navržené blokové schéma výsledného zařízení. Poté jsou uvedeny možnosti řízení jednotlivých bloků v signálovém procesoru, ovlivňující zpracování signálu. Je zde rovněž představeno výsledné obvodové řešení digitálního ekvalizéru a popis programového vybavení k úspěšnému řízení zpracování signálu vobvodu AD1953. Práce popisuje také konstrukci digitálního ekvalizéru a obsahuje výsledky vybraných měření.

Vydal: FEKT VUT Brno Autor: Radim Šafer

Strana 95 z 104

Vámi hledaný text obsahuje tato stránku dokumentu který není autorem určen k veřejnému šíření.

Jak získat tento dokument?






Poznámky redaktora
text nelze použít přímo argumentu MessageBox jsou nekompatibilní typy case StrToInt(ComboBox1.MessageBox('Připojeno port COM'+'6.','Informace připojení',MB_OK); .Color:=clGreen; end; end; D.MessageBox('Připojeno port COM'+'2.','Informace připojení',MB_OK); 5:Application.MessageBox('Připojeno port COM'+'4.MessageBox('Připojeno port COM'+'1.','Informace připojení',MB_OK); 3:Application.','Informace volných portech',MB_OK); Label24.','Informace připojení',MB_OK); 6:Application.Text) of 1:Application.Font.MessageBox('Žádný port není dostupný.MessageBox('Připojeno port COM'+'3.(pocet=0) then Application.','Informace volných portech',MB_OK) else begin Application.MessageBox('Připojeno port COM'+'5.','Informace připojení',MB_OK); 4:Application.Button4Click(Sender: TObject); var stav,j,pocet_2,m: Integer; port_nastaveni,port_nastaveni_2,volne_porty_2: String; begin port_nastaveni:='COM'+ComboBox1.2 Reakce stisk tlačítka Připojit procedure TForm1.MessageBox('Nalezeny dostupné porty.text+':9600,N,8,1'; stav:=OpenCom(Pchar(port_nastaveni)); m:=6; //maximální počet portů pocet_2:=0; //deklarace pomocné proměnné pocet port_nastaveni_2:='COM'+IntToStr(1)+':9600,N,8,1'; //počáteční deklarace if stav then begin if (najdi_pouziti=1) then begin //ComboBox1.','Informace připojení',MB_OK); 2:Application.Caption:=volne_porty; Label24