Code:
$regfile = "m328pdef.dat"
$crystal = 16000000
$baud = 9600 'RS232 Baudrate definieren
$hwstack = 250
$swstack = 250
$framesize = 450
config PORTb.5 = output '(die kleine onboard-LED/D12)
portb.5=0
Config Adc = Single , Prescaler = Auto
Start Adc
Dim W As Word
Do
W = Getadc(0)
print w
toggle portb.5
wait 1
Loop
End
- - - Aktualisiert - - -
klassischer Anfängerfehler von mir - ich habe vergessen anzugeben, welche Referenz er für den ADC nehmen soll,
die Erweiterung auf REFERENCE = AVCC brachte den gewünschten Erfolg.
Lesezeichen