LCD_CADENAS

ESTE CODIGO PERMITE REDUCIR EL USO DE LA MEMORIA DE PROGRAMA CUANDO SE DESEA ENVIAR MENSAJES POR UNA PANTALLA LCD DE 4 LINEAS

INCLUDE  CBLOCK .32 INICIO_TABLA CARACTER POSICION ENDC ORG 00H GOTO INICIO MENSAJE ADDWF PCL,F ; POSICION 2 MENSAJE_1 DT "JORDY ANDRES",00H MENSAJE_2 DT "VALENCIA ROSERO",00H MENSAJE_3 DT "JORDY ",00H MENSAJE_4 DT ")VALENCIA",00H

MOSTRA_CADENA MOVWF POSICION MOVLW MENSAJE SUBWF POSICION,W MOVWF INICIO_TABLA DECF INICIO_TABLA,F CICLO MOVF INICIO_TABLA,W CALL MENSAJE MOVWF CARACTER MOVF CARACTER,F BTFSS STATUS,Z GOTO SEGUIR GOTO FIN SEGUIR MOVF CARACTER,W CALL LCD_ENVIA_CARACTER INCF INICIO_TABLA,F GOTO CICLO FIN RETURN

INICIO BSF STATUS,RP0 BCF STATUS,RP1 MOVLW D'6' MOVWF ADCON1 CLRF TRISC CLRF TRISD BCF STATUS,RP0 CALL INICIAR_PANTALLA

CALL LCD_BORRAR CALL LCD_CURSOR_INCREMENTO CALL LCD_CURSOR_OFF

CALL LCD_LINEA1 MOVLW MENSAJE_1 CALL MOSTRA_CADENA

CALL LCD_LINEA2 MOVLW MENSAJE_2 CALL MOSTRA_CADENA

CALL LCD_LINEA3 MOVLW MENSAJE_3 CALL MOSTRA_CADENA

CALL LCD_LINEA4 MOVLW MENSAJE_4 CALL MOSTRA_CADENA

SLEEP INCLUDE  INCLUDE  END