Read more
Menyimpan data ke EEPROM mengggunakan mikrokontroler
dengan bascom dan at mega 8535
Source code Menyimpan data ke EEPROM mengggunakan
mikrokontroler dengan bascom dan at mega 8535
$regfile =
"8535def.dat"
$crystal = 16000000
Config Lcdpin = Pin , Rs =
Portc.0 , E = Portc.2 , Db4 = Portc.4
Config Lcdpin = Pin , Db5 =
Portc.5 , Db6 = Portc.6 , Db7 = Portc.7
Config Lcd = 16 * 2
Cursor Off
Cls
'-------menyimpan data
eeprom-----
Dim Data_eeprom As Byte
Data_eeprom = &H20
Writeeeprom Data_eeprom , 0
Data_eeprom = &H02
Writeeeprom Data_eeprom , 1
'-------membaca data
eeprom-------
Readeeprom Data_eeprom , 0
Lcd "data 1:" ;
Data_eeprom
Readeeprom Data_eeprom , 1
Locate 2 , 1
Lcd "data 2:" ;
Data_eeprom
End
0 Reviews
Silakan dikomentari