I2C EEPROM VALUE¶
A nice feature of the VALUE concept is that the storage where the data is actually kept is not disclosed. That makes it easy to create a VALUE that behaves exactly like any other VALUE and keeps the data in an external I2C EEPROM.
#require value.frt #require quotations.frt #require ms.frt #require i2c-eeprom.frt \ 17 0 $50 i2c.value "name" : i2c.ee.value ( n addr hwid -- ) (value) over , \ store the addr [: dup @i ( addr ) swap 3 + @i ( hwid) @i2c.ee ;] , [: dup @i ( addr ) swap 3 + @i ( hwid) !i2c.ee 5 ms ;] , dup , \ store hwid !i2c.ee \ store inital data ;
The #require directives are processed by the amforth-shell, of you don’t use it, comment them out and make sure that the files and their further dependencies are sent to the controller beforehand.
Note the 5 ms delay after writing the data. This is to make sure that the EEPROM gets enough time to complete its internal activities.
The use is straightforward. Since there is no memory manager for the serial EEPROM, the location of the data is given explicitly when creating the value: address 0 on the device with the hardware id $50.
(ATmega16)> $beef 0 $50 i2c.ee.value answer ok (ATmega16)> answer hex u. BEEF ok (ATmega16)> $dead to answer ok (ATmega16)> answer hex u. DEAD ok (ATmega16)>
Don’t forget to initialize the I2C hardware before use (e.g. in
Keep in mind, that the data stored in a value is much smaller than the
page size of the EEPROM modules. Take care that the address used to
place the data doen’t cross the page boundary. Otherwise a wrap-around
will happen and likely other data gets currupted.