Datasheet

{*
* Draw a cross
*}
T6963C_line(0, 0, 239, 127, T6963C_WHITE)
T6963C_line(0, 127, 239, 0, T6963C_WHITE)
{*
* Draw solid boxes
*}
T6963C_box(0, 0, 239, 8, T6963C_WHITE)
T6963C_box(0, 119, 239, 127, T6963C_WHITE)
'while true do nop
{*
* Draw circles
*}
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)
T6963C_sprite(76, 4, @einstein, 88, 119) ' Draw a sprite
T6963C_setGrPanel(1) ' Select other graphic panel
T6963C_image(@mikroe)
while TRUE ' Endless loop
'*
'* If PORTA_0 is pressed, toggle the display between graphic
panel 0 and graphic 1
'*
if( PINA0_bit = 0) then
Inc(panel)
panel = panel and 1
T6963C_setPtr((T6963C_grMemSize + T6963C_txtMemSize) * panel,
T6963C_GRAPHIC_HOME_ADDRESS_SET)
Delay_ms(300)
'*
'* If PORTA_1 is pressed, display only graphic panel
'*
else
if ( PINA1_bit = 0) then
T6963C_graphics(1)
T6963C_text(0)
Delay_ms(300)
461
MIKROELEKTRONIKA - SOFTWARE AND HARDWARE SOLUTIONS FOR EMBEDDED WORLD
Libraries
mikroBasic PRO for AVR
CHAPTER 6