第4章 汇编语言程序设计
1.已知在BUF的起始处保存有N个字符的ASCII码，编写汇编语言程序实现，将这组字符串传送到缓冲区BUFR中，并且使字符串的顺序与原来的顺序相反。 解：BUF
BUFR
MOV CX, N LEA SI, BUF LEA DI, BUFR ADD DI,CX DEC DI L1: MOV AL,[SI] MOV [DI],AL INC SI DEC DI LOOP L1
2.利用移位、传送和相加指令实现AX的内容扩大10倍。
解：将扩大后的结果放在DX：AX中，注意到10×AX＝8×AX＋2×AX。 XOR SHL RCL DX,DX AX, 1 DX, 1 DB \"BONJOUR_BELLE\" DB 100 DUP(?) MOV BX,AX MOV SHL RCL SHL RCL CX,DX AX, 1 DX, 1 AX, 1 DX, 1 ADD ADC AX, BX DX, CX 3.在缓冲区VAR中连续存放着3个16位的无符号数，编写程序实现将其按递增关系排列；如果VAR中保存的为有符号数，则再编写程序实现将其按递减关系排列。 解：VAR DW 1236，-432，3900 XOR SI,,SI MOV AX,VAR[SI] CMP AX, VAR[SI+2] JAE L1 XCHG AX, VAR[SI+2] L1:
CMP AX, VAR[SI+4] JAE L2 XCHG AX, VAR[SI+4] L2: MOV VAR[SI], AX MOV AX,VAR[SI+2] CMP AX, VAR[SI+4] JAE L3 XCHG AX, VAR[SI+4] L3:
MOV VAR[SI+2], AX 4.编写程序段实现将AL和BL中的每一位依次交叉，得到的16位字保存在DX中，例如（AL）＝01100101B，（BL）＝11011010B，则得到的（DX）＝10110110 10011001B。 解：利用移位指令完成。
L1: SHR AL,1 RCR DX,1 XOR DX,DX MOV CX,8
SHR BL,1 RCR DX,1 LOOP L1 5.在变量VAR1和VAR2中分别保存有两个字节型的正整数，编写完整的汇编语言程序实现：
（1）当两数中有一个奇数时，将奇数存入VAR1，偶数存入VAR2；
（2）当两数均为奇数时，两个变量的内容不变； （3）当两数均为偶数时，两数缩小一倍后存入原处。
解：当VAR1为奇数时，不论VAR2的奇偶性，这两个单元的内容均不变；只有当VAR1为偶数时，如果VAR2为奇数，则VAR1与VAR2内容交换；如果VAR2为偶数，则两数缩小一倍后存入原处。 DATA SEGMENT
VAR1
DB 28
VAR2 DB 36 DATA ENDS CODE SEGMENT
ASSUME CS:CODE, DS:DATA, ES:DATA START: MOV AX, DATA MOV DS,AX MOV ES, AX MOV AL,VAR1 MOV BL,VAR2 TEST AL,1 JZ EVEN1 JMP OVER
EVEN1:
TEST BL,1
JZ
EVEN2
MOV VAR1,BL MOV JMP VAR2,AL OVER EVEN2:
SHR MOV SHR MOV AL,1 VAR1,AL BL,1 VAR2,BL
OVER:
MOV AH,4CH MOV AL,0 INT ENDS END START 21H CODE
6.已知在字变量VAR
1、VAR2和VAR3中保存有3个相同的代码，但有一个错码，编写程序段找出这个错码，并将它送到AX，其地址送SI；如果3个代码都相同，则在AX中置－1标志。 解：在数据段中定义：
VAR1 DW 5A34H VAR2 DW 5A35H VAR3 DW 3A34H
在代码段中编写程序段：
MOV AX,-1 MOV BX,VAR1 CMP BX,VAR2 JZ
L2 CMP BX,VAR3 JZ
L1 MOV AX,BX LEA SI,VAR1 JMP OVER L1: MOV AX,VAR2 LEA SI,VAR2 JMP OVER L2: CMP BX,VAR3 JZ
OVER MOV AX,VAR3 LEA SI,VAR3 OVER: 7.分析下列程序段的功能：
MOV CL，04 SHL DX，CL MOV BL，AH SHL AX，CL SHR BL，CL OR DL，BL 解：程序段完成DX:AX组成的32位无符号数左移4位，低位补零（也即除以16）。 8.下列程序段执行后，求BX寄存器的内容：
MOV CL，3 MOV BX，0B7H ROL BX，1 ROR BX，CL 解：实际上完成BX内容循环右移2位，因此，BX寄存器的内容为C02DH。 9.下列程序段执行后，求BX寄存器的内容：
MOV CL，5 MOV BX，7D5CH SHR BX，CL 解：完成BX内容逻辑右移5位，因此，BX寄存器的内容为03EAH。 10.将BUFFERS中N个字按相反顺序传递到BUFFERT中。 解：
LEA SI,BUFFERS LEA DI,BUFFERT MOV CX,N ADD DI,N ADD DI,N SUB DI,2 L1: MOV AX,[SI] MOV [DI],AX ADD SI,2 SUB DI,2 LOOP L1 11.数组ARRAY中存放有一组字型数据，前两个字节存放数据长度（5的倍数）。为给这个数组中的数据进行加密保护，每5个数据取出一个数据进行加密处理：奇数位进行取反，偶数位不变，例如对数据0110 1100 1011 0001B加密后变成1100 0110 0001 1011B，编写加密程序encrpytion 和解密程序 unencrpytion 。
解：约定从第一个数据开始，每5个数据为一组，每组中的第一个数据采取加密/解密处理。由于加密算法采用的是取反操作，解密算法也采用取反操作，因此解密和解密算法是同一个程序。
ENCRPYTION PROC NEAR LEA SI,ARRAY
XOR DX,DX
MOV AX,[SI]
MOV BX,5
DIV BX
MOV CX, AX
ADD SI, 2 L1:
MOV AX, [SI]
XOR AX,0AAAAH
MOV [SI], AX
ADD SI,10
LOOP L1
RET ENCRPYTION ENDP
13.设BUF中存放有N个无符号数（或有符号数），编程实现求它们的最小值（存入AX）和最大值（存入DX）。
解：BUF存放有N个无符号数的程序如下： MOV CX,N-1 LEA SI,BUF MOV AX,[SI] MOV DX,AX ADD SI,2 L1: 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
改成：JLE NOCHG1 改成：JGE 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 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中。
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个字节存放数组的长度（
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
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
;加偶校验子程序
;返回DOS ;首字节为字符串长度 ;字符串
AND BL,01H
JZ SETEVEN2
OR AL,80H
MOV [DI],AL SETEVEN2:
INC DI
LOOP SETEVEN1
POP DI
POP CX
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数列前n项的子程序。
1,F21,FiFi1Fi2(i3)，编写求该解：设奖斐波那契数列存放在字变量RESULT中。在数据段中定义
RESULT DW 100H DUP（?）
在代码段中编写子程序 FIBONACCI PROC NEAR
XOR DI,DI
MOV RESULT[DI],1
；前两个数为1
MOV RESULT[DI+2],1
ADD DI,4
MOV CX,N L1:
MOV AX, RESULT[DI-4]
ADD AX, RESULT[DI-2]
MOV RESULT[DI],AX
ADD DI,2
LOOP L1
RET FIBONACCI ENDP
22.编写程序实现循环显示10条信息，保存每条信息的变量分别为INFOM1～INFORM10。 解：在数据段中定义变量：
TABLE DW INFORM1, INFORM2, INFORM3, INFORM4, INFORM5
DW INFORM6, INFORM7, INFORM8, INFORM9, INFORM10 在代码段中编写程序段：
MOV XOR MOV MOV CX,10 SI,SI DX,TABLE[SI] AH,9 L1:
INT ADD CALL LOOP 21H SI,2 WAIT L1 这里，WAIT为延时子程序，用于在显示信息之间的停顿。
23.编写程序实现将包含20个数据的数组ARRAY分成两个数组：正数数组ARRAYP和负数数组ARRAYN，并分别将这两个数组中数据的个数显示出来。
解：先编写一个子程序DISPALD，完成以3位十进制数形式显示出AL的内容。
DISPALD PROC NEAR PUSH AX PUSH CX PUSH DX XOR AH,AH MOV CL，100 DIV CL PUSH AX MOV DL,30H ADD DL,AL MOV AH,2 INT 21H POP AX MOV AL,AH XOR AH,AH MOV CL,10 DIV CL PUSH AX MOV DL,30H ADD DL,AL MOV AH,2 INT 21H POP AX MOV DL,30H ADD DL,AH MOV AH,2 INT 21H POP DX POP CX POP AX RET DISPALD ENDP
在此基础上，根据题目要求，需要用到3个指针：SI指向源数组ARRAY，DI指向正数数组ARRAYP，BX指向负数数组ARRAYN。
MOV XOR LEA LEA LEA MOV AND JS MOV INC INC JMP MOV INC INC INC CX,20 DX,DX SI,ARRAY DI,ARRAYP BX,ARRAYN AL,[SI] AL,AL L2 [DI],AL DI DL L3 [BX],AL BX DH SI L1:
L2:
L3:
LOOP MOV CALL MOV CALL L1 AL,DL DISPALD AL,DH DISPALD 24.编写程序实现求缓冲区BUFFER的100个字中的最小偶数（存入AX）。 解：设BUFFER中存放的是有符号数。
L1:
L2: MOV CX,100 LEA SI,BUFFER MOV AX, 7FFFH AND WORD PTR [SI],1 JNZ L2 CMP [SI],AX JGE L2 MOV AX,[SI] ADD SI,2 LOOP L1
225.编写程序实现求级数1解：BL用于存放项数。
22n2的前n项和刚大于2000的项数n。
STACK SEGMENT STACK \'STACK\'
DW 100H DUP（?） TOP LABEL WORD STACK ENDS DATA SEGMENT
DB 100H DUP（?） DATA ENDS CODE SEGMENT
ASSUME CS:CODE, DS:DATA, ES:DATA, SS:STACK START:
MOV AX,DATA
MOV DS,AX
MOV ES,AX
MOV AX,STACK
MOV SS,AX
LEA SP,TOP
MOV BL,1
MOV CX,0 COUNT:
MOV AL, BL
MUL BL
ADD CX,AX
CMP CX,2000
JA EXIT
INC BL
JMP COUNT EXIT:
26.定义一条宏指令，实现将指定数据段的段地址传送到段寄存器ES或DS的功能。 解：
27.定义一条宏指令，实现从键盘中输入一个字符串（利用INT 21H的09号功能）。 28.定义一条宏指令，实现在屏幕上输出回车、换行。 29.利用其它指令完成与下列指令一样的功能：
（1）REP MOVSB；
（3）REP STOSB；
解：设DF=0 （1）
L1: MOV AL,[SI]
MOV ES:[DI],AL INC INC SI DI
（2）REP LODSB； （4）REP SCASB。
LOOP L1 （2）
L1: MOV AL,[SI] INC SI LOOP L1 （3）
L1: MOV ES:[DI],AL
INC DI LOOP L1 （4）
L1: MOV AL,[SI]
CMP AL,ES:[DI] INC INC SI DI LOOP L1 30.设在数据段中定义了：
STR1 DB ‘ASSEMBLE LANGUAGE’ STR2 DB 20 DUP(?) 利用字符串指令编写程序段实现：
（1）从左到右将STR1中的字符串传送到STR2； （2）从右到左将STR1中的字符串传送到STR2； （3）将STR1中的第6个和第7个字节装入DX；
（4）扫描STR1字符串中有无空格，如有则将第一个空格符的地址传送到SI。 解： STR1中有17个字符（含一个空格），设DS和ES均指向STR1和STR2所在的段。 （1）
CLD MOV LEA LEA REP MOV LEA LEA CX,17 SI,STR1 DI,STR2 MOVSB CX,17 SI,STR1 DI,STR2 （2）
ADD DEC MOV MOV DEC INC LOOP LEA MOV MOV LEA MOV CMP JZ INC LOOP SI,CX SI AL,[SI] [DI],AL SI DI L1 SI,STR1 DX,[SI+6] CX,17 SI,STR1 AL,20H [SI], AL L2 SI L1 L1:
（3）
（4）
L1:
L2:
31.设在数据段中定义了：
STRING DB ‘Today is Sunday & July 16, 2000’
编写程序实现将STRING中的’&’用’/’代替。 解：STRING中保存了30个字符。
MOV LEA MOV CMP JNZ MOV INC LOOP CX,30 SI,STRING AL,’&’ [SI],AL L2 BYTE PTR [SI],’/’ SI L1 L1:
L2:
32.分析下列程序段完成的功能：
MOV CX，100 LEA SI，FIRST LEA DI，SECOND REP MOVSB 解：将缓冲区FIRST中100个字节传送到SECOND中。 33.分析下列程序段：
LEA DI，STRING MOV CX，200 CLD MOV AL，20H REPZ SCASB JNZ FOUND JMP NOT_FOUND 问：转移到FOUND的条件。
解：在缓冲区STRING中搜索非空格字符，如果有非空格则转到FOUND，如果200个单元中都是空格，则转到NOT_FOUND。
34.设在数据段的变量OLDS和NEWS中保存有5个字节的字符串，如果OLDS字符串不同于NEWS字符串，则执行NEW_LESS，否则顺序执行程序。 解：设DS和ES均指向字符串OLDS和NEWS所在的段。 CLD MOV
35.编程实现将STRING字符串中的小写字母变换成大写字母。 解：设STRING中的字符个数为N。
LEA LEA REPZ JNZ CX,5 SI,OLDS DI,NEWS CMPSB NEW_LESS
MOV LEA MOV AND INC CX,N SI,STRING AL,5FH [SI],AL SI L1:
LOOP L1 36.设在数据段中定义了：
STUDENT_NAME DB 30 DUP（？） STUDENT_ADDR DB 9 DUP（？） STUDENT_PRINT DB 50 DUP（？） 编写程序实现：
用空格符清除缓冲区STUDENT_PRINT； 在STUDENT_ADDR中查找第一个’_’字符； 在STUDENT_ADDR中查找最后一个’_’字符；
如果STUDENT_NAME中全为空格符，则STUDENT_PRINT全存入’*’；
将STUDENT_NAME传送到STUDENT_PRINT的前30个字节中，将STUDENT_ADDR传送到STUDENT_PRINT的后9个字节中。
37.(上机题)编写程序实现，将缓冲区BUFFER中的100个字按递增排序，并按下列格式顺序显示：
数据1 数据2 „„
38.(上机题)按同余法产生一组随机数N（1
Total A:
B:
C:
D:
E:
F:
39．(上机题)编写程序实现下列5项功能，通过从键盘输入1～5进行菜单式选择：
（1）按数字键“1”，完成将字符串中的小写字母变换成大写字母。用户输入由英文大小写字母或数字0～9组成的字符串（以回车结束），变换后按下列格式在屏幕上显示：
例如：abcdgyt0092
ABCDGYT0092 按任一键重做；按Esc键返回主菜单。
（2）按数字键“2”，完成在字符串中找最大值。用户输入由英文大小写字母或数字
0～9组成的字符串（以回车结束），找出最大值后按下列格式在屏幕上显示：
The maximum is ．
按任一键重做；按Esc键返回主菜单。
（3）按数字键“3”，完成输入数据组的排序。用户输入一组十进制数值（小于255），
然后变换成十六进制数，并按递增方式进行排序，按下列格式在屏幕上显示：
按任一键重做；按Esc键返回主菜单。
（4）按数字键“4”，完成时间的显示。首先提示用户对时，即改变系统的定时器
HH：MM：SS（以冒号间隔，回车结束），然后在屏幕的右上角实时显示出时
间：HH：MM：SS。
按任一键重新对时；按Esc键返回主菜单。
（5）按数字键“5”，结束程序的运行，返回操作系统。 解：
※主程序的编程思路： 此程序共5个功能，可采用跳转表法来实现多路分支结构程序设计。现将这5个程序段，各程序段的首地址分别标号为G1，G2，G3，G4，G5。将5个程序段的入口地址做成表TABLE放入数据段，程序根据给定的参数计算出欲转入的程序段的首地址在TABLE中的位置后，取出该地址，跳转至该程序段。
首先，通过调用子程序MENU，设置显示器，并输出提示文档。接着，读取‘1’-‘5’之间的ASCII表示数。然后，通过跳转表TABLE实现由输入参数转入相应的程序段。由于表中按“字”存放数据，则每个数据的位移量是：0、
2、
4、
6、8。对于输入参数N，计算位移量的公式是N=(N-1)*2。
当输入‘1’时，跳转到标号G1。调用子程序CHGLTR，完成将输入字符串中的小写字母变换成大写字母。用户按键，若为ESC，则转到主程序段首调用MENU，否则，转到标号G1；
当输入‘2’时，跳转到标号G2。调用子程序MAXLTR，完成在输入字符串中找最大值。用户按键，若为ESC，则转到主程序段首调用MENU，否则，转到标号G2；
当输入‘3’时，跳转到标号G3。调用子程序SORTNUM，完成输入数据组的排序。用户按键，若为ESC，则转到主程序段首调用MENU，否则，转到标号G3。
当输入‘4’时，跳转到标号G4。调用子程序TIMCHK，完成时间的显示。用户按键，若为ESC，则转到主程序段首调用MENU，否则，转到标号G4。
当输入‘5’时，跳转到标号G5。结束程序的运行，返回操作系统。 其流程框图见图3-1。
