Hallo,
nun habe ich noch eine Frage, ich habe jetzt das RN Mega 1.4, und möchte mit dem gleichen Sensor ein prog. schreiben, das wenn der Sensor etwas erkennt die LED auf dem Board angeht, hier mein Prog.:
Code:
$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000
$baud = 9600
Dim Result As Word
Config Pina.0 = Input
Config Pinc.1 = Output
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Portc.1 = 0
Start Adc
Do
Result = Getadc(4)
If Result > 350 Then
Portc.1 = 1
End If
Wait 1
Loop
End
Was ist falsch ?
Fehlermeldungen gint es nicht, aber wenn ich es auf dem Board habe tut sich nichts. (wenn Blatt, Wand,... vor dem Sensor ist)
Viele Grüße und vielen Dank im vorraus
Lesezeichen