TODOPIC

Microcontroladores PIC => Primeros pasos - Iniciación a los microcontroladores => Mensaje iniciado por: lunago13 en 15 de Diciembre de 2018, 17:04:58

Título: LCD 16x02
Publicado por: lunago13 en 15 de Diciembre de 2018, 17:04:58
Hola, estaba probando un lcd de 16x02 con un pic16f887 y todo anda bien pero al parecer tengo un problema con las librerias porque se envian los datos pero el lcd no muestra nada. Solo muestra los 40 digitos(no se como se llamarian) prendidos de cada posición. Mando el codigo para ver si me pueden ayudar, de paso mando el codigo de la libreria que uso.

Código: [Seleccionar]
#include <16F887.h>
#use delay(clock=4000000)
#fuses XT,NOWDT

#BYTE TRISA = 0x85
#BYTE PORTA = 0x05
#BYTE TRISB = 0x86
#BYTE PORTB = 0x06
#BYTE TRISC = 0x87
#BYTE PORTC = 0x07
#BYTE TRISD = 0x88
#BYTE PORTD = 0x08
#BYTE TRISE = 0x89
#BYTE PORTE = 0x09

#include <LCD_LIB.c>

int main (void)
 {
   SET_TRIS_A(0);
   SET_TRIS_B(0);
   SET_TRIS_C(0);
   SET_TRIS_D(0);
   SET_TRIS_E(0);
   PORTA=0;
   PORTB=0;
   PORTC=0;
   PORTD=0;
   PORTE=0;
   lcd_init();
   
   for(;;){
   lcd_putc("\f");
   lcd_gotoxy(1,1);
   printf(lcd_putc,"HOLA");
   delay_ms(500);
   lcd_putc("\f");
   lcd_gotoxy(1,1);
   printf(lcd_putc,"LUNAGO13");
   delay_ms(500);
   }
 }

Código de la libreria

Código: [Seleccionar]
// Cambie estos pines segun la configuracion de su placa

#define LCD_DB4 PIN_B4
#define LCD_DB5 PIN_B5
#define LCD_DB6 PIN_B6
#define LCD_DB7 PIN_B7

#define LCD_RS PIN_B2
#define LCD_E  PIN_B3

// Si desea trabajar con 6 cables debera conectar RW a masa,
// De ser asi, comente la linea siguiente. Si utiliza RW descomente la linea

//#define USE_LCD_RW 1

//========================================

#define lcd_type 2 // 0=5x7, 1=5x10, 2=2 lineas
#define lcd_line_two 0x40 // Direccion RAM del LCD para la segunda linea

int8 const LCD_INIT_STRING[4] =
{
  0x20 | (lcd_type << 2), // Func set: 4-bit, 2 lines, 5x8 dots
  0xc, // Display on
  1, // Clear display
  6 // Increment cursor
};


//-------------------------------------
void lcd_send_nibble(int8 nibble)
{
  // Note: !! converts an integer expression
  // to a boolean (1 or 0).
  output_bit(LCD_DB4, !!(nibble & 1));
  output_bit(LCD_DB5, !!(nibble & 2));
  output_bit(LCD_DB6, !!(nibble & 4));
  output_bit(LCD_DB7, !!(nibble & 8));

  delay_cycles(1);
  output_high(LCD_E);
  delay_us(2);
  output_low(LCD_E);
}

//-----------------------------------
// This sub-routine is only called by lcd_read_byte().
// It's not a stand-alone routine. For example, the
// R/W signal is set high by lcd_read_byte() before
// this routine is called.

#ifdef USE_LCD_RW
int8 lcd_read_nibble(void)
{
  int8 retval;
  // Create bit variables so that we can easily set
  // individual bits in the retval variable.
  #bit retval_0 = retval.0
  #bit retval_1 = retval.1
  #bit retval_2 = retval.2
  #bit retval_3 = retval.3

  retval = 0;

  output_high(LCD_E);
  delay_cycles(1);

  retval_0 = input(LCD_DB4);
  retval_1 = input(LCD_DB5);
  retval_2 = input(LCD_DB6);
  retval_3 = input(LCD_DB7);

  output_low(LCD_E);

  return(retval);
}
#endif

//---------------------------------------
// Read a byte from the LCD and return it.

#ifdef USE_LCD_RW
int8 lcd_read_byte(void)
{
  int8 low;
  int8 high;

  output_high(LCD_RW);
  delay_cycles(1);

  high = lcd_read_nibble();

  low = lcd_read_nibble();

  return( (high<<4) | low);
}
#endif

//----------------------------------------
// Send a byte to the LCD.
void lcd_send_byte(int8 address, int8 n)
{
  output_low(LCD_RS);

#ifdef USE_LCD_RW
while(bit_test(lcd_read_byte(),7)) ;
#else
delay_us(60);
#endif

  if(address)
  output_high(LCD_RS);
  else
  output_low(LCD_RS);

  delay_cycles(1);

#ifdef USE_LCD_RW
output_low(LCD_RW);
delay_cycles(1);
#endif

  output_low(LCD_E);

  lcd_send_nibble(n >> 4);
  lcd_send_nibble(n & 0xf);
}

//----------------------------
void lcd_init(void)
{
  int8 i;

  output_low(LCD_RS);

#ifdef USE_LCD_RW
output_low(LCD_RW);
#endif

  output_low(LCD_E);

  delay_ms(15);

  for(i=0 ;i < 3; i++)
  {
    lcd_send_nibble(0x03);
    delay_ms(5);
  }

  lcd_send_nibble(0x02);

  for(i=0; i < sizeof(LCD_INIT_STRING); i++)
  {
    lcd_send_byte(0, LCD_INIT_STRING[i]);

    // If the R/W signal is not used, then
    // the busy bit can't be polled. One of
    // the init commands takes longer than
    // the hard-coded delay of 60 us, so in
    // that case, lets just do a 5 ms delay
    // after all four of them.
#ifndef USE_LCD_RW
delay_ms(5);
#endif
}

}

//----------------------------

void lcd_gotoxy(int8 x, int8 y)
{
  int8 address;

  if(y != 1)
  address = lcd_line_two;
  else
  address=0;

  address += x-1;
  lcd_send_byte(0, 0x80 | address);
}

//-----------------------------
void lcd_putc(char c)
{
  switch(c)
  {
    case '\f':
      lcd_send_byte(0,1);
      delay_ms(2);
      break;

    case '\n':
      lcd_gotoxy(1,2);
      break;

    case '\b':
      lcd_send_byte(0,0x10);
      break;

    default:
      lcd_send_byte(1,c);
      break;
  }
}

//------------------------------
#ifdef USE_LCD_RW
char lcd_getc(int8 x, int8 y)
{
  char value;

  lcd_gotoxy(x,y);

  // Wait until busy flag is low.
  while(bit_test(lcd_read_byte(),7));

  output_high(LCD_RS);
  value = lcd_read_byte();
  output_low(lcd_RS);

  return(value);
}
#endif

void lcd_setcursor_vb(short visible, short blink) {
  lcd_send_byte(0, 0xC|(visible<<1)|blink);
}
Título: Re:LCD 16x02
Publicado por: Robert76 en 15 de Diciembre de 2018, 18:14:24
Hola, cómo es eso de que muestra los 40 dígitos? Si el LCD es 16x2?
Quizás el control de contraste está muy alto. Verifica eso.
Título: Re:LCD 16x02
Publicado por: thegame en 16 de Diciembre de 2018, 03:07:51
Intentaste usar la libreria flex_lcd?? talvez sea lo mismo pero a mi nunca me ha fallado esa libreria para los LCD

Saludos
Título: Re:LCD 16x02
Publicado por: lunago13 en 16 de Diciembre de 2018, 17:28:07
Hola, cómo es eso de que muestra los 40 dígitos? Si el LCD es 16x2?
Quizás el control de contraste está muy alto. Verifica eso.
No se como se llaman, o sea, cada caracter esta contenido en 40 cuadrados porque son 5 columnas y 8 filas.
Título: Re:LCD 16x02
Publicado por: lunago13 en 16 de Diciembre de 2018, 17:30:41
Intentaste usar la libreria flex_lcd?? talvez sea lo mismo pero a mi nunca me ha fallado esa libreria para los LCD

Saludos
Creo que la buscaré y voy a tratar de usarla y si tengo problemas volvere acá jaja. Gracias!