T6963C Graphic Lcd Library

The mikroPascal PRO for PIC32 provides a library for working with Glcds based on TOSHIBA T6963C controller. The Toshiba T6963C is a very popular Lcd controller for the use in small graphics modules. It is capable of controlling displays with a resolution up to 240x128. Because of its low power and small outline it is most suitable for mobile applications such as PDAs, MP3 players or mobile measurement equipment. Although small, this contoller has a capability of displaying and merging text and graphics and it manages all the interfacing signals to the displays Row and Column drivers.

For creating a custom set of Glcd images use Glcd Bitmap Editor Tool.

Important :

When using this library with PIC32 family of MCUs be aware of their voltage incompatibility with certain number of T6963C based Glcd modules. So, additional external power supply for these modules may be required.
ChipEnable(CE), FontSelect(FS) and Reverse(MD) have to be set to appropriate levels by the user outside of the T6963C_Init() function. See the Library Example code at the bottom of this page.
Glcd size based initialization routines can be found in setup library files located in the Uses folder.
The user must make sure that used MCU has appropriate ports and pins. If this is not the case the user should adjust initialization routines.

Some mikroElektronika's adapter boards have pinout different from T6369C datasheets. Appropriate relations between these labels are given in the table below :

Adapter Board	T6369C datasheet
RS	C/D
R/W	/RD
E	/WR

Library Dependency Tree

External dependencies of T6963C Graphic Lcd Library

The following variables must be defined in all projects using T6963C Graphic Lcd library:	Description :	Example :
`var T6963C_dataPort : dword; sfr; atomic; external;`	T6963C Data Port.	`var T6963C_dataPort : word at PORTB;`
`var T6963C_ctrlwr : sbit; sfr; atomic; external;`	Write signal.	`var T6963C_ctrlwr : sbit at LATF2_bit;`
`var T6963C_ctrlrd : sbit; sfr; atomic; external;`	Read signal.	`var T6963C_ctrlrd : sbit at LATF1_bit;`
`var T6963C_ctrlcd : sbit; sfr; atomic; external;`	Command/Data signal.	`var T6963C_ctrlcd : sbit at LATF0_bit;`
`var T6963C_ctrlrst : sbit; sfr; atomic; external;`	Reset signal.	`var T6963C_ctrlrst : sbit at LATF4_bit;`
`var T6963C_ctrlwr_Direction : sbit; sfr; atomic; external;`	Direction of the Write pin.	`var T6963C_ctrlwr_Direction : sbit at TRISF2_bit;`
`var T6963C_ctrlrd_Direction : sbit; sfr; atomic; external;`	Direction of the Read pin.	`var T6963C_ctrlrd_Direction : sbit at TRISF1_bit;`
`var T6963C_ctrlcd_Direction : sbit; sfr; atomic; external;`	Direction of the Command/Data pin.	`var T6963C_ctrlcd_Direction : sbit at TRISF0_bit;`
`var T6963C_ctrlrst_Direction : sbit; sfr; atomic; external;`	Direction of the Reset pin.	`var T6963C_ctrlrst_Direction : sbit at TRISF4_bit;`

Library Routines

T6963C_init
T6963C_writeData
T6963C_writeCommand
T6963C_setPtr
T6963C_Set_Ext_Buffer
T6963C_waitReady
T6963C_fill
T6963C_dot
T6963C_Set_Font_Adv
T6963C_Set_Font_Ext_Adv
T6963C_write_char
T6963C_Write_Char_Adv
T6963C_write_text
T6963C_Write_Text_Adv
T6963C_line
T6963C_rectangle
T6963C_Rectangle_round_edges
T6963C_Rectangle_round_edges_fill
T6963C_box
T6963C_circle
T6963C_Circle_fill
T6963C_image
T6963C_Ext_Image
T6963C_PartialImage
T6963C_Ext_PartialImage
T6963C_sprite
T6963C_set_cursor
T6963C_displayGrPanel
T6963C_displayTxtPanel
T6963C_setGrPanel
T6963C_setTxtPanel
T6963C_panelFill
T6963C_grFill
T6963C_txtFill
T6963C_cursor_height
T6963C_graphics
T6963C_text
T6963C_cursor
T6963C_cursor_blink

T6963C_init

Prototype	procedure T6963C_init(width, height, fntW : word);
Description	Initalizes the Graphic Lcd controller. Display RAM organization: The library cuts the RAM into panels : a complete panel is one graphics panel followed by a text panel (see schematic below). +---------------------+ /\ + GRAPHICS PANEL #0 + \| + + \| + + \| + + \| +---------------------+ \| PANEL 0 + TEXT PANEL #0 + \| + + \/ +---------------------+ /\ + GRAPHICS PANEL #1 + \| + + \| + + \| + + \| +---------------------+ \| PANEL 1 + TEXT PANEL #1 + \| + + \| +---------------------+ \/
Parameters	`width:` width of the Glcd panel `height:` height of the Glcd panel `fntW:` font width
Returns	Nothing.
Requires	Global variables : `T6963C_dataPort:` Data Port `T6963C_ctrlwr:` Write signal pin `T6963C_ctrlrd:` Read signal pin `T6963C_ctrlcd:` Command/Data signal pin `T6963C_ctrlrst:` Reset signal pin `T6963C_ctrlwr_Direction:` Direction of Write signal pin `T6963C_ctrlrd_Direction:` Direction of Read signal pin `T6963C_ctrlcd_Direction:` Direction of Command/Data signal pin `T6963C_ctrlrst_Direction:` Direction of Reset signal pin must be defined before using this function.
Example	// T6963C module connections var T6963C_dataPort : byte at PORTB; // DATA port var T6963C_ctrlwr : sbit at LATF2_bit; // WR write signal var T6963C_ctrlrd : sbit at LATF1_bit; // RD read signal var T6963C_ctrlcd : sbit at LATF0_bit; // CD command/data signal var T6963C_ctrlrst : sbit at LATF4_bit; // RST reset signal var T6963C_ctrlwr_Direction : sbit at TRISF2_bit; // WR write signal direction var T6963C_ctrlrd_Direction : sbit at TRISF1_bit; // RD read signal direction var T6963C_ctrlcd_Direction : sbit at TRISF0_bit; // CD command/data signal direction var T6963C_ctrlrst_Direction : sbit at TRISF4_bit; // RST reset signal direction // Signals not used by library, they are set in main function var T6963C_ctrlce : sbit at LATF3_bit; // CE signal var T6963C_ctrlfs : sbit at LATF6_bit; // FS signal var T6963C_ctrlmd : sbit at LATF5_bit; // MD signal var T6963C_ctrlce_Direction : sbit at TRISF3_bit; // CE signal direction var T6963C_ctrlfs_Direction : sbit at TRISF6_bit; // FS signal direction var T6963C_ctrlmd_Direction : sbit at TRISF5_bit; // MD signal direction // End T6963C module connections ... // init display for 240 pixel width, 128 pixel height and 8 bits character width T6963C_init(240, 128, 8);
Notes	None.

T6963C_writeData

Prototype	procedure T6963C_writeData(mydata : byte);
Description	Writes data to T6963C controller.
Parameters	`mydata:` data to be written
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_writeData(AddrL);
Notes	None.

T6963C_writeCommand

Prototype	procedure T6963C_writeCommand(mydata : byte);
Description	Writes command to T6963C controller.
Parameters	`mydata:` command to be written
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_writeCommand(T6963C_CURSOR_POINTER_SET);
Notes	None.

T6963C_setPtr

Prototype	procedure T6963C_setPtr(p : word; c : byte);
Description	Sets the memory pointer `p` for command `p`.
Parameters	`p:` address where command should be written `c:` command to be written
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_setPtr(T6963C_grHomeAddr + start, T6963C_ADDRESS_POINTER_SET);
Notes	None.

T6963C_Set_Ext_Buffer

Prototype	procedure T6963C_Set_Ext_Buffer(getExtDataPtr : ^TT6963C_Get_Ext_Data_Ptr);
Returns	Nothing.
Description	Function sets pointer to the user function which manipulates the external resource. Parameters : `TT6963C_Get_Ext_Data_Ptr` - pointer to the user function. User function prototype should be in the following format: `function External(offset : dword; count : dword; var num : dword) : ^byte;` Parameters used in the function have the following meaning : `offset` - offset from the beginning of the resource from where the data is requested. `count` - requested number of bytes. `num` - variable for holding the returned number of bytes (less or equal to the number of acquired bytes).
Requires	Glcd module needs to be initialized. See the T6963C_Init routine.
Example	T6963C_Set_Ext_Buffer(@ReadExternalBuffer);

T6963C_waitReady

Prototype	procedure T6963C_waitReady();
Description	Pools the status byte, and loops until Toshiba Glcd module is ready.
Parameters	None.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_waitReady();
Notes	None.

T6963C_fill

Prototype	procedure T6963C_fill(v : byte; start, len : word);
Description	Fills controller memory block with given byte.
Parameters	`v:` byte to be written `start:` starting address of the memory block `len:` length of the memory block in bytes
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_fill(0x33,0x00FF,0x000F);
Notes	None.

T6963C_dot

Prototype	procedure T6963C_dot(x, y : integer; color : byte);
Description	Draws a dot in the current graphic panel of Glcd at coordinates (x, y).
Parameters	`x:` dot position on x-axis `y:` dot position on y-axis `color:` color parameter. Valid values: T6963C_BLACK and T6963C_WHITE
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_dot(x0, y0, pcolor);
Notes	None.

T6963C_Set_Font_Adv

Prototype	procedure T6963C_Set_Font_Adv(const activeFont : ^byte; font_color : word; font_orientation : byte);
Description	Sets font that will be used with T6963C_Write_Char_Adv and T6963C_Write_Text_Adv routines.
Parameters	`activeFont:` font to be set. Needs to be formatted as an array of char. `font_color:` sets font color. `font_orientation:` sets font orientation.
Returns	Nothing.
Requires	Glcd needs to be initialized, see T6963C_Init routine.
Example	T6963C_Set_Font_Adv(@myfont, 0, 0);
Notes	None.

T6963C_Set_Ext_Font_Adv

Prototype	procedure T6963C_Set_Ext_Font_Adv(activeFont : dword; font_color : word; font_orientation : word);
Description	Sets font that will be used with T6963C_Write_Char_Adv and T6963C_Write_Text_Adv routines. Font is located in an external resource.
Parameters	`activeFont:` font to be set. This parameter represents the address in the exteral resource from where the font data begins. `font_color:` sets font color. `font_orientation:` sets font orientation.
Returns	Nothing.
Requires	Glcd needs to be initialized, see T6963C_Init routine.
Example	T6963C_Set_Ext_Font_Adv(173296, 0, 0);
Notes	None.

T6963C_write_char

Prototype	procedure T6963C_write_char(c, x, y, mode : byte);
Description	Writes a char in the current text panel of Glcd at coordinates (x, y).
Parameters	`c:` char to be written `x:` char position on x-axis `y:` char position on y-axis `mode:` mode parameter. Valid values: T6963C_ROM_MODE_OR, T6963C_ROM_MODE_XOR, T6963C_ROM_MODE_AND and T6963C_ROM_MODE_TEXT Mode parameter explanation: OR Mode: In the OR-Mode, text and graphics can be displayed and the data is logically "OR-ed". This is the most common way of combining text and graphics for example labels on buttons. XOR-Mode: In this mode, the text and graphics data are combined via the logical "exclusive OR". This can be useful to display text in the negative mode, i.e. white text on black background. AND-Mode: The text and graphic data shown on display are combined via the logical "AND function". TEXT-Mode: This option is only available when displaying just a text. The Text Attribute values are stored in the graphic area of display memory. For more details see the T6963C datasheet.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_write_char('A',22,23,T6963C_ROM_MODE_AND);
Notes	None.

T6963C_write_char_adv

Prototype	procedure T6963C_Write_Char_Adv(ch, x, y : word);
Description	Writes a char in the current text panel of Glcd at coordinates (x, y).
Parameters	`c:` char to be written `x:` char position on x-axis `y:` char position on y-axis
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_write_char_adv('A',22,23);
Notes	None.

T6963C_write_text

Prototype	procedure T6963C_write_text(var str : string; x, y, mode : byte);
Description	Writes text in the current text panel of Glcd at coordinates (x, y).
Parameters	`str:` text to be written `x:` text position on x-axis `y:` text position on y-axis `mode:` mode parameter. Valid values: T6963C_ROM_MODE_OR, T6963C_ROM_MODE_XOR, T6963C_ROM_MODE_AND and T6963C_ROM_MODE_TEXT Mode parameter explanation: OR Mode: In the OR-Mode, text and graphics can be displayed and the data is logically "OR-ed". This is the most common way of combining text and graphics for example labels on buttons. XOR-Mode: In this mode, the text and graphics data are combined via the logical "exclusive OR". This can be useful to display text in the negative mode, i.e. white text on black background. AND-Mode: The text and graphic data shown on display are combined via the logical "AND function". TEXT-Mode: This option is only available when displaying just a text. The Text Attribute values are stored in the graphic area of display memory. For more details see the T6963C datasheet.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_write_text('GLCD LIBRARY DEMO, WELCOME !', 0, 0, T6963C_ROM_MODE_XOR);
Notes	None.

T6963C_Write_Text_Adv

Prototype	procedure T6963C_Write_Text_Adv(var text : string; x, y : word);
Description	Writes text in the current text panel of Glcd at coordinates (x, y).
Parameters	`str:` text to be written `x:` text position on x-axis `y:` text position on y-axis
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_Write_Text_Adv("Glcd LIBRARY DEMO, WELCOME !", 0, 0);
Notes	None.

T6963C_line

Prototype	procedure T6963C_line(x0, y0, x1, y1 : integer; pcolor : byte);
Description	Draws a line from (x0, y0) to (x1, y1).
Parameters	`x0:` x coordinate of the line start `y0:` y coordinate of the line end `x1:` x coordinate of the line start `y1:` y coordinate of the line end `pcolor:` color parameter. Valid values: T6963C_BLACK and T6963C_WHITE
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_line(0, 0, 239, 127, T6963C_WHITE);
Notes	None.

T6963C_rectangle

Prototype	procedure T6963C_rectangle(x0, y0, x1, y1 : integer; pcolor : byte);
Description	Draws a rectangle on Glcd.
Parameters	`x0:` x coordinate of the upper left rectangle corner `y0:` y coordinate of the upper left rectangle corner `x1:` x coordinate of the lower right rectangle corner `y1:` y coordinate of the lower right rectangle corner `pcolor:` color parameter. Valid values: T6963C_BLACK and T6963C_WHITE
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_rectangle(20, 20, 219, 107, T6963C_WHITE);
Notes	None.

T6963C_rectangle_round_edges

Prototype	procedure T6963C_rectangle_round_edges(x0, y0, x1, y1, radius : integer; pcolor : byte);
Description	Draws a rounded edge rectangle on Glcd.
Parameters	`x0:` x coordinate of the upper left rectangle corner `y0:` y coordinate of the upper left rectangle corner `x1:` x coordinate of the lower right rectangle corner `y1:` y coordinate of the lower right rectangle corner `round_radius:` radius of the rounded edge. `pcolor:` color parameter. Valid values: `T6963C_BLACK` and `T6963C_WHITE`
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_Init routine.
Example	T6963C_rectangle_round_edges(20, 20, 219, 107, 12, T6963C_WHITE);
Notes	None.

T6963C_rectangle_round_edges_fill

Prototype	procedure T6963C_rectangle_round_edges_fill(x0, y0, x1, y1, radius : integer; pcolor : byte);
Description	Draws a filled rounded edge rectangle on Glcd.
Parameters	`x0:` x coordinate of the upper left rectangle corner `y0:` y coordinate of the upper left rectangle corner `x1:` x coordinate of the lower right rectangle corner `y1:` y coordinate of the lower right rectangle corner `round_radius:` radius of the rounded edge `pcolor:` color parameter. Valid values: `T6963C_BLACK` and `T6963C_WHITE`
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_Init routine.
Example	T6963C_rectangle_round_edges_fill(20, 20, 219, 107, 12, T6963C_WHITE);
Notes	None.

T6963C_box

Prototype	procedure T6963C_box(x0, y0, x1, y1 : integer; pcolor : byte);
Description	Draws a box on the Glcd
Parameters	`x0:` x coordinate of the upper left box corner `y0:` y coordinate of the upper left box corner `x1:` x coordinate of the lower right box corner `y1:` y coordinate of the lower right box corner `pcolor:` color parameter. Valid values: T6963C_BLACK and T6963C_WHITE
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_box(0, 119, 239, 127, T6963C_WHITE);
Notes	None.

T6963C_circle

Prototype	procedure T6963C_circle(x, y : integer; r : longint; pcolor : word);
Description	Draws a circle on the Glcd.
Parameters	`x:` x coordinate of the circle center `y:` y coordinate of the circle center `r:` radius size `pcolor:` color parameter. Valid values: T6963C_BLACK and T6963C_WHITE
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_circle(120, 64, 110, T6963C_WHITE);
Notes	None.

T6963C_Circle_fill

Prototype	procedure T6963C_Circle_fill(x, y : integer; r : longint; pcolor : word);
Description	Draws a filled circle on the Glcd.
Parameters	`x:` x coordinate of the circle center `y:` y coordinate of the circle center `r:` radius size `pcolor:` color parameter. Valid values: `T6963C_BLACK` and `T6963C_WHITE`
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_Init routine.
Example	T6963C_Circle_fill(120, 64, 110, T6963C_WHITE);
Notes	None.

T6963C_image

Prototype	procedure T6963C_image(const pic : ^byte);
Description	Displays bitmap on Glcd.
Parameters	`pic:` image to be displayed. Bitmap array can be located in both code and RAM memory (due to the mikroPascal PRO for PIC32 pointer to const and pointer to RAM equivalency).
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_image(@my_image);
Notes	Image dimension must match the display dimension. Use the integrated Glcd Bitmap Editor (menu option Tools › Glcd Bitmap Editor) to convert image to a constant array suitable for displaying on Glcd.

T6963C_Ext_Image

Prototype	procedure T6963C_Ext_Image(image : dword);
Description	Displays a bitmap from an external resource.
Parameters	`pic:` image to be displayed. This parameter represents the address in the exteral resource from where the image data begins.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_Ext_image(153608);
Notes	Image dimension must match the display dimension. Use the integrated Glcd Bitmap Editor (menu option Tools › Glcd Bitmap Editor) to convert image to a constant array suitable for displaying on Glcd.

T6963C_PartialImage

Prototype	procedure T6963C_PartialImage(x_left, y_top, width, height, picture_width, picture_height : word; const image : ^byte);
Description	Displays a partial area of the image on a desired location.
Parameters	`x_left:` x coordinate of the desired location (upper left coordinate). `y_top:` y coordinate of the desired location (upper left coordinate). `width:` desired image width. `height:` desired image height. `picture_width:` width of the original image. `picture_height:` height of the original image. `image:` image to be displayed. Bitmap array can be located in both code and RAM memory (due to the mikroPascal PRO for PIC pointer to const and pointer to RAM equivalency).
Description	Displays a partial area of the image on a desired location.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See T6963C_init routine.
Example	// Draws a 10x15 part of the image starting from the upper left corner on the coordinate (10,12). Original image size is 16x32. T6963C_PartialImage(10, 12, 10, 15, 16, 32, @image);
Notes	Image dimension must match the display dimension. Use the integrated Glcd Bitmap Editor (menu option Tools › Glcd Bitmap Editor) to convert image to a constant array suitable for displaying on Glcd.

T6963C_Ext_PartialImage

Prototype	procedure T6963C_Ext_PartialImage(x_left, y_top, width, height, picture_width, picture_height : word; image : dword);
Description	Displays a partial area of the image (from an external resource) on a desired location.
Parameters	`x_left:` x coordinate of the desired location (upper left coordinate). `y_top:` y coordinate of the desired location (upper left coordinate). `width:` desired image width. `height:` desired image height. `picture_width:` width of the original image. `picture_height:` height of the original image. `image:` image to be displayed. This parameter represents the address in the exteral resource from where the image data begins.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See T6963C_init routine.
Example	T6963C_Ext_PartialImage(10, 12, 10, 15, 16, 32, 0);
Notes	Image dimension must match the display dimension. Use the integrated Glcd Bitmap Editor (menu option Tools › Glcd Bitmap Editor) to convert image to a constant array suitable for displaying on Glcd.

T6963C_sprite

Prototype	procedure T6963C_sprite(px, py : byte; const pic : ^byte; sx, sy : byte);
Description	Fills graphic rectangle area (px, py) to (px+sx, py+sy) with custom size picture.
Parameters	`px:` x coordinate of the upper left picture corner. Valid values: multiples of the font width `py:` y coordinate of the upper left picture corner `pic:` picture to be displayed `sx:` picture width. Valid values: multiples of the font width `sy:` picture height
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_sprite(76, 4, einstein, 88, 119); // draw a sprite
Notes	If `px` and `sx` parameters are not multiples of the font width they will be scaled to the nearest lower number that is a multiple of the font width.

T6963C_set_cursor

Prototype	procedure T6963C_set_cursor(x, y : byte);
Description	Sets cursor to row x and column y.
Parameters	`x:` cursor position row number `y:` cursor position column number
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_set_cursor(cposx, cposy);
Notes	None.

T6963C_displayGrPanel

Prototype	procedure T6963C_displayGrPanel(n : word);
Description	Display selected graphic panel.
Parameters	`n:` graphic panel number. Valid values: `0` and `1`.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// display graphic panel 1 T6963C_displayGrPanel(1);
Notes	None.

T6963C_displayTxtPanel

Prototype	procedure T6963C_displayTxtPanel(n : word);
Description	Display selected text panel.
Parameters	`n:` text panel number. Valid values: `0` and `1`.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// display text panel 1 T6963C_displayTxtPanel(1);
Notes	None.

T6963C_setGrPanel

Prototype	procedure T6963C_setGrPanel(n : word);
Description	Compute start address for selected graphic panel and set appropriate internal pointers. All subsequent graphic operations will be preformed at this graphic panel.
Parameters	`n:` graphic panel number. Valid values: `0` and `1`.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// set graphic panel 1 as current graphic panel. T6963C_setGrPanel(1);
Notes	None.

T6963C_setTxtPanel

Prototype	procedure T6963C_setTxtPanel(n : word);
Description	Compute start address for selected text panel and set appropriate internal pointers. All subsequent text operations will be preformed at this text panel.
Parameters	`n:` text panel number. Valid values: `0` and `1`.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// set text panel 1 as current text panel. T6963C_setTxtPanel(1);
Notes	None.

T6963C_panelFill

Prototype	procedure T6963C_panelFill(v : word);
Description	Fill current panel in full (graphic+text) with appropriate value (0 to clear).
Parameters	`v:` value to fill panel with.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	clear current panel T6963C_panelFill(0);
Notes	None.

T6963C_grFill

Prototype	procedure T6963C_grFill(v: word);
Description	Fill current graphic panel with appropriate value (0 to clear).
Parameters	`v:` value to fill graphic panel with.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// clear current graphic panel T6963C_grFill(0);
Notes	None.

T6963C_txtFill

Prototype	procedure T6963C_txtFill(v : word);
Description	Fill current text panel with appropriate value (0 to clear).
Parameters	`v:` this value increased by 32 will be used to fill text panel.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// clear current text panel T6963C_txtFill(0);
Notes	None.

T6963C_cursor_height

Prototype	procedure T6963C_cursor_height(n: word);
Description	Set cursor size.
Parameters	`n:` cursor height. Valid values: `0`..`7`.
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	T6963C_cursor_height(7);
Notes	None.

T6963C_graphics

Prototype	procedure T6963C_graphics(n : word);
Description	Enable/disable graphic displaying.
Parameters	`n:` graphic enable/disable parameter. Valid values: `0` (disable graphic dispaying) and `1` (enable graphic displaying).
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// enable graphic displaying T6963C_graphics(1);
Notes	None.

T6963C_text

Prototype	procedure T6963C_text(n : word);
Description	Enable/disable text displaying.
Parameters	`n:` on/off parameter. Valid values: `0` (disable text displaying) and `1` (enable text displaying).
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// enable text displaying T6963C_text(1);
Notes	None.

T6963C_cursor

Prototype	procedure T6963C_cursor(n : word);
Description	Set cursor on/off.
Parameters	`n:` on/off parameter. Valid values: `0` (set cursor off) and `1` (set cursor on).
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// set cursor on T6963C_cursor(1);
Notes	None.

T6963C_cursor_blink

Prototype	procedure T6963C_cursor_blink(n : word);
Description	Enable/disable cursor blinking.
Parameters	`n:` cursor blinking enable/disable parameter. Valid values: `0` (disable cursor blinking) and `1` (enable cursor blinking).
Returns	Nothing.
Requires	Toshiba Glcd module needs to be initialized. See the T6963C_init routine.
Example	// enable cursor blinking T6963C_cursor_blink(1);
Notes	None.

Library Example

The following drawing demo tests advanced routines of the T6963C Glcd library. Hardware configurations in this example are made for the LV-32MX v6 board and PIC32MX460F512L.

Copy Code To Clipboard

program T6963C_240x128;

uses __Lib_T6963C_Consts;

// T6963C module connections
var T6963C_dataPort : byte at PORTD;                      // DATA port
var T6963C_cntlPort : byte at PORTE;                      // DATA port

var T6963C_ctrlwr  : sbit at LATE2_bit;                   // WR write signal
var T6963C_ctrlrd  : sbit at LATE1_bit;                   // RD read signal
var T6963C_ctrlcd  : sbit at LATE0_bit;                   // CD command/data signal
var T6963C_ctrlrst : sbit at LATE4_bit;                   // RST reset signal
var T6963C_ctrlwr_Direction  : sbit at TRISE2_bit;        // WR write signal direction
var T6963C_ctrlrd_Direction  : sbit at TRISE1_bit;        // RD read signal direction
var T6963C_ctrlcd_Direction  : sbit at TRISE0_bit;        // CD command/data signal direction
var T6963C_ctrlrst_Direction : sbit at TRISE4_bit;        // RST reset signal direction

// Signals not used by library, they are set in main function
var T6963C_ctrlce : sbit at LATE3_bit;                    // CE signal
var T6963C_ctrlfs : sbit at LATE6_bit;                    // FS signal
var T6963C_ctrlmd : sbit at LATE5_bit;                    // MD signal
var T6963C_ctrlce_Direction : sbit at TRISE3_bit;         // CE signal direction
var T6963C_ctrlfs_Direction : sbit at TRISE6_bit;         // FS signal direction
var T6963C_ctrlmd_Direction : sbit at TRISE5_bit;         // MD signal direction
// End T6963C module connections

var   panel : byte;         // current panel
          i : word;         // general purpose register
      curs  : byte;         // cursor visibility
      cposx,
      cposy : word;         // cursor x-y position
      txtcols : byte;       // number of text coloms
      txt, txt1 : string[29];
      txt2 : string[21];

begin
  {$DEFINE LINE_DEMO}           // Uncomment to demonstrate line drawing routines
  {$DEFINE FILL_DEMO}           // Uncomment to demonstrate fill routines
  {$DEFINE PARTIAL_IMAGE_DEMO}  // Uncomment to demonstrate partial image routine

  txt1 := ' EINSTEIN WOULD HAVE LIKED mE';
  txt  := ' GLCD LIBRARY DEMO, WELCOME !';
  txt2 := ' Partial image demo! ';

  CHECON := 0x32;
  AD1PCFG := 0xFFFF;

  TRISB8_bit := 1;              // Set RB8 as input
  TRISB9_bit := 1;              // Set RB9 as input
  TRISB10_bit := 1;             // Set RB10 as input
  TRISB11_bit := 1;             // Set RB11 as input
  TRISB12_bit := 1;             // Set RB12 as input
  TRISB13_bit := 1;             // Set RB13 as input

  T6963C_ctrlce_Direction := 0;
  T6963C_ctrlce := 0;             // Enable T6963C
  T6963C_ctrlfs_Direction := 0;
  T6963C_ctrlfs := 0;             // Font Select 8x8
  T6963C_ctrlmd_Direction := 0;
  T6963C_ctrlmd := 0;             // Column number select

  panel := 0;
  i := 0;
  curs := 0;
  cposx := 0;
  cposy := 0;

  // Initialize T6369C
  T6963C_init(240, 128, 8);

  {*
   * Enable both graphics and text display at the same time
   *}
  T6963C_graphics(1);
  T6963C_text(1);

  {*
   * Text messages
   *}
  T6963C_write_text(txt, 0, 0, T6963C_ROM_MODE_XOR);
  T6963C_write_text(txt1, 0, 15, T6963C_ROM_MODE_XOR);

  {*
   * Cursor
   *}
  T6963C_cursor_height(8);       // 8 pixel height
  T6963C_set_cursor(0, 0);       // Move cursor to top left
  T6963C_cursor(0);              // Cursor off

  {*
   * Draw solid boxes
   *}
  T6963C_box(0, 0, 239, 8, T6963C_WHITE);
  T6963C_box(0, 119, 239, 127, T6963C_WHITE);

  {*
   * Draw rectangles
   *}
  {$IFDEF LINE_DEMO}
    T6963C_rectangle(0, 0, 239, 127, T6963C_WHITE);
    T6963C_rectangle(20, 20, 219, 107, T6963C_WHITE);
    T6963C_rectangle(40, 40, 199, 87, T6963C_WHITE);
    T6963C_rectangle(60, 60, 179, 67, T6963C_WHITE);
  {$ENDIF}

  {*
   * Draw rounded edge rectangle
   *}
  {$IFDEF LINE_DEMO}
    T6963C_Rectangle_Round_Edges(10, 10, 229, 117, 12, T6963C_WHITE);
    T6963C_Rectangle_Round_Edges(30, 30, 209, 97, 12, T6963C_WHITE);
    T6963C_Rectangle_Round_Edges(50, 50, 189, 77, 12, T6963C_WHITE);
  {$ENDIF}

  {*
   * Draw filled rounded edge rectangle
   *}
  {$IFDEF FILL_DEMO}
    T6963C_Rectangle_Round_Edges_Fill(10, 10, 229, 117, 12, T6963C_WHITE);
    T6963C_Rectangle_Round_Edges_Fill(20, 20, 219, 107, 12, T6963C_BLACK);
    T6963C_Rectangle_Round_Edges_Fill(30, 30, 209, 97, 12, T6963C_WHITE);
    T6963C_Rectangle_Round_Edges_Fill(40, 40, 199, 87, 12, T6963C_BLACK);
    T6963C_Rectangle_Round_Edges_Fill(50, 50, 189, 77, 12, T6963C_WHITE);
  {$ENDIF}

  {*
   * Draw a cross
   *}
  {$IFDEF LINE_DEMO}
    T6963C_line(0, 0, 239, 127, T6963C_WHITE);
    T6963C_line(0, 127, 239, 0, T6963C_WHITE);
  {$ENDIF}
  
  {*
   * Draw circles
   *}
  {$IFDEF LINE_DEMO}
    T6963C_circle(120, 64, 10, T6963C_WHITE);
    T6963C_circle(120, 64, 30, T6963C_WHITE);
    T6963C_circle(120, 64, 50, T6963C_WHITE);
    T6963C_circle(120, 64, 70, T6963C_WHITE);
    T6963C_circle(120, 64, 90, T6963C_WHITE);
    T6963C_circle(120, 64, 110, T6963C_WHITE);
    T6963C_circle(120, 64, 130, T6963C_WHITE);
   {$ENDIF}

  {*
   * Draw filled circles
   *}
  {$IFDEF FILL_DEMO}
    T6963C_circle_fill(120, 64, 60, T6963C_WHITE);
    T6963C_circle_fill(120, 64, 55, T6963C_BLACK);
    T6963C_circle_fill(120, 64, 50, T6963C_WHITE);
    T6963C_circle_fill(120, 64, 45, T6963C_BLACK);
    T6963C_circle_fill(120, 64, 40, T6963C_WHITE);
    T6963C_circle_fill(120, 64, 35, T6963C_BLACK);
    T6963C_circle_fill(120, 64, 30, T6963C_WHITE);
    T6963C_circle_fill(120, 64, 25, T6963C_BLACK);
    T6963C_circle_fill(120, 64, 20, T6963C_WHITE);
    T6963C_circle_fill(120, 64, 15, T6963C_BLACK);
    T6963C_circle_fill(120, 64, 10, T6963C_WHITE);
    T6963C_circle_fill(120, 64, 5, T6963C_BLACK);
  {$ENDIF}

  Delay_ms(1000);
  T6963C_sprite(76, 4, @einstein, 88, 119);      // Draw a sprite
  Delay_ms(1000);

  T6963C_setGrPanel(1);                          // Select other graphic panel

  T6963C_image(@mikroE_240x128_bmp);
  T6963C_displayGrPanel(1);
  Delay_ms(1000);
  {$IFDEF PARTIAL_IMAGE_DEMO}
    T6963C_grFill(0);
    T6963C_PartialImage(0, 0, 64, 64, 240, 128, @mikroE_240x128_bmp);  // Display partial image
    Delay_ms(1000);
  T6963C_graphics(0);
  {$ENDIF}
  T6963C_image(@mikroE_240x128_bmp);
  T6963C_graphics(1);
  T6963C_displayGrPanel(0);

  while (TRUE) do                                // Endless loop
    begin

      {*
       * If RB8 is pressed, toggle the display between graphic panel 0 and graphic 1
       *}
      if(RB8_bit <> 0) then
        begin
          Inc(panel) ;
          panel := panel and 1;
          T6963C_setPtr((T6963C_grMemSize + T6963C_txtMemSize) * panel, T6963C_GRAPHIC_HOME_ADDRESS_SET) ;
          Delay_ms(300) ;
        end

      {*
       * If RB9 is pressed, display only graphic panel
       *}
      else
        if (RB9_bit <> 0) then
          begin
            T6963C_graphics(1) ;
            T6963C_text(0) ;
            Delay_ms(300) ;
          end

      {*
       * If RB10 is pressed, display only text panel
       *}
        else
          if (RB10_bit <> 0) then
            begin
              T6963C_graphics(0);
              T6963C_text(1);
              Delay_ms(300);
            end

      {*
       * If RB11 is pressed, display text and graphic panels
       *}
          else
            if (RB11_bit <> 0) then
              begin
                T6963C_graphics(1);
                T6963C_text(1);
                Delay_ms(300);
              end

      {*
       * If RB12 is pressed, change cursor
       *}
            else
              if(RB12_bit <> 0) then
                begin
                  Inc(curs);
                  if (curs = 3) then
                    curs := 0;
                  case curs of
                    0:
                       // no cursor
                       T6963C_cursor(0);

                    1: begin
                         // blinking cursor
                         T6963C_cursor(1);
                         T6963C_cursor_blink(1);
                       end;
                    2: begin
                         // non blinking cursor
                         T6963C_cursor(1);
                         T6963C_cursor_blink(0);
                       end;
                  end;
                  Delay_ms(300);
                end

      {*
       * If RB13 is pressed, perform the "Partial image" demonstration
       *}
      else
        {$IFDEF PARTIAL_IMAGE_DEMO}
         if( RB13_bit = 1) then
           begin
             T6963C_setGrPanel(0);
             T6963C_setTxtPanel(0);
             T6963C_txtFill(0);
             T6963C_setGrPanel(1);
             T6963C_setTxtPanel(0);
             T6963C_graphics(1);
             T6963C_text(1);
             T6963C_displayGrPanel(1);
             T6963C_write_text(txt2, 5, 15, T6963C_ROM_MODE_XOR);
             Delay_1sec();

             T6963C_grFill(0);
             T6963C_PartialImage(0, 0, 64, 64, 240, 128, @mikroE_240x128_bmp);
             Delay_ms(1500);

             T6963C_PartialImage(0, 0, 128, 128, 240, 128, @mikroE_240x128_bmp);
             Delay_ms(1500);

             T6963C_PartialImage(0, 0, 240, 128, 240, 128, @mikroE_240x128_bmp);
             Delay_ms(1500);

             T6963C_txtFill(0);
             T6963C_write_text(txt, 0, 0, T6963C_ROM_MODE_XOR);
             T6963C_write_text(txt1, 0, 15, T6963C_ROM_MODE_XOR);
           end;
        {$ENDIF}
      {*
       * Move cursor, even if not visible
       *}
      Inc(cposx);
      if (cposx = T6963C_txtCols) then
        begin
          cposx := 0;
          Inc(cposy);
          if (cposy = T6963C_grHeight div T6963C_CHARACTER_HEIGHT) then
            cposy := 0;
        end;
      T6963C_set_cursor(cposx, cposy);

      Delay_ms(100);
    end;
end.

HW Connection

T6963C Glcd HW connection

Want more examples and libraries?
Find them on