上机题之40
以下内容为程序代码:
;* 请编制程序PROG1.ASM，其功能是：内存中连续存放着两个有
;* 符号字节数序列Ak和Bk(k=0,…,9),求序列Ck，Ck=Ak+Bk（Ck以有
;* 符号字的形式按C0,…,C9 的顺序连续存放）。
;* 例如：
;* 序列Ak为80H(-128D),31H(+49D),61H(+97D),7FH(+127D),…；
;* 序列Bk为80H(-128D),01H(+1D),F1H(-15D),7FH(+127D),…。
;* 结果Ck为FF00H(-256D),0032H(+50D),0052H(+82D),
;* 00FEH(+254D), …。
;* 部分程序已给出, 其中原始数据由过程LOAD从文件INPUT1.DAT
;* 中读入SOURCE开始的内存单元中，运算结果要求从RESULT开始存放,
;* 由过程SAVE保存到文件OUTPUT1.DAT中。
;* 填空BEGIN和END之间已给出的源程序使其完整 (空白已用横线
;* 标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦
;* 可)， 或删除BEGIN和END之间原有的代码并自行编程来完成要求的
;* 功能。
;* 对程序必须进行汇编， 并与IO.OBJ链接产生PROG1.EXE执行文
;* 件, 最终运行程序产生结果(无结果或结果不正确者均不得分)。调
;* 试中若发现整个程序中存在错误之处，请加以修改。
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10 ; 每个序列的长度
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N*2 DUP(?) ; 顺序存放A0,…,A9,B0,…,B9
RESULT DW N DUP(0) ; 顺序存放C0,…,C9
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 ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名
MOV CX,N*2 ; 字节数
CALL LOAD ; 从 ’INPUT1.DAT’中读取数据
; **** BEGIN ****
MOV DI,OFFSET RESULT ; 结果从RESULT开始存放
MOV BX,0
MOV CX,N ;
PRO: MOV AH,0
mov al,source[bx+N]
;MOV AL,_____________ ; 序列Bk中的一个字节
MOV DL,AL ; 暂存Bk
add al,source[bx]
;____ AL,SOURCE[BX] ; Ck=Bk+Ak
JNO STAY ; 无溢出转STAY
JUMP1: MOV AH,00 ; 有溢出
ADD DL,0
JNS JUMP ; Bk是正数（为一个正数加上一个正数，
; 结果为负数的溢出情况）转JUMP（AH
; 已为00H）
mov ah,0ffh
;MOV AH,________ ; Bk是负数（为一个负数加上一个负数，
; 结果为正数的溢出情况）将结果变为有符
; 号字的形式（为负）
jmp jump
;JMP ____
STAY: cbw
;_____ ; AL中数的符号扩展到AH，无符号字节
; 变成无符号字，有符号字节变成有符号字
JUMP: MOV [DI],AX
ADD DI,2
INC BX
DEC CX
JNZ PRO
; **** END ****
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N*2 ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
input1.dat 内容如下：
80 C0 81 00 7F 40 3F 80 C0 81 80 C0 81 00 7F 40 3F 7F 7F 64
output1.dat 内容应当如下：
00 FF 80 FF 02 FF 00 00 FE 00 80 00 7E 00 FF FF
3F 00 E5 FF
责任编辑：小草
