BOB-Jízda ve čtverci
Skočit na navigaci
Skočit na vyhledávání
Robot jezdí ve čtverci. Otáčení vpravo.
' {$STAMP BS2}
' {$PBASIC 2.5}
counter VAR Word
FREQOUT 4, 2000, 3000
DO
FOR counter = 1 TO 122
PULSOUT 13,850
PULSOUT 12,650
PAUSE 20
NEXT
FOR counter = 1 TO 31
PULSOUT 13,850
PULSOUT 12,850
PAUSE 20
NEXT
LOOP
Robot jezdí ve čtverci. Otáčení vlevo.
' {$STAMP BS2}
' {$PBASIC 2.5}
counter VAR Word
FREQOUT 4, 2000, 3000
DO
FOR counter = 1 TO 122
PULSOUT 13,850
PULSOUT 12,650
PAUSE 20
NEXT
FOR counter = 1 TO 31
PULSOUT 13,650
PULSOUT 12,650
PAUSE 20
NEXT
LOOP