請編制程序,其功能是:內存中連續(xù)存放著20個16位有符號整數組成的序列,求出該序列中的最小值和值。結果存放形式為,先按原順序存放20個需處理的有符號整數,后跟該序列中的最小值和值(最小值在前,值在后)。
例如:
內存中有 8100H,0002H,0300H…
結果為 8100H,0002H,0300H…(由20個16位有符號整數組成的原序列),后跟該序列中的最小值和值(最小值在前,值在后)。
部分程序已給出, 其中原始數據由過程LOAD從文件INPUT1.DAT中讀入SOURCE開始的內存單元中。運算結果要求從RESULT開始存放,由過程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的一段源程序使其完整(空白已用橫線標出,每行空白一般只需一條指令, 但采用功能相當的多條指令亦可),或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的功能。
對程序必須進行匯編,并與IO.OBJ鏈接產生PROG1.EXE執(zhí)行文件,最終運行程序產生結果(無結果或結果不正確者均不得分)。調試中若發(fā)現整個程序中存在錯誤之處, 請加以修改。
試題程序:
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
STAC SEGMENT STACK
DB 128 DUP(?)
STAC ENDS
DATA SEGMENT
SOURCE DW N DUP(?)
RESULT DW N+2 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
LEA DX,SOURCE ;數據區(qū)起始地址
LEA SI,NAME0 ;原始數據文件名
MOV CX,N*2 ;字節(jié)數
CALL LOAD ;從‘INPUT1.DAT’中讀取數據
;****BEGIN****
;值放在BX中,最小值放在DX中
LEA SI,SOURCE
LEA DI,RESULT
MOV BX,[SI] ;第一個整數既為值
___________________________ ;又為最小值
MOV [DI],BX
ADD SI,2
ADD DI,2
___________________________
NEXT: MOV AX,[SI]
CMP AX,BX
JLE __________________
MOV BX,AX
JMP ENDL
CHKMIN: CMP AX,DX
JGE ENDL
MOV DX,AX
ENDL: MOV [DI],AX
ADD SI,2
ADD DI,2
LOOP NEXT
___________________________
ADD DI,2
___________________________
;****END****
LEA DX,RESULT ;結果數據區(qū)首址
LEA SI,NAME1 ;結果文件名
MOV CX,(2+N)*2 ;字節(jié)數
CALL SAVE ;保存結果到文件
RET
START ENDP
CODE ENDS
END START
例如:
內存中有 8100H,0002H,0300H…
結果為 8100H,0002H,0300H…(由20個16位有符號整數組成的原序列),后跟該序列中的最小值和值(最小值在前,值在后)。
部分程序已給出, 其中原始數據由過程LOAD從文件INPUT1.DAT中讀入SOURCE開始的內存單元中。運算結果要求從RESULT開始存放,由過程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的一段源程序使其完整(空白已用橫線標出,每行空白一般只需一條指令, 但采用功能相當的多條指令亦可),或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的功能。
對程序必須進行匯編,并與IO.OBJ鏈接產生PROG1.EXE執(zhí)行文件,最終運行程序產生結果(無結果或結果不正確者均不得分)。調試中若發(fā)現整個程序中存在錯誤之處, 請加以修改。
試題程序:
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
STAC SEGMENT STACK
DB 128 DUP(?)
STAC ENDS
DATA SEGMENT
SOURCE DW N DUP(?)
RESULT DW N+2 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
LEA DX,SOURCE ;數據區(qū)起始地址
LEA SI,NAME0 ;原始數據文件名
MOV CX,N*2 ;字節(jié)數
CALL LOAD ;從‘INPUT1.DAT’中讀取數據
;****BEGIN****
;值放在BX中,最小值放在DX中
LEA SI,SOURCE
LEA DI,RESULT
MOV BX,[SI] ;第一個整數既為值
___________________________ ;又為最小值
MOV [DI],BX
ADD SI,2
ADD DI,2
___________________________
NEXT: MOV AX,[SI]
CMP AX,BX
JLE __________________
MOV BX,AX
JMP ENDL
CHKMIN: CMP AX,DX
JGE ENDL
MOV DX,AX
ENDL: MOV [DI],AX
ADD SI,2
ADD DI,2
LOOP NEXT
___________________________
ADD DI,2
___________________________
;****END****
LEA DX,RESULT ;結果數據區(qū)首址
LEA SI,NAME1 ;結果文件名
MOV CX,(2+N)*2 ;字節(jié)數
CALL SAVE ;保存結果到文件
RET
START ENDP
CODE ENDS
END START

