These are some of the codes used to make the Boe-Bot:
' {$STAMP BS2}
' {$PBASIC 2.5}
counter VAR Word
FREQOUT 4, 3000, 3000
DO
FOR counter = 1 TO 165
PULSOUT 12, 650
PULSOUT 13, 850
PAUSE 20
NEXt
PAUSE 200
FOR counter = 1 TO 50
PULSOUT 13, 755
PULSOUT 12, 730
PAUSE 20
NEXT
PAUSE 200
STOP
LOOP