请编制程序PROG1.ASM,其功能是:内存中连续存放着由20个无符号字节组成的一个序列,请将它们排成升

Question

请编制程序PROG1.ASM，其功能是：内存中连续存放着由20个无符号字节组成的一个序列，请将它们排成升序(从小到大)。

程序中，COUNT为序列元素个数，OFFL为序列偏移量，BX为交换标志寄存器(BX =1，说明此趟排序扫描后未发生交换操作，表示序列中的元素已排好序)。

例如：内存中有01H,04H，02H，…(假设后十七个字节均大于04H)

结果为01H，02H，04H，…(后跟十七个字节，按从小到大的顺序排列)

部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放，由过程SAVE保存到文件OUT- PUT1.DAT中。请编写BEGIM到END之间代码。对程序必须进行汇编，并与IO.OBJ连接产生PROG1.EXE执行文件，最终运行程序产生结果(无结果或结果不正确者均不得分)；

部分源程序如下：

EXTRN LOAD:FAR,SAVE:FAR

N EQU 20

STAC SEGMENT STACK

DB 128 DUP (?)

STAC ENDS

DATA SEGMENT

SOURCE DB N DUP (?)

RESULT DB N DUP (0)

NAME0 DB 'INPUT1. DAT', 0

NAME1 DB 'OUTPUT1. DAT', 0

COUNT DW ?

OFFL DW ?

DATA ENDS

CODE SEGMENT

ASSUME CS:CODE, DS:DATA, SS:STAC

START PROC FAR

PUSH DS

XOR AX,AX

PUSH AX

MOV AX,DATA

MOV DS, AX

LEA DX, SOURCE ; 数据区起始地址

LEA SI,NAMEO ; 原始数据文件名

MOV CX,N ; 字节数

CALL LOAD ; 从'INPUT1.DAT'中读取数据

**** BEGIN ****

***** END *****

LEA DX,RESULT ; 结果数据区首地址

LEA SI,NAME1 ; 结果文件名

MOV CX,N ; 结果字节数

CALL SAVE ; 保存结果到文件

RET

START ENDP

CODE ENDS

END START

相关知识：

●无符号数比较大小。

有符号数和无符号数比较大小采用的是不同的指令，本题目要求将无符号数进行排序，这里仅介绍无符号数的比较指令。

(1)“高于”或“不低于等于”条件转移指令

指令格式：JA/JNBE短标号地址

(2)“高于等于”或“不低于”条件转移指令

指令格式：JAE/JNB短标号地址

(3)“等于”条件转移指令

指令格式：JE 短标号地址

(4)“不等于”条件转移指令

指令格式：JNE 短标号地址

(5)“低于等于”或“不高于”条件转移指令

指令格式：JBE/JNA 短标号地址

(6)“低于”或“不高于等于”条件转移指令

指令格式：JB/JNAE 短标号地址

●数组的排序

数组的排序的方法有很多种，可以采用“冒泡排序”、“直接插入排序”、“简单选择排序”等算法复杂度为O(n(上标)2)的简单排序算法，也可采用那些算法复杂度为O(nlog(下标)2n)或O(d (n+rd))的算法，但简单排序算法比较容易理解，编程比较方便。通过阅读我们发现出题者的意愿就是采用冒泡排序方法，因为它要多次扫描数组，而且有一个标志指明一趟扫描是否发生数据交换，这是典型冒泡排序方法。当然大家也可采用别的排序算法，作为题目的分析者我们就不采用别的方法了。

●串的移动

Answer 1

正确答案：LEA SISOURCE LEA DIRESULT MOV CXN NEXTO： MOV AL[SI] MOV [DI]AL INC SI INC DI LOOP NEXTO ; 将待排序数组移到目的单元 CLD LEA SI RESULT MOV CX N MOV OFFL SI MOV COUNT CX INIT: MOV BX 1 ; 一趟比较之前标志寄存器置 DEC COUNT JZ SORTED ; 如果进行n次扫描结束排序 MOV CX COUNT MOV SI OFFL NEXT: LODSB CMP [SI] AL ; 两两比较 JAE CONT XCHG [SI] AL MOV [SI-1] AL SUB BX BX ; 发生数据交换交换标志清零 CONT: LOOP NEXT CMP BXO JE INIT ; 如果有数据交换发生再进行一趟扫描 SORTED: NOP
LEA SI，SOURCE LEA DI，RESULT MOV CX，N NEXTO： MOV AL，[SI] MOV [DI]，AL INC SI INC DI LOOP NEXTO ; 将待排序数组移到目的单元 CLD LEA SI, RESULT MOV CX, N MOV OFFL, SI MOV COUNT, CX INIT: MOV BX, 1 ; 一趟比较之前，标志寄存器置 DEC COUNT JZ SORTED ; 如果进行n次扫描，结束排序 MOV CX, COUNT MOV SI, OFFL NEXT: LODSB CMP [SI] ,AL ; 两两比较 JAE CONT XCHG [SI], AL MOV [SI-1] ,AL SUB BX, BX ; 发生数据交换，交换标志清零 CONT: LOOP NEXT CMP BX,O JE INIT ; 如果有数据交换发生，再进行一趟扫描 SORTED: NOP