习题解答汇编程序部分

popdx
dec si；目的数据位移量减1
jnz again
mov dbcd, dl；存个位数（< 10）
.exit 0
end
3.27解（不需调用HTOASC子程序）：
again:mov ah,1
int 21h
cmp al,1bh；ESC的ASCII码是1bh
je done
mov dl,al
mov ah,2
start:mov ax,0040h；送段地址
mov ds, ax
mov si, 0；偏移地址
mov cx, si；计数（循环次数）
xor ax, ax；空格计数器清零
again:cmp byte ptr [si], 20h；与空格的ASCII码比较
jne next；不是空格，转
inc ax；是空格，空格数加1
int 21h；是大写字母则转换为小写字母
jmp again
done:…
3.28请按如下说明编写子程序：
；子程序功能：把用ASCII码表示的两位十进制数转换为对应二进制数
；入口参数：DH＝十位数的ASCII码，DL＝个位数的ASCII码
；出口参数：AL＝对应的二进制数
答：
asctobproc
push cx
int 21h；显示个位数
pop dx
ret
dispascendp
2.25编写一个程序段：先提示输入数字“Input Number：0 ~ 9”，然后在下一行显示输入的数字，结束；如果不是键入了0 ~ 9数字，就提示错误“Error!”，继续等待输入数字。
答：
；数据段
inmsgdb‘Input Number：0 ~ 9’,0dh,0ah,’$’
⑸有一个100个字节元素的数组，其首地址为array，将每个元素减1（不考虑溢出或借位）存于原处。
mov cx,100
mov bx,0
again:sub array[bx],1
inc bx
loop again
2.21AAD指令是用于除法指令之前，进行非压缩BCD码调整的。实际上，处理器的调整过程是：AL←AH×10＋AL，AH←0。如果指令系统没有AAD指令，请用一个子程序完成这个调整工作。
push cx
push dx
push ax
mov cl,4；转换高位
shr al,cl
call HTOASC
mov dl,al；显示
mov ah,2
int 21h
pop ax；转换低位
call HTOASC
mov dl,al；显示
mov ah,2
int 21h
mov dl,’H’；显示一个字母“H”
mov ax, word ptr buffer1
sub ax, word ptr buffer2
；先减低16位
mov dx, word ptr buffer1+2
sbb dx, word ptr buffer2+2
；后减高16位，需减低16位的借位
⑶编写一个程序段，在DX高4位全为0时，使AX＝0；否则使AX＝－1。
ermsgdb‘Error!’,’$’
；代码段
mov dx,offset inmsg
mov ah,9
int 21h；显示输入数字0～9
again:mov ah,1
int 21h；接受一个字符
cmp al,’0’；判断是否输入的是数字0～9
jb erdisp
cmp al,’9’
ja erdisp
mov dl,al
int 21h；显示溢出信息
jmp done；然后，跳出循环体
next:add bx,2
loop again
mov wordsum,ax
done:…
3.25编程把—个16位无符号二进制数转换成为用8421BCD码表示的5位十进制数。转换算法可以是：用二进制数除以10000，商为“万位”，再用余数除以1000，得到“千位”；依次用余数除以l00、10和l，得到“百位”、“十位”和“个位”。
test dx,0f000h
jz next
mov ax,-1
jmp done
next:mov ax,0
done:…
⑷把DX.AX中的双字右移4位
答：
mov cxΒιβλιοθήκη 4again:shr dx,1；右移一位，移出的低位进入CF标志
rcr ax,1；将CF移进AX高位，同时实现AX右移
loop again；循环4次，实现4位右移
mov dl,al
mov ah,2
int 21h；显示
3.17解：
mov bx,offset LEDtable
mov al,lednum
xlat
3.18解：
mov ax, bufX
cmp ax, bufY
jae done
mov ax, bufY
done:mov bufZ, ax
3.19解：
.model small
ret;子程序返回
HTOASCendp
3.30解：
lucaseproc
push bx
mov bx,offset string
cmp al,0
je case0
cmp al,1
jz case1
cmp al,2
jz case2
jmp done
case0:cmp byte ptr [bx],0
je done
.data
b_datadb 12h,45h,0f3h,6ah,20h,0feh,90h,0c8h,57h,34h；原始数据
numequ 10；数据个数
sumdb ?；预留结果单元
.code
.startup
xor si, si；位移量清零
xor al, al；取第一个数
mov cx, num；累加次数
cmp ax,bufY
je next1
dec dl
next1:cmp ax,bufZ
je next2
dec dl
next2:mov ah,2
int 21h
3.21解：
;代码段
mov al,number
mov bx,0;BX←记录为1的位数
restart:cmp al,0;AL＝0结束
jz done
again:shr al,1;最低位右移进入CF
next:inc si；修改地址指针
loop again；cx＝cx－1，如cx＝0退出循环
.exit 0
endstart
3.24编写计算100个16位正整数之和的程序。如果和不超过16位字的范围（65535），则保存其和到wordsum，如超过则显示‘overflow’。
答：
；数据段
countequ 100
again:add al, b_data[si]；累加
inc si；指向下一个数
loop again；如未完，继续累加
mov sum, al；完了，存结果
.exit 0
end
3.23求主存0040h：0开始的一个64KB物理段中共有多少个空格?
; wjxt323.asm
.model small
.code
aadpproc
push bx
shl ah,1
mov bl,ah
shl ah,1
shl ah,1
add bl,ah
add al,bl
mov ah,0
pop bx
ret
aadpendp
2.23答：
htoascproc
push dx
and al,0fh
aad al,90h
daa
adc al,40h
daa
.stack
.data
bufXdw -7
signXdb ?
.code
.startup
cmp bufX,0;test bufX,80h
jl next;jnz next
mov signX,0
jmp done
next:mov signX,-1
done:.exit 0
end
3.20解：
mov dl,’2’
mov ax,bufX
jc next;为1，转移
inc bx;不为1，继续
jmp again
next:push ax
push bx
shl bx,1;位数乘以2（偏移地址要用2个字节单元）
jmp addrs[bx];间接转移：IP←[table＋BX]
;以下是各个处理程序段
fun0:mov dl,'0'
jmp disp
fun1:mov dl,'1'
mov ah,2
int 21h；显示输入的数字
jmp done；结束
erdisp:mov dx,offset ermsg
mov ah,9
int 21h；显示输入错误
jmp again；继续输入
done:…
第
3.16解：
mov ah,1；只允许输入小写字母
int 21h
sub al,20h；转换为大写字母
;wjxt325.asm
.model small
.stack 256
.data
arraydw ?；源字数据
dbcddb 5 dup(?)；五位bcd结果，高对高低对低
.code
.startup
mov dx, array；取源数据（余数）
mov bx, 10000；除数
mov cx, 10；除数系数
mov si, 4；目的数据高位位移量