设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 基于51单片机的流水灯实验（适合新手练习）
返回列表 发新帖
查看: 23816|回复: 13
打印 上一主题 下一主题
收起左侧

基于51单片机的流水灯实验（适合新手练习）

  [复制链接]
跳转到指定楼层
楼主
ID:407257 发表于 2018-10-10 21:30 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
基于51单片机的流水灯实验
K1键流水灯交替闪烁。
K2键流水灯从两边向中间移动闪烁。
K3键流水灯全部闪烁。
K4键流水灯从LED7到LED0流水闪烁。

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include<reg51.h>
  2. sbit S5=P1^4;
  3. sbit S6=P1^5;
  4. sbit S7=P1^6;
  5. sbit S8=P1^7;
  6. unsigned char keyval;
  7. void key_scan(void);
  8. void forward(void);
  9. void backward(void);
  10. void Alter(void);
  11. void blink(void);
  12. void led_delay(void);
  13. void delay10ms(void);
  14. void main(void)
  15. {
  16.     keyval=0;
  17.         while(1)
  18.         {
  19.            key_scan();
  20.            switch(keyval)
  21.            {
  22.                case 5:Alter();
  23.                           break;
  24.            case 6:forward();
  25.                           break;
  26.                    case 7:blink();
  27.                           break;
  28.            case 8:backward();
  29.                           break;
  30.            }
  31.         }
  32. }
  33. void key_scan(void)
  34. {
  35.     P1=0xff;
  36.         if((P1&0xf0)!=0xf0)
  37.         {
  38.            delay10ms();
  39.            if(S5==0)
  40.            keyval=5;
  41.            if(S6==0)
  42.            keyval=6;
  43.            if(S7==0)
  44.            keyval=7;
  45.            if(S8==0)
  46.            keyval=8;
  47.     }
  48. }
  49. void Alter(void)
  50. {
  51.     P3=0xaa;
  52.         led_delay();
  53.         P3=0x55;
  54.         led_delay();
  55. }

  57. void forward(void)
  58. {
  59.     P3=0x7e;
  60.         led_delay();
  61.         P3=0xbd;
  62.         led_delay();
  63.         P3=0xdb;
  64.         led_delay();
  65.         P3=0xe7;
  66.         led_delay();
  67.         P3=0xe7;
  68.         led_delay();
  69.         P3=0xdb;
  70.         led_delay();
  71.         P3=0xbd;
  72.         led_delay();
  73.         P3=0x7e;
  74.         led_delay();
  75. }

  77. void blink(void)
  78. {
  79.     P3=0xff;
  80.         led_delay();
  81.         P3=0x00;
  82.         led_delay();
  83. }

  85. void backward(void)
  86. {
  87.     P3=0x7f;
  88.         led_delay();
  89.         P3=0xbf;
  90.         led_delay();
  91.         P3=0xdf;
  92.         led_delay();
  93.         P3=0xef;
  94.         led_delay();
  95.         P3=0xf7;
  96.         led_delay();
  97.         P3=0xfb;
  98.         led_delay();
  99.         P3=0xfd;
  100.         led_delay();
  101.         P3=0xfe;
  102.         led_delay();
  103. }

  105. void led_delay(void)
  106. {
  107.     unsigned char i,j;
  108.         for(i=0;i<220;i++)
  109.         for(j=0;j<220;j++);
  110. }
  111.   
  112. void delay10ms(void)
  113. {   
  114.     unsigned char i,j;
  115.         for(i=0;i<100;i++)
  116.         for(j=0;j<100;j++);
  117. }
复制代码

所有资料51hei提供下载:
实验二.zip (84.67 KB, 下载次数: 183)



评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

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

使用道具 举报

沙发
ID:563688 发表于 2019-6-16 16:24 | 只看该作者
太棒了
回复

使用道具 举报

板凳
ID:562520 发表于 2019-6-16 17:08 | 只看该作者
很有用感谢
回复

使用道具 举报

地板
ID:654162 发表于 2019-12-2 12:01 | 只看该作者
很有用感谢
回复

使用道具 举报

5#
ID:129858 发表于 2019-12-2 17:47 | 只看该作者
我是新手决定学习
回复

使用道具 举报

6#
无效楼层，该帖已经被删除
7#
无效楼层，该帖已经被删除
8#
无效楼层，该帖已经被删除
9#
无效楼层，该帖已经被删除
10#
ID:604301 发表于 2020-5-15 12:39 | 只看该作者
很有用感谢作者
回复

使用道具 举报

11#
无效楼层，该帖已经被删除
12#
ID:752659 发表于 2020-5-15 16:16 | 只看该作者
太棒了，对新手很有用
回复

使用道具 举报

13#
无效楼层，该帖已经被删除
14#
无效楼层，该帖已经被删除
15#
无效楼层，该帖已经被删除
16#
ID:822120 发表于 2020-10-4 17:59 | 只看该作者
感谢作者
回复

使用道具 举报

17#
ID:864648 发表于 2020-12-22 09:33 来自触屏版 | 只看该作者
这个可以用来做呼吸灯吗
回复

使用道具 举报

18#
ID:862762 发表于 2020-12-22 15:11 来自触屏版 | 只看该作者
可以用来做呼吸灯吗
回复

使用道具 举报

19#
ID:931365 发表于 2021-6-2 11:23 | 只看该作者
感谢作者 太有用了
这个应该要PROTEUS软件好用点
回复

使用道具 举报

20#
ID:82810 发表于 2021-6-6 20:35 | 只看该作者
学学  这玩意琢磨看看 模仿就是学习
回复

使用道具 举报

21#
无效楼层，该帖已经被删除
22#
无效楼层，该帖已经被删除
23#
ID:946012 发表于 2021-6-28 14:02 | 只看该作者
牛皮，非常有用，就是代码看不懂
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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