Hallo,
bitte um Hilfe, ich versuche jetzt schon eine Woche den Temperaturfühler ds18b20 (genaue Beschriftung: DALLAS 18B20 1804C4 +51AG)mit einem ATmega8-16PU auszulesen, bzw. anzusprechen.
Alles anzeigen
Auf dem LCD erscheint bei der Anzahl = 0 und in der 2.ten Zeile als Familiencode 00
ich habe den Temperaturfühler so angeschlossen:
1 Masse
2 über 4k7 Ohm an +5V, und direkt an D7 des atmega8
3 an +5V
Muss man die 1wire Bibliothek evtl. laden, oder muss man den 1Wire irgendwie initialisieren?
Oder funktioniert der DS18B20 nicht am ATmega8-16PU mit Bascom?
Oder seht ihr bitte einen Fehler im Code.
Danke
bitte um Hilfe, ich versuche jetzt schon eine Woche den Temperaturfühler ds18b20 (genaue Beschriftung: DALLAS 18B20 1804C4 +51AG)mit einem ATmega8-16PU auszulesen, bzw. anzusprechen.
Quellcode
- $regfile = "m8def.dat"
- $crystal = 8000000
- $hwstack = 64
- $swstack = 64
- $framesize = 64
- Config Lcd = 16 * 2
- Config Lcdpin = Pin , Db4 = Portc.0 , Db5 = Portc.1 , Db6 = Portc.2 , Db7 = Portc.3 , E = Portc.5 , Rs = Portc.4
- Config 1wire = Portd.7
- Dim Dsid1(8) As Byte
- Dim Dsid2(8) As Byte
- Dim Sc(9) As Byte
- Dim W As Word
- 1wreset
- W = 1wirecount()
- Sc(1) = 1wsearchfirst()
- Cls
- Locate 1 , 1
- Lcd "Anzahl = "
- Locate 1 , 10
- Lcd W
- Locate 2 , 1
- Lcd Hex(sc(1))
- Waitms 500
- end
Auf dem LCD erscheint bei der Anzahl = 0 und in der 2.ten Zeile als Familiencode 00
ich habe den Temperaturfühler so angeschlossen:
1 Masse
2 über 4k7 Ohm an +5V, und direkt an D7 des atmega8
3 an +5V
Muss man die 1wire Bibliothek evtl. laden, oder muss man den 1Wire irgendwie initialisieren?
Oder funktioniert der DS18B20 nicht am ATmega8-16PU mit Bascom?
Oder seht ihr bitte einen Fehler im Code.
Danke