FUNCTION_BLOCK IJ_LSyncControl VAR_EXTERNAL END_VAR VAR_INPUT REAL_IN0 :REAL; REAL_IN1 :REAL; REAL_IN2 :REAL; BOOL_IN0 :BOOL; BOOL_IN1 :BOOL; BOOL_IN2 :BOOL; BOOL_IN3 :BOOL; INT_IN0 :INT; INT_IN1 :INT; INT_IN2 :INT; CM :BOOL; RM :INT; END_VAR VAR_OUTPUT REAL_OUT0 :REAL; REAL_OUT1 :REAL; REAL_OUT2 :REAL; BOOL_OUT0 :BOOL; BOOL_OUT1 :BOOL; BOOL_OUT2 :BOOL; BOOL_OUT3 :BOOL; INT_OUT0 :INT; INT_OUT1 :INT; INT_OUT2 :INT; END_VAR VAR REAL_TEMP0 :REAL; REAL_TEMP1 :REAL; REAL_TEMP2 :REAL; BOOL_TEMP0 :BOOL; BOOL_TEMP1 :BOOL; BOOL_TEMP2 :BOOL; BOOL_TEMP3 :BOOL; INT_TEMP0 :INT; INT_TEMP1 :INT; INT_TEMP2 :INT; VER :REAL; END_VAR (* 时 间:20200410 版 本:1.0 作 者:姚立 名 称:吾悦定制本地定时/群组定时、联动控制、新云单控、本地单控数据同步功能块 用于需要设备单独定时,需要联动控制时,例如新风机组: BOOL0为本地定时控制输入 BOOL3为联动控制输入 用于需要设备群组定时,需要联动控制时,例如排风机组: BOOL0为群组定时控制输入 BOOL3为联动控制输入 说 明: IN0为本地定时/群组定时群控参数 IN3为联动控制参数,IN1为本地单控参数,IN2为新云单控参数 CM 为新云模式 0本地模式 1新云模式 RM 为运行模式 0本地模式 1调试模式 2应急模式 CM=0 本地单控参数--》新云单控参数 CM=1,RM<>2 新云群控参数--》新云单控参数/本地单控参数 ;新云单控参数《--》本地单控参数 CM=1,RM =2 预留给应急情况下由上位机脚本进行群组控制 ;新云单控参数《--》本地单控参数 支持BOOL,REAL,INT三种类型变量 备 注: 依赖块:无 *) VER:=1.0; (**********新云模式时变量相互同步,本地模式时,本地->新云单向同步*************) if CM =0 then if BOOL_IN0<>BOOL_TEMP0 and BOOL_IN3=BOOL_TEMP3 then (*本地/群组定时控制--》新云/本地控制*) BOOL_OUT0:=BOOL_IN0; (*新云群控*) BOOL_OUT1:=BOOL_IN0; (*本地单控*) BOOL_OUT2:=BOOL_IN0; (*新云单控*) end_if; if BOOL_IN3<>BOOL_TEMP3 and BOOL_IN0=BOOL_TEMP0 then (*联动控制--》新云/本地控制*) BOOL_OUT3:=BOOL_IN3; (*新云群控*) BOOL_OUT1:=BOOL_IN3; (*本地单控*) BOOL_OUT2:=BOOL_IN3; (*新云单控*) end_if; if BOOL_IN0=BOOL_TEMP0 and BOOL_IN3=BOOL_TEMP3 then BOOL_OUT1:=BOOL_IN1; BOOL_OUT2:=BOOL_IN1; end_if; end_if; if CM =1 then if RM=2 then (*新云单控《--》本地单控*) if BOOL_IN1<>BOOL_TEMP1 then (*新云单控《-- 本地单控*) BOOL_OUT1:=BOOL_IN1; BOOL_OUT2:=BOOL_IN1; elsif BOOL_IN2<>BOOL_TEMP2 then (*新云单控 --》本地单控*) BOOL_OUT1:=BOOL_IN2; BOOL_OUT2:=BOOL_IN2; end_if; else if BOOL_IN0<>BOOL_TEMP0 then (*本地/群组定时控制--》新云/本地控制*) BOOL_OUT0:=BOOL_IN0; (*本地/群组定时控制*) BOOL_OUT1:=BOOL_IN0; (*本地单控*) BOOL_OUT2:=BOOL_IN0; (*新云单控*) end_if; if BOOL_IN3<>BOOL_TEMP3 then (*联动控制--》新云/本地控制*) BOOL_OUT3:=BOOL_IN3; (*联动控制*) BOOL_OUT1:=BOOL_IN3; (*本地单控*) BOOL_OUT2:=BOOL_IN3; (*新云单控*) end_if; (*新云单控《--》本地单控*) if BOOL_IN1<>BOOL_TEMP1 then (*新云单控《-- 本地单控*) BOOL_OUT1:=BOOL_IN1; BOOL_OUT2:=BOOL_IN1; elsif BOOL_IN2<>BOOL_TEMP2 then (*新云单控 --》本地单控*) BOOL_OUT1:=BOOL_IN2; BOOL_OUT2:=BOOL_IN2; end_if; end_if; end_if; BOOL_TEMP0:=BOOL_IN0; BOOL_TEMP1:=BOOL_IN1; BOOL_TEMP2:=BOOL_IN2; BOOL_TEMP3:=BOOL_IN3; (**********新云模式时变量相互同步,本地模式时,本地->新云单向同步*************) if CM =0 then (*本地时赋值新云模式开关,主控CPU时赋值为定时开关*) if REAL_IN0<>REAL_TEMP0 then (*主控CPU群组控制--》新云/本地控制*) REAL_OUT0:=REAL_IN0; (*新云群控*) REAL_OUT1:=REAL_IN0; (*本地单控*) REAL_OUT2:=REAL_IN0; (*新云单控*) else (*新云单控失效*) REAL_OUT1:=REAL_IN1; REAL_OUT2:=REAL_IN1; end_if; end_if; if CM =1 then if RM=2 then (*新云单控《--》本地单控*) if REAL_IN1<>REAL_TEMP1 then (*新云单控《-- 本地单控*) REAL_OUT1:=REAL_IN1; REAL_OUT2:=REAL_IN1; elsif REAL_IN2<>REAL_TEMP2 then (*新云单控 --》本地单控*) REAL_OUT1:=REAL_IN2; REAL_OUT2:=REAL_IN2; end_if; else if REAL_IN0<>REAL_TEMP0 then (*主控CPU群组控制--》新云/本地控制*) REAL_OUT0:=REAL_IN0; (*新云群控*) REAL_OUT1:=REAL_IN0; (*本地单控*) REAL_OUT2:=REAL_IN0; (*新云单控*) end_if; (*新云单控《--》本地单控*) if REAL_IN1<>REAL_TEMP1 then (*新云单控《-- 本地单控*) REAL_OUT1:=REAL_IN1; REAL_OUT2:=REAL_IN1; elsif REAL_IN2<>REAL_TEMP2 then (*新云单控 --》本地单控*) REAL_OUT1:=REAL_IN2; REAL_OUT2:=REAL_IN2; end_if; end_if; end_if; REAL_TEMP0:=REAL_IN0; REAL_TEMP1:=REAL_IN1; REAL_TEMP2:=REAL_IN2; (**********新云模式时变量相互同步,本地模式时,本地->新云单向同步*************) if CM =0 then (*本地时赋值新云模式开关,主控CPU时赋值为定时开关*) if INT_IN0<>INT_TEMP0 then (*主控CPU群组控制--》新云/本地控制*) INT_OUT0:=INT_IN0; (*新云群控*) INT_OUT1:=INT_IN0; (*本地单控*) INT_OUT2:=INT_IN0; (*新云单控*) else (*新云单控失效*) INT_OUT1:=INT_IN1; INT_OUT2:=INT_IN1; end_if; end_if; if CM =1 then if RM=2 then (*新云单控《--》本地单控*) if INT_IN1<>INT_TEMP1 then (*新云单控《-- 本地单控*) INT_OUT1:=INT_IN1; INT_OUT2:=INT_IN1; elsif INT_IN2<>INT_TEMP2 then (*新云单控 --》本地单控*) INT_OUT1:=INT_IN2; INT_OUT2:=INT_IN2; end_if; else if INT_IN0<>INT_TEMP0 then (*主控CPU群组控制--》新云/本地控制*) INT_OUT0:=INT_IN0; (*新云群控*) INT_OUT1:=INT_IN0; (*本地单控*) INT_OUT2:=INT_IN0; (*新云单控*) end_if; (*新云单控《--》本地单控*) if INT_IN1<>INT_TEMP1 then (*新云单控《-- 本地单控*) INT_OUT1:=INT_IN1; INT_OUT2:=INT_IN1; elsif INT_IN2<>INT_TEMP2 then (*新云单控 --》本地单控*) INT_OUT1:=INT_IN2; INT_OUT2:=INT_IN2; end_if; end_if; end_if; INT_TEMP0:=INT_IN0; INT_TEMP1:=INT_IN1; INT_TEMP2:=INT_IN2; END_FUNCTION_BLOCK