下面的程序是老外设备上的，在OB35中，看不懂，很是头疼，请高手搭救，非常谢谢！


SET
SAVE
= L 16.1
L #STAT0
L 1
+I
T #STAT0
L 16
>I
JCN M001
L 1
T #STAT0
M001: L #STAT0
ITD
L L#1
-D
L L#32
*D
L L#6656
+D
LAR1
OPN "DBint_FlowMe"
L DBD [AR1,P#0.0]
L 0.000000e+000
<>R
JCN M002
L #STAT0
ITD
L L#1
-D
L L#32
*D
L L#7168
+D
L #STAT0
ITD
TAK
T LD 18
TAK
L L#1
-D
L L#32
*D
L L#6656
+D
LAR1 LD 18
L DBD [AR1,P#0.0]
TAK
LAR1
TAK
L DBD [AR1,P#0.0]
/R
T #TEMP14
M002: L #STAT0
L 1
TAK
==I
T LW 18
JC M003
JU M004
M003: L "Flowmeter_A1"
ITD
DTR
L 9.042245e-005
*R
T #TEMP11
JU M005
M004: L 2
L LW 18
==I
JC M006
JU M007
M006: L "Flowmeter_A2"
ITD
DTR
L 9.042245e-005
*R
T #TEMP11
JU M005
M007: L 3
L LW 18
==I
JC M008
JU M009
M008: L "Flowmeter_A3"
ITD
DTR
L 9.042245e-005
*R
T #TEMP11
JU M005
M009: L 4
L LW 18
==I
JC M010
JU M005
M010: L "Flowmeter_B"
ITD
DTR
L 2.531829e-005
*R
T #TEMP11
M005: L #STAT0
ITD
L L#1
-D
L L#32
*D
L L#3584
+D
LAR1
OPN "DBint_FlowMe"
L DBD [AR1,P#0.0]
T #TEMP12
L #STAT0
ITD
L L#1
-D
L L#224
*D
L L#8192
+D
LAR1
L DBD [AR1,P#0.0]
T DID [AR2,P#2.0]
TAK
T LD 18
TAK
L DBD [AR1,P#4.0]
T DID [AR2,P#6.0]
L DBD [AR1,P#8.0]
T DID [AR2,P#10.0]
L DBD [AR1,P#12.0]
T DID [AR2,P#14.0]
L DBD [AR1,P#16.0]
T DID [AR2,P#18.0]
L DBD [AR1,P#20.0]
T #STAT1.STAT8
L DBD [AR1,P#24.0]
T #STAT1.STAT9
L #TEMP11
T #TEMP13
L #STAT0
ITD
L L#1
-D
L L#224
*D
L L#8352
+D
L DBD 1476
TAK
T LD 18
TAK
L 5.000000e+000
+R
L #TEMP12
*R
L 1.000000e+002
/R
LAR1 LD 18
T DBD [AR1,P#0.0]
L #STAT0
T DB101.DBW 0
CLR
A #STAT1.STAT2
NOT
= DBX 2.0
L #TEMP13
T DBD 4
L #TEMP12
T DBD 8
L #STAT1.STAT3
T DBD 12
L #STAT1.STAT4
T DBD 16
L #STAT1.STAT5
T DBD 20
L #STAT1.STAT6
T DBD 24
L #STAT1.STAT7
T DBW 28
L #STAT1.STAT8
T DBD 30
L 0.000000e+000
L #STAT1.STAT8
-R
T DBD 34
TAR2 LD 18
LAR2 P#DBX 0.0
CDB
UC "FB_PID_Flow"
CDB
LAR2 LD 18
L #STAT0
ITD
L L#1
-D
L L#32
*D
L L#7680
+D
L #TEMP14
TAK
T LD 22
TAK
L DBD 38
*R
LAR1 LD 22
OPN "DBint_FlowMe"
T DBD [AR1,P#0.0]
L #STAT0
ITD
L L#1
-D
L L#32
*D
TAR2
+D
L DB101.DBD 38
TAK
LAR1
TAK
T DID [AR1,P#30.0]
L #STAT0
ITD
L L#1
-D
L L#32
*D
L L#4608
+D
L #TEMP13
TAK
LAR1
TAK
OPN "DBint_FlowMe"
T DBD [AR1,P#0.0]
L #STAT0
ITD
L L#1
-D
L L#32
*D
L L#1568
+D
L #TEMP13
TAK
T LD 22
TAK
L 1.000000e+004
*R
RND
LAR1 LD 22
OPN "DBint_PlcToPc"
T DBD [AR1,P#0.0]
L #STAT0
ITD
L L#11871
+D
L #STAT0
ITD
TAK
T LD 22
TAK
L L#1
-D
L L#224
*D
L L#8352
+D
L DB101.DBD 38
TAK
LAR1
TAK
OPN "DBint_FlowMe"
L DBD [AR1,P#0.0]
>=R
LAR1 LD 22
= DBX [AR1,P#0.0]
A L 16.1
SAVE
BE
FB_PID_FLOW 程序如下
SET
SAVE
= L 16.1
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#32
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
T #TEMP20
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#128
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
T #TEMP22
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#32
+D
L #IN3
TAK
T LD 18
TAK
L #IN2
-R
L LD 18
TAK
T LD 22
TAK
TAR2
+D
L LD 22
TAK
LAR1
TAK
T DID [AR1,P#42.0]
A #IN1
JCN M001
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#64
+D
TAR2
+D
L 0.000000e+000
TAK
LAR1
TAK
T DID [AR1,P#42.0]
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
TAR2
+D
L 0.000000e+000
TAK
LAR1
TAK
T DID [AR1,P#42.0]
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#128
+D
TAR2
+D
L 0.000000e+000
TAK
LAR1
TAK
T DID [AR1,P#42.0]
T #OUT11
JU M002
M001: L #IN8
ITD
DTR
L 1.000000e+003
/R
T #TEMP19
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#64
+D
L #IN0
ITD
TAK
T LD 18
TAK
L L#1
-D
L L#192
*D
L L#32
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN5
*R
L LD 18
TAK
T LD 22
TAK
TAR2
+D
L LD 22
TAK
LAR1
TAK
T DID [AR1,P#42.0]
L #IN6
L 0.000000e+000
==R
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#64
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN9
= L 16.2
>R
O L 16.2
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#64
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN10
= L 16.2
O L 16.2
JCN M003
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
TAR2
+D
L 0.000000e+000
TAK
LAR1
TAK
T DID [AR1,P#42.0]
JU M004
M003: L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
L #IN0
ITD
TAK
T LD 18
TAK
L L#1
-D
L L#192
*D
L L#96
+D
L #IN0
ITD
TAK
T LD 22
TAK
L L#1
-D
L L#192
*D
L L#32
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN5
*R
L #TEMP19
*R
L #IN6
/R
L LD 22
TAK
T LD 26
TAK
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L LD 26
+R
L LD 18
TAK
T LD 22
TAK
TAR2
+D
L LD 22
TAK
LAR1
TAK
T DID [AR1,P#42.0]
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN9
>R
JCN M005
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
TAR2
+D
L #IN9
TAK
LAR1
TAK
T DID [AR1,P#42.0]
JU M004
M005: L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN10
JCN M004
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#96
+D
TAR2
+D
L #IN10
TAK
LAR1
TAK
T DID [AR1,P#42.0]
M004: L #IN0
ITD
L L#1
-D
L L#192
*D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #IN3
==R
JCN M006
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#32
+D
TAR2
+D
LAR1
L DID [AR1,P#42.0]
L #TEMP20
-R
L #IN5
*R
L #IN7
*R
L #TEMP19
/R
T #TEMP21
JU M007
M006: L 0.000000e+000
T #TEMP21
M007: L #IN0
ITD
L L#1
-D
L L#192
*D
L L#128
+D
L 1.000000e+000
TAK
T LD 18
TAK
L #IN4
-R
L #TEMP21
*R
L #IN4
TAK
T LD 22
TAK
L #TEMP22
*R
L LD 22
+R
L LD 18
TAK
T LD 22
TAK
TAR2
+D
L LD 22
TAK
LAR1
TAK
T DID [AR1,P#42.0]
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#64
+D
L #IN0
ITD
TAK
T LD 18
TAK
L L#1
-D
L L#192
*D
L L#96
+D
L LD 18
TAK
T LD 22
TAK
TAR2
+D
L LD 22
TAK
T LD 18
TAK
TAR2
+D
LAR1 LD 18
L DID [AR1,P#42.0]
TAK
LAR1
TAK
L DID [AR1,P#42.0]
+R
L #IN0
ITD
TAK
T LD 18
TAK
L L#1
-D
L L#192
*D
L L#128
+D
TAR2
+D
L LD 18
TAK
LAR1
TAK
L DID [AR1,P#42.0]
+R
T #OUT11
L #IN9
>R
JCN M008
T #OUT11
JU M002
M008: L #OUT11
L #IN10
JCN M002
T #OUT11
M002: L #IN0
ITD
L L#1
-D
L L#192
*D
TAR2
+D
L #IN3
TAK
LAR1
TAK
T DID [AR1,P#42.0]
L #IN0
ITD
L L#1
-D
L L#192
*D
L L#160
+D
TAR2
+D
L #OUT11
TAK
LAR1
TAK
T DID [AR1,P#42.0]
CLR
A L 16.1
SAVE
BE