#include "touch.h" 
#include "lcd.h"
#include "delay.h"
#include "stdlib.h"
#include "math.h"
#include "24cxx.h"	 
//////////////////////////////////////////////////////////////////////////////////	 
//本程序只供學習使用，未經作者許可，不得用于其它任何用途
//Mini STM32開發板
//ADS7843/7846/UH7843/7846/XPT2046/TSC2046 驅動函數	   
//正點原子@ALIENTEK
//技術論壇:www.openedv.com
//創建日期:2010/6/13 
//版本：V1.1
//版權所有，盜版必究。
//Copyright(C) 正點原子 2009-2019
//All rights reserved
//********************************************************************************
//升級說明
//V1.1 20110730
//1,對Pen_Holder增加touchtype類型,用于標記觸屏類型.使之能支持任何觸屏.
//2,簡化了Get_Adjdata和SAVE_Adjdata兩個函數.
//3,增加了觸屏校準參數輸出,用于判斷觸屏好壞.							    
////////////////////////////////////////////////////////////////////////////////// 	  
Pen_Holder Pen_Point;//定義筆實體
//默認為touchtype=0的數據.
u8 CMD_RDX=0XD0;
u8 CMD_RDY=0X90;

//SPI寫數據
//向7843寫入1byte數據   
void ADS_Write_Byte(u8 num)    
{  
	u8 count=0;   
	for(count=0;count<8;count++)  
	{ 	  
		if(num&0x80)TDIN=1;  
		else TDIN=0;   
		num<<=1;    
		TCLK=0;//上升沿有效	   	 
		TCLK=1;      
	} 			    
} 		 
//SPI讀數據 
//從7846/7843/XPT2046/UH7843/UH7846讀取adc值	   
u16 ADS_Read_AD(u8 CMD)	  
{ 	 
	u8 count=0; 	  
	u16 Num=0; 
	TCLK=0;//先拉低時鐘 	 
	TCS=0; //選中ADS7843	 
	ADS_Write_Byte(CMD);//發送命令字
	delay_us(6);//ADS7846的轉換時間最長為6us
	TCLK=1;//給1個時鐘，清除BUSY   	    
	TCLK=0; 	 
	for(count=0;count<16;count++)  
	{ 				  
		Num<<=1; 	 
		TCLK=0;//下降沿有效  	    	   
		TCLK=1;
		if(DOUT)Num++; 		 
	}  	
	Num>>=4;   //只有高12位有效.
	TCS=1;//釋放ADS7843	 
	return(Num);   
}
//讀取一個坐標值
//連續讀取READ_TIMES次數據,對這些數據升序排列,
//然后去掉最低和最高LOST_VAL個數,取平均值 
#define READ_TIMES 15 //讀取次數
#define LOST_VAL 5	  //丟棄值
u16 ADS_Read_XY(u8 xy)
{
	u16 i, j;
	u16 buf[READ_TIMES];
	u16 sum=0;
	u16 temp;
	for(i=0;i<READ_TIMES;i++)
	{				 
		buf[i]=ADS_Read_AD(xy);	    
	}				    
	for(i=0;i<READ_TIMES-1; i++)//排序
	{
		for(j=i+1;j<READ_TIMES;j++)
		{
			if(buf[i]>buf[j])//升序排列
			{
				temp=buf[i];
				buf[i]=buf[j];
				buf[j]=temp;
			}
		}
	}	  
	sum=0;
	for(i=LOST_VAL;i<READ_TIMES-LOST_VAL;i++)sum+=buf[i];
	temp=sum/(READ_TIMES-2*LOST_VAL);
	return temp;   
} 
//帶濾波的坐標讀取
//最小值不能少于100.
u8 Read_ADS(u16 *x,u16 *y)
{
	u16 xtemp,ytemp;			 	 		  
	xtemp=ADS_Read_XY(CMD_RDX);
	ytemp=ADS_Read_XY(CMD_RDY);	  												   
	if(xtemp<100||ytemp<100)return 0;//讀數失敗
	*x=xtemp;
	*y=ytemp;
	return 1;//讀數成功
}	
//2次讀取ADS7846,連續讀取2次有效的AD值,且這兩次的偏差不能超過
//50,滿足條件,則認為讀數正確,否則讀數錯誤.	   
//該函數能大大提高準確度
#define ERR_RANGE 50 //誤差范圍 
u8 Read_ADS2(u16 *x,u16 *y) 
{
	u16 x1,y1;
 	u16 x2,y2;
 	u8 flag;    
    flag=Read_ADS(&x1,&y1);   
    if(flag==0)return(0);
    flag=Read_ADS(&x2,&y2);	   
    if(flag==0)return(0);   
    if(((x2<=x1&&x1<x2+ERR_RANGE)||(x1<=x2&&x2<x1+ERR_RANGE))//前后兩次采樣在+-50內
    &&((y2<=y1&&y1<y2+ERR_RANGE)||(y1<=y2&&y2<y1+ERR_RANGE)))
    {
        *x=(x1+x2)/2;
        *y=(y1+y2)/2;
        return 1;
    }else return 0;	  
} 
//讀取一次坐標值	
//僅僅讀取一次,知道PEN松開才返回!					   
u8 Read_TP_Once(void)
{
	u8 t=0;	    
	Pen_Int_Set(0);//關閉中斷
	Pen_Point.Key_Sta=Key_Up;
	Read_ADS2(&Pen_Point.X,&Pen_Point.Y);
	while(PEN==0&&t<=250)
	{
		t++;
		delay_ms(10);
	};
	Pen_Int_Set(1);//開啟中斷		 
	if(t>=250)return 0;//按下2.5s 認為無效
	else return 1;	
}

//////////////////////////////////////////////////
//與LCD部分有關的函數  
//畫一個觸摸點
//用來校準用的
void Drow_Touch_Point(u8 x,u16 y)
{
	LCD_DrawLine(x-12,y,x+13,y);//橫線
	LCD_DrawLine(x,y-12,x,y+13);//豎線
	LCD_DrawPoint(x+1,y+1);
	LCD_DrawPoint(x-1,y+1);
	LCD_DrawPoint(x+1,y-1);
	LCD_DrawPoint(x-1,y-1);
	Draw_Circle(x,y,6);//畫中心圈
}	  
//畫一個大點
//2*2的點			   
void Draw_Big_Point(u8 x,u16 y)
{	    
	LCD_DrawPoint(x,y);//中心點 
	LCD_DrawPoint(x+1,y);
	LCD_DrawPoint(x,y+1);
	LCD_DrawPoint(x+1,y+1);	 	  	
}
//////////////////////////////////////////////////

//轉換結果
//根據觸摸屏的校準參數來決定轉換后的結果,保存在X0,Y0中
void Convert_Pos(void)
{		 	  
	if(Read_ADS2(&Pen_Point.X,&Pen_Point.Y))
	{
		Pen_Point.X0=Pen_Point.xfac*Pen_Point.X+Pen_Point.xoff;
		Pen_Point.Y0=Pen_Point.yfac*Pen_Point.Y+Pen_Point.yoff;  
	}
}	   
//中斷,檢測到PEN腳的一個下降沿.
//置位Pen_Point.Key_Sta為按下狀態
//中斷線0線上的中斷檢測
void EXTI1_IRQHandler(void)
{ 		   			 
	Pen_Point.Key_Sta=Key_Down;//按鍵按下  		  				 
	EXTI->PR=1<<1;  //清除LINE1上的中斷標志位 
} 
//PEN中斷設置	 
void Pen_Int_Set(u8 en)
{
	if(en)EXTI->IMR|=1<<1;   //開啟line1上的中斷	  	
	else EXTI->IMR&=~(1<<1); //關閉line1上的中斷	   
}	  
//////////////////////////////////////////////////////////////////////////
//此部分涉及到使用外部EEPROM,如果沒有外部EEPROM,屏蔽此部分即可
#ifdef ADJ_SAVE_ENABLE
//保存在EEPROM里面的地址區間基址,占用13個字節(RANGE:SAVE_ADDR_BASE~SAVE_ADDR_BASE+12)
#define SAVE_ADDR_BASE 40
//保存校準參數										    
void Save_Adjdata(void)
{
	s32 temp;			 
	//保存校正結果!		   							  
	temp=Pen_Point.xfac*100000000;//保存x校正因素      
    AT24CXX_WriteLenByte(SAVE_ADDR_BASE,temp,4);   
	temp=Pen_Point.yfac*100000000;//保存y校正因素    
    AT24CXX_WriteLenByte(SAVE_ADDR_BASE+4,temp,4);
	//保存x偏移量
    AT24CXX_WriteLenByte(SAVE_ADDR_BASE+8,Pen_Point.xoff,2);		    
	//保存y偏移量
	AT24CXX_WriteLenByte(SAVE_ADDR_BASE+10,Pen_Point.yoff,2);	
	//保存觸屏類型
	AT24CXX_WriteOneByte(SAVE_ADDR_BASE+12,Pen_Point.touchtype);	
	temp=0X0A;//標記校準過了
	AT24CXX_WriteOneByte(SAVE_ADDR_BASE+13,temp);			 
}
//得到保存在EEPROM里面的校準值
//返回值：1，成功獲取數據
//        0，獲取失敗，要重新校準
u8 Get_Adjdata(void)
{					  
	s32 tempfac;
	tempfac=AT24CXX_ReadOneByte(SAVE_ADDR_BASE+13);//讀取標記字,看是否校準過！ 		 
	if(tempfac==0X0A)//觸摸屏已經校準過了			   
	{    												 
		tempfac=AT24CXX_ReadLenByte(SAVE_ADDR_BASE,4);		   
		Pen_Point.xfac=(float)tempfac/100000000;//得到x校準參數
		tempfac=AT24CXX_ReadLenByte(SAVE_ADDR_BASE+4,4);			          
		Pen_Point.yfac=(float)tempfac/100000000;//得到y校準參數
	    //得到x偏移量
		Pen_Point.xoff=AT24CXX_ReadLenByte(SAVE_ADDR_BASE+8,2);			   	  
 	    //得到y偏移量
		Pen_Point.yoff=AT24CXX_ReadLenByte(SAVE_ADDR_BASE+10,2);