冒泡排序是一种简单的排序算法。它重复地走访过要排序的数列，一次比较两个元素，如果他们的顺序错误就把他们交换过来。走访数列的工作是重复地进行直到没有再需要交换，也就是说该数列已经排序完成。
冒泡排序算法的运作如下：
比较相邻的元素。如果第一个比第二个大，就交换他们两个。对每一对相邻元素作同样的工作，从开始第一对到结尾的最后一对。这步做完后，最后的元素会是最大的数。针对所有的元素重复以上的步骤，除了最后一个。持续每次对越来越少的元素重复上面的步骤，直到没有任何一对数字需要比较。程序框图：
进行宏指令嵌套时，要十分注意宏指令调用与子程序调用的区别，否则很容易产生错误。例如下面这段代码：
BTFSC STATUS,C ; TEMP1>TEMP2? GOTO NEXT1GOTO NEXT2 NEXT1 swap DATAI,DATAJ,TEMP ; 是，则交换两者的值NEXT2nop如不慎写作：
BTFSC STATUS,C ; TEMP1>TEMP2? swap DATAI,DATAJ,TEMP ; 是，则交换两者的值nop ; 否则，不做操作就会发生错误。
子程序框图：
完整程序：
list p=16f877A ;标明所用的处理器类型#include <p16f877A.inc> ;调用头文件 __CONFIG _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_OFF & _HS_OSC & _WRT_OFF & _LVP_OFF & _CPD_OFF;*****************宏定义*********************************************************compare_swap macro DATAI,DATAJ,TEMP BCF STATUS,C ; 标志位清零MOVF DATAJ,WSUBWF DATAI,W ; 比较大小BTFSC STATUS,C ; TEMP1>TEMP2? GOTO NEXT1GOTO NEXT2 NEXT1 swap DATAI,DATAJ,TEMP ; 是，则交换两者的值NEXT2nop ; 否则，不做操作endmswap macro DATAI,DATAJ,TEMP MOVF DATAI,WMOVWF TEMPMOVF DATAJ,WMOVWF DATAIMOVF TEMP,WMOVWF DATAJendm;*****************变量定义*******************************************************DATA1 EQU 0x20 ; 待排序的数据DATA2 EQU 0x21 DATA3 EQU 0x22 DATA4 EQU 0x23 DATA5 EQU 0x24 DATA6 EQU 0x25 DATA7 EQU 0x26DATA8 EQU 0x27DATA9 EQU 0x28DATA10 EQU 0x29 SIZE EQU 0x30 ; 待排序数据个数-1COUNT1 EQU 0x31 ; 循环变量COUNT2 EQU 0x32 TEMP EQU 0x33 ; 临时变量 DATAI EQU 0x34DATAJ EQU 0x35 ;******************************************************************************* ORG 0x0000 ; 复位入口地址 nop ; 兼容ICD调试工具，必须加nop goto Main ; 跳转至Main函数;*************************Main 函数的代码***************************************Main MOVLW 0x34 ; 数据初始化 MOVWF DATA1 MOVLW 0x53 MOVWF DATA2 MOVLW 0xb5 MOVWF DATA3 MOVLW 0x33 MOVWF DATA4 MOVLW 0xA1 MOVWF DATA5 MOVLW 0x42 MOVWF DATA6 MOVLW 0x11 MOVWF DATA7 MOVLW 0x86 MOVWF DATA8 MOVLW 0x65 MOVWF DATA9 MOVLW 0x76 MOVWF DATA10 MOVLW .9 MOVWF SIZE CLRF COUNT1 ; 初始化循环变量 CLRF COUNT2 CLRF TEMP ; 初始化临时变量 CLRF DATAI CLRF DATAJ CALL paixu ; 调用子程序排序 nop goto $ ; 停机;*************************子程序************************** ******************** ORG 0x0100paixuLOOP1 MOVLW 0x20 MOVWF FSR ; FSR=0x20，起始位置 CLRF COUNT2LOOP2 MOVF INDF,W MOVWF DATAI INCF FSR,F MOVF INDF,W MOVWF DATAJ compare_swap DATAI,DATAJ,TEMP MOVF DATAJ,W ; 数据还原 MOVWF INDF DECF FSR,F MOVF DATAI,W MOVWF INDF INCF FSR,F INCF COUNT2,F ; COUNT2++，COUNT2<9-COUNT1? MOVF COUNT1,W SUBWF SIZE,W BSF STATUS,C SUBWF COUNT2,W BTFSS STATUS,C GOTO LOOP2 INCF COUNT1,F ; COUNT1++，COUNT1<9? BSF STATUS,C MOVF SIZE,W SUBWF COUNT1,W BTFSS STATUS,C GOTO LOOP1 NOP RETURN;*****************************************************************************END ; 程序结束新闻热点
疑难解答
