找回密码
 立即注册

QQ登录

只需一步,快速开始

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

按键控制的单片机流水灯(上至下再下至上)

[复制链接]
跳转到指定楼层
楼主
C51的流水灯 老师布置的作业,上至下再下至上的流水灯,并且可以用按键来控制.

资料下载:
按键控制的流水灯(上至下再下至上).zip (79.29 KB, 下载次数: 14)

c语言的流水灯程序:
  1. #include<reg51.h>
  2. #include<intrins.h>       //包含循环左、右移位函数的头文件
  3. #define led P1
  4. sbit key1=P3^2;
  5. sbit key2=P3^3;
  6. unsigned char a,b;

  7. void delay(unsigned char m)
  8. {
  9.       unsigned i,j;
  10.        for(i=0;i<=m;i++)
  11.          for(j=0;j<=120;j++);   //这条语句大概延时1ms
  12. }

  13. void key1ch()
  14. {
  15.   
  16.   while(key2)    //如果键2没有按下,循环执行这段程序
  17.   {
  18.    for(a=0;a<8;a++)
  19.     {   
  20.          delay(500);
  21.          led=_crol_(led,1);//左移一位
  22.          while(!key2) return;//如果键2按下,退出
  23.       }
  24.    }
  25. }
  26. void key2ch()   
  27.   {
  28.     while(key1)      //如果键1没有按下,循环执行这段程序
  29.     {for(b=0;b<8;b++)
  30.       {  
  31.           delay(500);
  32.           led=_cror_(led,1);//右移一位
  33.            while(!key1) return;//如果键1按下,退出
  34.       }
  35.     }
  36. }

  37. void main()
  38. {
  39.   led=0xfe;
  40.   while(1)
  41.   {if(!key1)
  42.    {
  43.     delay(10);
  44.      while(key1);
  45.       key1ch();
  46.     }
  47.    else
  48.     if(!key2)
  49.     {
  50.       delay(10);
  51.        while(key2);
  52.         key2ch();
  53.      }
  54.    }
  55. }
复制代码

汇编语言的流水灯程序:
  1. org 0000h
  2. ajmp main
  3. org 0003h
  4. ajmp int00
  5. org 0013h
  6. ajmp int01
  7. org 0030h
  8. main:mov sp,#60h
  9.      clr 20h.0
  10.      clr 20h.1
  11.      setb it0
  12.      setb it1
  13.      setb ex0
  14.      setb ex1
  15.      setb ea
  16. key1:jnb 20h.0,key2
  17.      mov a,#0feh   ;按键1处理,从上往下流动
  18.      mov r2,#8
  19. loop1:mov p1,a
  20.       acall delay
  21.      rl a             ;左移一位
  22.      jnb 20h.1,loop2   ;判断按键2是否按下,没有则按照按键1的功能执行
  23.      djnz r2,loop1
  24.      mov r2,#8
  25.      sjmp loop1

  26. key2:jnb 20h.1,key1
  27.      mov a,#07fh
  28. loop2: mov p1,a
  29.       acall delay
  30.       rr a
  31.      jnb 20h.0,loop1
  32.       djnz r2,loop2
  33.       mov r2,#8
  34.       sjmp loop2

  35. int00:setb 20h.1
  36.       clr 20h.0
  37.        reti
  38. int01:setb 20h.0
  39.       clr 20h.1
  40.       reti

  41. delay:mov r5,#4
  42.    dl1:mov r6,#200
  43.    dl2:mov r7,#250
  44.    djnz r7,$
  45.    djnz r6,dl2
  46.    djnz r5,dl1
  47.    ret

  48. end
复制代码
  1. org 0000h

  2. key:jnb p3.2,key11  ;判断是否按键1,如果是则进行按键处理
  3.     jnb p3.3,key21  ;判断是否按键2,如果是则进行按键处理
  4.     sjmp key
  5. key11:call delay10ms  ;延时10毫秒进行按键消抖
  6.       jnb p3.2,[        DISCUZ_CODE_5        ]nbsp;     ;按键还是按下的,则等待键释放
  7.       acall key1
  8.       sjmp key
  9. key21:call delay10ms
  10.       jnb p3.3,$
  11.        acall key2
  12.       sjmp key
  13.       
  14. key1:mov a,#0feh   ;按键1处理,从上往下流动
  15.      mov r2,#8
  16. loop1:mov p1,a
  17.       acall delay
  18.      rl a             ;左移一位
  19.      jnb p3.3,back1   ;判断按键2是否按下,没有则按照按键1的功能执行
  20.      djnz r2,loop1
  21.      sjmp key1
  22. back1: mov r2,#8
  23.      ret
  24. key2:mov a,#07fh
  25. loop2: mov p1,a
  26.       acall delay
  27.       rr a
  28.      jnb p3.2,back2
  29.       djnz r2,loop2
  30.       sjmp key2
  31. back2: mov r2,#8
  32.       ret

  33. delay:mov r5,#4
  34.    dl1:mov r6,#200
  35.    dl2:mov r7,#250
  36.    djnz r7,$
  37.    djnz r6,dl2
  38.    djnz r5,dl1
  39.    ret
  40. delay10ms:
  41.     mov r6,#200
  42. ddl2:mov r7,#250
  43.     djnz r7,$
  44.     djnz r6,ddl2
  45.     ret
  46. end
复制代码

评分

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

查看全部评分

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

使用道具 举报

沙发
ID:551148 发表于 2020-4-7 15:53 | 只看该作者
完整文件吗
回复

使用道具 举报

板凳
ID:724172 发表于 2020-4-7 16:37 | 只看该作者
太好了,但还有没有另的模式编码?
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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