' {$STAMP BS2}
' {$PBASIC 2.5}
counter VAR Word
FREQOUT 4, 4000, 4000
PAUSE 20
FOR counter = 1 TO 89
PULSOUT 13, 650
PULSOUT 12, 650
PAUSE 20
NEXT
FREQOUT 4, 500, 3500
PAUSE 20
FOR counter = 1 TO 215
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 ,3000 , 8000
PAUSE 20
FREQOUT 4, 2000, 2000
PAUSE 20
FREQOUT 4, 6000, 3000
PAUSE 20
FOR counter = 1 TO 201
PULSOUT 13, 650
PULSOUT 12, 850
PAUSE 20
NEXT
Code 650 , 650 Makes the robot move left
Code 850, 650 Makes the robot move straight
Frequent changes the pitch the robot makes and at different tones Makes the robot move left
The code "FOR counter" determines the turn Ratio
The code 850,850 makes the robot go straight
Click here for page 1 (Main Page)
Click here for page 2 (Movie Review Page)
Click here for page 3 (Scratch Page)