制作一个八路流水灯,一个按键控制开关源码及仿真文件在附件中
仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
proteus仿真
单片机源程序如下:
- ORG 00H
- LJMP START
- ORG 0030H
- MOV P2,#7FH
- START:MOV A,#0FFH ;赋初值
- CLR C
- MOV R2,#8
- LOOP:
- JNB P2.0, DS
- RLC A ; 带进位右移
- MOV P2,A
- CALL DELAY
- DJNZ R2,LOOP
- MOV R2,#7
- LOOP1:RRC A ; 带进位左移
- MOV P2,A
- CALL DELAY
- DJNZ R2,LOOP1
- JMP START
- DS: ajmp ds
- DELAY:MOV R3,#20 ; 延时0.2秒
- D1: MOV R4,#20
- D2: MOV R5,#248
- DJNZ R5,$
- DJNZ R4,D2
- DJNZ R3,D1
- RET
- END
复制代码
所有资料51hei提供下载:
单片机课堂实例-流水灯.zip
(76.36 KB, 下载次数: 33)
|