【正文】 DXMOV AX,DATAMOV DS,AXSTIDEC COUNT ；5 秒計數(shù)JNZ EXITMOV DX,OFFSET MESS ；顯示信息MOV AH,09HINT 21HMOV COUNT,91 ；5 秒的值EXIT: CLIPOP DXPOP CXPOP AXPOP DSIRETDELAY ENDPCODE ENDSEND START（2）可以利用INT 1AH，讀取當(dāng)前時間的1/100 秒為隨機數(shù)。CODE SEGMENTASSUME CS:CODESTART：MOV AH,0INT 1AH ；讀取當(dāng)前時間CH：CL=時：分MOV AL,DL ；DH：DL=秒：1/100 秒MOV AH,0MOV BL,9DIV BLINC AHMOV DL,AHADD DL,30HMOV AH,2INT 21HMOV AH,4CHINT 21HCODE ENDSEND START8. 編兩個通過過程完成將AX 中存放的二進(jìn)制數(shù)轉(zhuǎn)換成壓縮型BCD 碼以及將BCD 碼轉(zhuǎn)換成二進(jìn)制數(shù)。答：（1）將AX 中的二進(jìn)制數(shù)先后除以1000，100 和10，每次除法所得的商，即是BCD 數(shù)的千位、百位和十位數(shù)，余數(shù)是個位數(shù)。子程序名：B2TOBCD輸入?yún)?shù)：AX=十六位二進(jìn)制數(shù)輸出參數(shù)：CF=0，則AX=4 位壓縮型BCD 碼。CF=1，則要轉(zhuǎn)換的數(shù)大于9999，AX 不變。使用寄存器：CX：存放除數(shù)，DX：存放中間結(jié)果。B2TOBCD PROC FARCMP AX,9999 ；AX9999，則CF 置1JBE TRANSTCJMP EXITTRAN: PUSH CXPUSH DXSUB DX,DX ；DX 清0MOV CX,1000 ；計算千位數(shù)DIV CXXCHG AX,DX ；商在DX 中，余數(shù)在AX 中MOV CL,4SHL DX,CL ；DX 左移4 位MOV CL,100 ；計算百位數(shù)DIV CLADD DL,AL ；百位數(shù)加到DL 中，DX 左移4 位MOV CL,4SHL DX,CLXCHG AL,AH ；余數(shù)保留在AL 中SUB AH,AHMOV CL,10 ；計算十位數(shù)DIV CLADD DL,AL ；十位數(shù)加到DL 中，DX 左移4 位MOV CL,4SHL DX,CLADD DL,AH ；加個位數(shù)MOV AX,DX ；結(jié)果送到AX 中POP DXPOP CXEXIT: RETB2TOBCD ENDP（2）將AX 中4 位BCD 碼順序乘以1000，100，10 和1，然后求和即得。子程序名：BCDTOB2輸入?yún)?shù)：AX=4 位壓縮BCD 碼輸出參數(shù)：AX=十六位二進(jìn)制數(shù)使用寄存器：BX：暫存數(shù)據(jù)，CX：存放乘數(shù)，DX：存放中間結(jié)果BCDTOB2 PROC FARPUSH BXPUSH CXPUSH DXMOV BX,AXMOV CL,4ROL AX,CLAND AX,000FHMOV CX,1000 ；乘以1000MUL CXMOV DX,AXMOV AX,BXMOV CL,8ROL AX,CLAND AX,000FHMOV CL,100 ；乘以100MUL CLADD DX,AXMOV AX,BXMOV CL,4SHR AX,CLAND AX,000FHMOV CL,10 ；乘以10MUL CLADD DX,AXAND BX,000FHADD DX,BXMOV AX,DXPOP DXPOP CXPOP BXRETBCDTOB2 ENDP9. 編寫兩個通用過程，一個完成ASCII 碼轉(zhuǎn)換成二進(jìn)制數(shù)功能，另一個完成ASCII 字符顯示輸出功能。答：（1）將AX 中兩位ASCII 碼先轉(zhuǎn)化成數(shù)字，然后AH*10+AL。子程序名：ASCIITOB2輸入?yún)?shù)：AX=2 位ASCII 碼輸出參數(shù)：AX=轉(zhuǎn)換后二進(jìn)制數(shù)使用寄存器：BX，CX，DXASCIITOB2 PROC FARPUSH BXPUSH CXPUSH DXMOV BX,AXSUB AH,30HMOV AL,AHMOV CL,10 ；乘以10MUL CLMOV DX,AXMOV AX,BXSUB AL,30HMOV AH,0ADD AX,DXPOP DXPOP CXPOP BXRETASCIITOB2 ENDP（2）使用2 號DOS 功能調(diào)用顯示字符。子程序名：DISPLAY輸入?yún)?shù)：AX=2 位ASCII 碼輸出參數(shù)：無使用寄存器：BX，DXDISPLAY PROC FARPUSH BXPUSH DXMOV BX,AXMOV DL,AHMOV AH,2INT 21HMOV AX,BXMOV DL,ALMOV AH,2INT 21HPOP DXPOP BXRETDISPLAY ENDP10. 編制兩個通用過程，完成十六進(jìn)制數(shù)轉(zhuǎn)換成ASCII 碼并將ASCII 碼字符顯示。答：（1）子程序名：HEXTOASC輸入?yún)?shù)：AX：4 位十六進(jìn)制數(shù)輸出參數(shù)：DX,AX：4 位ASCII 碼,DX 高2 位，AX 低2 位使用寄存器：BX,CX,DXHEXTOASC PROC FARPUSH BXPUSH CXPUSH DXMOV BX,AXMOV CL,4 ；轉(zhuǎn)換AH 高4 位SHR AX,CLAND AX,0F00HADD AH,30HCMP AH,3AHJB A1ADD AH,7A1: MOV DH,AHMOV AX,BX ；轉(zhuǎn)換AH 低4 位AND AX,0F00HADD AH,30HCMP AH,3AHJB A2ADD AH,7A2: MOV DL,AHMOV BH,BL ；轉(zhuǎn)換AL 高4 位MOV CL,4SHR BL,CLADD BL,30HCMP BL,3AHJB A3ADD BL,7A3: MOV AH,BLAND BH,0FH ；轉(zhuǎn)換AL 低4 位ADD BH,30HCMP BH,3AHJB A4ADD BH,7A4: MOV AL,BHPOP DXPOP CXPOP BXRETHEXTOASC ENDP（2）子程序名：DISPLAYASC輸入?yún)?shù)：DX，AX：4 位ASCII 碼輸出參數(shù)：無使用寄存器：BX,CXDISPLAYASC PROC FARPUSH BXPUSH CXMOV BX,DXMOV CX,AXMOV DL,BHMOV AH,02HINT 21HMOV DL,BLINT 21HMOV DL,CHINT 21HMOV DL,CLINT 21HMOV DL,’H’INT 21HPOP CXPOP BXRETDISPLAYASC ENDP11. 某程序可從鍵盤接收命令（0～5），分別轉(zhuǎn)向6 個子程序，子程序入口地址分別為P0～P5，編制程序，用跳轉(zhuǎn)表實現(xiàn)分支結(jié)構(gòu)。答： DATA SEGMENTTABLE DW 6 DUP(?)DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATASTART: MOV AX,DATAMOV DS,AXLEA SI, TABLEMOV WORD PTR[SI],OFFSET P0MOV WORD PTR[SI+2],OFFSET P1MOV WORD PTR[SI+4],OFFSET P2MOV WORD PTR[SI+6],OFFSET P3MOV WORD PTR[SI+8],OFFSET P4MOV WORD PTR[SI+10],OFFSET P5MOV AH,1INT 21HSUB AL,30HSHL AL,1MOV AH,0MOV SI,AXJMP TABLE[SI]P0:P1：P2:P3:P4:P5:MOV AH,4CHINT 21HCODE ENDSEND START12. 在首地址為TABLE 的數(shù)組中按遞增次序存放著100 個16 位補碼數(shù)，編寫一個程序，把出現(xiàn)次數(shù)最多的數(shù)及其出現(xiàn)次數(shù)分別存放于AX 和BL 中。答： DATA SEGMENTTABLE DW 100 DUP (?) ；數(shù)組中的數(shù)據(jù)是按增序排列的NUM DW ?COUNT DW 0DATA ENDSCODE SEGMENTMAIN PROC FARASSUME CS: CODE, DS: DATASTART: PUSH DS ；設(shè)置返回DOSSUB AX, AXPUSH AXMOV AX, DATAMOV DS, AX ；給DS 賦值BEGIN: MOV CX, 100 ；循環(huán)計數(shù)器MOV SI, 0NEXT: MOV DX, 0MOV AX, TABLE[SI]COMP: CMP TABLE [SI], AX ；計算一個數(shù)的出現(xiàn)次數(shù)JNE ADDRINC DXADD SI, 2LOOP COMPADDR: CMP DX, COUNT ；此數(shù)出現(xiàn)的次數(shù)最多嗎？JLE DONEMOV COUNT, DX ；目前此數(shù)出現(xiàn)的次數(shù)最多，記下次數(shù)MOV NUM, AX ；記下此數(shù)DONE: LOOP NEXT ；準(zhǔn)備取下一個數(shù)MOV CX, COUNT ；出現(xiàn)最多的次數(shù)存入(CX)MOV AX, NUM ；出現(xiàn)最多的數(shù)存入(AX)RETMAIN ENDPCODE ENDS ；以上定義代碼段END START13. 將鍵盤上輸入的十六進(jìn)制數(shù)轉(zhuǎn)換成十進(jìn)制數(shù)，在屏幕上顯示。答：DATA SEGMENTSTRING DB 39。INPUT 4 HEX NUM:39。,0AH,0DH,39。$39。NUM DB 10 DUP(?)DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATASTART: MOV AX,DATAMOV DS,AXLEA DX,STRING ；顯示提示信息MOV AH,9INT 21HMOV BP,4MOV DX,0CONT: MOV CL,4 ；輸入4 位十六進(jìn)制數(shù)??DXSHL DX,CLD1: MOV AH,1INT 21HCMP AL,39。039。JB D1CMP AL,39。F39。JA D1CMP AL,39。A39。JB A1SUB AL,7A1: SUB AL,30HMOV AH,0ADD DX,AXDEC BPJNZ CONTMOV SI,0 ；將DX 轉(zhuǎn)換成十進(jìn)制數(shù)，再轉(zhuǎn)換成ASCII 碼—NUMMOV AX,DXMOV DX,0MOV BX,10D2: DIV BXADD DL,30HMOV NUM[SI],DLINC SICMP AX,0JZ EXITMOV DX,0JMP D2EXIT: MOV DL,0AH ；顯示十進(jìn)制數(shù)MOV AH,2INT 21HMOV DL,0DHINT 21HD3: DEC SIMOV DL,NUM[SI]MOV AH,2INT 21HJNZ D3MOV AH,4CHINT 21HCODE ENDSEND START14. 將AX 中的無符號二進(jìn)制數(shù)轉(zhuǎn)換成ASCII 字符串表示的十進(jìn)制數(shù)。答：將13 題輸入過程和輸出過程去掉即得。DATA SEGMENTNUM DB 10 DUP(?) ；轉(zhuǎn)換后ASCII 碼按倒序存放于NUMDATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATASTART: MOV AX,DATAMOV DS,AXMOV AX, ；無符號二進(jìn)制數(shù)MOV SI,0 ；將AX 轉(zhuǎn)換成十進(jìn)制數(shù)，再轉(zhuǎn)換成ASCII 碼—NUMMOV DX,0MOV BX,10D2: DIV BXADD DL,30HMOV NUM[SI],DLINC SICMP AX,0JZ EXITMOV DX,0JMP D2EXIT: MOV AH,4CHINT 21HCODE ENDSEND START15. 從鍵盤輸入20 個有符號數(shù)，將它們排序并在屏幕上顯示。答：DATA SEGMENTNUM DW 20 DUP(?) ；存放20 個有符號數(shù)ASC DB 10 DUP(?) ；輸出時暫時保存每一個數(shù)的ASCII 碼DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATASTART: MOV AX,DATAMOV DS,AXMOV CX,20MOV BX,10MOV SI,0MOV BP,0BEGIN: MOV DX,0 ；輸入20 個有符號數(shù)（十進(jìn)制），并A1: MOV AH,1 ；轉(zhuǎn)化為二進(jìn)制數(shù)存放于NUM 數(shù)組INT 21HCMP AL,39。 39。 ；判斷是否空格JZ A2CMP AL,0DH ；是否回車符JZ A2CMP AL,39。39。 ；是否‘’JZ A3JMP A4A3: MOV BP,1JMP A1A4: PUSH AXMOV AX,DXMUL BX