▷ Mostrar Fecha y Hora en LCD Utilizando el Módulo RTC DS1307 con PIC

Aprende a implementar un reloj digital completo que muestra fecha y hora en un display LCD 16x2 utilizando el módulo RTC DS1307 y el microcontrolador PIC16F628A programado en MicroCode. Este proyecto integra comunicación I2C, manejo de memoria EEPROM y visualización en tiempo real.

📋 Materiales Requeridos

🔌 Diagrama de Conexiones

El diagrama esquemático muestra la integración completa del PIC16F628A, el módulo RTC DS1307, y el display LCD 16x2:

📌 Conexión PIC - LCD 16x2

El LCD se conecta al PIC en modo de 4 bits para ahorrar pines. Las líneas de control se conectan a través de PORTB, mientras que los datos se transmiten por PORTA:

PORTB.0 → RS (Selección de Registro)
PORTB.1 → E  (Habilitación)
PORTA.0 → D4 (Dato 4)
PORTA.1 → D5 (Dato 5)
PORTA.2 → D6 (Dato 6)
PORTA.3 → D7 (Dato 7)

🔗 Conexión RTC DS1307 - PIC

El módulo RTC se comunica con el PIC a través del protocolo I2C (Two-Wire Communication). Las líneas SDA y SCL deben conectarse correctamente:

PORTB.6 → SDA (Línea de Datos I2C)
PORTB.7 → SCL (Línea de Reloj I2C)

💻 Código Fuente - MicroCode

El código implementa la lectura del RTC a través de I2C y muestra la información en el LCD. Incluye inicialización del RTC y actualización continua de la hora:

; Configurar pines analógicos como digitales
cmcon = 7

; Definición de pines del LCD
define LCD_DREG PORTA 
define LCD_DBIT 0 
define LCD_RSREG PORTB 
define LCD_RSBIT 0 
define LCD_EREG PORTB 
define LCD_EBIT 1

; Configuración I2C sin resistencia pull-up en SCL
DEFINE I2C_SCLOUT 1

; Definición de pines I2C
CPIN VAR Portb.7 ; Pin señal de reloj I2C (SCL)
DPIN VAR Portb.6 ; Pin de datos I2C (SDA)

; Variables para almacenar datos del RTC
segu VAR BYTE    ; Segundos (0-59)
minu VAR BYTE    ; Minutos (0-59)
hora VAR BYTE    ; Horas (0-23)
diaS VAR BYTE    ; Día de la semana (1-7)
diaF VAR BYTE    ; Día del mes (1-31)
mes VAR BYTE     ; Mes (1-12)
anio VAR BYTE    ; Año (00-99)
actualizado VAR BIT ; Bandera de actualización

; Leer estado de EEPROM para determinar si es la primera ejecución
READ 0, actualizado

; Si es la primera vez, grabar valores iniciales en el RTC
IF actualizado = 0 THEN grabarRTC

; Ciclo principal de lectura continua
INICIO:

    ; Leer todos los registros del RTC (dirección $D0)
    I2CREAD DPIN, CPIN, %11010000, 0, [segu]
    I2CREAD DPIN, CPIN, %11010000, 1, [minu]
    I2CREAD DPIN, CPIN, %11010000, 2, [hora]
    I2CREAD DPIN, CPIN, %11010000, 3, [diaS]
    I2CREAD DPIN, CPIN, %11010000, 4, [diaF]
    I2CREAD DPIN, CPIN, %11010000, 5, [mes]
    I2CREAD DPIN, CPIN, %11010000, 6, [anio]

    ; Limpiar LCD y posicionar cursor
    LCDOUT $FE, 1, $FE, 2

    ; Mostrar día de la semana
    IF diaS = $1 THEN LCDOUT "Dom."
    IF diaS = $2 THEN LCDOUT "Lun."
    IF diaS = $3 THEN LCDOUT "Mar."
    IF diaS = $4 THEN LCDOUT "Mie."
    IF diaS = $5 THEN LCDOUT "Jue."
    IF diaS = $6 THEN LCDOUT "Vie."
    IF diaS = $7 THEN LCDOUT "Sab."
    
    ; Mostrar día del mes
    LCDOUT " ", HEX2 diaF, "/"
    
    ; Mostrar mes (nombre abreviado)
    IF mes = $1 THEN LCDOUT "ene"
    IF mes = $2 THEN LCDOUT "feb"
    IF mes = $3 THEN LCDOUT "mar"
    IF mes = $4 THEN LCDOUT "abr"
    IF mes = $5 THEN LCDOUT "may"
    IF mes = $6 THEN LCDOUT "jun"
    IF mes = $7 THEN LCDOUT "jul"
    IF mes = $8 THEN LCDOUT "ago"
    IF mes = $9 THEN LCDOUT "sep"
    IF mes = $10 THEN LCDOUT "oct"
    IF mes = $11 THEN LCDOUT "nov"
    IF mes = $12 THEN LCDOUT "dic"
    
    ; Mostrar año (formato 20XX)
    LCDOUT "/20", HEX2 anio
    
    ; Segunda línea: mostrar hora:minuto:segundo
    LCDOUT $FE, $C0, HEX2 hora, ":", HEX2 minu, ":", HEX2 segu
    
    ; Pausa de 500ms antes de siguiente lectura
    PAUSE 500 
    
    ; Volver al inicio del ciclo
    GOTO INICIO

; Subrutina: Grabar valores iniciales en el RTC
grabarRTC:

    ; Grabar 00 segundos
    I2CWRITE DPIN, CPIN, %11010000, 0, [$00]
    PAUSE 10
    
    ; Grabar 32 minutos
    I2CWRITE DPIN, CPIN, %11010000, 1, [$32]
    PAUSE 10
    
    ; Grabar 15 horas
    I2CWRITE DPIN, CPIN, %11010000, 2, [$15]
    PAUSE 10
    
    ; Grabar día jueves (5)
    ; D=1, L=2, M=3, Mi=4, J=5, V=6, S=7
    I2CWRITE DPIN, CPIN, %11010000, 3, [$5]
    PAUSE 10
    
    ; Grabar día 21 del mes
    I2CWRITE DPIN, CPIN, %11010000, 4, [$21]
    PAUSE 10
    
    ; Grabar enero (mes 1)
    I2CWRITE DPIN, CPIN, %11010000, 5, [$1]
    PAUSE 10
    
    ; Grabar año 21 (2021)
    I2CWRITE DPIN, CPIN, %11010000, 6, [$21]
    PAUSE 10
    
    ; Marcar en EEPROM que ya se grabó el RTC
    WRITE 0, 1
    
    ; Volver al ciclo principal
    GOTO INICIO

🔍 Explicación Detallada del Código

💡 Características Principales del Sistema

🔧 Configuración Personalizada

Para establecer una hora y fecha diferente, modifica los valores en la subrutina grabarRTC:

; Ejemplo: Cambiar a las 10:45:30, 15 de marzo de 2024
I2CWRITE DPIN, CPIN, %11010000, 0, [$30] ; 30 segundos
I2CWRITE DPIN, CPIN, %11010000, 1, [$45] ; 45 minutos
I2CWRITE DPIN, CPIN, %11010000, 2, [$10] ; 10 horas
I2CWRITE DPIN, CPIN, %11010000, 3, [$5]  ; Jueves (5)
I2CWRITE DPIN, CPIN, %11010000, 4, [$15] ; 15 del mes
I2CWRITE DPIN, CPIN, %11010000, 5, [$3]  ; Marzo (3)
I2CWRITE DPIN, CPIN, %11010000, 6, [$24] ; 2024

⚙️ Consejos de Implementación

Accede al código fuente completo, simulación en Proteus y documentación técnica del proyecto