.MODEL SMALL .STACK 100H .DATA MSG_1 EQU \'Enter the character : $\' MSG_2 EQU 0DH,0AH,\'The given character is : $\' PROMPT_1 DB MSG_1 PROMPT_2 DB MSG_2 .CODE MAIN PROC MOV AX, @DATA ; initialize DS MOV DS, AX LEA DX, PROMPT_1 ; load and display PROMPT_1 MOV AH, 9 INT 21H MOV AH, 1 ; read a character INT 21H MOV BL, AL ; save the given character into BL LEA DX, PROMPT_2 ; load and display PROMPT_2 MOV AH, 9 INT 21H MOV AH, 2 ; display the character MOV DL, BL INT 21H MOV AH, 4CH ; return control to DOS INT 21H MAIN ENDP END MAIN