Hallo! Nun habe ich das programm etwas verändert und es geht immer noch nicht.

Code:
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 16000000

Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Portc.0 = Output
Dim Analogwert_0 As Byte
Analogwert_0 = Getadc(0)

Start Adc

Do
If Analogwert_0 > 125 Then
Portc.0 = 1
Else
Portc.0 = 0
End If
Loop

Stop Adc

End
ich kann das poti drehen wie ich will aber die led zeigt nichts an, bei compilieren ist auch kein erreo aufgetreten, es müsste doch eigentlich gehen