Shop OBEX P1 Docs P2 Docs Learn Events
Test servo wheel — Parallax Forums

Test servo wheel

SAMYTRIXSAMYTRIX Posts: 11
edited 2006-04-01 16:32 in BASIC Stamp
' {$STAMP BS2}
' {$PBASIC 2.5}
DEBUG "Program running!"
counter······· VAR···· Word
FOR· counter = 1 TO 122
· PULSOUT 12, 650
· PAUSE 20
NEXT
FOR counter = 1 TO 40
· PULSOUT 12, 750
· PAUSE 20
NEXT
FOR counter = 1 TO 122
· PULSOUT 12, 850
· PAUSE 20
NEXT
END

can someone give me the code to use to test servo wheel for BS1, pbasic 1.0, the above code is for BS2 pbasic 2.5

Comments

  • Chris SavageChris Savage Parallax Engineering Posts: 14,406
    edited 2006-04-01 16:32
    Try the one below.· It should be the BS1 equivalent of what you posted.
    ' {$STAMP BS1}
    ' {$PBASIC 1.0}
     
    SYMBOL counter = B0
     
    FOR  counter = 1 TO 122
      PULSOUT 12, 130
      PAUSE 20
    NEXT
    
    FOR counter = 1 TO 40
      PULSOUT 12, 150
      PAUSE 20
    NEXT
    
    FOR counter = 1 TO 122
      PULSOUT 12, 170
      PAUSE 20
    NEXT
    
    END
    

    ▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔▔
    Chris Savage
    Parallax Tech Support
    csavage@parallax.com
Sign In or Register to comment.