Hallo Leute,
ich habe mir ein RN-Control zu gelget um das Programmieren zu lernen.
Nun versuche ich verschieden eingänge und Ausgänge zu schalten und zu Messen.
Ich habe am Analogport Pin 0 und und GND 3 Knopfzellen (in Rehe) angeschlossen und möchte die Spannnug deren messen.
Dazu habe ich folgenden Code:
Leider bekomme ich dann in dem Terminal 0 Volt angezeigt.Code:$regfile = "m32def.dat" $framesize = 32 $swstack = 32 $hwstack = 32 $crystal = 16000000 'Quarzfrequenz $baud = 9600 Config Adc = Single , Prescaler = Auto 'Für Spannungsmessung Config Pina.0 = Input 'Für Spannungsmessung Porta.0 = 1 'Pullup Widerstand ein Const Ref = 5 / 1023 'Für Batteriespannungsberechnung Dim Volt As Single Dim W As Word Do W = Getadc(0) Volt = W * Ref Volt = Volt * 5.2941 Print "Die aktuelle Spannung beträgt: " ; Volt ; " Volt" Waitms 100 Loop End
Wenn ich mit einem Multimeter die Spannung messe ist diese 2,5 Volt
Weiß vielleicht jemand was ich falsch mache?
Danke im voraus
Lesezeichen