Timer con PIC16F628A

El presente trabajo muestra el programa en ensamblador con la configuración para el reloj interno del PIC16f628A.
NOTA: Muy importante si los relevadores no se accionan correctamente, es porque elvoltaje de entrada se pierde en la carga de las bobinas y la alimentación del regulador de voltaje.Solucion: a la entrada de 24 adicionar en paralelo un Capacitor Electrolitico de 470uF a 35 Volts ya la entrada de la alimentasion del regulador conectar paralelamente un capacitor electrolítico de 220uF a 16 volts.
Imagen de tarjeta temporizadora terminada.

Diagrama en proteus, aplicable paraPCB, ya que en ISIS tiene un problemara para correr la simulasion debido a los cambios en el PIC, recordar que se tienen que excluir los TBLOCK de la simulación.




; **** Encabezado ****
listp=16F628A
#include

__CONFIG _CP_OFF & _WDT_OFF & _BODEN_ON & _PWRTE_ON & _INTRC_OSC_NOCLKOUT & _LVP_OFF & _MCLRE_ON
;**** Definicion de variables ****
conta_1 equ 0X20
conta_2 equ 0X21conta_3 equ 0X22
d1 equ 0X23
d2 equ 0X24
d3 equ 0X25
d4 equ 0X26
d5 equ 0X27
d6 equ 0X28
d7 equ 0X29d8 equ 0X30
d9 equ 0X31
d10 equ 0X29
d11 equ 0X30
d12 equ 0X31


Led1 equ 0 ; Definimos Led como el bit cero de un registro, eneste caso PORTB.-
Led2 equ 1
Led3 equ 2
Led4 equ 3
Led5 equ 4
Led6 equ 5
Led7 equ 6
Led8 equ 7


;**** Configuracion de puertos ***
Reset
org 0x00 ; Aqui comienza el micro.-goto Inicio ; Salto a inicio de mi programa.-
org 0x05 ; Origen del codigo de programa.-
Inicio bsf STATUS,RP0 ; Pasamos de Banco 0 a Banco 1.-
movlw b'11111' ; Muevo 11111 a W.-
movwf TRISA; Cargo en TRISA.-
movlw b'00000000'
movwf TRISB
bcf STATUS,RP0 ; Paso del Banco 1 al Banco 0
bcf PORTB,Led1 ; Comienza apagado.-
bcf PORTB,Led2 ; Comienza apagado.-
bcf PORTB,Led3...