c.asm

统计字符串中数字和英语字母和其他符号的个数

DATAS SEGMENT
STR   DB"please input a string:$"   
BUF   DB 20
      DB ?
      DB 20 DUP (?)
CRLF  DB 0AH,0DH,"$"
DATAS ENDS

STACKS SEGMENT STACK
       DB      200 DUP(?) 
STACKS ENDS

CODES   SEGMENT
        ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:  MOV AX,DATAS
        MOV DS,AX
        LEA DX,STR
        MOV AH,9
        INT 21H
        MOV AH,10
        LEA DX,BUF
        INT 21H
        LEA DX,CRLF
        MOV AH,9
        INT 21H
        MOV CH,BUF+1
        LEA SI,BUF+2
NEXT:	MOV DL,[SI]
        cmp dl,41h
	jl num
	cmp dl,5ah
	jl prinit
	jg next1
prinit:  
	INC SI
        MOV AH,2
        INT 21H
        DEC CH
        JNZ NEXT
	jmp exit
NEXT1:  MOV DL,[SI]
        cmp dl,61h
	jl num
	cmp dl,7ah
	jl prinit1
	jg num
prinit1: 
	INC SI
        sub DL,20H
        MOV AH,2
        INT 21H
        DEC CH
        JNZ NEXT
	jmp exit
num:  	
	INC SI
	mov ah,2
	int 21h
	dec cH
	jnz next
	jmp exit
exit:
	mov ax,4c00h
	int 21h
CODES  ENDS
    END START