//#include "msp430x41x.h"//"msp430xE42x.h"
#define uchar  unsigned char
#define uint   unsigned int

#include "LCD.h"
#include "msp430xE42x.h"

#define SCL   BIT0 
#define SDA   BIT1 

#define SCL_IN P2DIR &= ~SCL
#define SCL_OUT P2DIR |= SCL

#define SCL_L P2OUT &= ~SCL
#define SCL_H P2OUT |= SCL

#define SDA_IN P2DIR &= ~SDA
#define SDA_OUT P2DIR |= SDA

#define SDA_L P2OUT &= ~SDA
#define SDA_H P2OUT |= SDA

#define SDA_BIT P2IN & SDA

#define WR24C04 0xA0
#define RD24C04 0xA1

unsigned char ss[10]={char_0,char_1,char_2,char_3,char_4,char_5,char_6,char_7,char_8,char_9};

void delay(uint m)
{
  while(m-- > 0);
}

void start()//開始條件
{
  SCL_OUT;
  SDA_OUT;
  SCL_L;
  _NOP();
  SDA_H;
  _NOP();
  SCL_H;
  _NOP();
  SDA_L;
  _NOP();
  SCL_L;
  _NOP();
}

void stop()//停止條件
{
  SCL_OUT;
  SDA_OUT;
  SCL_L;
  _NOP();
  SDA_L;
  _NOP();
  SCL_H;
  _NOP();
  SDA_H;
  _NOP();
}


void write(uchar j)  //寫字節
{
   uchar i,temp;
   temp=j;
   SCL_OUT;
   SDA_OUT;
   for(i=0; i<8; i++)
   {
     SCL_L;
     _NOP();
     if(temp & 0x80)
       SDA_H;
     else
        SDA_L;
     SCL_H;
     _NOP();
     temp <<=1;   
   }
   SCL_L;
   _NOP();
   SDA_H;
   _NOP();
}

uchar read()   //讀字節
{
   uchar i,j,byte=0;
   SCL_OUT;
   SDA_OUT;
   SCL_L;
   _NOP();
   SDA_H;
   SDA_IN;
   for(i=0;i<8;i++)
   {
     _NOP();
     SCL_H;
     _NOP();
     if(SDA_BIT)
       j = 1;
     else 
       j = 0;
     byte =(byte<<1)|j;
     SCL_L;
   }
   _NOP();
   return(byte);
}
uchar testack()   //測試應答
{
   uchar i=0,ack;
   SDA_H;
   SCL_OUT;
   SDA_IN;
   SCL_H;
   _NOP();
   while((SDA_BIT ==1)&&(i<100))
     i++;
   if(SDA_BIT ==1)
   {
     _NOP();
     ack = 1;
   }
   else ack =0;
   SCL_L;
   _NOP();
   SDA_OUT;
   return(ack);
}

void Write_Data(uchar *wdata,uint waddr,uchar len) //寫數據
{
  SCL_OUT;
  SDA_OUT;
  uchar i;
  while (len--)
  { 
     start();
     i = (uchar)(waddr>>8);
     i = i << 1;
     i = i | WR24C04;
     write(i);
     testack();
     write((uchar) waddr);
     testack();   
     write(*wdata); 
     testack();
     
     stop();
     wdata++;
     waddr++;
     _NOP();
     delay(200);
  }
 delay(200);
}

void Read_Data(uchar *rdata,uint raddr,uint len)//讀數據
{
  SCL_OUT;
  SDA_OUT;
  uchar i;
  while(len--)
  {
     start();
     i = (uchar)(raddr>>8);
     i = i << 1;
     i = i | WR24C04;
     write(i);   
     testack();   
     write((uchar)raddr);   
     testack();
  
     start();
     i = (uchar)(raddr>>8);
     i = i << 1;
     i = i | RD24C04;
     write(i);   
     testack();
     SCL_L;
     SDA_IN;
     *rdata=read(); 
     SCL_L;
     SDA_OUT;
     
     stop();
     rdata++;
     raddr++;
     _NOP();
     _NOP();   
     delay(200); 
  }
  delay(200);
}

uint StartAddress=0x00;
uchar writedata[10]={0x01,0xB2,0x63,0xC4,0x23,0x34,0x74,0x8D,0xA5,0xCB};
uchar readdata[10];

void main(void)//主函數
{
  uint i;
  WDTCTL = WDTPW + WDTHOLD;
  LCDCTL = LCDON + LCD4MUX + LCDSG0_3;
  BTCTL  = BTHOLD + BTFRFQ1;
  _DINT();
  for(i=0;i<20;i++)
  {
    LCDMEM[i] = 0x00;
  }
  while(1)
  { 
    _NOP();
    Write_Data(writedata,StartAddress,10);
    _NOP();
    _NOP();
    _NOP();
    Read_Data(readdata,StartAddress,10);
    LCDMEM[9] = ss[readdata[2] & 0x0F];
    LCDMEM[8] = ss[(readdata[2] >>4)&0xF];
  }
}