汇编语言程序设计（第二版） 刘慧婷 王庆生 主编 课后参考答案

汇编语言程序设计（第二版） 刘慧婷 王庆生 主编 课后参考答案

第一章

1.1 什么是机器语言？什么是汇编语言？简述汇编语言的特点。

机器语言就是用二进制编码组成的机器指令的集合和一组使用机器指令的规则。汇编语言是对机器指令中的操作码用英文单词的缩写描述，对操作数用标号、变量、常量描述。
汇编语言的特点：
（1）与机器有关：移植性差，但可直接控制硬件。
（2）程序效率高。
（3）局限性：受指令的限制，如考虑存储单元等。
（4）调试困难。

1.2 汇编程序与汇编源程序的区别是什么？

汇编源程序是指用汇编语言编写的程序，而汇编程序特指将汇编源程序汇编成目标文件的编译程序。

1.3 把下列十进制数转换为二进制数和十六进制数。

（1）67 （2）34 （3）254 （4）123

答：（1）1000011,43 （2）100010， 22
（3）1111 1101，FE （4）111 1011，7B

1.4 把下列二进制数转换为十六进制数和十进制数。

(1)01101101      (2)10110010      (3)111111

答：（1）6D，109 （2）B2,178， （3）3F，63

1.5 作下列十六进制数的运算，并转换为十进制数校核。

(1)5A+64      (2)86-49      (3)123-9A      (4)43×2B 

答：（1） BE （2）3D （3） 89 （4） B41

1.6 根据补码定义把下列十进制数表示为8位二进制补码。

(1) 64      (2) -24  

答：（1）0100 0000 （2）[10011000]原=[1110 1000]补

第二章

2.1 简述计算机系统组成。

答：计算机由中央处理器CPU，存储器，输入系统，输出系统组成，由系统总线连接在一起。CPU包括运算器和控制器，运算器执行指令，控制器负责计算机的控制。存储器是计算机的记忆部件，以二进制形式存放程序和数据。输入输出系统包括大容量存储器，如硬盘，以及其他外设，如鼠标，键盘，显示器等。

2.2 简述16位机的各类寄存器的主要作用。

答：（1）数据寄存器：Ax，Bx，Cx，Dx； AX：作为累加器，是算术运算的主要寄存器。在乘除等指令中存放操作数，在I/O指令中使用它与外部设备传送信息。BX：当通用寄存器使用，在计算存储器地址时，作基址寄存器使用。CX：当通用寄存器使用，此外常用来保存计数值，当计数器使用。
DX：当通用寄存器使用，一般在作双字长运算时把DX和AX组合使用，对某些I/O操作，DX用来存放I/O的端口地址。
（2）地址寄存器：Sp，Bp，Si，Di
（3）段寄存器：Cs，Ds，Es，Ss；段寄存器的作用是专用于存储器寻址，用来直接或间接地存放段地址。
（4）专用寄存器：Ip，Flags；Ip寄存器专门存放下一条指令的地址，Flags标志寄存器，又称程序状态寄存器。它是存放条件码标志、控制标志和系统标志的寄存器。

2.3 写出每条汇编指令执行后相关寄存器的值。

Mov ax, 1345H ax=1345H_______
Mov ah, 24H ax=2445H_______
Mov al, 45H ax=2445H_______
Mov bx, 3412H bx=3412H_______
Mov al, bh ax=2434H_______

2.4实模式下，写出段地址和偏移地址为1234:2002、1430:0042、FF00:0FFF的物理地址。

答：
1234:2002=12340+2002=14342
1430:0042=14300+0042=14342
FF00:0FFF=FF000+0FFF=FFFFF

2.5下列各数均为十进制数，请采用8位二进制补码运算，并回答标志寄存器FLAGS中CF和OF的值，运算结果所代表的十进制数是多少？如果用16位二进制补码运算，其结果所代表的十进制数是多少？FLAGS中CF和OF的值呢？

(1)85+69 (2)85+(-69) (3)85-(-69) (4)85-(69)
答：85=55H,69=45H,-69=BBH，
8位二进制补码运算:
(1)85+69 =55H+45H=9AH=154, CF=0,OF=1
(2)85+(-69)=55H+BBH=10H=16,CF=1,OF=0
(3)85-(-69)=55H-BBH=9AH=154,CF=1,OF=1
(4)85-(69)=55H-45H=10H=16,CF=0,OF=0

16位二进制补码运算:
85=0055H,69=0045H,-69=0FFBBH，
(1)85+69 =0055H+0045H=009AH=154, CF=0,OF=0
(2)85+(-69)=0055H+0FFBBH=0010H=16,CF=1,OF=0
(3)85-(-69)=0055H-0FFBBH=009AH=154,CF=1,OF=0
(4)85-(69)=0055H-0045H=0010H=16,CF=0,OF=0

2.6 给定段地址为0001H，仅通过变化偏移地址寻址，CPU的寻址范围从____00010H_____________到____1000FH_____________。

2.7 有一数据存放在内存20000H单元中，现给定段地址为SA，若想用偏移地址寻到此单元，则SA应满足的条件是：最小为__1001H____________，最大为____2000H________________。

2.8 已知8086系统某存储单元物理地址为：52506H，你认为段基址的最大值、最小值分别是多少？8086微机最多可以有多少个不同的段基址

答：52506=50000+2506，=52500+0006，基地址最大为5250，最小为5000(4251).
段地址取值范围：0000—FFFF。既65536个。

2.9从物理地址为00100H开始到00103H单元中顺序存放的数据为：12H，34H，56H，78H。请画出数据存放示意图，并回答以下问题：

(1)写出00101H字节单元的内容
(2)写出00102H字单元的内容
答案：
(1)(00101)= 34H
(2)(00102)= 7856H

第三章

3.1 写出从汇编语言源程序的建立到产生可执行文件的步骤和上机操作命令。

答：(1)用编辑程序EDIT建立 .ASM源文件
(2)用汇编程序MASM把.ASM文件原文件汇编成.OBJ文件
(3)用连接程序LINK将.OBJ文件转换成.EXE文件
(4)在DOS下直接运行.EXE文件或在DEBUG下调试该.EXE文件

3.2 列表文件.LST是在什么阶段产生的？列表文件.LST中有哪些内容？

答：.LST 在汇编得到.obj的同时得到，列表文件报告了汇编过程中产生的很多有价值的参考信息。主要包括源程序和机器语言清单、指令和变量的偏移地址等等。

3.3 写出定义一个代码段的语句，段名为MYPRG。

答：MYPRG segment
assume cs: MYPRG
start:
MYPRG ends
End start

3.4 程序中用什么语句来结束程序的执行？用什么语句来表示程序的结束和指出程序执行的起点？

答：程序的结束：mov ah,4ch
int 21h
程序的结束和指出执行的起点：End start

3.5 汇编语言源程序的文件扩展名是什么？把它改为.EXE扩展名后，可以认为是可执行程序吗？

答：源程序的文件扩展名为*.asm，改扩展名不可以执行。

3.6 列出子目录C:\YOUPRG下的扩展名为.ASM的所有文件，在D盘根目录下建立一个子目录MYPRG，并进入子目录MYPRG，再把C:\YOUPRG下的文件YOU.ASM复制到D:\MYPRG下。写出完成以上要求的DOS命令。

答：(1)列出子目录：C:\YOUPRG>dir *.asm
    (2)建立子目录：D:\>MD MYPRG
    (3)复制: C:\YOUPRG>copy YOU.asm D:\MYPRG

3.7 下图为DEBUG调入的可执行程序，回答以下问题：

(1)程序的起始物理地址是多少？结束地址是多少？
(2)CS寄存器的值是什么？
(3)程序的功能是什么？
(4)写出查看DS:0处内容的DEBUG命令。
(5)程序中2处的INT 21指令执行后有什么结果？
(6)如果要运行这个程序应该用什么DEBUG命令？
(7)DEBUG命令-T=0 4 之后，寄存器AX、DS、DX的值是多少？

答：(1)0B630,0B63E
(2)0B63
(3)显示0B62:0000存储的字符串
(4)-d 0B62:0000
(5)第一处显示字符串，第二处结束程序
(6)-g
(7)(AX)=0962,(DS)=0B62,(DX)=0000

3.8 解释DEBUG程序中的如下调试命令。

• D , - E, - T, - G, - A , - R
  答：- D 显示内存内容
  • E 修改内存单元内容
  • T 跟踪命令
  • G 运行命令
  • A 汇编命令
  • R 查看或修改寄存器内容

3.9 用DEBUG调入PROG.EXE后,若程序列出如下:

1234:0100 MOV BX, [4000]
1234:0104 MOV AX, [BP]
1234:0106 MOV AH, 1
1234:0108 INT 21
1234:010A MOV DL, AL
1234:010C MOV AH, 2
1234:010E INT 21
1234:0110 RET
列出上面程序的DEBUG命令是( )。
寄存器CS的值为( ),第一条指令的物理地址为( )。
如果要修改寄存器BX为1200H，应键入DEBUG命令( )。
若要修改第二条指令中的BP为BX,应键入DEBUG命令( ) 。
答：(1) U
(2) 1234H
(3) 12440H
(4) R BX
(5) A [0104]

3.10简述在WIN7系统中执行汇编的方法。

DosBox是一款在Windows系统运行DOS程序的环境模拟器。下载安装DosBox，运行该程序，出现DosBox运行界面，运行挂载命令mount，即可以将Dos程序放置在Windows环境下Dos模拟器中运行，其过程为挂载。

3.11 简述DOS系统功能INT 21H调用方法。

答：(1)将调用功能的功能号存入AH寄存器。
(2)如必要，设置该调用功能的入口参数。
(3)执行INT 21H指令。
(4)如必要，按规定取得出口参数（返回参数）。

3.12 Debug命令调试含有“INT 21H”命令的程序段时，如何实现单步执行，“-t”命令为何无法实现？

答：“INT 21H”指令是Dos的系统调用，如果使用“-t”跟踪，则进入DOS系统子程序。如果希望单步执行，可以通过P命令或“-g=x x+1”来实现。

3.13 有主存数据段存放情况如下图所示，请写出代码，输出数据段的字符串“inspire a generation！”。

答： mov ax,145B
mov ds,ax
mov ah,09
mov dx,0
int 21h

第四章

4.1 何为段地址？何为有效地址？ 何为物理地址？

答：

例如DS=6542H，指令mov ax,DS:[123A]； 123A为有效地址，6542H为段地址，65420H+0123AH=6665A即物理地址.

4.2 指出以下指令的寻址方式，array是变量。

(1)mov ax, 9
(2)mov byte ptr[bx],9
(3)mov bx,[di] (4)mov ax,bx
(5)mov [si+bx],9
(6)mov array[bx],cx
(7)mov ax, array+9
(8)mov ax, array[bx+di] 答： (1)立即数寻址
(2)寄存器间接寻址
(3)变址寻址
(4)寄存器寻址
(5)基址变址寻址
(6)相对基址寻址
(7)直接寻址
(8)相对基址变址寻址

4.3 假定(DS)=1200H，(SS)=4400H, (BX)=463DH，(BP)=2006H, (SI)=6A00H，位移量D=4524H，以AX寄存器为目的操作数，试写出以下各种寻址方式下的传送指令，并确定源操作数的有效地址EA和物理地址。

(1)立即寻址
(2)直接寻址
(3)使用BX的寄存器寻址；无EA
(4)使用BX的间接寻址
(5)使用BP的寄存器相对寻址
(6)基址变址寻址
(7)相对基址变址寻址
答：(1)操作数在指令中无EA
(2)直接寻址：EA=4524H，物理地址=DS：4524
(3)使用BX的寄存器寻址：无EA
(4)使用BX的间接寻址：EA=463DH，物理地址=DS：463D
(5)使用BP的寄存器相对寻址：MOV AX，[BP+4524]，EA=2006+4524，
物理地址=SS：EA
(6)基址变址寻址： MOV AX，[BX+SI]，EA= BX+SI，物理地址=DS：EA
(7)相对基址变址寻址：MOV AX，[4524+BX+SI]，EA=4524+BX+SI，
物理地址=DS：EA

4.4 在数据段定义了ARRAY数组，其中依次存储了五个字数据，ARRAY的起始地址（第一个数据的地址）为24H,请用不同寻址方式的指令，把第5个字送AX寄存器,指令条数不限。

答：(1)直接寻址
MOV AX，ARRAY+8 或MOV AX，[ARRAY+8] (2)使用BX的间接寻址
LEA BX，ARRAY+8 ；MOV AX，[BX] (3)使用BX的寄存器相对寻址
LEA BX，ARRAY ；MOV AX，[BX+8] (4)基址变址寻址
LEA BX，ARRAY ； MOV SI，8 ； MOV AX，[BX+SI]

第五章

5.1 溢出标志OF与进位标志CF有何作用和区别？

答：处理器对两个操作数进行运算时，按照无符号数求得结果，并相应设置进位标志CF；同时，根据是否超出有符号数的范围设置溢出标志OF。应该利用哪个标志，则由程序员来决定。也就是说，如果将参加运算的操作数认为是无符号数，就应该关心进位；认为是有符号数，则要注意是否溢出。

5.2 有符号数比较大小,当AX < BX时程序转向标号L1,若前导指令为CMP AX, BX，后续指令应为什么？若视为二个无符号数比较大小, 后续指令应为什么？

答：带符号数:JL L1, 无符号数:JB L1

5.3 CMP和TEST指令与其他指令的不同之处在于什么？它们通常都紧跟着跳转指令，用在什么场合？

答：CMP和TESt指令分别执行减法和逻辑与操作，但不回送结果，只影响标志位，通常用以判断两个数的大小或者用以判断操作数的某些位是1或0。

5.4 除了用4CH号系统功能调用结束程序的执行并退出，还有哪些办法？

答：RET指令，INT 20H，但要正确使用。

5.5 V是变量，指出下列错误的指令，说出错误原因，并给出合适的修改。

(1) MOV AX，[DX]
(2) MOV DS，DATA
(3) MOV CS，AX
(4) MOV AX，DL
(5) PUSH AL
(6) ADD [BX]，[DI]
(7) LEA [BX]，V
(8) MOV [DX]，OFFSET V
(9) MOV [SI]，2
(10) MUL BX，CX
(11) DIV 5
(12) MOV BYTE[SI]，AX
(13) MOV AX，[SI+DI]
(14) SHR AX，4
(15) CMP 6，AX
(16) MOV [FFFF]，AX
(17) MOV AX，BX+4
(18) JMP FAR PRO
答：(1) MOV AX，[BX]
(2) MOV DS，BX
(3) MOV ES，AX
(4) MOV AL，DL
(5) PUSH AX
(6) ADD [BX]，DI
(7) LEA BX，V
(8) MOV DX,OFFSET V
(9) MOV WORD PTR [SI]，AX
(10) MUL BX
(11) DIV BX
(12) MOV BYTE PTR [SI]，2
(13) MOV AX，[BX+SI]
(14) SHR AX，1
(15) CMP AX，6
(16) MOV [FFFE]，AX
(17) MOV AX，[BX+4]
(18) JMP FAR PTR PRO

5.6 在数据段定义了ARRAY数组，其中依次存储了4个字数据，根据以下要求把第4个字送AX寄存器。

(1)直接寻址
(2)使用BX的间接寻址
(3)使用BX和 ARRAY的寄存器相对寻址
(4)基址变址寻址
(5)MOV以外的其它指令
答：(1)直接寻址
MOV AX，ARRAY+6 或MOV AX，[ARRAY+6]
(2)使用BX的间接寻址
LEA BX，ARRAY+6 ；MOV AX，[BX]
(3)使用BX和 ARRAY的寄存器相对寻址
LEA BX，ARRAY ；MOV AX，[BX+6]
(4)基址变址寻址
LEA BX，ARRAY ； MOV SI，6 ； MOV AX，[BX+SI]
(5)MOV以外的其它指令
SUB AX，AX； ADD AX，[ARRAY+6]

5.7 画出数据在数据段中的存放情况，程序执行后，BX、DI、CX、DX寄存器中的内容是什么? 程序如下：

data  segment
array  dw  20，30，40，20h，30h，-6
buff   db  ‘abcd$’
data  ends
code  segment
	  assume  cs:code,ds:data
start:
	  mov    ax, data
	  mov    ds, ax
			mov    bx, array+1
			mov    di, offset array
			mov    cx, [di+5]
			mov    dl, buff+3
			mov    ah, 4ch
			int    21h
code  ends
			end    start

答： 14 00 1E 00 28 00 20 00 30 00 FA FF 61 62 63 64 $
(BX)=1E00H，(DI)=0000H，(CX)=2000H，(DX)=0064H

5.8 在DEBUG下设置(SP)=20H，设置AX、BX、CX、DX为不同值，把这四个寄存器内容依次压入堆栈，再从堆栈中依次弹出到SI、DI、BP、BX寄存器。写出一段程序实现上述操作，并画出每条入栈指令执行后SP和堆栈中数据的变化。

答：
code segment
	 assume cs:code
start:
	  push AX
	  push BX
	  push CX
	  Push DX
	  Pop  SI
Pop  DI
Pop  BP
Pop  BX
Hlt
Code ends
	 End start

5.9 求出7450H与以下各十六进制数的和及差，并根据结果标出SF、ZF、CF、OF标志位的值。

(1) 1234H (2)5678H (3)9804H (4)E0A0H
答： SF、ZF、CF、OF
(1)1234H+7450H， 1 0 0 1
(2)5678H+7450H， 1 0 0 1
(3)9804H+7450H， 0 0 1 0
(4)E0A0H+7450H， 0 0 1 0

5.10 在数据段有32位的无符号数变量X,Y,按如下格式定义，其中‘？’请用数值代替，用16位指令按要求写出程序。

   X    DW    ？，？
   Y    DW    ？，？
   Z    DW    ？，？，？，？
(1)Z=X+Y。
(2)Z=X-Y。
(3)Z=|X-Y|。
(4)Z=X×Y。
答：(1)X和Y两个字数据相加，和存放在Z中。
	 MOV  AX，X
	 MOV  DX，X+2
	 ADD  AX，Y
	 ADC  DX，Y+2
	 MOV  Z，AX
	 MOV  Z+2，DX
	(2)MOV  AX，X
	 MOV  DX，X+2
	 SUB  AX，Y
	 SBB  DX，Y+2
	 MOV  Z，AX
	 MOV  Z+2，DX
	(3)MOV  AX，X
	 MOV  DX，X+2
	 SUB  AX，Y
	 SBB  DX，Y+2
	 TEST AX,8000H
 JZ  Exit
 NOT AX
 NOT DX
 ADD DX,1
 ADC AX,0
 Exit: MOV  Z，AX
	 MOV  Z+2，DX
	(4)MOV  AX，X
	 MUL  Y
	 MOV  Z，AX
 MOV  Z+2，DX
	 MOV  AX，X+2
	 MUL  Y
	 ADD  Z+2,AX
	 ADC  DX,0
	 MOV  Z+4,DX
	 MOV  AX，X
	 MUL  Y+2
	 ADD  Z+4，AX
 ADC  DX,0
 MOV  Z+6,DX
		 MOV  AX，X+2
	 MUL  Y+2
	 ADD  Z+6,AX
	 ADC  DX,0
	 MOV  Z+8,DX

5.11用移位指令为主实现对AX中的无符号数乘以5，不考虑乘积可能超出16位。

答： MOV  DX，AX
MOV  CL，2
	 SHL  AX，CL
	 ADD  AX，DX

5.12 用移位指令为主实现对AX中的无符号数乘以5，考虑乘积可能超出16位的情况。

答： MOV  DX,0
MOV  BX，AX
	 SHL  AX，1
	 ADC  DX,0
SHL  DX,1
SHL  AX，1
	 ADC  DX,0
	 ADD  AX，BX
	 ADC  DX,0

5.13 把AX中的内容依次倒排序，即第0位移到第15位，第1位移到第14位，…。

答：先设AX值
	Mov  di,0
	Mov  bx,0
	Mov si,1
	Mov cl,2
	Ror ax,1
K: Rol ax,cl
	Mov bx,ax
	And bx,si
	Add di,bx
	Shl,si,1
	Cmp si,0
	Jnz  k
	Mov ax,di

5.14 在数据段有如下定义：

BUFF    DB  ‘ABCD$EFGHIJK$’
		  STR1    DB   12  DUP(?)
		  LEN     DB   ？
用串指令编写程序完成以下操作：
(1) 对字符串STR1全部置‘*’符。
(2) 从左到右把BUFF中的字符串传送到STR1。
(3) 从右到左把BUFF中的字符串传送到STR1。
(4) 比较BUFF与STR1两个字符串是否相等，如相等则DX=1，否则DX=0。
(5) 查找BUFF中有无字符$，把字符$出现的次数计入BX寄存器。
答：
(1) 
MOV  AX，DATA
MOV  DS，AX
MOV  AL，‘*’
LEA  DI，STR1
MOV  CX，STR1-BUFF
CLD
REP  STOSB  
(2) 
MOV  AX，DATA
MOV  DS，AX
MOV  ES，AX
CLD
LEA  SI，BUFF
LEA  DI，STR1
MOV  CX，STR1-BUFF
REP  MOVSB
(3) 
MOV  AX，DATA
MOV  DS，AX
MOV  ES，AX
STD
LEA  SI，STR1-1
LEA  DI，LEN-1
MOV  CX，STR1-BUFF
REP  MOVSB

(4)
MOV  AX，DATA
MOV  DS，AX
MOV  ES，AX
CLD
LEA  SI，BUFF
LEA  DI，STR1
MOV  CX，STR1-BUFF
REPE  CMPSB

(5) 
MOV  AX，DATA
MOV  ES，AX
MOV  BX，0
CLD
MOV  AL，‘$’
LEA  SI，BUFF
MOV  CX，STR1-BUFF
NEXT: REPNE  SCASB
JCXZ  NO-FOUND
INC  BX
JMP  NEXT

5.15 对于给定的AX和BX的值，执行下列程序段，程序将转向哪里？

ADD    AX, BX
	  JNO    L1
JNC    L2
SUB    AX，BX
JNC    L3
JNO    L4
JMP    L5
(1) AX=1234H，  BX=6789H
(2) AX=790EH，  BX=8831H
(3) AX=E002H，  BX=8086H
答：L1，L1，L5

5.16 下面不完整的程序段是比较AX和BX的值，把其中大的数送MAX变量。如果是无符号数，应如何填写指令？如果是有符号数，应如何填写指令？

CMP    AX，BX
(             )   
MOV    MAX，AX
(            )
L1：MOV    MAX，BX  
L2：HLT   

答： JB  L1  
	 JMP  L2  

5.17 在下列程序段的括号中分别填入如下指令，程序执行完后，AX、CX的内容是什么？

(1) LOOP    L1
(2) LOOPE   L1
(3) LOOPNZ  L1
MOV    AX， 6
	  MOV    CX，3
L1：ROL    AX，CL
	TEST   AL，3
(        )

答：（1）AX=0C000H，CX=0000
   （2）AX=0003H，CX=0002
   （3）AX=0C000H，CX=0000

5.18 测试AL寄存器，如果最高位和最低位同时为0，则转L0，如果最高位和最低位只有一位为1，则转L1，如果最高位和最低位同时为1，则转L2。画出流程图，并编写程序段。

答： 
Code segment
	 Assume cs:code
Start:
  
ROR  AL,1
AND  AL,3
JZ   L0
SUB  AL,3
JZ   L2
JMP  L1
L0：
	JMP Exit
L1：
	JMP Exit
L2：
Exit：hlt
code ends
	 end start

5.19 从键盘输入一个英文字母，显示输出其大写。画出流程图，并编写程序段。

答：
Code segment
	 Assume cs:code
Start:
	 Mov ah,1
	 Int 21h
	 sub al,20h
	 mov dl,al
	 mov ah,2
	   int 21h
hlt
code ends
	 end start

5.20 从键盘输入一位数字N，显示输出N个N。画出流程图，并编写程序段。

答：
CODE SEGMENT
ASSUME  CS:CODE
START:
MOV  AH,1
INT 21H
MOV  DL,AL
AND  AL, 0FH
MOV  CL,AL
MOV  CH,0
NEXT: MOV  AH,2
INT 21H
LOOP  NEXT
MOV  4CH
INT 21H
CODE ENDS
  END  START

5.21 在数据段有压缩的BCD码表示的十进制数，写出指令分别完成十进制加法A+B,K+J和减法A-B,K-J。结果放在AX,回答AX的内容。

A  DB 65H,
B  DB 37H 
K  DB 98H
J  DB 69H
答：(1)    MOV Al,A
		   MOV Bl,B
		   ADD AL,BL
	 AAA
SUB AL,BL
	 DAS
	 (2)   MOV Al,K
		   MOV Bl,J
		   ADD AL,BL
	 AAA
SUB AL,BL
	 DAS
(1)A+B=9CH,AX=0102H.A-B=2EH,AX=0028H
(2)K+J=01H,AX=0107H.K-J=2FH,AX=0029H

5.22 用相对基址变址寻址方法求ARRAY行列式的值。

ARRAY    DW  2，3，5
			 DW  1，4，6
			 DW  2，7，9
答：
	   data segment
		 Array dw 2,3,5
			   dw 1,4,6
			   dw 2,7,9
	   data ends
	   code segment
			assume cs:code,ds:data
	   start:
			mov ax,data
			mov ds,ax
			mov ax,0
			 mov bx,0fffah
		  a: mov si,0
			 add bx,6
 cmp bx,13
			 jg  d
		  
b: add ax,array[bx][si]
			 cmp si,3
			 jg  a
add si,2
			 jmp b
		  d: hlt
	 code ends
		  end start

第六章

6.1 画图说明下列数据定义语句所示内存空间的数据，并回答寄存器的值。

ORG  0
ARRAY LABEL  BYTE
DA1  DW 2，9，14，3，315H，-6 
DA2  DB 7，‘ABCDEDFG’
LEN = $－DA2                      
ORG  100H
DA3  DW  DA4
DA4  DB  4  DUP(2 DUP(1,2,3),4)
。。。。。。
MOV  AL，ARRAY+2          （AL）=（    ）H
ADD  AL，DA2+1            （AL）=（    ）H
MOV  AX，DA2-DA1          （AX）=（    ）H
MOV  BL，LEN              （BL）=（    ）H
MOV  AX, DA3              （AX）=（    ）H
MOV  BX, TYPE  DA4        （BX）=（    ）H
MOV  BX, OFFSET  DA4      （BX）=（    ）H
MOV  CX, SIZE  DA4        （CX）=（    ）H
MOV  DX, LENGTH  DA4      （DX）=（    ）H
MOV  BX, WORD PTR  DA4    （BX）=（    ）H
MOV  BL, LEN  AND  0FH    （BL）=（    ）H
MOV  BL, LEN  GT  5       （BL）=（    ）H
MOV  AX, LEN  MOD 5       （AX）=（    ）H
答：
MOV  AL，ARRAY+2          （AL）=（ 09    ）H
ADD  AL，DA2+1            （AL）=（ 41    ）H
MOV  AX，DA2-DA1          （AX）=（ 000c  ）H
MOV  BL，LEN              （BL）=（  09   ）H
MOV  AX, DA3              （AX）=（ 0102  ）H
MOV  BX, TYPE  DA4        （BX）=（  0001 ）H
MOV  BX, OFFSET  DA4      （BX）=（  0102 ）H
MOV  CX, SIZE  DA4        （CX）=（  0004 ）H
MOV  DX, LENGTH  DA4      （DX）=（  0004 ）H
MOV  BX, WORD PTR  DA4    （BX）=（  0201 ）H
MOV  BL, LEN  AND  0FH    （BL）=（  09   ）H
MOV  BL, LEN  GT  5       （BL）=（  ff   ）H
MOV  AX, LEN  MOD 5       （AX）=（  0004 ）H

6.2 变量和标号有哪些区别？变量和标号有哪些属性？如何获取属性值？写出指令。

答：变量是为指令提供的操作数，标号是为指令提供标识，都是为了在指令中引用。它们最主要的属性有：偏移属性，段属性，类型属性。例如：
MOV   BX， OFFSET  VAL ；取偏移属性
MOV   BX， SEG   VAL   ；取段属性
MOV   BX， TYPE  VAL   ；取类型属性

6.3 指令和伪指令的区别在哪里？伪指令可以出现在代码段吗？指令可以在数据段吗？

答：指令只能出现在代码段，定义数据的伪指令通常在数据段，伪指令在代码段两端也可，但不能在指令之间。

6.4 下面的程序能否输出字符0～9？如不能，应如何修改？

CODE    SEGMENT
		ASSUME CS:CODE
		K=30H                
		J  DW  0
START:  MOV  DL, K
		MOV  AH, 2
		INT  21H 
		K=K+1     
		INC  J
		CMP  J, 10
		JNZ  START
		MOV  AH, 4CH
		INT  21H
CODE    ENDS
		END  START
答：通过汇编和连接可以运行，但程序真正意图是输出ASCII码为30H~39H的字符0~9，应作修改。
CODE    SEGMENT
		ASSUME CS:CODE
		K=30H                ；改为 K  DB  30H
		J  DW  0
START:  MOV  DL, K
		MOV  AH, 2
		INT  21H 
		K=K+1     ；K=K+1是伪指令，没生成代码，改为 INC  K 
		INC  J
		CMP  J, 10
		JNZ  START
		MOV  AH, 4CH
		INT  21H
CODE    ENDS
		END  START 

6.5 用16位指令编写完整程序，并上机调试，计算V=(X+Y)*R，其中所有变量均为32位变量，X、Y、R的具体数值由你自己确定，变量定义格式如下：

	X    DW ?,?
	Y    DW  ?,?
	R    DW  ?,?
	V    DW 4 dup(?)
答：（32位指令）
data segment
x dw 1
y dw 2
r dw 3
v dw 4 dup(?)
data ends

code segment
assume cs:code,ds:data
.386p
start:
	mov ax,data
	mov ds,ax
	mov eax,x
	add eax,y
	mov ebx,r
	imul ebx
	mov v,eax
	mov v+4,edx
	mov dl,al
	add dl,30h
	mov ah,2
	int 21h
	mov ah,4ch
	int 21h
code ends
end start

6.6数据定义如下：执行下列指令，填写寄存器的值

ARRAY  LABEL  BYTE
DA1  DW  2，9，14，3 
	  DA2  DB  7，‘ABCDEDF’
LEN = $－DA1                      
MOV  AL，ARRAY+2          （AL）=（      ）H
	  ADD  AL，DA2+1             （AL）=（     ）H
	  MOV  AX，DA2-DA1          （AX）=（     ）H
MOV  AX，DA1+1             （AX）=（    ）H
MOV  BL，LEN               （BL）=（     ）H

答：  MOV  AL，ARRAY+2          （AL）=（  09  ）H
	  ADD  AL，DA2+1             （AL）=（  41  ）H
	  MOV  AX，DA2-DA1          （AX）=（  0008 ）H
MOV  AX，DA1+1             （AX）=（ 0900  ）H
MOV  BL，LEN               （BL）=（  10   ）H

6.7 定义数据段，满足如下要求：

（1）array为字符串变量：‘inspire a generation！’
（2）data1 为十六进制数：0FEDCBAH
（3）data2为二进制数：10101010B。
（4）data3为100个为零的字节变量。
（5）分配500个字的空间待用。
答： data segment 
		   Array db ‘inspire a generation!’
		   Data1 df  0fedcbah
		   Data2 db 10101010B
		   Data3 db 100 dup(0)
	   dw 500 dup(?)
data ends

6.8 假设程序中，数据段定义如下：

  Data1 db 50 dup（？）
  Data2 dw 10 dup（0）
  Data3 dq  5 dup（2 dup（1,2））

（1）用指令将数据段首地址放入数据段寄存器中。
（2）用一条指令将data2的第一个数据放入BX寄存器中。
（3）将数据段字节数放入CX寄存器。
答：mov ax，data1 mov ds，ax
Mov bx，data2[0]
Mov cx, 50+102+208

6.9现有数据定义如下：

 Array1 dw  5 DUP（0）
 Array2 EQU BYTE PTR Array1

请说明这两个变量之间的联系。
答：当汇编后，PTR类型操作符使Array2具有Array1相同的段地址和偏移地址，但它的数据类型为字节型。

6.10 给出下列程序段汇编后的结果：

 Val1 EQU  6
 Val2 EQU  3
MOV BX,(Val1 LT 5) AND 20
MOV BX, (VAL2 GE 1) AND 30
MOV BX,(Val2  AND 5) OR (VAL1 GE 5)
MOV BX,(Val2 - VAL1) GE 5
答：MOV BX,0   MOV BX,30   MOV BX,FF   MOV BX,0

6.11设数据段定义如下：

Data segment
   Org 20h
   Data1=4
   Data2=data1+25h
   Data3 db ‘123456’
		 Db 47h,48h
   Count EQU $-data1
  Data ends
回答下列问题：
（1）Data1的偏移地址是多少？     
（2）Count的值是多少？           
答：（1）0020h   （2）0024h

6.12现有一数据区data1，需对其进行按字和按字节访问，请问应如何进行设置？

答：可以利用“LABEL“标签进行设置，如：
Operator_b LABEL byte
Operator_w dw 100dup(0)
其中按字节访问时采用Operator_b变量，按字访问时采用Operator_w变量。

6.13请问什么是PSP，EXE文件和COM文件有何区别？

答：PSP是程序段前缀。程序在执行前调入内存，由DOS确定装入的起始地址，建立PSP，接着再装入程序，其大小为256个字节。EXE文件和COM文件相比，COM文件只有一个段地址，由二进制代码组成，比EXE文件小，并且要求程序从偏移地址0100H单元开始，因为之前存放为PSP。

第七章

7.1 下列程序是在3个数中找出最小的数并放入AL，在括号中填入指令使其完整。

	mov		al，x
	mov		bl，y
    mov		cl，z
	cmp 	al，bl
	(          )
xchg   al，bl
l1: cmp   al, cl
jle  l2
(          )
l2: ret
答：（1）jl  l1
   （2）xchg al,cl

7.2 数据段如下：

data   segment
da1		db	1，2，‘abcd’   
count  = $-da1
			da2    db  9 dup(?)
data   ends
补充括号处的指令，使得程序把DA1数据区数据移到DA2数据区。
mov		ax，data
			mov    ds, ax
mov		es，(       )
mov		cx，(       )
			mov    si, (      )
			(         )
			(         )
答：      mov		es，( AX     )
mov		cx，( COUNT     )
			mov    si, ( OFFSET  DA1     )
			( MOV  DI, OFFSET  DA2        )
			( REP  MOVSB                )

7.3 将AX和BX进行加、减、乘或除的运算，每种运算由用户从键盘上选择。程序中设置寄存器的值，或在DEBUG下设定寄存器值并在DEBUG下运行程序。

答：code segment 
		assume cs:code 
main proc far
		push ds
		sub ax,ax
		push ax
		mov ah,1
		int 21h
		cmp al,31h   ;1加
		jz  ad
		cmp al,32h    ;2减
		jz  su
cmp al,33h   ;3乘
		jz  mu
		cmp al,34h    ;4除
		jz  di
	  ad:ADD AX,BX
		 JMP exit
	  su:SUB AX,BX
		 JMP exit
	  mu:MUL BX
		 JMP exit
	  d:DIV BX
	exit: 
		 ret
main  endp
code ends
end main

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

答：code segment 
		assume cs:code 
main   proc far
		push ds
		sub ax,ax
		push ax
		mov ah,1
		int 21h
		cmp al,61h
		jb  exit
		cmp al,7ah
		ja  exit
mov bx,ax
sub al,1h    ;输出前一字符
mov dl,al
mov ah,2
int 21h
mov dl,bl    ；输出当前字符
mov ah,2
int 21h
add dl,1h    ;输出后一字符
mov ah,2
int 21h
   exit:ret
main  endp
code ends
end main

7.5 分别用LOOP循环和条件转移指令实现1+2+3+……+100，并将结果存入AX。

答：(1)code segment 
		assume cs:code 
main  proc  far
		push ds
		sub ax,ax
		push ax
		mov bx,1
mov ax,0
		mov cx，99
	   a:add ax,bx
		 inc bx
	   loop a
	exit:ret
code ends
end main

(2)code segment 
		assume cs:code 
main  proc  far
		push ds
		sub ax,ax
		push ax
		mov bx,1
mov ax,0
		mov cx，99
	   a:add ax,bx
		 inc bx
	   cmp bx,101
	   jnz a
exit:ret
main  endp
code ends
end main

7.6 打印下面图形。

*
**
***
****
*****
******
答：code segment 
		assume cs:code 
main  proc  far
		push ds
		sub ax,ax
		push ax
		mov ax,1
	  a:mov cx,ax
	  b:mov ah,2
mov dl,’*’
int 21h
loop  b
cmp ax,6
jz exit
inc ax
mov ah,2
mov dl,13
int 21h
mov ah,2
mov dl,10
int 21h
jmp a
   exit:ret
code ends
end main

7.7 将AX和BX进行加、减、乘或除的运算，每种运算由用户从键盘上选择。AX和BX可在DEBUG下设置。

答：code segment 
		assume cs:code 
main proc far
		push ds
		sub ax,ax
		push ax
		mov ah,1
		int 21h
		cmp al,31h   ;1加
		jz  ad
		cmp al,32h    ;2减
		jz  su
cmp al,33h   ;3乘
		jz  mu
		cmp al,34h    ;4除
		jz  di
	  ad:ADD AX,BX
		 JMP exit
	  su:SUB AX,BX
		 JMP exit
	  mu:MUL BX
		 JMP exit
	  d:DIV BX
	exit: 
		 ret
main  endp
code ends
end main

7.8 求已知带符号数字节数组ARRAY的平均值，ARRAY的首字节单元为数组元素的个数。

答：
   data segment
	  ARRAY   db  5,01,12,23,45,F3
   data ends

code segment 
		assume cs:code 
start:  
mov ax,data
		mov ds，ax
		mov ax,0  
		mov cl,array 
		mov ch,0
		mov bl,cl
	   lea si,array+1
a:add al,array[si]
inc si
loop a
div bl
	 exit:mov  ah,4ch
		 int 21h
code ends
end start

7.9 编写程序，实现对无符号字数组ARRAY的6个元素从小到大排序。

答: data  segment
	  array  dw 6,5,9,4,5,15,3  ;首地址单元6为元素个数
	data  ends
code  segment
	  assume cs:code,ds:data
start:
		mov   ax, data
		mov   ds, ax
		mov   di, array
k1:     mov   cx, di
		 mov   bx,0
k2:     mov   ax, array[bx]
		cmp   ax, array[bx+2]
		jl   next
		xchg ax,array[bx+2]
		mov array[bx],ax
next:   add  bx,2
		loop k2
		dec  di
		jnz  k1
	 mov   ah,4ch
		int   21h
code  ends
end   start

7.10 数据段有两个等长的字数组，分别求出各自的元素之和，并存入元素后面的单元中，即横向相加。再求出两个数组的对应元素之和，并把和存入新数组SUM中，即纵向相加。

答：data  segment
	  Array1  dw  3, 1,0,1,?     ；设简单数据,第一个为元素个数
	  Array2  dw  3,1,1,0,?
	  Array3  dw  3,3 dup (0)   ；存放array1,2的和
data  ends
code  segment
	  assume cs:code,ds:data
start:
		mov   ax, data
		mov   ds, ax
		mov   ax, 0
		lea   bx, array1+2
		mov   cx, array1
sumh1:  add   ax, [bx]
		add   bx,2
		loop  sumh1
		mov  [bx],ax
	  ;第二个数组累加
  mov   ax, 0
		lea   bx, array2+2
		mov   cx, array2
sumh2:  add   ax, [bx]
		add   bx,2
		loop  sumh2
		mov  [bx],ax
   lea   bx,2
mov   cx, array2
  sum3: mov   ax, array1[bx]
 add   ax, array2[bx]
		mov array3[bx],ax
 add   bx,2
		loop  sum3
exit:   mov   ah,4ch
		int   21h
code  ends
end   start

7.11 编写程序，比较两个从键盘输入的字符串是否相同，如果相同，则显示 ‘YES’,如果不同，则显示发现不同的字符位置。

答：data  segment 
mess1   db     13,10, 'input string1:$'
mess2   db     13,10, 'input string2:$'
mess3   db     13,10, 'YES!$'
mess4   db     13,10, 'no match at $'

st1     label   byte
  max1  db      6
  act1  db      ?
  stok1 db      6 dup(?)

st2    label   byte
  max2   db      6
  act2   db      ?
  stok2  db      6 dup(?)
data  ends

code segment  
		assume cs:code, ds:data,es:data 
start:  mov ax,data
		mov ds,ax
		mov es,ax
		lea dx,mess1
		mov ah,09
		int 21h         ;qust1?
		lea dx,st1
		mov ah,0ah
		int 21h         ;ans1
		lea dx,mess2
		mov ah,09
		int 21h         ;qust2?
		lea dx,st2
		mov ah,0ah
		int 21h         ;ans2
		mov cl,act1
		mov dl,act2
		cmp cl,dl
		jnz nomatch
		mov ch,0
		lea si,stok1
		lea di,stok2
		repe cmpsb
		jnz nomatch
match:  lea dx,mess3
		mov ah,09
		int 21h
		jmp  exit
nomatch:
		lea dx,mess4
		mov ah,09
		int 21h
		sub di,offset stok2
		mov dx,di
		add dl,30h
		mov ah,2
		int 21h
exit:
		mov  ah,4ch
		int 21h        
code ends
	   end start 

7.12 编写程序，从键盘输入一个字符串到BUFF，再输入一个字符到AL，在字符串BUFF中查找是否存在该字符，如果找到，显示发现的字符位置。

答：
data  segment 
mess1   db     13,10, 'input string:$'
mess2   db     13,10, 'input a char:$'
mess3   db     13,10, 'found at $'
mess4   db     13,10, 'no found !$'

st1     label   byte
  max1  db      6
  act1  db      ?
  stok1 db      6 dup(?)

data  ends

code segment   para'code'
		assume cs:code, ds:data 
start:  mov ax,data
		mov ds,ax
		mov es,ax
		lea dx,mess1
		mov ah,09
		int 21h         ;qust1?
		lea dx,st1
		mov ah,0ah
		int 21h         ;ans1
		
		lea dx,mess2
		mov ah,09
		int 21h         ;qust2?
		
		mov ah,1
		int 21h         ;ans2
		lea di,stok1
		repne scasb
		jz match
nomatch:
		lea dx,mess4
		jmp exit
match:  lea dx,mess3

exit:
		mov ah,09
		int 21h
		sub di,offset stok1
		mov dx,di
		and dx,0fh
		add dl,30h
		mov ah,2
		int 21h
		mov ah,4ch
		int 21h        
code ends
	   end start 

7.13 编写程序，从键盘输入一个字符串到BUFF，并按相反顺序显示输出。

答: 
data  segment 
mess1   db     13,10, 'input string:$'
mess2   db     13,10,'$'
st1     label   byte
  max1  db      6
  act1  db      ?
  stok1 db      6 dup(?)
data  ends

code segment   
		assume cs:code, ds:data 
start : mov ax,data
		mov ds,ax
		lea dx,mess1
		mov ah,09
		int 21h         
		lea dx,st1
		mov ah,0ah
		int 21h                 
		lea dx,mess2
		mov ah,09
		int 21h         
		mov cl,act1
		mov ch,0
		mov bx, offset stok1
		add bx, cx
 next:  dec bx
		mov dl, [bx]
		mov ah,2
		int 21h
		loop next
		mov  ah,4ch
		 int 21h       
code ends
	   end start

7.14 编写程序，从键盘输入一个八位的二进制数，显示其十六进制数。

答：code  segment
		assume cs:code
start:
		mov cx,8
		mov bl,0
next:   mov ah,1
		int 21h
		cmp al,30h
		jb  exit
		cmp al,31h
		ja  exit
		sub al,30h
		shl bl,1
		add bl,al
		loop next
		mov cl,4
		mov di,2
out1:   rol bl,cl
		mov dl,bl
		and dl,0fh
		add dl,30h
		cmp dl,39h
		jle dig
		add dl,7
dig:    mov ah,2
		int 21h
		dec di
		cmp di,0
		jnz out1 
exit:   mov   ah,4ch
		int   21h
code  ends
end   start

7.15 字数组ARRAY为有符号数，第一个单元为元素个数N，后面为N个元素，编写程序，求数组元素中的最大值，并把它放入MAX单元。

答：data  segment
	  array  dw  5,9,4,5,15,3
	  max    dw  ?
data  ends
code  segment
	  assume cs:code,ds:data
start:
		mov   ax, data
		mov   ds, ax
		mov   cx, array
		lea   bx, array+2
		mov   ax, [bx]
		mov   max, ax
k1:     mov   ax, [bx]
		cmp   ax, max
		jl    next
		mov   max,ax
next:   add   bx,2
		loop   k1
		mov   ah,4ch
		int   21h
code  ends
end   start

7.16 字数组ARRAY，第一个单元为元素个数N，后面为N个元素，编写程序，把零元素从数组中清除，移动元素位置并修改第一个单元(元素个数)。

答：data  segment
	  array  dw  6,3,4,0,15,0,7
	  loca   dw  999        ；此单元地址为结束标记
data  ends
code  segment
	  assume cs:code,ds:data
start:
		mov   ax, data
		mov   ds, ax
		mov   cx, array
		lea   bx, array+2
next:   cmp   word ptr[bx],0
		jz    move
		add   bx,2
		dec   cx
		cmp   cx,0
		jnz   next
		jmp   exit
move:   dec   array
		mov   di,bx
mnext:
		cmp   di,offset loca
		ja    next
		mov   ax, [di+2]
		mov   [di],ax
		add   di,2
		cmp   di,offset loca
		jnb   next
		jmp   mnext
exit:   mov   ah,4ch
		int   21h
code  ends
end   start

第八章

8.1 过程定义如下，补充括号中的指令。

code   segment
		assume	 cs:code
main   proc  far
(           )
(           )
(           )
…
…
…
ret
main    endp
code    ends
end   main
答：(  PUSH  DS         )
(  XOR  AX,AX       )
(  PUSH  AX         )

8.2 补充下列程序括号中的指令，使得程序对堆栈的操作全部利用程序中定义的TOS堆栈，并画出程序执行后堆栈TOS中的数据。

data   segment
	   dw    100 dup(?)
  tos  label  word
data   ends
code   segment
		assume	 cs:code,ss:data
main   proc  far
(            )
(            )
(            )
push  ds
xor   ax， ax
push  ax
call  far ptr suba
… ；假定此处指令的地址为CS=3400h，IP=30h
…
…
code   ends
end   main
答：(  MOV  AX,DATA        )
(  MOV  SS,AX          )
(  LEA  SP,TOS         )

8.3 主程序从键盘输入一个字符串到BUFF，再输入一个字符到AL，用子程序在字符串BUFF中查找是否存在该字符，如果找到，显示发现的字符位置。用寄存器传递要查找的字符。

答：Data segment
BUFF1 db 16,?,16 dup(?),13,10,'$'
Data ends
Code segment
	 Assume cs:code,ds:data
Main proc far
Push ds
Xor ax,ax
Push ax
	  Mov ax,data
Mov ds,ax
Mov es,ax
Lea dx,BUFF1
Mov ah,10
Int 21h
mov ah,1
int 21h
Lea di,BUFF1+2
Mov cl,BUFF1+1
mov ch,0
Mov ah,0
Repne scasb
Jnz  ye
dec di
mov bx,di
Call BTH
Ye: ret
Main endp
BTH proc near
   mov cx,4
   s:rol bx,1
	 rol bx,1
	 rol bx,1
	 rol bx,1
	 mov al,bl
	 and al,0fh
	 add al,30h
	 cmp al,39h
	 jle d
	 add al,7
   d:mov dl,al
	 mov ah,2
	 int 21h
	 loop s
ret
BTH endp
Code ends
	 End main

8.4 主程序从键盘输入一个八位的二进制数，对其作求补码操作，用子程序对求补后的值以二进制形式显示。(正数的补码=输入)

答：Code segment
Assume cs:code
   Main proc far
	  Push ds
	  Xor ax,ax
	  Push ax
	  Mov bx,0
	  Mov cx,8
A:mov ah,1
  Int 21h
  Shl bx,1
Sub al,30h
Jz b     ；输入为0
INC bx   ;输入为1
B:loop a
Test bx,0080h
Jz   d
XOR bx,00FFh ;取反
INC bx
D:Call disp
Ret
Main endp
disp proc near
   mov cx,8
   shl bx,cl
 ls1:shl bx,1
	 jnc k30
	 mov dl,31h
 jmp outb
k30: mov dl,30h
outb:mov ah,2
	 int 21h
	 loop ls1
ret
disp endp
code ends
	 end main

8.5 主程序从键盘（连续）输入两个四位的十六进制数A和B，用子程序作十六进制计算A+B，并显示计算结果(二进制)。

答：

data segment
   A dw ?
	B dw ?
data ends
Code segment
	 Assume cs:code,ds:data
Main proc far
	Push ds
	Xor ax,ax
	Push ax
	Mov  ax,data
   Mov ds,ax
   Call INH ;输入十六进制数到BX寄存器
	Mov A，bx
	Call INH ;输入十六进制数到BX寄存器
	Mov B,bx
	Call ad
	Ret
Main endp
INH proc near
		 mov   bx，0             ；初始化
mov   ch，4
		mov   cl，4
inchr： mov   ah，1             ；键盘输入
int   21h
cmp   al，30h           
jl    exit              ；非法输入
cmp   al，39h
jle   dig               ；输入是数字0～9
cmp   al，41h
jl    exit              ；非法输入
cmp   al，46h
jg    exit              ；非法输入
sub   al，37h           ；输入是大写a～f
jmp   ls4
dig： sub   al，30h
ls4： shl   bx，cl
add   bl，al
dec   ch
jnz   inchr
	  exit: ret
INH endp
Ad  proc near
Mov ax,a
Mov bx,b
Add bx,ax
Call disp
	Ret 
Ad endp
disp proc near
	 mov cx,16
ls1: shl bx,1
	 jnc l30
	 mov dl,31h
 jmp outb
l30; mov dl,30h
outb: mov ah,2
	  int 21h
	  loop ls1
	  ret
disp endp
Code ends 
	 End main

8.6 某字数组为有符号数，第一个单元为元素个数N，后面为N个元素，编写通用子程序，求数组元素中的最大值，并把它放入MAX单元。

答：MAX_p proc near
  Mov di,[bx]     ;个数地址
Mov si,[bx+2]   ;数组地址
Mov cx,[di]
Mov di,MAX
Xor ax,ax
Next:cmp di,[si]
	 Jg a
	 Mov di,[si]
   A: Add si,2
	 Loop next
 Mov MAX,di
ret
MAX_p endp

8.7 设有一个数组存放学生的成绩（0 ~ 100），编制一个子程序统计0 ~ 59分、60 ~ 69分、70 ~ 79分、80 ~ 89分、90 ~ 100分的人数，并分别存放到scoreE、scoreD、score C、score B及score A单元中。编写一个主程序与之配合使用。 
答：
data segment
Array db 6,9,65,78,68,86,93  ;6为学生人数，后面为6个成绩
ScoreE db ?
scoreD db ?
scoreC db ?
scoreB db ?
scoreA db ?
Data ends
Code segment
	 Assume cs:code,ds:data
Main proc far
Mov ax,data
Mov ds,ax
Mov cl,array
mov ch,0
Call class
Ret
Main endp
Class proc near
Lea si, array
next:
inc si
Mov bl, [si]
Cmp bl,60
Jl e
Cmp bl,70
Jl d
Cmp bl,80
Jl k
Cmp bl,90
Jl b
Mov dl, scoreA
Inc dl
Mov scoreA,dl
loop  next
jmp exit
B: Mov dl, scoreB
Inc dl
Mov scoreB,dl
loop next
jmp exit
k: Mov dl, scoreC
Inc dl
Mov scoreC,dl
loop next
jmp exit
D: Mov dl, scoreD
Inc dl
Mov scoreD,dl
loop next
jmp exit
E: Mov dl, scoreE
Inc dl
Mov scoreE,dl
loop next
jmp exit
exit:ret
class endp
Code ends
	 End main

8.8 用多模块程序设计一个简单的计算器程序，实现整数的加减乘除。运算符可以为：+,-,*,/,=。

答：
public  num1,num2,res
extrn   ad:far,su:far,mu:far,dv:far,el:far
data    segment
num1   db   ?
num2   db   ?
res    dw   ?
data    ends
code    segment
assume  cs:code,ds:data
main proc far 
push ds
sub  ax,ax
push ax
mov  ax,data             
mov  ds,ax
call DTOB
mov num1,bx
call DTOB
mov num2,bx
mov ah,1
int 21h
cmp dl,’+’
jz a
cmp dl,’-’
jz s
cmp dl,’*’
jz m
cmp dl,’/’
jz d
cmp dl,’=’
call el
jmp exit
		   a:call ad
			 jmp exit
		   s:call su
			 jmp exit
		   m:call mu
			 jmp exit
		   d:call dv
		exit:ret
main 	  endp
dtob        proc  near
mov  bx, 0
input:      mov  ah, 1                ；键盘输入
			int  21h
			sub  al, 30h              ；把ascii码转变为数值
jl  exit                  ；如不是数则退出
cmp  al, 9
jg  exit                  ；如不是数则退出
cbw                       ；扩展为字
xchg  ax,  bx             ；交换寄存器
mov  cx, 10
mul  cx                   ；a(n)= a(n-1)×10   
xchg  ax, bx              ；交换寄存器
add  bx,  ax              ；a(n)＝a(n)＋b(n)
jmp  input
exit:       ret
dtob        endp
code     ends
end main
；------------------
public  ad
extrn   num1:byte,num2:byte,res:word
code    segment
assume  cs:code
ad   proc  near
		mov ah,0
mov al,num1
add al,num2
adc ah,0
mov res,ax
		ret
order   endp
su   proc  near
		mov ah,0
mov al,num1
sub al,num2
sbb ah,0
mov res,ax
		ret
su   endp
mu   proc  near
mov al,num1
mul num2
mov res,ax
		ret
mu   endp
dv   proc  near
mov al,num1
div num2
mov res,ax
		ret
dv   endp
el   proc  near
mov al,num1
cmp al,num2
jz z
mov res,0FFFFH   ;不相等
jmp exit
		  z: mov res,0         ;相等
   exit:ret
el   endp
code    ends
end    

8.9 从键盘输入姓名和电话号码，建立通讯录，通讯录的最大容量为9条记录，程序结束时无须保留通讯录，但程序运行时要保留通讯录信息。程序的人机界面和顺序要求如下：

(1)提示信息INPUT NAME：(调用子程序INNAME录入姓名，序号自动产生)
(2)提示信息INPUT TELEPHONE NUMBER：(调用子程序INTELE录入电话号码)
(3)提示信息INPUT 序号：(调用子程序PRINT显示某人的姓名和电话号码，如果序号不存在，则提示信息 NO THIS NUMB )。
答：Inform struc
  Sn   db  ?
  Name db ‘??????’
  Telen  db  ‘???????????’
Inform ends
Data segment
   Array struc 9 dup(<>)
   Name db ‘INPUT NAME $’
   TEL  db  ‘INPUT TELEPHONE NUMBER $’
   number db   ‘INPUT SEQUENCE NUMBER $’
   err    db   ‘NO THIS NUMB $’
Data ends
code segment
	 assume cs:code,ds:data
main proc far
  push ds
  xor ax,ax
  push ax
 mov ax,data
mov ds,ax
mov cx,0
a:
  call inname
  call intele
  inc cx
  cmp cx,9
  jl a
call print
ret
main endp
inname proc near
push cx  
lea dx,name
  mov ah,9
  int 21h
  mov al, size array
 mul cl
 mov bx,ax
add bx,array
mov [bx].sn,cl
mov di,0
a:mov ah,1
   int 21h
   mov [bx].name[di],al
   inc di
   cmp di,6
   jl a
   pop cx
ret
inname endp
intele proc near
push cx  
lea dx,tel
  mov ah,9
  int 21h
 mov al, size array
 mul cl
 mov bx,ax
add bx,array
mov di,0
a:mov ah,1
   int 21h
   mov [bx].telen[di],al
   inc di
   cmp di,13
   jl a
   pop cx
ret
intele endp
print proc near
lea dx,number
  mov ah,9
  int 21h
mov ah,1
   int 21h
  cmp al,0
  jl ex
  cmp al,8
  jg ex
mov cl,al
  mov al, size array
  mul cl
  mov bx,ax
add bx,array
 mov dx,bx
 mov ah,9 
int 21h
mov dl,13
mov ah,2
 int 21h
mov dl,10
mov ah,2
int 21h
lea dx,[bx].telen
mov ah,9
int 21h
jmp r
ex: lea dx,err
	mov ah,9 
	int 21h
r:
ret
print endp
code ends
	 end main