Si jai bien compris un ascii en hex
;*****************************************************************************
; CONVERSION ASCII VERS HEXA *
;*****************************************************************************
;-----------------------------------------------------------------------------
; tranforme les digits contenu dans car1 et car2 en 1 nombre hexa
; réponse contenu dans car2 EXEMPLE envoi de 41 en ascii -> 0x41
;-----------------------------------------------------------------------------
ashex
; convertir premier digit
; -----------------------
movlw -0x07 ; écart entre lettre et chiffre
btfsc car1,6 ; tester si code ASCII = 4x
addwf car1,f ; oui, soustraire 7 du code ASCII
movlw -0x30 ; 30 à soustraire
addwf car1,f ; obtenir valeur
; convertir second digit
; ----------------------
movlw -0x07 ; écart entre lettre et chiffre
btfsc car2,6 ; tester si code ASCII = 4x
addwf car2,f ; oui, soustraire 7 du code ASCII
movlw -0x30 ; 30 à soustraire
addwf car2,f ; obtenir valeur
; concaténation
; -------------
swapf car1,w ; charger digit fort swappé
iorwf car2,f ; ajouter au digit faible
RETURN ; et fin
a++