LIST R = DEC
MOVLW '0'
BTFSC CHAR1,6
MOVLW 'A'-10
SUBWF CHAR1
MOVLW '0'
BTFSC CHAR2,6
MOVLW 'A'-10
SUBWF CHAR2
SWAPF CHAR1,W
;[NG: why add char1 two more times?]
; ADDWF CHAR1,W
; ADDWF CHAR1,W
ADDWF CHAR2,W
-Andy
=== Andrew Warren - fastfwd@ix.netcom.com
=== Fast Forward Engineering - San Diego, California
=== http://www.geocities.com/SiliconValley/2499