微机原理与接口技术
CMP AX,[SI] JBE NOCHG1 XCHG AX,[SI] NOCHG1:
CMP DX,[SI] JAE NOCHG2 XCHG DX,[SI] NOCHG2:
ADD SI,2 LOOP L1
如果BUF中存放的是有符号数，则只需要将程序中的两行内容修改：
JBE NOCHG1 JAE NOCHG2
14. 设BUFFER中存放有N个无符号（第1个字节存放缓冲区的长度），编程实现将其中的
0元素抹去，并更新其长度。
解：设BUFFER中存放的是字节型数据。采用双指针方法：SI为读指针，DI为写指针，从低地址开始，内存中读出一个字节，如果不为0，则写入内存；如果为0，则不进行写操作。
LEA SI, BUFFER XOR CX,CX MOV CL, [SI] INC SI MOV DI, SI XOR BH,BH XOR AL,AL L1:
CMP [SI],AL
改成：JLE NOCHG1 改成：JGE NOCHG2
－ 30 －
微机原理与接口技术
JZ L2 MOV BL,[SI] MOV [DI],BL INC DI INC BH L2:
INC SI LOOP L1
MOV BUFFER,BH
16. 编写一个子程序实现统计AL中1的个数，然后检测出字节型缓冲区BUF中0和1个
数相等的元素个数。
解：统计AL中1的个数，只需将AL右移，移出的一位内容进行累加，子程序为： COUNTBYTE PROC NEAR PUSH AX PUSH CX MOV CX,8 XOR BL,BL
COU1:
SHR AL,1 ADC BL,0 LOOP COU1 POP CX POP AX RET COUNTBYTE ENDP
在此基础上，可以检测出字节型缓冲区BUF中0和1个数相等的元素个数，即一个字
节中有4个1。设BUF中有N个字节型数据，结果保持在BH中。
－ 31 －
微机原理与接口技术
MOV CX,N LEA SI, BUF XOR BH,BH L1: MOV AL,[SI]
CALL COUNTBYTE CMP BL,4 JNZ L2 INC BH L2: INC SI
LOOP L1
19. 在缓冲区BUFFER中，第1个字节存放数组的长度（<256），从第2个字节开始存放字
符的ASCII码，编写子程序完成在最高位给字符加上偶校验。 解：STACK SEGMENT STACK 'STACK' DW 100H DUP（?） TOP LABEL BYTE
STACK ENDS
DATA SEGMENT BUFFER DB 3 DB 'ABC'
DATA ENDS CODE SEGMENT
ASSUME CS:CODE,DS:DATA,ES:DATA,SS:STACK
START:
MOV AX,STACK MOV SS,AX LEA SP,TOP
;首字节为字符串长度 ;字符串
－ 32 －
微机原理与接口技术
MOV AX,DATA MOV DS,AX MOV ES,AX LEA DI,BUFFER XOR CX,CX MOV CL,[DI] INC DI
CALL SETEVEN MOV AH,4CH MOV AL,0 INT 21H SETEVEN PROC NEAR PUSH AX PUSH BX PUSH CX PUSH DI SETEVEN1:
MOV AL,[DI] CALL COUNTBYTE AND BL,01H JZ SETEVEN2 OR AL,80H MOV [DI],AL SETEVEN2: INC DI
LOOP SETEVEN1 POP DI POP CX
;加偶校验子程序
;返回DOS
－ 33 －
微机原理与接口技术
POP BX POP AX RET SETEVEN ENDP COUNTBYTE
PROC NEAR
PUSH AX PUSH CX MOV CX,8 XOR BL,BL
COU1:
SHR AL,1 ADC BL,0 LOOP COU1 POP CX POP AX RET COUNTBYTE ENDP
CODE ENDS END START
20. 编写程序完成求多位数（N个字）的绝对值。
21. 已知斐波那契数列的定义为：F1?1,F2?1,Fi?Fi?1?Fi?2数列前n项的子程序。
解：设奖斐波那契数列存放在字变量RESULT中。在数据段中定义 RESULT DW 100H DUP（?）
在代码段中编写子程序 FIBONACCI
PROC NEAR
XOR DI,DI
－ 34 －
(i?3)，编写求该