Чтение/запись из одного регистра

[Николай_бел]

Программу свою выложи с промежуточной переменной.

Ust_Pch1:=WORD_TO_REAL(P5_00r1)/100;

IF Ust_Pch1<>Ust_ACI THEN
Ust_ACI:=Ust_Pch1;
Z_ch1:=P5_00r1;
Z_ch2:=P5_00r1;
P5_00wr2:=P5_00r1;
END_IF

Ust_Pch2:=WORD_TO_REAL(P5_00r2)/100;

IF Ust_Pch2<>Ust_ACI THEN
Ust_ACI:=Ust_Pch2;
Z_ch1:=P5_00r2;
Z_ch2:=P5_00r2;
P5_00wr1:=P5_00r2;
END_IF