用單片機控制的流水燈設計

　　ACALL　DELAY ；調用延時子程序

　　SETB　　P1.6 ；P1.6輸出高電平，使LED7熄滅

　　CLR　　 P1.7 ；P1.7輸出低電平，使LED8點亮

　　ACALL　DELAY ；調用延時子程序

　　SETB　　P1.7 ；P1.7輸出高電平，使LED8熄滅

　　ACALL　DELAY ；調用延時子程序

　　AJMP　 START ；8個LED流了一遍后返回到標號START處再循環

　　DELAY：　 ；延時子程序

　　MOV R0，#255　　；延時一段時間

　　D1： MOV R1，#255

　　DJNZ R1，$

　　DJNZ R0，D1

　　RET ；子程序返回

　　END ；程序結束

　　3.2循環移位法

　　在上個程序中我們是逐個控制P1端口的每個位來實現的，因此程序顯得有點復雜，下面我們利用循環移位指令，采用循環程序結構進行編程。我們在程序一開始就給P1口送一個數，這個數本身就讓P1.0先低，其他位為高，然后延時一段時間，再讓這個數據向高位移動，然后再輸出至P1口，這樣就實現“流水”效果啦。由于8051系列單片機的指令中只有對累加器ACC中數據左移或右移的指令，因此實際編程中我們應把需移動的數據先放到ACC中，讓其移動，然后將ACC移動后的數據再轉送到P1口，這樣同樣可以實現“流水”效果。具體編程如下所示，程序結構確實簡單了很多。

　　ORG 0000H ；單片機上電后從0000H地址執行

　　AJMP START ；跳轉到主程序存放地址處

　　ORG 0030H ；設置主程序開始地址

　　START：MOV SP，#60H ；設置堆棧起始地址為60H

　　MOV　 A，#0FEH ；ACC中先裝入LED1亮的數據（二進制的11111110）

　　MOV　　P1，A ；將ACC的數據送P1口

　　MOV　　R0，#7 ；將數據再移動7次就完成一個8位流水過程

　　LOOP： RL A ；將ACC中的數據左移一位

　　MOV P1，A ；把ACC移動過的數據送p1口顯示

　　ACALL DELAY ；調用延時子程序

　　DJNZ R0，LOOP ；沒有移動夠7次繼續移動

　　AJMP START ；移動完7次后跳到開始重來，以達到循環流動效果

　　DELAY：　 ；延時子程序

　　MOV R0，#255　　；延時一段時間

　　D1： MOV R1，#255

　　DJNZ R1，$

　　DJNZ R0，D1

　　RET ；子程序返回

　　END ；程序結束

　　3.3查表法

上面的兩個程序都是比較簡單的流水燈程序，“流水”花樣只能實現單一的“從左到右”流方式。運用查表法所編寫的流水燈程序，能夠實現任意方式流水，而且流水花樣無限，只要更改流水花樣數據表的流水數據就可以隨意添加或改變流水花樣，真正實現隨心所欲的流水燈效果。我們首先把要顯示流水花樣的數據建在一個以TAB為標號的數據表中，然后通過查表指令“MOVC　A，@A+DPTR”把數據取到累加器A中，然后再送到P1口進行顯示。具體源程序如下，TAB標號處的數據表可以根據實現效果的要求任意修改。