Доброго времени суток!
Для таких целей можно использовать sps.sub.
Эта программа работает постоянно в фоновом режиме.
Лежит здесь \KRC\R1\System\sps.sub
Полный цикл программы с моим кодом 0,2 сек.
Я не рекомендую использовать команды wait,
лучше реализовать по принципу step by step.
Код:
|
DEF SPS ( )
...
LOOP
....
SWITCH nStep
CASE 1
IF bResultOk=TRUE THEN
nStep=2
ELSE
nStep=5
ENDIF
CASE 2
nStep=3
CASE 3
nStep=4
CASE 4
nStep=5
CASE 5
nStep=1
DEFAULT
nStep=1
ENDSWITCH
...
ENDLOOP
...
ENDEF |