请编制程序PROG1.ASM，其功能是：对内存中连续存放着20个补码表示的无符号整数进行从大到小的排序，结果存放在RESULT开始的内存单元中。
部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。请在BEGIN和END之间补充一段源程序，完成要求的功能。
对程序必须进行汇编，并与IO.OBJ链接产生PROG1.EXE执行文件，最终运行程序产生结果(无结果或结果不正确者均不得分)。
试题程序：
EXTRN LOAD:FAR, SAVE:FAR
N EQU20
DSEGSEGMENT
SOURCE DWN DUP() ; 存放原始数据
RESULT DWN DUP(0) ; 存放运算结果
NAME0 DB’INPUT1.DAT’,0
NAME1 DB’OUTPUT1.DAT’,0
DSEGENDS
SSEGSEGMENT STACK
DB128 DUP()
SSEGENDS
CSEGSEGMENT
ASSUME CS:CSEG, DS:DSEG, SS:SSEG
START PROC FAR
PUSH DS
XORAX,AX
PUSH AX
MOVAX,DSEG
MOVDS,AX
MOVES,AX
LEADX,SOURCE ; 数据区起始地址
LEASI,NAMEO ; 原始数据文件名
MOVCX.N ; 字节数
CALL LOAD ; 从’INPUT1.DAT’中读取数据
;****BEGIN****
……
……
……
;****END****
LEADX,RESULT ; 结果数据区首址
LEASI,NAME1 ; 结果文件名
MOVCX,N ; 结果字节数
CALL SAVE ; 保存结果到文件
RET
START ENDP
CSEGENDS
ENDSTART
参考答案：
****BEGIN****
MOV DX,N
DEC DX
LA: LEA SI,SOURCE
MOV CX,DX
MOV BX,0
LB: MOV AL,[SI]
INC SI
CMP AL,[SI]
JAE LC
MOV AH,[SI]
MOV [SI] ,AL
MOV [SI-A],AH
MOV BX, A
LC: LOOP LB
CMP BX,0
JZ STORE
DEC DX
JNZ LA
STORE: MOV CX,N
LEA SI,SOURCE
LEA DI,RESULT
CLD
REP MOVSB
; ****END****
解析：
本题可采用冒泡排序算法。对于SOURCE开始的20个内存单元中的无符号数，依次将相邻的两个数进行比较，每次将较小的数调整到后面。经过一轮比较后，最小的数排到第 20个位置；再将剩下的19个数两两进行比较，排在第19个位置上的数为次小数；重复比较共19遍，完成排序操作。