Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- .MODEL SMALL
- .STACK 100H
- .DATA
- MSG1 DB "ENTER YOUR FIRST LETTER : $"
- MSG2 DB "ENTER YOUR SENCOND LETTER : $"
- .CODE
- MAIN PROC
- ;INITIALIZE DS
- MOV AX,@DATA
- MOV DS,AX
- ;DISPLAY MESSAGE
- LEA DX,MSG1
- MOV AH,9
- INT 21H
- ;INPUT A CHARACTER
- MOV AH,1
- INT 21H
- MOV BL,AL;
- ;PRINT LINE FEED AND NEW LINE
- MOV AH,2
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;DISPLAY CHARACTER
- ;FIRST
- MOV DL,BL
- ADD DL,020H
- ADD DL,01H
- INT 21H
- ;PRINT LINE FEED AND NEW LINE
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;SECOND
- MOV DL,BL
- ADD DL,020H
- ADD DL,02H
- INT 21H
- ;PRINT LINE FEED AND NEW LINE
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;THIRD
- MOV DL,BL
- ADD DL,020H
- ADD DL,03H
- INT 21H
- ;PRINT LINE FEED AND NEW LINE
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;--------------------------------------
- ;DISPLAY MESSAGE
- LEA DX,MSG2
- MOV AH,9
- INT 21H
- ;INPUT A CHARACTER
- MOV AH,1
- INT 21H
- MOV BL,AL;
- ;PRINT LINE FEED AND NEW LINE
- MOV AH,2
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;DISPLAY CHARACTER
- ;FIRST
- MOV DL,BL
- ADD DL,020H
- ADD DL,01H
- INT 21H
- ;PRINT LINE FEED AND NEW LINE
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;SECOND
- MOV DL,BL
- ADD DL,020H
- ADD DL,02H
- INT 21H
- ;PRINT LINE FEED AND NEW LINE
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;THIRD
- MOV DL,BL
- ADD DL,020H
- ADD DL,03H
- INT 21H
- ;PRINT LINE FEED AND NEW LINE
- MOV DL,0DH
- INT 21H
- MOV DL,0AH
- INT 21H
- ;RETURN TO DOS
- MOV AH,4CH
- INT 21H
- MAIN ENDP
- END MAIN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement