I2C Drucksensor DRMOD-I2C-RV1

[muerzi]

Hallo Liebe Community

Habe einen Drucksensor DRMOD-I2C-RV1 von der Firma Hygrosens und bekomme
keine Daten :-(

Datenleitung und Clockleitung sind jeweils über 1,9kOhm an +5V

Hier mein Code:

$programmer = 1

$regfile = "M32def.dat"                                     ' the used
chip
$crystal = 16000000                                         ' frequency
used
$baud = 9600

$lib "i2c_twi.lbx"                                          ' Für
Hardware TWI

Config Twi = 400000                                         ' Init TWBR
und TWSR

' TWI gleich einschalten, das macht Bascom ansonsten erst beim I2CStart
!
Twcr = &B00000100                                  ' nur TWEN setzen


Dim Druck As Word
Dim Msb_druck As Byte
Dim Lsb_druck As Byte

' Startausgabe

Do
    I2cinit
    I2cstart
    I2cwbyte &HF1
    I2crbyte Msb_druck
    I2crbyte Lsb_druck
    I2cstop

    Print Msb_druck
    Print Lsb_druck
    Waitms 2000


Loop

End

Datenblatt ist hier.

Spezifikationen zur Übertragung sind hier

Wenn ich Msb_Druck und Lsb_Druck ausgebe steht nur "30 0D 0A" also "0" in dez.

Wenn ich unterdruck am anschluß des Sensors anlege ändern sich die werte nicht.

Enthält der Code einen Fehler?

Ich hoffe ihr könnt mir helfen!

mfg