统计.asm

大学时学汇编做的一些小实验

data segment
         letter db 0   
         digit db 0   
         other db 0    
         str   db 80 
              db ?   
              db 80 dup(?) 
data ends

code segment
         assume cs:code,ds:data
main:
         mov ax,data
         mov ds,ax

         lea dx,str
         mov ah,0ah  
         int 21h
        
         lea bx,str+2
         mov ch,0
         mov cl,[str+1]
        
s:       mov al,[bx]
         cmp al,'0'  
         jb small_ltr
         cmp al,'9'
         ja small_ltr
         inc digit       
         jmp short next   

small_ltr:         
         cmp al,'a'
         jb big_ltr
         cmp al,'z'
         ja big_ltr
         inc letter      
         jmp short next     
big_ltr:   
         cmp al,'A'
         jb others
         cmp al,'Z'
         ja others
         inc letter     
         jmp short next    

others:   inc other   

next:    inc bx
         loop s

         mov ah,4ch
         int 21h

code ends
end main