Practica Con Pic16F84 En Lcd

LIST P=16F84A ;CONFIGURA TIPO DE MICROCONTROLADOR

ESTADO EQU 03H ;DECLARA NOMBRE DE IGUALDAD DE REGISTRO ESTADO
PTOA EQU 05H ;PUERTO A
PTOB EQU 06H ;PUERTO BREG1 EQU 10H ;REGISTRO 1
REG2 EQU 11H ;REGISTRO 2

ORG 00H ;DIRECCION DE INICIO DEL PROGRAMA
BSF ESTADO,5 ;PASA AL BANCO 1
MOVLW00H ;CONFIGURA EL PUERTO A COMO
MOVWF PTOA ;SALIDA
MOVLW 00H ;CONFIGURA EL PUERTO B COMO
MOVWF PTOB ;SALIDA
BCF ESTADO,5 ;REGRESA AL BANCO 0BCF PTOA,0 ;REGRESA AL PUERTO A
MOVLW 0FH ;CARGA W CON 0FH
MOVWF PTOB ;Y LO SACA POR EL PUERTO B
BSF PTOA,2 ;PASA AL PUERTO 2CALL DELAY ;LLAMA DELAY
BCF PTOA,2 ;REGRESA LA PUERTO A

MOVLW 38H ;CARGA W CON 38H
MOVWF PTOB ;Y LO SACA POR EL PUERTO B
BSFPTOA,2 ;PASA AL PUERTO A
CALL DELAY ;LLAMA DELAY
BCF PTOA,2 ;REGRESA AL PUERTO A

INFINITO BCF PTOA,0 ;REGRESA AL PUERTO A
MOVLW 01H;CARGA W CON 01H
MOVWF PTOB ;Y LO SACA POR EL PUERTO B
BSF PTOA,2 ;PASA AL PUERTO A
CALL DELAY ;LLAMA DELAY
BCF PTOA,2 ;REGRESA AL PUERTO ABSF PTOA,0 ;PASA AL PUERTO A
MOVLW "S" ;CARGA W CON "H"
MOVWF PTOB;Y LO SACA POR EL PUERTO B
BSF PTOA,2 ;PASA AL PUERTO ACALL DELAY ;LLAMA DELAY
BCF PTOA,2 ;REGRESA AL PUERTO A

MOVLW "A" ;CARGA W CON "O"
MOVWF PTOB ;Y LO SACA POR EL PUERTO B
BSFPTOA,2 ;PASA AL PUERTO A
CALL DELAY ;LLAMA DELAY
BCF PTOA,2 ;REGRESA AL PUERTO A

MOVLW "C" ;CARGA W CON "L"
MOVWF PTOB ;Y LO...