- 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