Este es el circuito de mi alarma con el
pic 16F84A , y aunque en principio es bastante simple espero ir añadiendo y mejorando poco a poco.

(dale a la foto para agrandar)
El
funcionamiento es simple, cuando enciendes, se pone en marcha el
led verde (
on) indicando que el
PIC esta en
funcionamiento y entra un contador de 10 segundos antes de que la alarma quede totalmente armada durante los cuales el
led rojo parpadeara hasta quedarse encendido.
ya esta armada, ahora con los 2 pulsadores simulando las puertas del coche, en el pulsador 1 he incluido un retardo de 20 segundos para que de tiempo a apagarla antes de que comience a sonar la sirena, si no se desconecta en esos 20 segundos entrara el
relé haciendo sonar el
claxon a
intervalos de 2 segundos si y 2 no. Si se entra por la puerta del
copiloto (pulsador 2) la alarma se dispara
automaticamente. La alarma
estara sonando durante 1 minuto y si no se desconecta
volverá a armarse
automaticamente. El programa esta hecho en
PBP y no es para nada
complicado. Saludos!!!
PD. en la imagen no lo he puesto pero el rele es alimentado por un 7812 conecado al ULN2003
Bueno aqui les dejo el programa escrito en microcode, compilado con PBP246 y grabado con TE-20 e ic-prog 1.06b. Con Cristal de 4Mhz.
ledon var portb.0
;nombre al puerto B0ledarm var portb.1
;nombre al puerto B1p1 var portb.2
;nombre al puerto B2p2 var portb.3
;nombre al puerto B3rele var porta.0
;nombre al puerto A0x var byte
;nombre a la variable XPmarcha:
;Puesta en marchahigh ledon
for x=0 TO 20
; repite cinco veceshigh ledarm
; enciende ledpause 500
;espera 500mlslow ledarm
; apaga led utilice comando low que cumple la misma ;funcion que toggle que cambia la configuracion ;de un bit es decir si esta en ALTO LO PASA A BAJO ;y viceversapause 500
NEXT
; siguiente hasta que se repite 5 vecesgoto siguiente
siguiente:
pause 500
high ledarm
if p1=0 then alarma1
;si pulsador1 a 0, va a alarma1if p2=0 then alarma2
;si pulsador2 a 0, va a alarma2goto siguiente
alarma1:
;Esta parte da el retardo para apagar lafor x=0 to 40
;alarma, en este caso son 20seg, en elhigh ledon
;caso en el que no se apague pasariahigh ledarm
;a la siguiente etiqueta alarma2pause 250
low ledon
low ledarm
pause 250
next
goto alarma2
alarma2:
;si no hemos apagado la alarma durante for x=0 to 15
;la etiqueta alarma1, o se a activadohigh ledarm
;el segundo pulsador (p2) se activa el high ledon
;rele conectado a una vocina o a unhigh rele
;indicador luminoso a intervaluos depause 2000
;2seg encendiendose tambien todoslow ledarm
;led,s del circuito, para saber ellow ledon
;tiempo que va a estar sonando calculamoslow rele
; (pause + pause)* X / 1000pause 2000
;donde X es igual al número de repeticionesnext ;
FOR.. TO..goto pmarcha
END
;fin del programa