• 芯片制造中的阻挡层沉积技术介绍
  • 接地搭接电缆布局屏蔽!!!
  • 北美液冷生态解码:超微spuermicro,24年营
  • SK海力士全球首发HBM4-16层堆叠、2.0TB/s
  • 2纳米Nanosheet技术及其以后的选择性层减薄

计时器程序(0-9999)(C语言,可用于51单片机)

[复制链接]
查看1085 | 回复6 | 2021-7-20 16:15:42 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区

您需要 登录 才可以下载或查看,没有账号?立即注册

×
#include<reg52.h>
#define  uchar unsigned char
#define uint unsigned int
sbit dula=P2^6;
sbit wela=P2^7;
  sbit led1=P1^2;
uchar code table[]={
0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f}    ;

  void delayms(uint);
  void display(uchar,uchar,uchar,uchar);

unsigned int num,num1,num2, num3,qiang,bai,shi,ge,k;
  void main()
  {
  TMOD=0x11;
TH1=(65536-25872)/256;
TL1=(65536-25872)%256;
TH0=(65536-25872)/256;
TL0=(65536-25872)%256;
EA=1;
ET0=1;
TR0=1;
ET1=1;
TR1=1;
  while(1)
  {
   display(qiang,bai,shi,ge);

   }
   }
  
   void display( uchar qiang,uchar bai,uchar shi,uchar ge)

  {
  dula=1;
P0=table[shi];
dula=0;
P0=0xff;
wela=1;
P0=0xfb    ;
wela=0;
delayms(1);

dula=1;
P0=table[ge];
dula=0;
P0=0xff;
wela=1;
P0=0xf7    ;
wela=0;
delayms(1);


  dula=1;
P0=table[qiang];
dula=0;
P0=0xff;
wela=1;
P0=0xfe    ;
wela=0;
delayms(1);

dula=1;
P0=table[bai];
dula=0;
P0=0xff;
wela=1;
P0=0xfd    ;
wela=0;
delayms(1);

}


void delayms(uint xms)
{
unsigned int i,j;
  for(i=xms;i>0;i--)
    for(j=110;j>0;j--);
}
void T0_time() interrupt 1
{

   TH0=(65536-25872)/256;
   TL0=(65536-25872)%256;
   num1++;
     
   if(num1==1)
{
    num1=0;
    num3++;
    if (num3==520)
{  
    num3=0;
    for(k=15;k>0;k--)
{
  dula=1;
  P0=table[5];
  dula=0;
P0=0xff;
wela=1;
P0=0xfe    ;
wela=0;
delayms(5);

dula=1;
P0=table[2];
dula=0;
P0=0xff;
wela=1;
P0=0xfd    ;
wela=0;
delayms(5);

dula=1;
P0=table[0];
dula=0;
P0=0xff;
wela=1;
P0=0xfb    ;
wela=0;
delayms(5);
}

for(k=20;k>0;k--)
{


dula=1;
P0=table[1];
dula=0;
P0=0xff;
wela=1;
P0=0xfe    ;
wela=0;
delayms(4);

dula=1;
P0=table[3];
dula=0;
P0=0xff;
wela=1;
P0=0xfd    ;
wela=0;
delayms(4);

dula=1;
P0=table[1];
dula=0;
P0=0xff;
wela=1;
P0=0xfb    ;
wela=0;
delayms(4);

dula=1;
P0=table[4];
dula=0;
P0=0xff;
wela=1;
P0=0xf7    ;
wela=0;
delayms(4);
}
for(k=35;k>0;k--)
{
  dula=1;
  P0=table[5];
  dula=0;
P0=0xff;
wela=1;
P0=0xfe    ;
wela=0;
delayms(5);

dula=1;
P0=table[2];
dula=0;
P0=0xff;
wela=1;
P0=0xfd    ;
wela=0;
delayms(5);

dula=1;
P0=table[0];
dula=0;
P0=0xff;
wela=1;
P0=0xfb    ;
wela=0;
delayms(5);
}

for(k=40;k>0;k--)
{


dula=1;
P0=table[1];
dula=0;
P0=0xff;
wela=1;
P0=0xfe    ;
wela=0;
delayms(4);

dula=1;
P0=table[3];
dula=0;
P0=0xff;
wela=1;
P0=0xfd    ;
wela=0;
delayms(4);

dula=1;
P0=table[1];
dula=0;
P0=0xff;
wela=1;
P0=0xfb    ;
wela=0;
delayms(4);

dula=1;
P0=table[4];
dula=0;
P0=0xff;
wela=1;
P0=0xf7    ;
wela=0;
delayms(4);
}
}
}
}

void T1_time() interrupt 3
{

TH1=(65536-25872)/256;
TL1=(65536-25872)%256;
num2++;
if (num2==1)
{
num2=0;
num++;
if (num==9999)
num=0;
qiang=num/1000;
bai=num%1000/100 ;
shi=num%1000%100/10;
ge=num%1000%100%10;
}
}
  
回复

使用道具 举报

bidinghong | 2021-7-20 20:33:41 | 显示全部楼层
回复

使用道具 举报

nongfu88 | 2021-7-21 06:37:42 | 显示全部楼层
回复

使用道具 举报

wangy2000 | 2021-7-21 07:47:27 | 显示全部楼层
回复

使用道具 举报

sunjq | 2021-7-21 08:48:07 | 显示全部楼层
回复

使用道具 举报

lqsgg | 2021-7-21 08:52:07 | 显示全部楼层
回复

使用道具 举报

1123581321 | 2021-7-21 08:57:33 | 显示全部楼层
回复

使用道具 举报

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

本版积分规则