atmega32 -> Servo

Gast #799361
Lesenswert?
• ▲
▼
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
Gast #799526
Lesenswert?
• ▲
▼
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

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren