' EEPROM Data Manipulation
' eBASIC Compiler Examples
' 
' Compubotics
'

#device "16f877"
#clock 16000000
#romsize 8192

' store some static data in EEPROM
data @0,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a

c	var byte
d	var word

main:

	Debug cr, "Static data:"
	
	' read the "static" EEPROM data
	for c = 0 to 9
		read c, d
		debug d
	next

	debug " ",cr
	
mainloop:

	' write some new EEPROM data
	for c = 0 to 20

		write c, (c + $30)
		
	next

	' read the EEPROM data back again
	for c = 0 to 20
	
		read c, d
		debug d
		
	next

	debug " Complete", CR
	
	pause 1000
	
	goto mainloop