' {$STAMP BS2}
' {$PBASIC 2.5} counter VAR Word FREQOUT 4, 2000, 3000 PAUSE 20
FOR counter = 1 TO 92
PULSOUT 13, 650
PULSOUT 12, 650
PAUSE 20
NEXT
FREQOUT 4, 500,3500
PAUSE 20
FOR counter = 1 TO 208
PULSOUT 13, 850
PULSOUT 12, 650
PAUSE 20
NEXT
FOR counter = 1 TO 24
PULSOUT 13, 850
PULSOUT 12, 850
PAUSE 20
NEXT
FREQOUT 4, 2000, 3000
PAUSE 20
FREQOUT 4, 3000, 3000
PAUSE 20
FREQOUT 4, 5000, 3000
PAUSE 20
FOR COUNTER = 1 TO 201
PULSOUT 13, 650
PULSOUT 12, 850
PAUSE 20
NEXT
For counter changes the turn ratio. The code 650,650 makes the boe bot turn left. The Freqout tag changes the pitch of the robot. 850,650 makes the robot go right. 850,850 makes it stay still . Pause makes it stop for a moment.