📄 程序.c

📁 ds1302和数码管写的时钟程序
💻 C
字号:
#include <at89x51.h>
#define led P0 //段选和位选口
unsigned char code tab[]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};//段码
unsigned char code tab1[]={0x01,0x02,0x04,0x08};//位选
sbit duan=P2^0;
sbit wei=P2^1;
//1302位定义
sbit T_CLK = P2^5; //实时时钟时钟线引脚 
sbit T_IO = P2^6; //实时时钟数据线引脚 
sbit T_RST = P2^7; //实时时钟复位线引脚 
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;
//按键位定义
sbit set=P3^4;
sbit add=P3^5;
sbit dec=P3^6;
//子程序声明
void show();
void keyscan();
void incshi();
void decshi();
void incfen();
void decfen();
void shanshuo();
unsigned char hex_bcd(unsigned char hex_data);
unsigned char bcd_hex(unsigned char bcd_data);
unsigned char code buf[2]={0x00,0x0c};//初始时间格式为: 分 时 
unsigned char data ucCurtime[2];
unsigned char data disbuf[4];
unsigned char data disbuf1[2];
unsigned char shi=12,fen=00,shi1=12,fen1=00,keynum,keynum1;
/******************************************************************** 
* 名称: delay
* 功能: 延时
***********************************************************************/
void delay(unsigned char t)
{
	unsigned char i,j;
	for(i=0;i<t;i++)
	for(j=0;j<50;j++);
}
/******************************************************************** 
* 名称: InputByte
* 功能: 向1302写数据
***********************************************************************/
void InputByte(unsigned char ucDa) 
{ 
	unsigned char i;
	ACC = ucDa;
	for(i=8; i>0; i--)
	{
		T_IO = ACC0; //相当于汇编中的 RRC 
		T_CLK = 1;
		T_CLK = 0;
		ACC = ACC >> 1; 
	} 
}
/******************************************************************** 
* 名称: OutputByte
* 功能: 从1302读数据
***********************************************************************/
unsigned char OutputByte(void) 
{ 
	unsigned char i;
	for(i=8; i>0; i--)
	{
		ACC = ACC >>1; //相当于汇编中的 RRC 
		ACC7 = T_IO;
		T_CLK = 1;
		T_CLK = 0;
	} 
	return(ACC); 
}
/******************************************************************** 
* 名称: W1302
* 功能: 向1302写数据
***********************************************************************/
void W1302(unsigned char ucAddr, unsigned char ucDa)
{
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	InputByte(ucAddr); // 地址，命令 
	InputByte(ucDa); // 写1Byte数据
	T_CLK = 1;
	T_RST =0;
} 
/******************************************************************** 
* 名称: R1302
* 功能: 从1302读数据
***********************************************************************/
unsigned char R1302(unsigned char ucAddr)
{
	unsigned char ucDa,a;
	T_RST = 0;
	T_CLK = 0;
	T_RST = 1;
	InputByte(ucAddr); // 地址，命令 
	a = OutputByte(); // 读1Byte数据
	ucDa=bcd_hex(a); 
	T_CLK = 1;
	T_RST =0;
	return(ucDa);
}
/******************************************************************** 
* 名称: Set1302
* 功能: 设置初始时间
* 调用: W1302() 
* 输入: pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void set1302(unsigned char *pSecDa) 
{
	unsigned char i;
	unsigned char ucAddr = 0x82; 
	W1302(0x8e,0x00); // 控制命令,WP=0,写操作?
	W1302(0x90,0xa4); //启动涓流
	for(i=0;i<2;i++)
	{   
		W1302(ucAddr,hex_bcd(*pSecDa)); //  分 时 	
		pSecDa++;
		ucAddr+=2;
	}
	W1302(0x80,0x00); //起振
	W1302(0x8e,0x80); // 控制命令,WP=1,写保护?
}
/******************************************************************** 
* 名称: hex_bcd
* 功能: 将16进制转成bcd码
* 返回值: bcd_data
***********************************************************************/
unsigned char hex_bcd(unsigned char hex_data)
{
	unsigned char temp=0,bcd_data=0;	
	temp=hex_data%100;	
	bcd_data=bcd_data|temp/10<<4;	
	bcd_data=bcd_data|temp%10;
	return bcd_data;	
}
/******************************************************************** 
* 名称: bcd_hex
* 功能: 将bcd码转成16进制
* 返回值: temp
***********************************************************************/
unsigned char bcd_hex(unsigned char bcd_data)
{
	unsigned char temp=0;
	temp=((bcd_data>>4)*10)+(bcd_data&0x0f);
	return temp;
}
/******************************************************************** 
* 名称: keyscan
* 功能: 键盘扫描程序
* 返回值: 无
***********************************************************************/
void keyscan()
{
	if(set==0)
    {	
		delay(5);
		if(set==0)
		{
			while(!set);
			delay(5);
			while(!set);
			W1302(0x8e,0x00); //控制命令,WP=0,写操作
			W1302(0x80,0x80); //停振
		    keynum++;			
			if(keynum==3)
			{
				keynum=0;
				W1302(0x80,0x00); //起振
				W1302(0x8e,0x80); //控制命令,WP=1,写保护
				set1302(disbuf1);				
			}
		}
	}
	if(keynum!=0)
	{
		if(add==0)
		delay(5);
		if(add==0)
		{
			while(!add);
			delay(5);
			while(!add);
			if(keynum==1)
			{
				incfen();
			}
			if(keynum==2)
			{
				incshi();		
			}
		}
		if(dec==0)
		delay(5);
		if(dec==0)
		{
			while(!dec);
			delay(5);
			while(!dec);
			if(keynum==1)
			{
				decfen();
			}
			if(keynum==2)
			{
				decshi();		
			}
		}
	}
}
/******************************************************************** 
* 名称: incshi
* 功能: 小时加
* 返回值: 无
***********************************************************************/
void incshi()
{
	shi++;
	if(shi==24)
	shi=0;
	disbuf[0]=tab[shi/10];
	disbuf[1]=tab[shi%10];
	disbuf1[1]=shi;
	disbuf1[0]=fen;
}
/******************************************************************** 
* 名称: decshi
* 功能: 小时减
* 返回值: 无
***********************************************************************/
void decshi()
{
	if(shi==0)
	shi=24;
	shi--;
	disbuf[0]=tab[shi/10];
	disbuf[1]=tab[shi%10];
	disbuf1[1]=shi;
	disbuf1[0]=fen;
}
/******************************************************************** 
* 名称: incfen
* 功能: 分钟加
* 返回值: 无
***********************************************************************/
void incfen()
{
	fen++;
	if(fen==60)
	fen=0;
	disbuf[2]=tab[fen/10];
	disbuf[3]=tab[fen%10];
	disbuf1[0]=fen;
	disbuf1[1]=shi;
}
/******************************************************************** 
* 名称: decfen
* 功能: 分钟减
* 返回值: 无
***********************************************************************/
void decfen()
{
	if(fen==0)
	fen=60;
	fen--;
	disbuf[2]=tab[fen/10];
	disbuf[3]=tab[fen%10];
	disbuf1[0]=fen;
	disbuf1[1]=shi;
}
/******************************************************************** 
* 名称: show
* 功能: 显示
* 返回值: 无
***********************************************************************/
void show()
{
		unsigned char a;
		unsigned char Addr;
		Addr = 0x83;
		for (a=0;a<2;a++)
		{
			ucCurtime[a]=R1302(Addr);//格式为:分 时
			Addr += 2;
		}					
		disbuf[0]=tab[ucCurtime[1]/10];
		disbuf[1]=tab[ucCurtime[1]%10];
		disbuf[2]=tab[ucCurtime[0]/10];
		disbuf[3]=tab[ucCurtime[0]%10];
		shi=ucCurtime[1];
		fen=ucCurtime[0];
		for(a=0;a<4;a++)       //扫描送段码
		{
			led=tab1[a];
			wei=1;
			wei=0;
			led=disbuf[a];
			duan=1;
			duan=0;
			delay(10);
			led=0xff;
			duan=1;
			duan=0;	
		}
}
/******************************************************************** 
* 名称: shanshuo
* 功能: 设定时间时闪烁
* 返回值: 无
***********************************************************************/
void shanshuo()
{       
		unsigned char a,b;
		if(keynum==1)
		{
			for(b=0;b<200;b++)
			{
				for(a=2;a<4;a++)       //扫描送段码
				{
					led=tab1[a];
					wei=1;
					wei=0;
					led=disbuf[a];
					duan=1;
					duan=0;
					delay(5);
					led=0xff;
					duan=1;
					duan=0;	
				}
			}
			delay(200);
			delay(200);
			delay(200);
			delay(200);
			delay(200);
			delay(200);
		}				
		if(keynum==2)
		{
			for(b=0;b<200;b++)
			{
				for(a=0;a<2;a++)       //扫描送段码
				{
					led=tab1[a];
					wei=1;
					wei=0;
					led=disbuf[a];
					duan=1;
					duan=0;
					delay(5);
					led=0xff;
					duan=1;
					duan=0;	
				}
			}
			delay(200);
			delay(200);
			delay(200);
			delay(200);
			delay(200);
			delay(200);
		}
}
/******************************************************************** 
* 名称: main
* 功能: 主程序
* 返回值: 无
***********************************************************************/
void main()
{
	set1302(buf);
	while(1)
	{
		keyscan();
		if(keynum!=0)
        shanshuo();//闪烁
		if(keynum==0)
		show();
	}
}
💿 文件大小 24 K
👤 上传用户 q116026490
📂 所属分类单片机开发
🏷️ 相关标签

#1302 #ds #数码管 #时钟程序
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -