【正文】 DB 128 DUP(?)STAC ENDSDATA SEGMENTSOURCE DB N DUP(?) RESULT DW N DUP(0) NAME0 DB 39。39。,0NAME1 DB 39。39。,0DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACSTART PROC FAR PUSH DS XOR AX,AX PUSH AX MOV AX,DATA MOV DS,AX LEA DX,SOURCE 。數(shù)據(jù)區(qū)起始地址 LEA SI,NAME0 。原始數(shù)據(jù)文件名 MOV CX,N 。字節(jié)數(shù) CALL LOAD 。從39。39。中讀取數(shù)據(jù)。****BEGIN**** LEA SI,SOURCE LEA DI,RESULT CLD MOV CX,N MOV BL,RATE1 MOV BH,RATE2NEXT: ___________________________ CMP AL,DELTA J_______ GREAT MUL BL JMP STOREGREAT: ___________________________MUL BH___________________________STORE: ___________________________ ___________________________ INC SI LOOP NEXT。****END**** LEA DX,RESULT 。結(jié)果數(shù)據(jù)區(qū)首址 LEA SI,NAME1 。結(jié)果文件名 MOV CX,N*2 。字節(jié)數(shù) CALL SAVE 。保存結(jié)果到文件 RETSTART ENDPCODE ENDS END START第十四題：一、請(qǐng)編制程序，其功能是：對(duì)一個(gè)由可打印ASCII字符（ASCII碼20H~7FH）組成的字符串可采用下列方法進(jìn)行壓縮：從串首開始向后掃描，如某字符單獨(dú)出現(xiàn)該字符不變，如某字符連續(xù)出現(xiàn)n次，則該字符用ESC（1BH），n，原字符三個(gè)字節(jié)來(lái)代替（假定n不超過(guò)255）。例如： 原串： 41H,43H,43H,43H,43H,43H,43H,61H,00H（“ACCCCCCa”） 壓縮后： 41H,1BH,06H,43H,61H,00H 設(shè)內(nèi)存中從SOURCE開始有一字符串，其以00H結(jié)束，長(zhǎng)度不超過(guò)100。試編程對(duì)其進(jìn)行壓縮，結(jié)果存入RESULT開始的內(nèi)存單元。 　 試題程序： EXTRN LOAD:FAR,SAVE:FARN EQU 100ESC_CODE EQU 27STAC SEGMENT STACK DB 128 DUP(?)STAC ENDSDATA SEGMENTSOURCE DB N DUP(?) RESULT DB N DUP(0) NAME0 DB 39。39。,0NAME1 DB 39。39。,0DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACSTART PROC FAR PUSH DS XOR AX,AX PUSH AX MOV AX,DATA MOV DS,AX MOV ES,AX 。置附加段寄存器 LEA DX,SOURCE 。數(shù)據(jù)區(qū)起始地址 LEA SI,NAME0 。原始數(shù)據(jù)文件名 MOV CX,N 。字節(jié)數(shù) CALL LOAD 。從39。39。中讀取數(shù)據(jù)。****BEGIN**** LEA SI,SOURCE LEA DI,RESULT CLD INC DIL0: ___________________________ CMP AL,0 JE QUIT MOV CX,OFFFFH 。SET THE COUNTER TO 0FFFFH ___________________________ 。字符串重復(fù)搜索，CX=0FFFFHn NEG CX 。10000HCX→CX ___________________________ 。獲得重復(fù)次數(shù)n CMP CX,1 J_______ COMPRESS MOV [SI],AL INC SI JMP __________________COMPRESS: MOV [SI],BYTE PTR ESC_CODE MOV [SI+1],CL MOV [SI+2],AL ___________________________ JMP L0QUIT: MOV [SI],AL 。STORE THE ‘00H’。****END**** LEA DX,RESULT 。結(jié)果數(shù)據(jù)區(qū)首址 LEA SI,NAME1 。結(jié)果文件名 MOV CX,N 。字節(jié)數(shù) CALL SAVE 。保存結(jié)果到文件 RETSTART ENDPCODE ENDS END START第十五題：一、請(qǐng)編制程序，其功能是：對(duì)一個(gè)由可打印ASCII字符（ASCII碼20H~7FH）組成的字符串可采用下列方法進(jìn)行壓縮：從串首開始向后掃描，如某字符單獨(dú)出現(xiàn)該字符不變，如某字符連續(xù)出現(xiàn)n次，則該字符用ESC（1BH），n，原字符三個(gè)字節(jié)來(lái)代替（假定n不超過(guò)255）。例如：設(shè)內(nèi)存中從SOURCE開始有一用上述方法壓縮的字符串，其以00H結(jié)束，長(zhǎng)度不超過(guò)100。試編程對(duì)其進(jìn)行解壓縮，結(jié)果存入RESULT開始的內(nèi)存單元。 原串： 41H,1BH,06H,43H,61H,00H 解壓后： 41H,43H,43H,43H,43H,43H,43H,61H,00H（“ACCCCCCa”） 　　 試題程序： EXTRN LOAD:FAR,SAVE:FARN EQU 100ESC_CODE EQU 27STAC SEGMENT STACK DB 128 DUP(?)STAC ENDSDATA SEGMENTSOURCE DB N DUP(?) RESULT DB N DUP(0) NAME0 DB 39。39。,0NAME1 DB 39。39。,0DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACSTART PROC FAR PUSH DS XOR AX,AX PUSH AX MOV AX,DATA MOV DS,AX MOV ES,AX 。置附加段寄存器 LEA DX,SOURCE 。數(shù)據(jù)區(qū)起始地址 LEA SI,NAME0 。原始數(shù)據(jù)文件名 MOV CX,N 。字節(jié)數(shù) CALL LOAD 。從39。39。中讀取數(shù)據(jù)。****BEGIN**** LEA SI,SOURCE LEA DI,RESULT CLDL0: LODSB CMP AL,0 JE QUIT CMP AL,ESC_CODE J_______ EXPAND___________________________JMP L0EXPAND: ___________________________ 。解壓XOR CX,CX____________________________________________________________________________________________________________ JMP L0QUIT: STOSB 。STORE THE ‘00H’。****END**** LEA DX,RESULT 。結(jié)果數(shù)據(jù)區(qū)首址 LEA SI,NAME1 。結(jié)果文件名 MOV CX,N 。字節(jié)數(shù) CALL SAVE 。保存結(jié)果到文件 RETSTART ENDPCODE ENDS END START第十六題：一、請(qǐng)編制程序，其功能是：對(duì)經(jīng)常上下波動(dòng)的數(shù)據(jù)可采用只記錄峰值的數(shù)據(jù)壓縮方法。即每次將采樣到的當(dāng)前值和前一次值比較，如數(shù)據(jù)變化方向改變（原變大現(xiàn)變小或原變小現(xiàn)變大），說(shuō)明已過(guò)峰值，這時(shí)就將前一值（峰值）記錄下來(lái)。例如（下例數(shù)據(jù)均為無(wú)符號(hào)數(shù)）：原數(shù)據(jù)： 23H,45H,89H,67H,5CH,36H,3CH…壓縮后： 23H,89H,36H… 內(nèi)存中從SOURCE連續(xù)存放著48個(gè)八位無(wú)符號(hào)數(shù)，假定無(wú)相鄰兩數(shù)相等的情況，編程按上述方法進(jìn)行壓縮，結(jié)果保存在RESULT開始的內(nèi)存單元中。 　　 試題程序： EXTRN LOAD:FAR,SAVE:FARN EQU 40STAC SEGMENT STACK DB 128 DUP(?)STAC ENDSDATA SEGMENTSOURCE DB N DUP(?) RESULT DB N DUP(0) NAME0 DB 39。39。,0NAME1 DB 39。39。,0DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,SS:STACSTART PROC FAR PUSH DS XOR AX,AX PUSH AX MOV AX,DATA MOV