Omron TJ2-MC64 - PROGRAMMING Programming Manual page 336

Examples and tips
Example
nozzle = 8
start:
FOR x = 0 TO 4
FOR y = 0 TO 4
MOVEABS(x*200, y*200)
WAIT IDLE
OP(nozzle, ON)
GOSUB square_rel
OP(nozzle, OFF)
NEXT y
NEXT x
GOTO start
square_rel:
MOVE(0, 100)
MOVE(100, 0)
MOVE(0, -100)
MOVE(-100,0)
WAIT IDLE
WA(1000)
RETURN
PROGRAMMING MANUAL
fig. 52
100 200
X=0
Y=0
X=1
Y=0
X=0
Y=1
X=0
Y=2
X=0
Y=3
X=4
Y=4
X=0
Y=4
y
x speed
y speed
Square_rel Square_rel
MOVEABS(0,200) MOVEABS(0,400)
x
t
t
OP(nozzle)
330