改进的冒泡排序单片机汇编语言编程举例

例：改进的冒泡排序（单字节）

N EQU 10

FIR EQU 40H

LJMP GO

TABL：DB 12，3，45H，22，6，9，33

DB 23H，43，11 ；数组元素表

GO： MOV DPTR，#TABL

MOV R0，#FIR

MOV R7，#N

EVALU：MOV A，0 ；给工作单元赋值

MOVC A，@A+DPTR

MOV @R0，A

INC R0

INC DPTR

DJNZ R7，VALU

SORT： ；排序

MOV R7，#N -1 ；外循环数

CLR F0 ；清交换标志为0

NEXT0：

MOV A，R7

JZ EXIT ；只一个元素，退出

MOV R6，A ；内循环数

MOV R0，#FIR ；R0指向第一个元素

NEXT1：

MOV A，@R0 ；取一个字节

INC R0

MOV B，@R0

CJNE A，B，L1 ；两个相邻字节比较

SJMP L2 ；相等，不必交换

L1：JC L2 ；前一个小于后一个，符合增序

XCH A，@R0 ；前一个大于后一个，交换

DEC R0

MOV @R0，A

INC R0

SETB F0 ；设置交换标志为1

L2：DJNZ R6，NEXT1 ；内循环是否结束？

JNB F0，EXIT ；无交换，提前结束

DJNZ R7，NEXT0 ；外循环是否结束？

EXIT： RET