MA PYTANIE prubuje zapisac i odczytac pamiêc at24c64 i ca³y czas mi pokazuje ze odczyta³o warto¶æ 255 co to moze byæ pod³±czone do procka tak jak trzeba , rezystorki podci±gaj±ee pod³±czone wszystko tak jak trzeba
program :
Declare Sub Write_eeprom(adres As Byte , Value As Byte) 'deklaracja podprogramu Declare Sub Read_eeprom(adres As Byte , Value As Byte) 'deklaracja podprogramu
Dim Adres As Byte , Value As Byte 'deklaracja stosowanych zmiennych cls value = 5 adres = 1 call Sub Write_eeprom call Read_eeprom lcd value end
Sub Write_eeprom(adres As Byte , Value As Byte) 'podprogram zapisu danych 'do EEPROM I2cstart 'inicjalizacja magistrali I2C I2cwbyte 160 'podanie adresu pamiêci I2cwbyte Adres 'podanie adresu komórki 'pamiêci EEPROM I2cwbyte Value 'wartoœæ, która ma zostaæ 'zapisana I2cstop 'zatrzymanie transmisji Waitms 10 'pauza 10 ms dla zapisu danych 'w pamiêci End Sub
Sub Read_eeprom(adres As Byte , Value As Byte) 'podprogram odczytu danych 'z EEPROM I2cstart 'inicjalizacja magistrali I2C I2cwbyte 160 'podanie adresu pamiêci I2cwbyte Adres 'podanie adresu komórki 'pamiêci EEPROM I2cstart 'powtórna inicjalizacja 'magistrali I2C I2cwbyte 161 'zg³oszenie ¿¹danie odczytu 'zawartoœci pamiêci I2crbyte Value , ACK 'odczytanie w³aœciwego bajtu 'danych (z potwierdzeniem) I2cstop 'koniec transmisji End Sub