TODOPIC
Microcontroladores PIC => Lenguaje Basic para microcontroladores PIC => Mensaje iniciado por: franco_96 en 14 de Julio de 2016, 16:16:28
-
Hola, estoy haciendo un proyecto con un pic 18f4520 y un lcd gráfico WG12864A, el problema es que sin darme cuenta programe mi proyecto y lo simule en un lcd gráfico en el proteus el lcd hera el amerie 128x64 pero el lcd que tengo en sentido físico( WG12864A ) se compara con lgm12641bs1r en proteus y ahora cuando hago la coneccion con este nuevo lcd me doy cuenta que hay un nuevo pin el "DI" y ya no esta el "RS" del otro lcd, y lo q escribo no se forma o se forma todo superpuesto sobre la primer linea del lcd.
E buscado por todas partes pero nadie muestra con un código de proton como declarar este lcd solo muestran como declarar el anterior el ampire, si alguien me pudiera poner un pedazo de código de como declarar este nuevo lcd gráfico estaría muy agradecido
Desde ya muchas gracias.
-
Hola,
aportando un poco sobre el problema, el pin DI es el mismo que el RS, hace tiempo tuve ese mismo problema y comparto el código de ejemplo para ambos GLCD's:
'****************************************************************
'* Name : GLCD_LGM12641BS1R.BAS *
'* Author : [EJM] *
'* Notice : Copyright (c) 2016 [EJM] *
'* : All Rights Reserved *
'* Date : 14/07/2016 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
Device = 18F4520
Xtal = 48
'Configuración GLCD LGM12641BS1R
LCD_DTPort = PORTD
LCD_RSPin = PORTB.0
LCD_RWPin = PORTB.1
LCD_ENPin = PORTB.2
LCD_CS1Pin = PORTB.3
LCD_CS2Pin = PORTB.4
LCD_Type = GRAPHIC
GLCD_CS_Invert = On
Declare GLCD_STROBE_DELAY 50
Internal_Font = On
Font_Addr = 0
TRISB = $00 : TRISD = $00
Cls
DelayMS 200
BASLA:
Print At 0,5,"PIC18F4520"
DelayMS 1000
Print At 2,2,"GLCD LGM12641BS1R"
DelayMS 1000
Print At 4,5,"Con PROTON"
DelayMS 1000
Print At 6,3,"128*64 PIXELES"
DelayMS 1000
GoTo BASLA
End
Include "font.inc"
'****************************************************************
'* Name : GLCD_AMPIRE128X64.BAS *
'* Author : [EJM] *
'* Notice : Copyright (c) 2016 [EJM] *
'* : All Rights Reserved *
'* Date : 14/07/2016 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
Device = 18F4520
Xtal = 48
'Configuración GLCD AMPIRE128X64
LCD_DTPort = PORTD
LCD_RSPin = PORTB.0
LCD_RWPin = PORTB.1
LCD_ENPin = PORTB.2
LCD_CS1Pin = PORTB.3
LCD_CS2Pin = PORTB.4
LCD_Type = GRAPHIC
Declare GLCD_STROBE_DELAY 50
Internal_Font = On
Font_Addr = 0
TRISB = $00 : TRISD = $00
Cls
DelayMS 200
BASLA:
Print At 0,5,"PIC18F4520"
DelayMS 1000
Print At 2,2,"GLCD AMPIRE128X64"
DelayMS 1000
Print At 4,5,"Con PROTON"
DelayMS 1000
Print At 6,3,"128*64 PIXELES"
DelayMS 1000
GoTo BASLA
End
Include "font.inc"
Cualquier duda u observación comentalo.
Saludos.
-
muchisimas gracias el problema se soluciono y ahora todo funciona correctamente, te estoy muy agradecido por tu ayuda.