xin.txt

来自「ASM 是asm的显示调用程序和子程序的程序流程图」· 文本 代码 · 共 36 行

DSEG SEGMENT  ; use16
ARRAYB DB  58H,34H,0H
COUNT EQU $-ARRAYB
ANSW DW ?
DSEG ENDS
;
SSEG SEGMENT STACK
DB 80H DUP(0)
SSEG ENDS
;
CSEG SEGMENT ; use16
   ASSUME DS:DSEG,SS:SSEG,CS:CSEG
START:MOV AX,DSEG  
MOV DS,AX
; 
LEA SI,ARRAYB
MOV CX,COUNT
CALL ZNUM 
;
MOV ANSW,AX
MOV AH,4CH
INT 21H
;
ZNUM PROC
XOR AX,AX
NEXT:CMP BYTE PTR[SI],0
JNZ NZ
INC AX
NZ:INC SI
LOOP NEXT
RET
ZNUM ENDP
;
CSEG ENDS
END START