上機(jī)題之12
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 計(jì)算3×10矩陣中每一列元
;* 素（八位二進(jìn)制數(shù)）之和, 并將其結(jié)果存放在指定的內(nèi)存區(qū)中。
;* 例如:
;* 內(nèi)存中有 0,0,0,0,0,0,0,0,0,0(第1行),1,1,1,1,1,1,1,1,1,1
;* (第2行),9,9,9,9,9,9,9,9,9,9(第3行)
;* 結(jié)果為 000AH,000AH,...,000AH
;* 部分程序已經(jīng)給出,其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開始的內(nèi)存單元中, 轉(zhuǎn)換結(jié)果要求從RESULT開始存放,
;* 由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之間已經(jīng)給出的一段源程序使其完整,填空處已
;* 經(jīng)用橫線標(biāo)出, 每個(gè)空白一般只需要填一條指令或指令的一部分(指
;* 令助記符或操作數(shù)), 考生也可以填入功能相當(dāng)?shù)亩鄺l指令, 或刪去
;* BEGIN和END之間原有的代碼并自行編程來(lái)完成要求的功能。
;* 對(duì)程序必須進(jìn)行匯編,并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文件,
;* 最終運(yùn)行程序產(chǎn)生結(jié)果(無(wú)結(jié)果或結(jié)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 30
DSEG SEGMENT
SOURCE DB N DUP(?)
SRC DW SOURCE
RESULT DW N/3 DUP(0)
I EQU 3
J EQU 10
NAME0 DB ’INPUT1.DAT’,0
NAME1 DB ’OUTPUT1.DAT’,0
DSEG ENDS
SSEG SEGMENT STACK
DB 256 DUP (?)
SSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG,SS:SSEG,DS:DSEG
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DSEG
MOV DS,AX
MOV ES,AX
LEA DX,SOURCE
LEA SI,NAME0
MOV CX,N
CALL LOAD
; *** BEGIN ***
LEA SI,SOURCE
LEA DI,RESULT
MOV BX,1
LPJ: MOV DX,0
MOV CX,1
LPI: MOV AL,[SI]
mov ah,0
;_______________
ADD DX,AX
add si,10
;ADD SI,__
INC CX
CMP CX,I
JBE LPI
MOV [DI],DX
add di,2
;ADD DI,____
INC SRC
MOV SI,SRC
inc bx
cmp bx,J
;_______________
;CMP BX,____
JBE LPJ
; *** END ***
LEA DX,RESULT
LEA SI,NAME1
MOV CX,N*2/3
CALL SAVE
RET
START ENDP
CSEG ENDS
END START
input1.dat 內(nèi)容如下：
010101010101010101010202020202020202020204040404040404040404
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
07 00 07 00 07 00 07 00 07 00 07 00 07 00 07 00
07 00 07 00
以下內(nèi)容為程序代碼:
;* 請(qǐng)編制程序PROG1.ASM, 其功能是: 計(jì)算3×10矩陣中每一列元
;* 素（八位二進(jìn)制數(shù)）之和, 并將其結(jié)果存放在指定的內(nèi)存區(qū)中。
;* 例如:
;* 內(nèi)存中有 0,0,0,0,0,0,0,0,0,0(第1行),1,1,1,1,1,1,1,1,1,1
;* (第2行),9,9,9,9,9,9,9,9,9,9(第3行)
;* 結(jié)果為 000AH,000AH,...,000AH
;* 部分程序已經(jīng)給出,其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
;* 中讀入SOURCE開始的內(nèi)存單元中, 轉(zhuǎn)換結(jié)果要求從RESULT開始存放,
;* 由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之間已經(jīng)給出的一段源程序使其完整,填空處已
;* 經(jīng)用橫線標(biāo)出, 每個(gè)空白一般只需要填一條指令或指令的一部分(指
;* 令助記符或操作數(shù)), 考生也可以填入功能相當(dāng)?shù)亩鄺l指令, 或刪去
;* BEGIN和END之間原有的代碼并自行編程來(lái)完成要求的功能。
;* 對(duì)程序必須進(jìn)行匯編,并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文件,
;* 最終運(yùn)行程序產(chǎn)生結(jié)果(無(wú)結(jié)果或結(jié)果不正確者均不得分)。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 30
DSEG SEGMENT
SOURCE DB N DUP(?)
SRC DW SOURCE
RESULT DW N/3 DUP(0)
I EQU 3
J EQU 10
NAME0 DB ’INPUT1.DAT’,0
NAME1 DB ’OUTPUT1.DAT’,0
DSEG ENDS
SSEG SEGMENT STACK
DB 256 DUP (?)
SSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG,SS:SSEG,DS:DSEG
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DSEG
MOV DS,AX
MOV ES,AX
LEA DX,SOURCE
LEA SI,NAME0
MOV CX,N
CALL LOAD
; *** BEGIN ***
LEA SI,SOURCE
LEA DI,RESULT
MOV BX,1
LPJ: MOV DX,0
MOV CX,1
LPI: MOV AL,[SI]
mov ah,0
;_______________
ADD DX,AX
add si,10
;ADD SI,__
INC CX
CMP CX,I
JBE LPI
MOV [DI],DX
add di,2
;ADD DI,____
INC SRC
MOV SI,SRC
inc bx
cmp bx,J
;_______________
;CMP BX,____
JBE LPJ
; *** END ***
LEA DX,RESULT
LEA SI,NAME1
MOV CX,N*2/3
CALL SAVE
RET
START ENDP
CSEG ENDS
END START
input1.dat 內(nèi)容如下：
010101010101010101010202020202020202020204040404040404040404
output1.dat 內(nèi)容應(yīng)當(dāng)如下：
07 00 07 00 07 00 07 00 07 00 07 00 07 00 07 00
07 00 07 00