微机原理课后习题及答案

R3, R4,标志位Cy，F0

;出口参数：排序后数据仍放在30H开始的15个内部数据存储器单元中

PAIXU2: PUSH ACC ;保护现场 PUSH PSW MOV PSW, #10H ;设定2区寄存器区，同时0→F0 MOV R3, #14 ;暂存比较次数→R3 CLR F0 ;进入循环前，清除交换标志F0 NEXT: MOV R0, #30H ;首地址→R0 MOV R2, 13H ;当前比较次数(R3)→R2 LOOP: MOV A,@R0 ;取出前一个数 MOV R4, A ;前数送R4暂存 INC R0 ;R0指向下个数 MOV B, @R0 XRL A, B JB ACC.7, YH ; 如果前后数异号，转加法 TH: MOV A, R4 ; 如果前后数同号，则执行减法，将前数重新放入ACC CLR C ; SUBB A, B ;前数－后数 JZ NEXCH ; 差为0，即前绝对值=后绝对值，不交换 XRL A, B ;差值和减数异或，判断是否同号 JB ACC.7, NEXCH ;如果差值和减数异号，则前绝对值<后绝对值，不交换 SJMP EXCH ;如果同号(即上句不成立)，则转前后交换 YH: MOV A, R4 ;前后数异号，执行加法，将前数重新放入ACC ADD A, B ; 前数+后数 JZ NEXCH ; 和为0，即前绝对值=后绝对值，不交换 XRL A, B ; 和与加数异或，判断是否同号 JNB ACC.7, NEXCH ;如果和与加数同号，则前绝对值<后绝对值，不交换 EXCH: SETB F0 ;前>后，交换位置，置标志F0 MOV A, @R0 ;后数→ACC DEC R0 ;R0指向前单元 XCH A, @R0 ;后数→前单元，前数→ACC INC R0 ;R0恢复指向后单元 MOV @R0, A ;前数→后单元 NEXCH: DJNZ R2, LOOP ;判断一次冒泡是否完成 DEC R3 ;修改每次冒泡中的比较次数 JBC F0, NEXT ;判断冒泡中有无交换，清除F0 POP PSW ;若上次冒泡中无交换，则排序完成 POP ACC RET 4-18 编制一子程序，将内部数据存储器30H～39H单元的数据连起来 41

向左移动一位，39H最低位添0。 ;10个单元数据块左移一位子程序

;入口参数：子程序名MBRL1，数据块位于30H～39H单元，影响ACC，3区寄存器R0，标志位Cy

;出口参数：移位后数据仍位于30H～39H单元中 MBRL1: 位

MOV R0, #39H ;数据块尾地址送R0

;单元数据送ACC

PUSH PSW

;保护PSW内容 ;保护ACC内容

PUSH ACC

MOV PSW, #18H ;设置3区为当前工作寄存器区，同时清除Cy

LOOP: MOV A, @R0 RLC DEC

A

;带进位左移

;R0指向前一个单元

R0

CJNE R0, #2FH ,LOOP ;判断R0是否已指向2FH（即30H已

移位完成）

方法2：将上述子程序修改一下，可以适用m个单元左移n位的功能。 ;m个单元数据块左移n位子程序

42

POP POP RET END

ACC ;恢复ACC

PSW

;恢复PSW ;返回

;入口参数：子程序名MBRLN，数据块起始地址在R0中，数据块长度m放在R6中，移位数n放在R7中 ;影响ACC，寄存器B，标志位Cy

;出口参数：移位后R0指向数据块起始地址 MBRLN: PUSH PSW

PUSH ACC PUSH B

;保护PSW内容 ;保护ACC内容

;保护B内容

;数据块长度m暂存入寄存器B ;数据块长度m重新赋值给R6

MOV B, R6

NEXT: MOV R6, B

MOV A, R0 ADD A, R6 DEC

A

;数据块首地址＋m－1＝数据块尾地址→

ACC

MOV R0, A CLR

C

;R0指向数据块尾地址 ;清除Cy位

LOOP: MOV A, @R0 RLC DEC

A R0

DJNZ R6 , LOOP ;内层循环完成m个单元左移一位 INC

R0

;使R0指向数据块首地址

DJNZ R7, NEXT ;外层循环完成n次移一位，即移动n位 POP

B ;恢复现场

43

POP

ACC PSW ;返回

POP RET END

44