发布于 2006-03-10 21:49:27
0楼
先写FB1:
VAR_INPUT
Driver : BOOL ;
FeedBack : BOOL ;
nowPast : INT ;
END_VAR
VAR_OUTPUT
Alarm : BOOL ;
END_VAR
VAR
myTime : INT ;
END_VAR
BEGIN
NETWORK
TITLE =
A #Driver;
AN #FeedBack;
A( ;
L #myTime;
L 3100;
<=I ;
) ;
JNB _001;
L #myTime;
L #nowPast;
+I ;
T #myTime;
_001: A( ;
ON #Driver;
O #FeedBack;
) ;
JNB _002;
L 0;
T #myTime;
_002: L #myTime;
L 3000;
>=I ;
= #Alarm;
END_FUNCTION_BLOCK
然后在OB1中调用:
CALL FB 1 , "Val1"
Driver := ///驱动信号
FeedBack:= //反馈
nowPast :=#OB1_PREV_CYCLE ///
Alarm := ///警告输出
SIEAUTO