#include<reg52.h>
#include<intrins.h>
#define uchar unsigned char
#define uint unsigned int


sbit lcden=P2^7;
sbit lcdrw=P2^5;
sbit lcdrs=P2^6;
sbit T_CLK=P3^6;
sbit T_IO=P3^4;
sbit T_RST=P3^5;
uchar bdata datbyte;
sbit datbyte0=datbyte^0;
sbit datbyte7=datbyte^7;  

uchar code table1[]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d};                         //讀地址命令
uchar code table2[]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c};                        //寫地址命令
uchar  time[7]={0,0,0x08,0x01,0x10,0x06,0x16};
char week[21]={'M','o','n','T','u','e','W','e','d','T','u','e','F','r','i','S','a','t','S','u','n'};

void delayms(uint xms)
{
        uint i,j;
        for(i=xms;i>0;i--)
                for(j=110;j>0;j--);
}


void writeorder(uchar order)                   //1602寫命令函數(shù)
{
        lcdrs=0;
        P0=order;
        delayms(5);
        lcden=1;
        delayms(5);
        lcden=0;
}


void writedate(uchar date)                          //1602寫數(shù)據(jù)函數(shù)
{
        lcdrs=1;
        P0=date;
        delayms(5);
        lcden=1;
        delayms(5);
        lcden=0;
}


void lcdinit()                                                  //1602初始化函數(shù)
{
        lcdrw=0;
        writeorder(0x38);
        writeorder(0x0c);
        writeorder(0x06);
        writeorder(0x01);
}
/*************1302寫入一個(gè)字節(jié)*/
void w_1302byte(uchar date)
{
        uchar i;
        datbyte=date;
        for(i=0;i<8;i++)
        {         
                T_CLK=0;  _nop_();
                T_IO=datbyte0;
                T_CLK=1;  _nop_();
                datbyte>>=1;
        }
}
  /************1302讀取一個(gè)字節(jié)********/
uchar r_1302byte(void)
{
        uchar i;
        datbyte=0;
        for(i=0;i<8;i++)
        {
                T_CLK=1;        _nop_();
                datbyte7=T_IO;
                _nop_();
                T_CLK=0; _nop_();
                datbyte>>=1;
        }
        return(datbyte);
}
/**********1302寫數(shù)據(jù)**********/
void write_1302(uchar addr,uchar date)
{
        T_RST=0;
        _nop_();
        T_CLK=0; _nop_();
        T_RST=1;_nop_();
        w_1302byte(addr);
        w_1302byte(date);
        T_CLK=1;  _nop_();
        T_RST=0;  _nop_();
}

/******1302讀取一個(gè)字節(jié)*******/
uchar read_1302(uchar addr)
{
        uchar dat1,dat2,temp;
        T_RST=0; _nop_();
        T_CLK=0; _nop_(); ///sclk為低時(shí)rst才能拉高
        T_RST=1;_nop_();
        w_1302byte(addr);
        temp=r_1302byte();
        T_RST=0;        _nop_();
        T_CLK=1;   _nop_();
        T_IO=0;                  
        _nop_();
        T_IO=1;
        _nop_();
        //dat1=temp/16;
        //dat2=temp%16;
        //temp=dat1*10+dat2;
        return(temp);
}


/***********1302初始化********/
void init_1302(void)
{
        uchar i;
        uchar addr=0x80;
        write_1302(0x8e,0x00);
        for(i=0;i<7;i++)
    {
                write_1302(addr,time);
                addr+=2;
        }
        write_1302(0x8e,0x80);
}

        /*******1302的八個(gè)數(shù)據(jù)讀取*******/
void get_1302(void)
{
        uchar i,addr=0x81;
        for(i=0;i<7;i++)
        {
                time=read_1302(addr);
                addr+=2;
        }
}



void display()
{
        int n;
        writeorder(0x80+0X40);
        writedate('0'+time[2]/16);                                
        writedate('0'+(time[2]&0x0f));                                 
        writedate('-');
        writedate('0'+time[1]/16);                                
        writedate('0'+(time[1]&0x0f));        
        writedate('-');
        writedate('0'+time[0]/16);                        
        writedate('0'+(time[0]&0x0f));

        writeorder(0x80);
        writedate('2');
        writedate('0');
        writedate('0'+time[6]/16);                        
        writedate('0'+(time[6]&0x0f));
        writedate('-');
        writedate('0'+time[4]/16);               
        writedate('0'+(time[4]&0x0f));
        writedate('-');
        writedate('0'+time[3]/16);                        
        writedate('0'+(time[3]&0x0f));
        writeorder(0x8c);
        for(n=0;n<3;n++)                                                   //星期顯示函數(shù)
        {
        writedate(week[(3*(time[5]&0x07)-3)+n]);
        }                        
}

void main()
{
        lcdinit();
         init_1302();
        while(1)
        {
                //readtime();
                get_1302();
                display();        
        }
}