-
        

Ergebnis 1 bis 2 von 2

Thema: DS18B20

  1. #1
    Erfahrener Benutzer Robotik Einstein
    Registriert seit
    01.03.2004
    Ort
    Bielefeld (JA, das gibt es!)
    Alter
    29
    Beiträge
    1.614

    DS18B20

    Anzeige

    Hi Leutz,

    ich hab hier nen DS18B20 rumliegen und wollte mal fragen ob mir jemand mal sagen kann was hierdran falsch ist und wie es richtig heißt?

    Code:
    $regfile = "m8def.dat"
    $crystal = 7372800
    
    Config 1wire = Portc.0
    
    Config Lcd = 20 * 4                                         '20 x 4 (Spalten x Zeilen)
    Config Lcdpin = Pin , E = Portb.0 , Rs = Portb.1 , Db7 = Portb.5 , Db6 = Portb.4 , Db5 = Portb.3 , Db4 = Portb.2       'Belegung am MEGA8
    Config Lcdbus = 4                                           '4-Bit Bus
    Config Lcdmode = Port                                       '4-Bit Bus
    Config Portb = Output                                       'Portb in Ausgabe Modus (Display)
    
    Cls
    
    Dim Temp(2) As Byte
    Dim Ident(8) As Byte
    Dim I As Byte
    
    1wreset
    
    Do
    
    1wwrite &H33
    
    For I = 1 To 8
       Ident(i) = 1wread(8)
    Next
    
    Locate 1 , 1
    For I = 1 To 4
       Lcd Ident(i) ; " "
    Next
    
    Locate 2 , 1
    For I = 5 To 8
       Lcd Ident(i) ; " "
    Next
    
    Waitms 50
    
    Cls
    Loop
    
    End
    Martin
    Ich will Microsoft wirklich nicht zerstören. Das wird nur ein gänzlich unbeabsichtigter Nebeneffekt sein.
    Linus Torvalds, Entwickler von Linux

  2. #2
    Benutzer Stammmitglied
    Registriert seit
    12.06.2004
    Beiträge
    61
    Hi x-ryder,

    hast du nun die Lösung gefunden?
    Ich habe hier auch 2 Sensoren rumliegen und bei mir funktionierts auch nicht. Es wird auf dem Lcd zwar ein Wert angezeigt, der aber viel zu hoch ist um die 30000 und dieser verändert sich noch nichtmal wenn die Temperatur steigt...
    Hast du die Ansteuerung geschafft?

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •