Hello,

I have an issue with pages and tables on a 16F877A.

I try to read a table on page 1 with a function located on page 0.


The table looks like this:


		ORG		0x800

text1
		addwf	PCL,F		; add offset
;			"012345678901234567890123456789012"	=

		DT  	"Blablabla                        "


The function is this:

rs232text1						; need valid value in strinnr to read text from texttab
		movlw HIGH text1			; load PCLATH with hi adress of texttab
		movwf	PCLATH
		=

		movlw	d'0'				; Startoffset f=FCr String setzen
		movwf	toffset			; Laden von toffset

		movlw	stringdef			; default stringl=E4nge =3D 32 Zeichen in stringcounter=
 laden =3D 0x20
		movwf	stringcnt

string1loop
		movf	toffset,w			; textoffset in w laden
		call	text1				; text abholen von toffset
		call	rs232send			; text an rs232 senden
		incf	toffset			; toffset um 1 erh=F6hen
		decfsz	stringcnt		; stringcounter um 1 veringern, solange bis counter =3D=
 0
		goto 	string1loop
		return


Rs232text1 is a loop to grap the complete table of 32 bytes and push it to =
the rs232 interface.
But I do not see anything on the RS232 port.

If I am moving the table also to page 0, everything is working fine, but I =
am running out of space at page 0 :-(

Reading AN556 from microchip, I understood, that this computed goto is only=
 8 bit. PCLATH needs some extras. Since I exactly know, where my table star=
ts, I made the following:

rs232text1						; need valid value in strinnr to read text from texttab
		movlw	b'0001000'			; PCLATH for 0x0800 =

		movwf	PCLATH
		=

		movlw	d'0'				; Startoffset f=FCr String setzen
		movwf	toffset			; Laden von toffset

		movlw	stringdef			; default stringl=E4nge =3D 32 Zeichen in stringcounter=
 laden
		movwf	stringcnt

string1loop
		movf	toffset,w			; textoffset in w laden
		call	text1				; text abholen von toffset
		call	rs232send			; text an rs232 senden
		incf	toffset			; toffset um 1 erh=F6hen
		decfsz	stringcnt		; stringcounter um 1 veringern, solange bis counter =3D=
 0
		goto 	string1loop
		return


But that had no effect.

Any ideas, what is going wrong here?

Best Jens

-- =

http://www.piclist.com PIC/SX FAQ & list archive
View/change your membership options at
http://mailman.mit.edu/mailman/listinfo/piclist