//DS1302時鐘程序
//液晶用的ST7920控制芯片的12864       
#include <reg52.h>
#include <intrins.h>
/********************************************************************/
#define  LCD12864_IO  P0
#define  CLERADISPLAY LCD12864_command(0x01);
#define uchar unsigned char
#define uint unsigned int
/********************************************************************/
sbit LCD12864_EN=P2^7;   //E
sbit LCD12864_DIN=P2^5;  // RS
sbit LCD12864_CLK=P2^6;  //RW
sbit DS1302_CLK =P2^0;// P1^0;
sbit DS1302_IO =P2^1;// P1^1;
sbit DS1302_RST =P2^2;// P1^2;
unsigned char time[]={0x10,0x01,0x27,0x03,0x14,0x00,0x00};// 初始化時間年月日星期時分秒     
uchar Display_Buffer[]="12-22-00";//時、分、秒 的格式
uchar riqi[]="11-03-28";//年、月、日 的格式     
uchar xingqi[]="week-3";//星期  
unsigned char second,minute,hour,week,day,month,year;
/********************************************************************/
void LCD12864_busy(void);
void LCD12864_command(unsigned char command);
void LCD12864_data(unsigned char dat);
void LCD12864_address(unsigned char row,unsigned char line);
void LCD12864_string(unsigned char row,unsigned char line,unsigned char *s);
void LCD12864_picture(unsigned char *gImage);
void LCD12864_init(void);
 void LCD12864_char (unsigned char row,unsigned char line,unsigned char a);
/********************************************************************/
 
//
 void delayms(uint k)
 {
uint data i,j;
for(i=0;i<k;i++)
  {
    for(j=0;j<121;j++)
     {;}
   }
 }
void delayus(uchar x)      
 {
    while(--x);
 }

void Mcu_init(void)
{
 
 LCD12864_init();
 
 
 CLERADISPLAY 
 CLERADISPLAY 
 LCD12864_init();
}

void Delay(void)
{
 unsigned char i;
     unsigned int j;
 for(i=0;i<200;i++)
  for(j=1000;j>0;j--);
}
 
/*****************************************************************************
函數功能:向DS1302送一字節數據子程序
入口參數:
出口參數:
*****************************************************************************/
void InputByte(unsigned char BYTE)
{
char i;
for(i=8;i>0;i--)
{  //前面在read_ds1302()函數里已經把CLK清0了    
   DS1302_CLK=0;//這里再清0一次，看著清楚。呵呵   
   DS1302_IO=(bit)(BYTE&0x01);//取出低位數據給數據引腳    
    DS1302_CLK=1;//置1，時鐘上升沿，引腳上的數據傳入1302寄存器中   
   BYTE>>=1;//因為這里移位的BYTE不是最后要的結果，雖然最后循環完會多移一位，但沒影響。
 //循環最后一次后，時鐘狀態是高電平。  
}
}

/*****************************************************************************
函數功能:讀DS1302一個字節子程序，讀數據是下降沿讀
入口參數:
出口參數:
*****************************************************************************/
unsigned char OutputByte(void)
{
unsigned char i;
unsigned char ucdat=0;
for(i=8;i>0;i--)
{  //前面時鐘狀態是高電平。  
    ucdat>>=1; //移位注意，移位不能放在循環語句末，否則最后循環完會多移一位。得到結果就錯了。
   DS1302_IO=1;//單片機端置高防止破壞1302傳來的數據，開始接收1302端的高低數據對數據線的改變。    
   DS1302_CLK=0;//緊接著時鐘變低，下降沿數據輸出。 
   if(DS1302_IO)//數據已經輸出，判斷是1還是0.  
   ucdat|=0x80;//如果引腳是高則此位保存1。低不保存，右移的時候自然補0了。  
   DS1302_CLK=1;//讀完一位數據，再置高時鐘，準備讀下一個。   
   _nop_();//延時一下。    
 
}
  //讀完數據還是把時鐘清0，下次好直接用。     
  DS1302_CLK=0;//讀完數據還是把時鐘清0，下次好直接用。   
DS1302_RST=0;
_nop_();
DS1302_CLK=0;
 DS1302_RST=0;
 return(ucdat);

}

/*****************************************************************************
函數功能:向DS1302某地址寫一字節數據子程序
入口參數:addr,TDat
出口參數:
*****************************************************************************/
void write_ds1302(unsigned char addr,unsigned char TDat)
{
   DS1302_RST=0;
   _nop_();
   DS1302_CLK=0;
    _nop_();
   DS1302_RST=1;
    _nop_();
   InputByte(addr);//先寫地址 
   InputByte(TDat);//再寫數據    
 DS1302_IO=1;//單片機端置高防止破壞1302傳來的數據，開始接收1302端的高低數據對數據線的改變。   
 DS1302_RST=0;
   _nop_();
 DS1302_CLK=0;
}

/*****************************************************************************
函數功能:讀DS1302地址子程序   
入口參數:add
出口參數:timedata
*****************************************************************************/
unsigned char read_ds1302(unsigned char addr)
{
unsigned char timedata;
DS1302_RST=0;
DS1302_CLK=0;
DS1302_RST=1;
InputByte(addr);//先寫入讀命令   
timedata=OutputByte();//再讀出數據    
 DS1302_IO=1;//單片機端置高防止破壞1302傳來的數據，開始接收1302端的高低數據對數據線的改變。   
 DS1302_RST=0;
  _nop_();
 DS1302_CLK=0;
return(timedata);
}

/*****************************************************************************
函數功能:初始化DS1302子程序
入口參數:time[](全局變量)
出口參數:
*****************************************************************************/
void initial_ds1302()
{
 DS1302_IO=1;//單片機端置高防止破壞1302傳來的數據，開始接收1302端的高低數據對數據線的改變。   
 DS1302_RST=0;
 DS1302_CLK=0;
write_ds1302(0x8e,0x00);   //寫保護寄存器，在對時鐘或RAM寫前WP一定要為0
write_ds1302(0x8c,time[0]);   //年 
write_ds1302(0x88,time[1]);   //月 
write_ds1302(0x86,time[2]);   //日 
write_ds1302(0x8A,time[3]);   //星期 
write_ds1302(0x84,time[4]);   //時  
write_ds1302(0x82,time[5]);   //分 
write_ds1302(0x80,time[6]);   //秒  
write_ds1302(0x8e,0x80);   //寫保護寄存器 
}

/*****************************************************************************
函數功能:讀DS1302時間子程序
入口參數:
出口參數:全局變量(second,minute,hour,week,day,month,year)
*****************************************************************************/
void read_time()
{
second=read_ds1302(0x81);   //秒寄存器  
minute=read_ds1302(0x83);   //讀分 
hour=read_ds1302(0x85);    //讀時 
//week=read_ds1302(0x8B);    //讀星期  
//day=read_ds1302(0x87);    //日  
//month=read_ds1302(0x89);   //月  
//year=read_ds1302(0x8d);    //年  
}

void main(void)
{
Mcu_init();
 DS1302_RST=0;
 DS1302_IO=1;
      delayms(1000);
    DS1302_CLK=0;
     delayms(1000);
initial_ds1302();     //初始化DS1302

 Delay();Delay();
 CLERADISPLAY 
  LCD12864_string(1,1,"日期");
 LCD12864_string(2,1,"星期");
 LCD12864_string(3,1,"時間");
 while(1)
 {

    read_time();//讀取時間 
    Display_Buffer[0]=hour/16+'0';//存儲下時的高位進數組
    Display_Buffer[1]=hour%16+'0';//存儲下時的低位進數組
    Display_Buffer[3]=minute/16+'0';//注意+'0'后存儲的是ASCII。用于下面液晶顯示。
    Display_Buffer[4]=minute%16+'0';//注意+'0'后存儲的是ASCII。用于下面液晶顯示。
    Display_Buffer[6]=second/16+'0';
    Display_Buffer[7]=second%16+'0';
 //   riqi[0]=year/16+'0';
 //   riqi[1]=year%16+'0';
 //   riqi[3]=month/16+'0';
 //   riqi[4]=month%16+'0';
  //  riqi[6]=day/16+'0';
 //   riqi[7]=day%16+'0';
  //  xingqi[1]=week%16+'0';

// LCD12864_string(1,3,riqi);//液晶的第1行從第3位開始顯示日期
// LCD12864_string(2,3,xingqi);//液晶的第2行從第3位開始顯示星期
 LCD12864_string(3,3,Display_Buffer);//液晶的第3行從第3列開始顯示時間
 }
}

/*******************************************************************/
void LCD12864_busy(void)
{
    bit BF = 0;
    LCD12864_EN=0;
    LCD12864_DIN=0;
    LCD12864_CLK=1;
    LCD12864_IO=0xff;  //單片機讀數據之前必須先置高位
    do
    {
     LCD12864_EN=1;
        BF=LCD12864_IO&0x80;
        LCD12864_EN=0;
    } while(BF);
   
}
/*******************************************************************/
//          寫入命令 
/*******************************************************************/
void LCD12864_command(unsigned char command)
{
    LCD12864_busy();
    LCD12864_EN=0;
    LCD12864_DIN=0;
    LCD12864_CLK=0; 
   LCD12864_IO=0xff;
    LCD12864_EN=1;
    LCD12864_IO=command;
    LCD12864_EN=0;
}
/*******************************************************************/
//          寫入一字節數據
/*******************************************************************/
void LCD12864_data(unsigned char dat)
{
  
    LCD12864_busy();
    LCD12864_EN=0;
    LCD12864_DIN=1;
    LCD12864_CLK=0;
    LCD12864_IO=0xff;
    LCD12864_EN=1;
    LCD12864_IO=dat;
    LCD12864_EN=0;
}

/*******************************************************************/
//          設置顯示位置    X(1~8),Y(1~4)
/*******************************************************************/
void LCD12864_address(unsigned char row,unsigned char line)
{
    switch(row)
    {
        case 1:LCD12864_command(0x7f + line);
        break;
        case 2:LCD12864_command(0x8f + line);
        break;
        case 3:LCD12864_command(0x87 + line);
        break;
        case 4:LCD12864_command(0x97 + line);
        default:
        break;
    }
}

 /*****************顯示 一個 字符  **************/

  void LCD12864_char (unsigned char row,unsigned char line,unsigned char a)
{
 
    LCD12864_address(row,line);
    LCD12864_data(a);
}

/*******************************************************************/
//          在指定位置顯示字符串
/*******************************************************************/
void LCD12864_string(unsigned char row,unsigned char line,unsigned char *s)
{
    unsigned char LCD12864_temp;
    LCD12864_address(row,line);
    LCD12864_temp=*s;
    while(LCD12864_temp != 0x00)
    {
        LCD12864_data(LCD12864_temp);
        LCD12864_temp=*(++s);
    } 
}

/*******************************************************************/
//          繪制一幅圖片  
/*******************************************************************/
void LCD12864_picture(unsigned char *gImage)
{
    unsigned char X = 0x80,Y = 0x80;
    unsigned char i,j;
    for(i=0;i<64;i++)
    {
        for(j=0;j<16;j++)
        {
            LCD12864_command(0x34);
            LCD12864_command(Y);
            LCD12864_command(X);
            LCD12864_data(*(gImage+i*16+j));      //  low 8 bits
            LCD12864_data(*(gImage+i*16+j+1));    //  high 8 bits
            LCD12864_command(0x36);
            X++;
            j++;
        }
        Y++;
        if(Y>0x9f)
            Y=0x80;
        X=0x80+((i+1)/32)*8;
    }
    LCD12864_command(0x30);
  
}
/*******************************************************************/
//          初始化設置
/*******************************************************************/
void LCD12864_init(void)
{
    CLERADISPLAY      //  clear DDRAM
    LCD12864_command(0x30);     //  8 bits unsigned interface,basic instrument
    LCD12864_command(0x02);     //  cursor return
    LCD12864_command(0x0c);     //  display,cursor on
    LCD12864_command(0x03);  
    LCD12864_command(0x06);
    CLERADISPLAY       //  clear DDRAM
}