/**********************************************************************************
*本程序是通過LM324運放進行采樣,并將其值放到液晶上顯示出來
**********************************************************************************/
#include "c8051F040.h"

#define uchar unsigned char
#define uint unsigned int
void os_init();
void adc_init();
uchar temp_l;
uchar temp_h;
uint temp;
uchar xdata virt_port;
bit SPI_BUSY;
unsigned char xdata tab1[12]={0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x2e,0x56};

sbit LcdCs=P2^5;
void os_init();
void port_init();
void spi_init();
void writecode(uchar ins);
void writedata(uchar d);
void lcdchar (void);
void lcdinit();
void writelcd(uchar spi_data);
/*********************************************************************
*
*主函數
**********************************************************************/
void main()
{  
    WDTCN = 0xDE;                                           // 關閉看門狗
	WDTCN = 0xAD;
	os_init();
    adc_init();
     port_init();
	spi_init();
	lcdinit();
	SFRPAGE   = CONFIG_PAGE;
 	EIE2      = 0x02;                              //允許ADC中斷
	//IE        = 0x80;							   //允許所有中斷
     
	 EIE1      = 0x01;
	 EA=1;
	 while(1)
	{
	 SFRPAGE   = ADC0_PAGE;
	 AD0INT=0;
	 AD0BUSY=1;	
	 while(AD0INT==0);
	 lcdinit();
	 lcdchar();
	}
	
}
/*********************************************************************
*
*晶振選擇及時鐘初始化函數
**********************************************************************/
void os_init()
{
    int i = 0;
    SFRPAGE   = CONFIG_PAGE;
    OSCXCN    = 0x67;
    for (i = 0; i < 3000; i++);                   // 等待外部晶振穩定
    while ((OSCXCN & 0x80) == 0);
    CLKSEL    = 0x01;							  //選擇系統時鐘頻率

}
/*********************************************************************
*
*12位ADC初始化
**********************************************************************/
void adc_init()
{
    SFRPAGE   = ADC0_PAGE;
    REF0CN    = 0x00;							 //0x03
	
	ADC0CN    = 0x80;				            //向AD0BUSY寫１啟動轉換

}
/*********************************************************************
*
*ADC中斷函數
*********************************************************************/
void adc_isr () interrupt 15
{
   if(AD0INT==1)
    {temp_l=ADC0L;
     temp_h=ADC0H;
 
	 }
	 SFRPAGE   = ADC0_PAGE;
	  AD0INT=0;
}

void port_init()
{
    SFRPAGE   = CONFIG_PAGE;
   	P0MDOUT=0xff;
    XBR0      = 0x06;
    XBR2      = 0x40;

}
void spi_init()
{
      SFRPAGE   = SPI0_PAGE;
      SPI0CFG   = 0x40;
      SPI0CN    = 0x01;
      SPI0CKR   = 0x6D;


}



 void delay1us(void)
	{
	uchar xdata i;
	for(i=10;i>0;i--);
	} 

void writelcd(uchar spi_data)	   //向LV595寫數據以SPI方式
{
  uint xdata i,j,k;
 	for(i=0;i<9;i++);
	LcdCs=0;
	delay1us();	
	SPI_BUSY=1;
	SFRPAGE   = SPI0_PAGE;
	SPI0DAT=spi_data;
	for(j=0;j<500;j++)
		{
	   if(!SPI_BUSY)break;
		} 
	delay1us();
	
	LcdCs=1;
	delay1us();
	delay1us();
	delay1us();
	delay1us();
	delay1us();
	delay1us();
	for(k=0;k<5000;k++);
	

}
void writecode(uchar ins)				    //向液晶控制模塊寫命令
     {
      uchar xdata t;
	  uint xdata j;
	
	  for(j=0;j<500;j++);	
	  virt_port|=ins&0xf0;					//取高字節向１６０２寫數據 
	  writelcd(virt_port);					//先寫高４位后再寫低４位　這是在選擇四個數據線的時候
     
	  virt_port|=0x08;						  
	  writelcd(virt_port);					//使能E腳為高電平
      virt_port&=~0x08;					
	  writelcd(virt_port);					//使能E腳為低電平

      t=ins<<4;             
      virt_port|=t&0xf0;          			//取低字節向1602寫數據
	  writelcd(virt_port);
      virt_port|=0x08;						//使能E腳為高電平
	  writelcd(virt_port);
      virt_port&=~0x08;					    //使能E腳為低電平
	  writelcd(virt_port);
      virt_port=0;
	  writelcd(virt_port);
     }

void writedata(uchar d)					   //寫數據到１６０２
     {
      uchar xdata i,t;
	  uint xdata j;
	  
      for(j=0;j<500;j++);		
      virt_port|=0x02;					   //光標返回指令
	  writelcd(virt_port);
      virt_port|=d&0xf0;				   //取高字節數據給數據寄存器
	  writelcd(virt_port);
      virt_port|=0x08;                     //使能E腳為高電平
	  writelcd(virt_port);
      virt_port&=0xf7;      			   //使能E腳為低電平
	  writelcd(virt_port);
      virt_port&=0x07;					   //設置光標右移，文字也右移
      writelcd(virt_port);
	       
      t=d&0x0f;
      virt_port|=t<<4;					   //取低字節數據給數據寄存器
	  writelcd(virt_port);

	  virt_port|=0x08;      			   //使能E腳為高電平
	  writelcd(virt_port);
      for(i=3;i>0;i--); 
      virt_port&=0xf7;                     //使能E腳為低電平
	  writelcd(virt_port);
      virt_port=0;						   //數據清零
	  writelcd(virt_port);
    }

 void lcdchar (void)
     {
     
	  uchar a,b,c,d;
     temp_h=temp_h<<8;
	 temp=temp_h+temp_l;
	  temp=temp*250;
    	temp=temp/4096;
  	 a=temp/1000;d=temp%1000;    
    if(a!=0)
	{
	 writedata(tab1[a]);		          //除100
	 }
	 b=d/100;d=d%100;
	 
	 writedata(tab1[b]);
	  writedata(tab1[10]);
	  c=d/10; d=d%10;
	
	 writedata(tab1[c]);
	
	 writedata(tab1[d]);
     writedata(tab1[11]);                                   
  
   
     }


void lcdinit()
{
     uint xdata i;
	
      virt_port=0x00;
	  writelcd(virt_port);	     //RS腳為零寫指令寄存器	 RW為低電平
      virt_port|=0x08;     	     //使能腳E=1
	  writelcd(virt_port);
 	  virt_port&=0xf7;    		 //使E＝０使能腳發生跳變高－－低
	  writelcd(virt_port);
	  for(i=1000;i>0;i--);	     //3次延時，重要！
	  for(i=8000;i>0;i--);		 //用延時代替查詢	  

    
      virt_port=0;				 //寫入20碼，設置為4位總線方式,非常重要?。。。。?	  writelcd(virt_port);
      virt_port|=0x20;			 //只寫高字節
	  writelcd(virt_port);
      virt_port|=0x08;           //E=1
	  writelcd(virt_port);
	  for(i=20;i>0;i--);		 //使命令執行
      virt_port&=0xf7;           //E=0
	  writelcd(virt_port);
	  for(i=10;i>0;i--);
      virt_port=0;
	  writelcd(virt_port);
	 
	 

      writecode(0x38);	    	//設兩行顯示，４線方式５＊１０字符顯示
      for(i=50;i>0;i--);
	    writecode(0x06);			//光標右移
      for(i=50;i>0;i--);
	 
	  
	  writecode(0x0c);		    //開顯示指令
      for(i=50;i>0;i--);
      
	 
      writecode(0x02);			//光標返回指令
      for(i=50;i>0;i--);
	   
    
	 
	  writecode(0x01);			//清屏指令
	  for(i=50;i>0;i--);
}

void spi_srs  () interrupt 6
{
	if(SPIF)		
		{
	  SFRPAGE   = SPI0_PAGE;
	  SPIF=0;

		SPI_BUSY=0;
		}
		

	if(WCOL)
		{
	   SFRPAGE   = SPI0_PAGE;
		WCOL=0;
		}

}