li3.asm

来自「本程序是汇编语言的一些基本功能的组合」· 汇编 代码 · 共 34 行

code segment
 assume cs:code
main proc far
start:
 push ds
 sub ax,ax
 push ax

XH:
 mov ah,1
 int 21h
 
 cmp al,'0'
 jb DONE
 cmp al,'9'
 jnbe DONE
 
 sub al,30h
 
 jz XH
 mov cl,al
 mov ah,2
 mov dl,'#'
BELL:
 int 21h
 dec cl
 jnz BELL
 jmp XH
DONE:
 ret
main endp
code ends
 end start