Probot128 Motor?

[pro-bot128]

Wenn jemand den Probot128 hat, funktioniert dieser Skript so?:

Dim Klapp As Byte                   'Counter variable
Dim countdelay As Byte

Sub main()                          'Main Programm

    PRO_BOT128_INIT()               'PRO-BOT128 System setup
    DRIVE_INIT()                    'Drive setup
    ENC_LED_ON()                    'Encoder LEDs "ON"

    Klapp = 0                       'Counter Var set To zero

    BEEP(250,150)                   'Play Sound
    BEEP(100,150)                   'Play Sound
    AbsDelay(500)

    Do While True                   'Endless Loop

       If SOUND_LEVEL() > 700 Then  'Sound level larger Then value 700 increment Var Klapp +1
          Klapp = Klapp + 1
          AbsDelay(100)             'Wait 100ms
       End If

       Select Case Klapp            'Select Variable count

         Case 1                     'Varibale Klapp is 1 Then LEDs "ON"
          Beepyfor()

         Case >=2                   'Variable Klapp is 2 Or bigger = "Robo-Dance"
          Beepy2()

       End Select

    End While

End Sub


Sub Beepyfor()                   'All Status LEDs "ON"
    FLL_ON()
    AbsDelay(1000)
    FLR_ON()
    AbsDelay(1000)
    BLL_ON()
    AbsDelay(1000)
    BLR_ON()
    AbsDelay(1000)
    Beepy()
End Sub


Sub Beepy()
    BEEP(250,150)
    BEEP(150,150)
    BEEP(350,150)
    BEEP(450,150)
    BEEP(350,150)
    BEEP(450,150)
    BEEP(350,150)
    BEEP(250,150)
    BEEP(550,150)
    BEEP(150,150)
    AbsDelay(1000)
    Beepy2()
End Sub


Sub Beepy2()                        'Robo-Dance
    BEEP(150,150) 'G
    BEEP(300,150) 'C
    BEEP(350,150) 'D
    BEEP(400,150) 'E
    BEEP(300,150) 'C
    BEEP(200,150) 'A
    BEEP(300,150) 'C
    BEEP(150,150) 'G
    BEEP(150,150) 'G
    BEEP(200,150) 'A
    BEEP(300,150) 'C
    BEEP(350,150) 'D
    BEEP(250,150) 'H
    BEEP(300,150) 'C
    Endy()
End Sub

Sub Endy()
    DRIVE_INIT()
    DRIVE_ON()
    MOTOR_DIR(1,1)
    MOTOR_POWER(220,220)
    AbsDelay(2000)
    DRIVE_OFF()
    MOTOR_STOP()
End Sub

[primus1998]

Hey,

ich weiß, das Thema ist schon ein bisschen älter, aber da ich das gleiche Problem hatte und im WWW keine Lösung gefunden habe, möchte ich nun meine Lösung vorstellen.
Trotz Batteriebetrieb kommen bei meinem Probot nur 4,2V am Prozessor an, obwohl 5V am Batterieblock anliegen. Also einfach Jumper aufstecken und schon hat der Motor genug Saft zum Fahren.

Liebe Grüße

primus1998

[Schmirk]

Hey,

ich weiß, das Thema ist schon ein bisschen älter, aber da ich das gleiche Problem hatte und im WWW keine Lösung gefunden habe, möchte ich nun meine Lösung vorstellen.
Trotz Batteriebetrieb kommen bei meinem Probot nur 4,2V am Prozessor an, obwohl 5V am Batterieblock anliegen. Also einfach Jumper aufstecken und schon hat der Motor genug Saft zum Fahren.

Liebe Grüße

primus1998

Achtung! Bei vollen Batterien (6V+-) MUSS der Jumper gezogen werden! Die C-Control darf nur bis 5,5V betrieben werden. Über 6v oder mehr verträgt die auf Dauer nicht...