|
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í.
','Informace připojení',MB_OK);
3:Application.','Informace připojení',MB_OK);
2:Application.Color:=clGreen;
end
//Pokud nebylo stisknuto tlačítko "Najdi port" před stiskem tlačítka "Připojit" provede zobrazení
dostupných portů
else
begin
//ComboBox1.Font.MessageBox('Připojeno port COM'+'6.MessageBox('Připojeno port COM'+'3.Caption:='Připojeno';
Label22.','Informace připojení',MB_OK);
end;
for j:=1 do
begin
port_nastaveni_2:='COM'+IntToStr(j)+':9600,N,8,1';
//Neúplný podmíněný příkaz bez větve else
if (OpenCom(Pchar(port_nastaveni_2))) then
begin
if (pocet_2 then
begin
volne_porty_2:=IntToStr(j);
pocet_2:=pocet_2 1;
//Informace tom, zda volný alespoň jeden port (zároveň informace počtu volných portů)
end
else
begin
volne_porty_2:=volne_porty_2+', '+IntToStr(j);
pocet_2:=pocet_2 1;
end;
end;
.text nelze použít přímo argumentu MessageBox jsou nekompatibilní typy
case StrToInt(ComboBox1.','Informace připojení',MB_OK);
6:Application.','Informace připojení',MB_OK);
4:Application.MessageBox('Připojeno port COM'+'4.MessageBox('Připojeno port COM'+'5.MessageBox('Připojeno port COM'+'2.Text) of
1:Application.','Informace připojení',MB_OK);
5:Application.MessageBox('Připojeno port COM'+'1.end;
Label22
