Zeroeightfifteen
28.07.2005, 22:56
hallo
ich will mit dem Analogwert den ich bekomme einen Servo steuern, doch er zeigt mir immer einen Fehler an. was ist den da falsch?
$regfile = "m32def.dat"
$crystal = 8000000
$baud = 9600
Config Serialout = Buffered , Size = 20
Config Adc = Single , Prescaler = Auto
Config Servos = 1 , Servo1 = Portc.7 , Reload = 10
Config Portc = Output
Start Adc
Enable Interrupts
Dim W As Word
Print "adc"
Do
W = Getadc(0)
Print W
Waitms 200
If W > 300 Then
Servo(1) = 130
Loop
End
ich will mit dem Analogwert den ich bekomme einen Servo steuern, doch er zeigt mir immer einen Fehler an. was ist den da falsch?
$regfile = "m32def.dat"
$crystal = 8000000
$baud = 9600
Config Serialout = Buffered , Size = 20
Config Adc = Single , Prescaler = Auto
Config Servos = 1 , Servo1 = Portc.7 , Reload = 10
Config Portc = Output
Start Adc
Enable Interrupts
Dim W As Word
Print "adc"
Do
W = Getadc(0)
Print W
Waitms 200
If W > 300 Then
Servo(1) = 130
Loop
End