我是用梯形图写的。。。

L 1
T #OUT_POINTER
NOP 0

LOOP: CALL "IMOVE"
SS_ADD :=DB13.DBX18.0
S_OFFSET:=#OUT_POINTER
DS_ADD :=#OUT_TIME
D_OFFSET:=0
LEN :=1
NOP 0

A(
L #OUT_TIME
L -1
==I
)
JNB _001
CALL "Q_BIT_SET"
SS_ADD:=Q0.0
Bit_No:=#OUT_POINTER
_001: A BR
JC NEXT

A(
A(
L #OUT_TIME
L 0
>I
)
JNB _002
L #OUT_TIME
L 100
-I
T #OUT_TIME
AN OV
SAVE
CLR
_002: A BR
)
JNB _003
CALL "Q_BIT_SET"
SS_ADD:=Q0.0
Bit_No:=#OUT_POINTER
_003: A BR
= #TIME_POS

AN #TIME_POS
JNB _004
CALL "Q_BIT_RESET"
SS_ADD:=Q0.0
Bit_No:=#OUT_POINTER
_004: NOP 0

A #TIME_POS
JNB _005
CALL "IMOVE"
SS_ADD :=#OUT_TIME
S_OFFSET:=0
DS_ADD :=DB13.DBX18.0
D_OFFSET:=#OUT_POINTER
LEN :=1
_005: NOP 0

NEXT: A(
L #OUT_POINTER
L 1
+I
T #OUT_POINTER
AN OV
SAVE
CLR
A BR
)
A(
L #OUT_POINTER
L MW 214 //存放开出的总数
<=I
)
JC LOOP
时间慢了可以增大每次减的值，快了反之。