//***************FileName:Capature.C***************//
//***************ICCAVR V6.30編譯*****************//

#include <io8535v.h>       
#include <macros.h>          
#define uchar unsigned char
#define uint  unsigned int

#define CON 1000      //頻率常數定義
uchar Flag=0;         //捕獲次數定義

//數碼管字型表，對應0，1，2，3，4，5，6，7，8，9,A,b,C,d,E,F//
uchar Table[20]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
                 0x7f,0x6f,0x77,0x7c,0x39,0x5E,0x79,0x71};
uchar Data[4]={0,0,0,0};       //顯示初始值：0 0 0 0
uint  CNT1;                    //第一次捕獲值
uint  CNT2;                    //第二此捕獲值
uint  CNT=100;                 //捕獲差值 
      
void DelayMs(uint i)           //Ms級延時，參數i為延時時間
{uint j;
 for(;i!=0;i--)
  {for(j=2000;j!=0;j--) {;}}
}

void Pre_Display(void)         //預顯示函數，數碼管顯示檢測
{uchar i;
 for(i=0;i<16;i++)
  {PORTB=0x00;
   PORTA=Table[i];
  DelayMs(100);
  }
}

void Display(uchar *p)         //動態顯示函數，參數p為待顯示的數組名
{uchar i,sel=0x08;           
 for(i=0;i<4;i++)
  {PORTC=~sel;                  //選通最右邊的數碼管
   PORTA=Table[p[i]];          //送字型碼
   DelayMs(2);                 //顯示延時    
   sel=sel>>1;                 //移位以顯示前一位
  }
}

void HZ(uint i,uchar *p)
{uint TEM;
 p[0]=CON/i;
 TEM=CON%i;
 TEM=TEM*10;
 p[1]=TEM/i;
 TEM=TEM%i;
 TEM=TEM*10;
 p[2]=TEM/i;
 TEM=TEM%i;
 TEM=TEM*10;
 p[3]=TEM/i;
}

void Init_IO(void)             //初始化I/O口
{DDRA=0xff;                    //設置A口為推挽1輸出
 PORTA=0xff;
 DDRC=0xff;                    //設置C口為推挽1輸出             
 PORTC=0xff;
 DDRD=0x00;                    //設置D口為帶上拉電阻輸入
 PORTD=0x00;    
}

void Init_Timer1(void)         //初始化T/C1的輸入捕獲中斷
{TIMSK=TIMSK|0x20;             //輸入捕獲使能
 TCCR1B=0xC2;                  //輸入捕獲噪音使能，下降沿捕獲，時鐘8分頻1uS計數一次。
 TIFR=0x20;                    //清中斷標志
 SREG=SREG&0x7f;               //全局中斷關
} 

void main(void)
{uchar i;
 Init_IO();                    //初始化I/O口
 PORTA=0xff;                   //點亮以測試所有的數碼管
 PORTC=0xf0;   
 DelayMs(300);
 PORTC=0xff;                   //熄滅所有的數碼管
 Pre_Display();                //預顯示，數碼管顯示測試
 PORTC=0xff;
 Init_Timer1();                //T/C1初試化 
 while(1)
  {
  while(TIFR&0x20)             //捕獲檢測
      {TIFR|=0x20;             //清除捕獲標志
	   CNT=ICR1L;              //CNT暫存
       CNT2=(ICR1H<<8)+ICR1L;  //CNT2存放當前捕獲值
       CNT=CNT2-CNT1;          //CNT存放兩次時間差
       CNT1=CNT2;              //CNT1存放上次捕獲值
       Flag++;}                //檢測到第一次捕獲
   if(Flag==2)                 //檢測到第二此捕獲
      {Flag=0;                 //清除捕獲檢測標志
	   HZ(CNT,Data);           //數據處理
	   for(i=0;i<100;i++)      //頻率顯示
	       Display(Data);
	   CNT=0;CNT1=0;CNT2=0;}}  //清除捕獲值及捕獲差值
}