Hallo, ich habe einen Servo an einen Controller angeschlossen und möchte ihn jetzt damit ansteuern. Dazu habe ich ein kleinen Code in Bascom geschrieben: " $regfile = "m32def.dat" $framesize = 32 $swstack = 32 $hwstack = 32 $crystal = 16000000 $baud = 9600 Config Servos = 1 , Servo1 = Porta.2 , Reload = 10 Do Servo(1) = 100 Waitms 100 Servo(1) = 00 Waitms 100 Loop End " Leider funktioniert das nicht. Kann mir jemand helfen den Fehler in dem Programm zu finden? Thomas
probier den mal, da läuft es rechts und links.
1 | $regfile = "m32def.dat" |
2 | $framesize = 42 |
3 | $swstack = 32 |
4 | $hwstack = 32 |
5 | |
6 | $crystal = 8000000 |
7 | $baud = 19200 |
8 | |
9 | Dim Sw As Byte |
10 | |
11 | Config Pina.2 = Output |
12 | Enable Interrupts |
13 | |
14 | Config Servos = 1 , Servo1 = Porta.2 , Reload = 10 |
15 | Servo(1) = 100 |
16 | |
17 | For Sw = 40 To 140 |
18 | Servo(1) = Sw |
19 | Waitms 100 |
20 | Next Sw |
21 | |
22 | For Sw = 140 To 40 Step -1 |
23 | Servo(1) = Sw |
24 | Waitms 100 |
25 | Next Sw |
26 | |
27 | |
28 | End
|
Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.