80x86匯編語言程序設計(第2版)習題答案(編輯修改稿)

　

【文章內容簡介】 0 dup (?)Msg1 db 39。Input a String: 39。, 39。$39。Msg2 db 0dh, 0ah, 39。Yes39。, 39。$39。Msg3 db 0dh, 0ah, 39。No39。, 39。$39。dseg endscseg segment assume cs:cseg, ds:dsegStart: mov ax, dseg mov ds, ax lea dx, Msg1 call DispMsg lea dx, String mov ah, 0ah int 21h lea si, String + 2 mov cl, String + 1 xor ch, ch call Digits cmp al, 0 jnz Yes lea dx, Msg3 jmp DispYes: lea dx, Msg2Disp: call DispMsg mov ah, 4ch int 21h。 功能：顯示DS:DX所指的字符串DispMsg proc push ax mov ah, 9 int 21h pop ax retDispMsg endp。 入口參數：DS:SI = 字符串首地址。 CX = 字符串長度。 出口參數：AL。若DS:SI所指字符串為數字串，則AL = 1；否則，AL = 0。Digits proc push cx push si xor al, al Next: cmp byte ptr [si], 39。039。 jb Done cmp byte ptr [si], 39。939。 ja Done inc si loop Next mov al, 1Done: pop si pop cx retDigits endpcseg ends end Start63SumOfArray proc push cx push dx push si mov dx, cx shl dx, 1 add dx, 2 xor ax, axNext: add ax, [si] add si, dx loop Next pop si pop dx pop cx retSumOfArray endp64入口參數：DS:SI = 以遞增排序的帶符號字數組的首地址CX = 元素個數AX = 帶符號數功能：采用折半查找算法，在DS:SI所指數組中，查找AX中的帶符號數。出口參數：若找到，則CF = 0，且BX = 該元素在數組中的序號（0，1，2，．．．）；否則，CF = 1。65 MaxAbs proc push ax push cx push si xor ax, axNext: test word ptr [si], 8000h jz Ok neg word ptr [si]Ok: cmp [si], ax jle Skip mov ax, [si] mov di, siSkip: add si, 2 loop Next push ds pop es pop si pop cx pop ax ret MaxAbs endp66dseg segmentN dw 100SumN dw ?dseg endscseg segment assume cs:cseg, ds:dsegStart: mov ax, dseg mov ds, ax push ax push N call Sum pop SumN mov ah, 4ch int 21hSum proc push bp mov bp, sp push ax push cx mov cx, 4[bp] mov ax, 0Next: add ax, cx loop Next mov 6[bp], ax pop cx pop ax pop bp ret 2Sum endpcseg ends end Start67 Print proc far push bp mov bp, sp push ax push bx push dx push es les bx, 2[bp] PutChar: mov dl, es:[bx] cmp dl, 0 jz EndString mov ah, 2 int 21h inc bx jmp PutCharEndString: inc bx mov 2[bp], bx pop es pop dx pop bx pop ax pop bp retPrint endp68 函數CFunc1對應的匯編語言代碼如下：Para_i equ 4[bp] Para_j equ 6[bp] Para_k equ 8[bp] CFunc1 proc near push bp mov bp, sp push ax push bx mov bx, Para_i mov ax, Para_j add ax, Para_k mov [bx], ax pop bx pop ax pop bp ret 6CFunc1 endp調用語句CFunc1(a, 3, 4)。 對應的匯編語言代碼如下： mov ax, 4 push ax mov ax, 3 push ax mov ax, offset a push ax call CFunc169dseg segmentI dw ?J dw 6K dw 2dseg endscseg1 segment assume cs:cseg1, ds:dsegStart: mov ax, dseg mov ds, ax call Addition dd I, J, K mov ah, 4ch int 21hcseg1 endscseg2 segment assume cs:cseg2Addition proc far push bp mov bp, sp push ax push bx push si push ds push es lds si, [bp+2] 。 取返回地址CS:IP到DS:SI les bx, [si+4] 。 取J的地址到ES:BX mov ax, es:[bx] 。 取J的值 les bx, [si+8] 。 取K的地址到ES:BX add ax, es:[bx] les bx, [si] 。 取I的地址到ES:BX mov es:[bx], ax 。 存儲結果 add si, 12 mov [bp+2], si 。 修改返回地址 pop es pop ds pop si pop bx pop ax pop bp retAddition endpcseg2 ends end Start610 call ProcPtr[ebx*4]611dseg segmentN dw 100SumN dw ?dseg endssseg segment stack dw 1024 dup (?)sseg endscseg segment assume cs:cseg, ds:dseg, ss:ssegStart: mov ax, dseg mov ds, ax push ax push N call Sum mov SumN, ax mov ah, 4ch int 21h。 入口參數：N（16位，調用前進棧）。 出口參數：AX = Sum(N)Parm_N equ 4[bp]Sum proc push bp mov bp, sp mov ax, Parm_N cmp ax, 0 jz Exit dec ax push ax 。 參數N1進棧 call Sum add ax, Parm_N 。 N + Sum(N1)Exit: pop bp ret 2Sum endpcseg ends end Start第7章71CrLf macro push ax push dx mov dl, 0dh mov ah, 2 int 21h mov dl, 0ah mov ah, 2 int 21h pop ax endm72MoveStr macro From, To local Next, Done push ax push si push di lea si, From lea di, ToNext: mov al, [si] mov [di], al cmp al, 0 jz Done inc si inc di jmp NextDone: pop di pop si pop ax endm73（1） mov cl, 4 shr ax, cl（2） shl bx, 174DATA = 0 repeat 100 dw 0 dw DATADATA = DATA + 2 endm75（1）dseg segmentMsg1 db 39。Message No. 1$39。Msg2 db 39。Message No. 2$39。Msg3 db 39。Message No. 3$39。Msg4 db 39。Message No. 4$39。Msg5 db 39。Message No. 5$39。dseg ends（2）dseg segment forc No, 12345 MsgN No endmdseg ends（3）dseg segmentNo = 1 repeat 5 MsgN %NoNo = No + 1 endmdseg ends76宏定義：InitSeg macro DsegName, EsegName push ax mov ax, DsegName mov ds, ax ifnb EsegName mov ax, EsegName mov es, ax endif pop ax endm宏調用例：（1）將DS與ES的值分別設置為dseg與eseg段的段地址。InitSeg dseg, eseg（2）將DS的值設置為dseg段的段地址。InitSeg dseg77 相同之處：都只有1個段。不同之處：TINY模型的段是16位，長度≤64KB；FLAT模型的段是32位，長度≤4GB。78 段裝入內存的順序如下。段SSEG：由模塊1和模塊3的段SSEG組合而成，類別為39。STACK39。段DSEG：由模塊1和模塊3的段DSEG組合而成，類別為39。 DATA39。段DSEG：模塊2的私有段DSEG，類別為39。 DATA39。段CSEG1：模塊1的段CSEG，類別為39。 CODE39。段CSEG2：模塊2的段CSEG，類別為39。 CODE39。段CSEG3：模塊3的段CSEG，類別為39。 CODE39。79（1）GRADE structScore dw ? 。 成績Rank dw ? 。 名次GRADE endsdseg segment para public 39。data39。Scores dw 60, 90, 30, 60, 90LEN = ( $ Scores ) / 2Grades GRADE LEN dup ( {, 1 } ) dseg endscseg segment para public 39。code39。 assume cs:cseg, ds:dsegStart: mov ax, dseg mov ds, ax。 設置Grades的初始值 mov si, 0 mov di, 0 mov cx, LENInit: mov ax, Scores[si] mov Grades[di].Score, ax add si, 2 add di, type GRADE loop Init lea si, Grades mov cx, LEN call Ranking mov ah, 4ch int 21h。 入口參數：DS:SI = GRADE結構數組的首地址。 CX = 元素個數。 功能：求出數組中每個成績（字段Score）所處的名次，存入相應的Rank字段Ranking proc cmp cx, 1 jbe Exit push ax push cx push si push di dec cxLoop1: mov ax, [si]. push cx lea di, [si+type GRADE]Loop2: cmp ax, [di]. je Next ja Skip