//內部溫度傳感器調試程序//
//利用過采樣實現16位精度//
//ADC0_TEMP_PRO.c
#include <C8051F040.h>
#include <absacc.h>
#define ADC0START temppage=SFRPAGE;SFRPAGE=0x00;AD0BUSY=1;SFRPAGE=temppage
#define STACK_LEN 128
//采樣128次，再將128個數據總和除以8
//處理后的數據相當于16個原始數據之和，在數值表現形式上為16bit
typedef unsigned int uint;
typedef unsigned char uchar;
typedef unsigned long ulong;
sfr16 RCAP2=0xca;
sfr16 RCAP3=0xca;
sfr16 RCAP4=0xca;
sfr16 TMR4=0xcc;
sfr16 TMR3=0xcc;
sfr16 TMR2=0xcc;
sfr16 PCA0CP0=0xfb;
sfr16 PCA0CP1=0xfd;
sfr16 PCA0CP2=0xe9;
sfr16 PCA0CP3=0xeb;
sfr16 PCA0CP4=0xed;
sfr16 PCA0CP5=0xe1;
sfr16 ADC0VAL=0xbe;
sfr16 ADC0GT=0xc4;
sfr16 ADC0LT=0xc6;
sfr16 DPTR=0x82;
uchar temppage;
bit isnewdata;
bit canread;
uint kk;

float temp;
xdata uchar stack_index;
xdata ulong total;
xdata int t[15000],t12[4000];//存放溫度檢測數據，為20個數據
xdata uint ad16[20],ad12[20];
xdata uint mystack[STACK_LEN];//過采樣數據數組
void adc0_mux(uchar type,uchar source);
void adc0_source(uchar source);
void p3anolog_ini(uchar port);
void HVDA_ini(uchar gaind);
void adc0_ini();
void delay1ms(uint time);
void config();
void adc0_mux(uchar type,uchar source){//type 配置測量方式為差動還是單端輸入
//source 為ADC0通道選擇(共有9個通道)
	SFRPAGE=0x00;
	AMX0CF=type;
	AMX0SL=source;
}
void adc0_source(uchar source){//ADC0通道選擇，為adc0_mux()的簡化函數
	SFRPAGE=0x00;
	AMX0SL=source;
}
void p3anolog_ini(uchar port){//配置p3口模擬輸入管腳
	SFRPAGE=0x00;
	AMX0PRT=port;
	SFRPAGE=0x0f;
	P3MDIN&=~port;//將相應管腳配置成模擬輸入口
}
void HVDA_ini(uchar gaind){//高壓差動放大器配置
	SFRPAGE=0x00;
	HVA0CN=gaind;
}
void adc0_ini(){
	SFRPAGE=0x00;
	ADC0CF=0x80;//ADC0時鐘為系統時鐘17分頻，PGA增益為1
	ADC0CN=0x80;
	/*AD0EN=1，ADC0模塊使能
	AD0TM=0,ADC0為連續跟蹤模式
	AD0CM1:AD0CM0=00b,為AD0BUSY啟動方式
	AD0LJST=0,數據存儲格式右對齊，即ADC0H存放12bit高四位*/
	REF0CN&=0x0f;//AD0VRS=0,ADC0參考電壓為VREFA
	REF0CN|=0x07;//TEMPE=1,內部溫度傳感器工作
	/*BIASE=1,偏移產生器工作
	REFBE=1,內部參考電平工作，電路部分須將VREF參考輸出(C8051F40的第12管腳)與VREF0(C8051F040的16管腳相連，并最好并聯一個4.7uF和0.1uF的旁路電容以電平濾波*/
	adc0_source(9);//選擇第9通道，即選擇溫度信號為AD轉換
//	EIE2 |= 0x02;        //開ADC0中斷
}
void delay1ms(uint time){//延遲1ms
	uint i;
	uint j;
	for (i=0;i<time;i++){
		for(j=0;j<300;j++);
	}
}	
void config(){
//看門狗禁止
	WDTCN = 0x07;	
    WDTCN = 0xDE;   
   	WDTCN = 0xAD;
	SFRPAGE = 0x0F;
//交叉開關使能，但沒有進行外圍設備配置
	XBR0 = 0x00;	
	XBR1 = 0x00;	
	XBR2 = 0x40;
 	XBR3 = 0x00;   
//管腳輸出配置，P0口為開漏輸出，其中P0.6接上拉電阻，P0為數字輸入口
 	SFRPAGE = 0x0F;
 	P0MDOUT = 0x00; 
 	P1MDIN = 0xFF;  
//晶振配置，采用內部晶振8分頻
	SFRPAGE = 0x0F;
 	CLKSEL = 0x00;  
	OSCXCN = 0x00;	
	OSCICN = 0x84;	
}
void main(){
	uchar i;
	uchar dataindex;
	config();
	adc0_ini();//ADC0初始化
	ADC0START;//ADC0啟動
	EA=0;
	i=0;
	stack_index=0;
	canread=0;
	dataindex=0;
	while(1){
		SFRPAGE=0x00;
		if(AD0INT){
		 XWORD(0x1020)=0X022;
				AD0INT=0;
				isnewdata=1;
				if(stack_index>=STACK_LEN){
				/*STACK_LEN需小于等于256，否則stack_index要定義成uint型數據*/
				stack_index=0;
				canread=1;
				}
				mystack[stack_index]=ADC0VAL;
		        
				stack_index++;
				ADC0START;
		}
		if(isnewdata&&canread){//由該位查詢ADC0轉化值是否更新
			for(i=0,total=0L;i<STACK_LEN;i++)/*注意若i定義為char型，則進入死循環，因為條件判斷恒真*/
					total+=mystack[i];
			total/=8L;//此時total的值即為16bit精度采樣值
			temp=(float)total/65536.0;
			temp*=2.43;
			temp-=0.776;
			temp/=0.00286;//將測量值轉化成真實溫度值
			isnewdata=0;
			t[dataindex]=temp;//將溫度檢測值存入長度為20的數組中
			ad16[dataindex]=(uint)total;
			ad12[dataindex]=mystack[stack_index];
			total=mystack[stack_index];/*12bit測量溫度,以便與16bit過采樣比較*/
			temp=(float)total/4096.0;
			temp*=2.43;
			temp-=0.776;
			temp/=0.00286;
			t12[dataindex]=temp;
			dataindex++;
			if(dataindex>19)
				dataindex=0;//在此設斷點，觀察程序運行結果
			
		}
	}
}
void ADC0_ISR() interrupt 15{//ADC0中斷,此程序中采用查詢法，暫不用中斷
	SFRPAGE=0x00;
	AD0INT=0;
	isnewdata=1;
	if(stack_index>=STACK_LEN){
	//STACK_LEN需小于等于256，否則stack_index要定義成uint型數據
		stack_index=0;
		canread=1;
	}
	mystack[stack_index]=ADC0VAL;
	stack_index++;
}