Elektronik

Dallas Temperatursensor - DS1820


  • 1-Wire-Interface
  • 64-Bit Serial-Code im ROM
  • 9-Bit, 0.5 Grad Auflösung
    (von -10 bis +85 Grad)
  • -55 bis +125 Grad
  • Gehäuseform: 3-Pin PR35
    und 8-Pin SOIC
  • Spannung: 3.0 bis 5.5 Volt
  • Stromverbrauch: 1 mA
    (Standby: 750 nA!)
  • T-Konvertierung: 750 Millisekunden
  • Drift +/- 0.2 Grad
  • Preis: 4,95 (Conrad-05/06) 
               6,33 (Sander-05)
Pin-Belegung
GND = Masse
DQ  = Daten In/Out und Thermostat-Ausgang
Vdd = Spannungsversorgung
NC   = nicht beschaltet

Beschaltung:

Beschaltung


Datentabelle Register AAh u. 00h:

TemperaturBinärdaten
+85.0 Grad C0000 0000 1010 1010
+25.0 Grad C0000 0000 0011 0010
+0.5 Grad C0000 0000 0000 0001
0.0 Grad C0000 0000 0000 0000
-0.5 Grad C1111 1111 1111 1111
-25.0 Grad C1111 1111 1100 1110
-55.0 Grad C1111 1111 1001 0010


Software:

'**********************************************************
'Compiler  : BASCOM-AVR
'Hardware : DS1820 an PD.6 (+125 bis -55 Grad)
'                    LC-Display
'Chip type : AT90S2313
'**********************************************************
$regfile = "2313def.dat"
$crystal = 3579545

Config 1wire = Portd.6

Dim Ds1820 As
Integer
Dim Halb As Byte

Lcd "DS1820 an PD.6"
Wait 3
Cls
Lcd "Temp:"
Do
  1wreset
  1wwrite &HCC
  1wwrite &H44
  Waitms 300
  1wreset
  1wwrite &HCC
  1wwrite &HBE
  Ds1820 = 1wread(9)
  1wreset
  Halb = Ds1820 And 1
  Locate 2 , 1
  Shift Ds1820, Right
  If Ds1820 > 127 Then
    Lcd "-"
    Ds1820 =
256 - Ds1820
    If Halb = 1 Then Ds1820 = Ds1820 - 1
  Else
    Lcd " "
  End If
  Lcd Ds1820 ; ".";
  If Halb = 1 Then
    Lcd "5"
  Else
    Lcd "0"
  End If
  Lcd "C "
  Wait 1
Loop

End
'AT90S2313
'Quarz 3.579MHz

'DS1820 DQ an PD6




'Ausgabe des Textes auf LCD
'warte 3 Sekunden
'lösche LCD
'Ausgabe des Textes auf LCD

'Reset DS1820
'überspringe ROM
'starte Temperaturkonvertierung
'warte 100 Millisekunden
'Reset DS1820
'überspringe ROM
'sende Inhalt der Register AAh und 00h
'lese die empfangenen Daten
'Reset DS1821
'prüfen auf letztes Bit (x.5 Grad)
'LCD-Cursor auf Zeile2, Spalte1
'entferne letztes Bit (Rechtsschieben)
'wenn Temperatur negativ ist
'dann "Minus" auf LCD ausgeben
'und negative Temperatur berechnen
'wenn Wert x.5 dann um 1 korrigieren



'Ausgabe Temperatur und Komma
'wenn x.5
'dann "5" nach Komma ausgeben

'sonst "0" nach Komma ausgeben


'warte 1 Sekunde
'zum Beginn der Schleife


zum Download: ds1820.bas

zum Datenblatt: DS1820 PDF

Bezugsquellen:
Conrad Bestell-Nr.: 17 61 68-xx TO92 6,11 Euro
Reichelt Bestell-Nr.: DS 1820 TO92 5,45 Euro


http://www.counter-service.de http://www.counter-service.de
Home
uebermich
Programmierung
Amateurfunk
Elektronik
Download
Links
E-Mail
Gästebuch/Meckerecke
Counter-DG1XPZ