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
Lesezeichen