微机原理部分编程题目.

1、微机原理部分编程1求1加到 100 的和,并显示出来CODE SEGMENTMOV AX,0MOV BX,1MOV CX,100P1:ADD AX,BXINC BXDEC CXJNZ P1MOV CX,AXMOV 1000H,AXMOV CL,4CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,3AHJS SZ1ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HJMP L1SZ1: ADD DL,3AH ; 显示数字MOV AH,2INT 21HL1: CALL YWMOV DL,1500HADD DL,30H ; 判断

2、是不是数字SUB DL,3AHJS SZ2ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HJMP L2SZ2: ADD DL,3AH ; 显示数字MOV AH,2INT 21HL2: CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,3AHJS SZ3ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HJMP L3SZ3: ADD DL,3AH ; 显示数字MOV AH,2INT 21HL3: CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,3A

3、HJS SZ4ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HHLTSZ4: ADD DL,3AH ; 显示数字MOV AH,2INT 21HHLTYW PROC NEAR ;移位函数 MOV AX,DS:1000HROL AX,CLMOV 1000H,AXAND AX,000FHMOV 1500H,ALRETYW ENDPCODE ENDS2 比较字符串是不是一致DA TA SEGMENTSTR1 DB 'ABCDE$'STR2 DB 'ABCDE$'M1 DB 'MATCH$'M2 DB 'NOMAT

4、CH$'DA TA ENDSCODE SEGMENTLEA SI,STR1LEA DI,STR2MOV CX,5CLDREPE CMPSBJNZ NOLEA DX,M1MOV AH,9INT 21HHLTNO: LEA DX,M2MOV AH,9INT 21HHLTCODE ENDS3显示四位数字CODE SEGMENTASSUME CS:CODE,DS:DATA org 100hSTART:MOV AX,01111H ; 给 AX 送初值MOV 1000H,AXMOV CL, 4 ; 循环次数CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,

5、3AHJS SZ1ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HJMP L1SZ1: ADD DL,3AH ; 显示数字MOV AH,2INT 21HL1: CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,3AHJS SZ2ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HJMP L2SZ2: ADD DL,3AH ; 显示数字MOV AH,2INT 21HL2: CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,3AHJS SZ3ADD D

6、L,41H ; 是字母 ,则 ·MOV AH,2INT 21HJMP L3SZ3: ADD DL,3AH ; 显示数字MOV AH,2INT 21HL3: CALL YWMOV DL,1500HADD DL,30H ; 判断是不是数字SUB DL,3AHJS SZ4ADD DL,41H ; 是字母 ,则 ·MOV AH,2INT 21HHLTSZ4: ADD DL,3AH ; 显示数字MOV AH,2INT 21HHLTYW PROC NEAR ; 移位函数MOV AX,DS:1000HROL AX,CLMOV 1000H,AXAND AX,000FHMOV 1500H,A

7、LRETYW ENDPCODE ENDSENDS START4 显示四位数字 ( 方法 2CODE SEGMENTASSUME CS:CODE,DS:DATAorg 100hSTART:MOV AX,0ABCDHMOV CL, 4ROL AX,CLMOV 1000H,AXAND AX,000FHMOV 1500H,ALMOV DL,1500HMOV AX,DS:1000HROL AX,CLMOV 1000H,AXAND AX,000FHMOV 1600H,ALMOV AX,DS:1000HROL AX,CLMOV 1000H,AXAND AX,000FHMOV 1500H,ALMOV BL,1

8、500HMOV AX,DS:1000HROL AX,CLAND AX,000FHMOV CL,1600HCODE ENDSENDS START5 显示四位数 ( 方法 3CODE SEGMENTASSUME CS:CODE,DS:DATAorg 100hSTART:MOV AX,0ABCDH ; 给 AX 送初值MOV 1000H,AXMOV CL, 4 ; 循环次数CALL YWMOV DL,1500H ; 最高位到 DLCALL YWMOV BL,1500HMOV 1600H,BL ; 第二位先暂存 1600HCALL YWMOV BL,1500H ; 第三位送到 BLCALL YWMOV

9、 AL,1500H ; 第四位送到 ALMOV CL,1600H ; 第二位送回 CLHLTYW PROC NEAR ; 移位函数MOV AX,DS:1000HROL AX,CLMOV 1000H,AXAND AX,000FHMOV 1500H,ALRETYW ENDPCODE ENDSENDS START6 输入字符串比较是不是一致DA TA SEGMENTSTRING1 DB 5 ; 字符串 1DB ?DB 5 DUP(?STRING2 DB 5 ; 字符串 2DB ?DB 5 DUP(?MESG1 DB 'MATCH$' ; 提示信息MESG2 DB 'NOMA

10、TCH$'DA TA ENDSCODE SEGMENTASSUME CS:CODE,DS:DA TAMOV DX,OFFSET STRING1 ; 输入字符串 1 MOV AH,10INT 21HMOV DX,OFFSET STRING2 ; 输入字符串 2 MOV AH,10INT 21HLEA SI,STRING1 ; 比较字符串LEA DI,STRING2MOV CX,5CLDREPE CMPSBJZ YES ;比较后跳转JMP NOHLTYES:MOV DX,OFFSET MESG1 ; 相同MOV AH,9INT 21HHLTNO: MOV DX,OFFSET MESG2 ;

11、 不同MOV AH,9INT 21HHLTCODE ENDS7 第五章 12 题MOV AH,8 ; 输入数字INT 21HMOV CL,AL ; 设置显示次数SUB CL,48JZ CC ;判断为零CF:MOV DL,AL ; 调用显示MOV AH,2INT 21HDEC CLJNZ CFHLTCC:HLTDA TA SEGMENTMM DW 1,-1,2,2,3,3,4,-4,5,-5,6,-6,7,-7,8,-8,9,-9,10,-10 PP DW ?,?,?,?,?,?,?,?,?,? NN DW ?,?,?,?,?,?,?,?,?,?X DB 0Y DB 0DA TA ENDSCOD

12、E SEGMENTASSUME DS:DA TA,CS:CODEMOV BX,OFFSET MM ; 取地址LEA SI,PPLEA DI,NNMOV CL,20MOV 1000H,0 ; 设置统计MOV 1001H,0BJ: SUB BX,0JS NOMOV DX,BX ; 是正数MOV SI,DXADD BX,2ADD SI,2INC 1000HDEC CLJNZ BJ ;跳转NO: MOV DX,BX ; 是负数MOV DI,DXADD BX,2ADD DI,2INC 1001H ; 个数加 1DEC CLJNZ BJ ;跳转MOV AL,1000H ; 显示部分ADD AL,30H ; 判断是不是数字SUB AL,3AHJS SZADD AL,