#define LED_PIN (1<<PA0)
#define LED_TOG PORTA ^= LED_PIN

#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>
#include "ir.h"
#include "lcd.h"

 volatile uint8_t toggle_bit;
 volatile uint8_t address;
 volatile uint8_t command;
 volatile uint8_t Ir_key_press_flag;
 volatile uint8_t rc5cnt;

 void ir_init() {
    DDR(IR_PORT) &=~ IR_IN;
    PORT(IR_PORT) |= IR_IN;




#if TIMER1_PRESCALER==1
    TCCR1B |= (1<<CS10);
#endif

#if TIMER1_PRESCALER==8
    TCCR1B |= (1<<CS11);
#endif

#if TIMER1_PRESCALER==64
    TCCR1B |= (1<<CS11) | (1<<CS10);
#endif

#if TIMER1_PRESCALER==256
    TCCR1B |= (1<<CS12);
#endif

    TCCR1B &=~ (1<<ICES1);
   rc5cnt=0;
   TIMSK1 |= (1<<ICIE1);
   Ir_key_press_flag=0;

 }

ISR(TIMER1_CAPT_vect)
{
   #define FRAME_RESTART 0
   #define FRAME_OK 1
   #define FRAME_END 2
   #define FRAME_ERROR 3


   static uint16_t LastCapture;
   uint16_t PulseWidth;
   static uint8_t IrPulseCount;
   static uint16_t IrData;
   static uint8_t frame_status;


   PulseWidth= (ICR1 - LastCapture);
   LastCapture = ICR1;
   TCCR1B ^= (1<<ICES1);

   
 if (PulseWidth >MAX_BIT)
    {
    rc5cnt=0;

    }
 if (rc5cnt>0)
    {


    frame_status=FRAME_OK;

    }
 if (rc5cnt ==0)
 {
    IrData=0;
    IrPulseCount=0;
    TCCR1B |= (1<<ICES1);
    rc5cnt++;
    frame_status=FRAME_END;


 }



 if (frame_status==FRAME_OK)
 {


    if(PulseWidth<MIN_HALF_BIT)
    {
       frame_status=FRAME_RESTART;

    }
    if(PulseWidth>MAX_BIT)
    {
       frame_status=FRAME_RESTART;

    }
    if(frame_status==FRAME_OK)
    {
               lcd_cls();
      lcd_locate(0,0);
       lcd_int(PulseWidth);
 // ----------------------------  DO TEGO MOMENTU NIE DOCHODZI PROGRAM ....
       if(PulseWidth>MAX_HALF_BIT) rc5cnt++;
       if(rc5cnt>1)

          if((rc5cnt%2)==0)
          {
             //------------------------------------


               //------------------------------------
             IrData=IrData<<1;
             if((TCCR1B&(1<<ICES1))) IrData|=0x0001;
             IrPulseCount++;
             if(IrPulseCount>12)
             {
               if(Ir_key_press_flag==0)
               {
                  command=IrData&0b0000000000111111;
                  address=(IrData&0b0000011111000000)>>6;
                  toggle_bit=(IrData&0b0000100000000000)>>11;

               }
            frame_status=FRAME_RESTART;
            Ir_key_press_flag=1;
             }

          }
       rc5cnt++;

    }
 }
if (frame_status==FRAME_RESTART)
{


   rc5cnt=0;
    TCCR1B &=~ (1<<ICES1);
}



}

void lcd_int(int val)
{
   char bufor[17];
   lcd_str( itoa(val, bufor, 10) );
}

#define ir_micro_s(num) ((num)*F_CPU/1000000/TIMER1_PRESCALER)

#define ir_micro_s(num) ((num))

#define ir_micro_s(num) ((num)*F_CPU/1000000/TIMER1_PRESCALER)

#define ir_micro_s(num) ((num)*(F_CPU/1000000)/TIMER1_PRESCALER)