' Name : EE.pbp ' Compiler : PICBASIC PRO Compiler 2.6 ' Assembler : PM or MPASM ' Target PIC : 12F, 16F or 18F types ' Hardware : Non specific ' Oscillator : internal or external ' Keywords : READ, SEROUT, WRITE ' Description : PICBASIC PRO program to demonstate the EEPROM, READ and WRITE Commands. ' Works on targets with data EE only!!! Initialized address 0..3 and 8. Writes 10..63. ' Include "modedefs.bas" ' Include serial modes SO Con 0 ' Define serial output pin B0 Var byte B1 Var byte B2 Var byte EEPROM ["wxyz"] ' EEPROM[0..3] = 119..122 EEPROM 8,[100] ' EEPROM[8] = 100 mainloop: B0 = 63 ' Set Size of EEPROM For B1 = 10 To B0 ' Check WRITE Command B2 = B1 + 100 ' EEPROM[10..63] = 110..163 Write B1,B2 Next B1 For B1 = 0 To B0 ' Check READ Command Read B1,B2 ' Dump EEPROM Contents Serout SO,N2400,[#B2," "] Next B1 Serout SO,N2400,[10,10] ' Skip 2 Lines Goto mainloop ' Forever End