;------------------------------------------------------------------------------------ ; ; ;------------------------------------------------------------------------------------ ;PROGRAMA DEL LCD. ;Textos para el LCD ;------------------------------------------------------------------------------------ ;PIC 16F84A / CRISTAL A : 4MHZ/ ;Bits de configuracion para el programa icprog; ;CP (proteccion de la memoria de codigo):..................OFF ;PWRTE (activacion del temporizador "Power-up":............ON ;WDTE (activación del "perro guardian"):...................OFF ;FOSC1-FOSC0 (tipo de oscilador):..........................HT ;------------------------------------------------------------------------------------ ;*************************************************** call initext1 call initext2 call initext3 call initext4 call initext5 initext1 ; introduce la primera linea del lcd MOVLW D'32' ; espacio CALL SENDCHAR MOVLW D'32' ; espacio CALL SENDCHAR MOVLW D'80' ; P CALL SENDCHAR MOVLW D'82' ; R CALL SENDCHAR MOVLW D'79' ; O CALL SENDCHAR MOVLW D'89' ; Y CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'67' ; C CALL SENDCHAR MOVLW D'84' ; T CALL SENDCHAR MOVLW D'79' ; O CALL SENDCHAR MOVLW D'32' ; espacio CALL SENDCHAR MOVLW D'80' ; P CALL SENDCHAR MOVLW D'65' ; A CALL SENDCHAR MOVLW D'82' ; R CALL SENDCHAR MOVLW D'65' ; A CALL SENDCHAR RETURN initext2 movlw 0xc0 ;introduce la 2 linea del lcd call AT_LCD MOVLW D'32' ; espacio CALL SENDCHAR MOVLW D'70' ; F CALL SENDCHAR MOVLW D'80' ; P CALL SENDCHAR MOVLW D'76' ; L CALL SENDCHAR MOVLW D'76' ; L CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'70' ; F CALL SENDCHAR MOVLW D'73' ; I CALL SENDCHAR MOVLW D'65' ; A CALL SENDCHAR RETURN initext3 movlw 0xc0 ;introduce la 3 linea del lcd call AT_LCD MOVLW D'84' ; T CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'76' ; L CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'70' ; F CALL SENDCHAR MOVLW D'79' ; O CALL SENDCHAR MOVLW D'78' ; N CALL SENDCHAR MOVLW D'79' ; O CALL SENDCHAR MOVLW D'73' ; I CALL SENDCHAR MOVLW D'80' ; P CALL SENDCHAR RETURN initext4 movlw 0xc0 ;introduce la 4 linea del lcd call AT_LCD MOVLW D'84' ; T CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'76' ; L CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'70' ; F CALL SENDCHAR MOVLW D'46' ; . CALL SENDCHAR MOVLW D'65' ; A CALL SENDCHAR MOVLW D'78' ; N CALL SENDCHAR MOVLW D'65' ; A CALL SENDCHAR MOVLW D'76' ; L CALL SENDCHAR MOVLW D'79' ; O CALL SENDCHAR RETURN initext5 movlw 0xc0 ;introduce la 5 linea del lcd call AT_LCD MOVLW D'84' ; T CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'76' ; L CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'46' ; . CALL SENDCHAR MOVLW D'68' ; D CALL SENDCHAR MOVLW D'69' ; E CALL SENDCHAR MOVLW D'67' ; C CALL SENDCHAR MOVLW D'84' ; T CALL SENDCHAR RETURN END