北京邮电大学微机原理与接口技术软件件实验报告.docx

微机原理软件实验报告信息与通信工程学院微机原理软件实验报告班级：学号：姓名：序号：时间：2015-11-62015-11-29实验二 分支,循环程序设计一、实验目的: 1.开始独立进行汇编语言程序设计; 2.掌握基本分支,循环程序设计; 3.掌握最简单的 DOS 功能调用.二、实验内容: 1.安排一个数据区（数据段）,内存有若干个正数,负数和零.每类数的个数都不超过 9。 2.编写一个程序统计数据区中正数,负数和零的个数。 3.将统计结果在屏幕上显示。 4.（选做）统计出正奇数,正偶数,负奇数,负偶数以及零的个数。三、预习题: 1、十进制数 0 - 9 所对应的 ASCII 码是什么? 如何将十进制数 0 - 9 在屏幕上显示出来? 答：十进制数09对应的二进制数为30H39H。要屏显0-9的数码，只需将AH置成02H（DOS功能调用），然后将要显示的数码的ASCII码存进DL里，然后执行INT 21H就可以打印字符。或者，若这些数码是以字符串的格式存储，则可以将AH置成09H，（最后以$字符结束，）然后将串首地址传给DS，然后执行INT 21H就可以打印字符串。2、如何检验一个数为正,为负或为零? 你能举出多少种不同的方法? 答：可以将待检验数与0比较（使用CMP指令后用JZ指令判断ZF是否为零），也可以将待检验数与80H相与，判断ZF的值。二是和0相比是否相等，然后用该数（假设为8位）和10000000相与，取出符号位判断，可区分正负。本次试验中我使用的方法是与0比较，所有判决方法的核心思想要么是直接和0相比，要么使用逻辑或移位运算，取出符号进行判断。四、实验过程:流程图：定义数据段，将所需判别数据存入数据段，定义输出字符CX是否为0是 否CX=CX-1 BX中的数和0比较 大于0 小于0负数个数加1正数个数加1 等于00个数加1BX中的数与1相与，结果加到负偶数中BX中的数与1相与，结果加到正偶数中统计输出正数、负数、零，正负偶数，计算正负奇数输出结果结束代码：DATASEGMENT ;数据段BUFFDW 4,0,37,99,-9,-2,-87,0,76,11,0,-34,-11,0,22 ;待判断数据COUNTEQU $-BUFF ;COUNT的值为BUFF所占的字节数POSI DB ?;正数ZERO DB ?;负数NEGT DB ? ;0 POSIEVEN DB 0 ;正偶数 POSIODD DB ? ;正奇数 NEGTEVEN DB 0 ;负偶数 NEGTODD DB ? ;负奇数POSICHAR DB Positive: $ ;用于打印提示的字符串定义NEGTCHAR DB Negtive: $ZEROCHAR DB Zero: $EVENCHAR DB Even: $ODDCHAR DB Odd: $CR DB 0DH,0AH,$ ; 回车换行的ASCII码DATAENDSSTACKSEGMENT STACK STACK ;堆栈段DB100DUP(?)STACKENDSCODESEGMENT ;代码段ASSUME CS:CODE,DS:DATA,ES:DATA,SS:STACKBEGIN: PUSH DS XOR AX,AX PUSH AX ;返回DOS MOVAX,DATAMOVDS,AX ;给DS真正赋值MOVCX,COUNT SHRCX,1 ;相当于除2, 正好为BUFF中的数据个数MOVDX,0 ;设定初值:DH及DL分别为等于、大于零的个数MOVAH,0 ;设定初值:AH为小于零的个数LEABX,BUFF ;把BUFF中的第一个数存到BXAGAIN:CMP WORD PTR BX,0 ;BUFF中的第一个数与0进行比较JGEPOSITIVE ;大于等于0时转POSITIVEINCAH ;统计小于零的个数 ADD WORD PTR BX,1AND NEGTEVEN,BX ;和1与之后的结果加到负偶数中JMPNEXTPOSITIVE: JZZERO ;等于0时转ZEROINCDL ;统计大于零的个数 ADD WORD PTR BX,1AND POSIEVEN,BX ;和1与之后的结果加到正偶数中JMPNEXTZERO:INCDH ;统计等于零的个数NEXTINCBX;修改地址指针INCBX LOOP AGAIN ;循环判断CX不为0 MOVPOSI,DL ;保存结果，正数MOVZERO,DH ;0MOVNEGT,AH ;负数 MOV AH,POSI MOV AL,POSIEVEN SUB AH,AL ;计算正奇数个数 MOV POSIODD,AH MOV AH,NEGTMOV AL,NEGTEVEN SUB AH,AL MOV NEGTODD,AH ;计算负奇数个数PRINT: ;打印正数提示符和正数（奇偶）个数MOV AH,09HMOV DX,OFFSET POSICHARINT 21HMOV AH,02HMOV DL,POSIADD DL,30HINT 21HMOV AH,09HMOV DX,OFFSET EVENCHARINT 21HMOV AH,02HMOV DL,POSIEVENADD DL,30HINT 21HMOV AH,09HMOV DX,OFFSET ODDCHARINT 21HMOV AH,02HMOV DL,POSIODDADD DL,30HINT 21HMOV DX,OFFSET CRMOV AH,09HINT 21H;打印负数提示符和负数（奇偶）个数MOV AH,09HMOV DX,OFFSET NEGTCHARINT 21HMOV AH,02HMOV DL,NEGTADD DL,30HINT 21HMOV AH,09HMOV DX,OFFSET EVENCHARINT 21HMOV AH,02HMOV DL,NEGTEVENADD DL,30HINT 21HMOV AH,09HMOV DX,OFFSET ODDCHARINT 21HMOV AH,02HMOV DL,NEGTODDADD DL,30HINT 21HMOV DX,OFFSET CR MOV AH,09HINT 21HMOV AH,09HMOV DX,OFFSET ZEROCHARINT 21HMOV AH,02HMOV DL,ZEROADD DL,30HINT 21HCODEENDSENDBEGIN ;代码段结束结果分析：数据区待统计的数据为：4,0,37,99,-9,-2,-87,0,76,11,0,-34,-11,0,22实验结果如下图所示：本实验意在练习基本的分支、循环结构。关键的点在于和0比较，区分正负和零，然后在正数和负数中判断奇偶，这里巧妙地使用了和1与之后结果加和到偶数中，最后利用统计的数的个数减去偶数得奇数的方法。使得程序更加流畅和简洁，思路也更清晰。五、实验总结汇编程序同高级语言一样，在写代码前都要对实验做分析，设计好思路，这样写代码时思路才比较清晰，代码也比较容易写和查找错误。此次实验主要是循环和分支，也是用汇编语言编写的第一个程序，让我熟悉了汇编语言的基本写法，对很多理论课学到的知识都有了更深的了解。了解了怎样利用判别条件在不同的分支中跳转，循环的判别及循环过程。总而言之，此次实验收获还是很多的，不仅加深了对这两种结构的了解，提升了自己设计程序的能力，并且也提升了自己排除bug的能力，进一步熟悉了第一个实验的整个流程。实验三 代码转换程序设计一、实验目的:1.掌握几种最基本的代码转换方法;2.运用子程序进行程序设计.二、实验内容: 1.从键盘上输入若干两位十进制数,寻找其中的最小值,然后在屏幕上显示出来. 2.两个十进制数之间的分隔符,输入结束标志自定,但要在报告中说明. 3.对输入要有检错措施,以防止非法字符输入,并有适当的提示. 4.将整个程序分解为若干模块,分别用子程序实现.在报告中要给出模块层次图.三、预习题: 1.如何将输入的两个字符(0 - 9)变为十进制或二进制数?答：两字符减去0的ASCII码(30H)后，高位数乘以十加上低位数，即变为十进制数。 2.如何将选出的最小值(二进制或十进制)变为 ASCII 码再进行显示?答：本次实验是直接读入并存储数字的ASCII码，比较其大小，然后直接输出ASCII码。 3.你觉得采用二进制运算还是十进制运算更适合于这个实验?答：相比二进制，采用十进制运算更简洁，但需要和ASCII码进行转换。可直接使用数字对应的ASCII比较，分别比较十位和个位，最后直接输出字符即可。四、实验过程:模块层次图：主程序BEGIN读取输入子程序输出打印子程序找出最小数据子程序流程图：代码：DATA SEGMENT ;数据段INPUT DB 100 DUP(?)MINTMP DB 9-30H,9-30H ; 置最小值的初始值为99COUNT DB 0DIFERROR DB 0D; 用于判断调用输入子程序是否有错WELCOME DB Please input numbers:,$ ;提示信息字符串OUTTIP DB Minimum is :,$CR DB 0DH,0AH,$; 回车换行ERROR1 DB ERROR:Character is not valid!,$ ;各种错误输入提示ERROR2 DB ERROR:Number must contains two digits!,$ERROR3 DB ERROR:Number is empty!,$ERROR4 DB ERROR:Need separate char!,$DATA ENDSSTACKSEGMENT STACK STACK ;堆栈段DB100DUP(?)STACKENDSCODE SEGMENT ;代码段 ASSUME CS:CODE,DS:DATA,SS:STACK,ES:DATABEGIN PROC FAR PUSH DS ;返回DOS XOR AX,AX PUSH AX MOV AX,DATA ;真正给DS赋值 MOV DS,AX MOV DX,OFFSET WELCOME; 调用欢迎提示 CALL PRINT ;调用子程序 MOV DX,OFFSET CR; 回车换行 CALL PRINT CALL MAIN; 获取用户输入 CMP IFERROR,0; 判断输入过程是否有错 JNZ BACK; 错误则直接返回DOS MOV DX,OFFSET CR; 回车换行 CALL PRINT CALL FINDMIN; 查找最小数 MOV DX,OFFSET OUTTIP; 调用输出提示 CALL PRINT MOV AH,02H MOV DL,MINTMP; 输出最小值的十位 ADD DL,30H INT 21H MOV AH,02H MOV DL,MINTMP1; 输出最小值的个位 ADD DL,30H INT 21HBEGIN ENDP;获取输入，出口参数为IFERROR，表示是否有错MAIN PROCPUSH AX; 保存现场PUSH BXPUSH CX PUSH DXPUSH DIMOV DI,0; 数组偏移地址MOV CX,0; 标识数字的位数GETLOOP:MOV AH,01H; 从键盘读取一个字符INT 21HCMP AL,0DH; 和回车比较JE EXIT1; 是回车则结束输入CMP CX,0; 数字位数为空JE CMPSPACE0CMP CX,1; 数字位数为1JE CMPSPACE1CMP CX,2; 数字位数为2JE CMPSPACE2CMPSPACE0: CMP AL,20HJE GETLOOP; 数字位数为0且输入空格则忽略，继续输入JMP ASCBIN; 不是空格就读取该字符CMPSPACE1: CMP AL,20HJE ERR2; 数字位数为1且输入空格则位数不是两位数出错JMP ASCBIN; 否则读取该字符CMPSPACE2: CMP AL,20HJNE ERR4; 数字位数为2后，不输入空格则分隔符错误XOR CX,CX; 输入空格则清零重新计数JMP GETLOOPASCBIN:SUB AL,30H; 化为二进制数字JL ERR1; 小于则无效字符CMP AL,9; 和9比较JG ERR1; 大于9则是无效字符MOV INPUTDI,AL; 保存输入的数INC COUNT; 统计输入的数字个数，为判断是否输入为两位数INC DI; 向后移动数组INC CXJMP GETLOOPERR1: MOV IFERROR,1; 输出错误1MOV DX,OFFSET ERROR1CALL PRINTJMP RETURNERR2: MOV IFERROR,1; 输出错误2MOV DX,OFFSET ERROR2CALL PRINTJMP RETURNERR3: MOV IFERROR,1; 输出错误3MOV DX,OFFSET ERROR3CALL PRINTJMP RETURNERR4: MOV IFERROR,1; 输出错误4 MOV DX,OFFSET ERROR4 CALL PRINTJMP RETURNEXIT1: MOV BL,COUNT; 判断输入数的个数是否为零 CMP BL,0 JE ERR3;输入数目为0则输出错误并退出AND BL,01H; 判断数字是否为两位数 CMP BL,0 JNE ERR2;输入数字个数为奇数则出错RETURN:POP DI; 恢复现场POP DXPOP CX POP BXPOP AXRETMAIN ENDP;回车换行输出字符串，入口参数为DXPRINT PROCPUSH AXMOV AH,09HINT 21H POP AX RETPRINT ENDP;查找最小的数子程序FINDMIN PROCPUSH DI; 保护现场PUSH AXPUSH CXMOV DI,-2; 数组下标MOV CL,COUNT; 把数组长度移入CXMOV AL,CLCBWMOV CX,AXLOP: ADD DI,2CMP CX,DI; 是否已经比较完毕JE EXIT2; 如果比较完毕所有数则退出MOV AH,INPUTDI;否则接着比较，移入十位数MOV AL,INPUTDI+1; 移入个位数 CMP AH,MINTMP; 比较十位数，MINTMP低地址为十位 JA LOP ;如果MINTMP小，则直接比较下一个数 JE HIGHEQU ;如果十位数相等，比较个位数,再否则十位大就直接存储STOMIN:MOV MINTMP,AHMOV MINTMP1,ALJMP LOPHIGHEQU:CMP AL,MINTMP1; 比较个位数JNB LOP; 个位数比MINTMP大则跳到下一个数JMP STOMIN; 否则将当前数写入为MINTMPEXIT2: POP CXPOP AXPOP DIRETFINDMIN ENDPCODE ENDS END BEGIN结果分析：实验以空格为分隔符，空格的个数不限制，以回车为输入结束标志符。对输入的数字进行了位数和范围的严格限制，即必须是两位数字，如果数字小于10，需要补齐零。第一次不输入数字，直接回车后，提示错误，输入不能为空；第二次输入数据1，提示错误，要求输入必需为2位数字；第三次输入字符$，提示错误，要求输入为数字；第四次输入123，提示错误，所输入数据两位后必需有空隔；正确输入待比较数据：01 23 66 09 82 56，找到最小数为01，结果正确。五、实验总结这次实验主要是如何分析、如何调用子程序，用子程序使得整个代码思路比较清晰，代码也不容易出错，修改bug的时候比较好查找。在实验中，以数组方式进行存储数据，每两个BYTE存储一个输入的两位数，存储格式为字符ASCII码，比较数字大小时，采用分别比较高位ASCII码和低位ASCII码的方式，从而不用在输入时将字符存储为数字，输出时也不用再进行逆转换，程序效率大为提高。实验中遇到了很多问题，在同学的帮助下，解决了很多问题，了解了主函数和子函数的调用，每次遇到bug时，要是直接看代码找不到问题所在，就用debug查找，进一步熟悉了debug的使用，也从DS、IP、CS、AX、BX等寄存器的变化更好的理解了代码，更好的理解了汇编的过程，都是不小的进步，对以后的实验也有帮助。实验四 子程序设计一、实验目的:1.进一步掌握子程序设计方法; 2.进一步掌握基本的 DOS 功能调用.二、实验内容: 1.从键盘上输入某班学生的某科目成绩.输入按学生的学号由小到大的顺序输入. 2.统计检查每个学生的名次. 3.将统计结果在屏幕上显示. 4.为便于观察,输入学生数目不宜太多,以不超过一屏为宜.输出应便于阅读.尽可 能考虑美观. 5.输入要有检错手段.三、预习题: 1.如何确定一个学生在这门科目中的名次?答：有两种基本思路：一是抽取每个学生的成绩和其他所有学生的成绩进行比较，然后统计比其分数高的学生，得出该学生的名次；二是把学生成绩存入连续内存区域，即数组方式，取得每个学生的成绩偏移量，即成绩偏移地址。然后比较偏移地址所指的成绩的大小，交换数据区的值的位置，完成排序。 2.你觉得输入结束后,采用什么方法进行比较以得到学生的名次最为简单?答：采用冒泡排序法可获得较好的时间和空间性能。冒泡法平均时间性能O(N2)。相比于直接比较，性能有所改善。但相对于快速排序、归并排序等优化的算法的时间复杂度O(N*log2N)还不够好。但后两者使用汇编实现代码的复杂度和编程要求要高。考虑到学生人数比较少，使用冒泡法是比较简洁的，时间性能是可以接受的。 3.准备好模块层次图.答：如下图所示实验过程中的模块层次图 4.给出输出显示的形式。答：以列表显示输出，依次为排名、学号、成绩。四、实验过程:模块层次图：主函数BEGIN打印输出子程序排序子程序读取数据子程序保存排序结果冒泡排序输入数据存储数据检查数据流程图：代码：DATA SEGMENT ;数据段ID DB 400 DUP(?);存储学号，每个16固定个BYTE，存储为字符串MARK DB 20 DUP(?); 存储分数，每个1BYTE，存储为二进制数RANK DB 20 DUP(?); 存储排名，每个1BYTE，存储为二进制数RANKTMP DB 20 DUP(?); 排序时指针临时区MTMP DB ?; 记录成绩的临时区COUNTB DB ?; 记录总的学生的个数，存为8位COUNTW DW ?; 记录总的学生个数，存为16位CHEOK DB ?; 输入检查标志位ERROR DB ?; 记录错误号TMP DB 2 DUP(?); 开辟两个内存临时存储区，用作判断和计数CR DB 0DH,0AH,$; 回车换行TAB DB 09H,09H,$;输出TAB键ERR0 DB Input cannot be empty!,$ERR2 DB Character is invalid!,$ERR4 DB Mark is invalid!,$ERR6 DB Input is invalid!,$ERRLIST DW ERR0,ERR2,ERR4,ERR6TIP0 DB Please re-input:,$TIP1 DB Please input number of students:,$TIP2 DB Please input ID and MARK:,$PRTIP DB -RESULT-,$PRINFO DB ID,09H,09H,MARK,09H,09H,RANK,$PRPRE1 DB ID : ,$PRPRE2 DB MARK: ,$BUFF DB 16; 定义输入缓冲区，最长的字符长度PRES DB ?; 存储实际输入了多少个字符CHAR DB 16 DUP(?); 实际可存储有效字符16个DATA ENDSCODE SEGMENT ;代码段;打印提示字信息的宏,形参为PARAPRINTTIP MACRO PARAPUSH AXPUSH DXMOV AH,09HMOV DX,OFFSET PARAINT 21HPOP DXPOP AXENDM;打印单个字符的宏，形参为ACHARPRINTCHAR MACRO ACHARPUSH AXPUSH DXMOV AH,02HMOV DL,ACHARINT 21HPOP DXPOP AXENDMBEGIN PROC FAR ASSUME CS:CODE,DS:DATA,ES:DATA MOV AX,DATA MOV DS,AX MOV ES,AX CALL GETNUMBER; 获得学生的人数 CALL GETINFO; 获得学号分数的输入 CALL SORT; 执行排序活动名次 CALL PRINT; 把名次结果打印出来BACK:MOV AX,4C00H; 返回DOS INT 21HMAIN ENDP;获得将要输入的学生的人数信息的子程序;每班的学生定义不超过100人GETNUMBER PROC NEARPUSH AXPUSH BXHE:PRINTTIP TIP1GREP:CALL GETIN; 获取一个输入缓冲MOV CHEOK,0CALL CHECKCMP CHEOK,0JE GRETURNMOV ERROR,6CALL PRINTERRPRINTTIP TIP0 PRINTTIP CRJMP GREPERRHERE:PRINTTIP CRMOV ERROR,6CALL PRINTERRPRINTTIP TIP0JMP GREP GRETURN:CALL CHANGEMOV AL,MTMPCMP AL,0JE ERRHEREMOV COUNTB,AL; 写入人数CBWMOV COUNTW,AXPRINTTIP CRPOP BXPOP AXRETGETNUMBER ENDP;循环直到输入人数满时终止，获得输入的字符串GETINFO PROC NEARPUSH AXPUSH BXPUSH CXPUSH DXPUSH SIPUSH DIPRINTTIP TIP2MOV TMP,0; 记录是学号还是分数XOR BX,BX; 记录每个ID的偏移量XOR AX,AX; 记录学生数目MORE:PRINTTIP CRCMP COUNTB,ALJNZ HERE1JMPRETURN; 计数器为0则返回父程序HERE1: CMP TMP,0JE PR1CMP TMP,1JE PR2PR1:PRINTTIP PRPRE1JMP HERE2PR2:PRINTTIP PRPRE2HERE2:CALL GETIN; 否则接受输入CALL CHECK; 检查输入是否是数字且不为空CMP CHEOK,0JNE CHEFAIL; 不为零则不合法，需要重新输入CMP TMP,0JE ISID ; 输入的是学号CMP TMP,1 ; JE ISMARK ;输入的是分数CHEFAIL:PRINTTIP TIP0 PRINTTIP CRMOV CHEOK,0; 重新把返回判断位置零JMP MORE;写入学号，固定为16个字符ISID:MOV DL,PRES; 抽取需要写入字符的个数XOR DH,DHMOV CX,DXMOV SI,CXINC CXMOV CHARSI,$; 把最后一个字符之后的位置填充为$;开始写入IDMOV TMP,1; 表示下一个是分数CLDMOV SI,OFFSET CHARMOV DI,OFFSET IDADD DI,BXREP MOVSB ;写入ID; 写完则为接受下一个输入BUFF作准备ADD BX,16; ID的偏移地址向后挪动固定的16BYTEJMP MORE; 跳回继续输入下一个BUFF;是学号，检查、转换、写入保存ISMARK:CALL CHANGECMP CHEOK,0JE WRITEMARKMOV ERROR,4JMP CHEFAILWRITEMARK:PUSH BXMOV BL,MTMPMOV DI,AXMOV MARKDI,BL; 实际写入成绩POP BXMOV TMP,0; 计数清理，表明下一个输入为学号INC AX; 已接受的学生个数加一JMP MORERETURN:POP DIPOP SIPOP DXPOP CXPOP BXPOP AXRETGETINFO ENDP;获得一次BUFF输入子程序;入口参数为BUFF的偏移地址，出口参数为BUFF中的字符串GETIN PROC NEARPUSH AXPUSH DXPUSH DIMOV DX,OFFSET BUFFMOV AH,0AHINT 21HPOP DIPOP DXPOP AXRETGETIN ENDP;执行输入字符是否是数字的合法性检查CHECK PROC NEARPUSH DIPUSH CXPUSH AXXOR DI,DI; 记录CHAR读取的偏移量MOV AL,PRES; 读取输入的BUFF中的字符数CBWMOV CX,AXCMP CX,0; 判断是否输入BUFF为空JE ISEMPTY; 为空则重新输入AGAIN:CMP CX,DIJE RETURNCHECKMOV AH,CHARDICMP AH,30H; JL INVALID; 小于则无效字符CMP AH,39H; JG INVALID; 大于则是无效字符INC DIJMP AGAINISEMPTY: MOV ERROR,0 ;输入为空的处理代码PRINTTIP CRCALL PRINTERRPRINTTIP CRMOV CHEOK,1JMP RETURNCHECKINVALID: MOV ERROR,2; 输入不合法的处理代码PRINTTIP CRCALL PRINTERRPRINTTIP CRMOV CHEOK,1RETURNCHECK:POP AXPOP CXPOP DIRETCHECK ENDP;处理成绩输入的子程序;检查输入成绩是否在0-100之间的子程序并转化为二进制数CHANGE PROC NEAR ;把3位数字转换为二进制数PUSH AXPUSH BXPUSH CXMOV CL,PRESCMP CL,3JA MINVALID; 四位数或以上，溢出JE THRDIG; 三位数CMP CL,2JE TWODIG; 两位数CMP CL,1JE ONEDIG; 一位数THRDIG:;判断是否是100，是则直接在临时成绩区写入100MOV BL,CHAR0; 百位SUB BL,30HCMP BL,1JNE MINVALIDMOV BL,CHAR1; 十位SUB BL,30HCMP BL,0JNE MINVALIDMOV BL,CHAR2; 个位SUB BL,30HCMP BL,0JNE MINVALIDMOV MTMP,100 ;写入100JMP CRETURNTWODIG:; 当是两位数时判断十位是否是0，不是则进行转换，然后写入临时成绩中MOV BL,CHAR0; 十位SUB BL,30HCMP BL,0JE MINVALIDMOV AL,10MUL BL; 成10取得十位数MOV BL,CHAR1; 个位SUB BL,30HADD AL,BL; 因为小于100所以有效数在AL中，；可以直接加个位数得结果MOV MTMP,AL; 写入转换后的数字JMP CRETURNONEDIG:;一位数时直接写入临时成绩区即可MOV BL,CHAR0; 个位SUB BL,30HMOV MTMP,BLJMP CRETURNMINVALID:MOV ERROR,4CALL PRINTERRMOV CHEOK,1CRETURN:POP CXPOP BXPOP AX RETCHANGE ENDP;打印错误信息子程序PRINTERR PROC NEARPUSH AXPUSH DXPUSH BXMOV AL,ERRORCBWMOV BX,AXMOV AH,09HMOV DX,ERRLISTBXINT 21HPOP BXPOP DXPOP AXRETPRINTERR ENDP;排序子程序SORT PROC NEAR PUSH AX PUSH BX PUSH CX PUSH DX PUSH SI PUSH DI ;写入偏移量作为分数的指针 MOV AL,COUNTB; 读取学生数目 XOR BX,BX; BX作为寻址计数器 ;顺序写入成绩偏移量SLOP: DEC AL MOV RANKTMPBX,AL INC BX CMP AL,0 JNE SLOP ;排序名次，冒泡排序法 MOV CX,COUNTW; CX记录了总的学生人数 DEC CX JZ WRRAK;如果只有一个学生则直接写入名次，否则排序异常LOP1: XOR DI,DI; 从第一个名次开始LOP2: MOV AL,RANKTMPDI; 取出地址指针，即成绩偏移量 XOR AH,AH MOV SI,AX MOV DL,MARKSI; 取出成绩1 MOV AL,RANKTMPDI+1 XOR AH,AH MOV SI,AX MOV DH,MARKSI;同理取出成绩2 CMP DL,DH JGE NEXTCMP MOV AH,RANKTMPDI; 交换分数指针 XCHG AH,RANKTMPDI+1 MOV RANKTMPDI,AHNEXTCMP: INC DI CMP DI,CX JNE LOP2 LOOP LOP1 ;写入最后的名次WRRAK: XOR SI,SI MOV CX,COUNTW MOV BL,1; 保存名次LOPSAVE: CMP SI,CX JE FINISH MOV AL,RANKTMPSI; 提取该名次学生的地址指针 XOR AH,AH MOV DI,AX MOV RANKDI,BL; 写入该学生的名次 INC BL INC SI JMP LOPSAVEFINISH: POP DI POP SI POP DX POP CX POP BX POP AX RETSORT ENDP;打印输入成绩和名次子程序PRINT PROC NEARPUSH AXPUSH BXPUSH CXPUS