ASS

.MODEL SMALL
.STACK 100H
.DATA
B DW 0
C DW 0
D DB 0
.CODE
MAIN PROC
       MOV AX,@DATA
       MOV DS,AX

       MOV BL,0

       T1:
       MOV AH,1
       INT 21H

       CMP AL,13
       JE L2

       PUSH AX
       INC B

       CMP AL,'A'
       JGE T2

        T2:
       CMP AL,'Z'
       JLE T3

       T3:
       INC BL
       CMP BL,'1'
       JE T4

       T4:
       MOV D,AL

       JMP T1



       L2:

       MOV CX,B

       L3:
       CMP AL,'A'
       JGE T5

       T5:
       CMP AL,'Z'
       JLE T6

       T6:
       INC C
       CMP C,'1'
       JE T7

       T7:
       POP DX
       MOV AH,2
       INT 21H

       LOOP L3


       MOV DL,D
       MOV AH,2
       INT 21H


       EXIT:
       MOV AH,4CH
       INT 21H

       MAIN ENDP
END MAIN