4p口32个灯作跑马灯 - - Powered by Discuz!

标题: 4p口32个灯作跑马灯 [打印本页]

作者: hts2008222 时间: 2014-3-27 01:29
标题: 4p口32个灯作跑马灯
ORG  00H;

;主程序:
LOOP: SETB P1.0 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.0          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.0 ;(5)熄灭灯
SETB P1.1 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.1       ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.1 ;(5)熄灭灯
SETB P1.2 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.2       ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.2 ;(5)熄灭灯
SETB P1.3 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.3          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.3 ;(5)熄灭灯
SETB P1.4 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.4       ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.4 ;(5)熄灭灯
SETB P1.5 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.5          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.5 ;(5)熄灭灯
SETB P1.6 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.6          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.6 ;(5)熄灭灯
SETB P1.7 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P1.7          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P1.7 ;(5)熄灭灯
SETB P3.0 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.0          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.0 ;(5)熄灭灯
SETB P3.1 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.1          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.1 ;(5)熄灭灯
SETB P3.2 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.2          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.2 ;(5)熄灭灯
SETB P3.3 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.3          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.3 ;(5)熄灭灯
SETB P3.4 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.4          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.4 ;(5)熄灭灯
SETB P3.5 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.5          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.5 ;(5)熄灭灯
SETB P3.6 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.6          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.6 ;(5)熄灭灯
SETB P3.7 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P3.7          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P3.7 ;(5)熄灭灯
SETB P2.0 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.0          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.0 ;(5)熄灭灯
SETB P2.1 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.1          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.1 ;(5)熄灭灯
SETB P2.2 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.2          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.2 ;(5)熄灭灯
SETB P2.3 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.3          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.3 ;(5)熄灭灯
SETB P2.4 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.4          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.4 ;(5)熄灭灯
SETB P2.5 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.5          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.5 ;(5)熄灭灯
SETB P2.6 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.6          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.6 ;(5)熄灭灯
SETB P2.7 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P2.7          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P2.7 ;(5)熄灭灯
SETB P0.7 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.7          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.7 ;(5)熄灭灯
SETB P0.6 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.6          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.6 ;(5)熄灭灯
SETB P0.5 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.5          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.5 ;(5)熄灭灯
SETB P0.4 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.4          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.4 ;(5)熄灭灯
SETB P0.3 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.3          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.3 ;(5)熄灭灯
SETB P0.2 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.2          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.2 ;(5)熄灭灯
SETB P0.1 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.1          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.1 ;(5)熄灭灯
SETB P0.0 ;(1)熄灭灯
LCALL DELAY       ;(2)延时一段时间
CLR P0.0          ;(3)点亮灯
LCALL DELAY       ;(4)延时一段时间
SETB P0.0  ;(5)熄灭灯

AJMP LOOP       ;(5)跳转到第一句LOOP处

;以下子程序
DELAY: MOV R7,#250 ;(6)
D1: MOV R6,#250 ;(7)
D2: DJNZ R6,D2    ;(8)
   DJNZ R7,D1  ;(9)
   RET       ;(10)
END             ;(11)

作者: abcde4631 时间: 2014-7-7 19:20
只能不停的转圈吗

作者: hts2008222 时间: 2014-9-22 23:01
是的；

作者: 乐儿翅 时间: 2020-7-28 10:29
你这样真的复杂，弄个循环不好吗

欢迎光临 (http://www.51hei.com/bbs/)