冒泡排序并输出.asm

该软件包中包括了比较经典了几个汇编程序

data segment
a dw 7,132,34,567,89,0,235,23
Msg db 20h,'$'
data ends

stack segment para stack
db 20h dup(?)
stack ends

code segment
assume ss:stack,cs:code,ds:data,es:data
start:
mov ax,data
mov ds,ax
mov es,ax
lea di,a       ;di保存待排序数组的端口地址，记住该地址的第一字节为元素个数
mov cx,[di]
mov dx,cx
init:
mov bx,1   ;交换标志
dec dx
jz sorted
mov cx,dx
lea di,a
next:
add di,2
mov ax,[di]
cmp [di+2],ax
jae cont
xchg [di+2],ax
mov [di],ax
sub bx,bx
cont:
loop next
cmp bx,0
je init
sorted:
lea di,a
;-----------------------------------------------
mov cx,a
lea si,a+2
lop:
mov ax,[si]
call output
add si,2
loop lop
mov ah,4ch
int 21h
;----------------------output,ax保存待输出的数据
output proc
push si
push dx
push ax
push bx
mov dx,0
mov si,10   ;si为16位
push si      ;显示结束标志为10
div si
.while ax!=0	      ;求出二进制数对应的十进制数各位的代码
add dl,30H
push dx
mov dx,0
div si
.endw
add dl,30h
push dx
pop dx
.while dx!=10	 ;显示十进制数的所有位
mov ah,2
int 21h
pop dx
.endw
lea dx,Msg
mov ah,09h
int 21h
pop bx
pop ax
pop dx
pop si
ret
output endp
code ends
end start