list p=16F628A ; definir procesador
#include <p16F628A.inc> ; definiciones de variables específicas del procesador
__CONFIG _CP_OFF & _WDT_OFF & _LVP_OFF & _PWRTE_OFF & _INTRC_OSC_NOCLKOUT & _MCLRE_OFF& _BODEN_ON
; Estos de arriba son los fuses. Donde seleccionas el oscilador interno y apagas el reset.
CBLOCK 0x20
ENDC
;***********************************************************************************
org 0x000
goto principal
;***********************************************************************************
; Principal
;***********************************************************************************
principal
movlw b'00000111' ; deshabilita comparadores. Esto es
movwf CMCON ; algo importante en el PIC 16F628A
clrf PORTA ; inicia ports
clrf PORTB ; inicia ports
bsf STATUS,RP0 ; Apunta a banco 1
movlw b'11111111' ; PORTA
movwf TRISA ; salidas menos 1, 2 y 3, entradas
MOVLW b'00000000' ; PORTB
movwf TRISB ; salidas
bcf STATUS,RP0
CLRF PORTB
INICIO
MOVLW 0XFF
MOVWF PORTB
GOTO INICIO
END