Other LCD modules for GLCD

Share code examples with other users

Other LCD modules for GLCD

Postby Coccoliso » Thu Oct 02, 2014 5:29 pm

Porting in FW of this GLCD :

- S1D13700
- T6963C
- SED1520
- S1D10605
- SSD0323
- SSD1306
- ST7565R

Drag and drop the zip file to the editor window and FW installs the libraries in the subfolder GLCD which must already contain the modules GLCD.BAS and GLCDGraphics.BAS posted by David ago. The zip does not contain even the KS0108.
Make sure that in GLCD module the import sequence is GLCD_MODEL followed by GlcdGraphics before try using LCD with screen in GLCD_XY_16 mode.

GLCD Module validation section
Code: Select all
----
' validate model...
#option GLCD_MODEL = KS0108
#if not (GLCD_MODEL in (KS0108, S1D10605, S1D13700, SED1520, SSD0323, SSD1306, ST7565R, T6963C))
   #error GLCD_MODEL, "Invalid option. GLCD model not recognized."
#endif
imports GLCD_MODEL
imports GlcdGraphics
----


GLCD Module alias section
Code: Select all
#if GLCD_MODEL = S1D10605
public const Width = S1D10605.Width
public const Height = S1D10605.Height
public Pos           as S1D10605.Pos
public Clear         as S1D10605.Clear
public SetPixel      as S1D10605.SetPixel
public SetContrast   As S1D10605.SetContrast
public WriteByte     as S1D10605.WriteByte
public ReadByte      as S1D10605.ReadByte
public GetPixel      as S1D10605.GetPixel
public Sleep         As S1D10605.Sleep
public StandBy       As S1D10605.StandBy   
#endif


Code: Select all
#if GLCD_MODEL = S1D13700
public const Width = S1D13700.Width
public const Height = S1D13700.Height
public Pos           as S1D13700.Pos
public Clear         as S1D13700.Clear
public SetPixel      As S1D13700.SetPixel
public WriteByte     As S1D13700.WriteByte
public ReadByte      As S1D13700.ReadByte
public GetPixel      As S1D13700.GetPixel
public ShowLayer     As S1D13700.ShowLayer
public SwitchLayer   As S1D13700.SwitchLayer
public Fill          As S1D13700.Fill
public SetImage      As S1D13700.SetImage
public TurnOFF       As S1D13700.TurnOFF
public TurnON        As S1D13700.TurnON
public Sleep         As S1D13700.Sleep
#endif


Code: Select all
#if GLCD_MODEL = SED1520
public const Width = SED1520.Width
public const Height = SED1520.Height
public Pos           as SED1520.Pos
public Clear         as SED1520.Clear
public SetPixel      As SED1520.SetPixel
public WriteByte     As SED1520.WriteByte
public ReadByte      As SED1520.ReadByte
public GetPixel      As SED1520.GetPixel
#endif


Code: Select all
#if GLCD_MODEL = SSD0323
public const Width = SSD0323.Width
public const Height = SSD0323.Height
public Pos           as SSD0323.Pos
public Clear         as SSD0323.Clear
public SetPixel      As SSD0323.SetPixel
public Fill          As SSD0323.Fill
public SetImage      As SSD0323.SetImage
#endif


Code: Select all
#if GLCD_MODEL = SSD1306
public const Width = SSD1306.Width
public const Height = SSD1306.Height
public Pos           as SSD1306.Pos
public Clear         as SSD1306.Clear
public SetPixel      as SSD1306.SetPixel
public WriteByte     as SSD1306.WriteByte
public ReadByte      as SSD1306.ReadByte
public GetPixel      as SSD1306.GetPixel
public InitOLED      as SSD1306.InitOLED
#endif 


Code: Select all
#if GLCD_MODEL = ST7565R
public const Width = ST7565R.Width
public const Height = ST7565R.Height
public Pos           as ST7565R.Pos
public Clear         as ST7565R.Clear
public SetPixel      as ST7565R.SetPixel
public WriteByte     as ST7565R.WriteByte
public ReadByte      as ST7565R.ReadByte
public GetPixel      as ST7565R.GetPixel
public InitLCD       as ST7565R.InitLCD
#endif 


Code: Select all
#if GLCD_MODEL = T6963C
public const Width = T6963C.Width
public const Height = T6963C.Height
public Pos           as T6963C.Pos
public Clear         as T6963C.Cls
public ClearText     as T6963C.ClearText
public ClearGraphic  as T6963C.ClearGraphic
public WriteChr      as T6963C.T6963WriteChar
public WriteString   as T6963C.T6963WriteStr
public GoToXY        as T6963C.GoToXY
public SetPixel      As T6963C.SetPixel
public WriteByte     As T6963C.WriteByte
public ReadByte      As T6963C.ReadByte
#endif
Attachments
GLCD.zip
(23.23 KiB) Downloaded 960 times
User avatar
Coccoliso
 
Posts: 177
Joined: Sat Sep 27, 2014 10:02 am

Return to Code Examples

Who is online

Users browsing this forum: No registered users and 2 guests

cron

x