广告

原创 数码管频率计proteus 程序

2009-5-14 09:53 2077 0 分类: MCU/ 嵌入式

rar#include <reg51.h>
unsigned char code table[]={0xC0,0xF9,0xA4,0xB0,0x99,
                            0x92,0x82,0xF8,0x80,0x90};
unsigned int cnt,t1count;
unsigned long fre;
sbit s0=P3^0;    
sbit s1=P3^1;
sbit s2=P3^2;


# define M 6
  void delay ( int m)
{
 unsigned char i,j;
 for (i=0;i<m;i++)
 
 for (j=0;j<23;j++);
}


 void T1_ISP(void) interrupt 3
{
  t1count ++;
  TL1=0;
  TH1=0;
}


void T0_ISP(void) interrupt 1
{
 cnt++;
 if (cnt==4000)
 {
     cnt="0";
     EA="0";
        fre="t1count"*65536+TH1*256+ TL1;
                
    
 }
      
}


void led(long n)    //数码管显示及数据处理程序
 {
  P2=0x01;
  P0 = table[n / 10000000];   //千万位 
  delay(M);
  P0=0xff;


  P2=0x02;
  P0 = table[n % 10000000 /1000000];   //百万位 
  delay(M);
  P0=0xff;


  P2=0x04;
  P0 = table[n %1000000/100000];  //十万位 
  delay(M);
  P0=0xff;


  P2=0x08;
  P0 = table[n % 100000/10000];  //万位  
  delay(M);
  P0=0xff;


  P2=0x10;
  P0 = table[n %10000/ 1000];  //千位  
  delay(M);
  P0=0xff;


  P2=0x20;
  P0 = table[n % 1000/100];  //百位  
  delay(M);
  P0=0xff;


  P2=0x40;
  P0 = table[n %100/10];  //十位  
  delay(M);
  P0=0xff;


  P2=0x80;
  P0 = table[n %10];  //个位  
  delay(M);
  P0=0xff;
  } 



main()
{     
    TMOD="0x52";
    TH0=0x06;
    TL0=0x06;
    EA="1";
    ET0=1;
    ET1=1;
     
    while (1)
      {
        if (s0==0)
         {
         delay (2);
        if (s0==0)
            TR0=1;
            TR1=1;
      led (fre);
         }


       if (s1==0)
         {
      delay (2);
      if (s1==0)
           TR0=1;
           TR1=1;
      led (1000000000/fre);
         }


      if (s2==0)
        {
       delay (2);
       if (s2==0)
           TR0=1;
           TR1=1;
       led (500000000/fre);
        } 
     }
}

广告

文章评论 0条评论)

登录后参与讨论
相关推荐阅读
aas7502987 2012-04-07 11:48
51/STC最小系统板资料(更新中)
图片欣赏    淘宝网址:http://item.taobao.com/auction/item_detail.htm?item_num_id=9073446988  二   程...
aas7502987 2011-10-13 22:59
YL-3 资料
YL-3数码管模块资料:YL-3 串行数码管资料.zip...
aas7502987 2011-09-24 09:10
USB转TTL小板驱动
xp系统驱动:XP系统支持STC下载的PL-2303HX新版驱动.rar WIN7系统驱动:WIN7系统支持STC下载的PL2303HX驱动.rar...
aas7502987 2011-05-24 22:48
STM32F103RBT6最小系统原理图 PCB
STM32F103RBT6最小系统板原理图 PCB 附件:做好的成品板:淘宝链接网址:http://item.taobao.com/item.htm?id=8864376956...
aas7502987 2011-05-08 12:53
YL-16 STM32F103最小系统板资料(更新中)
二 数据手册:  USB协议中文版:attachment download  中文数据手册:attachment downloadSTM32选型手册:attachment downloadSTM32勘...
aas7502987 2011-03-20 13:27
DS18B20温度测量模块
DS18B20 数码管温度显示程序:...
我要评论
0
0
广告
关闭 热点推荐上一条 /2 下一条