輸入並統計非字符數

data segment buffer db 15 dup(?) exit1 db 'bye bye',13,10,'$' count db '0',13,10,'$' container db ' ',13,10,'$' data ends extra segment numsign0 db '0' numsign9 db '9' extra ends code segment main proc far assume cs:code,ds:data,es:extra start: push ds sub ax,ax push ax mov ax,data mov ds,ax mov ax,extra mov es,ax lea bx,buffer mov bx,0 input: mov ah,01h int 21h cmp al,'$' jz exit jnz judge_0 judge_0: cmp al,30h jl addsign jnl judge_9 judge_9: cmp al,39h jnl addsign jl input addsign: add count,1 mov container[bx],al add bx,1 jmp input exit: lea dx,container mov ah,9 int 21h lea dx,exit1 mov ah,9 int 21h lea dx,count mov ah,9 int 21h ret main endp code ends end start