实验五子程序设计实验（设计性实验）一、实验要求和目的1．熟悉汇编语言程序设计结构；2．熟悉汇编语言子程序设计方法；3．熟悉利用汇编语言子程序参数传递方法；4．熟悉汇编语言字符串处理基本指令的使用方法；5．掌握利用汇编语言实现字符串的输入输出程序设计方法；6．掌握数制转换程序实现方法。

二、软硬件环境1、硬件环境：计算机系统windows；2、软件环境：装有MASM、DEBUG、LINK、等应用程序。

三、实验涉及的主要知识A）子程序知识要点：1.掌握子程序的定义语句；过程名 PROC [near/far]过程体RET过程名 ENDP2.子程序结构形式一个完整的子程序一般应包含下列内容:1、）子程序的说明部分在设计了程序时,要建立子程序的文档说明,使用户能清楚此子程序的功能和调用方法. 说明时,应含如下内容:.子程序名:命名时要名中见意..子程序的功能:说明子程序完成的任务;.子程序入口参数:说明子程序运行所需参数及存放位置;.子程序出口参数:说明子程序运行结果的参数及存放位置;.子程序所占用的寄存器和工作单元；.子程序调用示例；2、）掌握子程序的调用与返回在汇编语言中，子程序的调用用CALL，返回用RET 指令来完成。

.段内调用与返回：调用子程序指令与子程序同在一个段内。

因此只修改IP；.段间调用与返回：调用子程序与子程序分别在不同的段，因此在返回时，需同时修改CS：IP。

3．）子程序的现场保护与恢复保护现场：在子程序设计时，CPU 内部寄存器内容的保护和恢复。

一般利用堆栈实现现场保护和恢复的格式：过程名PROC [NEAR/FAR]PUSH AXPUSH BX.PUSH DXPOP DX.POP AXRET过程名 ENDP3.子程序的参数传递方法1．寄存器传递参数这种方式是最基本的参数传递方式。

2．存储器单元传（变量）递参数这种方法是在主程序调用子程序前，将入口参数存放到约定的存储单元中；子程序运行时到约定存储位置读取参数；子程序执行结束后将结果也放在约定存储单元中。

3．用堆栈传递参数利用共享堆栈区，来传递参数是重要的的方法之一。

B）字符、字符串输入输出知识要点：在实际应用中，经常需要从键盘输入数据并将结果等内容显示到屏幕上，方便程序控制及查看结果。

汇编语言的数据输入和输出分成两类，一是单个字符数据的输入输出，一是字符串数据的输入输出。

都可以通过DOS 功能调用来实现，下面就分别介绍下用来实现数据输入输出的功能调用的使用方法。

1、单个字符输入单个字符输入可以利用DOS 的1 号功能调用来完成，使用方法为：MOV AH,1INT 21H这两条语句执行后，光标会在屏幕上闪烁，等待输入数据，输入的数据以ASCII码形式存储在AL 寄存器中。

2、单个字符输出单个字符输出可利用DOS2 号功能调用来完成，使用方法为：MOV DL,’?’MOV AH,2INT 21H单个字符输出需要把要输出字符的ASCII 码放在DL 寄存器中。

3、字符串输入从键盘输入一串字符串可以利用DOS 的10 号功能调用来完成，使用方法为：BUF DB 50 ;预定义可以输入的最大字符个数DB ? ;实际输入字符个数，根据输入自动统计DB 50 DUP (?) ;存放输入字符串数据缓冲区LEA DX,BUFMOV AH,10INT 21H4、字符串输出字符串输出可由DOS 9 号功能调用来完成，使用方法为：STRING DB ‘HELLO$’LEA DX,STRINGMOV AH,9INT 21HC）表的处理知识要点：表的处理在实际数据处理中应用较为广泛，主要有排序、搜索、插入和删除等操作。

有一些常用的冒泡法、对分搜索法等需要掌握。

四、实验内容与步骤1、从键盘输入一串字符串（显示提示）到内存中，在该字符串的某一个指定位置，插入某一字符或删除某一字符，并显示操作后的字符串。

2、编写程序把从键盘输入的四位十六进制数，转换为十进制形式在屏幕上打印出来。

3、从键盘输入（显示提示）十个2 位十进制数（正数）到内存中，按从小到大排序，然后把该数以十六进制形式在屏幕上打印出来。

4、英文人名排序。

从终端键入20 个人名，当所有人名都键入后，按字母上升的次序将人名排序，并在屏幕上显示已经排好序的人名。

注意：以上各题要求用子程序方法实现，每个题目至少包含2 个子程序。

涉及到初始数据的，同学们自行给出多组数据，反复加以验证各题程序。

五、实验要求与提示1、实验要求（1）画出各程序流程图；（2）列出程序清单，加上适量注释；（3）回答思考问题；（4）记录实验结果；(5) 完成实验报告（实验材料上的内容简写，自己的工作要详尽）。

六、思考与练习以及测评标准1．字符串在内存中是如何存储的？2．屏幕有多个字符串显示时，如何换行？七、程序流程图Y八、实验结果九、思考题1.以8位ASCII码的形式连续存储2.先输出换行符，然后输出回车符十、程序代码datas segmentbuf4 db 460 dup('$')bp4 dw 20 dup(0)mark db '@@'num41 dw 20num42 dw 19num3 db 20 dup(0)num3t db 10 dup(0)num31 dw 10num32 dw 9num2 db 0,0,0,0num22 dw 0tempio db 0temp dw 0tab db '0123456789abcdef'tip1 db 'Please input:$'tip2 db 'Please input 10 DEC numeral with space:$'buf1 db 20db ?db 20 dup('$')num1 db 0num1t db 3db ?db 2 dup(0)temp1 db ' 'datas endsstacks segmentstack dw 32 dup(0) stacks endscodes segmentassumeds:datas,ss:stacks,cs:codesstart: mov ax,datasmov ds,axmov es,axmov ax,stacksmov ss,ax ;;;;;;;;;;;;;;;;;;;;1startlea si,tip1call putscall newlinelea si,buf1call getslea si,num1tcall getsinc siinc simov ah,ds:[si]inc simov al,ds:[si]mov bl,'0'sub ah,blsub al,blmov bl,almov al,ahmov ah,0mov cl,10mul cladd al,blmov num1,alcall inputcall newlinemov bl,tempiomov temp1,bllea si,buf1inc siinc simov cx,0mov cl,num1dec cljz l11l1: mov al,ds:[si]mov tempio,alcall outputinc siloop l1l11: mov al,temp1cmp al,0dhjz l12mov tempio,alcall outputdec sil12: inc sicall putscall newlinecall newline;;;;;;;;;;;;;;;;;;;;1end;;;;;;;;;;;;;;;;;;;;2startmov ax,0lea si,num2call inputmov al,tempiosub al,'0'mov ds:[si],alinc sicall inputmov al,tempiosub al,'0'mov ds:[si],alinc sicall inputmov al,tempiosub al,'0'mov ds:[si],alinc sicall inputmov al,tempiosub al,'0'mov ds:[si],alcall newlinelea si,num2mov cx,4mov dx,0ahl2: cmp ds:[si],dljb l21mov al,ds:[si]sub al,7mov ds:[si],al l21: inc siloop l2lea si,num2mov ah,ds:[si]mov cx,4shl ah,clinc simov bl,ds:[si]add ah,blinc simov al,ds:[si]mov cx,4shl al,clinc simov bl,ds:[si]add al,blmov num22,ax;1mov dx,0mov cx,2710hdiv cxmov temp,dxadd ax,'0'mov tempio,alcall outputmov ax,temp;2mov dx,0mov cx,3e8hdiv cxmov temp,dxadd ax,'0'mov tempio,alcall outputmov ax,temp;3mov dx,0mov cx,64hdiv cxmov temp,dxadd ax,'0'mov tempio,alcall outputmov ax,temp;4mov dx,0mov cx,0ahdiv cxmov temp,dxadd ax,'0'mov tempio,alcall outputmov ax,temp;5add ax,'0'mov tempio,alcall outputcall newlinecall newline ;;;;;;;;;;;;;;;;;;;;2end ;;;;;;;;;;;;;;;;;;;;3startlea si,tip2call putscall newlinelea si,num3mov cx,20l3: call inputmov dl,' 'cmp dl,tempiojz l31mov al,tempiosub al,'0'mov ds:[si],alinc sidec cxjz l32l31: jmp l3l32:lea si,num3lea di,num3tmov cx,10l33: mov ax,0mov al,ds:[si]mov dl,10mul dlinc siadd al,ds:[si]mov es:[di],alinc siinc diloop l33;sortsort31: lea si,num3tmov ax,9mov num32,axsort32: mov al,ds:[si]inc sicmp al,ds:[si]js skip31xchg al,ds:[si]mov ds:[si-1],alskip31: mov cx,num32dec num32loop sort32mov cx,num31dec num31loop sort31call newlinemov num31,10lea si,num3tl34: mov al,ds:[si]mov tempio,alinc sicall printnumbcall spacemov cx,num31dec num31loop l34call newlinecall newline;;;;;;;;;;;;;;;;;;;;3end;;;;;;;;;;;;;;;;;;;;4startlea si,buf4lea di,bp4mov cx,20;inputl4: mov al,20mov ds:[si],almov dx,siadd dx,2mov es:[di],dxinc diinc dicall getsadd si,23loop l4;sortl41: lea si,bp4mov ax,19mov num42,axl42: mov di,ds:[si+2]mov temp,simov ax,ds:[si]mov si,axmov cx,20repe cmpsbjs skip41 ;不需修改mov si,temp ;修改mov ax,ds:[si]xchg ax,ds:[si+2]mov ds:[si],axskip41: mov si,tempinc siinc simov cx,num42dec cxmov num42,cxinc cxloop l42mov cx,num41dec cxmov num41,cxinc cxloop l41;ouputcall newlinelea di,bp4mov cx,20 l43: mov temp,cxmov si,es:[di]call putscall newlineinc diinc dimov cx,temploop l43 ;;;;;;;;;;;;;;;;;;;;4end ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Q: mov ah,4chint 21h ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;printnumb:mov al,tempiomov cl,4shr al,cllea bx,tabmov ah,0add bx,axmov dl,ds:[bx]mov ah,2int 21hmov al,tempiomov cl,0fhand al,cllea bx,tabmov ah,0add bx,axmov dl,ds:[bx]mov ah,2int 21hretprintnum: ;outputthe ASCII in temp W;1mov ax,tempmov cx,4shr ah,clmov al,ahmov ah,0lea bx,tabadd bx,axmov dl,ds:[bx]mov ah,2int 21h;2mov ax,tempand ah,0fhmov al,ahmov ah,0lea bx,tabadd bx,axmov dl,ds:[bx]mov ah,2int 21h;3mov ax,tempmov cx,4shr al,clmov ah,0lea bx,tabadd bx,axmov dl,ds:[bx]mov ah,2int 21h;4mov ax,tempand al,0fhmov ah,0lea bx,tabadd bx,axmov dl,ds:[bx]mov ah,2int 21hretgets: m ov ah,10mov dx,siint 21hcall newlineretpgets: mov cl,ds:[si]mov ch,0inc siinc silpgets: mov al,ds:[si]cmp al,0dhjz pendmov tempio,alcall outputinc siloop lpgets pend: ret puts: mov ah,9mov dx,siint 21hretinput: mov ah,1int 21hmov tempio,alret newline:mov ah,2mov dl,0dhint 21hmov ah,2mov dl,0ahint 21hretspace: mov dl,' 'mov ah,2int 21hretoutput: mov ah,2mov dl,tempioint 21hretcodes endsend start。