/*Main.c*/ 
/*AD采樣基本程序,并帶有排隊濾波函數
  采樣結果的精度與穩定性與基準源和信號源有關
  請在項目開發的時候選擇穩定的電壓基準源*/
#include "global.c" 
void SystemInit();
void Timer1Init(); 
void KickDog();  
void SPI_Init(); 
void DA_OUT(unsigned CHANNEL,unsigned int RNG,unsigned int SPI_DATA);
void AD_Sample(); 
void Que();
int numled0=200;   
unsigned int t0=0,i=0,j=0;   
unsigned int RESULT_0=0,RESULT_8=0;  
unsigned int AD0[18],AD8[18],AD_0,AD_8,AD_FLAG=0;
float AD_SIG0=0.0,AD_SIG8=0.0;   

main()
{  

   SystemInit();         		//系統初始化
   MCRC=MCRC & 0xFF00; 	    //IOPE0-7設為IO口模式
   PEDATDIR=0xFF00;   	    //所有LED=0, 
   
   SPI_Init(); 
   
   DA_OUT(0,0,192);            	//1.242V,Voltage范圍0-255對應0-1.65V
   DA_OUT(1,0,128);           	//0.828V,Voltage范圍0-255對應0-1.65V
   DA_OUT(2,0,192);            	//1.242V,Voltage范圍0-255對應0-1.65V
   DA_OUT(3,0,128);           	//0.828V,Voltage范圍0-255對應0-1.65V
   
   Timer1Init();          		//定時器初始化
   asm(" CLRC INTM ");
   while(1)
   {
      if(AD_FLAG==1)                
      	{ 
      		AD_FLAG=0;
      	 	for(i=0;i<18;i++) 
      	 	{ 
      	 		AD_Sample();   
      	 		AD0[i]=RESULT_0;
      	 		AD8[i]=RESULT_8;
      	 	}
      	 	Que();			//排隊濾波
      	}
   }
   
}

void SystemInit() 
{  
 
	asm(" SETC	INTM ");	/* 關閉總中斷 */
	asm(" CLRC  SXM  ");	/* 禁止符號位擴展 */ 
	asm(" CLRC  CNF  ");    /* B0塊映射為 on-chip DARAM*/
	asm(" CLRC  OVM  ");    /* 累加器結果正常溢出*/
	SCSR1=0x87FE;         	/* 系統時鐘CLKOUT=20*2=40M */
	   						/* 打開ADC,EVA,EVB,CAN和SCI的時鐘*/
	WDCR=0x006F;			/* 禁止看門狗,看門狗時鐘64分頻 */ 
	KickDog();    			/* 初始化看門狗 */  
    IFR=0xFFFF;				/* 清除中斷標志 */
    IMR=0x0002;				/* 打開中斷2*/      
    
}  

void Timer1Init()           
{ 

    EVAIMRA=0x0080;			//  定時器1周期中斷使能 
    EVAIFRA=0xFFFF;			//  清除中斷標志 
    GPTCONA=0x0000;
	T1PR=2500;				//  定時器1初值,定時0.4us*2500=1ms 			
	T1CNT=0;
	T1CON=0x144E;           //增模式, TPS系數40M/16=2.5M,T1使能
				
}  
void SPI_Init()             //SPI-DA初始化
{
    MCRB=MCRB | 0x0014;     //SPISIMO,SPICLK特殊功能方式 
    MCRC=MCRC & 0xDFFF;
    PFDATDIR=PFDATDIR | 0x2020;    	//LOAD=1
    SPICCR=0x004a;          //11bit數據
    SPICTL=0x0006;          //禁止中斷
    SPIBRR=0x0027;          	//1M波特率,40M/40=1M
    SPICCR=SPICCR | 0x80;   

}

void DA_OUT(unsigned CHANNEL,unsigned int RNG,unsigned int SPI_DATA)
{  
    unsigned char flag=0;
    SPITXBUF=(CHANNEL<<14)|(RNG<<13)|(SPI_DATA<<5) ;     	//bit10,9~CHANNEL;bit8~RNG倍數
    while(1)
    {
    flag=SPISTS&0x40;
    if(flag==0x40)     break;
    }
    SPIRXBUF=SPIRXBUF;/*虛讀寄存器以清除中斷標志*/      

   	PFDATDIR=PFDATDIR & 0xFFDF;		//LOAD=0,更新模擬信號輸出   
   	for(i=0;i<5;i++);              //延時
    PFDATDIR=PFDATDIR | 0x0020;    	//LOAD=1,鎖存數據   
    
}

void AD_Sample()
{   

    ADCTRL1=0x4000;			/* ADC模塊復位 */
    asm(" NOP	");
    ADCTRL1=0x0020;         /* 自由運行,啟動/停止模式,雙排序器工作模式 */
    
    MAXCONV=0x0000; 
    CHSELSEQ1=0x0000;       //第0通道
    ADCTRL2=0x4000;         //復位使排序器指針指向CONV00
    ADCTRL2=0x2000;			/* 啟動ADC轉換 */
    while( (ADCTRL2&0x1000)==0x1000);		/*等待轉換完成 */
    asm(" NOP ");
    asm(" NOP "); 
    RESULT_0=RESULT0>>6; 
            
    MAXCONV=0x0000;         //第8通道          
    CHSELSEQ3=0x0008;
    ADCTRL2=0x0040;
    ADCTRL2=0x0020;
    while( (ADCTRL2&0x0010)==0x0010);  
    asm(" NOP ");
    asm(" NOP ");
    RESULT_8=RESULT8>>6;           
    
 }
void Que()
{
   unsigned int MaxAD0=0;
   unsigned int MinAD0=AD0[0];
   unsigned int MaxAD8=0;
   unsigned int MinAD8=AD8[0];
   unsigned int tempAD0=0;
   unsigned int tempAD8=0;
   for(j=0;j<18;j++)
   {
      if(AD0[j]>MaxAD0)   MaxAD0=AD0[j];
      else if(AD0[j]<MinAD0)   MinAD0=AD0[j]; 

      if(AD8[j]>MaxAD8)   MaxAD8=AD8[j];
      else if(AD8[j]<MinAD8)   MinAD8=AD8[j];  
     
   }  
   for(j=0;j<18;j++)
   {
      tempAD0=tempAD0+AD0[j];
      tempAD8=tempAD8+AD8[j];
    } 
    AD_0=(tempAD0-MaxAD0-MinAD0)/16; 
    AD_8=(tempAD8-MaxAD8-MinAD8)/16; 
    AD_SIG0=AD_0*3.3/1023;    		//1023~3.3 對應滿量程
    AD_SIG8=AD_8*3.3/1023;            
    asm(" NOP ");          //請將光標移到此處設置斷點,并用debug->Animate監測數據
}     

void c_int2()               /*定時器1中斷服務程序*/
{

    if(PIVR!=0x27)
		{  	asm(" CLRC INTM ");
			return;
		}
	T1CNT=0; 
	t0++;
	numled0--;
	if(numled0==0)
	{
		numled0=200;
		if((PEDATDIR & 0x0002)==0x0002) 
			PEDATDIR=PEDATDIR & 0xFFFD;    	//IOPE1=0;LED滅  
		else
			PEDATDIR=PEDATDIR |0x0002;     	//IOPE1=1;LED亮 
	}
	if((AD_FLAG==0)&((t0%100)==0))     //定時AD采樣
	{  
	    AD_FLAG=1;
	}
	EVAIFRA=0x80; 
	asm(" CLRC	INTM ");   
	
}  

void KickDog()				/*踢除看門狗 */
{
	WDKEY=0x5555;
	WDKEY=0xAAAA;
}