sy3b.asm

来自「ASM 是asm的显示调用程序和子程序的程序流程图」· 汇编 代码 · 共 29 行

dseg segment 
buf db 8,-3,0,3,6,2,-6,1,-9,5,-4,7 
coun dw $-buf
NEGA db ? 
POSI db ? 
dseg ends 
cseg segment 
assume cs:cseg,ds:dseg 
begin: mov ax,dseg 
mov ds,ax 
lea bx,buf 
mov cx,coun 
xor dl,dl 
xor dh,dh 
next: mov al,[bx] 
and al,al 
js mi 
inc dl 
jmp comp 
mi: inc dh 
comp: inc bx 
loop next 
mov POSI,dl   
mov NEGA,dh    
mov ah,4ch 
int 21h 
cseg ends 
end begin