第三套

　　===============================================================================

　　試題說明 :

　　===============================================================================

　　請編制程序PROG1.ASM, 其功能是: 內存中連續(xù)存放著二個無

　　符號字節(jié)序列A(k)和B(k)(k=0,…,9;下同),求序列C(k)，C(k)=A(k)×B(k)。

　　C(k)以字的形式按C(0),…,C(9) 的順序連續(xù)存放。

　　例如：

　　序列A(k)為FFH,80H,7FH,00H,…;

　　序列B(k)為FFH,80H,01H,02H,…。

　　則結果C(k)為FE01H,4000H,007FH,0000H,…。

　　部分程序已給出，其中原始數據由過程LOAD從文件INPUT1.DAT

　　中讀入SOURCE開始的內存單元中，運算結果要求從RESULT開始存放,

　　由過程SAVE保存到文件OUTPUT1.DAT中。

　　填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線

　　標出, 每行空白一般只需一條指令，但采用功能相當的多條指令亦

　　可)， 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的

　　功能。

　　對程序必須進行匯編， 并與IO.OBJ鏈接產生PROG1.EXE執(zhí)行文

　　件，最終運行程序產生結果(無結果或結果不正確者均不得分)。調

　　試中若發(fā)現(xiàn)整個程序中存在錯誤之處，請加以修改。

　　===============================================================================

　　程序 :

　　===============================================================================

　　EXTRN LOAD:FAR,SAVE:FAR

　　N EQU 10

　　STAC SEGMENT STACK

　　DB 128 DUP (?)

　　STAC ENDS

　　DATA SEGMENT

　　SOURCE DB N*2 DUP(?)

　　RESULT DW N DUP(0)

　　NAME0 DB ’INPUT1.DAT’,0

　　NAME1 DB ’OUTPUT1.DAT’,0

　　DATA ENDS

　　CODE SEGMENT

　　ASSUME CSCODE, 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 ****

　　________________,OFFSET RESULT

　　MOV BX,0

　　_________________

　　PRO: ________________,SOURCE[BX+N]

　　________________

　　MOV [DI],AX

　　ADD DI,2

　　INC BX

　　_______________

　　JNZ PRO

　　; **** END ****

　　LEA DX,RESULT ; 結果數據區(qū)首址

　　LEA SI,NAME1 ; 結果文件名

　　MOV CX,N*2 ; 結果字節(jié)數

　　CALL SAVE ; 保存結果到文件

　　RET

　　START ENDP

　　CODE ENDS

　　END START

　　===============================================================================

　　所需數據 :

　　===============================================================================

　　@2 input1.dat 001

　　FF 80 7F 00 01 80 FF 80 01 00 FF 80 01 02 00 FF FF 03 FF FF

　　#E

　　@3 $output1.hex 001

　　FE01FFBF80FFFFFFFFFF7F80FE017FFE00FFFFFF3C

　　#E