AVR單片機(jī)萬年歷程序

//***************************FileName:RTC.C************************//

//***************************ICCAVRV6.30編譯**********************//

#include//寄存器定義文件

#include//使用到宏

#defineucharunsignedchar//數(shù)據(jù)類型定義

#defineuintunsignedchar//數(shù)據(jù)類型定義

#defineSD23030x64//SD2303器件IIC識別碼

ucharTable［12］={0x3f，0x06，0x5b，0x4f，0x66，0x6d，0x7d，0x07，0x7f，0x6f，0x38，0x76};

//顯示數(shù)據(jù)表0123456789LH

ucharData［4］={0，0，0，0};//DS1722

ucharEnter_Flag;//確定

ucharF_Flag;//數(shù)據(jù)應(yīng)答標(biāo)志

voidDelayMs（uinti）//延時(shí)函數(shù)1

{ucharj;

for（;i！=0;i--）

{for（j=2000;j！=0;j--）{;}}

}

voidDisplay（uchar*p）//顯示函數(shù)

{uchari，sel=0x00;

for（i=0;i《16;i++）

{PORTC=sel;

PORTA=Table［p［i］］;

DelayMs（10）;

sel=sel《《1;

}

}

voidNOPNOP（uchari）//延時(shí)函數(shù)2

{for（;i！=0;i--）NOP（）;}

voidSetSCL（uchari）//IIC時(shí)鐘線SCL設(shè)置

{if（i==1）PORTB=PORTB|0x01;

elsePORTB=PORTB&0xFE;}

voidSetSDA（uchari）//IIC數(shù)據(jù)線SDA設(shè)置

{if（i==1）PORTB=PORTB|0x02;

elsePORTB=PORTB&0xFD;}

//SCL=PB^0;SD2303時(shí)鐘線

//SDA=PB^1;SD2303數(shù)據(jù)線

//INTRB=PB^3;SD2303中斷線A

//INTRA=PB^2;SD2303中斷線B

voidStart（）//IIC總線開始信號

{SetSDA（1）;

SetSCL（1）;

NOPNOP（50）;

SetSDA（0）;

NOPNOP（50）;

SetSCL（0）;

}

voidStop（）//IIC總線停止信號

{SetSDA（0）;

SetSCL（1）;

NOPNOP（50）;

SetSDA（1）;

NOPNOP（50）;

SetSCL（0）;

}

voidAck（）//單片機(jī)應(yīng)答信號

{SetSDA（0）;

SetSCL（1）;

NOPNOP（50）;

SetSCL（0）;

SetSDA（1）;

}

voidNack（）//單片機(jī)非應(yīng)答信號

{SetSDA（1）;

SetSCL（1）;

NOPNOP（50）;

SetSCL（0）;

SetSDA（0）;

}

voidCheck_Ack（）//器件應(yīng)答信號檢查

{SetSDA（1）;

SetSCL（1）;

F_Flag=0;

DDRB=DDRB&0xFD;

if（（PINB&0x02）==0）

{SetSCL（0）;

NOPNOP（50）;}

else

{F_Flag=1;

SetSCL（0）;

NOPNOP（50）;}

DDRB=DDRB|0x02;

}

voidWrite_Bit0（）//向IIC總線寫0

{SetSDA（0）;

SetSCL（1）;

NOPNOP（50）;

SetSCL（0）;

}

voidWrite_Bit1（）//向IIC總線寫1

{SetSDA（1）;

SetSCL（1）;

NOPNOP（50）;

SetSCL（0）;

SetSDA（0）;

}

voidWrite_Byte（ucharData）//向IIC總線寫一字節(jié)數(shù)據(jù)

{uchari;

for（i=0;i《8;i++）

{if（（Data&0x80）》0）

Write_Bit1（）;

else

Write_Bit0（）;

Data《《=1;

}

}

ucharRead_Byte（）//從IIC總線讀一字節(jié)數(shù)據(jù)

{ucharnn=0xff;

ucharj;

for（j=0;j《8;j++）

{SetSDA（1）;

SetSCL（1）;

DDRB=DDRB&0xFB;

if（（PINB&0x02）==0）

{nn《《=1;

nn=（nn&0xfe）;

SetSCL（0）;}

else

{nn《《=1;

nn=（nn|0x01）;

SetSCL（0）;}

}

DDRB=DDRB|0x02;

return（nn）;

}

//****************************寫N個(gè)字節(jié)子程序**********************//

//函數(shù)參數(shù)說明：

//Slave:IIC器件地址，如上文定義的SD2303

//Address：起始地址

//Array：讀數(shù)據(jù)存放的數(shù)組

//Number：讀取的字節(jié)數(shù)

voidWrite_Nbyte（ucharSlave，ucharAddress，uchar*Array，ucharNumber）

{uchark;

writ:do//開始-》寫IIC器件地址-》檢查應(yīng)答位

{Start（）;

Write_Byte（Slave）;

Check_Ack（）;

}while（F_Flag==1）;

do

{Write_Byte（Address《《4）;//送起始地址-》檢查應(yīng)答位

Check_Ack（）;

}while（F_Flag==1）;

for（k=0;k{Write_Byte（*Array）;

Array++;

Check_Ack（）;}//檢查應(yīng)答位

Stop（）;

}

//****************************寫一個(gè)字節(jié)子程序**********************//

//函數(shù)參數(shù)說明：

//Slave:IIC器件地址，如上文定義的SD2303

//Address:IIC器件寄存器地址

//Data：數(shù)據(jù)

voidWrite_1byte（ucharSlave，ucharAddress，ucharData）

{writ:do//開始-》寫IIC器件地址-》檢查應(yīng)答位

{Start（）;

Write_Byte（Slave）;

Check_Ack（）;

}while（F_Flag==1）;

do

{Write_Byte（Address《《4）;//送起始地址-》檢查應(yīng)答位

Check_Ack（）;

}while（F_Flag==1）;

Write_Byte（Data）;

Check_Ack（）;//檢查應(yīng)答位

Stop（）;//停止信號

}

//***************************讀N個(gè)字節(jié)子程序***********************//

//函數(shù)參數(shù)說明：

//Slave:IIC器件地址，如上文定義的SD2303

//Address：起始地址

//Array：讀數(shù)據(jù)存放的數(shù)組

//Number：讀取的字節(jié)數(shù)

voidRead_Nbyte（ucharSlave，ucharAddress，uchar*Array，ucharNumber）

{uchardata0，x;

//第一步：開始信號-》寫IIC器件地址-》檢查應(yīng)答位

do{Start（）;Write_Byte（Slave）;Check_Ack（）;}while（F_Flag==1）;

//第二步：寫起始地址-》檢查應(yīng)答位

do{Write_Byte（Address《《4）;Check_Ack（）;}while（F_Flag==1）;

//第三步：開始信號-》寫IIC器件地址+1（表示讀）-》檢查應(yīng)答位

do{Start（）;Write_Byte（Slave+1）;Check_Ack（）;}while（F_Flag==1）;

//第四步：讀N字節(jié)，每讀完一字節(jié)發(fā)一個(gè)Ack應(yīng)答，最后一字節(jié)發(fā)Nack

for（x=0;x{data0=Read_Byte（）;*Array=data0;Array++;

if（x《（Number-1））{Ack（）;}}

Nack（）;

//第五步：發(fā)停止信號，結(jié)束讀操作

Stop（）;

}

//***************************按鍵處理程序**************************//

//說明：為簡化程序設(shè)計(jì)，此程序不保證輸入的時(shí)間數(shù)據(jù)的合理性。

voidKey_Process（void）

{uchartemp1［17］={0，0，0，0，0，0，0，0，0，0，0，0，0，0，0，0};

//輸入數(shù)據(jù)格式依次為年、月、日、星期、小時(shí)和分鐘

uchartemp2［7］={0，0，0，0，0，0，0，};

ucharteMP3［3］={0，0，0xff};

//輸入數(shù)據(jù)格式依次為小時(shí)和分鐘

ucharKey;

uchar*Flag;

uchari;

Flag=temp1;

if（PIND！=0xff）

{DelayMs（20）;//延時(shí)去抖

if（PIND！=0xff）

Key=PINB;

if（Key==0xfe）//“時(shí)間設(shè)置”鍵按下

{temp1［0］|=0x80;//年高位設(shè)置提示

while（！Enter_Flag）//直到按下確定鍵方停止

{for（i=0;i《50;i++）

Display（temp1）;//顯示和延時(shí)

Key=~PIND;

switch（Key）

{case0x04://“＋”鍵處理

（*Flag）++;

if（（（*Flag）&0x7f）==10）*Flag=0|0x80;

break;

case0x08://“－”鍵處理

if（（（*Flag）&0x7f）==0）*Flag=10|0x80;

（*Flag）--;

break;

case0x10://“下一位”鍵處理

Flag++;

（*（Flag-1））&=0x7f;//上一位去掉小數(shù)點(diǎn)顯示

（*Flag）|=0x80;//當(dāng)前位加上小數(shù)點(diǎn)顯示

if（Flag==temp1+13）

{Flag=temp1;

（*Flag）|=0x80;

（*（Flag+13））&=0x7f;}

break;

case0x20://“上一位”鍵處理

if（Flag==temp1）

{（*Flag）&=0x7f;

Flag=temp1+13;

（*Flag）|=0x80;}

elseFlag--;

（*Flag）|=0x80;//當(dāng)前位加上小數(shù)點(diǎn)顯示

（*（Flag+1））&=0x7f;//下一位去掉點(diǎn)小數(shù)點(diǎn)顯示

break;

case0x40:Enter_Flag=1;break;//“確定”鍵處理

//case0x80:Enter_Flag=1;break;//測試用

default:break;}

}

Enter_Flag=0;//按鍵狀態(tài)恢復(fù)

temp2［0］=0x00;//秒，默認(rèn)從00開始計(jì)時(shí)

temp2［1］=（temp1［11］《《4）|temp1［12］;//分

temp2［2］=（temp1［9］《《4）|temp1［10］;//時(shí)

temp2［3］=temp1［8］;//周

temp2［4］=（temp1［6］《《4）|temp1［7］;//日

temp2［5］=（temp1［4］《《4）|temp1［5］;//月

temp2［6］=（temp1［2］《《4）|temp1［3］;//年

Write_Nbyte（SD2303，0x00，temp2，7）;//初始化設(shè)定時(shí)間

}

if（Key==0xfd）//“鬧鈴設(shè)置”鍵按下

{temp1［9］|=0x80;

Flag=temp1+9;//定時(shí)小時(shí)高位設(shè)置提示

while（！Enter_Flag）//直到按下確定鍵方停止

{for（i=0;i《50;i++）

Display（temp1）;

Key=~PINB;

switch（Key）

{case0x04://“＋”按鍵處理

（*Flag）++;

if（（（*Flag）&0x7f）==10）*Flag=0|0x80;

break;

case0x08://“－”按鍵處理

if（（（*Flag）&0x7f）==0）*Flag=10|0x80;

（*Flag）--;

break;

case0x10://“下一位”按鍵處理

Flag++;

（*（Flag-1））&=0x7f;//上一位去掉小數(shù)點(diǎn)顯示

（*Flag）|=0x80;//當(dāng)前位加上小數(shù)點(diǎn)顯示

if（Flag==temp1+13）

{（*Flag）&=0x7f;

Flag=temp1+9;

（*Flag）|=0x80;}

break;

case0x20://“上一位”按鍵處理

if（Flag==temp1+9）

{（*Flag）&=0x7f;

Flag=temp1+13;

（*Flag）|=0x80;}

elseFlag--;

（*Flag）|=0x80;//當(dāng)前位加上小數(shù)點(diǎn)顯示

（*（Flag+1））&=0x7f;//下一位去掉小數(shù)點(diǎn)顯示

break;

case0x40:Enter_Flag=1;break;//“確定”鍵處理

//case0x80:Enter_Flag=1;break;//測試用

default:break;}

}

Enter_Flag=0;

temp3［0］=（（temp1［11］《《4）|temp1［12］）&0x7f;//分?jǐn)?shù)據(jù)處理，去掉小數(shù)點(diǎn)

temp3［1］=（（temp1［9］《《4）|temp1［10］）&0x7f;//時(shí)數(shù)據(jù)處理，去掉小數(shù)點(diǎn)

if（（temp3［0］《0x60）&&（temp3［1］《0x24））//判斷是否為合法時(shí)間

{Write_1byte（SD2303，0x0e，0b10110000）;//開啟鬧鈴使能

Write_1byte（SD2303，0x0f，0b00101000）;//開始中斷使能

Write_Nbyte（SD2303，0x08，temp3，3）;}//初始化鬧鈴設(shè)置

else

Write_1byte（SD2303，0x0e，0b00110000）;//取消鬧鈴功能

}

}

}

//***************************DS1722函數(shù)開始************************//

voidConvert（ucharp1，uchar*p2）

{uchartemp;

if（p1&0x80）

{p2［13］=10;//零下溫度用10表示

p1=0xff-p1;}//溫度絕對值

else

p2［13］=11;//零上溫度用11表示

p2［14］=p1/10;//溫度十位

p2［15］=p1-p2［14］*10;//溫度個(gè)位

}

//***************************通過SPI接口寫數(shù)據(jù)函數(shù)*****************//

//函數(shù)參數(shù)說明：

//Address：DS1722寄存器地址

//Data：寫入的數(shù)據(jù)

voidDSWrite_Byte（ucharAddress，ucharData）

{ucharclear;

PORTB=PORTB|0x10;//使能SPI器件

SPDR=Address;

while（?。⊿PSR&0x80））{;}

clear=SPSR;

clear=SPDR;

SPDR=Data;

while（?。⊿PSR&0x80））{;}

clear=SPSR;

clear=SPDR;

PORTB=PORTB&0xef;

}

//***************************通過SPI接口讀數(shù)據(jù)函數(shù)*****************//

//函數(shù)參數(shù)說明：

//Address：DS1722寄存器地址

//返回值：讀取的溫度數(shù)據(jù)

ucharDSRead_Byte（ucharAddress）

{ucharclear;

ucharData;

PORTB=PORTB|0x10;

SPDR=Address;

while（?。⊿PSR&0x80））{;}

clear=SPSR;

clear=SPDR;

SPDR=Address;//發(fā)空數(shù)據(jù)

while（?。⊿PSR&0x80））{;}

clear=SPSR;

Data=SPDR;

PORTB=PORTB&0xef;

return（Data）;

}

voidmain（void）

{uchari;

uchartime［16］={2，0，0，4，1，2，2，7，1，1，7，3，0，0，0，0};

ucharSet_Time［7］={0x50，0x30，0x20，0x03，0x05，0x01，0x05};

//初始化時(shí)間2005-01-05Wed20-30-50

ucharSD，DS;

ucharSD2303_Controller1=0x00;//禁止中斷

ucharSD2303_Controller2=0x20;//時(shí)間格式：24小時(shí)制

DDRA=0xff;//A口輸出

DDRC=0xff;//C口輸出

DDRD=0x80;//D口最高位輸出，其他帶上拉輸入

PORTD=0x7F;

DDRB=0xF3;//B口帶第2、3位帶上拉輸入，其他輸出

PORTB=0xF3;

Write_1byte（SD2303，0x0e，SD2303_Controller1）;//寫控制字

Write_1byte（SD2303，0x0f，SD2303_Controller2）;//寫控制字

Write_Nbyte（SD2303，0x00，Set_Time，7）;//初始化時(shí)間

SPCR=0b01011100;

DSWrite_Byte（0x80，0xf0）;//DS17228位分辨率自由轉(zhuǎn)換模式

while（1）

{Key_Process（）;//按鍵處理

Read_Nbyte（SD2303，0x00，Set_Time，7）;//讀取時(shí)間

time［2］=Set_Time［6］》》4;//年高位；

time［3］=Set_Time［6］&0x0f;//年低位；

time［4］=Set_Time［5］》》4;//月高位；

time［5］=Set_Time［5］&0x0f;//月低位；

time［6］=Set_Time［4］》》4;//日高位；

time［7］=Set_Time［4］&0x0f;//日低位；

time［8］=Set_Time［3］;//星期；

time［9］=Set_Time［2］》》4;//時(shí)高位；

time［10］=Set_Time［2］&0x0f;//時(shí)低位；

time［11］=Set_Time［1］》》4;//分高位；

time［12］=Set_Time［1］&0x0f;//分低位；

time［13］=Set_Time［0］》》4;//秒高位；

time［14］=Set_Time［0］&0x0f;//秒低位；

Read_Nbyte（SD2303，0x0f，&SD，1）;//讀取中斷標(biāo)志位

if（SD&0x02）PORTD=PORTD|0x80;//響鈴1分鐘

elsePORTD=PORTD&0x7F;//關(guān)閉鬧鈴

DS=DSRead_Byte（0x02）;//讀取溫度值

Convert（DS，time）;

Display（time）;//時(shí)間顯示

}

}
來源；21ic