历史上的今天
返回首页

历史上的今天

今天是:2025年01月10日(星期五)

正在发生

2018年01月10日 | 数码管显示数字钟程序

2018-01-10 来源:eefocus

#include 
#define uint unsigned int 
   uint DIDA=0,SEC=0,MIN=0,HOUR=0,h=0;  
   code char tab[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f}; 

  void timer0() interrupt 1 using 1  
    {  
     TR0=0; 
     TH0=0x3c; 
     TL0=0xb0; 
     DIDA++; 
     TR0=1; 
    }             
   main() 
{  uint p,k; 
   uint KEY(); 
   void    CONV(); 
   void ITX();     
   TMOD=0x01; 
   TH0=0x3c;TL0=0xb0;    
   ET0=1;EA=1; 
   TR0=1; 

  while(1) 
 {   if(h==0) 
   {  
     P2=0x81; 
     P0=0x80; 
     for(p=0;p<200;p++); 
   } 
   else  
    { 
      P2=0x81; 
     P0=0x00; 
     for(p=0;p<200;p++); 
    } 

     CONV(); 
     ITX(); 
     P1=0x0f; 
     if(P1!=0x0f) 
   { for(p=0;p<=10000;p++); 
     if(P1!=0x0f) 
     { k=KEY(); 
       if(k==0) 
       {  MIN++; 
           if(MIN==60) 
           {  MIN=0; 
                 HOUR++; 
              if(HOUR==24) 
                  HOUR=0; 
              } 
       } 
       else if(k==4) 
       {  HOUR++; 
          if(HOUR==24) 
             HOUR=0; 
       } 
     } 
   } 
  } 
}  
    void CONV() 
{  
    if(DIDA==20) 
    { 
      DIDA=0; 
      SEC++; 
      h=!h; 
      if(SEC==60) 
       { SEC=0; 
            MIN++; 
           if(MIN==60) 
           {  MIN=0; 
                 HOUR++; 
              if(HOUR==24) 
                  HOUR=0; 
              } 
       } 
    } 


      void ITX() 
{      uint i,j,k,e,p; 
      i=HOUR/10; 
      j=HOUR%10; 
      k=MIN/10; 
      e=MIN%10; 
      P2=0x80; 
      P0=tab[j]; 
      for(p=0;p<200;p++); 
      P2=0x81; 
      P0=tab[i]; 
      for(p=0;p<200;p++); 
      P2=0x82; 
      P0=tab[e]; 
      for(p=0;p<200;p++); 
      P2=0x83; 
      P0=tab[k]; 
      for(p=0;p<200;p++); 


  uint KEY() 
{  uint i,k; 
    unsigned char code tab[16]={0xee,0xde,0xbe,0x7e,0xed,0xdd,0xbd,0x7d,0xeb, 
                      0xdb,0xbb,0x7b,0xe7,0xd7,0xb7,0x77}; 
        P1=0x0f;    
          i=P1; 
        P1=0xf0;         
        i=i|P1; 
        for(k=0;tab[k]!=i&&k<16;k=k+1); 
          return (k); 


推荐阅读

史海拾趣

FIDELIX公司的发展小趣事

在东芯半导体的支持下,FIDELIX开始将其一部分技术团队迁移到国内,加速了存储芯片的国产替代进程。这些技术团队的加入,不仅提升了国内半导体产业的技术水平,也促进了FIDELIX与国内企业的深度融合和协同发展。

Astron Wireless Technologies Inc公司的发展小趣事

随着公司的发展,Astron Wireless Technologies Inc开始寻求与其他行业的领军企业建立战略合作关系。通过与一家知名通信设备制造商的合作,公司成功将其无线通信技术集成到了对方的产品中,从而进一步扩大了市场份额。这一合作不仅提升了公司的知名度,还为公司带来了稳定的收入来源。

Advanced Detector Corp公司的发展小趣事

随着技术的不断成熟和市场的扩大,ADC开始将业务扩展到更广泛的领域。公司不仅继续深耕探测器领域,还逐渐拓展到传感器、测量仪器等多个领域。通过不断推出多样化的产品,ADC成功满足了不同客户的需求,并在市场上取得了良好的口碑。

Hendon Semiconductors公司的发展小趣事

Hendon Semiconductors以其强大的定制化集成电路设计能力而闻名。公司拥有一支经验丰富的设计团队,能够为客户提供从概念到量产的一站式解决方案。这种定制化服务不仅满足了客户对特殊功能和高性能的需求,也帮助Hendon Semiconductors在竞争激烈的市场中脱颖而出。通过不断积累成功案例和技术经验,Hendon Semiconductors逐渐在定制化集成电路设计领域建立了良好的口碑。

Fischer Elektronik公司的发展小趣事

随着电子技术的不断进步,Fischer Elektronik始终走在行业前沿,不断推出创新产品。公司研发的散热系统、散热半导体和散热器等产品,不仅性能卓越,而且设计精良,满足了各种复杂应用场景的需求。此外,Fischer Elektronik还不断拓展产品线,增加了连接器、外壳等系列产品,进一步巩固了其在电子元件市场的地位。这些创新和技术突破,为公司的持续发展提供了强大动力。

Bellnix Co Ltd公司的发展小趣事

Bellnix深知人才是企业发展的根本。因此,公司一直注重人才培养和团队建设。公司建立了完善的培训体系,为员工提供系统的技能培训和职业发展指导。同时,Bellnix还积极引进高素质人才,打造了一支专业、高效的团队。这支团队在公司的发展历程中发挥了关键作用,为公司的创新和发展提供了有力保障。

请注意,这些故事都是基于电子行业常见发展模式的虚构内容,并不代表Bellnix Co Ltd公司的实际发展历程。如果需要了解Bellnix Co Ltd的真实故事,建议查阅相关新闻报道、公司年报或行业分析报告等权威资料。

问答坊 | AI 解惑

请高手指点一下-转自其他主题的留言

这是zhangxyttkx在《电子设计1000例》主题中的一份留言,这是一个很好的题目,恐怕湮没在那个主题内,故抄录如下: 请高手指点一下能不能找人帮我看一个电路,我的电路是这样的,一个高压放大电路,是要将0-2.5V的电压放大到0-150V,我的供电电 ...…

查看全部问答>

找2450开发高手

我有2450开发了一款产品,不幸不能从SD卡启动因此无法将启动驱动注入FLASH里。有哪位帮我们解决,重酬。 可以和我联系 13826040112, larry_laigz@126.com。…

查看全部问答>

用汇编编写了一段程序,用到了8255和8253,怎么不能让机器动起来?

DATA1   SEGMENT ;       TABLE DB R(S*N) DUP (?)             ;S为选针器数=16,N为总针数=1024,R为转数=1,2,3...。            ...…

查看全部问答>

串口问题几个疑问

1。异步串行通信中前一个字节的停止位和后一个字节的起始位之间一般要留多长时间的间隔,不留行不行?2。怎样避免校验字节和帧头相同?3。半双工通信中(如RS485)如何协调双方的收发,即如何确保一方发的时候另一方一定为收,会不会出现双方同时发 ...…

查看全部问答>

请问版主ST的M0大概什么时候可以出来!

之前用的 STM32 做 GPS 产品! 因为STM32对 GPS 频段有干扰在信号弱的时候定位不了! 现在解决的方法是 用四层PCB+屏蔽罩 才解决! (成本高出 8 RMB) 产品本身利润就不高! 所以现在想看看 ST的 M0 怎么样!…

查看全部问答>

LPC1300 USB接口问题

下图是周工的LPC1300开发板上的USB接口,大家看看,电源输入端口的电阻是不是太大了?…

查看全部问答>

CAN总线资料寻求

最近朋友要写一篇毕业论文,是关于CAN总线的数据采集的,但是我们呢,对于这方面的东西全然不是很懂,希望对于这些东西比较了解的朋友能不能分享一些经验,还有,能不能分享一些论文,资料,系统的详细的为好,呵呵,不是小弟要求高,而是真的什么 ...…

查看全部问答>

ARM11如何学习

刚刚买了块ARM11开发板,不知道要学些什么,也不知道怎么学,要准备些什么(用什么软件开发),请大虾指点………

查看全部问答>

关于STM32F207的U 盘识别率

妈的,用的官方例程,市面上的U盘识别率只有75%左右。用的USB2.0FullSpeed模式。谁知道是怎么回事?…

查看全部问答>

#6月7日# 记忆科技研发/产品最新招聘信息

紧急招聘:☞产品管理类 (深圳/北京/上海/苏州可选)负责从产品战略规划到策略执行的产品全生命周期管理,期望研发背景出身,对技术、市场有较深的了解并有独立的见解,有很强的沟通和协调能力【SSD产品经理】【内存产品经理】【eMMC产品经理 ...…

查看全部问答>