:Main
CLR SENSORS

PLAY ACTION STAND // stand at start
WAIT

// 90 degrees is a left turn
// -90 degrees is a right turn
// Main Loop
WHILE 1 = 1
IF RTail_ON <> 0 THEN
SET Spot 1
SET Eye_L1 1
SET Eye_R1 1
PLAY ACTION TURN -90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION TURN -90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION TURN -90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION TURN -90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION STAND
WAIT
SET Spot 0
SET Eye_L1 0
SET Eye_R1 0
SET RTail_ON 0
LET idleCount 0
ENDIF
IF CTail_ON <> 0 THEN
SET Spot 1
SET Eye_L1 1
SET Eye_R1 1
PLAY ACTION WALK 0 500
WAIT
PLAY ACTION TURN 180
WAIT
PLAY ACTION WALK 0 500
WAIT
PLAY ACTION STAND
WAIT
SET Spot 0
SET Eye_L1 0
SET Eye_R1 0
SET CTail_ON 0
LET idleCount 0
ENDIF
IF LTail_ON <> 0 THEN
SET Spot 1
SET Eye_L1 1
SET Eye_R1 1
PLAY ACTION TURN 90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION TURN 90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION TURN 90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION TURN 90
WAIT
PLAY ACTION WALK 0 250
WAIT
PLAY ACTION STAND
WAIT
SET Spot 0
SET Eye_L1 0
SET Eye_R1 0
SET LTail_ON 0
LET idleCount 0
ENDIF
WAIT 100
WEND // end of main loopv
EXIT

Back