Hallo,
den NTC per AD auslesen hab ich ja schon hin bekommen.
Aber wie bekomme ich da jetzt die Temperatur daraus errechnet ?
Ich weiß es gibt andere Sensoren die einfacher sind. ds18b20 zum Beispiel.
Aber ich muss den Sensor in den Kühlkreis bekommen. Und dafür habe ich noch 2 hier rumliegen.
Also den NTC und den Flow-Meter. Zum Flow Meter aber später immer eines nach dem anderen.
Nicht wundern das momentan so viel Verschiedenes von mir kommt. Es handelt sich alles um das selbe Projekt.
Nur kann ich den UNO auf Steckbrett aufbauen den Mega 2560 nicht.
Daher wird alles da getestet und dann auf den Mega 2560 Übernommen.
Anbei mal mein Code:
Alles anzeigen
den NTC per AD auslesen hab ich ja schon hin bekommen.
Aber wie bekomme ich da jetzt die Temperatur daraus errechnet ?
Ich weiß es gibt andere Sensoren die einfacher sind. ds18b20 zum Beispiel.
Aber ich muss den Sensor in den Kühlkreis bekommen. Und dafür habe ich noch 2 hier rumliegen.
Also den NTC und den Flow-Meter. Zum Flow Meter aber später immer eines nach dem anderen.
Nicht wundern das momentan so viel Verschiedenes von mir kommt. Es handelt sich alles um das selbe Projekt.
Nur kann ich den UNO auf Steckbrett aufbauen den Mega 2560 nicht.
Daher wird alles da getestet und dann auf den Mega 2560 Übernommen.
Anbei mal mein Code:
Quellcode
- 'Programm zum Ansteuern des Arduino Uno mit DF ROBOT LCD Keypad Shield
- '
- 'Controller: Original ATMega328P
- 'Quarz: 16MHz
- '
- 'Belegung LCD: *
- 'Backlight - PB2
- 'DB4 - PD4
- 'DB5 - PD5
- 'DB6 - PD6
- 'DB7 - PD7
- 'RS - PB0
- 'E - PB1
- '
- '
- 'Temperatur Messung:
- 'NTC 10K an PC1 (ADC1)
- 'NTC ueber 10K Wiederstand an GND
- ' GND--10k---|-----NTC-----5V
- ' |
- ' PC1
- 'Belegung Tasten:
- 'Über Widerstandsnetzwerk an PC0 (ADC0)
- 'keine Taste gedrückt: 1023 - Abfrage auf ADC > 1000
- 'Select: 739 - Abfrage auf ADC < 790
- 'Links: 503 - Abfrage auf ADC < 555
- 'Unten: 327 - Abfrage auf ADC < 380
- 'Oben: 143 - Abfrage auf ADC < 195
- 'Rechtst: 0 - Abfrage auf ADC < 50
- '---------- Konfiguration -----------------------------------------------------
- $regfile = "m328pdef.dat"
- $crystal = 16000000
- $hwstack = 100
- $swstack = 100
- $framesize = 100
- '---------- LCD -----------------------------------------------------
- Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , _
- Db7 = Portd.7 , E = Portb.1 , Rs = Portb.0
- Config Lcd = 16 * 2
- Cursor Off Noblink
- Cls
- '---------- ADC Port C -----------------------------------------------
- Config Adc = Single , Prescaler = Auto , Reference = Avcc
- Start Adc
- '---------- Beleuchtung LCD---------------------------------------------
- Config Portb.2 = Output 'PinB.2 als Ausgang für das LCD Backlight
- PortB.2 = 1
- '---------- Variablen -----------------------------------------------------
- Dim Wert_von_tastatur As Word 'aktueller ADC-Wert
- Dim Wert_von_NTC As Word 'aktueller ADC-Wert
- '---------- Kauptprogramm -----------------------------------------------------
- do
- Wert_von_NTC = Getadc(1) 'adc-Wert einlesen
- Wert_von_tastatur = Getadc(0) 'adc-Wert einlesen
- locate 1,1
- lcd "ADC0"
- locate 1,10
- lcd "ADC1"
- locate 2,1 'Ausgabe Wert ADC 0
- lcd Wert_von_tastatur ;"
- locate 2,10 'Ausgabe Wert ADC 1
- lcd Wert_von_NTC ;"
- waitms 600
- locate 2,1
- lcd " "
- loop
- end