#include <iom16v.h> 
#include <macros.h>
#define uchar unsigned char
#define uint unsigned int
char dis_buff[6]; // 顯示緩沖區，存放要顯示的8個字符的段碼值
char time_1ms_ok,display_ok=0;
unsigned  int freq_time,time0_old,time0_new,r;
unsigned long int freq,s;
///////////////////////////////////////////

void DelayMs(uint i )           //Ms級延時，參數i為延時時間
{uint j;
 for(;i!=0;i--)
  {for(j=1142;j!=0;j--) {;}}     //原來8000，改為1142//
}
/////////////////////////////////////////////////
#define LCD_EN_PORT    PORTA
#define LCD_RW_PORT    PORTA
#define LCD_RS_PORT    PORTA
#define LCD_DATA_PORT  PORTA
#define LCD_DATA_DDR   DDRA
#define LCD_DATA_PIN   PINA
#define LCD_EN         (1<<PA2)   //portc5         out
#define LCD_RW        (1<<PA1)    //portd3         out/in
#define LCD_RS         (1<<PA0)  //portc4         out
#define LCD_DATA        ((1<<PA4)|(1<<PA5)|(1<<PA6)|(1<<PA7))   //portd4/5/6/7   out

void delay_1us()
  {
   asm("nop");
  }
/////////////////////////
void delay_nus(unsigned int n)       //N us延時函數
  {
   unsigned int i=0;
   for (i=0;i<n;i++)
   delay_1us();
  }
 ////////////////////////// 
void delay_1ms(void)                 //1ms延時函數
  {
   unsigned int i;
   for (i=0;i<1140;i++);
  }
 ////////////////////////////////// 
void delay_nms(unsigned int n)       //N ms延時函數
  {
   unsigned int i=0;
   for (i=0;i<n;i++)
   delay_1ms();
  }
////////////////////////////////////////


void LCD_en_write(void)        //EN端產生一個高電平脈沖，寫LCD
  {
    LCD_EN_PORT |= LCD_EN;
    delay_nus(1);
    LCD_EN_PORT &= ~LCD_EN;
  }
/////////////////////////////////////
 void LCD_wait_Ready(void)                  //等待LCD空閑
   {
    LCD_DATA_DDR &= ~0x80;                 //PD7 I/O口方向設置為輸入   	
    LCD_RW_PORT|=LCD_RW;                 //RW=1    	
    LCD_RS_PORT&=~LCD_RS;                //RS=0    	
    LCD_EN_PORT |= LCD_EN;                 //EN=1    	
    while (!( LCD_DATA_PIN&0x80 ) == 0);   //RW=1,讀PD7，為0表示空閑? 	
    LCD_EN_PORT &= ~LCD_EN;                //EN=0    	
    LCD_DATA_DDR |= 0xf0;  	              //設置為輸出porta4/5/6/7	 
  }
////////////////////////////////////
void LCD_write_char(unsigned char command,unsigned char data)
  {    unsigned char command_temp,data_temp;        
       command_temp = command;
      data_temp = data;
       LCD_wait_Ready();
       LCD_RW_PORT &= ~LCD_RW; 	                   //RW=0	   
       if (command == 0)      
	   {LCD_RS_PORT |= LCD_RS;             //RS=1 	
   	 LCD_DATA_PORT &= 0X0F;	 
	 LCD_DATA_PORT |= data_temp&0xf0; 	   //send high 4bit	 
	
      }
  else 
     {
	 LCD_RS_PORT &= ~LCD_RS;            //RS=0
	LCD_DATA_PORT &= 0X0F;
     LCD_DATA_PORT |= command_temp&0xf0;//send high 4bit
     }
    LCD_en_write();
       command_temp=command_temp<< 4;         //send low 4bit
    data_temp=data_temp<<4;
       LCD_DATA_PORT&=0X0F;
    if (command==0)LCD_DATA_PORT|=data_temp&0xf0;
	   
    else
     LCD_DATA_PORT|=command_temp&0xf0;   		
    LCD_en_write();
       LCD_RW_PORT|=LCD_RW;	    
      LCD_RS_PORT^=LCD_RS;    
	  delay_nus(1);
  }
/////////////////////////////////////////////////////
void LCD_set_xy( unsigned char x, unsigned char y )
  {
    unsigned char address;
    if (y == 0) address = 0x80 + x;
    else 
       address = 0xc0 + x;
    LCD_write_char( address, 0 );
  }
//////////////////////////////////////
void LCD_write_string(unsigned char X,unsigned char Y,unsigned char *s)
  {
    LCD_set_xy( X, Y );    
    while (*s)      {
        LCD_write_char( 0, *s);
		//delay_nus(70);
	s ++;
     }
}
/////////////////////////////////
void LCD_write_string1(unsigned char X,unsigned char Y,unsigned char dat)
  {
     LCD_set_xy( X, Y );       
        LCD_write_char( 0, dat);	
		 
}
/////////////////////////////////////////
void freq_to_disbuff() // 頻率值轉化為BCD碼送顯示緩沖區
{
char i,j=5;
//freq=freq*10;
for (i=0;i<=5;i++)
{
dis_buff[j-i]=freq%10;
freq=freq/10;
}
dis_buff[0]=0x30+dis_buff[0];
dis_buff[1]=0x30+dis_buff[1];
dis_buff[2]=0x30+dis_buff[2];
dis_buff[3]=0x30+dis_buff[3];
dis_buff[4]=0x30+dis_buff[4];
dis_buff[5]=0x30+dis_buff[5];
}
///////////////////////////////////////////////////
void LCD_init(void)
  {  DDRA|=LCD_DATA|LCD_RW;
    DDRA|=LCD_RS|LCD_EN;  
    delay_nms(15);
    LCD_write_char(0x28,0);      //4bit test
    LCD_write_char(0x0c,0);      //顯示開
    LCD_write_char(0x01,0);      //顯示清屏
    LCD_write_char(0x06,0);      //顯示光標移動設置
  }

////////////////////////////////////
#pragma interrupt_handler Timer2:4
void Timer2(void)
{
time0_new=TCNT0;//
time_1ms_ok=1;
display_ok=~display_ok;
//if(display_ok)

}

void main(void)
{
char i;
DDRB=0x00;                   
PORTB=0x01;   
LCD_init(); 
LCD_write_char(0x01,0);      //顯示清屏
LCD_write_string(0,0,"Freq:      Hz");
LCD_write_string(0,1,"Speed:   .   ");
//for(i=0;i<=4;i++)dis_buff[i]=0;
// T/C2初始化
 LCD_write_string1(5,0,0x30);
asm("nop");
LCD_write_string1( 6,0,0x30);
asm("nop");
LCD_write_string1( 7,0,0x30);
asm("nop");
LCD_write_string1( 8,0,0x30);
LCD_write_string1( 9,0,0x30);
LCD_write_string1( 0x0A,0,0x30);
// T/C0初始化，外部計數方式
for ( i=0;i<=5;i++)dis_buff[i]= 0;
time0_old=0;
TCCR0=0x06; // 外部T0腳下降沿觸發計數，普通模式
TCNT0=0x00;
OCR0=0x00;
// T/C2初始化
TCCR2=0x0C; // 內部時鐘，32分頻（8M/64=125KHz），CTC模式
TCNT2=0x00;
OCR2=0x7C; // OCR2 = 0x7C(124),(124+1)/125=1ms
TIMSK=0x80; // 允許T/C2比較匹配中斷
SEI(); // 開放全局中斷
while (1)
{
if (time_1ms_ok)
{ // 累計T/C0的計數值

if (time0_new>=time0_old)freq=freq+(time0_new-time0_old);
else freq=freq+(256-time0_old+time0_new);
time0_old=time0_new;
if(++freq_time>=1000)
{
freq_time=0; // 100ms到，
freq_to_disbuff(); // 將100ms內的脈沖計數值送顯示
freq=0;
LCD_write_string1(5,0,dis_buff[0]);
LCD_write_string1( 6,0,dis_buff[1]);
LCD_write_string1( 7,0,dis_buff[2]);
LCD_write_string1( 8,0,dis_buff[3]);
LCD_write_string1(0x9,0,dis_buff[4]);
LCD_write_string1( 0x0A,0,dis_buff[5]);
}
time_1ms_ok=0;
};
}
}