Hi,
nimm doch als referenz external und bastele dir diese Refeenzspannung mittels Spannungsteiler (Poti) oder du nimmst einen einstellbaen Festspannungsregler wie den LM317T (100mA) damit könntest du dir die 3,9V Referenz erzeugen. (Denk aber daran, die Brücke die AREF mit VCC verbindet zu trennen (Modul 072))
Oder du nimmst als Referenz = AVCC dann hast du eben die 5V Betriebsspannung als Referenz und rechnest das dann um.
zB an meiner RC-Fernsteuerung brauche ich eine Anzeige der momentanen Akkuspannung. Das mache ich dann so:
Code:
Dim A As Byte 'Für For Next Schleife
Dim Temp As Word 'Temporaer für ADC Messung
Dim Batt As Word 'Zwischenschritt 1
Dim Batterie As Single 'Schritt 2
Dim Lcd_text As String * 20 'Text aufs LCD auszugeben
Do
Batt = 0 'vor der Messung auf 0 setzen
For A = 1 To 16 '16 Messungen durchführen
Temp = Getadc(0) 'erhoeht Genauigkeit der Messung und beruhigt die Anzeige
Batt = Batt + Temp
Next
Shift Batt , Right , 4 'nach den 16 Messungen durch 16 Dividieren
Batterie = Batt / 18.25 'bei dieser Division entstehen zig nachkommastellen
Lcd_text = Fusing(batterie , "#.#") 'jetzt bleibt nur noch eine übrig.
Loop
Das ist nur ein Auszug aus dem Programm... die Akkuspannung (über10V) gebe ich dabei per Spannungsteiler auf den ADC...
Lesezeichen