二循环与子程序程序设计

实验二循环与子程序程序设计一、实验目的1)加深对循环结构的理解。2）掌握循环程序的设计方法。3）学习子程序的定义和调用方法。4）掌握子程序、子程序的嵌套、递归子程序的结构。5)掌握子程序设计、编制及调试。 6)熟练掌握DEBUG的常用命令，学会用DEBUG调试程序。二、实验内容1)编制程序计算S=1+2·3+3·4+4·5+……+N（N+1）+……直到N（N+1）大于200为止，并将结果由屏幕上显示出来。DATASEGMENTADB'S=1+2x3+3x4+4x5+...+N(N+1)+....=','$'BDB4DUP(0),'$'DATAENDSSTACKSEGMENTPARASTACKDW40HDUP(0)STACKENDSCODESEGMENTASSUMECS:CODE,DS:DATASTART:MOVAX,DATAMOVDS,AXMOVDX,OFFSETAMOVAH,09HINT21HMOVDX,1MOVBL,2NEXT:MOVAL,BLINCBLMULBLADDDX,AXCMPAX,200JNANEXTCALLCHGASCMOVAH,4CHINT21HCHGASCPROCMOVCX,0004HMOVDI,OFFSETBMOVAX,DXL6:PUSHCXMOVCL,04HROLAX,CLMOVDX,AXPOPCXANDAX,000FHCMPAL,0AHJBL7ADDAL,07HL7:ADDAL,30HMOV[DI],ALMOVAX,DXINCDILOOPL6MOVDX,OFFSETBMOVAH,09HINT21HRETCHGASCENDPCODEENDSENDSTART结果：S=1+2×3+3×4+4×5+…+N（N+1）+…=045F3）编制在屏幕上显示九九乘法表的程序。DATASEGMENTSDB01HADB01HDATAENDSSTACK1SEGMENTPARASTACKDW40HDUP(0)STACK1ENDSCODESEGMENTASSUMECS:CODE,DS:DATA,SS:STACK1START:MOVAX,DATAMOVDS,AXMOVAL,0AHMOVCX,09HLOP1:PUSHCXPUSHAXSUBAL,CLMOVBL,ALINCBLMOVCL,ALLOP2:PUSHCXPUSHBXPUSHAXMOVA,ALMOVDL,ALADDDL,30HMOVAH,02HINT21HSUBBL,CLMOVAL,AMULBLMOVS,ALMOVDL,2AHMOVAH,02HINT21HADDBL,30HMOVDL,BLMOVAH,02HINT21HMOVDL,3DHMOVAH,02HINT21HMOVAL,SMOVCL,04HROLAL,CLANDAL,0FHCMPAL,09HJLENEXT1ADDAL,07HNEXT1:ADDAL,30HMOVDL,ALMOVAH,02HINT21HMOVAL,SANDAL,0FHCMPAL,09HJLENEXT2ADDAL,07HNEXT2:ADDAL,30HMOVDL,ALMOVAH,02HINT21HMOVDL,20HMOVAH,02HINT21HPOPAXPOPBXPOPCXLOOPLOP2MOVDL,0AHMOVAH,02HINT21HMOVDL,0DHMOVAH,02HINT21HPOPAXPOPCXLOOPLOP1MOVAH,4CHINT21HCODEENDSENDSTART5）设有五个字数据存放在以BUF为首地址的内存单元中，要求采用调用多个字数据相加的子程序方法编程，和的低位字放在RESULT单元，和的高位字放在RESULT+2单元，并将结果显示在屏幕上。STACKSEGMENTSTACKDB1024DUP(0)STACKENDSDATASEGMENTBUFDW0F101H,110DH,52H,100H,456HCOUNT=($-BUF)/2RESULTDW4DUP(?),'$'DATAENDSCODESEGMENTASSUMECS:CODE,DS:DATA,SS:STACKWDADDPROCPUSHDIMOVAX,0MOVDX,0MOVDI,OFFSETBUFNEXT2:ADDAX,[DI]JNCNEXT1INCDXNEXT1:ADDDI,2LOOPNEXT2POPDIRETWDADDENDPSHOWPROCPUSHCXPUSHDIMOVCX,04HMOVDI,OFFSETRESULTMOVBX,AXADDDI,07HBBB:MOVAX,BXANDAX,000FHCMPAL,0AHJBQQQADDAL,07HQQQ:ADDAL,30HMOV[DI],ALDECDIPUSHCXMOVCL,04SHRBX,CLPOPCXLOOPBBBMOVCX,0004HCCC:MOVAX,DXANDAX,000FHCMPAL,0AHJBDDDADDAL,07HDDD:ADDAL,30HMOV[DI],ALDECDIPUSHCXMOVCL,04HSHRDX,CLPOPCXLOOPCCCPOPDIPOPCXRETSHOWENDPBEGIN:MOVAX,DATAMOVDS,AXMOVCX,COUNTCALLWDADDCALLSHOWMOVDX,OFFSETRESULTMOVAH,09HINT21HMOVAH,4CHINT21HCODEENDSENDBEGIN结果：000107B66）编写一个递归子程序，计算指数函数Xn的值，其中X，n从键盘输入。DATA SEGMENT ADW ?BDB0AH,?,?,?,?,'$'CDB0AH,'$'DDB'SHURUX',20H,'$'EDB'SHURUN',20H,'$'DATA ENDSSTACK SEGMENT STACK DW 40H DUP(?)STACK ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACKSTART: MOV AX,DATA MOV DS,AXMOVDX,OFFSETDMOVAH,09HINT21HCALL STDIN MOV AH,0MOVDX,AXPUSHDXMOVDX,OFFSETCMOVAH,09HINT21HMOVDX,OFFSETEMOVAH,09HINT21HPOPDXCALL STDIN MOV AH,0MOVCX,AXCALL FACT MOV A,BXCALL XIANSHI MOV AH,4CH INT 21HSTDIN PROC MOV AH,1 INT 21H CMP AL,30H JL STDIN CMP AL,37H JG STDIN AND AL,0FH RETSTDIN ENDPFACT PROC CMP CX,0 JG NEXT MOV BX,1 RETNEXT: PUSH CX DEC CX CALL FACT POP CXMOVAX,DXPUSHDX MOV DX,0MUL BX MOV BX,AXPOPDX RETFACT ENDPXIANSHIPROCMOVCX,0004HMOVDI,OFFSETB+1MOVAX,AL6:PUSHCXMOVCL,04H