#include <reg52.H>
#include <absacc.h>
#include <string.h>
#include <intrins.h>
#include <math.h>
#define uint  		unsigned int
#define uchar 		unsigned char
#define ulong		unsigned long
sbit BUSY = P3^0;
// LCD192*64 數據線
#define uint unsigned int
#define uchar unsigned char
#define ulong unsigned long


//打印位定義區
sbit TX = P3^0;
sbit CS = P3^1;
bit bfdayin=0;  //設置位 置0  設置電流 ，置1  設置打印

//AD位定義區
sbit adclk = P3^2; //ad0832時鐘信號源
sbit ado  = P3^3; //ad0832輸出值
sbit adi  = P3^3; //ad0832輸出值

sbit adcs  = P1^0; //adc0832片選

// LCD192*64 I/O 信號管腳 定義區
sbit di = P1^6; // 數據\指令 選擇
sbit rw = P1^7; // 讀\寫 選擇
sbit en = P1^3; // 讀\寫使能
sbit cs1 = P1^5; // 片選1,低有效(前64列)
sbit cs2 = P1^4; // 片選2,低有效(中64列)
sbit cs3 = P2^2; // 片選3,低有效(后64列)


//I2C定義位

sbit SDA=P2^1;            //模擬I2C數據傳送位
sbit SCL=P2^0;            //模擬I2C時鐘控制位

bit ack;	              //應答標志位

//電池管理定義位
sbit batt1=P3^7;         //半格電判定，batt1=0
sbit batt2=P3^6;         //1/3格電判定，batt2=0

//變量定義區
uchar KeyCount = 0;   //主菜單光標停留位置標志

//時鐘設置界面定義
  uchar year10=0;       //年_十位
  uchar year1=8;        //年_個位
  uchar month10=1;      //月_十位
  uchar month1=1;       //月_個位
  uchar day10=2;        //日_十位
  uchar day1=1;         //日_個位
  uchar hour10=1;       //時_十位
  uchar hour1=5;        //時_個位
  uchar minute10=2;     //分_十位
  uchar minute1=9;      //分_個位it

//顯示緩沖區
uchar  TmpBuf[7] = {2,6,8,1,9,8,9};
bit daFlag = 0;
uint daCount = 0;  // D/A計數 最大值為1024
//函數聲明區
void tlc5615(uint daTmp);
void Shipin_UI_dispose();
void dierping()
// iic begin
//uchar P8563_Store[5]; /*時間交換區,全局變量聲明*/
//uchar code CP8563_Store[5]={0x00,0x00,0x20,0x11,0x08}; /*寫入時間初值：08-11-20 00:00*/


/********************************************
內部函數，I2C開始
********************************************/
void Start()
{
	EA=0;
    SDA=1;
    SCL=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SDA=0;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=0;
}
/********************************************
內部函數，I2C結束
********************************************/
void Stop()
{
    SDA=0;
    SCL=0;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SDA=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    EA=1;
}
/********************************************
內部函數，輸出ACK ,每個字節傳輸完成，輸出ack=0,結束讀書據，ack=1;
********************************************/
void WriteACK(uchar ack)
{
    SDA=ack;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    SCL=0;
}
/********************************************
內部函數，等待ACK
********************************************/
void WaitACK()
{
    uchar errtime=20;
    SDA=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();; /*讀ACK*/
    SCL=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    while(SDA)
    {
        errtime--;
       if(!errtime) Stop();
    }
    SCL=0;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
}
/********************************************
內部函數.輸出數據字節
入口:B=數據
********************************************/
void writebyte(uchar wdata)
{
    uchar i;
    for(i=0;i<8;i++)
    {
        if(wdata&0x80) SDA=1;
        else SDA=0;
        wdata<<=1;
        SCL=1;
        _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
        SCL=0;
    }
    WaitACK();      //I2C器件或通訊出錯，將會退出I2C通訊
}
/********************************************
內部函數.輸入數據
出口:B
********************************************/
uchar Readbyte()
{
    uchar i,bytedata;
    SDA=1;
    for(i=0;i<8;i++)
    {
       SCL=1;
       bytedata<<=1;
       bytedata|=SDA;
       SCL=0;
       _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
    }
    return(bytedata);
}
/********************************************
輸出數據->pcf8563
********************************************/
void writeData(uchar address,uchar mdata)
{
    Start();
    writebyte(0xa2); /*寫命令*/
    writebyte(address); /*寫地址*/
    writebyte(mdata); /*寫數據*/
    Stop();
}
/********************************************
輸入數據<-pcf8563
********************************************/
uchar ReadData(uchar address) /*單字節*/
{   uchar rdata;
    Start();
    writebyte(0xa2); /*寫命令*/
    writebyte(address); /*寫地址*/
    Start();
    writebyte(0xa3); /*讀命令*/
    rdata=Readbyte();
    WriteACK(1);
    Stop();
    return(rdata);
}
void ReadData1(uchar address,uchar count,uchar * buff) /*多字節*/
{   uchar i;
    Start();
    writebyte(0xa2); /*寫命令*/
    writebyte(address); /*寫地址*/
    Start();
    writebyte(0xa3); /*讀命令*/
    for(i=0;i<count;i++)
    {
         buff[i]=Readbyte();
         if(i<count-1) WriteACK(0);
    }
   WriteACK(1);
    Stop();
}
/********************************************
內部函數,讀入時間到內部緩沖區
********************************************/
void P8563_Read()
{    uchar time[7];
     ReadData1(0x02,0x07,time);
     P8563_Store[0]=time[1]&0x7f;  /*分*/
     P8563_Store[1]=time[2]&0x3f;  /*時*/
     P8563_Store[2]=time[3]&0x3f;  /*日*/
     P8563_Store[3]=time[5]&0x1F;  /*月*/
	 P8563_Store[4]=time[6]&0x0FF; /*年*/
}
/********************************************
讀入時間到內部緩沖區----外部調用
********************************************/
void P8563_gettime()
{
     P8563_Read();
     if(P8563_Store[0]==0)
       P8563_Read(); /*如果為分=0，為防止時間變化，再讀一次*/
}
/********************************************
寫時間修改值
********************************************/
void P8563_settime()
{
      uchar i;
      for(i=3;i<=5;i++) { writeData(i,P8563_Store[i-3]); }
      writeData(7,P8563_Store[3]);
	  writeData(8,P8563_Store[4]);
}

 //iic-end


/*******************************************************************
                    （1） 起動總線函數
函數原型: void  Start_I2c();
功能:       啟動I2C總線,即發送I2C起始條件.

********************************************************************/
void Start_I2c()
{
  SDA=1;             //發送起始條件的數據信號
  _nop_();
  SCL=1;
  _nop_();         //起始條件建立時間大于4.7us,延時
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  SDA=0;           //發送起始信號
  _nop_();        // 起始條件鎖定時間大于4μs
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  SCL=0;             //鉗住I2C總線，準備發送或接收數據
  _nop_();
  _nop_();
}
/*******************************************************************
                     （2）結束總線函數
函數原型: void  Stop_I2c();
功能:       結束I2C總線,即發送I2C結束條件.
 ********************************************************************/
void Stop_I2c()
{
  SDA=0;              //發送結束條件的數據信號
  _nop_();           //發送結束條件的時鐘信號
  SCL=1;             //結束條件建立時間大于4μs
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  _nop_();
  SDA=1;            //發送I2C總線結束信號
  _nop_();
  _nop_();
  _nop_();
  _nop_();
}
/*******************************************************************
                （3）字節數據發送函數
函數原型: void  SendByte(uchar c);
功能:  將數據c發送出去,可以是地址,也可以是數據,發完后等待應答,并對
     此狀態位進行操作.(不應答或非應答都使ack=0 假)
     發送數據正常，ack=1; ack=0表示被控器無應答或損壞。
********************************************************************/
void  SendByte(uchar c)
{
 uchar BitCnt;
  for(BitCnt=0;BitCnt<8;BitCnt++)  //要傳送的數據長度為8位
    {
     if((c<<BitCnt)&0x80)SDA=1;   //判斷發送位
       else  SDA=0;
     _nop_();
     SCL=1;               //置時鐘線為高，通知被控器開始接收數據位
      _nop_();
      _nop_();               //保證時鐘高電平周期大于4μs
      _nop_();
      _nop_();
      _nop_();
     SCL=0;
    }
    _nop_();
    _nop_();
    SDA=1;               //8位發送完后釋放數據線，準備接收應答位
    _nop_();
    _nop_();
    SCL=1;
    _nop_();
    _nop_();
    _nop_();
    if(SDA==1)ack=0;
       else ack=1;        //判斷是否接收到應答信號
    SCL=0;
    _nop_();
    _nop_();
}
/*******************************************************************
                 （4）字節數據接收函數
函數原型: uchar  RcvByte();
功能:  用來接收從器件傳來的數據,并判斷總線錯誤(不發應答信號)，
     發完后請用應答函數。
********************************************************************/
uchar  RcvByte()
{
  uchar retc;
  uchar BitCnt;

  retc=0;
  SDA=1;             //置數據線為輸入方式
  for(BitCnt=0;BitCnt<8;BitCnt++)
      {
        _nop_();
        SCL=0;          //置時鐘線為低，準備接收數據位
        _nop_();
        _nop_();         //時鐘低電平周期大于4.7μs
        _nop_();
        _nop_();
        _nop_();
        SCL=1;       //置時鐘線為高使數據線上數據有效
        _nop_();
        _nop_();
        retc=retc<<1;
        if(SDA==1)retc=retc+1; //讀數據位,接收的數據位放入retc中
        _nop_();
        _nop_();
      }
  SCL=0;
  _nop_();
  _nop_();
  return(retc);
}
/********************************************************************
                     （5）應答子函數
原型:  void Ack_I2c(bit a);

功能:主控器進行應答信號,(可以是應答或非應答信號)
********************************************************************/
void Ack_I2c(bit a)
{

  if(a==0)SDA=0;     //在此發出應答或非應答信號
        else SDA=1;
  _nop_();
  _nop_();
  _nop_();
  SCL=1;
    _nop_();
    _nop_();             //時鐘低電平周期大于4μs
    _nop_();
    _nop_();
    _nop_();
 SCL=0;                //清時鐘線，鉗住I2C總線以便繼續接收
    _nop_();
    _nop_();
}
/*******************************************************************
                    （6）向無子地址器件發送字節數據函數
函數原型: bit  ISendByte(uchar sla,ucahr c);
功能:     從啟動總線到發送地址，數據，結束總線的全過程,從器件地址sla.
           如果返回1表示操作成功，否則操作有誤。
注意：    使用前必須已結束總線。
********************************************************************/
bit ISendByte(uchar sla,uchar c)
{
   Start_I2c();               //啟動總線
   SendByte(sla);            //發送器件地址
     if(ack==0)return(0);
   SendByte(c);               //發送數據
     if(ack==0)return(0);
  Stop_I2c();                 //結束總線
  return(1);
}
/*******************************************************************
                    （7）向有子地址器件發送多字節數據函數
函數原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);
功能:     從啟動總線到發送地址，子地址,數據，結束總線的全過程,從器件
          地址sla，子地址suba，發送內容是s指向的內容，發送no個字節。
           如果返回1表示操作成功，否則操作有誤。
注意：    使用前必須已結束總線。
********************************************************************/
bit ISendStr(uchar sla,uchar suba,uchar *s,uchar no)
{
   uchar i;

   Start_I2c();               //啟動總線
   SendByte(sla);            //發送器件地址
     if(ack==0)return(0);
   SendByte(suba);            //發送器件子地址
     if(ack==0)return(0);

   for(i=0;i<no;i++)
    {
     SendByte(*s);               //發送數據
       if(ack==0)return(0);
     s++;
    }
 Stop_I2c();                 //結束總線
  return(1);
}
/*******************************************************************
                    （8）向無子地址器件讀字節數據函數
函數原型: bit  IRcvByte(uchar sla,ucahr *c);
功能:     從啟動總線到發送地址，讀數據，結束總線的全過程,從器件地
          址sla，返回值在c.
           如果返回1表示操作成功，否則操作有誤。
注意：    使用前必須已結束總線。
********************************************************************/
bit IRcvByte(uchar sla,uchar *c)
{
   Start_I2c();                //啟動總線
   SendByte(sla+1);           //發送器件地址
     if(ack==0)return(0);
   *c=RcvByte();               //讀取數據
     Ack_I2c(1);               //發送非就答位
  Stop_I2c();                  //結束總線
  return(1);
}
/*******************************************************************
                    （9）向有子地址器件讀取多字節數據函數
函數原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);
功能:     從啟動總線到發送地址，子地址,讀數據，結束總線的全過程,從器件
          地址sla，子地址suba，讀出的內容放入s指向的存儲區，讀no個字節。
           如果返回1表示操作成功，否則操作有誤。
注意：    使用前必須已結束總線。
********************************************************************/
bit IRcvStr(uchar sla,uchar suba,uchar *s,uchar no)
{
   uchar i;

   Start_I2c();               //啟動總線
   SendByte(sla);            //發送器件地址
     if(ack==0)return(0);
   SendByte(suba);            //發送器件子地址
     if(ack==0)return(0);
   Start_I2c();
   SendByte(sla+1);
      if(ack==0)return(0);
   for(i=0;i<no-1;i++)
    {
     *s=RcvByte();               //發送數據
      Ack_I2c(0);                //發送就答位
     s++;
    }
   *s=RcvByte();
    Ack_I2c(1);                 //發送非應位
 Stop_I2c();                    //結束總線
  return(1);
}