|
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í.
Button5Click(Sender: TObject);
var i,n,pocet: Integer;
port_nastaveni_najdi,volne_porty: String;
begin
najdi_pouziti:=1;
n:=6; //maximální počet portů
pocet:=0; //deklarace pomocné proměnné pocet
port_nastaveni_najdi:='COM'+IntToStr(1)+':9600,N,8,1'; //počáteční deklarace
for i:=1 do
begin
port_nastaveni_najdi:='COM'+IntToStr(i)+':9600,N,8,1';
//Neúplný podmíněný příkaz bez větve else
if (OpenCom(Pchar(port_nastaveni_najdi))) then
begin
if (pocet then
begin
volne_porty:=IntToStr(i);
ComboBox1.Vytvořené procedury Delphi
D.1 Reakce stisk tlačítka Najdi port
procedure TForm1.text:=IntToStr(i);
//Nastavení prvního volného portu výběru ComboBoxu1
pocet:=pocet 1;
//Informace tom, zda volný alespoň jeden port (zároveň informace počtu volných portů)
end
else
begin
volne_porty:=volne_porty+', '+IntToStr(i);
pocet:=pocet 1;
end;
end;
end;
