//------------------------------------------------------------------------------
//   IR szenzor  TSOP1736
//   NEC és SONY távkapcsolokkal tesztelve 
//   más kapcsolók nem áltak rendelkezésemre
//   Sorosportra küldi a vett jeleket
//
//
//
//------------------------------------------------------------------------------
#include <16F648A.h>
#use delay(clock=4000000)
#fuses NOWDT,HS, PUT, NOPROTECT, BROWNOUT, MCLR, NOLVP, NOCPD
#use rs232(baud=9600,parity=N,xmit=PIN_B2,rcv=PIN_B1,bits=8)

#include <ir_read_mb.c>

#byte OPION      =0x81        //  
#bit INTEDG      =OPION.6     // INT_EX lefutó élre

//------------------------------------------------------------------------------
#int_EXT
interrupt(){
output_high(PIN_B5);    // ledeke be
output_high(PIN_B4);
ir_read();
output_low(PIN_B5);     // ledek ki
output_low(PIN_B4);
} 

void main()
{
   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
   setup_timer_1(T1_INTERNAL|T1_DIV_BY_1);
   setup_timer_2(T2_DISABLED,0,1);
   setup_comparator(NC_NC_NC_NC);
   setup_vref(FALSE);
   INTEDG=0;
   enable_interrupts(INT_EXT);
   enable_interrupts(GLOBAL);

printf("START\n\r");    // welcome
   while(true)
   {
      if(rx_status==3)  // ha van érvényes fogadott jel
      {
        printf("CODE: %LX\n\r", ir_tempbyte_hi);    // kód küldése sorosportra
          //      printf("CODE: %LX\n\r", ir_tempbyte_lo);    // display device address
         rx_status=0;
         
      }
   }
}