11 lines
267 B
Plaintext
11 lines
267 B
Plaintext
&ACCESS RV2
|
|
DEF GripOpen ( )
|
|
|
|
Q_GripPosIndex=101
|
|
Q_GripPosCount=I_GripPosCountRet+1
|
|
IF Q_GripPosCount>1000 THEN
|
|
Q_GripPosCount=1
|
|
ENDIF
|
|
WAIT FOR (I_GripPosIndexRet==Q_GripPosIndex) AND (I_GripPosCountRet==Q_GripPosCount) AND I_GripOpen
|
|
|
|
END |
