IBM-PC汇编语言求排序程序

IBM-PC汇编语言求排序程序
基本功能：1 从键盘输入十进制数据（大于等于0）
2 按照从小到大顺序排列
3 将排序好的数据仍按十进制输出
4 （选做）输入/输出均按有符号数处理

data segment
num dw 20 dup(?);存输入数列
i dw 0 ;数列个数
max dw ?
min dw ?
char1 db 'The maximum number is:$'
char2 db 0dh,'The minimum number is:$'
char3 db 0dh,'The order of the numbers is:',0ah,0dh,'$'
rec db 5 dup(?) ;输出缓存
data ends

code segment
main proc far
assume cs:code,ds:data

start:
push ds
mov ax,data
mov ds,ax

mov si,0
mov bx,0
input:
mov ah,01h
int 21h

cmp al,20h;遇到空格写数据
jz write1
cmp al,0dh;遇到回车写最后一个数据
jz write2

sub al,30h
mov cl,al
mov ch,00h
mov ax,bx
mov bx,0ah
mul bx
mov bx,ax
add bx,cx
jmp input
write1: ;write the numbers before Space
mov [num+si],bx
add si,2
inc i
mov bx,0