CPU = 16F876
MHZ = 10
CONFIG 16254

;***********************************************
; http://www.basicmicro.com                    
; Title : readpm.bas                             
; Author : Dale Kubin                          
; Date : 04/29/02                              
; ReadPM and WritePM commands. Read and Write to
; Flash Program memory. Requires 16F87x PICmicro.
;***********************************************


string var byte(12)
temp var byte

	main
		writepm 0x400,["Hello world"]
		readpm 0x400,[str string\11]
mainlp
	for temp = 0 to 11
	Debug [string(temp)]
	Next
	Debug [13]
goto mainlp