Datasheet
var T6963C_ctrlfs_Direction : sbit at DDRC.B6;// FS signal direction
var T6963C_ctrlmd_Direction : sbit at DDRC.B5;// 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];
begin
txt1 := ' EINSTEIN WOULD HAVE LIKED mE';
txt := ' GLCD LIBRARY DEMO, WELCOME !';
DDRA := 0x00; // configure PORTA as input
DDB0 := 0; // Set PB0 as input
DDB1 := 0; // Set PB1 as input
DDB2 := 0; // Set PB2 as input
DDB3 := 0; // Set PB3 as input
DDB4 := 0; // Set PB4 as input
T6963C_ctrlce_Direction := 1;
T6963C_ctrlce := 0; // Enable T6963C
T6963C_ctrlfs_Direction := 1;
T6963C_ctrlfs := 0; // Font Select 8x8
T6963C_ctrlmd_Direction := 1;
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
468
MIKROELEKTRONIKA - SOFTWARE AND HARDWARE SOLUTIONS FOR EMBEDDED WORLD
Libraries
mikroPASCAL PRO for AVR
CHAPTER 6