#include<reg51.h> #include<intrins.h> #include"DS1302.h" #include"KEY.h" #include"IIC.H" #define uchar unsigned char #define uint unsigned int #define LEDIO P0 #define LEDCHIP P2 sbit BEEP=P3^7; /*************************數碼管定義**************************************/ //段碼 0 1 2 3 4 5 6 7 8 9 A B - P d uchar code led[15]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x77,0x7c,0x40,0x73,0x5E}; //位選信號 全滅 uchar code selchip[7]={0x01,0x02,0x04,0x08,0x10,0x20,0x10}; //數據格式: 秒 分 時 日 月 星期 年 uchar time_temp[7]={0x00,0x50,0x10,0x12,0x30,0x01,0x11}; //存放初始化時間及設置ds1302的數據 uchar DataTime[7]; //讀取DS1302的數據 /**********************************************************/ uchar display[4][6]={0x06,0x5b,0x6d,0x6f,0x6d,0x6f}; //數碼管顯示 uchar i=0,key1,key2=20,pos=0,p,k; //按鍵和掃描變量 uchar mod=0; //模式:設置時間進入按鈕 bit bflash=0,clockdown=0; //設置和鬧鈴標志 uchar hour,minute,second,year,month,date; //有關時間的變量寄存 uchar ss=1;//鬧鈴響的次數可以自己修改 uchar clock1[3]={0x06,0,0x01},clock2[3]={14,0,0x01}; //鬧鐘時間與開關,默認開關開 uint num=5000; //設置自動返回主界面時間 ///////////////////////////////// void TimeInit() //定時掃描初始化 { EA = 0; TMOD |= 0x10; TH1 = 0xfd; TL1 = 0xe6; EA=1; // ET0=1; ET1=1; TR1=1; } /////////////////////////////////////////////////////// /* void t0int() interrupt 1 //T0中斷程序,控制發音的音調 { TR0 = 0; //先關閉T0 BEEP = ~BEEP; //輸出方波, 發音 TH0 = t0h; //下次的中斷時間, 這個時間, 控制音調高低 TL0 = t0l; TR0 = 1; //啟動T0 LEDIO=display[mod][i]; LEDCHIP=selchip[i]; if(i>=5) i=0; else i++; } */ ///////////////////////////////////////// void TimeInt() interrupt 3 //定時掃描中斷 { if(i==pos) { if(bflash==1) //閃爍標志;設置時間日期和鬧鈴 { if(k++<40) { if(i==4) i=0; else i=i+2; } else { if(p++>40) { p=0; k=0; } } } } LEDIO=display[mod][i]; LEDCHIP=selchip[i]; if(num==0) //自動還回時間界面 { mod=0; bflash=0; } else num--; if(i>=5) i=0; else i++; TH1=0xfa; TL1=0xd8; } //////////////////////////////////////////////////////// void TimeToBin() //把時間變成2進制 { second=DataTime[0]/16*10+DataTime[0]%16; minute=DataTime[1]/16*10+DataTime[1]%16; hour=DataTime[2]/16*10+DataTime[2]%16; date=DataTime[3]/16*10+DataTime[3]%16; month=DataTime[4]/16*10+DataTime[4]%16; year=DataTime[6]/16*10+DataTime[6]%16; } //////////////////////////////////////////////////////// void TimeToBCD() //把時間變為BCD碼 { time_temp[0]=second/10*16+second%10; time_temp[1]=minute/10*16+minute%10; time_temp[2]=hour/10*16+hour%10; time_temp[3]=date/10*16+date%10; time_temp[4]=month/10*16+month%10; time_temp[6]=year/10*16+year%10; } //////////////////////////////////////////////// void TimerDis() { /************************時間掃描設置************************/ display[0][0]=led[hour/10]; display[0][1]=led[hour%10]|0x80; display[0][2]=led[minute/10]; display[0][3]=led[minute%10]|0x80; display[0][4]=led[second/10]; display[0][5]=led[second%10]; /************************日期掃描設置************************/ display[1][0]=led[year/10]; display[1][1]=led[year%10]|0x80; display[1][2]=led[month/10]; display[1][3]=led[month%10]|0x80; display[1][4]=led[date/10]; display[1][5]=led[date%10]; /**********************鬧鈴1掃描設置****************************/ display[2][0]=led[10]; //第一個鬧鐘 display[2][1]=led[14-clock1[2]]; //P鬧鐘開d鬧鐘關 display[2][2]=led[clock1[0]/10]; display[2][3]=led[clock1[0]%10]|0x80; display[2][4]=led[clock1[1]/10]; display[2][5]=led[clock1[1]%10]; /***********************鬧鈴2掃描設置**************************/ display[3][0]=led[11]; //第一個鬧鐘 display[3][1]=led[14-clock2[2]]; //P鬧鐘開d鬧鐘關 display[3][2]=led[clock2[0]/10]; display[3][3]=led[clock2[0]%10]|0x80; display[3][4]=led[clock2[1]/10]; display[3][5]=led[clock2[1]%10]; /********************************************************/ //second=DataTime[0]/16*10+DataTime[0]%16; } /////////////////////////////////////////////////////// void KeySet() { key1=KeyTab[KeyRvs()]; //讀取鍵盤值 if(key2!=key1) //防止連續跳動,釋放按鍵 { if(key1=='*') { pos=0; //返回首位方便設置 if(!bflash) //先進設置時間的界面 mod=0; else mod=(mod+1)%4; //功能選擇 bflash=1; //進入時鐘設置標志 num=5000; //若是沒有操作自動返回主界面 } /////////////////////////////移位按鍵選擇設置的位置 if((key1=='0')&&(bflash)) { pos=(pos+2)%6; num=5000; } if((!bflash)&&(key1=='0')) //一鍵關閉鬧鈴睡懶覺按鍵,下次又開鬧鈴 { clockdown=1; } ///////////////////////////// 時分秒設置,加按鍵, if((key1=='#')&&(bflash)) { num=5000; // if(mod==0) //時間設置 { if(pos==0) { hour=(hour+1)%24; } else if(pos==2) { minute=(minute+1)%60; } else { second=(second+1)%60; } } ////////////////////////////////年月日設置 if(mod==1) { if(pos==0) { year=(year+1)%100; } else if(pos==2) { month=(month+1)%13; } else { if(month==2) //二月處理 { if(year%4==0) //閏年二月 date=(date+1)%30; else date=(date+1)%29; } /////////////////////////////////////////////////大月設置 else if((month==1)||(month==3)||(month==5)||(month==7)||(month==8)||(month==10)||(month==12)) date=(date+1)%32; else /////////////////////////////////////////小月設置 date=(date+1)%31; } } //////////////////////////////////////////////鬧鈴1設置 if(mod==2) { if(pos==0) //鬧鈴1開關設置 { clock1[2]=(clock1[2]+1)%2; } if(pos==2) { clock1[0]=(clock1[0]+1)%24; } if(pos==4) { clock1[1]=(clock1[1]+1)%60; } } //////////////////////////////////////////////鬧鈴2設置 if(mod==3) { if(pos==0) //鬧鈴2開關設置 { clock2[2]=(clock2[2]+1)%2; } if(pos==2) { clock2[0]=(clock2[0]+1)%24; } if(pos==4) { clock2[1]=(clock2[1]+1)%60; } } } if((!bflash)&&(key1=='#')) //查看鬧鈴設置 { mod=(mod+1)%2+2; } ///////////////////////////////////////////////確認鍵設置 if(key1=='D') { if(bflash) //清除設置標志 { bflash=0; mod=0; TimeToBCD(); Set_Ds1302(time_temp); while(!Write_Nbyte_iic(SLAVE,0x50,clock1,3)); while(!Write_Nbyte_iic(SLAVE,0x60,clock2,3)); } else //切換時間和日期 mod=(mod+1)%2; num=5000; //自動返回時間界面 } key2=key1; } //鍵值保存。釋放按鍵用 } ////////////////////////////////////// /********************鬧鈴響一分鐘****************************/ void CLOCK() { if((clock1[0]==hour)&&(clock1[1]==minute)&&(clock1[3])||((clock2[0]==hour)&&(clock2[1]==minute)&&(clock2[3]))) { if(!clockdown) //沒有睡懶覺則正常響鈴 BEEP=~BEEP; else BEEP=1; //否則關閉鬧鈴 } else { clockdown=0; //恢復鬧鈴 BEEP=1; //關閉鬧鈴 } } ///////////////////////////////////////// main() { while(!Read_Nbyte_iic(SLAVE,0x50,clock1,3)); while(!Read_Nbyte_iic(SLAVE,0x60,clock2,3)); TimeInit(); //斷電以后喚醒時鐘 Init_Ds1302(); while(1) { Get_Ds1302(DataTime); //讀取時間 TimerDis(); //段碼處理 KeySet(); //掃描按鍵 if(!bflash) //如果沒有進入設置時間則正常顯示否則時間暫停 { TimeToBin(); } CLOCK(); //鬧鈴設置 } } /*******************************************************************************************************************************/ #ifndef _DS1302_H_ #define _DS1302_H_ /*********************************************************************************/ #include<reg51.h> #include<intrins.h> #define uchar unsigned char #define uint unsigned int sbit RST = P3^4; sbit SCLK = P3^5; sbit IO = P3^6; /********以下是函數聲明********/ void Ds1302_Write_Byte(uchar ch); //寫一字節數據函數聲明 uchar Ds1302_Read_Byte(); //讀一字節數據函數聲明 void Write_Ds1302(uchar cmd,uchar indata); //寫DS1302函數聲明 uchar Read_Ds1302(uchar addr); //讀DS1302函數聲明 void Set_Ds1302(uchar *str); //設置時鐘數據地址 格式為: 秒 分 時 日 月 星期 年 void Get_Ds1302(uchar *str); //讀當前時間函數聲明 void Init_Ds1302(); //DS1302初始化函數聲明 /********以下是寫一字節數據函數********/ void Ds1302_Write_Byte(uchar ch) { uchar n; EA=0; for(n=0;n<8;n++) { SCLK=0; //寫時低電平改變數據 if(ch&0x01) IO=1; else IO=0; SCLK=1; //高電平把數據寫入DS1302 _nop_(); _nop_(); ch=ch>>1; } EA=1; } /********以下是讀一字節數據函數********/ uchar Ds1302_Read_Byte() { uchar n,temp=0; EA=0; IO=1; for(n=0;n<8;n++) { SCLK=1; if(IO) temp|=0x80; else temp&=0x7f; SCLK=0; //產生下跳沿 temp=temp>>1; } EA=1; return (temp); } /********寫DS1302函數, 往DS1302的某個地址寫入數據 ********/ void Write_Ds1302(uchar cmd,uchar indata) { SCLK=0; RST=1; Ds1302_Write_Byte(cmd); Ds1302_Write_Byte(indata); SCLK=0; RST=0; } /********讀DS1302函數,讀DS1302某地址的的數據********/ uchar Read_Ds1302(uchar addr) { uchar backdata; RST=0; SCLK=0; RST=1; Ds1302_Write_Byte(addr); //先寫地址 backdata=Ds1302_Read_Byte(); //然后讀數據 SCLK=0; RST=0; return (backdata); } /********設置初始時間函數********/ void Set_Ds1302(uchar *str) { uchar n,addr = 0x80; Write_Ds1302(0x8e,0x00); //寫控制字,允許寫操作 for(n=0;n<7;n++) { Write_Ds1302(addr,*str); addr=addr+2; str++; } Write_Ds1302(0x8e,0x80); //寫保護,不允許寫 } /********讀取當前時間函數********/ void Get_Ds1302(uchar *str) { uchar n,addr = 0x81; for(n=0;n<7;n++) { str[n]=Read_Ds1302(addr); addr+=2; } } /************初始化時間********************/ void Init_Ds1302() { RST=0; SCLK=0; RST=1; Write_Ds1302(0x80,0x00); //寫秒寄存器 Write_Ds1302(0x90,0xab); //寫充電器 Write_Ds1302(0x8e,0x80); //寫保護控制字,禁止寫 } /////////////////////////////////////// #endif /***********************************************************************************************************************/ #ifndef _KEY_H_ #define _KEY_H_ /****************************************************/ #define KEYIO P1 //定義鍵盤的輸入口 unsigned char code KeyTab[17]="123A456B789C*0#D"; //鍵盤查表 /***********************************************/ void delay_ms(unsigned int time) //誤差 -0.000000000003us { unsigned char a,b; while(time--) { for(b=102;b>0;b--) for(a=3;a>0;a--); } } /**************************************************/ /////////////////////////////////////////////// unsigned char KeyRvs(void) //反轉法 { unsigned char temH, temL, key; delay_ms(10); //兩次掃描間隔為10ms,消除抖動導致的誤操作 KEYIO = 0x0f; temL = KEYIO;//高四位先輸出0;讀入,低四位含有按鍵信息 KEYIO = 0xf0; temH = KEYIO;//然后反轉輸出0;讀入,高四位含有按鍵信息 switch(temL) { case 0x0e: key = 0; break; case 0x0d: key = 1; break; case 0x0b: key = 2; break; case 0x07: key = 3; break; default: return 16;//按下的不是上述按鍵,就當是沒有按鍵 } switch(temH) { case 0xe0: return key; case 0xd0: return (key + 4); case 0xb0: return (key + 8); case 0x70: return (key + 12); default: return 16;//按下的不是上述按鍵,就當是沒有按鍵 } } /**********************************************************/ #endif ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// #ifndef _IIC_H #define _IIC_H_ /***************************************************/ #include<intrins.h> #define uchar unsigned char #define uint unsigned int #define SLAVE 0xa0 //IIC器件地址 注意全部接地 #define Rslave SLAVE+1 //送讀控制字 sbit SDA=P3^0; //IIC數據接口 sbit SCL=P3^1; //IIC時鐘接口 //////////////////////////////////////////////////////// void delay_iic(uint time) { for(time;time>0;time--); } /////////////////////////////////////// void start_iic() { SDA=1; SCL=1; delay_iic(10); SDA=0; delay_iic(10); SCL=0; } void stop_iic() { SDA=0; SCL=1; delay_iic(10); SDA=1; delay_iic(10); SCL=0; } void ack_iic() { SDA=0; SCL=1; delay_iic(10); SCL=0; SDA=1; } void nack_iic() { SDA=1; SCL=1; delay_iic(10); SCL=0; SDA=0; } ////////////////////////* write 1 byte *////////////////////// void write_byte(uchar ch) { uchar i; for(i=0;i<8;i++) { if(ch&0x80) SDA=1; else SDA=0; SCL=1; delay_iic(10); SCL=0; ch=ch<<1; } SDA=1; SCL=1; delay_iic(10); if(SDA==1) F0=0; else F0=1; SCL=0; } ///////////////////////////* read 1 byte *//////////////////////// uchar read_byte() { uchar i; uchar r=0; SDA=1; for(i=0;i<8;i++) { r=r<<1; SCL=1; delay_iic(10); if(SDA==1) r++; SCL=0; } return r; } /***********************寫一個字節************************** bit Write_Byte_iic(uchar addr,uchar ch) { start_iic(); //產生起始信號 write_byte(SLAVE); //發送從器件地址 if(F0==0) return 0; //檢查應答位 write_byte(addr); //發送目的地址 if(F0==0) return 0; write_byte(ch); //發送8為數據 if(F0==0) return 0; stop_iic(); //停止信號 return 1; } /********************讀一個字節*************************** uchar Read_Byte_iic(uchar addr) { uchar ch; start_iic(); //啟動IIC write_byte(SLAVE); //寫器件地址 if(F0==0)return 0; write_byte(addr); //寫讀取的地址 if(F0==0)return 0; start_iic(); //再次產生起始信號,不能少 write_byte(Rslave); //送讀控制字 if(F0==0)return 0; ch=read_byte(); //讀出指定單元的內容 nack_iic(); //非應答信號 stop_iic(); //停止IIC return (ch); } ************************************************************/ //////////////////////////////////////////////////////////// bit Read_Nbyte_iic(uchar slave,uint addr,uchar *str,uchar numb) { uchar i; start_iic(); write_byte(slave); //write iic addr if(F0==0) return 0; write_byte(addr); //write data addr if(F0==0) return 0; start_iic(); //再次產生起始信號,不能少 write_byte(Rslave); //送讀控制字 if(F0==0) return 0; for(i=0;i<numb-1;i++) // { *str=read_byte(); ack_iic(); str++; } *str=read_byte(); nack_iic(); stop_iic(); return(1); } /////////////////////////* write n byte *//////////////////////////// bit Write_Nbyte_iic(uchar slave,uint addr,uchar *str,uchar numb) { uchar i; start_iic(); write_byte(slave); //write iic addr if(F0==0) return 0; write_byte(addr); //write data addr if(F0==0) return 0; for(i=0;i<numb;i++) //write data { write_byte(*str); if(F0==0) return 0; str++; } stop_iic(); //stop iic return(1); } ///////////////////////////////////////////////////////////////// #endif