Looking at the first post,

I think this could be the issue here.

Code:
X var PORTA.5
Y var PORTF.6


REPEAT
UNTIL x = 0  ' X = 1 ;  wait until it is 0.

High y       ' Here, X = 0.

while x = 0 : wend  ' Here, X = 0, wait until it is 1.

REPEAT
UNTIL x = 0  ' X = 1 ;  wait until it is 0. 
        Pauseus 1
		Location1=PortJ

while x = 0 : wend  ' Here, X = 0, wait until it is 1.


REPEAT
UNTIL x = 0         ' X = 1 ;  wait until it is 0. 
        pauseus 1
		CharLow=PortJ

while x = 0 : wend  ' Here, X = 0, wait until it is 1.

REPEAT
UNTIL x = 0
        pauseus 1
		CharHigh=PortJ
		
while x = 0 : wend  ' Here, X = 0, wait until it is 1.

------------