.::PIC - USO DEL LCD USANDO PIC-BASIC-PRO::.

MATPIC.COM

PIC - USO DEL LCD USANDO PIC-BASIC-PRO

USO DEL LCD USANDO PIC-BASIC-PRO (PBP)

Una pantalla de cristal líquido o LCD (sigla del inglés liquid crystal display) es una pantalla delgada y plana formada por un número de píxeles en color o monocromos colocados delante de una fuente de luz o reflectora.

A menudo se utiliza en dispositivos electrónicos de pilas, ya que utiliza cantidades muy pequeñas de energía eléctrica.

El compilador PBP permite definir los pines del microcontrolador que se conectan al LCD (pines tales como datos, enable, escritura, etc.) usando la función DEFINE.

Tenemos las siguientes definiciones:

Tabla 1. Definición de puerto y bits para el LCD.

DEFINE LCD_DREG PORTA

'Puerto de datos del LCD

DEFINE LCD_DBIT 0

'Inicio de datos del bit 0 o 4

DEFINE LCD_RSREG PORTA

'Selección del puerto del registro

DEFINE LCD_RSBIT 4

'Selección del bit de registro

DEFINE LCD_EREG PORTB

'Puerto del pin de habilitación (enable)

DEFINE LCD_EBIT 3

'Pin de enable

DEFINE LCD_RWREG PORTE

'Puerto de Lectura y Escritura

DEFINE LCD_RWBIT 2

'Pin de Lectura y Escritura

DEFINE LCD_BITS 4

'Tamaño del bus de datos: 4 o 8

DEFINE LCD_LINES 2

'Número de líneas del LCD

DEFINE LCD_COMMANDUS 2000

'Tiempo de retardo de comandos

DEFINE LCD_DATAUS 50

'Retardo de envío de datos

Una vez definidos los puertos y los pines del LCD, es necesario realizar una pausa de medio segundo antes de enviar los datos al LCD, esto para que tenga tiempo de inicializar la memoria RAM el dispositivo. Usamos la función PAUSE.

A continuación se muestra las sentencias para escritura del LCD, usando LCDOUT:

Tabla 2. Comandos de escritura del LCD.

Comando

Operación

$FE, 1

Limpia visor

$FE, 2

Vuelve a inicio (comienzo de la primera línea)

$FE, $0C

Apagar cursor

$FE, $0E

Subrayado del cursor activo

$FE, $0F

Parpadeo del cursor activo

$FE, $10

Mueve cursor una posición hacia la izquierda

$FE, $14

Mueve cursor una posición hacia la derecha

$FE, $C0

Mueve cursor al comienzo de la segunda línea

La siguiente figura muestra la conexión de un LCD de 16x2 con un PIC16F628A en el simulador PROTEUS:

Figura 1. Conexión de LCD en Proteus.

Nótese que RW va a tierra debido a que se solo escribirá datos en el LCD.

El código de control del LCD con el PIC es el siguiente:

' DEFINICIÓN DE REGISTROS PARA EL LCD

DEFINE LCD_DREG PORTB 'UTILIZAR 4 BITS DEL PUERTO B PARA TX DE DATOS

DEFINE LCD_DBIT 4     'DESDE EL BIT B.4 AL BIT B.7

DEFINE LCD_RSREG PORTB'UTILIZAR EL REGISTRO  DE CONTROL/DATOS EN EL PUERTO B

DEFINE LCD_RSBIT 1    'EN EL BIT B.1

DEFINE LCD_EREG PORTB 'UTILIZAR EL ENABLE EN EL PUERTO B

DEFINE LCD_EBIT 2     'EN EL BIT B.2

 

TRISB=0 'ESTABLECER EL PUERTO B COMO SALIDA

PAUSE 500 ' PAUSE DE MEDIO SEGUNDO

 

LCDOUT $FE, 1 ' LIMPIAR VISOR

LCDOUT $FE, 1, "WWW.MATPIC.COM"   'ESCRIBIR EN LA PRIMER LÍNEA

LCDOUT $FE, $C0, "ELECTRONICA"        'ESCRIBIR EN LA SEGUNDA LÍNEA

LCDOUT $FE, $0C                                        'APAGAR EL CURSOR

Este código escribirá en las dos líneas del LCD.

Asimismo, para escribir un dato en el LCD se usan funciones como DEC, HEX, BIN, por ejemplo:

LCDOUT $FE, 1, DEC 25

LCDOUT $FE, $C0, BIN 25

Si se desea escribir en una posición inicial específica del LCD, se usa la siguiente tabla para determinar dicha posición:

Tabla 3. Código de direcciones de caracteres (valores hexadecimales):

Display Position

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

DD RAM Address

80

81

82

83

84

85

86

87

88

89

8A

8B

8C

8D

8E

8F

DD RAM Address

C0

C1

C2

C3

C4

C5

C6

C7

C8

C9

CA

CB

CC

CD

CE

CF

Por ejemplo, para escribir desde la segunda celda de la segunda fila la palabra "TEXTO" se usa:

LCDOUT $FE,$C1,"TEXTO"

O bien se puede escribir la dirección de memoria en formato decimal:

C1 hexadecimal es 193 decimal, por la tanto:

LCDOUT $FE,193,"TEXTO"

Es equivalente a la función precedente.

Físicamente, el LCD de 16x2 se debe conectar como lo indica la siguiente figura, para controlar el contraste de la pantalla:

Figura 2. Conexión del LCD junto al potenciómetro de contraste.

Un ejemplo de aplicación se muestra a continuación:

' DEFINICIÓN DE REGISTROS PARA EL LCD

DEFINE LCD_DREG PORTB 'UTILIZAR 4 BITS DEL PUERTO B PARA TX DE DATOS

DEFINE LCD_DBIT 4     'DESDE EL BIT B.4 AL BIT B.7

DEFINE LCD_RSREG PORTB'SELECCIÓN DEL PUERTO DEL REGISTRO

DEFINE LCD_RSBIT 1    'EN EL BIT B.1

DEFINE LCD_EREG PORTB 'UTILIZAR EL ENABLE EN EL PUERTO B

DEFINE LCD_EBIT 2     'EN EL BIT B.2

' ESTABLECER EL PUERTO B COMO SALIDA

TRISB=0

' TAMAÑO DE VARIABLES DEL CONTADOR

B0 VAR BYTE

B1 VAR BYTE

' PAUSA DE INICIO DEL LCD

PAUSE 500

'--------------------------------------------------------

LCDOUT $FE, 1 ' LIMPIAR LCD

LCDOUT $FE, 1, "WWW.MATPIC.COM" 'ESCRIBIR EN LA PRIMERA LÍNEA  

LCDOUT $FE, $C0, "ELECTRONICA"  'ESCRIBIR EN LA SEGUNDA LÍNEA

PAUSE 1000

' MOSTRAR DATOS DECIMALES Y BINARIOS

LCDOUT $FE, 1, DEC 25

LCDOUT $FE, $C0, BIN 25

'--------------------------------------------------------

'MOSTRAR LETRA POR LETRA

PAUSE 500

LCDOUT $FE, 1 ' LIMPIAR LCD     

FOR B0 = 0 TO 13

  LOOKUP B0,["WWW.MATPIC.COM"],B1

  LCDOUT $FE,$0C,B1

  PAUSE 500

NEXT

 

LCDOUT $FE, $C0 'COLOCAR EL CURSOR EN LA SEG LÍNEA

FOR B0 = 0 TO 13

  LOOKUP B0,["WWW.EQBYTE.COM"],B1

  LCDOUT $FE,$0C,B1

  PAUSE 500

NEXT

'--------------------------------------------------------

'DESPLAZAMIENTO DE TEXTO EN LCD

FOR B0 = 144 TO 128 STEP -1

  LCDOUT $FE, 1 ' LIMPIAR LCD

  LCDOUT $FE,B0,"WWW.MATPIC.COM" 

  PAUSE 200   

NEXT                

 

END

Este video te explica detalles del programa:

 

Puedes bajar el programa y la simulación en Proteus haciendo click en el botón siguiente:

 

descargar

 

©2017 MATPIC

Prohibida cualquier copia parcial o total del contenido de esta web