002.asm

1. 要求程序建立一个可存放50项的电话号码表

stack_seg segment para stack 'stack'   
dw 100 dup(?)
stack_seg ends
PROGRAM SEGMENT
MAIN PROC FAR
ASSUME CS:PROGRAM
START:
MOV DL,10H
MOV BX,00H
AGAIN:
CMP DX,100H
JNBE OVER

MOV AH,02H
INT 21H
INC BX
INC DX

PUSH DX
CMP BX,10H
JE ENTER

MOV AH,02H
MOV DL,00H
INT 21H
POP DX
JMP AGAIN

ENTER:
MOV AH,02H
MOV DX,0DH
INT 21H
MOV AH,02H
MOV DX,0AH
INT 21H
POP DX
MOV BX,00H
JMP AGAIN

OVER:
mov ah,4ch
int 21h
ret
MAIN ENDP
PROGRAM ENDS
END START