上機(jī)題之38
以下內(nèi)容為程序代碼:
;* 請編制程序PROG1.ASM, 其功能是: 對經(jīng)常上下波動(dòng)的數(shù)據(jù)可采
;* 用只記錄峰值的數(shù)據(jù)壓縮方法。 即每次將采樣到的當(dāng)前值和前一次
;* 值比較, 如數(shù)據(jù)變化方向改變 (原變大現(xiàn)變小或原變小現(xiàn)變大), 說
;* 明已過峰值, 這時(shí)就將前一值(峰值)記錄下來。
;* 例如(下例數(shù)據(jù)均為無符號數(shù)):
;* 原數(shù)據(jù): 23H,45H,89H,67H,5CH,36H,3CH,...
;* 壓縮后: 23H,89H,36H,...
;* 內(nèi)存中從SOURCE連續(xù)存放著四十個(gè)八位無符號數(shù), 假定無相鄰
;* 兩數(shù)相等的情況, 編程按上述方法進(jìn)行壓縮, 結(jié)果保存在RESULT開
;* 始的內(nèi)存單元中。
;* 部分程序已在PROG1.ASM中給出, 請?zhí)羁誃EGIN和END之間已給
;* 出的源程序使其完整(空白已用橫線標(biāo)出, 每行空白一般只需一條
;* 指令, 但功能相當(dāng)?shù)亩鄺l指令亦可)或刪除BEGIN和END之間原有的
;* 代碼并自行編寫程序片段來完成要求的功能。
;* 原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT中讀入SOURCE開始的內(nèi)
;* 存單元中, 結(jié)果要求從RESULT開始存放, 由過程SAVE保存到文件
;* OUTPUT1.DAT中。
;* 對程序必須進(jìn)行匯編, 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE 執(zhí)行文
;* 件, 最終運(yùn)行程序產(chǎn)生結(jié)果(無結(jié)果或結(jié)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 40
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?)
RESULT DB N DUP(0)
NAME0 DB ’INPUT1.DAT’,0
NAME1 DB ’OUTPUT1.DAT’,0
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE, DS:DATA, SS:STAC
START 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 ; 從"input1.dat"中讀取數(shù)據(jù); **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
CLD
MOVSB ; Y[0]=X[0]
XOR AX,AX
XOR BX,BX
LODSB
MOV BL,[SI-2]
SUB AX,BX ; X[1]-X[0]
MOV DX,AX
MOV CX,N-2
FILTER:
XOR AX,AX
XOR BX,BX
LODSB ; X[n]
MOV BL,[SI-2] ; X[n-1]
SUB AX,BX ; X[n]-X[n-1]
xchg ax,bx
;___________________ ; 相鄰兩差值(AX,DX)符號位是否相同
cmp bh,dh
;___________________
je skip
;J__ SKIP ; 相同, 數(shù)據(jù)方向未變
mov dx,bx
;___________________ ; 不同, 方向變化, 保存峰值
STOSB
SKIP: ;___________________
LOOP FILTER
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名起始地址
MOV CX,N ; 字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到"output1.dat"文件中
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
38 4E 3C 37 2B 01 0C 3A 78 FA F1 BE 50 5D 68 4B
32 22 17 26 4C 67 C4 B4 96 36 2D 21 59 CF F5 ED
CB C4 96 66 41 4E 59 9A
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
38 4E 01 FA 50 68 17 C4 21 F5 41 00 00 00 00 00
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 00 00
以下內(nèi)容為程序代碼:
;* 請編制程序PROG1.ASM, 其功能是: 對經(jīng)常上下波動(dòng)的數(shù)據(jù)可采
;* 用只記錄峰值的數(shù)據(jù)壓縮方法。 即每次將采樣到的當(dāng)前值和前一次
;* 值比較, 如數(shù)據(jù)變化方向改變 (原變大現(xiàn)變小或原變小現(xiàn)變大), 說
;* 明已過峰值, 這時(shí)就將前一值(峰值)記錄下來。
;* 例如(下例數(shù)據(jù)均為無符號數(shù)):
;* 原數(shù)據(jù): 23H,45H,89H,67H,5CH,36H,3CH,...
;* 壓縮后: 23H,89H,36H,...
;* 內(nèi)存中從SOURCE連續(xù)存放著四十個(gè)八位無符號數(shù), 假定無相鄰
;* 兩數(shù)相等的情況, 編程按上述方法進(jìn)行壓縮, 結(jié)果保存在RESULT開
;* 始的內(nèi)存單元中。
;* 部分程序已在PROG1.ASM中給出, 請?zhí)羁誃EGIN和END之間已給
;* 出的源程序使其完整(空白已用橫線標(biāo)出, 每行空白一般只需一條
;* 指令, 但功能相當(dāng)?shù)亩鄺l指令亦可)或刪除BEGIN和END之間原有的
;* 代碼并自行編寫程序片段來完成要求的功能。
;* 原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT中讀入SOURCE開始的內(nèi)
;* 存單元中, 結(jié)果要求從RESULT開始存放, 由過程SAVE保存到文件
;* OUTPUT1.DAT中。
;* 對程序必須進(jìn)行匯編, 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE 執(zhí)行文
;* 件, 最終運(yùn)行程序產(chǎn)生結(jié)果(無結(jié)果或結(jié)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 40
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N DUP(?)
RESULT DB N DUP(0)
NAME0 DB ’INPUT1.DAT’,0
NAME1 DB ’OUTPUT1.DAT’,0
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE, DS:DATA, SS:STAC
START 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 ; 從"input1.dat"中讀取數(shù)據(jù); **** BEGIN ****
LEA SI,SOURCE
LEA DI,RESULT
CLD
MOVSB ; Y[0]=X[0]
XOR AX,AX
XOR BX,BX
LODSB
MOV BL,[SI-2]
SUB AX,BX ; X[1]-X[0]
MOV DX,AX
MOV CX,N-2
FILTER:
XOR AX,AX
XOR BX,BX
LODSB ; X[n]
MOV BL,[SI-2] ; X[n-1]
SUB AX,BX ; X[n]-X[n-1]
xchg ax,bx
;___________________ ; 相鄰兩差值(AX,DX)符號位是否相同
cmp bh,dh
;___________________
je skip
;J__ SKIP ; 相同, 數(shù)據(jù)方向未變
mov dx,bx
;___________________ ; 不同, 方向變化, 保存峰值
STOSB
SKIP: ;___________________
LOOP FILTER
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名起始地址
MOV CX,N ; 字節(jié)數(shù)
CALL SAVE ; 保存結(jié)果到"output1.dat"文件中
RET
START ENDP
CODE ENDS
END START
input1.dat 內(nèi)容如下：
38 4E 3C 37 2B 01 0C 3A 78 FA F1 BE 50 5D 68 4B
32 22 17 26 4C 67 C4 B4 96 36 2D 21 59 CF F5 ED
CB C4 96 66 41 4E 59 9A
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
38 4E 01 FA 50 68 17 C4 21 F5 41 00 00 00 00 00
00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 00 00 00 00 00