本人不会STL,转换成LAD或者FBD的。谢谢了
A(
L DB100.DBW 150
L 803
==I
)
FN #STAT2
S #STAT3
A #STAT3
JCN M003
A #STAT5
JC M002
L DB100.DBW 4
L 0
==I
JCN M003
A #STAT4
JC M001
L 0
T DB100.DBW 6
T DB100.DBW 8
T DB100.DBW 10
L 41
T DB100.DBW 4
AN #STAT4
S #STAT4
M001: A DB100.DBX 0.5
A DB100.DBX 0.6
S #STAT5
JCN M003
M002: NOP 0
L DB100.DBB 24
T DB52.DBB 0
L DB100.DBB 23
T DB52.DBB 1
L DB100.DBB 22
T DB52.DBB 2
L DB100.DBB 15
T DB52.DBB 3
L DB100.DBB 16
T DB52.DBB 4
L DB100.DBB 17
T DB52.DBB 5
CALL "SET_CLK"
PDT :=#STAT0
RET_VAL:=#STAT12
A DB100.DBX 0.5
R DB100.DBX 0.5
A DB100.DBX 0.6
R DB100.DBX 0.6
A #STAT3
R #STAT3
A #STAT4
R #STAT4
A #STAT5
R #STAT5
M003: NOP 0


2.
CALL "READ_CLK"
RET_VAL:=#STAT13
CDT :=#STAT1
L DB52.DBB 8
BTI
T #STAT16
L DB52.DBB 9
BTI
T #STAT17
L DB52.DBB 10
BTI
T #STAT18
L DB52.DBB 11
BTI
T #STAT14
L DB52.DBB 12
BTI
T #STAT15
L DB52.DBB 13
BTI
T #STAT19