BASE(1)
SPEED=20
REP_OPTION = 1
REP_DIST=VR(cut_length)
WDOG=ON
FORWARD
'REPEAT
loop:
BASE(0)
MOVELINK(180,220,40,40,1,2,50)
WAIT UNTIL MPOS>25
OP(cut, ON)
'WAIT IDLE
WAIT UNTIL MPOS>155
OP(cut, OFF)
MOVELINK(-180,180,60,60,1)
WAIT IDLE
'UNTIL 0
GOTO loop