I need help converting ascii to hex. This is my code so far.

ASCII DB 0DH,0AH,'THE ASCII CODE OF $'
HEX DB ?,' IN HEX IS $'
CHAR DB ?,'$'
.CODE
MAIN PROC
;initialize DS
        MOV AX,@DATA
        MOV DS,AX
REPEAT:
        LEA DX,MSG              ;get message
        MOV AH,9                ;display string function
        INT 21H                 ;display it
        MOV AH,1                ;read char function
        INT 21H                 ;char in AL
    CMP AL,0DH      ;CR?
    JE  EXIT        ;yes, exit
        MOV BL,AL               ;move char from AL to BL
        MOV HEX,AL              ;move char from AL to HEX
        LEA DX,ASCII            ;get message
        MOV AH,9                ;display string function
        INT 21H                 ;display it
        LEA DX,HEX              ;get message
        MOV AH,9                ;display string function
        INT 21H                 ;display it
        MOV BH,2                ;there are 2 characters in our output
WHILE_:                          ;WHILE loop
        MOV CHAR,BL             ;move char from BL to CHAR
        MOV CL,4                ;number of bits to shift
        SHR CHAR,CL             ;shift right
        CMP CHAR,0AH            
        ADD CHAR,30h            ;convert char in '0'...'9'
        JMP END_IF              ;done converting
ELSE_:
        ADD CHAR,37h            ;convert char in 'A'...'F'
END_IF:
        MOV AH,2                ;display char function
        MOV DL,CHAR             ;the char is stored in CHAR
        INT 21H                 ;display it
        MOV CL,4                ;number of bits to rotate
        SHR CHAR,CL
        DEC BH                  ;next character
        CMP BH,0                ;more character?
        JG WHILE_                ;yes, go back
    JMP  REPEAT     ;go back to top
EXIT:        
;DOS exit
        MOV AH,4CH     
        INT 21H
MAIN ENDP

END MAIN

Any help would be appreciated

Care to share your solution for people who might have the same problem in future?

Be a part of the DaniWeb community

We're a friendly, industry-focused community of 1.21 million developers, IT pros, digital marketers, and technology enthusiasts learning and sharing knowledge.