Hallo,

ich habe einen Sensor mit dem I2C Bus, den ich abfragen möchte.
Hier ist mein Beispielprogramm:

Code:
$regfile = "M8def.dat"                                      'es handelt sich um einen ATmega8
$crystal = 16000000                                        
$hwstack = 32                                               
$swstack = 10                                               '
$framesize = 40                                            
$baud = 9600


Dim Lesen1 As Byte


'SDA und SCL definieren
Config Sda = Portc.4
Config Scl = Portc.5

I2cinit


I2cstart
I2cwbyte &B6
I2crbyte Lesen1 , Nack                                  
I2cstop

Print Err


Print "gelesen: "
Print Lesen1


End
Die Ausgabe sieht immer so aus:


  • 1
    gelesen:
    255


Datenblatt des Sensors:
http://www.captured-dreams.de/temp/T...n_Note_0_6.pdf


Hat jemand eine Idee, was ich falsch mache? Ich vermute bei der Adressierung ist etwas falsch. Im Datenblatt steht, dass die Adresse des Slave "54h" ist, aber wie konfigutiere ich das?

Danke!