'{$STAMP BS2}

'Pololu serial micro dual motor controller
'stamp pin 4 - reset
'stamp pin 6 - serial communication


speed VAR Byte

LOW 4
HIGH 4

'power motor 0 in reverse at full speed
FOR speed = 1 TO 250
      SEROUT 6,32,[$80,0,%00000000,127]
      PAUSE 2
NEXT

'stop motor 0
FOR speed = 1 TO 10
      SEROUT 6,32,[$80,0,%00000000,0]
      PAUSE 2
NEXT

'power motor 0 forward at full speed
FOR speed = 1 TO 250
      SEROUT 6,32,[$80,0,%00000001,127]
      PAUSE 2
NEXT

'stop motor 0
FOR speed = 1 TO 10
      SEROUT 6,32,[$80,0,%00000000,0]
      PAUSE 2
NEXT