Omron trajexia CJ1W-MCH72 Operation Manual page 349

Practical examples
5-2-6-1 Example
338
y
x speed
y speed
Square_rel
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
100 200
X=0
Y=0
X=1
Y=0
X=0
Y=1
X=0
Y=2
X=0
Y=3
X=0
Y=4
Square_rel
MOVEABS(0,200)
Section 5-2
x
X=4
Y=4
t
t
MOVEABS(0,400)
OP(nozzle)