Microprocessor 8086 Assembly-Occurance of vowels

Simple Microprocessor 8086 Assembly-Occurance of vowels

.MODEL SMALL
.DATA
MSG1 DB "ENTER THE STRING: $"
MSG2 DB "THE OCCURANCE OF VOWELS: $"
STRING DB 50 DUP('$')
COUNT DB 0
.CODE
MOV AX,@DATA
MOV DS,AX

LEA DX,MSG1
MOV AH,09H
INT 21H

LEA SI,STRING
LOOP1:
MOV AH,01H
INT 21H
MOV BL,AL
MOV [SI],BL
CMP BL,0DH
JZ DOWN1
INC SI
JMP LOOP1

DOWN1:
LEA SI,STRING
LEA DX,MSG2
MOV AH,09H
INT 21H

LOOP2:
MOV BL,[SI]
CMP BL,0DH
JZ DOWN3
CMP BL,'A'
JZ LOOP3

CMP BL,'E'
JZ LOOP3

CMP BL,'I'
JZ LOOP3

CMP BL,'O'
JZ LOOP3

CMP BL,'U'
JZ LOOP3


CMP BL,'a'
JZ LOOP3


CMP BL,'e'
JZ LOOP3


CMP BL,'u'
JZ LOOP3


CMP BL,'o'
JZ LOOP3


CMP BL,'i'
JZ LOOP3
INC SI
JMP LOOP2

LOOP3:
INC COUNT
INC SI
JMP LOOP2

DOWN3:

ADD COUNT,30H
MOV AH,02H
MOV DL,COUNT
INT 21H

MOV AH,4CH
INT 21H
END

Output
ENTER THE STRING:Anandhu
THE OCCURANCE OF VOWELS:3