51单片机LED灯亮灯灭程序设计

1、功能说明:控制单片机P1端口输出,使P1、0位所接的LED点亮,其她7只灯熄灭。

程序:

01: MOV A , #11111110B ; 存入欲显示灯的位置数据

02: MOV P1, A ; 点亮第一只灯

03: JMP $ ; 保持当前的输出状态

04: END ; 程序结束

2、功能说明:单片机P1端口接8只LED,点亮第1、

3、

4、6、7、8只灯。

程序:

01:START: MOV A , #00010010B ; 存入欲显示灯的位置数据

02: MOV P1, A ; 点亮灯

03: JMP START ; 重新设定显示值

04: END ; 程序结束

3、功能说明:单片机P1端口接8只LED,每次点亮一只,向左移动点亮,重复循环。程序:

01: START: MOV R0, #8 ;设左移8次

02: MOV A, #11111110B ;存入开始点亮灯位置

03: LOOP: MOV P1, A ;传送到P1并输出

04: RL A ;左移一位

05: DJNZ R0, LOOP ;判断移动次数

06: JMP START ;重新设定显示值

07: END ;程序结束

4、功能说明:单片机P1端口接8只LED,每次点亮一只,向右移动点亮,重复循环。程序:

01: START: MOV R0, #8 ;设右移8次

02: MOV A, #01111111B ;存入开始点亮灯位置

03: LOOP: MOV P1, A ;传送到P1并输出

04: ACALL DELAY ;调延时子程序

05: RR A ;右移一位

06: DJNZ R0, LOOP ;判断移动次数

07: JMP START ;重新设定显示值

08: DELAY: MOV R5,#50 ;

09: DLY1: MOV R6,#100 ;

10: DLY2: MOV R7,#100 ;

11: DJNZ R7,$ ;

12: DJNZ R6,DLY2 ;

13: DJNZ R5,DLY1 ;

14: RET ;子程序返回

15: END ;程序结束

5、功能说明:单片机P1端口接8只LED,每次点亮一只,先把右边的第一只点亮,0、5秒后点亮右数的第二只灯,第一只熄灭,再过0、5秒点亮右数的第三只灯,第二只熄灭,…亮灯按此顺序由右向左移动。当亮灯移到左侧后,开始与上述反方向移动,即亮灯由左向右移动,重复循环。

程序:

01: START: MOV R0, #8 ;设左移8次

02: MOV A,#0FEH ;存入开始亮灯位置

03: LOOP: MOV P1, A ;传送到P1并输出

04: ACALL DELAY ;调延时子程序

05: RL A ;左移一位

06: DJNZ R0, LOOP ;判断移动次数

07: MOV R1, #8 ;设右移8次

08; LOOP1: RR A ;右移一位

09: MOV P1, A ;传送到P1并输出

10: ACALL DELAY ;调延时子程序

11: DJNZ R1,LOOP1 ;判断移动次数

12: JMP START ;重新设定显示值

13: DELAY: MOV R5,#25 ;延时0、5秒子程序

14: DLY1: MOV R6,#100 ;

15: DLY2: MOV R7,#100 ;

16: DJNZ R7,$ ;

17: DJNZ R6,DLY2 ;

18: DJNZ R5,DLY1 ;

19: RET ;子程序返回

20: END ;

6、功能说明:单片机P1端口接8只LED,每次点亮两只,先从右边向左边移动点亮;再从左边向右边移动点亮,然后闪烁两次,重复循环。

程序:

01: START: MOV R0, #7 ;设左移7次

02: MOV A,#0FCH ;存入开始亮灯位置

03: LOOP: MOV P1, A ;传送到P1并输出

04: ACALL DELAY ;调延时子程序

05: RL A ;左移一位

06: DJNZ R0, LOOP ;判断移动次数

07: MOV R1, #7 ;设右移7次

08: LOOP1: RR A ;右移一位

09: MOV P1, A ;传送到P1并输出

10: ACALL DELAY ;调延时子程序

11: DJNZ R1, LOOP1 ;判断移动次数

12: MOV R2, #3 ;设置闪烁次数

13: MOV A, #00H ;设初始值

14: LOOP2: MOV P1, A ;P1端口灯亮

15: ACALL DELAY ;调用延时子程序

16: CPL A ;A取反值

17: DJNZ R2, LOOP2 ;判断闪烁次数

18: JMP START ;重新设定显示值

19: DELAY: MOV R5, #25

20: DLY1: MOV R6, #100

21: DLY2: MOV R7, #100

22: DJNZ R7, $

23: DJNZ R6, DLY2

24: DJNZ R5, DLY1

25: RET ;子程序返回

26: END ;程序结束

7、功能说明

单片机端口接八只LED,编程时利用取表的方法,使端口P1做单一灯的变化:先向左移2次,然后向右移2次,再闪烁4次,不断循环。

程序:

01: START: MOV DPTR, #TABLE ;存表

02: LOOP: CLR A ;A清零

03: MOVC A, @A+DPTR ;取表代码

04: CJNE A, #01H, LOOP1;不就是01H,循环

05: JMP START ;重新设定

06: LOOP1: MOV P1, A ;送P1输出

07: ACALL DELAY ;调延时程序

08: INC DPTR ;数据指针加1

09: JMP LOOP ;转移到LOOP处

10: DELAY: MOV R5,#25 ;延时0、5秒

11: DLY1: MOV R6,#100 ;

12: DLY2: MOV R7,#100 ;

13: DJNZ R7,$ ;

14: DJNZ R6,DLY2 ;

15: DJNZ R5,DLY1 ;

16: RET ;

17: TABLE: DB 0FEH,0FDH,0FBH,0F7H ;

18: DB 0EFH,0DFH,0BFH,7FH ; 左移

19: DB 0FEH,0FDH,0FBH,0F7H ;

20: DB 0EFH,0DFH,0BFH,7FH ; 左移

21: DB 7FH,0BFH,0DFH,0EFH ;

22: DB 0F7H,0FBH,0FDH,0FEH ; 右移

23: DB 7FH,0BFH,0DFH,0EFH ;

24: DB 0F7H,0FBH,0FDH,0FEH ; 右移

25: DB 00H,0FFH,00H,0FFH ;

26: DB 00H,0FFH,00H,0FFH ; 闪烁

27: DB 01H ; 结束码

28: END ;

8:功能说明::单片机P1端口接8只LED,依次点亮且前面保持不灭,再依次熄灭;延时0、5s,重复循环。

程序:

ORG 00H

START:MOV P1,#0FFH

CALL DELAY

MOV P1,#7FH