ACALL　DELAY ；調(diào)用延時子程序

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

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

　　ACALL　DELAY ；調(diào)用延時子程序

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

　　ACALL　DELAY ；調(diào)用延時子程序

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

　　DELAY：　 ；延時子程序

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

　　D1： MOV R1，#255

　　DJNZ R1，$

　　DJNZ R0，D1

　　RET ；子程序返回

　　END ；程序結束

　　3.2循環(huán)移位法

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

　　ORG 0000H ；單片機上電后從0000H地址執(zhí)行

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

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

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

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

　　MOV　　P1，A ；將ACC的數(shù)據(jù)送P1口

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

　　LOOP： RL A ；將ACC中的數(shù)據(jù)左移一位

　　MOV P1，A ；把ACC移動過的數(shù)據(jù)送p1口顯示

　　ACALL DELAY ；調(diào)用延時子程序

　　DJNZ R0，LOOP ；沒有移動夠7次繼續(xù)移動

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

　　DELAY：　 ；延時子程序

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

　　D1： MOV R1，#255

　　DJNZ R1，$

　　DJNZ R0，D1

　　RET ；子程序返回

　　END ；程序結束

　　3.3查表法

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