Moin Moin,
Ich brauche (dringend) euere Hilfe. Ich habe heute meinen Sharp 2D120X IR-Sensor erhalten. Ich habe das Ding gleich mal am MyAVR Board erfolgreich getestet.
Nun möchte ich das Ding auf meinen Roboter Schrauben, später soll es als Kollisionsschutz dienen. Es ist auf einem Servo montiert, welches (logischwe weise) sich hin und her bewegt, um den Blickwinkel zu erhöhen. Als ersten test möchte ich, dass wenn sich etwas dem Sensor näher, sich das Servo dreht, sonst soll es still stehen.
Das servo ist am Portb.2 eines ATmega16 und der Sensor habe ich am portA.6 (ADC6) angeschlossen. Jedoch funktioniert garnichts.
Ja, das Servo funktioniert und auch der Sensor wurde mehrmalig überprüft, er kriegt auch seins stabielen 5V.
Hier nun mal mein Code:
Code:
$regfile = "m16def.dat"
$crystal = 16000000
Dim W As Word
Config Portb.2 = Output
Config Servos = 1 , Servo1 = Portb.3 , Reload = 10
Config Porta = Output
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
Enable Interrupts
Do
W = Getadc(6)
If W > 500 Then
Servo(1) = 50
Wait 1
Servo(1) = 150
Wait 1
End If
Waitms 1
Loop
End
Könnt ihr mir mal bitte helfen?
Danke schon einmal im voraus.
Mfg JeyBee
Lesezeichen