Wert des DS1620 in eine Zahl

[Christian (Gast)]

Zur zeit lese ich DS1620 aus und gebe die Temperatur direkt auf eine LCD 
aus ich möchte aber das mir eine Funktion den wert als eine Zahl zurück 
liefert und dachte das sich da eine Integer Variable eignet nur wie 
bekomme ich die Kommastelle mit?

Sub Ds1621_init(byval Slaveid)
   I2cstart
   I2cwbyte Slaveid
   I2cwbyte &HEE
   I2cstop
End Sub

Sub Ds1621_read(byval Slaveid)
   Local Slaveid_r As Byte
   Slaveid_r = Slaveid + 1

   I2cstart
   I2cwbyte Slaveid
   I2cwbyte &HAA
   I2cstop

   I2cstart
   I2cwbyte Slaveid_r
   I2crbyte Msb , Ack
   I2crbyte Lsb , Nack
   I2cstop

   If Lsb = 0 Then
      X = 0
   Else
      X = 5
   End If


   Lowerline
   Lcd "Temperatur: "; Msb ; "." ; X
End Sub

[bas_ratte (Gast)]

Guckst du hier:
http://bascom-forum.de