请编制程序，其功能是：求I×J矩阵的转置矩阵(矩阵中元素为字节型)，并计算转置矩阵的

问题：

请编制程序，其功能是：求I×J矩阵的转置矩阵(矩阵中元素为字节型)，并计算转置矩阵的每一行元素之和，然后存放在每一行最后一个字单元中。
例如：
内存中有：04H，05H，06H，(第一行)01H，02H，03H(第二行)
结果为： 04H，01H，05H，00H，05H，02H，07H，00H，06H，03H，09H，00H
部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从 RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。
请填空BEGIN和END之间已经给出的一段源程序使其完整，需填空处已经用横线标出，每个空白一般只需要填一条指令或指令的一部分(指令助记符或操作数)，也可以填入功能相当的多条指令，或删去BEGIN和END之间原有的代码并自行编程来完成所要求的功能。
对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
[试题程序]
EXTRN LOAD:FAR,SAVE:FAR
N EQU 30
I EQU 3
J EQU 10
DSEG SEGMENT
SOURCEDBN DUP()
SRC DWSOURCE
RESULTDB(N+2*J)DUP(0)
NAME0DB’INPUT1.DAT’,0
NAME1DB’OUTPUT1.DAT’,0
DSEG ENDS
SSEG SEGMENT STACK
DB256 DUP()
SSEG ENDS
CSEG SEGMENT
ASSUME CS:CSEG,SS:SSEG,DS:DSEG
STARTPROC FAR
PUSH DS
XORAX,AX
PUSH AX
MOVAX,DSEG
MOVDS,AX
MOVES,AX
LEADX,SOURCE
LEASI,NAME0
MOVCX,N
CALL LOAD
******** BEGIN ********
LEASI,SOURCE
LEADI,RESULT
MOVBX,1; 第一列
LPJ: MOVCX,0; 累加和
MOVDX,1; 第一行
LPI: MOVAL,[SI]
ADDCL,AL
(1)
STOSB
ADDSI,10
INCDX
(2)
JBELPI
MOV[DI],CX
(3)
INCSRC ; 下一列
MOVSI,SRC
(4)
CMPBX,J
JBE (5)
******** END ********
LEADX,RESULT
LEASI,NAME1
MOVCX,(N+2*J)
CALL SAVE
RET
STARTENDP
CSEGENDS
ENDSTART