L2: L3:
jne LN pop edi mov al,'Y' jmp L3 pop edi inc edi loop L1 mov al,'N' call dispc
〔习题4.16〕
主存中有一个8位压缩BCD码数据，保存在一个双字变量中。现在需要进行显示，但要求不显示前导0。由于位数较多，需要利用循环实现，但如何处理前导0和数据中间的0呢？不妨设置一个标记。编程实现。 〔解答〕
bcd goon: again: disp: next: done:
; 数据段 dword 00371002h ; 代码段 mov esi,bcd cmp esi,0 jnz goon mov al,'0' call dispc jmp done mov ecx,8 xor ebx,ebx rol esi,4 mov eax,esi and eax,0fh cmp ebx,0 jnz disp cmp eax,0 jz next mov ebx,1 add al,30h call dispc loop again
; EAX＝0，说明是前导0，不显示 ; EAX≠0，没有前导0了，令EBX＝1≠0 ; EAX低4位保存当前要显示的BCD码 ; EBX≠0，说明不是前导0，要显示 ; EBX＝0，说明可能是前导0 ; EBX＝0，表示可能是前导0
〔习题4.17〕
已知一个字符串的长度，剔除其中所有的空格字符。请从字符串最后一个字符开始逐个向前判断、并进行处理。 〔解答〕
string
; 数据段
byte 'Let us have a try !',0dh,0ah,0 ; 代码段
mov ecx,sizeof string cmp ecx,2 jb done lea eax,string call dispmsg
; 显示处理前的字符串
－ －21
outlp: inlp: next: done:
mov esi,ecx dec esi
cmp string[esi],' ' jnz next mov edi,esi dec ecx inc edi
mov al,string[edi] mov string[edi-1],al cmp edi,ecx jb inlp dec esi cmp esi,0 jnz outlp lea eax,string call dispmsg
; 为0结束
; 显示处理后的字符串 ; 继续进行 ; 前移一个位置 ; 检测是否是空格 ; 不是空格继续循环 ; 是空格，进入剔除空格分支
〔习题4.18〕
第3章习题3.14在屏幕上显示ASCII表，现仅在数据段设置表格缓冲区，编程将ASCII代码值填入留出位置的表格，然后调用显示功能实现（需要利用双重循环）。 〔解答〕
table tab1 start: again0: again1:
mov eax,offset table call dispmsg exit 0 add ebx,2 add edx,1 dec esi jnz again0
mov ebx,offset tab1 mov edx,'| 02' mov ax,2020h mov esi,6 mov [ebx],edx add ebx,4 mov ecx,16
mov word ptr [ebx],ax add ebx,2 inc al loop again1 byte 0 .code
include io32.inc .data
byte ' |0 1 2 3 4 5 6 7 8 9 A B C D E F',13,10 byte '---+-------------------------------',13,10 byte 6 dup(36 dup(?),13,10)
－ －22
end start
〔习题4.19〕
请按如下说明编写子程序：
子程序功能：把用ASCII码表示的两位十进制数转换为压缩BCD码 入口参数：DH＝十位数的ASCII码，DL＝个位数的ASCII码 出口参数：AL＝对应BCD码 〔解答〕
asctob asctob
proc shl dh,4 mov al,dh and dl,0fh or al,dl ret endp
〔习题4.20〕
乘法的非压缩BCD码调整指令AAM执行的操作是：AH←AL÷10的商，AL←AL÷10的余数。利用AAM可以实现将AL中的100内数据转换为ASCII码，程序如下：
xor ah,ah aam
add ax,3030h
利用这段程序，编写一个显示AL中数值（0～99）的子程序。 〔解答〕
disp99 disp99
proc xor ah,ah aam
add ax,3030h push ax mov al,ah call dispc pop ax call dispc ret endp
〔习题4.21〕
编写一个源程序，在键盘上按一个键，将其返回的ASCII码值显示出来，如果按下ESC键（对应ASCII码是1BH）则程序退出。请调用书中的HTOASC子程序。 〔解答〕
again:
; 代码段，主程序 call readc cmp al,1bh jz done mov bl,al mov al,':' call dispc mov al,bl rol al,4 call htoasc call dispc
; 调用子程序 ; 显示一个字符
－ －23
done:
mov al,bl call htoasc call dispc call dispcrlf jmp again
; 调用子程序 ; 显示一个字符
〔习题4.22〕
编写一个子程序，它以二进制形式显示EAX中32位数据，并设计一个主程序验证。 〔解答〕
dispbd dbd: dispbd
; 代码段，主程序 mov eax,8F98FF00H call dispbd ; 代码段，子程序 proc push ecx push edx mov ecx,32 rol eax,1 push eax and al,01h add al,30h call dispc pop eax loop dbd pop edx pop ecx ret endp
; 取AL最低位
; 转化成相应的ASCLL码值 ; 以二进制的形式显示 ; 要输出的字符个数 ; AL循环左移一位 ; 32位二进制数的输出 ; 调用子程序
〔习题4.23〕
将例题4-16的32位寄存器改用16位寄存器，仅实现输出－215～＋215－1之间的数据。 〔解答〕
array again:
mov ax,array[ebx*2] call write call dispcrlf
inc ebx ;此时ebx代表array中的第几个数 dec ecx ;此时ecx代表循环的次数 jnz again
; 代码段，子程序
write proc ;子程序开始 push ebx push ecx push edx
; 数据段
word 12345,-1234,32767,-32768,0,667 ; 代码段，主程序 mov ecx,lengthof array mov ebx,0
writebuf byte 6 dup(0)
－ －24