子程序与宏使用.docVIP

实验三 子程序和宏的使用 一、实验目的 1．练习使用子程序及宏。 2．练习使用功能调用（INT 21H）中关于程序终止、字符输入及字符输出部分。 二、实验准备 复习教材中有关章节，编写实验内容的汇编语言源程序并加必要注释。 确定数据在内存中的偏移地址可用ORG伪命令。 三、实验内容 实验内容分为三部分，可以先调试第一部分，然后逐步添加其他功能。多次重复使用的功能块，单独做成子程序或宏，然后在程序中调用。 从键盘键入10个一位或两位的十进制数，用压缩BCD码的形式存入数据段1000H起的单元中，且每个数在屏幕上显示成一行，共10行。 键入数字用单个字符的输入调用。输入时应判断字符类型是否数字0~9，若不在此范围则不予接收且提示输入错；若在此范围则将ASCII码转换成数值，且每两位十进制数压缩成一个字节存入数据区。若仅输入一个数字就敲回车键，表明这是一个1位的十进制数，其数值还占1个字节，十位数部分为零。 编程从上面十个数中找出最大值显示在屏幕上。进入DEBUG，修改十个数的数值，检验在各种情况下，程序都能找到最大值。 （选作）将十个数按从大到小的顺序排列在数据区中。 编写总源程序如下: NAME MACRODATA SEGMENTMESS DB Please Input 10 Decimal Number: NAME MACRO DATA SEGMENT MESS DB Please Input 10 Decimal Number: DB 0DH,0AH,$ ERROR DB 0DH,0AH,ERROR! Input It Again:,0DH,0AH,$ MAXIMUM DB The Max: ,0DH,0AH,$ LIST DB 0DH,0AH,Sorted List:,0DH,0AH,$ ; 各种提示信息 LINE DB 0DH,0AH,$ ORG 1000H NUBLIST DB 10 DUP(?) ; 存放输入的数字 DATA ENDS STACK SEGMENT STACK DB 100 DUP(?) STACK ENDS CODE SEGMENT NEWLINE MACRO ; 实现换行功能 PUSH AX PUSH DX LEA DX,LINE MOV AH,09 INT 21H POP DX POP AX ENDM PRINT MACRO ; 输出寄存器DL中以压 ;缩BCD码形式表示的数字 PUSH BX MOV BL,DL PUSH CX MOV CL,04 SHR DL,CL POP CX ADD DL,30H MOV AH,02H INT 21H MOV DL,BL AND DL,15 ADD DL,30H INT 21H NEWLINE POP BX ENDM WRITE MACRO ; 从键盘读入一个不大 ;于99的十进制数，存入BL PUSH AX PUSH CX MOV CL,04 MOV BL,0 MOV BH,1 GO: CMP BH,3 JE EXIT MOV AH,01 INT 21H INC BH CMP AL,0DH JE EXIT CMP AL,3AH JAE WRONG CMP AL,2FH JBE WRONG SUB AL,30H SHL BL,CL ADD BL,AL JMP GO WRONG: MOV BL,00 MOV BH,01 ; initialize MOV AH,09H LEA DX,ERROR INT 21H JMP GO EXIT: NEWLINE POP CX POP AX ENDM MAIN PROC FAR ASSUME CS:CODE,DS:DATA,SS:STACK ; 从这里开始执行，分别提示输入十个数字，输出 ;最大值，将数字排序输出 BEGIN: PUSH DS MOV AX,0 PUS AX MOV AX,