Sure 实验五.doc

05611002 鲍硕 1120101355实验五 子程序设计实验一、 实验目的1熟悉汇编语言程序设计结构。2熟悉汇编语言子程序设计方法。3熟悉利用汇编语言子程序参数传递方法。4熟悉汇编语言字符串处理基本指令的使用方法。5掌握利用汇编语言实现字符串的输入输出程序设计方法。6掌握数制转换程序实现方法。二、 实验内容1、从键盘输入一串字符串（显示提示）到内存中，在该字符串的某一个指定位置，插入某一字符或删除某一字符，并显示操作后的字符串。2、编写程序把从键盘输入的四位十六进制数，转换为十进制形式在屏幕上打印出来。3、从键盘输入（显示提示）十个 2 位十进制数（正数）到内存中，按从小到大排序，然后把该数以十六进制形式在屏幕上打印出来。4、英文人名排序。从终端键入 20 个人名，当所有人名都键入后，按字母上升的次序将人名排序，并在屏幕上显示已经排好序的人名。三、 实验原理A） 子程序知识要点：1、 掌握子程序的定义语句； 过程名 PROC near/far 过程体 RET 过程名 ENDP2.子程序结构形式一个完整的子程序一般应包含下列内容:1） 子程序的说明部分在设计了程序时,要建立子程序的文档说明,使用户能清楚此子程序的功能和调用方法.说明时,应含如下内容:.子程序名:命名时要名中见意.子程序的功能:说明子程序完成的任务;.子程序入口参数:说明子程序运行所需参数及存放位置;.子程序出口参数:说明子程序运行结果的参数及存放位置;.子程序所占用的寄存器和工作单元；.子程序调用示例；2）掌握子程序的调用与返回在汇编语言中，子程序的调用用 CALL，返回用 RET 指令来完成。.段内调用与返回：调用子程序指令与子程序同在一个段内。因此只修改 IP；.段间调用与返回：调用子程序与子程序分别在不同的段，因此返回时，需同时修改CS：IP。3）子程序的现场保护与恢复保护现场：在子程序设计时，CPU 内部寄存器内容的保护和恢复。一般利用堆栈实现现场保护和恢复的格式：过程名 PROC NEAR/FARPUSH AXPUSH BXPUSH DXPOP DXPOP AXRET过程名 ENDP4.子程序的参数传递方法1) 寄存器传递参数 这种方式是最基本的参数传递方式。2)存储器单元传（变量）递参数 这种方法是在主程序调用子程序前，将入口参数存放到约定的存储单元中；子程序运行时到约定存储位置读取参数；子程序执行结束后将结果也放在约定存储单元中。3)用堆栈传递参数利用共享堆栈区，来传递参数是重要的的方法之一。B） 字符、字符串输入输出知识要点：在实际应用中，经常需要从键盘输入数据并将结果等内容显示到屏幕上，方便程序控制及查看结果。汇编语言的数据输入和输出分成两类，一是单个字符数据的输入输出，一是字符串数据的输入输出。都可以通过 DOS 功能调用来实现，下面就分别介绍下用来实现数据输入输出的功能调用的使用方法。1、单个字符输入 单个字符输入可以利用 DOS 的 1 号功能调用来完成，使用方法为： MOV AH,1 INT 21H 这两条语句执行后，光标会在屏幕上闪烁，等待输入数据，输入的数据以 ASCII码形式存储在 AL 寄存器中。2、单个字符输出 单个字符输出可利用 DOS2 号功能调用来完成，使用方法为： MOV DL,? MOV AH,2 INT 21H 单个字符输出需要把要输出字符的 ASCII 码放在 DL 寄存器中。3、字符串输入 从键盘输入一串字符串可以利用 DOS 的 10 号功能调用来完成，使用方法为： BUF DB 50;预定义可以输入的最大字符个数 DB ?;实际输入字符个数，根据输入自动统计DB 50 DUP (?) ;存放输入字符串数据缓冲区LEA DX,BUF MOV AH,10 INT 21H4、字符串输出 字符串输出可由 DOS 9 号功能调用来完成，使用方法为： STRING DB HELLO$LEA DX,STRING MOV AH,9 INT 21HC） 表的处理知识要点：表的处理在实际数据处理中应用较为广泛，主要有排序、搜索、插入和删除等操作。有一些常用的冒泡法、对分搜索法等需要掌握。四、 流程图五、 实验代码【1】datas segment tempio db 0 temp dw 0 tab db 0123456789abcdef tip1 db Please input:$ buf1 db 20 db ? db 20 dup($) num1 db 0 num1t db 3 db ? db 2 dup(0) temp1 db datas ends stacks segment stacks ends codes segment assume ds:datas,ss:stacks,cs:codes start: mov ax,datas mov ds,ax lea si,tip1 call puts call newline lea si,buf1 call gets lea si,num1t call gets inc si inc si mov ah,ds:si inc si mov al,ds:si mov bl,0 sub ah,bl sub al,bl mov bl,al mov al,ah mov ah,0 mov cl,10 mul cl add al,bl mov num1,al call input call newline mov bl,tempio mov temp1,bl lea si,buf1 inc si inc si mov cx,0 mov cl,num1 dec cl jz l11 l1: mov al,ds:si mov tempio,al call output inc si loop l1 l11: mov al,temp1 cmp al,0dh jz l12 mov tempio,al call output dec si l12: inc si call puts call newline call newline mov ah,4ch int 21h gets: mov ah,10 mov dx,si int 21h call newline ret puts: mov ah,9 mov dx,si int 21h ret input: mov ah,1 int 21h mov tempio,al ret newline: mov ah,2 mov dl,0dh int 21h mov ah,2 mov dl,0ah int 21h ret output: mov ah,2 mov dl,tempio int 21h ret codes ends end start【2】datas segment num2 db 0,0,0,0 num22 dw 0 tempio db 0 temp dw 0 tab db 0123456789abcdef datas ends stacks segment stacks ends codes segment assume ds:datas,ss:stacks,cs:codes start: mov ax,datas mov ds,ax mov ax,0 lea si,num2 call input mov al,tempio sub al,0 mov ds:si,al inc si call input mov al,tempio sub al,0 mov ds:si,al inc si call input mov al,tempio sub al,0 mov ds:si,al inc si call input mov al,tempio sub al,0 mov ds:si,al call newline lea si,num2 mov cx,4 mov dx,0ah l2: cmp ds:si,dl jb l21 mov al,ds:si sub al,7 mov ds:si,al l21: inc si loop l2 lea si,num2 mov ah,ds:si mov cx,4 shl ah,cl inc si mov bl,ds:si add ah,bl inc si mov al,ds:si mov cx,4 shl al,cl inc si mov bl,ds:si add al,bl mov num22,ax ;1 mov dx,0 mov cx,2710h div cx mov temp,dx add ax,0 mov tempio,al call output mov ax,temp ;2 mov dx,0 mov cx,3e8h div cx mov temp,dx add ax,0 mov tempio,al call output mov ax,temp ;3 mov dx,0 mov cx,64h div cx mov temp,dx add ax,0 mov tempio,al call output mov ax,temp ;4 mov dx,0 mov cx,0ah div cx mov temp,dx add ax,0 mov tempio,al call output mov ax,temp ;5 add ax,0 mov tempio,al call output call newline call newline mov ah,4ch int 21h input: mov ah,1 int 21h mov tempio,al ret newline: mov ah,2 mov dl,0dh int 21h mov ah,2 mov dl,0ah int 21h ret output: mov ah,2 mov dl,tempio int 21h ret codes ends end start【3】datas segment num3 db 20 dup(0) num3t db 10 dup(0) num31 dw 10 num32 dw 9 tempio db 0 temp dw 0 tab db 0123456789abcdef tip2 db Please input 10 DEC numeral with space:$ datas ends stacks segment stacks ends codes segment assume ds:datas,ss:stacks,cs:codes start: mov ax,datas mov ds,ax mov es,ax mov ax,stacks mov ss,ax lea si,tip2 call puts call newline lea si,num3 mov cx,20 l3: call input mov dl, cmp dl,tempio jz l31 mov al,tempio sub al,0 mov ds:si,al inc si dec cx jz l32 l31: jmp l3 l32: lea si,num3 lea di,num3t mov cx,10 l33: mov ax,0 mov al,ds:si mov dl,10 mul dl inc si add al,ds:si mov es:di,al inc si inc di loop l33 sort31: lea si,num3t mov ax,9 mov num32,ax sort32: mov al,ds:si inc si cmp al,ds:si js skip31 xchg al,ds:si mov ds:si-1,al skip31: mov cx,num32 dec num32 loop sort32 mov cx,num31 dec num31 loop sort31 call newline mov num31,10 lea si,num3t l34: mov al,ds:si mov tempio,al inc si call printnumb call space mov cx,num31 dec num31 loop l34 call newline call newline mov ah,4ch int 21h printnumb: mov al,tempio mov cl,4 shr al,cl lea bx,tab mov ah,0 add bx,ax mov dl,ds:bx mov ah,2 int 21h mov al,tempio mov cl,0fh and al,cl lea bx,tab mov ah,0 add bx,ax mov dl,ds:bx mov ah,2 int 21h ret puts: mov ah,9 mov dx,si int 21h ret input: mov ah,1 int 21h mov tempio,al ret newline: mov ah,2 mov dl,0dh int 21h mov ah,2 mov dl,0ah int 21h ret space: mov dl, mov ah,2 int 21h ret codes ends end start【4】datas segment buf4 db 460 dup($) bp4 dw 20 dup(0) mark db num41 dw 20 num42 dw 19 temp dw 0 datas ends stacks segment stacks ends codes segment assume ds:datas,ss:stacks,cs:codes start: mov ax,datas mov ds,ax mov es,ax mov ax,stacks mov ss,ax lea si,buf4 lea di,bp4 mov cx,20 l4: mov al,20 mov ds:si,al mov dx,si add dx,2 mov es:di,dx inc di inc di call gets add si,23 loop l4 l41: lea si,bp4 mov ax,19 mov num42,ax l42: mov di,ds:si+2 mov temp,si mov ax,ds:si mov si,ax mov cx,20 repe cmpsb js skip41 ;不需修改 mov si,temp ;修改 mov ax,ds:si xchg ax,ds:si+2 mov ds:si,ax skip41: mov si,te