Hallo,
habe in Bascom folgendes programm:
C sollte eigentlich 1,6 V ergeben.Code:$regfile = "m8def.dat" $framesize = 32 $swstack = 32 $hwstack = 32 $crystal = 1000000 Config Lcd = 16 * 1 Config Lcdpin = Pin , Db4 = Portd.0 , Db5 = Portd.1 , Db6 = Portd.2 , Db7 = Portd.3 , E = Portd.5 , Rs = Portd.4 Config Lcdbus = 4 Config Adc = Single , Prescaler = Auto Start Adc Dim W As Word Dim A As Single Dim B As Single Dim C As Single Dim D As Single Dim E As Single Do W = Getadc(1) A = 5 / 1024 C = W * A D = C * 100 D = Round(d) E = D / 100 B = E Cursor Off Cls Locate 1 , 1 Lcd B ; " V" Wait 1 Loop End
Leider gibt das Display immer nur 1,615559 aus. Kein Volt-zeichen oder sonst was. Nur wenn ich z.b. schreibe A=10/1024, dann gibt er was anderes aus, aber sonst nicht.
mfg







Zitieren
Lesezeichen