EXAMEN ,SISTEMA DE ALARMA

#include<16F84.h>
#use delay(clock=4000000)
#use fast_io(A)
#use fast_io(B)
#byte port_b=6
#byte port_a=5

main()
{
port_a=0;
port_b=0;
set_tris_a(0xff);
set_tris_b(0x00);

while(1)
 {
while(input(pin_A0))
  {
while(input(pin_A1)||input(pin_A2)||input(pin_A3)||input(pin_A4))
   {
   if (input(pin_A1))
    {
  delay_ms(100);
  output_bit(pin_B1,1);
    }
  else
  output_bit(pin_B1,1);
   }
  }
 output_bit(pin_B1,0);
 }
}