发布于 2006-07-19 19:31:03
0楼
硬件组太 HW CONFIG ---CPU---属性----时钟寄存器=MB0 M0.0 0.1S 10HZ
FB1:
FUNCTION_BLOCK FB 1
TITLE =
VERSION : 0.1
VAR_INPUT
F_K : WORD ; DBW0 //阀开控制
F_ZT : WORD ;DBW2 //阀的状态
DB_NO : BLOCK_DB ;DBW4 //FB背景DB
END_VAR
VAR_OUTPUT
Alarm : WORD ;DBW6 //报警
END_VAR
VAR_IN_OUT
FG : BOOL ;DBX9.0 //复归
END_VAR
VAR
C_1 : INT ;DBW10
C_2 : INT ;DBW12
C_3 : INT ;
C_4 : INT ;
C_5 : INT ;
C_6 : INT ;
C_7 : INT ;
C_8 : INT ;
C_9 : INT ;
C_10 : INT ;
C_11 : INT ;
C_12 : INT ;
C_13 : INT ;
C_14 : INT ;
C_15 : INT ;
C_16 : INT ;DBW40
P : BOOL ;
deg : DINT ; //循环次数
END_VAR
BEGIN
NETWORK
TITLE =
OPN #DB_NO;
NETWORK
TITLE =
L 0;
T #deg;
NOP 0;
NETWORK
TITLE =
L #deg;
LAR1 ;
NETWORK
TITLE =
L #deg;
LAR2 ;
NETWORK
TITLE =
lp1: A M 0.0;
FP #P;
A DBX [AR1,P#0.0];
AN DBX [AR1,P#2.0];
JNB _001;
L DBW [AR2,P#10.0];
L 1;
+I ;
T DBW [AR2,P#10.0];
_001: NOP 0;
NETWORK
TITLE =
A( ;
ON DBX [AR1,P#0.0];
O DBX [AR1,P#2.0];
O #FG;
) ;
JNB _002;
L 0;
T DBW [AR2,P#10.0];
_002: NOP 0;
NETWORK
TITLE =
L DBW [AR2,P#10.0];
L 30;
>=I ;
= DBX [AR1,P#6.0];
NETWORK
TITLE =
+AR1 P#0.1;
+AR2 P#2.0;
NETWORK
TITLE =
L #deg;
L L#1;
+D ;
T #deg;
NOP 0;
NETWORK
TITLE =
L #deg;
L L#15;
JC lp1;
NETWORK
TITLE =
A #FG;
R #FG;
END_FUNCTION_BLOCK