请编制程序，其功能是：从第0行第0列开始，依次取出n阶矩阵中对角线上的元素(字节型)并计算累加和(字型)，然后将其存放在指定的内存区中。
例如：
内存中有：01h，01h，01h，02h，02h，02h，03FF，03h，03h
结果为： 01h，02h，03h，06h，00h
部分程序已给出，其中原始数据由过程loAD从文件input．DAt中读入sourCE开始的内存单元中，转换结果要求从rEsult开始存放，由过程sAvE保存到文件output．DAt中。
请填空BEgin和EnD之间已经给出的一段源程序使其完整，需填空处已经用横线标出，每个空白一般只需要填一条指令或指令的一部分(指令助记符或操作数)，也可以填入功能相当的多条指令，或删去BEgin和EnD之间原有的代码并自行编程来完成所要求的功能。
对程序必须进行汇编，并与io.oBj链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
【试题程序】
Extrn loAD:FAr, sAvE:FAr
n Equ 10
DsEg sEgmEnt
sourCE DB n*10 Dup(?)
rEsult DB (n+2) Dup(0)
nAmE0 DB 'input.DAt',0
nAmE1 DB 'output.DAt',0
DsEg EnDs
ssEg sEgmEnt stACk
DB 256 Dup (?)
ssEg EnDs
CsEg sEgmEnt
AssumE Cs:CsEg, ss:ssEg, Ds:DsEg
stArt proC FAr
push Ds
xor Ax,Ax
push Ax
mov Ax,DsEg
mov Ds,Ax
mov Es,Ax
lEA Dx, sourCE
lEA si,nAmE0
mov Cx,n*10
CAll loAD
******** BEgin ********
lEA Di,rEsult
mov Cx,0
mov Dh,0 ；行
mov Dl,0 ；行
nExt: mov Al,n
mul (1)
mov Bx,Ax
mov Al,Dl
(2)
mov si, Ax ；列号送si
mov Al, (3) [Bx+si]
mov [Di],Al
ADD Cl,Al
(4)
inC Di
inC Dh
inC Dl
Cmp Dl, (5)
jnE nExt
mov [Di],Cx
; ******** EnD ********
lEA Dx,rEsult
lEA &