编制一个程序，其功能为：内存中以8位无符号数形式连续存放着10个数据，这数据来自于一个自动抄表系统记录的10个用户某月天然气的使用量(立方米)，天然气费计算公式如下(其中，X表示天然气用量，Y表示应交天然气费)：
- a)Y＝X×80 X≤6
- b)Y＝X×120 6＜X≤10
- c)Y＝X×160 X＞10
计算每个用户需要交的天然气费，结果用字表示，并将结果存入指定单元。
例如：
用天然气量：05H，07H，12H……
天然气费： 0190H，0348H，0780H……
部分程序已经给出，其中原始数据由过程LOAD从文件INPUT.DAT中读入以SOURCE开始的内存单元中。运算结果要求从RESULT开始的内存单元存放， 由过程SAVE保存到文件OUTPUT.DAT中。
请填空BEGIN和END之间已给出的源程序使其完整，空白已经用横线标出，每行空白一般只需要一条指令，但采用功能相当的多条指令亦可，考生也可以删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
对程序必须进行汇编，并与IO.OBJ链接产生执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
[试题程序]
EXTRN LOAD：FAR，SAVE：FAR
NEQU 10
DSEG SEGMENT
SOURCE DB N DUP()
RESULT DW N DUP(0)
ADB 80
BDB 120
CDB 160
NAME0 DB ’INPUT．DAT’，0
NAME1 DB ’OUTPUT．DAT’，0
DSEG ENDS
SSEG SECMENT STACK
DB 256 DUP()
SSEG ENDS
CSEG SEGMENT
ASSUME CS：CSEG，DS：DSEG，SS：SSEG
START PROC FAR
PUSH DS
XOR AX，AX
PUSH AX
MOV AX，DSEG
MOV DS，AX
LEA DX，SOURCE
LEA SI，NAME0
MOV CX，N
CALL LOAD
； ******** BEGIN *********
LEA SI，SOURCE
LEA DI，RESULT
CLD
MOV CX，N
AGAIN： MOV AL，[SI]
CMP AL，6
JA (1)
(2)
JMP NEXT
LIMIT6：CMP AL，10
JA (3)
(4)
JMP NEXT
LIMIT10： (5)
NEXT： MOV [DI]，AX
INC SI
ADD DI，2
LOOP AGAIN
； ******** END ********
LEA DX，RESULT
LEA SI，NAME1
MOV CX，N*2
CALL SAVE
RET
START ENDP
CSEG ENDS
END START
