2.4  循环程序设计实验

2.4.1  实验目的

1、掌握循环程序的设计方法。

2、掌握比较指令、转移指令和循环指令的使用方法。

3、进一步掌握调试工具的使用方法。

2.4.2  实验预习要求

1、复习比较指令、条件转移指令和循环指令。

2、复习循环程序的结构、循环控制方法等知识。

3、读懂“2.4.3 实验内容”中给出的将十进制数转换为二进制数以及将二进制数转换为十进制数的程序。

4、根据“2.4.3 实验内容”中给出的流程图和程序框架编写源程序，以便上机调试。

5、从“2.4.4 实验习题”中任选一道题目，编写源程序，以便上机调试。

2.4.3  实验内容

计算1+2+……n=?，其中n通过键盘输入。要求在屏幕上提供如下信息：

Please input a number(1~627):     ；出现此信息后通过键盘输入一个小于628的无符号整数

1+2+…..n=sum                           ；其中n为用户输入的数，sum为所求的累加和

程序运行情况如下图所示（说明：图中所运行程序允许累加和不大于一个32位二进制数所能表示的范围）。

1、编程指导

（1）键盘输入的十进制数如368在计算机中是以33H，36H，38H形式存放的，如何将它们转换为一个二进制数101110000B，以便对累加循环的循环次数进行控制是本程序首先要解决的问题。将键盘输入的十进制数转换为二进制数的程序清单如下：

DATA    SEGMENT

                        INF1      DB "Please input a number (0-65535):$"

                     IBUF     DB 7,0,6 DUP(?)

       DATA     ENDS

       CODE     SEGMENT

                 ASSUME CS: CODE, DS:DATA

       START:   MOV      AX, DATA

                 MOV     DS, AX

                     MOV     DX, OFFSET INF1

                     MOV     AH, 09H

                     INT       21H

                     MOV     DX, OFFSET IBUF             ；键入一个十进制数（<65535）

                     MOV     AH, 0AH

                 INT       21H

       MOV     CL, IBUF+1                 ；十进制数的位数送CX

                     MOV     CH, 0

       MOV     SI, OFFSET IBUF+2    ；指向输入的第一个字符（最高位）

                     MOV     AX, 0                          ；开始将十进制数转换为二进制数

       AGAIN:        MOV      DX, 10                         ； ((0´10+a₄) ´10+…) ´10+a₀

              MUL     DX

                    AND     BYTE PTR [SI], 0FH

            ADD     AL, [SI]

                   ADC     AH, 0

                   INC       SI

                    LOOP     AGAIN

                     MOV     AH, 4CH

                 INT       21H

       CODE  ENDS

                 END     START

    本程序功能：从键盘接收一个无符号十进制整数（小于65535），将其转换为二进制数，转换结果存在AX寄存器中。

（2）累加结果为一个16位的二进制数，为了显示结果，必需把它们转换为十进制数。将二进制数转换为十进制数的程序清单如下：

DATA     SEGMENT

          OBUF     DB 6  DUP(?)

DATA    ENDS

       CODE  SEGMENT

          ASSUME CS: CODE, DS: DATA

       START:   MOV      AX, DATA

          MOV     DS, AX

                     MOV     BX, OFFSET OBUF+5

                     MOV     BYTE PTR [BX],'$'

                     MOV     CX, 10           ；做（DX）：（AX）/10运算

       LOOP1:  MOV      DX, 0            ；被除数高16位清0

             DIV      CX

                     ADD     DL, 30H         ；将DL中的一位十进制数转换为ASCII码

                     DEC      BX

                  MOV     [BX], DL

                     OR       AX, AX

                     JNZ       LOOP1         

；判断商是否为0，不为0继续

                     MOV     DX, BX

                     MOV     AH, 09H

        INT       21H              

；显示转换得到的十进制数

                     MOV     AH, 4CH

          INT       21H

       CODE  ENDS

          END       START

本程序功能：将存储在AX寄存器中的二进制数转换为十进制数并显示。

2、  流程图及程序

（1）流程图

（2）实验代码：

DATA    SEGMENT

                        INF1  DB "Please input a number (0-65535):$"

                     IBUF      DB 7,0,6 DUP(?)

OBUF  DB 6 DUP (?)

       DATA     ENDS

CODE  SEGMENT

          ASSUME CS: CODE, DS: DATA

       START:MOV AX,DATA

      MOV DS,AX

      MOV DX,OFFSET INF1

      MOV AH,09H

      INT 21H

      MOV DX,OFFSET IBUF

      MOV AH,0AH

      INT 21H

      MOV CL,IBUF+1

      MOV CH,0

      MOV SI,OFFSET IBUF+2

      MOV AX,0

AGAIN:MOV DX,10

      MUL DX

      AND BYTE PTR[SI],0FH

      ADD AL,[SI]

      ADC AH,0

      INC SI

      LOOP AGAIN

      MOV CX,AX

      MOV AX,0

      MOV BX,1

LOOP2:ADD AX,BX

      INC BX

      LOOP LOOP2

      MOV BX,OFFSET OBUF+5

      MOV BYTE PTR[BX],'$'

      MOV CX,0AH

LOOP1:MOV DX,0

      DIV CX

      ADD DL,30H

      DEC BX

      MOV [BX],DL

      OR AX,AX

      JNZ LOOP1

      MOV DL,0AH

      MOV AH,02H

      INT 21H

      MOV DX,BX

      MOV AH,09H

      INT 21H

      MOV AH,4CH

      INT 21H

CODE ENDS

     END START

（3）实验结果：

2.4.4  实验习题

1、    从自然数1开始累加，直到累加和大于60000为止，显示累加的自然数的个数和累加和。显示格式为：1+2+…+n=sum

其中n为累加个数，sum为累加和。

（1）       实验代码：

DATA SEGMENT

OBUF       DB  6 DUP(?)

EU           DB '+','$'

EB            DB  0DH,'=',0DH,'$'

DATA ENDS

DISPLAY MACRO STRING

                MOV DX,OFFSET STRING

                MOV AH,09H

                INT 21H

 ENDM

CODE SEGMENT

         MAIN PROC FAR

  ASSUME CS:CODE,DS:DATA

         START:   MOV AX,DATA

                MOV DS,AX

                MOV AX,1

                MOV CX,0

  LOOP1: 

         ADC CX,AX

         CMP AX,1

         JE ALL

         PUSH AX

         DISPLAY EU

         POP AX

  ALL:CALL EXCHANGE

         INC AX

         CMP CX,60000

         JC LOOP1            

         PUSH AX

         PUSH CX            

         DISPLAY EB

         MOV AX,CX

         CALL EXCHANGE

         POP CX

         POP AX 

         MOV AH,4CH

         INT 21H

         RET

         MAIN ENDP

EXCHANGE PROC NEAR

         PUSH AX

         PUSH BX

         PUSH CX

         MOV BX,OFFSET OBUF+5

         MOV BYTE PTR [BX],'$'

         MOV CX,10

  LOOP2:MOV DX,0

         DIV CX

         ADD DL,30H

         DEC BX

         MOV [BX],DL

         OR AX,AX

         JNZ LOOP2                

         MOV DX,BX

         MOV AH,09H

         INT 21H              

         POP CX

         POP BX

         POP AX

         RET

  EXCHANGE ENDP

CODE ENDS

  END START

（2）实验结果：

2.4.5  实验总结

通过本次实验，我掌握了汇编循环程序的设计方法，加深了循环程序的结构、循环控制方法的知识。实验中遇到了一些问题，例如：输入源代码时，一定要按照语句格式与语法来写，并且少了空格会导致编译错误；一个完整的汇编程序只能返回一次DOS等，返回DOS语句后面的汇编程序不会执行等。

 

第二篇：实验二 分支与循环程序设计实验