schade das mir noch keiner geholfen hat. ich habe mich nun schon zum xten mal durch die hilfe gewühlt.
Code:
Config Sda = Portb.5
Config Scl = Portb.7
Dim Bytes As Byte
Const Slave = 64
Dim Bit1 As Byte
Dim Bit2 As Byte
Main:
Bytes = 8
Bit1 = 0
Bit2 = 30
I2cstart
I2csend Slave , Bit1 , Bit2 , Bytes
I2cstop
Goto L
L:
Waitms 10
Goto L
so funtioniert es schonmal nicht. Ich muss ja einmal die adresse dann die unteradresseireung und dann die eigentlichen daten senden. das sollte hier passieren
I2csend Slave , Bit1 , Bit2 , Bytes
Aber so geht es nicht
mit
I2csend Slave , Bit1
I2csend Slave , Bit2 , Bytes
geht es aber auch nicht.
Ich hab am D/a wandler keinen der adressbits gesetzt. also müsste die adresse ja laut datenblatt &h40 oder dez. 64 ergeben.
bitte nochmals um hilfe.
MfG Robert
Lesezeichen