Hallo,

leider klappts mit dem folgenden Programm immer noch nicht:

Code:
$regfile = "M8def.dat"
$crystal = 16000000
$hwstack = 32
$swstack = 10
$framesize = 40
$baud = 9600

Config Sda = Portc.4
Config Scl = Portc.5


Dim Highbyte As Byte
Dim Lowbyte As Byte


Config I2cdelay = 20                                        ' 50 kHz Bit-Datenrate ( Baud )


I2cInit ' Zu Beginn alles in die richtige Ausgangslage bringen


I2cstart
I2cwbyte 84
I2cwbyte 182
I2cstop

Print Err



I2cstart
I2cwbyte 85
I2crbyte Highbyte
I2crbyte Lowbyte , Nack
I2cstop

Print Err


Do
Loop


End
Es wird jeweils "1 1" ausgegeben. Was kann ich noch versuchen?