User manual

mikroPascal PRO for PIC32
MikroElektronika
495
SPI_T6963C_image(@mikroE_240x128_bmp);
SPI_T6963C_displayGrPanel(1);
Delay_ms(1000);
{$IFDEF PARTIAL_IMAGE_DEMO}
SPI_T6963C_grFill(0);
SPI_T6963C_PartialImage(0, 0, 64, 64, 240, 128, @mikroE_240x128_bmp); // Display
partial image
Delay_ms(1000);
SPI_T6963C_graphics(0);
{$ENDIF}
SPI_T6963C_image(@mikroE_240x128_bmp);
SPI_T6963C_graphics(1);
SPI_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;
SPI_T6963C_setPtr((SPI_T6963C_grMemSize + SPI_T6963C_txtMemSize) * panel,
SPI_T6963C_GRAPHIC_HOME_ADDRESS_SET) ;
Delay_ms(300);
end
{*
* If RB9 is pressed, display only graphic panel
*}
else
if (RB9_bit <> 0) then
begin
SPI_T6963C_graphics(1) ;
SPI_T6963C_text(0) ;
Delay_ms(300);
end
{*
* If RB10 is pressed, display only text panel
*}
else
if (RB10_bit <> 0) then
begin
SPI_T6963C_graphics(0);
SPI_T6963C_text(1);
Delay_ms(300);
end
{*
* If RB11 is pressed, display text and graphic panels
*}