Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (*Running modes*)
- IF b_TIMECHANNEL THEN
- iRunLevel1 :=1;
- ELSE
- iRunLevel1 :=0;
- END_IF;
- IF b_TIMECHANNEL AND b_PRESCENSE AND b_VAVOK THEN
- iRunLevel2 :=2;
- ELSE
- iRunLevel2 :=0;
- END_IF;
- IF b_NIGHTCOOL OR b_OVK THEN
- iRunLevel3 :=3;
- ELSE
- iRunLevel3 :=0;
- END_IF;
- (*Write Values*)
- IF NOT b_FIRE THEN
- iRunningMode := MAX(iRunLevel1 + iRunLevel2 + iRunLevel3);
- ELSE
- iRunningMode := 0;
- END_IF;
- CASE iRunningMode OF
- 0 : iTemp := SetDigitalPointF(Value:=0, LockState:=1, Name:= 'LB01_GT104_SP');
- iTemp := SetDigitalPointF(Value:=0, LockState:=1, Name:= 'LB01_GK104_SP');
- 1 : iTemp := SetDigitalPointF(Value:=1, LockState:=1, Name:= 'LB01_GT104_SP');
- rTemp := SetControlParameterF(Mode:=254,Value:=r_TEMPMIN, LockState:=1,'LB01_GT104_SP');
- rTemp := SetControlParameterF(Mode:=255,Value:=r_TEMPMIN, LockState:=1,'LB01_GT104_SP');
- iTemp := SetDigitalPointF(Value:=1, LockState:=1, Name:= 'LB01_GK104_SP');
- rTemp := SetControlParameterF(Mode:=254,Value:=r_TEMPMIN, LockState:=1,'LB01_GK104_SP');
- rTemp := SetControlParameterF(Mode:=255,Value:=r_TEMPMIN, LockState:=1,'LB01_GK104_SP');
- 2 : iTemp := SetDigitalPointF(Value:=1, LockState:=1, Name:= 'LB01_GT104_SP');
- rTemp := SetControlParameterF(Mode:=255,Value:=r_TEMPMIN, LockState:=1,'LB01_GT104_SP');
- rTemp := SetControlParameterF(Mode:=254,Value:=r_TEMPMAX, LockState:=1,'LB01_GT104_SP');
- iTemp := SetDigitalPointF(Value:=1, LockState:=1, Name:= 'LB01_GK104_SP');
- rTemp := SetControlParameterF(Mode:=255,Value:=r_TEMPMIN, LockState:=1,'LB01_GK104_SP');
- rTemp := SetControlParameterF(Mode:=254,Value:=r_TEMPMAX, LockState:=1,'LB01_GK104_SP');
- 3 : rTemp := SetControlParameterF(Mode:=254,Value:=r_TEMPMAX, LockState:=1,'LB01_GT104_SP');
- iTemp := SetDigitalPointF(Value:=0, LockState:=1, Name:= 'LB01_GT104_SP');
- rTemp := SetControlParameterF(Mode:=254,Value:=r_TEMPMAX, LockState:=1,'LB01_GK104_SP');
- END_CASE;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement