Examen Alarma dia 04-12-19

// Examen Practico Alarma

// Jesus Muñoz Fuentes

//cerradura A0

//puerta A1

//ventana A2

//techo A3

//sotano A0

//alarma B0

#include <16f84.h>

#use delay (clock=4000000)

#use fast_io(A)

#use fast_io(B)

#byte port_a=5

#byte port_b=6

main ()

{

port_a=0;

port_b=0;

set_tris_a(0xFF);

set_tris_b(0x00);

while (1)

{

port_b=0;

//cerradura

while(input(pin_A0))

{

//sensor puerta

if (input(pin_A1) && input(pin_A0)) //si el sensor de puerta se activa mientras esta la cerradura activa

{

delay_ms(100); //cuenta 20 segundos

if (input(pin_A0)) // si esta activada la cerradura se activa la alarma

port_b=1; //se activa la alarma

}

//sensor ventana

if (input(pin_A2) && input(pin_A0)) //si el sensor de ventana se activa mientras esta la cerradura activa

{

port_b=1; //se activa la alarma

}

else

// sensor techo

if (input(pin_A3) && input(pin_A0)) //si el sensor de techo se activa mientras esta la cerradura activa

{

port_b=1; //se activa la alarma

}

else

//sensor sotano

if (input(pin_A4) && input(pin_A0)) //si el sensor de sotano se activa mientras esta la cerradura activa

{

port_b=1; //se activa la alarma

}

else if (!input(pin_A0))

{

port_b=0;

}

}}

}