Examen práctico 4-12-2019

// Examen Alfonso Calero

// Alarma

// Pines Entrada Puerto A

/* RA0= cerradura; RA1= s. puerta;

RA2=s. ventana; RA3= s. techo y

RA4= s. sotano*/

// Pines Salida Puerto B

// RB0= Alarma activa

#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)

{

if (input(pin_A0)) // si el pin RA0 es 1

{

   if ( input(pin_A2) || input(pin_A3) || input(pin_A4)) // si RA2 o RA3 o RA4 se activan

   output_bit(pin_B0, 1);

   if (input(pin_A1)) // si se activa RA1 (puerta)

   {

   delay_ms(100); //esperamos 20 segundos

   output_bit(pin_B0,1);

   }

}

else if (!input(pin_A0))

   port_b=0;

}

}