从键盘输入一系列字符（以回车符结束），并按字母、数字及其他字符分类计数，最后显示出这三类的计数结果

;从键盘输入一系列字符（以回车符结束），并按字母、数字及其他字符分类计数，最后
;显示出这三类的计数结果
;create date:2007-11-23
;author:野渡无人
;**************************************************************************
data segment
count_of_letter db 'the number of letter is :','$'
count_of_number db 'the number of number is :','$'
count_of_character db 'the number of character is :','$'
data ends
;**************************************************************************
prognam segment
;--------------------------------------------------------------------------
main proc far
assume cs:prognam,ds:data

start:
push ds
sub ax,ax
push ax

mov ax,data
mov ds,ax

mov bh,0 ;count_of_letter
mov bl,0 ;cout_of_number
mov cl,0 ;cout_of_charater

next:
mov ah,1
int 21h

cmp al,0dh
je exit

cmp al,30h
jb cout_of_charater_add

cmp al,39h
jbe cout_of_number_add

cmp al,41h
jb cout_of_charater_add

cmp al,5ah
jbe count_of_letter_add

cmp al,61h
jb cout_of_charater_add

cmp al,7ah
jbe count_of_letter_add

cout_of_charater_add:
inc cl
jmp next

cout_of_number_add:
inc bl
jmp next

count_of_letter_add:
inc bh
jmp next

exit:
call crlf

lea dx,count_of_letter
mov ah,09
int 21h

mov al,bh
call bin_dec

; mov ah,02h
; mov dl,bh
; int 21h

call crlf

lea dx,count_of_number
mov ah,09
int 21h

mov al,bl
call bin_dec

; mov ah,02h
; mov dl,bl
; int 21h

call crlf

lea dx,count_of_character
mov ah,09
int 21h

mov al,cl
call bin_dec

;mov ah,02h
;mov dl,cl
; int 21h

call crlf

ret

main endp
;------------------------------------------------------------------------
crlf proc near
mov ah,02
mov dl,0dh
int 21h

mov ah,02
mov dl,0ah
int 21h

ret
crlf endp
;-------------------------------------------------------------------------
bin_dec proc near
push bx
push cx

and ax,00ffh
mov cx,0
mov bx,0
mov dl,10

rotate:
div dl

mov bl,ah
and ax,00ffh

push bx
inc cx

cmp ax,10
jae rotate

mov bx,ax
push bx
inc cx
continue:
pop bx
add bl,30h
mov dl,bl

mov ah,02h
int 21h
loop continue

pop cx
pop bx

ret
bin_dec endp
;-------------------------------------------------------------------------------
prognam ends
;*******************************************************************************
end main