Курсовая работа: Разработка устройства, предназначенного для формирования импульсных сигналов с заданным периодом и скважностью - ШИМ-регулятор

Port[addr_d]:=value;

Port[addr_c]:=N0_strobe_0;Port[addr_c]:=N0_strobe_1;

end;

procedure set_kanal_1(value: byte); {процедураустановкирежимаработысчётчика-таймера 1}

var

var

PSW_strobe_0: byte;

PSW_strobe_1: byte;

N1_strobe_0: byte;

N1_strobe_1: byte;

psw_set: byte;

begin

PSW_strobe_1:=7;{00000111}

PSW_strobe_0:=6;{00000110}

N1_strobe_1:=3;{00000011}

N1_strobe_0:=2;{00000010}

psw_set:=116;{01110100}

{set mode}

Port[addr_c]:=PSW_strobe_1;

Port[addr_d]:=psw_set;

Port[addr_c]:=PSW_strobe_0;Port[addr_c]:=PSW_strobe_1;

{data => 8253}

Port[addr_d]:=value;

Port[addr_c]:=N1_strobe_0;Port[addr_c]:=N1_strobe_1;

end;

begin

{считывание адреса LPT порта}

addr_d:=MemW[$0040:$0008];

{вычисление адреса регистра ControlLPT порта}