Mikroelektronika MIKROE-742 데이터 시트

This example demonstrates how to communicate Lcd in 8-bit mode via the SPI mod-
ule, using serial to parallel convertor MCP23S17.

program SPI_Lcd8_Test;

var text : array[16] of char;

// Port Expander module connections
var SPExpanderRST : sbit at PORTB.B0;

SPExpanderCS  : 

sbit at PORTB.B1;

SPExpanderRST_Direction : 

sbit at DDRB.B0;

SPExpanderCS_Direction  : 

sbit at DDRB.B1;

// End Port Expander module connections

text := 'mikroE';

// If Port Expander Library uses SPI1 module

SPI1_Init();                               // Initialize SPI mod-

ule used with PortExpander

Spi_Rd_Ptr := @SPI1_Read;                  // Pass pointer to SPI

Read function of used SPI module

// // If Port Expander Library uses SPI2 module

// SPI2_Init();                            // Initialize SPI mod-

ule used with PortExpander

// Spi_Rd_Ptr = @SPI2_Read;                // Pass pointer to SPI

Read function of used SPI module

SPI_Lcd8_Config(0);                      // Intialize Lcd in 8bit

mode via SPI

SPI_Lcd8_Cmd(LCD_CLEAR);                // Clear display

SPI_Lcd8_Cmd(LCD_CURSOR_OFF);           // Turn cursor off

SPI_Lcd8_Out(1,6, text);                // Print text to Lcd, 1st

row, 6th column...

SPI_Lcd8_Chr_CP('!');                  // Append '!'

SPI_Lcd8_Out(2,1, 'mikroelektronika');  // Print text to Lcd, 2nd

row, 1st column...

SPI_Lcd8_Out(3,1, text); // For Lcd modules with more than two rows

SPI_Lcd8_Out(4,15, text)// For Lcd modules with more than two rows

427

- SOFTWARE AND HARDWARE SOLUTIONS FOR EMBEDDED WORLD

CHAPTER 6