hi linux_80

wäre das dann mit einer FOR- NEXT zu machen?

So in etwa:

Dim C As Long
Dim D(4) As Byte At C Overlay
Dim I as Byte

Dann bei

Twi_addressed_gowrite:
For i = 1 to 4
TWI = B(i)
Next
Return

Meinst Du das geht auch so oder muss ich alle einzelnen Bytes mit I2CSEND einzeln versenden.

So wie:

I2Cstart
I2C send B(1)
I2C send B(2)
I2C send B(3)
I2C send B(4)
I2Cstop

??