
#include <AT89X51H>
unsigned char code dispcode[]={0x3f,0x06,0x5b,0x4f,
0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,
0x39,0x5e,0x79,0x71,0x00};
unsigned char second;
unsigned char keycnt;
unsigned int tcnt;
void main(void)
{
unsigned char i,j;
TMOD=0x02;
ET0=1;
EA=1;
second=0;
P0=dispcode[second/10];
P2=dispcode[second%10];
while(1)
{
if(P3_5==0)
{
for(i=20;i>0;i--)
for(j=248;j>0;j--);
if(P3_5==0)
{
keycnt++;
switch(keycnt)
{
case 1:
TH0=0x06;
TL0=0x06;
TR0=1;
break;
case 2:
TR0=0;
break;
case 3:
keycnt=0;
second=0;
P0=dispcode[second/10];
P2=dispcode[second%10];
break;
}
while(P3_5==0);
}
}
}
}
void t0(void) interrupt 1 using 0
{
tcnt++;
if(tcnt==400)
{
tcnt=0;
second++;
if(second==100)
{
second=0;
}
P0=dispcode[second/10];
P2=dispcode[second%10];
}
}
提供一个大概思路,启动就是posedge/negedge(具体取决于你按键的电路)时开始数数,根据时钟频率,数到一定数量就把寄存器清零,显示的数字加一;停表就是停止数数;归零就是重置显示为全部0需要注意的是显示器递增的时候秒到分,分到时是60进制,个人感觉可以用1个十进制从001s进01s,一个十进制01s进1s,一个十进制1s进10s,一个六进制10s进1m,一个十进制1m进10m,一个六进制10m进1h
用单片机的定时器T0定时,计时1秒,实现倒计时的秒表的功能。
程序如下
#include<reg51h>
unsigned char code tab[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};//共阳数码管段码表
unsigned char second;//秒倒计时变量
unsigned char t0n;//T0中断次数计数
sbit k1=P3^2;//定义按键
void delay()
{
unsigned int j;
for(j=400;j>0;j--);
}
void display()//显示子程序
{
P2=0x01;
P0=tab[second/10];//显示十位
delay();
P2=0x02;
P0=tab[second%10];//显示个位
delay();
}
void main()
{
TMOD=0x01;//用T0定时,中断方式
TH0 =0x3C;//晶振12M,定时50ms
TL0 =0xB0;
IE =0x82;
while(1)
{
display();//调显示子程序
if(k1==0)//按键按下
{
if(TR0==0)
{
TR0=1;//启动开始计时
second=60;//从60秒开始倒计时
}
else
TR0=0;
while(k1==0);//等待按键释放
}
}
}
//T0中断程序
void T0_int() interrupt 1
{
TH0 =0x3C;
TL0 =0xB0;
t0n++;
if(t0n>=20)//1秒到
{
t0n=0;
second--;//减1秒
if(second==0)TR0=0;
}
}
仿真图如下
你自己都明明知道sec/10=0了,再过1秒,sec加一,sec=1,可问题是,右边图中for循环运算,是在每一秒以后,确保sec加一以后才循环的吗?估计你是在主程中不断执行for循环的,还没等到sec加1,sec还是0就执行for循环的,那sec就无法加1。闪一下,说明在1秒到的时刻,sec确实加1了,可刚显示出1,马上又for循环了,又为0了。还没等看清楚呢就变回0了。
你要想办法,保证在一秒以后,保证sec加一后再for循环。
其实,这么做本就是错误的。你既然知道按左图的算法是对的,何苦还用for计算呢?为自己出难题啊?
Dim a
Dim i As Integer, j As Integer
Const pi = 31415926
Private Sub Command1_Click()
Timer1Enabled = True
End Sub
Private Sub Command2_Click()
If Command2Caption = "停止" Then
Timer1Enabled = False
Command2Caption = "继续"
Else
Timer1Enabled = True
Command2Caption = "停止"
End If
End Sub
Private Sub Command3_Click()
Line1X2 = 0: Line1Y2 = 12
a = pi / 2
Timer1Enabled = False
i = 0: j = 0
Text1Text = ""
End Sub
Private Sub Form_Load()
Timer1Enabled = False
Timer1Interval = 1000
Picture1Scale (-2, 2)-(2, -2)
Line1X1 = 0: Line1Y1 = 0
Line1X2 = 0: Line1Y2 = 12
a = pi / 2
End Sub
Private Sub Timer1_Timer()
If i > 60 Then
i = 0
j = j + 1
Else
i = i + 1
End If
a = a - pi / 30
Line1X2 = 12 Cos(a)
Line1Y2 = 12 Sin(a)
Text1Text = Format(j, "00") & " : " & Format(i, "00")
End Sub
'上述代码运行正常,无错误。
假设P0接数码管,程序如下:
#include<reg52h>
#define uchar unsigned char
#define uint unsigned int
uchar a=0;
uchar b=9;
//共阴数码管七段码
uchar code table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d, 0x07,0x7f,0x6f,0x77};
void delay(uchar aa)//延时子程序
{
uchar bb,cc;
for(bb=aa;bb>0;bb--)
for(cc=200;cc>0;cc--);
}
void main(void )//主程序
{
TMOD=0x01;// 定时器0工作方式一
ET0=1;
EA=1;
TH0=(65536-50000)/256;//定时50ms
TL0=(65536-50000)%256;
TR0=1;//启动
while(b>0)
{
P0= table[b];
delay(5);
}
P0=0;
TR0=0;
while(1);
}
//中断子程序
void Timer0(void) interrupt 1
{
TH0=(65536-50000)/256;
TL0=(65536-50000)%256;
a++;
if(a==20) {a=0;b--;}
}
以上就是关于求EDA数字秒表(显示99秒)设计 0~99,99~0,的程序全部的内容,包括:求EDA数字秒表(显示99秒)设计 0~99,99~0,的程序、用Quartus2设计一个数字秒表、求编程实现倒计时的秒表,2位LED数码管显示,延时采用硬件延时的方法等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)