循环设计实验-微电子0902-任琨-24

1、循环设计实验实验报告院系名称：电子工程学院学生姓名：任琨（24）专业班级：微电子0902学 号：04094061一、实验目的1、掌握循环程序的设计方法。2、掌握比较指令、转移指令和循环指令的使用方法。3、进一步掌握调试工具的使用方法。二、实验预习要求1、复习比较指令、条件转移指令和循环指令。2、复习循环程序的结构、循环控制方法等知识。3、读懂“实验内容”中给出的将十进制数转换为二进制数以及将二进制数转换为十进制数的程序。4、根据“实验内容”中给出的流程图和程序框架编写源程序，以便上机调试。5、从“实验习题”中任选一道题目，编写源程序，以便上机调试。三、实验内容计算1+2+n=?，其中n通过键盘

2、输入。要求在屏幕上提供如下信息：Please input a number(1627):；出现此信息后通过键盘输入一个小于628的无符号整数1+2+.n=sum；其中n为用户输入的数，sum为所求的累加和程序运行情况如下图所示（说明：图中所运行程序允许累加和不大于一个32位二进制数所能表示的范围）。1、 编程指导（1） 键盘输入的十进制数如368在计算机中是以33H，36H，38H形式存放的，如何将它们转换为一个二进制数101110000B，以便对累加循环的循环次数进行控制是本程序首先要解决的问题。将键盘输入的十进制数转换为二进制数的程序清单如下：DATA SEGMENT INF1 DB &q

3、uot;Please input a number (0-65535):$"IBUF DB 7,0,6 DUP(?)DATA ENDSCODESEGMENT ASSUME CS: CODE, DS:DATASTART:MOVAX, DATA MOV DS, AXMOV DX, OFFSET INF1MOV AH, 09HINT 21HMOV DX, OFFSET IBUF；键入一个十进制数（<65535）MOV AH, 0AH INT 21HMOV CL, IBUF+1；十进制数的位数送CXMOV CH, 0MOV SI, OFFSET IBUF+2；指向输入的第一个字符（最高

4、位）MOV AX, 0；开始将十进制数转换为二进制数AGAIN: MOVDX, 10； (0´10+a4) ´10+) ´10+a0MUL DX AND BYTE PTR SI, 0FH ADD AL, SI ADC AH, 0 INC SI LOOP AGAINMOV AH,4CH INT 21HCODE ENDS END START 本程序功能：从键盘接收一个无符号十进制整数（小于65535），将其转换为二进制数，转换结果存在AX寄存器中。（2） 累加结果为一个16位的二进制数，为了显示结果，必需把它们转换为十进制数。将二进制数转换为十进制数的程序清单如下：D

5、ATASEGMENT OBUFDB 6 DUP(?)DATA ENDSCODE SEGMENT ASSUME CS: CODE, DS: DATASTART:MOVAX, DATA MOV DS, AXMOV BX, OFFSET OBUF+5MOV BYTE PTR BX,'$'MOV CX, 10；做（DX）：（AX）/10运算LOOP1:MOVDX, 0；被除数高16位清0 DIV CXADD DL, 30H；将DL中的一位十进制数转换为ASCII码DEC BX MOV BX, DLOR AX, AXJNZ LOOP1；判断商是否为0，不为0继续MOV DX, BXMOV

6、 AH, 09H INT 21H；显示转换得到的十进制数MOV AH, 4CH INT 21HCODE ENDS ENDSTART本程序功能：将存储在AX寄存器中的二进制数转换为十进制数并显示。从键盘输入一个十进制数，并将其转换为二进制数，存放在AX中开始结束素、(CX)-1=0累加循环次数送CX（MOV CX,AX）AX清0（AX中存放累加和）BX送1（BX存放每次循环累加的数，每循环一次，BX值加1）ADD AX，BX INC BX累加和（在AX中）转换为十进制数并显示YN2、 流程图及程序框架（1） 流程图（2） 程序框架DATA SEGMENT INF1 DB "Please

7、 input a number (0-65535):$"IBUFDB 7,0,6 DUP(?)OBUF DB 6 DUP (?)DATA ENDSCODE SEGMENT ASSUME CS: CODE, DS: DATASTART:MOVAX, DATA接收从键盘输入的十进制数，并将其转换为二进制数（存AX寄存器）的指令序列 MOV DS, AXMOV CX, AXMOV AX, 0MOV BX, 1LOOP2:ADDAX, BXINCBX将AX中存放的二进制数转换为十进制数并显示的指令序列LOOPLOOP2CODE ENDS ENDSTART3、完整源程序代码DATA SEGME

8、NTINFOR1 DB "Please input a number(0 - 65535):$"IBUF DB 7,0,6 DUP(?)OBUF DB 6 DUP(?)DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATASTART: MOV AX,DATAMOV DS,AXMOV DX,OFFSET INFOR1MOV AH,09HINT 21HMOV DX,OFFSET IBUFMOV AH,0AHINT 21HMOV CL,IBUF+1MOV CH,0HLEA SI,IBUF+2MOV AX,0HLOOP1: MOV DX,10MUL

9、DXAND BYTE PTRSI,0FHADD AL,SIADC AH,0HINC SILOOP LOOP1MOV CX,AXMOV AX,0MOV BX,1LOOP2: ADD AX,BXINC BXLOOP LOOP2MOV BX,OFFSET OBUF+5MOV BYTE PTRBX,'$'LOOP3: MOV DX,0HMOV CX,10DIV CXADD DL,30HDEC BXMOV BX,DLOR AX,AXJNZ LOOP3MOV DL,0AHMOV AH,02HINT 21HMOV DL,0DHMOV AH,02HINT 21HMOV DX,BXMOV AH,

10、09HINT 21HMOV AH,4CHINT 21HCODE ENDSEND START四、实验习题1.从自然数1开始累加，直到累加和大于60000为止，显示累加的自然数的个数和累加和。显示格式为：1+2+n=sum其中n为累加个数，sum为累加和。完整程序代码DATA SEGMENTINFOR1 DB "1+2+.+$"OBUF1 DB 16 DUP(?)OBUF2 DB 16 DUP(?)DATA ENDSCODE SEGMENTMAIN PROC FARASSUME CS:CODE,DS:DATADSTRING MACRO OPRMOV DX,OPRMOV AH,0

11、9HINT 21HENDMSTART: MOV AX,DATAMOV DS,AXLEA AX,INFOR1DSTRING AXMOV AX,0MOV BX,0AGAIN1:INC BXADD AX,BXCMP AX,60000JB AGAIN1SUB AX,BXDEC BXPUSH AXMOV AX,BXLEA SI,OBUF1+15CALL BTODDSTRING SIMOV DL,3DHMOV AH,02HINT 21HPOP AXLEA SI,OBUF2+15CALL BTODDSTRING SIMOV AH,4CHINT 21HMAIN ENDPBTOD PROC NEARMOV BY

12、TE PTRSI,'$'AGAIN2: MOV DX,0HMOV CX,10DIV CXADD DL,30HDEC SIMOV SI,DLOR AX,AXJNZ AGAIN2RETBTOD ENDPCODE ENDSEND START2.从键盘输入6个加数N1、N2、N3、N4、N5和N6（均为14位的无符号十进制整数），求和并将计算结果在屏幕上显示出来。完整程序代码DATA SEGMENTINFOR1 DB "Please input the first number(<10000):$"INFOR2 DB 0AH,0DH,"Please

13、input the second number(<10000):$"INFOR3 DB 0AH,0DH,"Please input the third number(<10000):$"INFOR4 DB 0AH,0DH,"Please input the fouth number(<10000):$"INFOR5 DB 0AH,0DH,"Please input the fifth number(<10000):$"INFOR6 DB 0AH,0DH,"Please input the s

14、ixth number(<10000):$"INFOR7 DB 0AH,0DH,"The result is:$" N1 DB 7,0,6 DUP(?) N2 DB 7,0,6 DUP(?) N3 DB 7,0,6 DUP(?) N4 DB 7,0,6 DUP(?) N5 DB 7,0,6 DUP(?) N6 DB 7,0,6 DUP(?) RESULT DB 16 DUP(?)DATA ENDSCODE SEGMENTMAIN PROC FARASSUME CS:CODE,DS:DATADSTRING MACRO OPR1MOV DX,OFFSET OPR

15、1MOV AH,09HINT 21HENDMINPUTDATA MACRO OPR2LEA DX,OPR2MOV AH,0AHINT 21HENDMSTART: MOV AX,DATAMOV DS,AXDSTRING INFOR1INPUTDATA N1DSTRING INFOR2INPUTDATA N2DSTRING INFOR3INPUTDATA N3DSTRING INFOR4INPUTDATA N4DSTRING INFOR5INPUTDATA N5DSTRING INFOR6INPUTDATA N6LEA SI,N1CALL DTOBPUSH AXLEA SI,N2CALL DTOB

16、PUSH AXLEA SI,N3CALL DTOBPUSH AXLEA SI,N4CALL DTOBPUSH AXLEA SI,N5CALL DTOBPUSH AXLEA SI,N6CALL DTOBMOV CX,5LOOP2: POP BXADD AX,BXLOOP LOOP2 LEA SI,RESULT+15CALL BTODDSTRING INFOR7MOV DX,SIMOV AH,09HINT 21HMOV AH,4CHINT 21HMAIN ENDPDTOB PROC NEARMOV CL,SI+1MOV CH,0ADD SI,2MOV AX,0LOOP1: MOV DX,10MUL

17、 DXAND BYTE PTRSI,0FHADD AL,SIADC AH,0HINC SILOOP LOOP1RETDTOB ENDPBTOD PROC NEARMOV BYTE PTRSI,'$'AGAIN: MOV DX,0MOV CX,10DIV CXADD DL,30HDEC SIMOV SI,DLOR AX,AXJNZ AGAINRETBTOD ENDPCODE ENDSEND START3.从键盘输入一个无符号十进制整数（小于65536），将其转换为二进制数，统计该二进制数中包含的1的个数，并将统计结果在屏幕上显示出来。完整程序代码DATA SEGMENTINFOR

18、1 DB "Please input the data(065535):$"INFOR2 DB 0AH,0DH,"The result is:$"X DB 7,0,6 DUP(?)RESULT DB 7 DUP(?)DATA ENDSCODE SEGMENTMAIN PROC FARASSUME CS:CODE,DS:DATADSTRING MACRO OPR1MOV DX,OFFSET OPR1MOV AH,09HINT 21HENDMINPUTDATA MACRO OPR2LEA DX,OPR2MOV AH,0AHINT 21HENDMSTART:

19、MOV AX,DATAMOV DS,AXDSTRING INFOR1INPUTDATA XLEA SI,XCALL DTOBMOV BX,0MOV CX,16LOOP3: SHL AX,1JNC ZEROINC BXZERO: LOOP LOOP3MOV AX,BXLEA SI,RESULTCALL BTODDSTRING INFOR2MOV DX,SIMOV AH,09HINT 21HMOV AH,4CHINT 21HMAIN ENDPDTOB PROC NEARMOV CL,SI+1MOV CH,0ADD SI,2MOV AX,0LOOP1: MOV DX,10MUL DXAND BYTE

20、 PTRSI,0FHADD AL,SIADC AH,0HINC SILOOP LOOP1RETDTOB ENDPBTOD PROC NEAR MOV BYTE PTRSI,'$'AGAIN: MOV DX,0MOV CX,10DIV CXADD DL,30HDEC SIMOV SI,DLOR AX,AXJNZ AGAINRETBTOD ENDPCODE ENDSEND START4.从键盘输入N个无符号十进制整数（小于256），将其转换为二进制数后存放在字节变量BUF存储区中；对这N个数进行由大到小排序，排序后将其仍存储在BUF中；最后将排序后的结果在屏幕上显示出来。完整程序代

21、码N EQU 10DATA1 SEGMENTBUF0 DB 7,0,6 DUP(?)INFOR1 DB 0AH,0DH, "Please input the datas:$"OBUF DB 6 DUP(?)ENTER DB 0AH,0DH,'$'DATA1 ENDSDATA2 SEGMENTBUF DB 256 DUP(?)BUF1 DB 256 DUP(?)DATA2 ENDSCODE SEGMENTASSUME CS:CODE,DS:DATA1,ES:DATA2DSTRING MACRO OPR1MOV DX,OFFSET OPR1MOV AH,09HI

22、NT 21HENDMMAIN PROC FARSTART: MOV AX,DATA1MOV DS,AXMOV AX,DATA2MOV ES,AXMOV CX,N LEA DI,BUFAGAIN1: DSTRING INFOR1LEA DX,BUF0MOV AH,0AHINT 21HLEA BX,BUF0CALL DTOBSTOSBDEC CXJNZ AGAIN1MOV CX,NLEA DI,BUF1AGAIN2: PUSH CXLEA SI,BUFMOV CX,NLODS BYTE PTR ES:SIDEC SINEXT: DEC CXJZ DONEINC SICMP AL,ES:SIJA NEXTMOV