【正文】 dDX jmp monControladdDX: ADD dx,1H cmp dx,1H je firstAXValuepare: mov bx,WORD PTR DATA[si] cmp bx,ax jge monControl mov ax,bxmonControl: ADD si,2H loop isO jmp exitfirstAXvalue: mov ax,WORD PTR DATA[si] jmp pareexit: retMAIN ENDPcode endsEND start。，要求從鍵盤上接收一個(gè)思維的十六位進(jìn)制數(shù)，并在終端上顯示與它等值的二進(jìn)制數(shù)。.model small.386.codemain proc farstart:push dsmov ax,0push ax mov ax,0mov cx,4mov dx,0input:mov ah,1Hint 21Hcmp al,30Hjl input cmp al,39H jle scmp al,61Hjl inputcmp al,66Hjg inputsub al,27Hs:sub al,30Hadd dl,alcmp cx,1Hje frol dx,4f:loop inputexit:call printretmain endpprint proc nearmov cx,10Hp: rol dx,1push dxand dx,1add dx,30Hmov ah,2int 21Hpop dxloop pretprint endpend start，其變量字符名為ENG，并以$字符結(jié)束。試編寫一程序，查對(duì)單詞SUN在該文中的出現(xiàn)次數(shù)，并以格式SUN XXXX顯示出次數(shù)。.model small .386.dataENG db 39。SUN39。s SUN JAVA39。,24H 。24H = $MESSAGE db 39。SUN:39。,39。$39。.stack 100H.codeMAIN PROC FARstart: PUSH DS AND AX,0 PUSH AX MOV AX,@data MOV DS,AX 。 MOV AX,0H MOV SI,1HsubSI1: SUB SI,1HsubSI2: SUB SI,1HpareS: ADD SI,1H MOV DL,ENG[SI] CMP DL,24H JE print CMP DL,53H JNE pareSpareU: ADD SI,1H MOV DL,ENG[SI] CMP DL,55H JNE subSI2pareN: ADD SI,1H MOV DL,ENG[SI] CMP DL,4EH JNE subSI1 INC AX JMP paresprint: LEA DX,MESSAGE PUSH AX MOV AH,09H INT 21H POP AX call showNumberexit: retMAIN ENDP。。。注意，ShowNumber這個(gè)子過程有問題，請(qǐng)自行修改。。showNumber PROC NEARcovernum: DAA MOV dx,ax MOV cl,4Hshow: ROL dx,4H push dx AND dx,0fH ADD dx,30H MOV ah,02H int 21H pop dx loop show retshowNumber ENDPEND start $為結(jié)束副的字符串，然后對(duì)其中的非數(shù)字字符計(jì)數(shù)，并顯示出計(jì)數(shù)結(jié)果。.model small.386.codeMAIN PROC FARstart: push ds mov ax,0 push ax mov cx,0input: mov ah,1H int 21Hpare: cmp al,24H je print cmp al,30H jl addCount cmp al,39H jg addCountaddCount: add ax,1H jmp inputprint: call showNumberexit: retMAIN ENDP。。。注意，ShowNumber這個(gè)子過程有問題，請(qǐng)自行修改。。showNumber PROC NEARcovernum: DAA MOV dx,ax MOV cl,2Hshow: ROL dl,4H push dx AND dl,0fH ADD dl,30H MOV ah,02H int 21H pop dx loop show retshowNumber ENDPEND start 有一個(gè)首地址為MEM的100D字?jǐn)?shù)組，試編制程序刪除數(shù)組中所有為零的項(xiàng)，并將后續(xù)項(xiàng)向前壓縮，最后將數(shù)組的剩余部分補(bǔ)上零。.model small.386.stack 100H.datamem dw 12,0,0,0,0,0,1,2,3,6,4,7,8,2,1,0,0,54,5,0,2,4,7,8,0,5,6,2,1,4,8,5,1,45,7,5,1,2,0,2,4,0,2,54,0,12,0,0,0,0,0,1,2,3,6,4,7,8,2,1,0,0,54,5,0,2,4,7,8,0,5,6,2,1,4,8,5,1,45,7,5,1,2,0,2,4,0,2,54,0,45,7,5,1,2,0,2,4,0,2.codeMAIN PROC FARstart: push ds and ax,0 push ax mov ax,@data mov ds,ax。 mov ax,0H mov bx,64H mov cx,64H mov si,0FFFEHrepeat: ADD si,2H cmp MEM[si],0H JE calls loop repeatcalls: INC ax call sort cmp ax,1H JE lastValue DEC cx jmp repeatexit : retlastValue: mov mem[bx],0H DEC cx jmp repeatMAIN ENDPsort PROC NEARpush cxpush sisub si,2Hs:add si,2Hmov dx,mem[si]mov mem[si+2],dxloop sreturn:pop sipop cxretsort ENDPEND start第七章答： CLRB MACRO N, ARRAY CLD MOV CX, N MOV AL, 20H LEA DI, ARRAY REP STOSB ENDM 答： WAGES MACRO RATE，HOUR MOV AL，RATE MOV BL，HOUR MUL BL ；計(jì)算周工資 ； ADD AX，AX ADD AX，AX ；一個(gè)月有4周 MOV WAG，AX ；暫存中間結(jié)果 ADD BL，BL ADD BL，BL ；計(jì)算月出工小時(shí)數(shù) MOV AL，BL MOV AH，0 MOV BL，10 DIV BL MOV BL，3 MUL BL ；計(jì)算獎(jiǎng)金 ADD WAG，AX ；計(jì)算工資總數(shù) ENDM 宏展開： 1 MOV AL，R1 1 MOV BL，42 1 MUL BL 1 ADD AX，AX 1 ADD AX，AX 1 MOV WAG，AX 1 ADD BL，BL 1 ADD BL，BL 1 MOV AL，BL 1 MOV AH，0 1 MOV BL，10 1 DIV BL 1 MOV BL，3 1 MUL BL 1 ADD WAG，AX 答： (1) 調(diào)用有效 1 PUSH AX 2 MOV AX, P1 2 SUB AX, P2 1 CMP AX, 0 1 JGE ??0000 1 NEG AX 1 ??0000: MOV DISTANCE, AX 1 POP AX (2) 調(diào)用有效 1 PUSH AX 2 MOV AX, [BX] 2 SUB AX, [SI] 1 CMP AX, 0 1 JGE ??0001 1 NEG AX 1 ??0001: MOV X[DI], AX 1 POP AX (3) 調(diào)用無效，有錯(cuò)誤指令 1 ??0002: MOV 240H, AX (4) 調(diào)用有效，但無意義 宏展開略。 答： SEND MACRO SCHARS, DCHARS LOCAL NEXT, EXIT PUSH AX PUSH SI MOV SI, 0 NEXT: MOV AL, SCHARS[SI] MOV DCHARS[SI], AL CMP AL, 24H JZ EXIT INC SI JMP NEXT EXIT: POP SI POP AX ENDM 答： BIN_SUB MACRO OPERAND，COUNT，RESULT LOCAL NEXT LEA BX，OPERAND MOV CX，COUNT DEC CX MOV AL，[BX] NEXT： INC BX SUB AL，[BX] LOOP NEXT MOV RESULT，AL ENDM 答： 宏展開： 2 DATA0 DW ？ 2 DATA1 DW ？ 答： 1 MOV TAB , 0 1 MOV TAB+1, 1 1 MOV TAB+2, 2 1 MOV TAB+3, 3 1 MOV TAB+4, 4 1 MOV TAB+5, 5 1 MOV TAB+6, 6 答： STORE MACRO X IRPC X, 0123456 MOV TAB+amp。X, X ENDM ENDM 1答： FINSUM MACRO X，Y，SUM MOV AX, X MOV BX, Y .IF AX BX ADD BX, BX ADD AX, BX MOV SUM, AX .ELSE ADD AX, AX ADD AX, BX MOV SUM, AX .ENDIF ENDM 1答： DOS21 MACRO DOSFUNC，BUFF IFNB 225。BUFF? MOV AH,DOSFUNC MOV DX,OFFSET BUFF INT 21H ELSE MOV AH,DOSFUNC INT 21H ENDIF ENDM 展開宏調(diào)用： 1 MOV AH,01 1 INT 21H 1 MOV AH,0AH 1 MOV DX,OFFSET IPFIELD 1 INT 21H