IBM-PC汇编语言程序设计答案

49703100.doc - 0 - 作者：User

第 一 章. 习 题

1.1 用降幂法和除法将下列十进制数转换为二进制数和十六进制数：

(1) 369 (2) 10000 (3) 4095 答：(1) 369=1 0111 0001B=171H

(2) 10000=10 0111 0001 0000B=2710H (3) 4095=1111 1111 1111B=FFFH

(4) 32767=111 1111 1111 1111B=7FFFH

(4) 32767

1.2 将下列二进制数转换为十六进制数和十进制数：

(1) 10 1101 (2) 1000 0000 (3) 1111 1111 1111 1111 (4) 1111 1111 答：(1) 10 1101B=2DH=45

(2) 1000 0000B=80H=128

(3) 1111 1111 1111 1111B=FFFFH=65535 (4) 1111 1111B=FFH=255 1.3 将下列十六进制数转换为二进制数和十进制数：

(1) FA (2) 5B (3) FFFE 答：(1) FAH=1111 1010B=250

(2) 5BH=101 1011B=91

(3) FFFEH=1111 1111 1111 1110B=65534 (4) 1234H=1 0010 0011 0100B=4660

(4) 1234

1.4 完成下列十六进制数的运算，并转换为十进制数进行校核：

(1) 3A+B7 (2) 1234+AF (3) ABCD-FE 答：(1) 3A+B7H=F1H=241

(2) 1234+AFH=12E3H=4835 (3) ABCD-FEH=AACFH=43727 (4) 7AB×6FH=35325H=217893

(4) 7AB×6F

1.5 下列各数均为十进制数，请用8位二进制补码计算下列各题，并用十六进制数表示其运算结果。 (1) (-85)+76 (2) 85+(-76) (3) 85-76 (4) 85-(-76) (5) (-85)-76 (6) -85-(-76) 答：(1) (-85)+76=1010 1011B+0100 1100B=1111 0111B=0F7H；CF=0；OF=0

(2) 85+(-76)=0101 0101B+1011 0100B=0000 1001B=09H；CF=1；OF=0

(3) 85-76=0101 0101B-0100 1100B=0101 0101B+1011 0100B=0000 1001B=09H；CF=0；OF=0 (4) 85-(-76)=0101 0101B-1011 0100B=0101 0101B+0100 1100B=10100001B=0A1H；CF=0；OF=1 (5) (-85)-76=1010 1011B-0100 1100B=1010 1011B+1011 0100B=0101 1111B=5FH；CF=0；OF=1 (6) -85-(-76)=1010 1011B-1011 0100B=1010 1011B+0100 1100B=11110111B=0F7H；CF=0；OF=0 1.6 下列各数为十六进制表示的8位二进制数，请说明当它们分别被看作是用补码表示的带符号数或无符号数时，它们所表示的十进制数是什么？ (1) D8 (2) FF

答：(1) D8H表示的带符号数为 -40，D8H表示的无符号数为216；

(2) FFH表示的带符号数为 -1， FFH表示的无符号数为255。 1.7 下列各数均为用十六进制表示的8位二进制数，请说明当它们分别被看作是用补码表示的数或字

符的ASCII码时，它们所表示的十进制数及字符是什么？ (1) 4F (2) 2B (3) 73 (4) 59 答：(1) 4FH表示的十进制数为 79，4FH表示的字符为O；

(2) 2BH表示的十进制数为 43，2BH表示的字符为 +； (3) 73H表示的十进制数为115，73H表示的字符为s； (4) 59H表示的十进制数为89，59H表示的字符为Y。 1.8 请写出下列字符串的ASCII码值。

For example,

This is a number 3692.

答：46H 6FH 72H 20H 65H 78H 61H 6DH 70H 6CH 65H 2CH 0AH 0DH

54H 68H 69H 73H 20H 69H 73H 20H 61H 20H 6EH 75H 6DH 62H 65H 72H 20H 33H 36H 39H 32H 2EH 0AH 0DH

第 二 章. 习 题

49703100.doc - 1 - 作者：User

2.1 在80x86微机的输入/输出指令中，I/O端口号通常是由DX寄存器提供的，但有时也可以在指令

中直接指定00~FFH的端口号。试问可直接由指令指定的I/O端口数。 存储器 答：可直接由指令指定的I/O端口数为256个。 2.2 有两个16位字1EE5H和2A3CH分别存放在80x86微机的存储器的

000B0H和000B3H单元中，请用图表示出它们在存储器里的存放情况。 答：存储器里的存放情况如右上图所示。

000B0H 000B1H 000B2H 000B3H 000B4H E5H 1EH … 3CH 2AH

2.3 在IBM PC机的存储器中存放信息如右下图所示。试读出30022H和

30024H字节单元的内容，以及30021H和30022H字单元的内容。

答：30022H字节单元的内容为ABH；30024H字节单元的内容为EFH。

30021H字单元的内容为AB34H；30022H字单元的内容为CDABH。 2.2题的信息存放情况

存储器

2.4 在实模式下，段地址和偏移地址为3017:000A的存储单元的物理地址是

什么？如果段地址和偏移地址是3015:002A和3010:007A呢？ 30020H 12H 答：3017:000A、3015:002A和3010:007A的存储单元的物理地址都是30021H 34H

3017AH。 30022H ABH

30023H CDH 2.5 如果在一个程序开始执行以前(CS)=0A7F0H，(如16进制数的最高位为

30024H EFH 字母，则应在其前加一个0) (IP)=2B40H，试问该程序的第一个字的物理

地址是多少？

2.3题的信息存放情况 答：该程序的第一个字的物理地址是0AAA40H。 2.6 在实模式下，存储器中每一段最多可有10000H个字节。如果用调试程

序DEBUG的r命令在终端上显示出当前各寄存器的内容如下，请画出此时存储器分段的示意图，以及条件标志OF、SF、ZF、CF的值。

10E40

C>debug 10F40 数据段 -r

20E40 附加段 AX=0000 BX=0000 CX=0079 DX=0000 SP=FFEE BP=0000 20F40

SI=0000 DI=0000 DS=10E4 ES=10F4 SS=21F0 CS=31FF IP=0100 NV UP DI PL NZ NA PO NC 21F00 答：此时存储器分段的示意图如右图所示。OF、SF、ZF、CF的值都堆栈段

为0。 31F00

31FF0 2.7 下列操作可使用那些寄存器？

代码段 (1) 加法和减法 数据寄存器等

41FF0

(2) 循环计数 CX (3) 乘法和除法 AX、DX，乘数和除数用其他寄2.6 题的存储器分段示意图

存器或存储器

(4) 保存段地址 段寄存器 (5) 表示运算结果为0 ZF=1 (6) 将要执行的指令地址 CS:IP (7) 将要从堆栈取出数据的地址 SS:SP 答：答案见题目的右边。 2.8 那些寄存器可以用来指示存储器地址？

答：BX、BP、SI、DI、堆栈操作时的SP、对应的段地址、386及其后继机型的Exx。 2.9 请将下列左边的项和右边的解释联系起来(把所选字母放在括号中)：

(1) CPU (M) A.保存当前栈顶地址的寄存器。 (2) 存储器 (C) B.指示下一条要执行的指令的地址。 (3) 堆栈 (D) C.存储程序、数据等信息的记忆装置，微机有RAM和ROM两种。 (4) IP (B) D.以后进先出方式工作的存储空间。 (5) SP (A) E.把汇编语言程序翻译成机器语言程序的系统程序。 (6) 状态标志 (L) F.唯一代表存储空间中每个字节单元的地址。 (7) 控制标志 (K) G.能被计算机直接识别的语言。 (8) 段寄存器 (J) H.用指令的助记符、符号地址、标号等符号书写程序的语言。 (9) 物理地址 (F) I.把若干个模块连接起来成为可执行文件的系统程序。

49703100.doc - 2 - 作者：User

(10) 汇编语言

J.保存各逻辑段的起始地址的寄存器，8086/8088机有四个：CS、DS、 SS、ES。

(11) 机器语言 (G) K.控制操作的标志，如DF位。 (12) 汇编程序 (E) L.记录指令操作结果的标志，共6位：OF、SF、ZF、AF、PF、CF。 (13) 连接程序 (I) M.分析、控制并执行指令的部件，由算术逻辑部件ALU和寄存器等

组成。

(14) 指令 (O) N.由汇编程序在汇编过程中执行的指令。 (15) 伪指令 (N) O.告诉CPU要执行的操作(一般还要指出操作数地址)，在程序运行时

执行。

答：答案见题目的括号中。

(H)

第 三 章. 习 题

3.1 给定(BX)=637DH，(SI)=2A9BH，位移量D=7237H，试确定在以下各种寻址方式下的有效地址是

什么？

(1) 立即寻址 (2) 直接寻址

(3) 使用BX的寄存器寻址 (4) 使用BX的简接寻址

(5) 使用BX的寄存器相对寻址 (6) 基址变址寻址 (7) 相对基址变址寻址

答：(1) 操作数在指令中，即立即数；

(2) EA=D=7237H；

(3) 无EA，操作数为(BX)=637DH； (4) EA=(BX)=637DH； (5) EA=(BX)+D=0D5B4H； (6) EA=(BX)+(SI)=8E18H；

(7) EA=(BX)+(SI)+D=1004FH；超过了段的边界，最高进位位丢失，因此EA=004FH。 3.2 试根据以下要求写出相应的汇编语言指令

(1) 把BX寄存器和DX寄存器的内容相加，结果存入DX寄存器中。

(2) 用寄存器BX和SI的基址变址寻址方式把存储器中的一个字节与AL寄存器的内容相加，并把结果送到AL寄存器中。

(3) 用寄存器BX和位移量0B2H的寄存器相对寻址方式把存储器中的一个字和(CX)相加，并把结

果送回存储器中。

(4) 用位移量为0524H的直接寻址方式把存储器中的一个字与数2A59H相加，并把结果送回存储单元中。

(5) 把数0B5H与(AL)相加，并把结果送回AL中。 答：(1) ADD DX, BX

(2) ADD AL, [BX][SI] (3) ADD [BX+0B2H], CX

(4) ADD WORD PTR [0524H], 2A59H (5) ADD AL, 0B5H 3.3 写出把首地址为BLOCK的字数组的第6个字送到DX寄存器的指令。要求使用以下几种寻址方

式：

(1) 寄存器间接寻址 (2) 寄存器相对寻址 (3) 基址变址寻址

答：(1) MOV BX, OFFSET BLOCK

ADD BX, (6–1)*2 MOV DX, [BX]

(2) MOV BX, OFFSET BLOCK 改为： MOV BX, (6-1)*2

49703100.doc - 3 - 作者：User

MOV DX, [BX+(6–1)*2] (3) MOV BX, OFFSET BLOCK MOV SI, (6–1)*2 MOV DX, [BX][SI]

也可 MOV DX, BLOCK[BX]

3.4 现有(DS)=2000H，(BX)=0100H，(SI)=0002H，(20100H)=12H，(20101H)=34H，(20102H)=56H，

(20103H)=78H，(21200H)=2AH，(21201H)=4CH，(21202H)=B7H，(21203H)=65H，试说明下列各条指令执行完后AX寄存器的内容。 (1) MOV AX, 1200H (2) MOV AX, BX 1B00:2000H 10H (3) MOV AX, [1200H] 1B00:2001H FFH (4) MOV AX, [BX] 1B00:2002H 00H (5) MOV AX, 1100[BX] 1B00:2003H 80H (6) MOV AX, [BX][SI]

(7) MOV AX, 1100[BX][SI] 8000:FF10H 答：(1) (AX)=1200H 8000:FF11H ？→(AL)

(2) (AX)=0100H ？→(AH) (3) (AX)=4C2AH (4) (AX)=3412H

3.6题的作图表示

(5) (AX)=4C2AH (6) (AX)=7856H (7) (AX)=65B7H 3.5 给定(IP)=2BC0H，(CS)=0200H，位移量D=5119H，(BX)=1200H，(DS)=212AH，(224A0H)=0600H，

(275B9H)=098AH，试为以下的转移指令找出转移的偏移地址。 (1) 段内直接寻址

(2) 使用BX及寄存器间接寻址方式的段内间接寻址 (3) 使用BX及寄存器相对寻址方式的段内间接寻址

答：(1) JMP NEAR PTR 5119H ；(IP)=5119H+((IP)+03H)=7CDCH，物理地址PA=09CDCH

(IP)+03H是JMP NEAR PTR 5119H指令的下一条指令的首地址。

(2) JMP WORD PTR [BX] ；(IP)=((DS)*10H+(BX))=0600H，PA=02600H (3) JMP D[BX] ；(IP)=((DS)*10H+(BX)+D)=098AH，PA=0298AH 3.6 设当前数据段寄存器的内容为1B00H，在数据段的偏移地址2000H单元内，含有一个内容为0FF10H和8000H的指针，它们是一个16位变量的偏移地址和段地址，试写出把该变量装入AX的指令序列，并画图表示出来。 答：MOV BX, [2000H] ；图示如上所示。

MOV BX, 2000H MOV AX, [2000H+2]

LES BX, [BX] MOV ES, AX

MOV AX, ES :[BX] MOV AX, ES:[BX] 3.7 在0624H单元内有一条二字节JMP SHORT OBJ指令，如其中位移量为(1) 27H，(2) 6BH，(3)

0C6H，试问转向地址OBJ的值是多少？ 答：(1) OBJ=0624H+02H+27H=064DH

(2) OBJ=0624H+02H+6BH=0691H (3) OBJ=0624H+02H+0C6H=05ECH ；C6H对应的负数为-3AH（向上转移，负位移量） 3.8 假定(DS)=2000H，(ES)=2100H，(SS)=1500H，(SI)=00A0H，(BX)=0100H，(BP)=0010H，数据段中变量名VAL的偏移地址为0050H，试指出下列源操作数字段的寻址方式是什么？其物理地址值是多少？

(1) MOV AX, 0ABH (2) MOV AX, BX (3) MOV AX, [100H] (4) MOV AX, VAL (5) MOV AX, [BX] (6) MOV AX, ES:[BX] (7) MOV AX, [BP] (8) MOV AX, [SI] (9) MOV AX, [BX+10] (10) MOV AX, VAL[BX] (11) MOV AX, [BX][SI] (12) MOV AX, VAL[BX][SI] 答：(1) 立即方式； 操作数在本条指令中

(2) 寄存器寻址方式； 操作数为 (BX)=0100H

49703100.doc - 4 - 作者：User

(3) 直接寻址方式； PA=20100H (4) 直接寻址方式； PA=20050H (5) BX寄存器间接寻址方式； PA=20100H (6) 附加段BX寄存器间接寻址方式； PA=21100H (7) BP寄存器间接寻址方式； PA=15010H (8) SI寄存器间接寻址方式； PA=200A0H (9) BX寄存器相对寻址方式； PA=20110H (10) BX寄存器相对寻址方式； PA=20150H (11) BX和SI寄存器基址变址寻址方式； PA=201A0H (12) BX和SI寄存器相对基址变址寻址方式； PA=201F0H

3.9 在ARRAY数组中依次存储了七个字数据，紧接着是名为ZERO的字单元，表示如下：

ARRAY DW 23, 36, 2, 100, 32000, 54, 0 ZERO DW ?

(1) 如果BX包含数组ARRAY的初始地址，请编写指令将数据0传送给ZERO单元。 (2) 如果BX包含数据0在数组中的位移量，请编写指令将数据0传送给ZERO单元。 答：(1) MOV AX, [BX+(7-1)*2]

MOV [BX+(7)*2], AX (2) MOV AX, ARRAY [BX] MOV ARRAY [BX+2], AX 3.10 如TABLE为数据段中0032单元的符号名，其中存放的内容为1234H，试问以下两条指令有什么

区别？指令执行完后AX寄存器的内容是什么？ TABLE 0AH MOV AX, TABLE 00H LEA AX, TABLE 14H 答：MOV AX, TABLE是将TABLE单元的内容送到AX，(AX)=1234H

TABLE+3 00H

LEA AX,TABLE是将TABLE单元的有效地址送到AX，(AX)=0032H

1EH

3.11 执行下列指令后AX寄存器中的内容是什么？ 00H

TABLE DW 10, 20, 30, 40, 50 ；000AH, 0014H, 001EH, 0028H, 0032H 28H ENTRY DW 3 00H

┇ 32H MOV BX, OFFSET TABLE

00H

ADD BX, ENTRY

3.11题的TABLEMOV AX, [BX]

存储方式 答：(AX)=1E00H (TABLE的存储方式如右图所示) 3.12 下列ASCII码串(包括空格符)依次存储在起始地址为CSTRING的字节单元中：

CSTRING DB ?BASED ADDRESSING‘

请编写指令将字符串中的第1个和第7个字符传送给DX寄存器。 答：MOV DH, CSTRING

MOV DL, CSTRING+7-1

3.13 已知堆栈段寄存器SS的内容是0FFA0H，堆栈指针寄存器SP的内容是00B0H，先执行两条把8057H

和0F79H分别进栈的PUSH指令，再执行一条POP指令。试画出堆栈区和SP的内容变化过程示意图(标出存储单元的物理地址)。

答：堆栈区和SP的内容变化过程示意图如下左图所示。

FFAACH 79H ←再次进栈(SP)←(SP)-2 1B00:2000 8000H

0FH 出栈时(SP)←(SP)+2 1B00:2002 2B00H

FFAAEH 57H ←首次进栈(SP)←(SP)-2 80H FFAB0H 2B00:8000 X

3.14题的存储区情况 3.13题的堆栈区和SP的内容变化过程示意图 3.14 设(DS)=1B00H，(ES)=2B00H，有关存储单元的内容如上右图所示。请写出两条指令把字变量X

装入AX寄存器。

49703100.doc - 45 - 作者：User

MOV MOV MOV

BEGIN:

AX, DSEG DS, AX ES, AX

；给DS赋值 ；给ES赋值

LEA DX, MESG1 MOV AH, 09H ；显示字符串功能调用 INT 21H

CALL INPUT_NAME ；输入姓名 LEA DX, MESG2 MOV AH, 09H ；显示字符串功能调用 INT 21H

CALL INPHONE ；输入电话号码 CALL PRINTLINE ；显示姓名及电话号码 RET

TELIST ENDP

；-------------------------------------------------------------------------- INPUT_NAME PROC NEAR ；输入姓名子程序

CALL GETCHAR ；调输入字符子程序输入姓名 LEA SI, INBUF ；把INBUF中的姓名移入输出行OUTNAME LEA DI, OUTNAME MOV CX, 12 CLD REP MOVSB RET

INPUT_NAME ENDP ；INPUT_NAME子程序结束 ；-------------------------------------------------------------------------- INPHONE PROC NEAR ；输入电话号码子程序

CALL GETCHAR ；调输入字符子程序输入电话号码 LEA SI, INBUF ；把INBUF中的电话号码移入输出行OUTPHONE LEA DI, OUTPHONE MOV CX, 12 CLD REP MOVSB RET

INPHONE ENDP ；INPHONE子程序结束 ；-------------------------------------------------------------------------- GETCHAR PROC NEAR ；键盘输入子程序

MOV AL, 20H ；先将INBUF中填满空格字符 MOV CX, 12 LEA DI, INBUF CLD REP STOSB MOV CX, 12 ；向INBUF输入字符 MOV DI, 0

INPUT: MOV AH, 1 ；从键盘接收一个字符并回显的DOS功能调用

INT 21H CMP AL, 0DH ；输入回车符返回 JZ QUIT

MOV INBUF[DI], AL INC DI LOOP INPUT

QUIT: CALL DISP_CRLF

RET

GETCHAR ENDP ；GETCHAR子程序结束 ；-------------------------------------------------------------------------- PRINTLINE PROC NEAR ；显示姓名及电话号码子程序

49703100.doc - 46 - 作者：User

LEA DX, MESG3 MOV AH, 09H ；显示字符串功能调用 INT 21H LEA DX, OUTNAME ；显示姓名及电话号码 MOV AH, 09H ；显示字符串功能调用 INT 21H RET

PRINTLINE ENDP ；PRINTLINE子程序结束 ；-------------------------------------------------------------------------- DISP_CRLF PROC NEAR ；显示回车换行符子程序

LEA DX, CRLF MOV AH, 09H INT 21H RET

DISP_CRLF ENDP ；DISP_CRLF子程序结束 ；-------------------------------------------------------------------------- CSEG ENDS ；以上定义代码段 ；******************************************

END START

6.10 编写子程序嵌套结构的程序，把整数分别用二进制和八进制形式显示出来。

主程序BANDO：把整数字变量VAL1存入堆栈，并调用子程序PAIRS；

子程序PAIRS：从堆栈中取出VAL1；调用二进制显示程序OUTBIN显示出与其等效的二进制数；

输出8个空格；调用八进制显示程序OUTOCT显示出与其等效的八进制数；调用输出回车及换行符子程序。

答：程序如下：

DSEG SEGMENT VAL1 DW ? CRLF DB 0DH, 0AH, ?$‘ DSEG ENDS ；以上定义数据段 ；****************************************** CSEG SEGMENT BANDO PROC FAR ；主程序BANDO

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

PUSH VAL1 CALL PAIRS RET

BANDO ENDP

；-------------------------------------------------------------------------- PAIRS PROC NEAR ；PAIRS子程序

PUSH BP MOV BP, SP PUSH BX

MOV BX, [BP+4] ；从堆栈中取出VAL1 CALL OUTBIN ；调用二进制显示子程序 MOV CX, 8 ；显示8个空格符

SPACE: MOV DL, ? ‘

MOV AH, 2 INT 21H LOOP SPACE CALL OUTOCT ；调用八进制显示子程序

49703100.doc - 47 - 作者：User

CALL DISP_CRLF POP BX POP BP RET 2

PAIRS ENDP ；PAIRS子程序结束 ；-------------------------------------------------------------------------- OUTBIN PROC NEAR ；二进制显示子程序

PUSH BX MOV CX, 16

ONEBIT: ROL BX, 1

MOV DX, BX AND DX, 1 OR DL, 30H ；转换为ASCII码 MOV AH, 2 INT 21H LOOP ONEBIT POP BX RET

OUTBIN ENDP ；OUTBIN子程序结束 ；-------------------------------------------------------------------------- OUTOCT PROC NEAR ；八进制显示子程序

ROL BX, 1 ；16位二进制数包含6位八进制数,最高位仅1位

MOV DX, BX AND DX, 1 OR DL, 30H ；转换为ASCII码 MOV AH, 2 INT 21H

MOV CX, 5 ；余下还有5位八进制数

NEXT: PUSH CX

MOV CL, 3 ；1位八进制数包含3位二进制数 ROL BX, CL MOV DX, BX AND DX, 07H OR DL, 30H ；转换为ASCII码 MOV AH, 2 INT 21H POP CX LOOP NEXT RET

OUTOCT ENDP ；OUTOCT子程序结束 ；-------------------------------------------------------------------------- DISP_CRLF PROC NEAR ；显示回车换行符子程序

LEA DX, CRLF MOV AH, 09H INT 21H RET

DISP_CRLF ENDP ；DISP_CRLF子程序结束 ；-------------------------------------------------------------------------- CSEG ENDS ；以上定义代码段 ；******************************************

END START

6.11 假定一个名为MAINPRO的程序要调用子程序SUBPRO，试问：

(1) MAINPRO中的什么指令告诉汇编程序SUBPRO是在外部定义的？ (2) SUBPRO怎么知道MAINPRO要调用它？ 答：(1) EXTRN SUBPRO:FAR

49703100.doc - 48 - 作者：User

(2) PUBLIC SUBPRO

6.12 假定程序MAINPRO和SUBPRO不在同一模块中，MAINPRO中定义字节变量QTY和字变量

VALUE和PRICE。SUBPRO程序要把VALUE除以QTY，并把商存在PRICE中。试问： (1) MAINPRO怎么告诉汇编程序外部子程序要调用这三个变量？

(2) SUBPRO怎么告诉汇编程序这三个变量是在另一个汇编语言程序定义的？ 答：(1) PUBLIC QTY, VALUE, PRICE

(2) EXTRN QTY:BYTE, VALUE:WORD, PRICE:WORD 6.13 假设：

(1) 在模块1中定义了双字变量VAR1，首地址为VAR2的字节数据和NEAR标号LAB1，它们将

由模块2和模块3所使用；

(2) 在模块2中定义了字变量VAR3和FAR标号LAB2，而模块1中要用到VAR3，模块3中要用

到LAB2；

(3) 在模块3中定义了FAR标号LAB3，而模块2中要用到它。 试对每个源模块给出必要的EXTRN和PUBLIC说明。 答：模块1：

EXTRN VAR3: WORD

PUBLIC VAR1，VAR2，LAB1 模块2：

EXTRN VAR1: DWORD，VAR2: BYTE，LAB1: NEAR，LAB3: FAR PUBLIC VAR3，LAB2 模块3：

EXTRN VAR1: DWORD，VAR2: BYTE，LAB1: NEAR，LAB2: FAR PUBLIC LAB3 6.14 主程序CALLMUL定义堆栈段、数据段和代码段，并把段寄存器初始化，数据段中定义变量QTY

和PRICE；代码段中将PRICE装入AX，QTY装入BX，然后调用子程序SUBMUL。程序SUBMUL没有定义任何数据，它只简单地把AX中的内容(PRICE)乘以BX中的内容(QTY)，乘积放在DX: AX中。请编制这两个要连接起来的程序。 答：程序如下：

TITLE CALLMUL ；主程序 EXTRN SUBMUL: FAR

；----------------------------------------------------------------- STACK SEGMENT PARA STACK ?STACK‘

DW 64 DUP (?)

TOS LABEL WORD STACK ENDS

；-------------------------------------------------------------- DATASG SEGMENT PARA ?DATA‘ QTY DW 0140H PRICE DW 2500H DATASG ENDS

；-------------------------------------------------------------- CODESG SEGMENT PARA ?CODE‘ CALLMUL PROC FAR

ASSUME CS: CODESG, DS: DATASG, SS: STACK

START: MOV AX, STACK

MOV SS, AX ；给SS赋值 MOV SP, OFFSET TOS ；给SP赋值 PUSH DS SUB AX, AX POP AX

MOV AX, DATASG MOV DS, AX

MOV AX, PRICE MOV BX, QTY

49703100.doc - 49 - 作者：User

CALL SUBMUL RET

CALLMUL ENDP CODESG ENDS

；-----------------------------------------------------------------

END CALLMUL

；*************************************************************** TITLE SUBMUL ；子程序 PUBLIC SUBMUL

；----------------------------------------------------------------- CODESG1 SEGMENT PARA ?CODE‘

ASSUME CS: CODESG1

SUBMUL PROC FAR

ASSUME CS: CODESG1 MUL BX RET

SUBMUL ENDP CODESG1 ENDS

；-----------------------------------------------------------------

END

6.15 试编写一个执行以下计算的子程序COMPUTE：

R ← X + Y - 3

其中X，Y及R均为字数组。假设COMPUTE与其调用程序都在同一代码段中，数据段D_SEG中包含X和Y数组，数据段E_SEG中包含R数组，同时写出主程序调用COMPUTE过程的部分。

如果主程序和COMPUTE在同一程序模块中，但不在同一代码段中，程序应如何修改？ 如果主程序和COMPUTE不在同一程序模块中，程序应如何修改？ 答：(1) 主程序和COMPUTE在同一代码段中的程序如下：

TITLE ADDITION ；主程序 ；-------------------------------------------------------------- D_SEG SEGMENT PARA ?DATA‘ COUNT EQU 10H X DW COUNT DUP (?) Y DW COUNT DUP (?) D_SEG ENDS

；-------------------------------------------------------------- E_SEG SEGMENT PARA ?DATA‘ R DW COUNT DUP (?) E_SEG ENDS

；-------------------------------------------------------------- C_SEG SEGMENT PARA ?CODE‘ ADDITION PROC FAR

ASSUME CS: C_SEG, DS: D_SEG, ES: E_SEG

START: PUSH DS

SUB AX, AX PUSH AX

MOV AX, D_SEG MOV DS, AX MOV AX, E_SEG MOV ES, AX

CALL COMPUTE ；调用求和子程序 RET

ADDITION ENDP

；******************************************** COMPUTE PROC NEAR ；同一段的求和子程序

MOV CX, COUNT MOV BX, 0

REPEAT: MOV AX, X[BX]

49703100.doc - 30 - 作者：User

MOV SI, 0

COMP: CMP AX, DATA [SI] ；寻找小于平均值的数

JLE NO INC BX ；小于平均值数的个数+1

NO: ADD SI, 2

LOOP COMP RET

MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START

5.17 试编制一个程序把AX中的16进制数转换为ASCII码，并将对应的ASCII码依次存放到MEM数

组中的四个字节中。例如，当(AX)=2A49H时，程序执行完后，MEM中的4个字节内容为39H，34H，41H，32H。 答：程序如下：

DSEG SEGMENT MEM DB 4 DUP (?) N DW 2A49H DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: MOV CH, 4 ；循环计数器

MOV CL, 4 MOV AX, N LEA BX, MEM

ROTATE: MOV DL, AL ；从最低四位开始转换为ASCII码

AND DL, 0FH ADD DL, 30H CMP DL, 3AH ；是0~9吗？ JL NEXT ADD DL, 07H ；是A~F

NEXT: MOV [BX], DL ；转换的ASCII码送入MEM中

INC BX ROR AX, CL ；准备转换下一位 DEC CH JNZ ROTATE RET

MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START 5.18 把0~100D之间的30个数存入以GRADE为首地址的30字数组中，GRADE+i表示学号为i+1的

学生的成绩。另一个数组RANK为30个学生的名次表，其中RANK+i的内容是学号为i+1的学生的名次。编写一程序，根据GRADE中的学生成绩，将学生名次填入RANK数组中。(提示：一个学生的名次等于成绩高于这个学生的人数加1。) 答：程序如下：

DSEG SEGMENT GRADE DW 30 DUP (?) ；假设已预先存好30名学生的成绩

49703100.doc - 31 - 作者：User

RANK DW 30 DUP (?) DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: MOV DI, 0

MOV CX, 30 ；外循环计数器

LOOP1: PUSH CX

MOV CX, 30 ；内循环计数器 MOV SI, 0

MOV AX, GRADE [DI] MOV DX, 1 ；起始名次为第1名

LOOP2: CMP GRADE [SI], AX ；成绩比较

JBE GO_ON INC DX ；名次+1

GO_ON: ADD SI, 2

LOOP LOOP2 POP CX

MOV RNAK [DI], DX ；名次存入RANK数组 ADD DI, 2 LOOP LOOP1 RET

MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START

5.19 已知数组A包含15个互不相等的整数，数组B包含20个互不相等的整数。试编制一程序把既在

A中又在B中出现的整数存放于数组C中。 答：程序如下：

DSEG SEGMENT A DW 15 DUP (?) B DW 20 DUP (?) C DW 15 DUP (? ‘) DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: MOV SI, 0

MOV BX, 0 MOV CX, 15 ；外循环计数器

LOOP1: PUSH CX

MOV CX, 20 ；内循环计数器 MOV DI, 0

49703100.doc - 32 - 作者：User

MOV AX, A [SI] ；取A数组中的一个数

LOOP2: CMP B [DI], AX ；和B数组中的数相等吗？

JNE NO

MOV C [BX], AX ；相等存入C数组中 ADD BX, 2

NO: ADD DI, 2

LOOP LOOP2 ADD SI, 2 POP CX LOOP LOOP1 RET

MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START

5.20 设在A、B和C单元中分别存放着三个数。若三个数都不是0，则求出三数之和存放在D单元中；

若其中有一个数为0，则把其它两单元也清0。请编写此程序。 答：程序如下：

DSEG SEGMENT A DW ? B DW ? C DW ? D DW 0 DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: CMP A, 0

JE NEXT CMP B, 0 JE NEXT CMP C, 0 JE NEXT MOV AX, A ADD AX, B ADD AX, C MOV D, AX JMP SHORT EXIT

NEXT: MOV A, 0

MOV B, 0 MOV C, 0

EXIT: RET MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START 5.21 试编写一程序，要求比较数组ARRAY中的三个16位补码数，并根据比较结果在终端上显示如下

信息：

(1) 如果三个数都不相等则显示0； (2) 如果三个数有二个数相等则显示1；

49703100.doc - 33 - 作者：User

(3) 如果三个数都相等则显示2。 答：程序如下：

DSEG SEGMENT ARRAY DW 3 DUP (?) DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: LEA SI, ARRAY

MOV DX, 0 ；(DX)用于存放所求的结果 MOV AX, [SI] MOV BX, [SI+2] CMP AX, BX ；比较第一和第二两个数是否相等 JNE NEXT1 INC DX

NEXT1: CMP [SI+4], AX ；比较第一和第三两个数是否相等

JNE NEXT2 INC DX

NEXT2: CMP [SI+4], BX ；比较第二和第三两个数是否相等

JNE NUM INC DX

NUM: CMP DX, 3

JL DISP DEC DX

DISP: ADD DL, 30H ；转换为ASCII码

MOV AH, 2 ；显示一个字符 INT 21H RET

MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START

5.22 从键盘输入一系列字符(以回车符结束)，并按字母、数字、及其它字符分类计数，最后显示出这三

类的计数结果。 答：程序如下：

DSEG SEGMENT

ALPHABET DB ?输入的字母字符个数为：‘, ?$‘ NUMBER DB ?输入的数字字符个数为：‘, ?$‘ OTHER DB ?输入的其它字符个数为：‘, ?$‘ CRLF DB 0DH, 0AH, ?$‘ DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

49703100.doc - 34 - 作者：User

BEGIN:

INPUT:

OTHER: NEXT1:

NEXT2:

NEXT3:

NEXT4:

NEXT5:

MOV BX, 0 MOV SI, 0 MOV DI, 0 MOV AH, 1 INT 21H CMP AL, 0DH JE DISP CMP AL, 30H JAE NEXT1 INC DI JMP SHORT INPUT CMP AL, 39H JA NEXT2 INC SI JMP SHORT INPUT CMP AL, 41H JAE NEXT3 JMP SHORT OTHER CMP AL, 5AH JA NEXT4 INC BX JMP SHORT INPUT CMP AL, 61H JAE NEXT5 JMP SHORT OTHER CMP AL, 7AH JA SHORT OTHER INC BX JMP SHORT INPUT

；字母字符计数器

；数字字符计数器 ；其它字符计数器 ；输入一个字符 ；是回车符吗？ ；<数字0吗？ ；是其它字符

；>数字9吗？

；是数字字符

；<字母A吗？

；是其它字符 ；>字母Z吗？ ；是字母字符A~Z

；<字母a吗？

；是其它字符 ；>字母z吗？ ；是其它字符 ；是字母字符a~z

LEA DX, ALPHABET CALL DISPLAY LEA DX, NUMBER MOV BX, SI CALL DISPLAY LEA DX, OTHER MOV BX, DI CALL DISPLAY RET

MAIN ENDP

；-------------------------------------------------------------------------- DISPLAY PROC NEAR

MOV AH, 09H ；显示字符串功能调用 INT 21H

CALL BINIHEX ；调把BX中二进制数转换为16进制显示子程序 LEA DX, CRLF MOV AH, 09H ；显示回车换行 INT 21H RET

DISPLAY ENDP

；-------------------------------------------------------------------------- BINIHEX PROC NEAR ；将BX中二进制数转换为16进制数显示子程序

MOV CH, 4

ROTATE: MOV CL, 4

ROL BX, CL MOV DL, BL

DISP:

49703100.doc - 40 - 作者：User

MOV AX, 4321H CALL HTOA RET

MAIN ENDP ；主程序部分结束 ；-------------------------------------------------------------------- HTOA PROC NEAR ；HTOA子程序

CMP AX, 15 JLE B1 PUSH AX PUSH BP MOV BP, SP

MOV BX, [BP+2] AND BX, 000FH MOV [BP+2], BX POP BP MOV CL, 4 SHR AX, CL CALL HTOA POP BP

B1: ADD AL, 30H

CMP AL, 3AH JL PRINTIT ADD AL, 7H

PRINTIT: MOV DL, AL

MOV AH, 2 INT 21H RET

HOTA ENDP ；HOTA子程序结束 ；-------------------------------------------------------------------- CODE ENDS ；代码段结束 ；******************************************

END START ；程序结束

答：堆栈最满时各单元的地址及内容如右上图所示：

0500:00EC :00EE 返回POP BP地址 0003H :00F0 :00F2 返回POP BP地址 0002H :00F4 :00F6 返回POP BP地址 0001H :00F8 :00FA 主程序返回地址 0000 :00FC (DS) :00FE

00EE SP:

6.4 题堆栈最满时各单元

的地址及内容

6.5 下面是一个程序清单，请在下面的图中填入此程序执行过程中的堆栈变化。

；*************************

0000 STACKSG SEGMENT 0000 20 [. DW 32 DUP (?)

? ? ? ?

]

0040 STACKSG ENDS

；*************************

0000 CODESG SEGMENT PARA ?CODE‘

；--------------------------------------

0000 BEGIN PROC FAR

ASSUME CS: CODESG, SS: STACKSG

0000 1E PUSH DS 0001 2B C0 SUB AX, AX 0003 50 PUSH AX 0004 E8 0008 R CALL B10

；--------------------------------------

0007 CB RET 0008 BEGIN ENDP

；--------------------------------------

0008 B10 PROC 0008 E8 000C R CALL C10

；--------------------------------------

000B C3 RET

49703100.doc - 41 - 作者：User

000C

B10 ENDP

；--------------------------------------

000C C10 PROC

；--------------------------------------

000C C3 RET 000D C10 ENDP

；--------------------------------------

000D CODESG ENDS

；*************************

END BEGIN

答：程序执行过程中的堆栈变化如下图所示。

偏移地址 堆栈 ( 0016H ) ( 0016H ) ( 0016H ) ( 0016H )

( 0018H ) ( 0018H ) ( 0018H ) ( 0018H ) ( 001AH ) ( 001AH ) ( 001AH ) ( 001AH ) 0007 ( 001CH ) ( 001CH ) ( 001CH ) 0000 ( 001CH ) 0000 ( 001EH ) ( 001EH ) (DS) ( 001EH ) (DS) ( 001EH ) (DS) ( 0020H ) ( 0020H ) ( 0020H ) ( 0020H ) SP： 0020H 001EH 001CH 001AH

BEGIN PUSH DS PUSH AX CALL B10

( 0016H ) ( 0016H ) ( 0016H ) ( 0016H ) ( 0018H ) 000B ( 0018H ) 000B ( 0018H ) 000B ( 0018H ) 000B ( 001AH ) 0007 ( 001AH ) 0007 ( 001AH ) 0007 ( 001AH ) 0007 ( 001CH ) 0000 ( 001CH ) 0000 ( 001CH ) 0000 ( 001CH ) 0000 ( 001EH ) (DS) ( 001EH ) (DS) ( 001EH ) (DS) ( 001EH ) (DS) ( 0020H ) ( 0020H ) ( 0020H ) ( 0020H ) 001AH 001CH 0020H SP： 0018H 6.6 写一段子程序SKIPLINES，完成输出空行的功能。空出的行数在AX寄存器中。

答：程序如下：

CSEG SEGMENT SKIPLINES PROC FAR

ASSUME CS: CSEG

BEGIN: PUSH CX

PUSH DX MOV CX, AX

DISP: MOV DL, 0DH ；显示回车换行，即输出空行

MOV AH, 2 ；显示一个字符的DOS调用 INT 21H

MOV DL, 0AH MOV AH, 2 ；显示一个字符的DOS调用 INT 21H LOOP DISP POP DX POP CX RET

SKIPLINES ENDP

END

6.7 设有10个学生的成绩分别是76，69，84，90，73，88，99，63，100和80分。试编制一个子程

序统计60~69分，70~79分，80~89分，90~99分和100分的人数，分别存放到S6，S7，S8，S9和S10单元中。 答：程序如下：

DSEG SEGMENT

RECORD DW 76，69，84，90，73，88，99，63，100，80 S6 DW 0

49703100.doc - 42 - 作者：User

S7 DW 0 S8 DW 0 S9 DW 0 S10 DW 0 DSEG ENDS

；****************************************** CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: MOV CX, 10

CALL COUNT

┇ ；后续程序 RET

MAIN ENDP

；-------------------------------------------------------------------------- COUNT PROC NEAR ；成绩统计子程序

MOV SI, 0

NEXT: MOV AX, RECORD[SI]

MOV BX, 10 ；以下5句是根据成绩计算相对S6的地址变化量 DIV BL ；计算公式为：((成绩)/10-6)*2送(BX) MOV BL, AL ；此时(BH)保持为0不变 SUB BX, 6 ；应为只统计60分以上成绩 SAL BX, 1 ；(BX)*2 INC S6[BX] ；S6是S6，S7，S8，S9和S10单元的首地址 ADD SI, 2 LOOP NEXT RET

COUNT ENDP ；COUNT子程序结束 ；-------------------------------------------------------------------------- CSEG ENDS ；以上定义代码段 ；******************************************

END START

6.8 编写一个有主程序和子程序结构的程序模块。子程序的参数是一个N字节数组的首地址TABLE，

数N及字符CHAR。要求在N字节数组中查找字符CHAR，并记录该字符出现的次数。主程序则要求从键盘接收一串字符以建立字节数组TABLE，并逐个显示从键盘输入的每个字符CHAR以及它在TABLE数组中出现的次数。(为简化起见，假设出现次数≤15，可以用16进制形式把它显示出来。)

答：程序如下：

DSEG SEGMENT TABLE DB 255 DUP (?) N DW 255 CHAR DB ? CHAR_N DB 0 ；用于记录CHAR出现的次数 CRLF DB 0DH, 0AH, ?$‘ DSEG ENDS ；以上定义数据段 ；****************************************** STACK SEGMENT

DW 100 DUP (?)

TOS LABEL WORD STACK ENDS ；以上定义堆栈段

49703100.doc - 43 - 作者：User

；****************************************** CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG, SS: STACK

START: MOV AX, STACK

MOV SS, AX ；给SS赋值 MOV SP, OFFSET TOS ；给SP赋值 PUSH DS ；设置返回DOS SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: MOV BX, 0

MOV CX, 255 ；最多输入255个字符

INPUT: MOV AH, 1 ；从键盘接收一个字符的DOS功能调用

INT 21H CMP AL, 0DH ；输入回车符结束输入 JZ IN_N

MOV TABLE [BX], AL INC BX LOOP INPUT

IN_N: MOV N, BX ；TABLE数组中的字符个数送N

CALL DISP_CRLF

IN_CHAR: MOV AH, 1 ；从键盘接收一个字符并回显的DOS功能调用

INT 21H CMP AL, 0DH ；输入回车符结束 JZ EXIT

MOV CHAR, AL ；输入的字符存入CHAR单元 CALL SEARCH ；调搜索字符子程序 MOV DL, ?:‘ ；显示―:‖，在字符CHAR(输入时回显)的后面 MOV AH, 2 ；显示一个字符 INT 21H

MOV DL, CHAR_N ；再显示CHAR出现的次数(次数≤15) AND DL, 0FH ADD DL, 30H CMP DL, 39H JBE NEXT ADD DL, 07H ；是A~F

NEXT: MOV AH, 2 ；显示一个字符

INT 21H

CALL DISP_CRLF JMP SHORT IN_CHAR

EXIT: RET MAIN ENDP

；-------------------------------------------------------------------------- SEARCH PROC NEAR ；搜索字符子程序

MOV SI, 0 MOV CX, N

MOV CHAR_N, 0 MOV AL, CHAR

ROTATE: CMP AL, TABLE [SI]

JNZ ROTATE1 INC CHAR_N ；搜索到字符，则出现次数+1

ROTATE1: INC SI

LOOP ROTATE RET

49703100.doc - 44 - 作者：User

SEARCH ENDP ；SEARCH子程序结束 ；-------------------------------------------------------------------------- DISP_CRLF PROC NEAR ；显示回车换行符子程序

LEA DX, CRLF MOV AH, 09H INT 21H RET

DISP_CRLF ENDP ；DISP_CRLF子程序结束 ；-------------------------------------------------------------------------- CSEG ENDS ；以上定义代码段 ；******************************************

END START

6.9 编写一个子程序嵌套结构的程序模块，分别从键盘输入姓名及8个字符的电话号码，并以一定的

格式显示出来。 主程序TELIST：

? 显示提示符“INPUT NAME：”；

? 调用子程序INPUT_NAME输入姓名；

? 显示提示符“INPUT A TELEPHONE NUMBER：”； ? 调用子程序INPHONE输入电话号码；

? 调用子程序PRINTLINE显示姓名及电话号码。 子程序INPUT_NAME：

? 调用键盘输入子程序GETCHAR，把输入的姓名存放在INBUF缓冲区中； ? 把INBUF中的姓名移入输出行OUTNAME。 子程序INPHONE：

? 调用键盘输入子程序GETCHAR，把输入的8位电话号码存放在INBUF缓冲区中； ? 把INBUF中的号码移入输出行OUTPHONE。 子程序PRINTLINE：

显示姓名及电话号码，格式为：

NAME TEL. X X X XXXXXXXX

答：程序如下：

DSEG SEGMENT INBUF DB 12 DUP (? ‘) ；输入缓冲区，初始值为空格 OUTNAME DB 16 DUP (? ‘), ；姓名输出行，初始值为空格 OUTPHONE DB 12 DUP (? ‘), 0DH, 0AH, ?$‘ ；号码输出行，初始值为空格 MESG1 DB ?INPUT NAME：‘, ?$‘ MESG2 DB ?INPUT A TELEPHONE NUMBER：‘, ?$‘ MESG3 DB ?NAME‘, 12 DUP (? ‘), ?TEL.‘, 0DH, 0AH, ?$‘ CRLF DB 0DH, 0AH, ?$‘ DSEG ENDS ；以上定义数据段 ；****************************************** STACK SEGMENT

DW 100 DUP (?)

TOS LABEL WORD STACK ENDS ；以上定义堆栈段 ；****************************************** CSEG SEGMENT TELIST PROC FAR ；主程序TELIST

ASSUME CS: CSEG, DS: DSEG, ES: DSEG, SS: STACK

START: MOV AX, STACK

MOV SS, AX ；给SS赋值 MOV SP, OFFSET TOS ；给SP赋值 PUSH DS ；设置返回DOS SUB AX, AX PUSH AX

49703100.doc - 20 - 作者：User

AUGW LABEL WORD AUGEND DD 99251 SUM DD ? D_SEG ENDS ；以上定义数据段 ；---------------------------------------------------------------- E_SEG SEGMENT ADDW LABEL WORD ADDEND DD -15962 E_SEG ENDS ；以上定义附加段 ；---------------------------------------------------------------- C_SEG SEGMENT MAIN PROC FAR

ASSUME CS: C_SEG, DS: D_SEG, ES: E_SEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, D_SEG MOV DS, AX ；给DS赋值 MOV AX, E_SEG MOV ES, AX ；给ES赋值

；

MOV AX, AUGW ；以下6条指令进行加法计算 MOV BX, AUGW+2 ADD AX, ES: ADDW ADC BX, ES: ADDW+2 ；不考虑有符号数溢出 MOV WORD PTR SUM, AX MOV WORD PTR [SUM+2], BX RET

MAIN ENDP C_SEG ENDS ；以上定义代码段 ；----------------------------------------------------------------

END START

4.18 请说明表示程序结束的微操作和结束程序执行的语句之间的差别。它们在源程序中应如何表示？

答：表示程序结束的微操作是指示汇编程序MASM结束汇编的标志，在源程序中用END表示；

结束程序执行的语句是结束程序运行而返回操作系统的指令，在源程序中有多种表示方法，比如INT 20H或MOV AX, 4C00H INT 21H以及RET等。 4.19 试说明下述指令中哪些需要加上PTR操作符：

BVAL DB 10H，20H WVAL DW 1000H

(1) MOV AL，BVAL ；不需要 (2) MOV DL，[BX] ；不需要 (3) SUB [BX]，2 ；需要，如SUB BYTE PTR [BX]，2 (4) MOV CL，WVAL ；需要，如MOV CL，BYTE PTR WVAL (5) ADD AL，BVAL+1 ；不需要 答：见注释。

第 五 章. 习 题

5.1 试编写一个汇编语言程序，要求对键盘输入的小写字母用大写字母显示出来。

答：程序段如下：

BEGIN: MOV AH, 1 ；从键盘输入一个字符的DOS调用

INT 21H CMP AL, ?a‘ ；输入字符

49703100.doc - 21 - 作者：User

STOP:

CMP JA SUB 可 MOV MOV INT JMP RET

AL, ?z‘ STOP AL, 20H DL, AL AH, 2 21H BEGIN

；输入字符>?z‘吗？

；转换为大写字母，用AND AL, 1101 1111B也

；显示一个字符的DOS调用

5.2 编写程序，从键盘接收一个小写字母，然后找出它的前导字符和后续字符，再按顺序显示这三个

字符。

答：程序段如下：

BEGIN: MOV AH, 1 ；从键盘输入一个字符的DOS调用

INT 21H CMP AL, ?a‘ ；输入字符?z‘吗？ JA STOP DEC AL ；得到前导字符 MOV DL, AL ；准备显示三个字符 MOV CX, 3

DISPLAY: MOV AH, 2 ；显示一个字符的DOS调用

INT 21H INC DL

LOOP DISPLAY

STOP: RET 5.3 将AX寄存器中的16位数分成4组，每组4位，然后把这四组数分别放在AL、BL、CL和DL中。 答：程序段如下：

DSEG SEGMENT STORE DB 4 DUP (?) DSEG ENDS

┇

BEGIN: MOV CL, 4 ；右移四次

MOV CH, 4 ；循环四次 LEA BX, STORE

A10: MOV DX, AX

AND DX, 0FH ；取AX的低四位 MOV [BX], DL ；低四位存入STORE中 INC BX SHR AX, CL ；右移四次 DEC CH JNZ A10 ；循环四次完了码？

B10: MOV DL, STORE ；四组数分别放在AL、BL、CL和DL中

MOV CL, STORE+1 MOV BL, STORE+2 MOV AL, STORE+3

STOP: RET 5.4 试编写一程序，要求比较两个字符串STRING1和STRING2所含字符是否完全相同，若相同则显示?MATCH‘， 若不相同则显示?NO MATCH‘。 答：程序如下：

DSEG SEGMENT

STRING1 DB ?I am a student.‘ STRING2 DB ?I am a student!‘ YES DB ?MATCH‘, 0DH, 0AH, ?$‘ NO DB ?NO MATCH‘, 0DH, 0AH, ?$‘

49703100.doc - 22 - 作者：User

DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG, ES: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值 MOV ES, AX ；给ES赋值

；

BEGIN: LEA SI, STRING1 ；设置串比较指令的初值

LEA DI, STRING2 CLD

MOV CX, STRING2 - STRING1 REPE CMPSB ；串比较 JNE DISPNO LEA DX, YES ；显示MATCH JMP DISPLAY

DISPNO: LEA DX, NO ；显示NO MATCH DISPLAY: MOV AH, 9 ；显示一个字符串的DOS调用

INT 21H RET

MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------

END START

5.5 试编写一程序，要求能从键盘接收一个个位数N，然后响铃N次(响铃的ASCII码为07)。

答：程序段如下：

BEGIN: MOV AH, 1 ；从键盘输入一个字符的DOS调用

INT 21H SUB AL, ?0‘ JB STOP ；输入字符?9‘吗？ JA STOP CBW

MOV CX, AX ；响铃次数N JCXZ STOP

BELL: MOV DL, 07H ；准备响铃

MOV AH, 2 ；显示一个字符的DOS调用，实际为响铃 INT 21H

CALL DELAY100ms ；延时100ms LOOP BELL

STOP: RET 5.6 编写程序，将一个包含有20个数据的数组M分成两个数组：正数数组P和负数数组N，并分别把这两个数组中数据的个数显示出来。 答：程序如下：

DSEG SEGMENT COUNT EQU 20 ARRAY DW 20 DUP (?) ；存放数组 COUNT1 DB 0 ；存放正数的个数 ARRAY1 DW 20 DUP (?) ；存放正数 COUNT2 DB 0 ；存放负数的个数 ARRAY2 DW 20 DUP (?) ；存放负数

49703100.doc - 23 - 作者：User

ZHEN DB 0DH, 0AH, ?The positive number is：‘, ?$‘ ；正数的个数是： FU DB 0DH, 0AH, ?The negative number is：‘, ?$‘ ；负数的个数是： CRLF DB 0DH, 0AH, ?$‘ DSEG ENDS

；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR

ASSUME CS: CSEG, DS: DSEG

START: PUSH DS ；设置返回DOS

SUB AX, AX PUSH AX

MOV AX, DSEG MOV DS, AX ；给DS赋值

BEGIN: MOV CX, COUNT

LEA BX, ARRAY LEA SI, ARRAY1 LEA DI, ARRAY2

BEGIN1: MOV AX, [BX]

CMP AX, 0 ；是负数码？ JS FUSHU MOV [SI], AX ；是正数，存入正数数组 INC COUNT1 ；正数个数+1 ADD SI, 2 JMP SHORT NEXT

FUSHU: MOV [DI], AX ；是负数，存入负数数组

INC COUNT2 ；负数个数+1 ADD DI, 2

NEXT: ADD BX, 2

LOOP BEGIN1 LEA DX, ZHEN ；显示正数个数 MOV AL, COUNT1 CALL DISPLAY ；调显示子程序 LEA DX, FU ；显示负数个数 MOV AL, COUNT2 CALL DISPLAY ；调显示子程序 RET

MAIN ENDP

；-------------------------------------------------------------------------- DISPLAY PROC NEAR ；显示子程序

MOV AH, 9 ；显示一个字符串的DOS调用 INT 21H AAM ；将(AL)中的二进制数转换为二个非压缩BCD码 ADD AH, ?0‘ ；变为0～9的ASCII码 MOV DL, AH MOV AH, 2 ；显示一个字符的DOS调用 INT 21H

ADD AL, ?0‘ ；变为0～9的ASCII码 MOV DL, AL MOV AH, 2 ；显示一个字符的DOS调用 INT 21H LEA DX, CRLF ；显示回车换行 MOV AH, 9 ；显示一个字符串的DOS调用 INT 21H RET

DISPLAY ENDP ；显示子程序结束 CSEG ENDS ；以上定义代码段

49703100.doc - 24 - 作者：User

；--------------------------------------------------------------------------

END START

5.7 试编写一个汇编语言程序，求出首地址为DATA的100D字数组中的最小偶数，并把它存放在AX

中。

答：程序段如下：

BEGIN: MOV BX, 0

MOV CX, 100

COMPARE: MOV AX, DATA[BX] ；取数组的第一个偶数

ADD BX, 2 TEST AX, 01H ；是偶数吗？ LOOPNZ COMPARE ；不是，比较下一个数 JNZ STOP ；没有偶数，退出 JCXZ STOP ；最后一个数是偶数，即为最小偶数，退出

COMPARE1: MOV DX, DATA[BX] ；取数组的下一个偶数

ADD BX, 2 TEST DX, 01H ；是偶数吗？ JNZ NEXT ；不是，比较下一个数 CMP AX, DX ；(AX)<(DX)吗？ JLE NEXT MOV AX, DX ；(AX)<(DX)，则置换(AX)为最小偶数

NEXT: LOOP COMPARE1 STOP: RET 5.8 把AX中存放的16位二进制数K看作是8个二进制的“四分之一字节”。试编写程序要求数一下值为3(即11B)的四分之一字节数，并将该数(即11B的个数)在终端上显示出来。 答：程序段如下：

BEGIN: MOV DL, 0 ；计数初始值

MOV CX, 8

COMPARE: TEST AX, 03H ；是数03吗？

JNZ NOEQUAL ；不是，转走 INC DL ；是，计数

NOEQUAL: ROR AX, 1 ；准备判断下一个数

ROR AX, 1

LOOP COMPARE ADD DL, ?0‘ ；将计数值转换为ASCII码 MOV AH, 2 ；进行显示 INT 21H

STOP: RET 5.9 试编写一个汇编语言程序，要求从键盘接收一个四位的16进制数，并在终端上显示与它等值的二进制数。

答：程序段如下：

BEGIN: MOV BX, 0 ；用于存放四位的16进制数

MOV CH, 4 MOV CL, 4

INPUT: SHL BX, CL ；将前面输入的数左移4位

MOV AH, 1 ；从键盘取数 INT 21H CMP AL, 30H ；<0吗？ JB INPUT ；不是?0～F‘的数重新输入 CMP AL, 39H ；是?0～9‘吗？ JA AF ；不是，转‘A～F’的处理 AND AL, 0FH ；转换为：0000B～1001B JMP BINARY

AF: AND AL, 1101 1111B ；转换为大写字母

CMP AL, 41H ；又

本文来源：https://www.bwwdw.com/article/iynd.html