Es kann so einfach sein
Darauf wäre ich echt nie gekommen, da der Adc ja schon Werte lieferte!
Danke!

Also wen es interessiert, hier dann mal das funktionierenden Script:

Code:
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 2400

Config Adc = Single , Prescaler = Auto , Reference = Avcc
Admux = &B01100100
On Adc Onadc
Config Pind.3 = Input
Config Pinc.4 = Input
Portc.4 = 1
Portd.3 = 0
Dim Switch As Word
Start Adc
Enable Interrupts
Enable Adc


Do
Switch = Getadc(4)
Print Switch

Waitms 100
Loop
End

Onadc:
 If Getadc(4) < 1023 Then
 Print "i"
 End If
 Print Getadc(4)
return
Eine Frage stelle ich mir gerade:
Wie mache ich es, wenn ich einen 2. ADC-interrupt haben nöchte?
Einfach noch ein Admux dahinterhengen, oder was bedeutet das genau, ist das überhaupt möglich? Brauche ich admux überhaupt, oder reicht das "on adc"?
und löst "on adc" bei jeder änderung an egal welchem ADC aus?

MFG Moritz