Newbie with I2C

pinkfloyd11 · Joined: 02 Jul 2007 Posts: 248

Dear Friends

for first time I'm working on M24C64 I2C memory.

Sample code say that I must add another byte if use 24c64 but I do not have understand where add it.

In my case pin A0 and A1 are connected to the ground.

This is a I2C sample code with my modify in bold:

'Direttive di compilazione
$regfile = "m8515.dat"
$crystal = 16000000
$baud = 9600
$hwstack = 32
$swstack = 8
$framesize = 50
'Configurazione Pin
Config Sda = PortD.7
Config Scl = PortD.5
Config Portd.3 = Output
WP Alias Portd.3
'Prototipi di funzione
Declare Sub Write_eeprom(byval Adres As Byte , Byval Value As Byte)
Declare Sub Read_eeprom(byval Adres As Byte , Value As Byte)
'Dichiarazioni di variabili
Const Abilita = 0
Const Disabilita = 1
Const Addressw = 160 'slave write address
Const Addressr = 161 'slave read address
Dim B1 As Byte
Dim Adres As Byte
Dim Value As Byte 'dim byte

'_____________________________________________________________________________________________
'Sub Main

Call Write_eeprom(10 , 3) 'write value of three to address 10 of EEPROM

Call Read_eeprom(10 , Value) : Print Value 'read it back

End
'_____________________________________________________________________________________________

Sub Write_eeprom(byval Adres As Byte , Byval Value As Byte)
WP = Abilita
I2cstart 'start condition
I2cwbyte Addressw 'slave address
I2cwbyte Adres 'address in EEPROM
I2cwbyte Value 'value to write
I2crbyte Value , Ack
I2cstop 'stop condition
Waitms 10 'wait for 10 milliseconds
WP = Disabilita
End Sub

'_____________________________________________________________________________________________
Sub Read_eeprom(byval Adres As Byte , Value As Byte)
I2cstart 'generate start
I2cwbyte Addressw 'slave address
I2cwbyte Adres 'address in EEPROM
I2cstart 'repeated start
I2cwbyte Addressr 'slave address (read)
I2crbyte Value , Nack 'read byte
I2cstop 'generate stop
End Sub

Evert :-) · Joined: 18 Feb 2005 Posts: 2111

Hi Gpezzella,

In the help file there's an "sample" how to read BIG eeproms. You need an extra byte for the eprom adress.

Here's the modified sample. I didn't tested it on real hardware.

pinkfloyd11 · Joined: 02 Jul 2007 Posts: 248

Dear friends,

Between samples there is one for write on 24C64 memory:

Sub Write_eeprom(byval Address_H As Byte , Byval Address_L As Byte , Byval Value As Byte)
I2cstart 'start condition
I2cwbyte &B1010_0000 'slave address
I2cwbyte Address_H 'high address
I2cwbyte Address_L 'low address
I2cwbyte Value 'value to write
I2cstop 'stop condition
Waitms 10
End Sub

In the case that A0 and A1 are connect to the ground, which is Address_H and Address_L??

If for example I would write at location 3 the value 12, what I must do?
Thanks

Duval JP · Joined: 22 Jun 2004 Posts: 932 Location: France

bonjour again,

imagine you have one street with somes big houses
the house where you are living is seat at n° 160

but, in this house you have 8128 flats

you want to write a byte (8bits) of 115 to the flat, let's say 23

you have to give first the address of the street, 160,
then the flat location 00 (hight byte we said the Main Signifiant Byte) then 23 (Less Signifiant Byte),
then the name of the resident here 115

Your eepprom is divided in 64kbits =8 X 8 bytes address inside the eeprom
going from 0 to 8127 if I'm ok so you have to give the full address
MSB then LSB

is it clear ?
bon courage
JP

Visovian · Joined: 31 Oct 2007 Posts: 584 Location: Czech

Hello Gpezzella,

There are two slave addresses in Evert's example, Addressw and Addressr
These are built this way:

First 4 bits (7 to 4) is device type identifier, found in datasheet, for 24m64 it is 1010.
Further 3 bits (3 to 1) is chip address. This is set by pins E2, E1, E0. Say all of them are connected to ground.
Then chip address is 000. This has nothing to do with addresses inside of memory.
The last bit (bit0) is 0 for write and 1 for read.

So result is
Addressw = 1010_000_0 (slave address for write)
Addressr = 1010_000_1 (slave address for read)
(In datasheet is "device select" instead of "slave address").

And back to your question