微原实验——两个四位十进制数相加并显示结果.docxVIP

微原实验——两个四位十进制数相加并显示结果实验目的通过上机实验，熟悉汇编语言开发环境，了解代码编译，连接，执行的相关过程。熟悉汇编语言的书写与使用，在调试程序的过程中熟悉不同代码的执行效率与效果。实验原理从键盘输入2个4位二进制数，相加并显示结果。实验设备及软件硬件：PC软件：TPC2003+汇编集成开发环境实验内容(代码及注释)DATA SEGMENTX1 DB 4 DUP(0)；第一个加数X2 DB 4 DUP(0)；第二个加数X3 DB 5 DUP(0)；两数之和y1db please input the first number:,$y2db please input the second number,$y3db the result is:,$DATA ENDS；数据段STACK SEGMENT STACKDW 100 DUP(?)STACK ENDS；堆栈段CODE SEGMENTASSUME CS:CODE,DS:DATA,SS:STACKKEYIN PROC；键盘输入函数AGAIN: MOV AH,8INT 21HCMP AL,30HJB AGAINCMP AL,39HJA AGAIN；若不为数字，重新输入PUSH AXMOV DL,ALMOV AH,2INT 21H；若为数字，入栈保存并显示POP AXRETKEYIN ENDPMAIN PROCMOV AX,DATAMOV DS,AXMOV DX,OFFSET Y1MOV AH,9INT 21HMOV DL,0DHMOV AH,2INT 21HMOV DL,0AHMOV AH,2INT 21H；打印y1字符串，并在结尾输出回车MOV SI,OFFSET X1MOV CX,4NEXT1: CALL KEYINAND AL,0FH；调整ASC码数字为纯数字以便相加MOV [SI],ALINC SILOOP NEXT1MOV SI,OFFSET X2MOV CX,4；将第一个加数保存在变量X1中MOV DL,0DHMOV AH,2INT 21HMOV DL,0AHMOV AH,2INT 21H；输出回车MOV DX,OFFSET Y2MOV AH,9INT 21HMOV DL,0DHMOV AH,2INT 21HMOV DL,0AHMOV AH,2INT 21H；打印y2字符串，并在结尾输出回车NEXT2: CALL KEYINAND AL,0FH；调整ASC码数字为纯数字以便相加MOV [SI],ALINC SILOOP NEXT2；将第二个加数保存在变量X2中MOV DL,0DHMOV AH,2INT 21HMOV DL,0AHMOV AH,2INT 21H；输出回车MOV DX,OFFSET Y3MOV AH,9INT 21HMOV DL,0DHMOV AH,2INT 21HMOV DL,0AHMOV AH,2INT 21H；打印y3字符串，并在结尾输出回车MOV SI,(OFFSET X1)+3MOV DI,(OFFSET X2)+3MOV BX,(OFFSET X3)+4MOV CX,4OR CX,CX；CF位清零PLUS: MOV AL,[SI]ADC AL,[DI]AAA；十进制调整命令MOV [BX],ALDEC DIDEC SIDEC BXLOOP PLUSMOV AL,0ADC AL,0MOV [BX],ALMOV BX,OFFSET X1MOV CX,4NEXT4: MOV DL,[BX]ADD dl,30h；将纯数字调整为ASC码以便打印MOV AH,2INT 21HINC BXLOOP NEXT4；打印加数X1MOV DL,2BHMOV AH,2INT 21H；打印’+’号MOV BX,OFFSET X2MOV CX,4NEXT5: MOV DL,[BX]ADD DL,30HMOV AH,2INT 21HINC BXLOOP NEXT5；打印X2MOV DL,3DHMOV AH,2INT 21H；打印’=’号MOV BX,OFFSET X3SUB BYTE PTR [BX],0JZ OUT1；判断结果最高位是否为零，若为零则跳至OUT1处MOV CX,5NEXT3: MOV DL,[BX]ADD DL,30HMOV AH,2INT 21HINC BXLOOP NEXT3；最高位不为零，打印五位数CMP CX,0JZ END1；若已经输出完毕，则跳至END1直接结束程序OUT1: MOV CX,4；结果最高位为零，打印四位数NEXT6: MOV DL,[BX+1]ADD DL,30HMOV AH,2INT 21HINC BXLOOP NEXT6END1: MOV AH,4CHINT 21HMAIN ENDPCODE ENDS；结束程序EN