请编制程序ex9.ASM，其功能是：从20个有符号字节数据中取出负数并计算其绝对值之和(字型)，然后存放在指定的内存区中，多余的空间填0。
例如：
内存中有80H，02H，00H，7CH，7BH，11H，……
结果为80H，00H，FEH，00H，FDH，00H，85H，00H，……
部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，运算的结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。补充BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
对程序进行汇编，并与IO.OBJ链接产生执行文件，最终运行程序产生结果。调试中发现整个程序中存在错误之处，请加以修改。
[试题程序]
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
STAC SEGMENT STACK
DB 256 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
；数据区起始地址
LEA
SI,NAME0
；原始数据文件名
MOV
CX,N
；字节数
CALL LOAD
；从’INPUT1.DAT’中读取数据
; **** BEGIN ****
LEA
SI,SOURCE
LEA DI,RESULT
MOV DX,0
MOV
CX,N
CLD
CON:LODSH
(1)
JGE
(2)
MOV
[DI],AL
INC DI
(3)
INC DIADD DL,AL
(4)
NEXT:LOOP
CON
MOV
[DI],DXADD DI,2
MOV
CX,40
SUB
CX,DI
MOV
AL,0
(5)
; ****END****
LEA DX,RESULT
；结果数据区首址
LEA
SI,NAME1
；结果文件名
MOV
CX,N
；结果字节数
CALL
SAVE
；保存结果到文件
RET
START ENDP
CODE
ENDS
END
START