Wert des DS1620 in eine Zahl

Gast #669957
Lesenswert?

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?
1
Sub Ds1621_init(byval Slaveid)
2
   I2cstart
3
   I2cwbyte Slaveid
4
   I2cwbyte &HEE
5
   I2cstop
6
End Sub
7

8
Sub Ds1621_read(byval Slaveid)
9
   Local Slaveid_r As Byte
10
   Slaveid_r = Slaveid + 1
11

12
   I2cstart
13
   I2cwbyte Slaveid
14
   I2cwbyte &HAA
15
   I2cstop
16

17
   I2cstart
18
   I2cwbyte Slaveid_r
19
   I2crbyte Msb , Ack
20
   I2crbyte Lsb , Nack
21
   I2cstop
22

23
   If Lsb = 0 Then
24
      X = 0
25
   Else
26
      X = 5
27
   End If
28

29

30
   Lowerline
31
   Lcd "Temperatur: "; Msb ; "." ; X
32
End Sub

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren