实验五 子程序设计实验设计性实验汇编语言资料.docx

1、实验五 子程序设计实验设计性实验汇编语言资料实验五 子程序设计实验（设计性实验）一、实验要求和目的1熟悉汇编语言程序设计结构；2熟悉汇编语言子程序设计方法；3熟悉利用汇编语言子程序参数传递方法；4熟悉汇编语言字符串处理基本指令的使用方法；5掌握利用汇编语言实现字符串的输入输出程序设计方法；6掌握数制转换程序实现方法。二、软硬件环境1、硬件环境：计算机系统windows；2、软件环境：装有MASM、DEBUG、LINK、等应用程序。三、实验涉及的主要知识A）子程序知识要点：1、掌握子程序的定义语句；过程名 PROC near/far过程体RET过程名 ENDP2.子程序结构形式一个完整的子程序一

2、般应包含下列内容:1）子程序的说明部分在设计了程序时,要建立子程序的文档说明,使用户能清楚此子程序的功能和调用方法.说明时,应含如下内容:.子程序名:命名时要名中见意.子程序的功能:说明子程序完成的任务;.子程序入口参数:说明子程序运行所需参数及存放位置;.子程序出口参数:说明子程序运行结果的参数及存放位置;.子程序所占用的寄存器和工作单元；.子程序调用示例；2）掌握子程序的调用与返回在汇编语言中，子程序的调用用CALL，返回用RET 指令来完成。.段内调用与返回：调用子程序指令与子程序同在一个段内。因此只修改IP；.段间调用与返回：调用子程序与子程序分别在不同的段，因此在返回时，需同时修改C

3、S：IP。3）子程序的现场保护与恢复保护现场：在子程序设计时，CPU 内部寄存器内容的保护和恢复。一般利用堆栈实现现场保护和恢复的格式：过程名PROC NEAR/FARPUSH AXPUSH BX.PUSH DX.POP DX.POP AXRET过程名 ENDP4.子程序的参数传递方法1寄存器传递参数这种方式是最基本的参数传递方式。2存储器单元传（变量）递参数这种方法是在主程序调用子程序前，将入口参数存放到约定的存储单元中；子程序运行时到约定存储位置读取参数；子程序执行结束后将结果也放在约定存储单元中。3用堆栈传递参数利用共享堆栈区，来传递参数是重要的的方法之一。B）字符、字符串输入输出知识要

4、点：在实际应用中，经常需要从键盘输入数据并将结果等内容显示到屏幕上，方便程序控制及查看结果。汇编语言的数据输入和输出分成两类，一是单个字符数据的输入输出，一是字符串数据的输入输出。都可以通过DOS 功能调用来实现，下面就分别介绍下用来实现数据输入输出的功能调用的使用方法。1、单个字符输入 单个字符输入可以利用DOS 的1 号功能调用来完成，使用方法为： MOV AH,1 INT 21H 这两条语句执行后，光标会在屏幕上闪烁，等待输入数据，输入的数据以ASCII码形式存储在AL 寄存器中。2、单个字符输出 单个字符输出可利用DOS2 号功能调用来完成，使用方法为： MOV DL,? MOV AH

5、,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）表的处理知识要点：表的处理在实际数据处

6、理中应用较为广泛，主要有排序、搜索、插入和删除等操作。有一些常用的冒泡法、对分搜索法等需要掌握。四、实验内容与步骤1、从键盘输入一串字符串（显示提示）到内存中，在该字符串的某一个指定位置，插入某一字符或删除某一字符，并显示操作后的字符串。 程序代码:DATAS SEGMENT BUF DB 20 DB ? DB 20 DUP(0) DB 6 DUP(0) STRING0 DB PLEASE INPUT STRINGS:,0AH,0DH,$ STRING1 DB PLEASE CHOOSE INSERT OR DELETE:1.INSERT 2.DELETE,0AH,0DH,$ STRING2

7、DB PLEASE INPUT THE ADDRESS TO DELETE,0AH,0DH,$ STRING3 DB PLEASE INPUT THE ADDRESS TO INSERT,0AH,0DH,$ STRING4 DB PLEASE INPUT THE SYMBOL TO INSERT,0AH,0DH,$ BUF1 DB 20 DUP(0),$ INSER DB 0,0 DELE DB 0 NUMBER DB 0DATAS ENDSSTACKS SEGMENT DB 256 DUP(0)STACKS ENDSCODES SEGMENT ASSUME CS:CODES,DS:DATAS

8、,SS:STACKSSTART: MOV AX,DATAS MOV DS,AX MOV ES,AX LEA BX,STRING0 CALL OUTPUTSTR ;输出字符串0 CALL INPUTSTR ；输入字符串 CALL HUICHE MOV AL,BUF+1 MOV NUMBER,AL LEA BX,STRING1 CALL OUTPUTSTR ；输出字符串1 MOV AH,01H ；输入1或2 INT 21H CMP AL,1 CALL HUICHE JZ IN1 LEA BX,STRING2 ;为2，执行删除操作 CALL OUTPUTSTR MOV AH,01H INT 21H

9、AND AL,0FH MOV DELE,AL CALL HUICHE CALL DELETE CALL MOVE1 LEA BX,BUF1 CALL OUTPUTSTR CALL HUICHE JMP FINAL IN1:LEA BX,STRING3 ；执行插入操作 CALL OUTPUTSTR MOV AH,01H INT 21H AND AL,0FH MOV INSER,AL CALL HUICHE LEA BX,STRING4 CALL OUTPUTSTR MOV AH,01H INT 21H MOV INSER+1,AL CALL HUICHE CALL INSERT CALL MOV

10、E1 LEA BX,BUF1 CALL OUTPUTSTR FINAL: MOV AH,4CH INT 21H INPUTSTR PROC NEAR ;输入函数 LEA DX,BUF MOV AH,0AH INT 21H RETINPUTSTR ENDP HUICHE PROC NEAR ;回车换行函数 MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21H RETHUICHE ENDP OUTPUTSTR PROC NEAR MOV DX,BX ；输出字符串函数 MOV AH,09H INT 21H RETOUTPUTSTR E

11、NDPDELETE PROC NEAR 删除函数 LEA BX,BUF MOV DI,BX ADD DI,2 MOV AL,DELE XOR AH,AH ADD DI,AX XOR CH,CH MOV CL,NUMBER ADD BX,CX ADD BX,1MOVE: CMP BX,DI JE LADE MOV DH,DI+1 MOV DI,DH INC DI CMP BX,DI JNE MOVELADE: MOV BYTE PTR DI,$ DEC NUMBER RET DELETE ENDPMOVE1 PROC NEAR ；移动复制函数 LEA SI,BUF ADD SI,2 LEA DI

12、,BUF1 MOV CL,NUMBER XOR CH,CH REP MOVSB MOV BYTE PTR DI,$ RET MOVE1 ENDPINSERT PROC NEAR ；插入函数 LEA BX,BUF MOV DI,BX MOV AL,INSER XOR AH,AH ADD DI,AX INC DI XOR CH,CH MOV CL,NUMBER ADD BX,CX ADD BX,1INS1: MOV DH,BX MOV BX+1,DH DEC BX CMP BX,DI JA INS1 INC BX MOV AL,INSER+1 MOV BX,AL INC NUMBER RETINS

13、ERT ENDPCODES ENDS END START 运行结果： 1.执行插入操作结果 2.执行删除操作结果2、编写程序把从键盘输入的四位十六进制数，转换为十进制形式在屏幕上打印出来。 程序代码：DATAS SEGMENT BUF DB 10 DB ? DB 10 DUP(0) BIAO DB 0 STRI DB 0,0 FLAG DB 0DATAS ENDSSTACKS SEGMENT STA DW 20H DUP(0)STACKS ENDSCODES SEGMENT ASSUME CS:CODES,DS:DATAS,SS:STACKSSTART: MOV AX,DATAS MOV DS

14、,AX CALL INPUT ；输入4位16进制数 CALL HUICHE CALL EXCHASC ；将ASC码转换 CALL YASUO ；将实际数值放在ax MOV AL,STRI MOV AH,STRI+1 CALL EXCHSHI；转换为十进制并输出 MOV AH,4CH INT 21H INPUT PROC NEAR ；输入字符串函数 MOV DX,BX MOV AH,0AH INT 21H RETINPUT ENDPHUICHE PROC NEAR ；回车换行函数 MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21

15、H RETHUICHE ENDP EXCHASC PROC NEAR ；ASC码转换 MOV CX,4 LEA DI,BUF ADD DI,2S: CMP BYTE PTR DI,39H JNA SHUZI SUB BYTE PTR DI,37H JMP NEXTSHUZI: AND BYTE PTR DI,0FH NEXT: INC DI LOOP S RETEXCHASC ENDPYASUO PROC NEAR ；将实际大小放进AX MOV BYTE PTR CL,BUF+5 MOV BYTE PTR STRI,CL MOV CL,4 MOV DL,BUF+4 SHL DL,CL LEA

16、SI,STRI ADD SI,DL MOV BYTE PTR CL,BUF+3 MOV BYTE PTR STRI+1,CL MOV CL,4 MOV DL,BUF+2 SHL DL,CL ADD SI+1,DL RETYASUO ENDPEXCHSHI PROC NEAR ；转成十进制数输出 MOV BX,10 S1: MOV DX,0 DIV BX OR DL,30H PUSH DX INC FLAG CMP AX,0 JNZ S1 MOV CL,FLAG XOR CH,CHOUT1: POP DX MOV AH,02H INT 21H LOOP OUT1 RET EXCHSHI ENDP

17、CODES ENDS END START 运行结果：（上面为输入十六进制数，下面输出对应十进制数）3、从键盘输入（显示提示）十个2 位十进制数（正数）到内存中，按从小到大排序，然后把该数以十六进制形式在屏幕上打印出来。 程序代码：DATAS SEGMENT BUF DB 40 DB ? DB 40 DUP(0) SHUZI DB 10 DUP(0) BIAO DW 0 STRING DB PLEASE INPUT 10 NUMBERS:$DATAS ENDSSTACKS SEGMENT STA DW 20H DUP(0)STACKS ENDSCODES SEGMENT ASSUME CS:CO

18、DES,DS:DATAS,SS:STACKSSTART: MOV AX,DATAS MOV DS,AX MOV AX,STACKS MOV SS,AX LEA BX,STRING ；输出提示 CALL OUTPUTSTR CALL HUICHE CALL INPUT ；输入10个十进制数 CALL HUICHE CALL EXCHASC ；将ASC 码转换 CALL RANK ；将其排序 LEA SI,BUF ADD SI,5 MOV DI,10ABC: MOV AL,SI CALL PUTABYTE ；将16进制数输出 CALL KONGGE ADD SI,3 DEC DI JNZ ABC

19、MOV AH,4CHINT 21HOUTPUTSTR PROC NEAR ；输出字符串 MOV DX,BX MOV AH,09H INT 21H RETOUTPUTSTR ENDPINPUT PROC NEAR ；输入字符串函数 LEA DX,BUF MOV AH,0AH INT 21H RETINPUT ENDP HUICHE PROC NEAR ；回车换行 MOV DL,0DH MOV AH,02H INT 21H MOV DL,0AH MOV AH,02H INT 21H RETHUICHE ENDP EXCHASC PROC NEAR ；ASC码转换函数 LEA SI,BUF ADD

20、SI,2 MOV CX,10S: AND BYTE PTR SI,0FH INC SI AND BYTE PTR SI,0FH ADD SI,2 LOOP S ;变成十进制码 LEA SI,BUF ADD SI,2 MOV BL,10 MOV CX,10S1: MOV AL,SI MUL BL ;变成实际数字 ADD AL,SI+1 MOV SI,AL ADD SI,3 LOOP S1 RETEXCHASC ENDP RANK PROC NEAR ；排序函数 LEA SI,BUF ADD SI,2 LEA DI,BUF ADD DI,5 MOV CX,10 MOV AL,SIS2: MOV D

21、I,CX MOV BX,2 S3: MOV AL,BUFBX CMP AL,BUFBX+3 JBE CONTINUE XCHG AL,BUFBX+3 MOV BUFBX,AL CONTINUE: ADD BX,3 LOOP S3 MOV CX,DI LOOP S2 RETRANK ENDP PUTABYTE PROC NEAR；显示16进制数字 MOV CL,4 MOV DL,AL SHR DL,CL MOV BIAO,AX CALL EXCHANGEDISP MOV AX,BIAO MOV DL,AL AND DL,0FH CALL EXCHANGEDISP RETPUTABYTE ENDP

22、EXCHANGEDISP PROC NEAR CMP DL,9 JA NOTDIG OR DL,30H JMP FINALNOTDIG: ADD DL,37HFINAL: MOV AH,02H INT 21H RETEXCHANGEDISP ENDPKONGGE PROC NEAR ；输出空格函数 MOV DL,20H MOV AH,02H INT 21H RETKONGGE ENDPCODES ENDS END START 运行结果：（上面为输入的10个2位十进制数，下面为排序后的16进制结果）4、英文人名排序。从终端键入20 个人名，当所有人名都键入后，按字母上升的次序将人名排序，并在屏幕

23、上显示已经排好序的人名。 程序代码：DATAS SEGMENT BUF DB 200 DB ? DB 200 DUP(0) BUF1 DB 200,$ STRING DB PLEASE INPUT 20 NAMES:$ STRING1 DB AFTER THE RANK,THE NAMES:$DATAS ENDSSTACKS SEGMENT DB 256 DUP(0)STACKS ENDSCODES SEGMENT ASSUME CS:CODES,DS:DATAS,SS:STACKSSTART: MOV AX,DATAS MOV DS,AX MOV ES,AX LEA BX,STRING ;输

24、出提示 CALL OUTPUTSTR CALL HUICHE CALL INPUTSTR；输入人名 CALL HUICHE LEA BX,STRING1 ；输出提示 CALL OUTPUTSTR CALL HUICHE CALL RANK ；排序并输出 CALL MOVE1 LEA BX,BUF1 CALL OUTPUTSTR MOV AH,4CH INT 21H INPUTSTR PROC NEAR ;输入函数 LEA DX,BUF MOV AH,0AH INT 21H RETINPUTSTR ENDP HUICHE PROC NEAR ;回车换行函数 MOV DL,0DH MOV AH,0

25、2H INT 21H MOV DL,0AH MOV AH,02H INT 21H RETHUICHE ENDP RANK PROC NEAR ；排序函数 MOV CX,19S1:PUSH CX LEA SI,BUF ADD SI,2 MOV DI,SI ADD DI,5 S2:PUSH CX PUSH DI PUSH SI MOV CX,4 CLD REPZ CMPSB POP SI POP DI JA ADJUST ADD SI,5 ADD DI,5 JMP NEXTADJUST: MOV CX,4 A1:MOV AL,SI XCHG AL,DI MOV SI,AL INC SI INC D

26、I LOOP A1 ADD SI,1 ADD DI,1 NEXT: POP CX LOOP S2 POP CX LOOP S1 RETRANK ENDP OUTPUTSTR PROC NEAR ;输出字符串 MOV DX,BX MOV AH,09H INT 21H RETOUTPUTSTR ENDPMOVE1 PROC NEAR ;移动复制函数 LEA SI,BUF ADD SI,2 LEA DI,BUF1 MOV CL,BUF+1 XOR CH,CHMO1:REP MOVSB MOV BYTE PTR DI,$ RET MOVE1 ENDP CODES ENDS END START 运行结果：