设有一段英文字母，其字符变量为ENG，并以'$'结束。编写程序，检查单词SUN 在文段中出现的次数，并将次数输出显示

;设有一段英文字母，其字符变量为ENG，并以'$'结束。编写程序，检查单词SUN
;在文段中出现的次数，并将次数输出显示
DATA SEGMENT
ENG DB 'SUNHUAHHDUDSUNHCUHDHUSUNHDHSUNHUHSDJSUNHHSUNJKJKSUNKOOSUNSHSUNHUIFHSUNHSAHISAHSUN$'
COUNT DW 0
DATA ENDS

STACK SEGMENT PARA STACK
      DW 128 DUP(?)
TOP   LABEL WORD
STACK ENDS

CODE SEGMENT
     ASSUME CS:CODE,SS:STACK,DS:DATA
MAIN PROC FAR
START:
         MOV AX,DATA
MOV DS,AX
 
MOV AX,STACK
MOV SS,AX
LEA SP,TOP
 
LEA SI,ENG
L0: MOV AL,[SI]
CMP AL,'$'
JE  EXIT
CMP AL,'S'
JE  L1
INC SI
JMP L0
L1:    INC SI
         MOV AL,[SI]
CMP AL,'$'
JE  EXIT
CMP AL,'U'
JE  L2
INC SI
JMP L0
L2:    INC SI
         MOV AL,[SI]
CMP AL,'$'
JE  EXIT
CMP AL,'N'
JE  L3
INC SI
JMP L0
L3:    INC COUNT
         JMP L0
 
EXIT: 
XOR CX,CX
MOV AX,COUNT
MOV BX,10
L4: XOR DX,DX
DIV BX
PUSH DX
INC CX
CMP AX,0
JNE L4
 
L5: POP DX
ADD DL,30H
MOV AH,2
INT 21H
LOOP L5
 
         MOV AH,4CH
         INT 21H
CODE ENDS
MAIN ENDP
     END START