//Открытие порта 2
Com_2(enable:=true,PortNum:=2,PortBaudrate:=19200, PortParity:=,PortStopBits:=,PortByteSize:=,
Port_Mode:=,Port_ModeOn:=,Port_CloseOn:=,Handle=>, Done=>,ErrCode=>);
//Чтение входов 4ДН4Р адресс 8(мешалки,насос)
mk4d4r_inp_1(Handle:=Com_2.Handle,Enabl:=Com_2.Don e and ,Modd:=,Addr:=8,TimeOut:=T#100ms,ErCL:=3,
inp1=>,inp2=>,inp3=>,inp4=>,wErrCode=>,done=>);
//Запись выходов 4ДН4Р адресс 8(мешалки,насос)
mk_4d_4r_out_1(Handle:=Com_2.Handle,Enabl:=mk4d4r_ inp_1.done,Modd:=,Addr:=8,TimeOut:=T#100ms,ErCL:=3 ,
out1:=,out2:=,out3:=,out4:=,wErrCode=>,done=>);
//Чтение входов 4К4Р адресс 16
mk4k4r_int(Handle:=Com_2.Handle,Enabl:=mk_4d_4r_ou t_1.done,Modd:=,Addr:=16,TimeOut:=T#100ms,ErCL:=3,
inp1=>,inp2=>,inp3=>,inp4=>,wErrCode=>,done=>);
//Запись выходов 4Л4Р адресс 16
mk4k4r_out(Handle:=Com_2.Handle,Enabl:=mk4k4r_int. done,Modd:=,Addr:=16,TimeOut:=T#100ms,ErCL:=3,
out1:=,out2:=,out3:=,out4:=,wErrCode=>,done=>);
//Чтение входов 8ДФ адресс 24
MV8d(Handle:=Com_2.Handle,Enabl:=mk4k4r_out.done,M odd:=,Addr:=24,TimeOut:=T#100ms,ErCL:=3,
inp1=>,inp2=>,inp3=>,inp4=>,inp5=>,inp6=>,inp7=>,i np8=>,wErrCode=>,done=>);
//Чтение входов 8А адресс 32
MV8a(Handle:=Com_2.Handle,Enabl:=MV8d.done,Modd:=, Addr:=32,TimeOut:=T#100ms,ErCL:=3,
inp1=>,inp2=>,inp3=>,inp4=>,inp5=>,inp6=>,inp7=>,i np8=>,inpExcSCode1=>,inpExcSCode2=>,
inpExcSCode3=>,inpExcSCode4=>,inpExcSCode5=>,inpEx cSCode6=>,inpExcSCode7=>,inpExcSCode8=>,
inpT1=>,inpT2=>,inpT3=>,inpT4=>,inpT5=>,inpT6=>,in pT7=>,inpT8=>,wErrCode=>,done=>);
//Запись выходов 8Р адресс 40
MY8r(Handle:=Com_2.Handle,Enabl:=MV8a.done,Modd:=, Addr:=40,TimeOut:=T#100ms,ErCL:=3,
out1:=,out2:=,out3:=,out4:=,out5:=,out6:=,out7:=,o ut8:=,wErrCode=>,done=>);
//Чтение тем-ры канал 1 ТРМ202 адресс 48
TRM202_1(Handle:=Com_2.Handle,Enabl:=MY8r.done,Mod d:=,Addr:=48,RegAddr:=16#0001,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[1]),VarType:=1,wErrCode=>,done=>);
//Чтение выход канал 1 ТРМ202 адресс 48
TRM202_2(Handle:=Com_2.Handle,Enabl:=TRM202_1.done ,Modd:=,Addr:=48,RegAddr:=16#0009,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[2]),VarType:=1,wErrCode=>,done=>);
//Чтение уставки канал 1 ТРМ202 адресс 48
TRM202_3(Handle:=Com_2.Handle,Enabl:=TRM202_2.done ,Modd:=,Addr:=48,RegAddr:=16#0005,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[3]),VarType:=1,wErrCode=>,done=>);
//Чтение гистерезис канал 1 ТРМ202 адресс 48
TRM202_4(Handle:=Com_2.Handle,Enabl:=TRM202_3.done ,Modd:=,Addr:=48,RegAddr:=16#0403,
TimeOut:=T#100MS,ErCL:=,VarAdr:=ADR(word_var[4]),VarType:=1,wErrCode=>,done=>);
//Запись уставки канал 1 ТРМ202 адресс 48
TRM202_5(Handle:=Com_2.Handle,Enabl:=TRM202_4.done ,Modd:=,Addr:=48,RegAddr:=16#0005,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[5]),VarType:=1,wErrCode=>,done=>);
//Запись гистерезиса канал 1 ТРМ202 адресс 48
TRM202_6(Handle:=Com_2.Handle,Enabl:=TRM202_5.done ,Modd:=,Addr:=48,RegAddr:=16#0403,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[6]),VarType:=1,wErrCode=>,done=>);
//Чтение статуса АТВ312 адресс 54
ATV_1(Handle:=Com_2.Handle,Enabl:=TRM202_6.done,Mo dd:=,Addr:=54,RegAddr:=16#0C81,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[7]),VarType:=1,wErrCode=>,done=>);
//Чтение частоты АТВ312 адресс 54
ATV_2(Handle:=Com_2.Handle,Enabl:=ATV_1.done,Modd: =,Addr:=54,RegAddr:=16#0C82,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[8]),VarType:=1,wErrCode=>,done=>);
//Чтение ток АТВ312 адресс 54
ATV_3(Handle:=Com_2.Handle,Enabl:=ATV_2.done,Modd: =,Addr:=54,RegAddr:=16#0C84,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[9]),VarType:=1,wErrCode=>,done=>);
//Чтение напряжение АТВ312 адресс 54
ATV_4(Handle:=Com_2.Handle,Enabl:=ATV_3.done,Modd: =,Addr:=54,RegAddr:=16#0C87,
TimeOut:=T#100MS,ErCL:=3,VarAdr:=ADR(word_var[10]),VarType:=1,wErrCode=>,done=>);
)
Сообщение от Эдуард_Н
