IIC的PCF8563实用时钟程序(iccavr)

/*************************************

* PCF8563时钟程序 *
* 文 件 名：1602_8563.c *
* 版 本：V22.02 *
* 主控芯片：Mega16L *
* 工作频率：7.3728MHz *
*************************************/
#include
#include
#include
#include
#include
#include
#include

//数据简化宏定义
#define uchar unsigned char
#define uint unsigned int

//全局变量定义
uchar timer[8]; //时钟数据

/**********************************
* 蜂鸣器发声函数 *
* 函数功能：蜂鸣器发出声响 *
* 入 口：n 声次数 *
* i 声时长，i*10ms *
* 返 回：无 *
* 发声频率：固定1KHz 无源 *
**********************************/
void spk(uchar i,uchar n)
{
uint a;
for(;n;n--)
{
a=i*10; //计算每声响的长度：MS
for(;a;a--)
{
delay_us(500); //响声频率为1KHZ
SPK_TG;
delay_us(500);
SPK_TG;
}
SPK_OFF; //响完关闭蜂鸣器
delay_ms(100); //每声响之间隔100MS
}
}

/**********************************
* 读出数据函数 *
**********************************/
uchar read_timer(void)
{
start(); //启动总线
waitack(); //等待启动完成
if(chkack()!=START)return I2C_ERR; //检查是否启动成功
write_tim(SLA_W); //发送写地址
write_tim(0x02); //写数据地址

start();
waitack(); //等待启动完成
if(chkack()!=RESTART)return I2C_ERR; //检查是否启动成功
write_tim(SLA_R); //发送读地址

timer[0]=read_tim()&0x7F; //读出秒数据
timer[1]=read_tim()&0x7F; //读出分数据
timer[2]=read_tim()&0x3F; //读出时数据
timer[3]=read_tim()&0x3F; //读出日数据
timer[4]=read_tim()&0x07; //读出周数据
if(timer[4]==0)timer[4]=7;
timer[5]=read_tim(); //读出月数据
if((timer[5]&0x80)==0)
timer[7]=0x20; //世纪位为0，是21世纪
else timer[7]=0x19; //世纪位不为0，是20世纪
timer[5]=timer[5]&0x1F;
timer[6]=read_tim(); //读出年数据
stop();
return I2C_CRR;
}

/**********************************
* 写入时钟函数 *
**********************************/
uchar write_timer(void)
{
start(); //启动总线
waitack(); //等待启动完成
if(chkack()!=START)return I2C_ERR; //检查是否启动成功
write_tim(SLA_W); //发送写地址
write_tim(0x00); //写数据首地址
write_tim(0x20); //写控制/状态寄存器1，暂停计时
write_tim(0x00); //写控制/状态寄存器2
write_tim(0x00); //写秒数据为0
write_tim(timer[1]); //写分数据
write_tim(timer[2]); //写时数据
write_tim(timer[3]); //写日数据
write_tim(timer[4]); //写周数据
write_tim(timer[5]); //写月数据
write_tim(timer[6]); //写年数据
stop();
return I2C_CRR;
}

/**********************************
* 启动时钟函数 *
**********************************/
uchar start_timer(void)
{
start(); //启动总线
waitack(); //等待启动完成
if(chkack()!=START)return I2C_ERR; //检查是否启动成功
write_tim(SLA_W); //发送写地址
write_tim(0x00); //写数据首地址
write_tim(0x00); //写控制/状态寄存器1，暂停计时
stop();
return I2C_CRR;
}

/**********************************
* 将时钟数据转换后在LCD上显示 *
**********************************/
void timer_lcd(void)
{
locate(1,4); //写指令：第1行第4列地址

lcd_da((timer[7]>>4)+0x30);
lcd_da((timer[7]&0x0f)+0x30);
lcd_da((timer[6]>>4)+0x30); //显示年
lcd_da((timer[6]&0x0f)+0x30);
lcd_da('/');
lcd_da((timer[5]>>4)+0x30); //显示月
lcd_da((timer[5]&0x0f)+0x30);
lcd_da('/');
lcd_da((timer[3]>>4)+0x30); //显示日
lcd_da((timer[3]&0x0f)+0x30);

locate(2,2); //写指令：第2行地址

lcd_da((timer[2]>>4)+0x30); //时
lcd_da((timer[2]&0x0f)+0x30);
lcd_da(':');
lcd_da((timer[1]>>4)+0x30); //分
lcd_da((timer[1]&0x0f)+0x30);
lcd_da(':');
lcd_da((timer[0]>>4)+0x30); //秒
lcd_da((timer[0]&0x0f)+0x30);

lcd_da(20); //时间与星期间留1空格
lcd_da('W'); //星期的前导字
lcd_da('e');
lcd_da('e');
lcd_da('k');
lcd_da((timer[4]&0x0f)+0x30); //星期数据
}

//定时器1：每秒从8563中读取4次数据，更新显示
void timer1_init(void) //定时器1初始化：250毫秒定时，预分频256
{
TCCR1B = 0x00; //停止定时器
TCNT1H = 0x8F; //初值高字节
TCNT1L = 0x81; //定时初值低字节
TCCR1A = 0x00;
TCCR1B = 0x03; //启动定时器
}

#pragma interrupt_handler timer1_ovf_isr:9
void timer1_ovf_isr(void) //定时器1中断入口：250MS中断一次
{
TCNT1H = 0x8F; //重装初值
TCNT1L = 0x81;
read_timer(); //读出当前时钟
timer_lcd(); //显示数据转换
}

/**********************************
* 调整显示函数1 *
**********************************/
void set_xs1(uchar i)
{
lcd_da((timer>>4)+0x30); //显示数据
lcd_da((timer&0x0f)+0x30);
}

/**********************************
* 调整显示函数2 *
**********************************/
void set_xs2(uchar data)
{
lcd_da((data>>4)+0x30); //显示数据
lcd_da((data&0x0f)+0x30);
lcd(0x20);
}

/**********************************
* 程序主函数 *
**********************************/
void main(void)
{
uchar set_flag=0; //调整与正常工作标志
uchar set_time; //调整数据类型标志
uchar set_bh=0; //调整变化标志
uchar a,a1;

port_init();
LED_ON; //开LCD背光
lcd_init();
delay_ms(500);
tonghe();
delay_ms(2000);

Twi_Init();
delay_ms(100);
CLI(); //关总中断
timer1_init();//定时器1初始化
MCUCR = 0x00;
GICR = 0x00;
TIMSK = 0x04; //开放定时器0中断和比较中断
SEI(); //开总中断

cls();
delay_ms(50);

while(1)
{
a=KEY_RD;
if(a!=0)
{
delay_ms(20);
a1=KEY_RD;
if(a1==a)
{
switch(a)
{
case 0x01:
spk(10,1);
if(set_flag==0)
{
TCCR1B=0x00;
LED_ON;
set_flag=1;
cls();
locate(1,4); //显示“时间调整”
xs_lcd("SET:");
}
else
{
TCCR1B=0x04; //开启时钟
set_flag=0;
if(set_bh==1)
{
write_timer(); //写入新时间
set_bh=0;
}
}
break;
case 0x02:
if(set_flag==1)
{
spk(10,1);
set_time++;
locate(2,2); //显示待调整的数据
switch(set_time)
{
case 1:
xs_lcd("year:");
set_xs1(6); //显示年
break;
case 2:
xs_lcd("muth:");
set_xs1(5); //显示月
break;
case 3:
xs_lcd(" day:");
set_xs1(3); //显示日
break;
case 4:
xs_lcd("hour:");
set_xs1(2); //显示时
break;
case 5:
xs_lcd("mine:");
set_xs1(1); //显示分
break;
case 6:
xs_lcd("week:");
set_xs1(4); //显示周
break;
default:set_time=0;break;
}
}
break;
case 0x04:
if(set_flag==1)
{
spk(10,1);
set_bh=1;
locate(2,7); //显示“时间调整”
switch(set_time)
{
case 1:
timer[6]-=0x01;
if((timer[6]&0x0F)==0x0F)timer[6]&=0xF9;
if(timer[6]>0x99)timer[6]=0x99;
set_xs1(6); //显示年
break;
case 2:
timer[5]-=0x01;
if((timer[5]&0x0F)==0x0F)timer[5]&=0xF9;
if(timer[5]==0x00)timer[5]=0x12;
set_xs1(5); //显示月
break;
case 3:
timer[3]-=0x01;
if((timer[3]&0x0F)==0x0F)timer[3]&=0xF9;
if(timer[3]==0x00)timer[3]=0x30;
set_xs1(3); //显示日
break;
case 4:
timer[2]-=0x01;
if((timer[2]&0x0F)==0x0F)timer[2]&=0xF9;
if(timer[2]>0x24)timer[2]=0x23;
set_xs1(2); //显示时
break;
case 5:
timer[1]-=0x01;
if((timer[1]&0x0F)==0x0F)timer[1]&=0xf9;
if(timer[1]>0x59)timer[1]=0x59;
set_xs1(1); //显示分
break;
case 6:
timer[4]-=0x01;
if(timer[4]>6)timer[4]=0x06;
set_xs1(4); //显示周
break;
default:set_time=0;break;
}
}
else
start_timer();
break;
case 0x08:
if(set_flag==1)
{
spk(10,1);
set_bh=1;
locate(2,7); //显示“时间调整”
switch(set_time)
{
case 1:
timer[6]+=0x01;
if((timer[6]&0x0F)==0x0A)timer[6]=(timer[6]&0xF0)+0x10;
if(timer[6]>0x99)timer[6]=0x00;
set_xs1(6); //显示年
break;
case 2:
timer[5]+=0x01;
if((timer[5]&0x0F)==0x0A)timer[5]=(timer[5]&0xF0)+0x10;
if(timer[5]>=0x13)timer[5]=0x01;
set_xs1(5); //显示月
break;
case 3:
timer[3]+=0x01;
if((timer[3]&0x0F)==0x0A)timer[3]=(timer[3]&0xF0)+0x10;
if(timer[3]>=0x31)timer[3]=0x01;
set_xs1(3); //显示日
break;
case 4:
timer[2]+=0x01;
if((timer[2]&0x0F)==0x0A)timer[2]=(timer[2]&0xF0)+0x10;
if(timer[2]>=0x24)timer[2]=0x00;
set_xs1(2); //显示时
break;
case 5:
timer[1]+=0x01;
if((timer[1]&0x0F)==0x0A)timer[1]=(timer[1]&0xf0)+0x10;
if(timer[1]>0x59)timer[1]=0x00;
set_xs1(1); //显示分
break;
case 6:
timer[4]+=0x01;
if(timer[4]>6)timer[4]=0x00;
set_xs1(4); //显示周
break;
default:set_time=0;break;
}
}
else
LED_OFF; //关背光
break;
default:break;
}
}
while(a!=0)
{
a=KEY_RD;
delay_ms(10);
}
}
}
}