/*************************************
* PCF8563時鐘程序 *
* 文 件 名:1602_8563.c *
* 版 本:V22.02 *
* 主控芯片:Mega16L *
* 工作頻率:7.3728MHz *
*************************************/
#include
#include
#include
#include
#include
#include
#include
//數(shù)據(jù)簡化宏定義
#define uchar unsigned char
#define uint unsigned int
//全局變量定義
uchar timer[8]; //時鐘數(shù)據(jù)
/**********************************
* 蜂鳴器發(fā)聲函數(shù) *
* 函數(shù)功能:蜂鳴器發(fā)出聲響 *
* 入 口:n 聲次數(shù) *
* i 聲時長,i*10ms *
* 返 回:無 *
* 發(fā)聲頻率:固定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
}
}
/**********************************
* 讀出數(shù)據(jù)函數(shù) *
**********************************/
uchar read_timer(void)
{
start(); //啟動總線
waitack(); //等待啟動完成
if(chkack()!=START)return I2C_ERR; //檢查是否啟動成功
write_tim(SLA_W); //發(fā)送寫地址
write_tim(0x02); //寫數(shù)據(jù)地址
start();
waitack(); //等待啟動完成
if(chkack()!=RESTART)return I2C_ERR; //檢查是否啟動成功
write_tim(SLA_R); //發(fā)送讀地址
timer[0]=read_tim()&0x7F; //讀出秒數(shù)據(jù)
timer[1]=read_tim()&0x7F; //讀出分數(shù)據(jù)
timer[2]=read_tim()&0x3F; //讀出時數(shù)據(jù)
timer[3]=read_tim()&0x3F; //讀出日數(shù)據(jù)
timer[4]=read_tim()&0x07; //讀出周數(shù)據(jù)
if(timer[4]==0)timer[4]=7;
timer[5]=read_tim(); //讀出月數(shù)據(jù)
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(); //讀出年數(shù)據(jù)
stop();
return I2C_CRR;
}
/**********************************
* 寫入時鐘函數(shù) *
**********************************/
uchar write_timer(void)
{
start(); //啟動總線
waitack(); //等待啟動完成
if(chkack()!=START)return I2C_ERR; //檢查是否啟動成功
write_tim(SLA_W); //發(fā)送寫地址
write_tim(0x00); //寫數(shù)據(jù)首地址
write_tim(0x20); //寫控制/狀態(tài)寄存器1,暫停計時
write_tim(0x00); //寫控制/狀態(tài)寄存器2
write_tim(0x00); //寫秒數(shù)據(jù)為0
write_tim(timer[1]); //寫分數(shù)據(jù)
write_tim(timer[2]); //寫時數(shù)據(jù)
write_tim(timer[3]); //寫日數(shù)據(jù)
write_tim(timer[4]); //寫周數(shù)據(jù)
write_tim(timer[5]); //寫月數(shù)據(jù)
write_tim(timer[6]); //寫年數(shù)據(jù)
stop();
return I2C_CRR;
}
/**********************************
* 啟動時鐘函數(shù) *
**********************************/
uchar start_timer(void)
{
start(); //啟動總線
waitack(); //等待啟動完成
if(chkack()!=START)return I2C_ERR; //檢查是否啟動成功
write_tim(SLA_W); //發(fā)送寫地址
write_tim(0x00); //寫數(shù)據(jù)首地址
write_tim(0x00); //寫控制/狀態(tài)寄存器1,暫停計時
stop();
return I2C_CRR;
}
/**********************************
* 將時鐘數(shù)據(jù)轉換后在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); //星期數(shù)據(jù)
}
//定時器1:每秒從8563中讀取4次數(shù)據(jù),更新顯示
void timer1_init(void) //定時器1初始化:250毫秒定時,預分頻256
{
TCCR1B = 0x00; //停止定時器
TCNT1H = 0x8F; //初值高字節(jié)
TCNT1L = 0x81; //定時初值低字節(jié)
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(); //顯示數(shù)據(jù)轉換
}
/**********************************
* 調整顯示函數(shù)1 *
**********************************/
void set_xs1(uchar i)
{
lcd_da((timer>>4)+0x30); //顯示數(shù)據(jù)
lcd_da((timer&0x0f)+0x30);
}
/**********************************
* 調整顯示函數(shù)2 *
**********************************/
void set_xs2(uchar data)
{
lcd_da((data>>4)+0x30); //顯示數(shù)據(jù)
lcd_da((data&0x0f)+0x30);
lcd(0x20);
}
/**********************************
* 程序主函數(shù) *
**********************************/
void main(void)
{
uchar set_flag=0; //調整與正常工作標志
uchar set_time; //調整數(shù)據(jù)類型標志
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); //顯示待調整的數(shù)據(jù)
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);
}
}
}
}