Edit: hab mich beim SensorNamen vertippt es ist der GP2D120
Hallo,
ich steh noch nicht so sehr in der Materie, darum hoffe ich, dass mir jemand erklärt wie ich den IR-Sensor an meinem Board nutze.
Was ich bisher gemacht habe:
-Sensor: GND an GND von JP1, VCC an + von JP1 und V0 an PA0
-UREF Brücke steckt, da der Sensor 4.5 -5.5 V benötigt (laut Spezifikation)
-Programm:
Code:
Sub Showporta()
Local Ws As Word
Config Porta = Input
For I = 0 To 5 ' Alle internen Pullup Widerständ ein,bis auf Batteriespannungsmessungsport
Porta.i = 1
Next I
Print
Print "Ermittelte Messwerte an Port A Pin0:"
Do
Start Adc
Ws = Getadc(0)
Print "Adc:" ; Ws
If Tastenabfrage() = 3 Then
Exit Do
End If
Loop
End Sub
und als Ergebnis erhalte ich Werte zwischen 691 und 697
Was mache ich falsch?
Gruß Frank
Lesezeichen