// Тук се получава прекъсване от RB7:RB4 входовете (датчиците ти) и се вдига флага за задействане на алармата.
#int_RB
RB_isr()
{ alarm_triggered |= sensors_scan();
}

// Сканира на всеки 250us (май толкова го направих) за натискане на POWER_Key-a. Ако е натиснат, трябва да се задържи еди си колко сканирания след което превключва състоянието на алармата. По надол ако е вкл. алармата премигва червения светодиод.
#int_TIMER0
TIMER0_isr()
{ if (~POWER_Key) {counter++;POWER_LED = 1;}
    else counter = 0;
   if (counter == 20) Alarm_ON = ~Alarm_ON;
    If ((~Alarm_ON) & Alarm_Triggered)
      Alarm_Triggered = 0;
   If (Alarm_ON)
   {
   counter2++;
   If (counter2 > 5) {Alarm_LED = ~Alarm_LED;
                       If (Alarm_LED)
                         counter2 = 0;
                       else
                         counter2 = 220;}
                        }

}

void init_ports()
{ set_tris_a(0b11111000);
  set_tris_b(0xFF);
}


//сканира датчиците
int1 sensors_scan()
{ if ((PORTB & 0xF0) < 0xF0)
    return 1;
   else
    return 0;
}

void Flash_RED(int8 count)
{int8 i;
  for (i=0;i<count;i++){
  Alarm_LED = ~Alarm_LED;
  delay_ms(250);
  Alarm_LED = ~Alarm_LED;
  delay_ms(250);
  }
}

void Flash_GREEN(int8 count)
{int8 i;
  for (i=0;i<count;i++){
  Power_LED = ~Power_LED;
  delay_ms(250);
  Power_LED = ~Power_LED;
  delay_ms(250);
  }
}

int8 Get_Option_Time()
{ return ((~PORTB) & 0x07);}

//Включва сканирането на датчиците.
void Enable_Alarm()
{  enable_interrupts(INT_RB);
//   sleep();
}

// При включване на захранване се инициализират портовете и няколко променливи. Червения светодиод премигва 3 пъти (за гъзария), след което светва зелено. Оттам алармата чака вдигането на Alarm_ON флага (натискане на Power_Keу за определено време)...след което примигва 3 пъти червения светодиод. Тук следва трик за закъсненията...много елементарен: червения ти светодиод мига 1 път за 500 мс. За да получиш 1 секунда ти трябват 2 мигания, за 5 секунди - 10.
void main()
{int8 i;
   port_b_pullups(TRUE);
   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_256);
   init_ports();
   counter = 0;
MAIN_LOOP:
   Relay = 0;
   Alarm_LED = 0;
   POWER_LED = 0;
   Alarm_Triggered = 0;
   Flash_RED(3);
   delay_ms(1000);
   Power_LED = 1;
   enable_interrupts(INT_TIMER0);
   enable_interrupts(GLOBAL);
   do {;} while (~Alarm_ON);
   Disable_Interrupts(INT_Timer0);
   Flash_RED(Get_Option_Time()*2);
   do {;} while (~POWER_Key);
   Enable_Alarm();
   Enable_Interrupts(INT_TIMER0);
   while(1)
   { if (Alarm_Triggered)
       {    Flash_RED(Get_Option_Time()*2);
            Relay = 1;
            do { FLASH_GREEN(1);
                } while (Alarm_Triggered);
        };
   }
   goto MAIN_LOOP;
}