#include <msp430x16x.h>
#include "i2c.h"

#define SLAVEADDR   0x50;

int tx_count;
int rx_count;
unsigned char I2CBuffer[3];

void InitI2C(void)
{
    //將P3.1和P3.3設置為I2C管腳
    P3SEL = 0x0A; 
    //設置P3.1和P3.3管腳的方向
    P3DIR &= ~0x0A;
      
    //選擇為I2C模式
    U0CTL |= I2C + SYNC; 
    //禁止I2C模塊
    U0CTL &= ~I2CEN;      

    //設置I2C為7位地址模式，不使用DMA，
    //字節模式，時鐘源為SMCLK，
    //設置成傳輸模式
    I2CTCTL = I2CTRX + I2CSSEL_2; 
    
    //定義從器件地址
    I2CSA = SLAVEADDR;  
    //設置本身的地址
    I2COA = 0x01A5;               
    
    //I2C時鐘為SMCLK / 160
    I2CPSC = 159;  
    //SCL 高電平為：5  *I2C 時鐘
    I2CSCLH = 0x03;   
    //SCL 低電平為：5  *I2C 時鐘
    I2CSCLL = 0x03; 
    
    //I2C 模塊有效
    U0CTL |= I2CEN;
    
    tx_count = 0;
    rx_count = 0;
}

void I2CWriteInit(void)
{
    //主(Master)模式
    U0CTL |= MST;   
    
    //傳輸模式，R/W 為：0
    I2CTCTL |= I2CTRX;     
    //清除中斷標志
    I2CIFG &= ~TXRDYIFG;
    //發送中斷使能
    I2CIE = TXRDYIE;
}


void I2CReadInit(void)
{
    //接收模式，R/W 為：1
    I2CTCTL &= ~I2CTRX;
    //接收中斷使能
    I2CIE = RXRDYIE;
}

void EEPROM_ByteWrite(unsigned char nAddr, unsigned char nVal)
{
    //等待I2C模塊完成所有操作
    while (I2CDCTL&I2CBUSY) ; 
  
    //設置地址數據
    I2CBuffer[1] = nAddr; 
    //設置數據
    I2CBuffer[0] = nVal;
    //設置緩沖區指針
    tx_count = 1; 
  
    //寫數據初始化
    I2CWriteInit();
    
    //發送數據的長度
    //1個控制字節，2個數據字節
    I2CNDAT = 2; 
    
    //開始和停止條件產生
    //開始I2C通信
    I2CTCTL |= I2CSTT+I2CSTP;  
    
    return;
}

unsigned char EEPROM_CurrentAddressRead(void)
{
    //等待I2C模塊完成所有操作
    while (I2CDCTL&I2CBUSY); 
    
    //讀操作的初始化
    I2CReadInit();
    
    //主(Master)模式
    U0CTL |= MST; 
    //接收1個字節的數據
    I2CNDAT = 1;   
    //清除中斷標志
    I2CIFG &= ~ARDYIFG;  
    
    //開始接收，產生重新起始和停止條件
    I2CTCTL |= I2CSTT + I2CSTP;  
    
    //等待傳輸完成
    while ((~I2CIFG)&ARDYIFG) ;  
    
    //返回數據
    return I2CBuffer[0];
}

unsigned char EEPROM_RandomRead(unsigned char nAddr)
{
    //等待I2C模塊完成所有操作
    while (I2CDCTL&I2CBUSY);  
  
    //設置地址
    I2CBuffer[0] = nAddr;
    
    //設置緩沖區指針
    tx_count = 0;  
    
    //寫操作初始化
    I2CWriteInit();
    
    //傳輸數據長度
    //1個控制字節和一個地址數據
    I2CNDAT = 1;
    
    //清除中斷標志
    I2CIFG &= ~ARDYIFG; 
    //起始條件產生
    I2CTCTL |= I2CSTT;
    //等待傳輸完成
    while ((~I2CIFG)&ARDYIFG);  
    
    //讀操作初始化
    I2CReadInit();
    
    //接收一個字節的數據
    I2CNDAT = 1;
  
    //清除中斷標志
    I2CIFG &= ~ARDYIFG;
    //開始接收，產生重新起始和停止條件
    I2CTCTL |= I2CSTT + I2CSTP;   
    
    //等待傳輸完成
    while ((~I2CIFG)&ARDYIFG);  
    
    //返回數據
    return I2CBuffer[0];
}

void EEPROM_AckPolling(void)
{ 
    unsigned int count;
    //等待I2C模塊完成所有操作
    while (I2CDCTL&I2CBUSY); 
   
    count=0;
    //清除I2CEN位
    U0CTL &= ~I2CEN; 
    I2CTCTL |= I2CRM;   
    //使能I2C模塊
    U0CTL |= I2CEN;  
    //設置NACKIFG標志
    I2CIFG = NACKIFG; 
    while (NACKIFG & I2CIFG)
    {
        //清除中斷標志
        I2CIFG=0x00; 
        //主(Master)模式
        U0CTL |= MST; 
        //設置傳輸模式
        I2CTCTL |= I2CTRX;  
        //產生起始條件
        I2CTCTL |= I2CSTT;
        
        //等待I2CSTT被清除
        while (I2CTCTL & I2CSTT) ; 
        
        //產生停止條件
        I2CTCTL |= I2CSTP; 
        //等待停止條件復位
        while (I2CDCTL & I2CBUSY) ; 
        count = count + 1;
    }
    
    //清除I2CEN位
    U0CTL &= ~I2CEN;
    I2CTCTL &= ~I2CRM; 
    //使能I2C
    U0CTL |= I2CEN;  
  
    return;
}

#if __VER__ < 200
    interrupt [USART0TX_VECTOR] void ISR_I2C(void)
#else
    #pragma vector=USART0TX_VECTOR
    __interrupt void ISR_I2C(void)
#endif
{
    switch (I2CIV)
    { 
        case I2CIV_AL:
        {
            //仲裁中斷
            break;
        }
        case I2CIV_NACK:   
        {
            //NACK中斷
            break;
        }
        case I2CIV_OA: 
        {
            //自己地址中斷
            break;
        }
        case I2CIV_ARDY: 
        {
            //訪問準備好中斷
            break;
        }
        case I2CIV_RXRDY: 
        {
            //接收準備好中斷
            I2CBuffer[0]=I2CDRB;   
            break;
        }
        case I2CIV_TXRDY:  
        {
            //發送準備好中斷
            I2CDRB = I2CBuffer[tx_count];
            tx_count = tx_count - 1;
            if (tx_count < 0)
            {
                //禁止發送中斷
                I2CIE &= ~TXRDYIE; 
            }
            break;
        }
                        
        case I2CIV_GC: 
        {
            //一般調用中斷
            break;
        }
        case I2CIV_STT:
        {
            //起始條件中斷
            break;
        }
    }
}
void Init_Port(void)
{
    //初始化端口寄存器
    P1DIR = 0xFF;
    P2DIR = 0xFF;
    P3DIR = 0xF5;
    P4DIR = 0xFF;
    P5DIR = 0xFF;
    P6DIR = 0xFF;
}
void Init_CLK(void)
{
    unsigned int i;
    //將寄存器的內容清零
    //XT2震蕩器開啟
    //LFTX1工作在低頻模式
    //ACLK的分頻因子為1
    BCSCTL1 = 0X00;			
					
					
    do 
    {
        // 清除OSCFault標志
	IFG1 &= ~OFIFG;                       
	for (i = 0x20; i > 0; i--);                
    }
    while ((IFG1 & OFIFG) == OFIFG);      // 如果OSCFault =1   
				
    //open XT2, LFTX2 選擇低頻率
    BCSCTL1 &= ~(XT2OFF + XTS);
    //DCO Rsel=7(Freq=3200k/25攝氏度）  
    BCSCTL1 |= RSEL0 + RSEL1 + RSEL2; 
    BCSCTL1 |= 0x07;
    //MCLK的時鐘源為TX2CLK，分頻因子為1
    BCSCTL2 += SELM1;		
    //SMCLK的時鐘源為TX2CLK，分頻因子為1
    BCSCTL2 += SELS;		    
}