當前位置:首頁 > 單片機 > 單片機
[導(dǎo)讀]本文大體介紹了PIC16F877A DS1302芯片驅(qū)動

本文大體介紹了PIC16F877A DS1302芯片驅(qū)動

 #include

typedef unsigned char uchar;

typedef unsigned int uint;

#define rs_h PORTC|=0x01

#define rs_l PORTC&=0xfe

#define rw_h PORTC|=0x02

#define rw_l PORTC&=0xfd

#define en_h PORTC|=0x04

#define en_l PORTC&=0xfb

#define rst_h PORTC|=0x08

#define rst_l PORTC&=0xf7

#define sck_h PORTC|=0x10

#define sck_l PORTC&=0xef

#define io_h PORTC|=0x20

#define io_l PORTC&=0xdf

#define SECADD 0X80//秒寄存器地址

#define MINADD 0x82

#define HRADD 0x84

#define DATEADD 0x86

#define MONTHADD 0x88

#define DAYADD 0x8a

#define YEARADD 0x8c

#define CONTROLADD 0x8e

#define PORT (PORTB)

void delayms(uint x);

void lcd_com(uchar com);

void lcd_dat(uchar dat);

void lcd_write(uchar c,uchar r,uchar dat);

void lcd_init(void);

void Ds1302Init(void);

void WriteByte(uchar dat);

uchar ReadByte(void);

uchar BCDtoDex(uchar dat);

uchar DextoBCD(uchar dat);

uchar ReadByte(void);

void Ds1302Write(uchar add,uchar dat);

uchar Ds1302Read(uchar add);

void main(void)

{

uchar sec,min,hr,date,month,day,year;

TRISB=0x00;

TRISC&=0xc0;

lcd_init();

Ds1302Init();

while(1)

{

sec=Ds1302Read(SECADD);

min=Ds1302Read(MINADD);

hr=Ds1302Read(HRADD);

date=Ds1302Read(DATEADD);

month=Ds1302Read(MONTHADD);

day=Ds1302Read(DAYADD);

year=Ds1302Read(YEARADD);

sec=BCDtoDex(sec);

min=BCDtoDex(min);

hr=BCDtoDex(hr);

date=BCDtoDex(date);

month=BCDtoDex(month);

day=BCDtoDex(day);

year=BCDtoDex(year);

lcd_write(0,1,0x32);

lcd_write(0,2,0x30);

lcd_write(0,3,0x30+year/10);

lcd_write(0,4,0x30+year%10);

lcd_write(0,6,0x30+month/10);

lcd_write(0,7,0x30+month%10);

lcd_write(0,9,0x30+date/10);

lcd_write(0,10,0x30+date%10);

lcd_write(0,14,0x30+day);

lcd_write(1,4,0x30+hr/10);

lcd_write(1,5,0x30+hr%10);

lcd_write(1,7,0x30+min/10);

lcd_write(1,8,0x30+min%10);

lcd_write(1,10,0x30+sec/10);

lcd_write(1,11,0x30+sec%10);

delayms(1005);//1ms

}

}

void Ds1302Init(void)

{

rst_l;

sck_l;

Ds1302Write(CONTROLADD,0);//關(guān)閉寫保護

Ds1302Write(MINADD,DextoBCD(06));

Ds1302Write(HRADD,DextoBCD(19));

Ds1302Write(DATEADD,DextoBCD(20));

Ds1302Write(MONTHADD,DextoBCD(5));

Ds1302Write(DAYADD,DextoBCD(7));

Ds1302Write(YEARADD,DextoBCD(12));

Ds1302Write(SECADD,DextoBCD(30));//寫秒,同時啟動時鐘

}

void WriteByte(uchar dat)//上升沿輸出

{

uchar i;

TRISC&=0xdf;

for(i=8;i>0;i--)

{

sck_l;//低電平時數(shù)據(jù)線可變

if(dat&0x01)

io_h;

else

io_l;

sck_h;

dat>>=1;

}

}

uchar BCDtoDex(uchar dat)//BCD碼轉(zhuǎn)十進制

{

uchar i;

i=dat/16;

dat%=16;

i=i*10+dat;

return i;

}

uchar DextoBCD(uchar dat)//十進制轉(zhuǎn)BCD碼

{

uchar i;

i=dat/10;

dat%=10;

i=i*16+dat;

return i;

}

uchar ReadByte(void)//下降沿輸出

{

uchar i;

uchar dat;

TRISC|=0x20;

for(i=8;i>0;i--)//要考慮之前寫完后的狀態(tài),第一次進入此循環(huán)體即有下降沿

{

dat>>=1;

sck_l;

if(PORTC&0x20)

dat|=0x80;

sck_h;

}

return dat;

}

void Ds1302Write(uchar add,uchar dat)

{

rst_l;

sck_l;

rst_h;

WriteByte(add);//最低位置0表示寫

WriteByte(dat);

rst_l;

}

uchar Ds1302Read(uchar add)

{

uchar dat;

rst_l;

sck_l;

rst_h;

WriteByte(add+1);//地址最低位置1表示讀

dat=ReadByte();

rst_l;

return dat;

}

void delayms(uint x) //8M晶振下,延時1ms

{

uint y,z;

for(y=x;y>0;y--)

for(z=220;z>0;z--);

}

void lcd_init(void)//LCD1602初始化

{

lcd_com(0x38);

lcd_com(0x0c);

lcd_com(0x06);

lcd_write(0,5,0xb0);

lcd_write(0,8,0xb0);

lcd_write(1,6,0x3a);

lcd_write(1,9,0x3a);

}

void lcd_com(uchar com)//向LCD1602寫命令

{

rs_l;

rw_l;

PORT=com;

delayms(1);

en_h;

delayms(1);

en_l;

}

void lcd_dat(uchar dat)//向LCD1602寫數(shù)據(jù)

{

rs_h;

rw_l;

PORT=dat;

delayms(1);

en_h;

delayms(1);

en_l;

}

void lcd_write(uchar c,uchar r,uchar dat)//向LCD1602指定行、指定列、寫數(shù)據(jù)

{

lcd_com(0x80+0x40*c+r);

lcd_dat(dat);

delayms(1);

}

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

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

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

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

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

關(guān)鍵字: 汽車 人工智能 智能驅(qū)動 BSP

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

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

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

關(guān)鍵字: 騰訊 編碼器 CPU

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

關(guān)鍵字: 華為 12nm EDA 半導(dǎo)體

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

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

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

關(guān)鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

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

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

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

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉