Hi,

eigentlich möchte ich die gemessene spannung 1:1 weitergeben, sollte wenns geht auf's Zehntel genau sein. Nix besonderes. Momentan zeigt er nur ganze zahlen an.

Eigentlich wollte ich schreiben:
w= w/1024
w= w*5

Geht eigentlicht auch w=w*avcc ?

Code:
' Die gemessene Spannung wird in der Variablen W gespeichert.
' Channel ist der Pin, an dem die Spannung gemessen werden soll.

$baud = 9600
$crystal = 8000000
$regfile "m8def.dat"

Config Portd.5 = Output
Led1 Alias Portd.5

Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
Dim W As Integer , Channel As Byte
Channel = 0
Do
  W = Getadc(0)
  W = W / 200
  Print "Wert von ADC-Pin 0 " ; W

  Led1 = 1
  Waitms 200
  Led1 = 0
  Waitms 200
Loop
End
Ich bin ein Anfänger, von daher bitte keine zu hohen Ansprüche an das Programm