汇编语言课程设计报告电话簿管理

汇编语言课程设计报告电话簿管理内容摘要：

db 39。 * 1. query (q) *39。 ,0ah,0dh db 39。 * 2. insert (i) *39。 ,0ah,0dh db 39。 * 3. exit (e) *39。 ,0ah,0dh db 39。 *********************************************************39。 ,0ah,0dh db 39。 please select(q,i or e):39。 ,0ah,0dh,39。 $39。 显示主菜单相关信息 mess1 db 39。 name39。 ,10 dup(39。 39。 ),39。 tel39。 ,0ah,0dh,39。 $39。 mess2 db 39。 please Input the name:$39。 mess3 db 39。 please Input the telephone number:$39。 mess4 db 0ah,0dh,39。 $39。 ； 专门定义一个 MESS4，以便在代码中用 9号功能调用实现换行 第 9 页 mess5 db 39。 Insert succed!$39。 err1 db 39。 there is not exsit the people!39。 ,0ah,0dh,39。 $39。 ；错误提示信息 DATAS ENDS STACKS SEGMENT db 2020 dup(?) STACKS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DATAS,SS:STACKS main proc far mov ax,datas mov ds,ax mov es,ax n1: lea dx,menuitem mov ah,9 int 21h ；显示主菜 单选择界面 mov ah,1 int 21h ； 从键盘输入字符 cmp al,39。 q39。 jnz n2 call query ：若所 输字符是‘ q‘ ,则调用子程序 query jmp n1 n2: cmp al,39。 i39。 jnz n3 call insert。 若所 输字符是‘ i‘ ,则调用子程序 insert jmp n1 n3: cmp al,39。 e39。 jz exit jmp n1 exit: mov ah,7 int 21h mov ah,4ch int 21h ret。 退出 main endp 第 10 页 query proc near。 查 找 的主程序 push ds xor ax,ax push ax mov ax,datas mov ds,ax mov es,ax cld ；清除方向标志 lea dx,mess4 mov ah,9 int 21h ；换行 lea dx,mess2 mov ah,9 int 21h call ipname ；调用子程序 ipname,从键盘上输入人名 lea dx,mess4 mov ah,9 int 21h call search ；具体查找的子程序 mov ah,7 int 21h ret。