汇编语言实现冒泡排序(一)
;用汇编语言实现实现冒泡排序,并将排序后的数输出
DATAS SEGMENT
A dw 100,344,3435,43433,3438,343,134,80,8,1000,65535,54,45
N=$-A ;计算数字所占的字节数
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START:MOV AX,DATAS
MOV DS,AX
MOV SI,0;SI遍历数字;前一个数的地址
MOV CX,N/2-1;设置循环次数,M(M=N/2)个数需要,循环M-1次
CALL BUBBLE;调用BUBBLE将原来的数排序
;输出排序后的数
MOV CX,N/2;循环M次输出排序后的M个数
MOV SI,0;SI遍历排序后的数
MOV DI,0 ;用DI记录数字的位数
MOV BP,N+5;BP用于遍历存储的转化后的字符的位置
SHOW: PUSH CX;循环次数入栈
MOV DX,0;由于将要进行16位除需要置高16位为0
MOV AX,[SI] ;低16位为排序后的数
CALL DTOC ;调用DTOC将十进制数转换为字符串
CALL SHOW_STR ;调用SHOW_STR将一个数转化得到的字符串输出
ADD SI,2;下一个数
POP CX;循环次数出栈栈
LOOP SHOW
MOV AH,4CH
INT 21H
;冒泡排序
BUBBLE PROC
L1:PUSH CX;将循环次数入栈
LEA SI,A;SI遍历DATAS数据段的数字
L2: MOV AX,A[SI];将前一个数存于AX
CMP AX,A[SI+2];比较前后两个数
JBE NEXT;如果前一个数小于或等于后一个数则继续本轮的比较
XCHG AX,A[SI+2];否则,交换前后两个数的位置
MOV A[SI],AX
NEXT:ADD SI,2;下一个数
LOOP L2;注意内层循环的次数已经确定了
POP CX;将循环次数出栈
LOOP L1;下一轮比较
RET
BUBBLE ENDP
; 将十进制数转换为字符串并储存起来
DTOC PROC
S:MOV CX,10 ;将除数10,放入CX中
CALL DIVDW ;调用DIVDW程序
ADD CL,30H ;把数字转换为ASCII码,这样就能显示了
MOV DS:[BP],CL ;把ASCII码放到内存中
INC DI ;用DI记录循环的次数
PUSH AX ;将低16位入栈
ADD AX,DX ;将高位与低位相加,接着判断是否已经除尽
JZ BACK ;除尽后返回调用处
POP AX;将低16位出栈
DEC BP ;逆序存放转化后的字符,便于主程序调用SHOW_STR
JMP S
BACK:POP AX ;为了得到正确的IP值,需要出栈一次
RET
DTOC ENDP
;子程序定义开始,功能是分离被除数的各个位的数字
;公式:X/N=int(H/N)*65536+[rem(H/N)*65536+L]/N
DIVDW PROC
PUSH AX ;低16位入栈
MOV AX,DX ;将高16位写入AX,
MOV DX,0 ;将高16位置零
DIV CX ;将新的数除10,
MOV BX,AX ;将商int(H/N)转移到BX,默认余数rem(H/N)在DX
POP AX ;将低16位出栈,
DIV CX ;将[rem(H/N)*65536+L]除10,默认余数在DX
MOV CX,DX ;将余数转移到CX
MOV DX,BX ;将商int(H/N)转移到dx,相当于int(H/N)*65536
RET ;子程序定义结束
DIVDW ENDP
;实现字符串的输出
SHOW_STR PROC
S2:MOV AH,2;输出数字转化后的字符串
MOV DL,DS:[BP]