F - Epson

SPEL+ Sprachreferenz
Xqt Beispiel
Function main
Xqt flash, NoPause 'Startet die Funktion Flash als Task 2
Xqt Cycle(5) 'Startet die Funktion Cycle als Task 3
Do
Wait 3 'Führt den Task 2 drei Sekunden lang aus
Halt flash 'Unterbricht den Task
Wait 3
Resume flash 'Setzt den Task fort
Loop
Fend
Function Cycle(count As Integer)
Integer i
For i = 1 To count
Jump pick
On vac
Wait .2
Jump place
Off vac
Wait .2
Next i
Fend
Function flash
Do
On 1
Wait 0.2
Off 1
Wait 0.2
Loop
Fend
458 SPEL+ Language Reference Rev 3.5