Ejemplo 01 Constante

;***************01CONSTANTE**************
;CREAR UNA CONSTANTE Y ASIGNAR UN VALOR ENTRE 0 - 255


;ZONA DE DATOS*********************************************************************
    __CONFIG _CP_OFF& _WDT_OFF& _PWRTE_ON& _XT_OSC ;CONFIGURACION PALABRA DE CONTROL

            LIST P=16F84A   ;MICROCONTROLADOR UTILIZADO
            INCLUDE <P16F84A.INC>   ;ETIQUETAS DEL MICROCONTROLADOR ESPECIFICADO

CONSTANTE   EQU H'01'        ;SE CARGA LA VARIABLE CONSTANTE CON EL VALOR 01 HEXADECIMAL

;ZONA DE CODIGOS*********************************************************************

            ORG 0           ;INCIO DE PROGRAMA EN LA DIRECCION 0 DE MEMORIA DE PROGRAMA

INICIO
            BSF STATUS,RP0  ;FIJA A 1 EL BIT 5 DEL REGISTRO STATUS PARA ACCESAR AL BANCO 1
            CLRF TRISB      ;LIMPIA LAS LINES DEL PTO B PARA CONFIGURARLO COMO SALIDA
            BCF STATUS,RP0  ;FIJA A 0 EL BIT 5 DEL REGISTRO STATUS PARA REGRESAR AL BANCO 0
            MOVLW CONSTANTE ;CARGA EL REGISTRO DE TRABAJO W CON EL VALOR DE CONSTANTE EL CUAL ES H'01'
PRINCIPAL
            MOVWF PORTB     ;EL VALOR QUE CONTIENE EL REGISTRO DE TRABAJO W SE MUEVE AL PTO B
            GOTO PRINCIPAL  ;SE CREA UN BUCLE CERRADO E INFINITO
            END             ;FIN DEL PROGRAMA