#include "I2C.h"

void I2C_Initial( void )
{
    P1DIR |= BIT2;		//將SCL管腳（P1.2)設置為輸出管腳
    I2C_Set_sck_low();
    I2C_STOP();
    Delay_ms(10);
    return;
}
void I2C_Set_sda_high( void )
{
    P1DIR |= SDA;		//將SDA設置為輸出模式
    P1OUT |= SDA;		//SDA管腳輸出為高電平
    
    _NOP();
    _NOP();
    return;
}
void I2C_Set_sda_low ( void )
{
    P1DIR |= SDA;		//將SDA設置為輸出模式
    P1OUT &= ~(SDA);		//SDA管腳輸出為低電平
    
    _NOP();
    _NOP();
    return;
}
void I2C_Set_sck_high( void )
{
    P1DIR |= SCL;		//將SCL設置為輸出模式
    P1OUT |= SCL;		//SCL管腳輸出為高電平
    
    _NOP();
    _NOP();
    return;
}
void I2C_Set_sck_low ( void )
{
    P1DIR |= SCL;		//將SCL設置為輸出模式
    P1OUT &= ~(SCL);		//SCL管腳輸出為低電平
    
    _NOP();
    _NOP();
    return;
}
int  I2C_GetACK(void)
{
    int nTemp = 0;
    int j;
    
    _NOP();
    _NOP();
    I2C_Set_sck_low();
    for(j = 30;j > 0;j--);
    P1DIR &= ~(SDA);		//將SDA設置為輸入方向
    //I2C_Set_sda_high();
    I2C_Set_sck_high();
    
    for(j = 30;j > 0;j--);
    nTemp = (int)(P1IN & SDA);	//獲得數據
    
    I2C_Set_sck_low();
    
    return (nTemp & SDA);
}
void I2C_SetACK(void)
{   
    I2C_Set_sck_low();
    I2C_Set_sda_low();
    I2C_Set_sck_high();
    I2C_Set_sck_low();
    return;
}
void I2C_SetNAk(void)
{
    I2C_Set_sck_low();
    I2C_Set_sda_high();
    I2C_Set_sck_high();
    I2C_Set_sck_low();
    return;
}
void I2C_START(void)
{
    int i;
    
    I2C_Set_sda_high();
    for(i = 5;i > 0;i--);
    I2C_Set_sck_high();
    for(i = 5;i > 0;i--);
    I2C_Set_sda_low();
    for(i = 5;i > 0;i--);
    I2C_Set_sck_low();
    return;
}
void I2C_STOP(void)
{
    int i;
    
    I2C_Set_sda_low();
    for(i = 5;i > 0;i--);
    I2C_Set_sck_low();
    for(i = 5;i > 0;i--);
    I2C_Set_sck_high();
    for(i = 5;i > 0;i--);
    I2C_Set_sda_high();
    for(i = 5;i > 0;i--);
    I2C_Set_sck_low();
    Delay_ms(10);		//延遲一點時間
    
    return;
}
void I2C_TxByte(int nValue)
{
    int i;
    int j;
    
    for(i = 0;i < 8;i++)
    {
    	if(nValue & 0x80)
    	    I2C_Set_sda_high();
    	else
    	    I2C_Set_sda_low();
    	for(j = 30;j > 0;j--);
    	I2C_Set_sck_high();
    	nValue <<= 1;
    	for(j = 30;j > 0;j--);
    	I2C_Set_sck_low();
    }
    
    return;
}
/////////////////////////////////////////////
// 接收是從 LSB 到 MSB 的順序
int  I2C_RxByte(void)
{
    int nTemp = 0;
    int i;
    int j;
    
    I2C_Set_sda_high();
    
    P1DIR &= ~(SDA);			//將SDA管腳設置為輸入方向
    _NOP();
    _NOP();
    _NOP();
    _NOP();
    for(i = 0;i < 8;i++)
    {
    	I2C_Set_sck_high();
    	
    	if(P1IN & SDA)
    	{
    	    nTemp |= (0x01 << i);
    	}
    	for(j = 30;j > 0;j--);
    	I2C_Set_sck_low();
    }
    
    return nTemp;
}
/////////////////////////////////////////////
// 接收是從 MSB 到 LSB 的順序
int  I2C_RxByteHiToLow(void)
{
    int nTemp = 0;
    int i;
    int j;
    
    I2C_Set_sda_high();
    
    P1DIR &= ~(SDA);			//將SDA管腳設置為輸入方向
    _NOP();
    _NOP();
    _NOP();
    _NOP();
    for(i = 0;i < 8;i++)
    {
    	I2C_Set_sck_high();
    	
    	if(P1IN & SDA)
    	{
    	    nTemp |= (0x01 << (8-i));
    	}
    	for(j = 30;j > 0;j--);
    	I2C_Set_sck_low();
    }
    
    return nTemp;
}
int WriteSingleByte(char nAddr,char nValue)
{
	int nTemp = 0xA0;//寫命令
	// 啟動數據總線
	I2C_START();
	// 發送控制字節
	I2C_TxByte(nTemp);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 發送地址字節
	I2C_TxByte(nAddr);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 發送數據字節
	I2C_TxByte(nValue);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 停止總線
	I2C_STOP();				
    return (nTemp & SDA);
}
int PageWrite(char nAddr,char pBuf[])
{
	int i;
	int nTemp = 0xA0;//寫命令
	// 啟動數據總線
	I2C_START();
	// 發送控制字節
	I2C_TxByte(nTemp);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 發送地址字節
	I2C_TxByte(nAddr);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 發送數據字節
	for(i = 0; i < 8;i++)
	{
		I2C_TxByte(pBuf[0]);
		// 等待 ACK
		nTemp = I2C_GetACK();
		if(nTemp & BIT3) return 0;
	}
	
	// 停止總線
	I2C_STOP();				
    return (nTemp & SDA);
}
int ReadRandom(char nAddr, char *nValue)
{
	//寫命令
	int nTemp = 0xA0;
	// 啟動數據總線
	I2C_START();
	// 發送控制字節
	I2C_TxByte(nTemp);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 發送地址字節
	I2C_TxByte(nAddr);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 啟動數據總線
	I2C_START();
	// 發送控制字節
	nTemp = 0xA1;
	I2C_TxByte(nTemp);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	//讀取數據
    *nValue = I2C_RxByte();

	// 停止總線
	I2C_STOP();
	//成功返回
	return 1;
}
int ReadSeq(char nAddr, char nValue[], int nLen)
{
	int i;
	//寫命令
	int nTemp = 0xA0;
	// 啟動數據總線
	I2C_START();
	// 發送控制字節
	I2C_TxByte(nTemp);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 發送地址字節
	I2C_TxByte(nAddr);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	// 啟動數據總線
	I2C_START();
	// 發送控制字節
	nTemp = 0xA1;
	I2C_TxByte(nTemp);
	// 等待 ACK
	nTemp = I2C_GetACK();
	if(nTemp & BIT3) return 0;

	//讀取數據
	for(i = 0; i < nLen; i++)
	{
		//讀一個字節數據
		nValue[i] = I2C_RxByte();
		//發送ACK
		I2C_SetACK();
	}    

	// 停止總線
	I2C_STOP();
	//成功返回
	return 1;
}
void Delay_ms(unsigned long nValue)//毫秒為單位，8MHz為主時鐘
{
    unsigned long nCount;
    int i;
    unsigned long j;
    nCount = 2667;
    for(i = nValue;i > 0;i--)
    {
    	for(j = nCount;j > 0;j--);
    }
    return;
}
void Delay_us(unsigned long nValue)//微秒為單位，8MHz為主時鐘
{
    int nCount;
    int i;
    int j;
    nCount = 3;
    for(i = nValue;i > 0;i--)
    {
    	for(j = nCount;j > 0;j--);
    }
    return;
}
void Init_CLK(void)
{
    unsigned int i;
    BCSCTL1 = 0X00;	//將寄存器的內容清零
					//XT2震蕩器開啟
					//LFTX1工作在低頻模式
					//ACLK的分頻因子為1
					
    do 
    {
		// 清除OSCFault標志
	    IFG1 &= ~OFIFG;    
	    for (i = 0x20; i > 0; i--);                
    }
    while ((IFG1 & OFIFG) == OFIFG);// 如果OSCFault =1   
					
	//將寄存器的內容清零
    BCSCTL2 = 0X00;		
	//MCLK的時鐘源為TX2CLK，分頻因子為1
    BCSCTL2 += SELM1;	
	//SMCLK的時鐘源為TX2CLK，分頻因子為1
    BCSCTL2 += SELS;	
}