HI

Also ich habe gerade festgestellt, dass mein Mega auch kein I²C Signal rausschickt.
Ich habe mir schon die neue i2c.lib runtergezogen.

Gibt es denn keinen Standard, wie man das macht?
Oder unterstützt die neue Lib auch den Hardware TWI?
Welche 'Schalter' muss man denn umlegen?

Mein Quellcode:

$regfile = "m16def.dat"
$baud = 9600
$crystal = 16000000
$lib "i2c.lib"


Beep Alias Portd.2


Config Sda = Portc.1
Config Scl = Portc.0

Const 24c64 = &B1010_0000


Dim Var As Byte



I2cinit


Do

Sound Beep , 300 , 100


Print "Beginne mit EEPROM-Experiment 1."
Print "Lese aus 24C64!"


I2csend 24c64 , 1
I2csend 24c64 , 1
I2creceive 24c64 , Var


Print "Ergebniss: " ; Str(var)


Sound Beep , 500 , 500

Var = 123

Print "Beginne mit EEPROM-Experiment 2."
Print "Schreibe in 24C64!"

I2csend 24c64 , 1 , 1 , Var

Print "Fertig. Ich schrieb: " ; Str(var)




Sound Beep , 300 , 1500

Loop


End

Es geht mal nicht um das 24C64, sonder allgemein: Es kommt zu portc.0 und portc.1 NIX raus.

Was mache ich denn falsch?

Ganz liebe Grüße und ruten Rutsch,
Tobi

PS:
Ich habe noch die 1.11.7.4.
Meine PullUps sind Metallschicht mit 4,7kOhm.