找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2675|回复: 3
打印 上一主题 下一主题
收起左侧

4p口32个灯作跑马灯

[复制链接]
跳转到指定楼层
楼主
ID:59980 发表于 2014-3-27 01:29 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
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)

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:63106 发表于 2014-7-7 19:20 来自手机 | 只看该作者
只能不停的转圈吗
回复

使用道具 举报

板凳
ID:59980 发表于 2014-9-22 23:01 | 只看该作者
是的;
回复

使用道具 举报

地板
ID:801878 发表于 2020-7-28 10:29 | 只看该作者
你这样真的复杂,弄个循环不好吗
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表