Nein das hilft nicht.
Der wert ändert sich nichtmal...Code:Wert = Getadc(0) Waitms 100 If Getadc(0) <> Wert Then Led = 1 : Waitms 1000 : Led = 0
Edit: Ausserdem muss die LED auf 1 gesetzt sein. Wenn der wert unter 100 geht soll die LED ausgehn...
Lesezeichen