发表于:2011/10/13 9:38:44
#0楼
照书编写OB10的程序
L MW 2
+ 1
T MW 2
OB1调用 FC12
FC12程序如下 net 1
CALL "QRY_TINT"
OB_NR :=10
RET_VAL:=MW208
STATUS :=MW16
net 2
CALL "D_TOD_DT"
IN1 :=D#2011-2-11
IN2 :=TOD#8:0:0.0
RET_VAL:=#OUT_TIME_DATE
net 3
A I 0.0
FP M 1.0
AN M 17.2
A M 17.4
JNB m005
CALL "SET_TINT"
OB_NR :=10
SDT :=#OUT_TIME_DATE
PERIOD :=W#16#201
RET_VAL:=MW100
CALL "ACT_TINT"
OB_NR :=10
RET_VAL:=MW204
m005: NOP 0
net 4
A I 0.1
FP M 1.1
JNB m004
CALL "CAN_TINT"
OB_NR :=10
RET_VAL:=MW210
m004: NOP 0
没有结果~~~MW2也不加一 每分钟 求~~
L MW 2
+ 1
T MW 2
OB1调用 FC12
FC12程序如下 net 1
CALL "QRY_TINT"
OB_NR :=10
RET_VAL:=MW208
STATUS :=MW16
net 2
CALL "D_TOD_DT"
IN1 :=D#2011-2-11
IN2 :=TOD#8:0:0.0
RET_VAL:=#OUT_TIME_DATE
net 3
A I 0.0
FP M 1.0
AN M 17.2
A M 17.4
JNB m005
CALL "SET_TINT"
OB_NR :=10
SDT :=#OUT_TIME_DATE
PERIOD :=W#16#201
RET_VAL:=MW100
CALL "ACT_TINT"
OB_NR :=10
RET_VAL:=MW204
m005: NOP 0
net 4
A I 0.1
FP M 1.1
JNB m004
CALL "CAN_TINT"
OB_NR :=10
RET_VAL:=MW210
m004: NOP 0
没有结果~~~MW2也不加一 每分钟 求~~
