Hallo zusammen,
nachdem ich gestern endlich Teile für meine Bastelwut erhalten habe gibt's schon wieder die ersten Probleme.
Bei der Lieferung waren auch zwei DS18S20 dabei.
Also mal schnell ins Datenblatt geschaut und angeschlossen.
Nun ja der Erfolg war etwas überraschend, dachte das wären Sensoren und keine Heizelemente, nun gut.
Dann also den zweiten dran und los.
Erfolg wieder Erwarten mässig, Spannung bricht zusammen und das ding wird heiss.
Gut jetzt mal ne andere Anschlussbelegung, ok.
Sensor wird nicht heiss, aber der mühsam dem i-net entlockten Bascom code gibt mir leider als Temperatur nur 127°C aus.
Jetzt mal die Frage jemand eine Idee woran es liegen könnte, oder hab ich die Sensoren schon gehimmelt?
Anbei der Bascom Code und der Link zum Datenblatt.
Anschluss bei Figure 2 auf seite 4: sensor wird heiss.
Anschluss bei Figure 3 auf seite 4: ohne den Transistor gzw. mosfet. sensor zeigt 127°C an.
http://pdf1.alldatasheet.com/datasheet-pdf/view/58558/DALLAS/DS18S20.html
Danke schonmal im Vorraus.
Gruss Alex
nachdem ich gestern endlich Teile für meine Bastelwut erhalten habe gibt's schon wieder die ersten Probleme.
Bei der Lieferung waren auch zwei DS18S20 dabei.
Also mal schnell ins Datenblatt geschaut und angeschlossen.
Nun ja der Erfolg war etwas überraschend, dachte das wären Sensoren und keine Heizelemente, nun gut.
Dann also den zweiten dran und los.
Erfolg wieder Erwarten mässig, Spannung bricht zusammen und das ding wird heiss.
Gut jetzt mal ne andere Anschlussbelegung, ok.
Sensor wird nicht heiss, aber der mühsam dem i-net entlockten Bascom code gibt mir leider als Temperatur nur 127°C aus.
Jetzt mal die Frage jemand eine Idee woran es liegen könnte, oder hab ich die Sensoren schon gehimmelt?
Anbei der Bascom Code und der Link zum Datenblatt.
Code:
'------------------------------------------------------------------------------
' LCD: Db4-Db7 = Portd.4-Portd.7 E = Portd.3 Rs = Portd.2 Backlight = Portb.1
' I2C: Sda = Portc.4 Scl = Portc.5
' UART: RxD = Portd.0 TxD = Portd.1
' 1wire Portb.0
' Frei: Portb.2-Portb.5 Portc.0-Portc.3
'------------------------------------------------------------------------------
$regfile = "m8def.dat"
$crystal = 3686411
' LCD konfigurieren Port auf Ausgabe setzten und Pin's entsprechend zuordnen
Ddrd = &HFF
Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portd.3 , Rs = Portd.2
Config Lcd = 16 * 2
' Pin für 1wire Schnittstelle festlegen, Schnittstelle wird von BASCOM durch Software realisiert
Config 1wire = Portc.5
Dim Ar(2) As Byte
Cls
Do
1wreset
1wwrite &HCC
1wwrite &H44
Wait 1
1wreset
1wwrite &HCC
1wwrite &HBE
Ar(1) = 1wread(2)
Locate 1 , 1
Lcd Hex(ar(2)) ; Hex(ar(1))
Locate 2 , 1
Shift Ar(1) , Right , 1
Lcd Ar(1)
Loop
End
Anschluss bei Figure 2 auf seite 4: sensor wird heiss.
Anschluss bei Figure 3 auf seite 4: ohne den Transistor gzw. mosfet. sensor zeigt 127°C an.
http://pdf1.alldatasheet.com/datasheet-pdf/view/58558/DALLAS/DS18S20.html
Danke schonmal im Vorraus.
Gruss Alex