Port Expander Library
The mikroBasic PRO for PIC provides a library for communication with the Microchip’s Port Expander MCP23S17 via SPI interface. Connections of the PIC compliant MCU and MCP23S17 is given on the schematic at the bottom of this page.

- The library uses the SPI module for communication. User must initialize the appropriate SPI module before using the Port Expander Library.
- Library does not use Port Expander interrupts.
Library Dependency Tree

External dependencies of Port Expander Library
The following variables must be defined in all projects using Port Expander Library: | Description : | Example : |
---|---|---|
dim SPExpanderRST as sbit sfr external |
Reset line. | dim SPExpanderRST as sbit at RC0_bit |
dim SPExpanderCS as sbit sfr external |
Chip Select line. | dim SPExpanderCS as sbit at RC1_bit |
dim SPExpanderRST_Direction as sbit sfr external |
Direction of the Reset pin. | dim SPExpanderRST_Direction as sbit at TRISC0_bit |
dim SPExpanderCS_Direction as sbit sfr external |
Direction of the Chip Select pin. | dim SPExpanderCS_Direction as sbit at TRISC1_bit |
Library Routines
- Expander_Init
- Expander_Init_Advanced
- Expander_Read_Byte
- Expander_Write_Byte
- Expander_Read_PortA
- Expander_Read_PortB
- Expander_Read_PortAB
- Expander_Write_PortA
- Expander_Write_PortB
- Expander_Write_PortAB
- Expander_Set_DirectionPortA
- Expander_Set_DirectionPortB
- Expander_Set_DirectionPortAB
- Expander_Set_PullUpsPortA
- Expander_Set_PullUpsPortB
- Expander_Set_PullUpsPortAB
Expander_Init
Prototype |
sub procedure Expander_Init(dim ModuleAddress as byte) |
---|---|
Returns |
Nothing. |
Description |
Initializes Port Expander using SPI communication. Port Expander module settings :
Parameters :
|
Requires |
Global variables :
|
Example |
' Port Expander module connections dim SPExpanderCS as sbit at RC0_bit SPExpanderRST as sbit at RC1_bit SPExpanderCS_Direction as sbit at TRISC0_bit SPExpanderRST_Direction as sbit at TRISC1_bit ' End Port Expander module connections ... SPI1_Init() ' initialize SPI module Expander_Init(0) ' initialize Port Expander |
Expander_Init_Advanced
Prototype |
sub procedure Expander_Init_Advanced(dim byref rstPort as byte, dim rstPin, haen as byte) |
---|---|
Returns |
Nothing. |
Description |
Initializes Port Expander using SPI communication. Parameters :
|
Requires |
|
Example |
' Port Expander module connections dim SPExpanderCS as sbit at RC0_bit SPExpanderRST as sbit at RC1_bit SPExpanderCS_Direction as sbit at TRISC0_bit SPExpanderRST_Direction as sbit at TRISC1_bit ' End Port Expander module connections ... SPI1_Init() ' initialize SPI module Expander_Init_Advanced(PORTC, 0, 0) ' initialize Port Expander |
Expander_Read_Byte
Prototype |
sub function Expander_Read_Byte(dim ModuleAddress as byte, dim RegAddress as byte) as byte |
---|---|
Returns |
Byte read. |
Description |
The function reads byte from Port Expander. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Read a byte from Port Expander's register dim read_data as byte ... read_data = Expander_Read_Byte(0,1) |
Expander_Write_Byte
Prototype |
sub procedure Expander_Write_Byte(dim ModuleAddress as byte, dim RegAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
Routine writes a byte to Port Expander. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Write a byte to the Port Expander's register Expander_Write_Byte(0,1,0xFF) |
Expander_Read_PortA
Prototype |
sub function Expander_Read_PortA(dim ModuleAddress as byte) as byte |
---|---|
Returns |
Byte read. |
Description |
The function reads byte from Port Expander's PortA. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. Port Expander's PortA should be configured as input. See Expander_Set_DirectionPortA and Expander_Set_DirectionPortAB routines. |
Example |
' Read a byte from Port Expander's PORTA dim read_data as byte ... Expander_Set_DirectionPortA(0,0xFF) ' set expander's porta to be input ... read_data = Expander_Read_PortA(0) |
Expander_Read_PortB
Prototype |
sub function Expander_Read_PortB(dim ModuleAddress as byte) as byte |
---|---|
Returns |
Byte read. |
Description |
The function reads byte from Port Expander's PortB. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. Port Expander's PortB should be configured as input. See Expander_Set_DirectionPortB and Expander_Set_DirectionPortAB routines. |
Example |
' Read a byte from Port Expander's PORTB dim read_data as byte ... Expander_Set_DirectionPortB(0,0xFF) ' set expander's portb to be input ... read_data = Expander_Read_PortB(0) |
Expander_Read_PortAB
Prototype |
sub function Expander_Read_PortAB(dim ModuleAddress as byte) as word |
---|---|
Returns |
Word read. |
Description |
The function reads word from Port Expander's ports. PortA readings are in the higher byte of the result. PortB readings are in the lower byte of the result. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. Port Expander's PortA and PortB should be configured as inputs. See Expander_Set_DirectionPortA, Expander_Set_DirectionPortB and Expander_Set_DirectionPortAB routines. |
Example |
' Read a byte from Port Expander's PORTA and PORTB dim read_data as word ... Expander_Set_DirectionPortAB(0,0xFFFF) ' set expander's porta and portb to be input ... read_data = Expander_Read_PortAB(0) |
Expander_Write_PortA
Prototype |
sub procedure Expander_Write_PortA(dim ModuleAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
The function writes byte to Port Expander's PortA. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. Port Expander's PortA should be configured as output. See Expander_Set_DirectionPortA and Expander_Set_DirectionPortAB routines. |
Example |
' Write a byte to Port Expander's PORTA ... Expander_Set_DirectionPortA(0,0x00) ' set expander's porta to be output ... Expander_Write_PortA(0, 0xAA) |
Expander_Write_PortB
Prototype |
sub procedure Expander_Write_PortB(dim ModuleAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
The function writes byte to Port Expander's PortB. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. Port Expander's PortB should be configured as output. See Expander_Set_DirectionPortB and Expander_Set_DirectionPortAB routines. |
Example |
' Write a byte to Port Expander's PORTB ... Expander_Set_DirectionPortB(0,0x00) ' set expander's portb to be output ... Expander_Write_PortB(0, 0x55) |
Expander_Write_PortAB
Prototype |
sub procedure Expander_Write_PortAB(dim ModuleAddress as byte, dim Data_ as word) |
---|---|
Returns |
Nothing. |
Description |
The function writes word to Port Expander's ports. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. Port Expander's PortA and PortB should be configured as outputs. See Expander_Set_DirectionPortA, Expander_Set_DirectionPortB and Expander_Set_DirectionPortAB routines. |
Example |
' Write a byte to Port Expander's PORTA and PORTB ... Expander_Set_DirectionPortAB(0,0x0000) ' set expander's porta and portb to be output ... Expander_Write_PortAB(0, 0xAA55) |
Expander_Set_DirectionPortA
Prototype |
sub procedure Expander_Set_DirectionPortA(dim ModuleAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
The function sets Port Expander's PortA direction. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Set Port Expander's PORTA to be output Expander_Set_DirectionPortA(0,0x00) |
Expander_Set_DirectionPortB
Prototype |
sub procedure Expander_Set_DirectionPortB(dim ModuleAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
The function sets Port Expander's PortB direction. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Set Port Expander's PORTB to be input Expander_Set_DirectionPortB(0,0xFF) |
Expander_Set_DirectionPortAB
Prototype |
sub procedure Expander_Set_DirectionPortAB(dim ModuleAddress as byte, dim Direction as word) |
---|---|
Returns |
Nothing. |
Description |
The function sets Port Expander's PortA and PortB direction. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Set Port Expander's PORTA to be output and PORTB to be input Expander_Set_DirectionPortAB(0,0x00FF) |
Expander_Set_PullUpsPortA
Prototype |
sub procedure Expander_Set_PullUpsPortA(dim ModuleAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
The function sets Port Expander's PortA pull up/down resistors. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Set Port Expander's PORTA pull-up resistors Expander_Set_PullUpsPortA(0, 0xFF) |
Expander_Set_PullUpsPortB
Prototype |
sub procedure Expander_Set_PullUpsPortB(dim ModuleAddress as byte, dim Data_ as byte) |
---|---|
Returns |
Nothing. |
Description |
The function sets Port Expander's PortB pull up/down resistors. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Set Port Expander's PORTB pull-up resistors Expander_Set_PullUpsPortB(0, 0xFF) |
Expander_Set_PullUpsPortAB
Prototype |
sub procedure Expander_Set_PullUpsPortAB(dim ModuleAddress as byte, dim PullUps as word) |
---|---|
Returns |
Nothing. |
Description |
The function sets Port Expander's PortA and PortB pull up/down resistors. Parameters :
|
Requires |
Port Expander must be initialized. See Expander_Init. |
Example |
' Set Port Expander's PORTA and PORTB pull-up resistors Expander_Set_PullUpsPortAB(0, 0xFFFF) |
Library Example
The example demonstrates how to communicate with Port Expander MCP23S17.
Note that Port Expander pins A2 A1 A0 are connected to GND so Port Expander Hardware Address is 0
.
program PortExpander ' Port Expander module connections dim SPExpanderRST as sbit at RC0_bit SPExpanderCS as sbit at RC1_bit SPExpanderRST_Direction as sbit at TRISC0_bit SPExpanderCS_Direction as sbit at TRISC1_bit ' End Port Expander module connections dim counter as byte' = 0 main: counter = 0 ANSEL = 0 ' Configure AN pins as digital I/O ANSELH = 0 TRISB = 0 ' Set PORTB as output PORTB = 0 SPI1_init() Expander_Init(0) ' Initialize Port Expander Expander_Set_DirectionPortA(0, 0x00) ' Set Expander's PORTA to be output Expander_Set_DirectionPortB(0,0xFF) ' Set Expander's PORTB to be input Expander_Set_PullUpsPortB(0,0xFF) ' Set pull-ups to all of the Expander's PORTB pins while TRUE ' Endless loop Expander_Write_PortA(0, counter) ' Write i to expander's PORTA Inc(counter) PORTB = Expander_Read_PortB(0) ' Read expander's PORTB and write it to LEDs Delay_ms(100) wend end.
HW Connection
Port Expander HW connection
What do you think about this topic ? Send us feedback!