|
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í.
MessageBox('Připojeno port COM'+'4.Button4Click(Sender: TObject);
var stav,j,pocet_2,m: Integer;
port_nastaveni,port_nastaveni_2,volne_porty_2: String;
begin
port_nastaveni:='COM'+ComboBox1.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.MessageBox('Žádný port není dostupný.','Informace volných portech',MB_OK)
else
begin
Application.','Informace připojení',MB_OK);
.','Informace připojení',MB_OK);
5:Application.MessageBox('Připojeno port COM'+'2.Color:=clGreen;
end;
end;
D.Caption:=volne_porty;
Label24.Text) of
1:Application.MessageBox('Připojeno port COM'+'6.','Informace volných portech',MB_OK);
Label24.(pocet=0)
then
Application.Font.','Informace připojení',MB_OK);
3:Application.MessageBox('Připojeno port COM'+'5.2 Reakce stisk tlačítka Připojit
procedure TForm1.','Informace připojení',MB_OK);
2:Application.MessageBox('Připojeno port COM'+'3.','Informace připojení',MB_OK);
4:Application.','Informace připojení',MB_OK);
6:Application.MessageBox('Připojeno port COM'+'1.text nelze použít přímo argumentu MessageBox jsou nekompatibilní typy
case StrToInt(ComboBox1.MessageBox('Nalezeny dostupné porty
