请编制程序，其功能是：内存中连续存放的20个八位无符号数是一个自动抄表示抄录的20个用户某月的用水量(立方米)，为了控制用水量，水费计算公式如下(X表示用水量；Y表示水费，单位为分)：
a) Y=X*70X＜=10
b) Y=10*70+(X-10)*120 X＞10
例如：
用水量(X)：04H，0FH，18H…
水费(Y)： 0118H，0514H，094CH…
试计算出这20个用户应缴纳的水费，结果用字(word)表示。
部分程序已给出原始数据由过程LOAD从文件INPUT.DAT中读入SOURCE开始的内存单元中，结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT.DAT中。
请填空BEGIN和END之间已给出的源程序使其完整，空白已用横线标出，每个空白一般只需一条指令，但采用功能相当的多条指令亦可，或删除BEGIN和END之间原有的代码并自行编写程序片段来完成所要求的功能。
对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
【试题程序】
EXTRN LOAD:FAR,SAVE:FAR
NEQU 20
RATE1 EQU 70
RATE2 EQU 120
DELTA EQU 10
STAC SEGMENT STACK
DB128 DUP()
STAC ENDS
DATA SEGMENT
SOURCE DBN DUP()
RESULT DWN DUP(0)
NAME0 DB’INPUT.DAT’,0
NAME1 DB’OUTPUT.DAT’,0
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE, DS:DATA, SS:STAC
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
NOV AX, DATA
MOV DS,AX
LEA DX,SOURCE ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名起始地址
NOV CX,N ; 字节数
CALL LOAD ; 从’INPUT.DAT’中读取数据
; ******** BEGIN ********
LEA SI, SOURCE
LEA DI, RESULT
CLD
MOV CX,N
MOV BL,RATE1
MOV BH,RATE2
NEXT: (1)
CMP AL,DELTA
J (2) GREAT
MUL BL
JMP STORE
GREAT: (3)
MUL BH
(4)
STORE: (5)
(6)
INC SI
LOOP NEXT
; ******** END ********
LEA DX,RESULT ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名起始地址
MOV CX,N*2 ; 字节数
CALL SAVE; 保存结果到’OUTPUT.DAT’文件
RET
START ENDP
CODE ENDS
END START