當前位置:首頁 > 單片機 > 單片機
[導讀]/************************************** PCF8563時鐘程序 * * 文 件 名:1602_8563.c * * 版 本:V22.02 * * 主控芯片:Mega16L * * 工作頻率:7.3728MHz * *************************************/ #inclu

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

* 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);
}
}
}
}

本站聲明: 本文章由作者或相關機構授權發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內容真實性等。需要轉載請聯(lián)系該專欄作者,如若文章內容侵犯您的權益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或將催生出更大的獨角獸公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉型技術解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術公司SODA.Auto推出其旗艦產品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關鍵字: 汽車 人工智能 智能驅動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務中斷的風險,如企業(yè)系統(tǒng)復雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務連續(xù)性,提升韌性,成...

關鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產業(yè)博覽會開幕式在貴陽舉行,華為董事、質量流程IT總裁陶景文發(fā)表了演講。

關鍵字: 華為 12nm EDA 半導體

8月28日消息,在2024中國國際大數(shù)據(jù)產業(yè)博覽會上,華為常務董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權最終是由生態(tài)的繁榮決定的。

關鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應對環(huán)境變化,經營業(yè)績穩(wěn)中有升 落實提質增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務引領增長 以科技創(chuàng)新為引領,提升企業(yè)核心競爭力 堅持高質量發(fā)展策略,塑強核心競爭優(yōu)勢...

關鍵字: 通信 BSP 電信運營商 數(shù)字經濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術學會聯(lián)合牽頭組建的NVI技術創(chuàng)新聯(lián)盟在BIRTV2024超高清全產業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術創(chuàng)新聯(lián)...

關鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關鍵字: BSP 信息技術
關閉
關閉