#include <reg51.h>
#include <intrins.h>

sbit SDA=P1^1;                   // 將p1.1口模擬數據口
sbit SCL=P1^0;                   // 將p1.0口模擬時鐘口

#define uchar unsigned char
#define uint  unsigned int
#define disdata  P0              //顯示數據碼輸出口
#define	PCF8591_WRITE	0x90
#define	PCF8591_READ 	0x91
#define  NUM  4 	            //接收和發送緩存區的深度
uchar idata receivebuf[NUM];    //數據接收緩沖區

#define delayNOP(); {_nop_();_nop_();_nop_();_nop_();};
bit   bdata SystemError;                //從機錯誤標志位


unsigned char key_s, key_v, tmp;

char code str[] = "welcome! www.willar.com \n\r";


void send_str();
bit	scan_key();
void proc_key();
void delayms(unsigned char ms);
void send_char(unsigned char txd);

sbit	K1 = P1^4;


//-------------------------------------------------------------------
// 函數名稱： iic_start()
// 函數功能： 啟動I2C總線子程序
//-------------------------------------------------------------------
void iic_start(void)
{ //時鐘保持高，數據線從高到低一次跳變，I2C通信開始
	SDA = 1;     
	SCL = 1;
	delayNOP();      // 延時5us 
   	SDA = 0;
	delayNOP();
    SCL = 0;
}
//-------------------------------------------------------------------
// 函數名稱： iic_stop()
// 函數功能： 停止I2C總線數據傳送子程序
//-------------------------------------------------------------------
void iic_stop(void)
{  	
	SDA = 0;   	   //時鐘保持高，數據線從低到高一次跳變，I2C通信停止
	SCL = 1;
	delayNOP();
	SDA = 1;
	delayNOP();
    SCL = 0;
}
//------------------------------------------------------------------
// 函數名稱： iicInit_()
// 函數功能： 初始化I2C總線子程序
//------------------------------------------------------------------
 void iicInit(void)
   {
   SCL = 0;
   iic_stop();	
   }  
//-------------------------------------------------------------------
// 函數名稱： slave_ACK
// 函數功能： 從機發送應答位子程序
//-------------------------------------------------------------------
void slave_ACK(void)
{
	SDA = 0;  
	SCL = 1;
	delayNOP();	
	SCL = 0;
}
//-------------------------------------------------------------------
// 函數名稱： slave_NOACK
// 函數功能： 從機發送非應答位子程序，迫使數據傳輸過程結束
//-------------------------------------------------------------------
void slave_NOACK(void)
{ 
	SDA = 1;
	SCL = 1;
	delayNOP();
	SDA = 0;
    SCL = 0;  
}
//-------------------------------------------------------------------
// 函數名稱： check_ACK
// 函數功能： 主機應答位檢查子程序，迫使數據傳輸過程結束
//-------------------------------------------------------------------
void check_ACK(void)
{ 	    
    SDA = 1;        // 將p1.1設置成輸入，必須先向端口寫1
	SCL = 1;
	F0 = 0;
	delayNOP();   
	if(SDA == 1)    // 若SDA=1表明非應答，置位非應答標志F0
    F0 = 1;
   	SCL = 0;
}
//-------------------------------------------------------------------
// 函數名稱： IICSendByte
// 入口參數： ch
// 函數功能： 發送一個字節
//-------------------------------------------------------------------
void IICSendByte(uchar ch)
 
{
  	unsigned char idata n=8;     // 向SDA上發送一位數據字節，共八位

	while(n--)
	{ 
	if((ch&0x80) == 0x80)    // 若要發送的數據最高位為1則發送位1
	   {
	 		SDA = 1;    // 傳送位1
			SCL = 1;
		    delayNOP();
		//	SDA = 0;	
			SCL = 0; 
	   }
		else
		{  
			SDA = 0;    // 否則傳送位0
			SCL = 1;
			delayNOP();
		  	SCL = 0;
		}
		ch = ch<<1;    // 數據左移一位
	}
}
//-------------------------------------------------------------------
// 函數名稱： IICreceiveByte
// 返回接收的數據
// 函數功能： 接收一字節子程序
//-------------------------------------------------------------------
uchar IICreceiveByte(void)
{
	uchar idata n=8;     // 從SDA線上讀取一上數據字節，共八位
	uchar tdata=0;
	while(n--)
	{
	   SDA = 1;
	   SCL = 1;
	   tdata =tdata<<1;		    //左移一位
	   	if(SDA == 1)
		  tdata = tdata|0x01;   // 若接收到的位為1，則數據的最后一位置1
		else 
		  tdata = tdata&0xfe;   // 否則數據的最后一位置0
	   SCL = 0;
	 }

	 return(tdata);
}

//-------------------------------------------------------------------
// 函數名稱： ADC_PCF8591
// 入口參數： controlbyte控制字
// 函數功能： 連續讀入4路通道的A/D轉換結果到receivebuf
//-------------------------------------------------------------------
void ADC_PCF8591(uchar controlbyte)
{ 
    uchar idata receive_da,i=0;

	iic_start();

	IICSendByte(PCF8591_WRITE);	//控制字
	check_ACK();
	if(F0 == 1)
	{
		SystemError = 1;
		return;
	}

	IICSendByte(controlbyte);	//控制字
	check_ACK();
	if(F0 == 1)
	{
		SystemError = 1;
		return;
	}

    iic_start();                //重新發送開始命令
   	IICSendByte(PCF8591_READ);	//控制字
	check_ACK();
	if(F0 == 1)
	{
		SystemError = 1;
		return;
	}
	 
    IICreceiveByte();   //空讀一次，調整讀順序
    slave_ACK();        //收到一個字節后發送一個應答位

	while(i<4)
	{  
	  receive_da=IICreceiveByte();
	  receivebuf[i++]=receive_da;
	  slave_ACK();       //收到一個字節后發送一個應答位
	}
	slave_NOACK();       //收到最后一個字節后發送一個非應答位
	iic_stop();
}


main()
{
	TMOD = 0x20;			// 定時器1工作于8位自動重載模式, 用于產生波特率
	TH1 = 0xFD;				// 波特率9600
	TL1 = 0xFD;
	
	SCON = 0x50;			// 設定串行口工作方式
	PCON &= 0xef;			// 波特率不倍增
		
	TR1 = 1;				// 啟動定時器1
	IE = 0x0;				// 禁止任何中斷
	
	while(1)
	{
		if(RI)						// 是否有數據到來
		{
			RI = 0;
			tmp = SBUF;				// 暫存接收到的數據
			P0 = tmp;				// 數據傳送到P0口
			//send_char(tmp);			// 回傳接收到的數據
		}
		if(P0==0x30)
		while(1)
		   { iicInit();	              //I2C總線初始化
             ADC_PCF8591(0x04);
	         send_char(receivebuf[1]);    
	             //delayms(5);
			 if(RI)						// 是否有數據到來
		         {
			      RI = 0;
			      tmp = SBUF;				// 暫存接收到的數據
			      P0 = tmp;				// 數據傳送到P0口
			      //send_char(tmp);			// 回傳接收到的數據
		         }
			 //if(P0==0)
			     
		     if(P0==0xff)
			     break;
		   }		
	}
}


void send_char(unsigned char txd)
// 傳送一個字符
{
	SBUF = txd;
	while(!TI);				// 等特數據傳送
	TI = 0;					// 清除數據傳送標志
} 

/*void send_str()
// 傳送字串
{
	unsigned char i = 0;
	while(str[i] != '\0')
	{
		SBUF = str[i];
		while(!TI);				// 等特數據傳送
		TI = 0;					// 清除數據傳送標志
		i++;					// 下一個字符
	}	
} 

void delayms(unsigned char ms)	
// 延時子程序
{						
	unsigned char i;
	while(ms--)
	{
		for(i = 0; i < 120; i++);
	}
}  */