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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › MCU综合技术区 › 数码管0~100秒程源
返回列表 发新帖
查看: 1904|回复: 0
收起左侧

数码管0~100秒程源

[复制链接]
ID:3721 发表于 2015-1-5 21:20 | 显示全部楼层 |阅读模式
  1. #include<reg52.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char
  4. uchar code q[10]={0x01,0x6d,0x22,0x82,0xc4,0x88,0x08,0xc3,0x00,0x80};
  5. sbit sda=P0^2;
  6. sbit scl=P0^3;
  7. sbit key=P1^0;
  8. uchar aa,a,b,c;
  9. void write_daty(uchar x)
  10. {
  11. uchar i;
  12. for(i=0;i<8;i++)
  13. {
  14.   scl=0;
  15.   x=x<<1;
  16.   sda=CY;
  17.   scl=1;
  18. }

  20. }
  21. void dalay(uchar z)
  22. {
  23. uchar x,y;
  24. for(x=z;x>0;x--)
  25.   for(y=100;y>0;y--);
  26. }
  27. void timer0() interrupt 1
  28. {
  29. TH0=(65536-5000)/256;
  30. TL0=(65536-5000)%256;
  31. aa++;
  32. if(aa==1)
  33. {
  34.    c=1;
  35.   b++;
  36.   if(b==10)
  37.   {
  38.    a++;
  39.    if(a==10)a=0;
  40.    b=0;
  41.   }
  42. }
  43. }
  44. void main()
  45. {
  46. uchar y;
  47. TMOD=0x01;
  48. TH0=(65536-50000)/256;
  49. TL0=(65536-50000)%256;
  50. EA=1;
  51. ET0=1;
  52. TR0=0;
  53. y=1;
  54. write_daty(q[0]);
  55. write_daty(q[0]);
  56. while(1)
  57. {
  58.   while(y==1)
  59.   {
  60.    if(key==0)
  61.    {
  62.     dalay(5);
  63.     while(key==0)
  64.      {
  65.      while(key==0);
  66.      y=2;
  67.      TR0=1;
  68.     }
  69.    }
  70.   }
  71.      while(y==2)
  72.   {
  73.    if(c==1)
  74.    {   
  75.       write_daty(q[b]);
  76.     write_daty(q[a]);
  77.     c=2;
  78.    }
  79.    while(key==0)
  80.    {
  81.     dalay(5);
  82.     while(key==0)
  83.     {
  84.     while(key==0);
  85.     y=3;
  86.     TR0=0;
  87.     }
  88.    }
  89.    }
  90.    while(y==3)
  91.    {
  92.     while(key==0)
  93.    {
  94.     dalay(5);
  95.     while(key==0)
  96.     {
  97.     while(key==0);
  98.     y=1;
  99.     a=0;
  100.     b=0;
  101.     write_daty(q[0]);
  102.     write_daty(q[0]);
  103.     }
  104.    }
  105.    }

  107.   }   
复制代码


数码管

相关帖子
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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