UART Library
UART hardware module is available with a number of PIC MCUs. mikroPascal PRO for PIC UART Library provides comfortable work with the Asynchronous (full duplex) mode.
You can easily communicate with other devices via RS-232 protocol (for example with PC, see the figure at the end of the topic – RS-232 HW connection). You need a PIC MCU with hardware integrated UART, for example 16F887. Then, simply use the functions listed below.

- UART library routines require you to specify the module you want to use. To select the desired UART module, simply change the letter 1 in the routine prototype for a number from 1 to 2.
- Switching between the UART modules in the UART library is done by the UART_Set_Active function (UART modules have to be previously initialized).
- Number of UART modules per MCU differs from chip to chip. Please, read the appropriate datasheet before utilizing this library.
Library Routines
- UARTx_Init
- UARTx_Data_Ready
- UARTx_Tx_Idle
- UARTx_Read
- UARTx_Read_Text
- UARTx_Write
- UARTx_Write_Text
- UART_Set_Active
Generic Routines
UARTx_Init
Prototype |
procedure UARTx_Init(const baud_rate: longint); |
---|---|
Returns |
Nothing. |
Description |
Configures and initializes the UART module. The internal UART module module is set to:
Parameters :
Refer to the device data sheet for baud rates allowed for specific Fosc. |
Requires |
You'll need PIC MCU with hardware UART.
![]() Therefore, compiler needs to know the value of the parameter in the compile time. That is why this parameter needs to be a constant, and not a variable. |
Example |
This will initialize hardware UART1 module and establish the communication at 2400 bps: UART1_Init(2400); |
UARTx_Data_Ready
Prototype |
function UARTx_Data_Ready(): byte; |
---|---|
Returns |
Function returns 1 if data is ready or 0 if there is no data. |
Description |
The function tests if data in receive buffer is ready for reading. |
Requires |
MCU with the UART module. The UART module must be initialized before using this routine. See the UARTx_Init routine. |
Example |
var receive: byte; ... // read data if ready if (UART1_Data_Ready() = 1) then receive := UART1_Read(); |
UARTx_Tx_Idle
Prototype |
function UARTx_Tx_Idle(): byte |
---|---|
Returns |
|
Description |
Use the function to test if the transmit shift register is empty or not. |
Requires |
UART HW module must be initialized and communication established before using this function. See UARTx_Init. |
Example |
// If the previous data has been shifted out, send next data: if (UART1_Tx_Idle() <> 0) begin ... end; |
UARTx_Read
Prototype |
function UARTx_Read(): byte; |
---|---|
Returns |
Received byte. |
Description |
The function receives a byte via UART. Use the UARTx_Data_Ready function to test if data is ready first. |
Requires |
MCU with the UART module. The UART module must be initialized before using this routine. See UARTx_Init routine. |
Example |
var receive: byte; ... // read data if ready if (UART1_Data_Ready() = 1) then receive := UART1_Read(); |
UARTx_Read_Text
Prototype |
procedure UARTx_Read_Text(var Output, Delimiter : array[255] of byte; Attempts : byte); |
---|---|
Returns |
Nothing. |
Description |
Reads characters received via UART until the delimiter sequence is detected. The read sequence is stored in the parameter This is a blocking call: the delimiter sequence is expected, otherwise the procedure exits( if the delimiter is not found). Parameter |
Requires |
UART HW module must be initialized and communication established before using this function. See UARTx_Init. |
Example |
Read text until the sequence “OK” is received, and send back what’s been received: UART1_Init(4800); // initialize UART module Delay_ms(100); while TRUE do begin if (UART1_Data_Ready() = 1) then // if data is received begin UART1_Read_Text(output, 'OK', 10); // reads text until 'OK' is found UART1_Write_Text(output); // sends back text end; end; |
UARTx_Write
Prototype |
procedure UARTx_Write(TxData: byte); |
---|---|
Returns |
Nothing. |
Description |
The function transmits a byte via the UART module. Parameters :
|
Requires |
MCU with the UART module. The UART module must be initialized before using this routine. See UARTx_Init routine. |
Example |
var data_: byte; ... data := 0x1E UART1_Write(data_); |
UARTx_Write_Text
Prototype |
procedure UARTx_Write_Text(var uart_text : string); |
---|---|
Returns |
Nothing. |
Description |
Sends text (parameter |
Requires |
UART HW module must be initialized and communication established before using this function. See UARTx_Init. |
Example |
Read text until the sequence “OK” is received, and send back what’s been received: UART1_Init(4800); // initialize UART module Delay_ms(100); while TRUE do begin if (UART1_Data_Ready() = 1) then // if data is received begin UART1_Read_Text(output, 'OK', 10); // reads text until 'OK' is found UART1_Write_Text(output); // sends back text end; end; |
UART_Set_Active
Prototype |
procedure UART_Set_Active (read_ptr : ^Tread_ptr; write_ptr : ^Twrite_ptr; ready_ptr : ^Tready_ptr; tx_idle_ptr : ^Ttx_idle_ptr); |
---|---|
Returns |
Nothing. |
Description |
Sets active UART module which will be used by the UART library routines. Parameters :
|
Requires |
Routine is available only for MCUs with two UART modules. Used UART module must be initialized before using this routine. See UARTx_Init routine |
Example |
UART1_Init(9600); // initialize UART1 module UART2_Init(9600); // initialize UART2 module RS485Master_Init(); // initialize MCU as Master UART_Set_Active(@UART1_Read, @UART1_Write, @UART1_Data_Ready, @UART1_Tx_Idle); // set UART1 active RS485Master_Send(dat,1,160); // send message through UART1 UART_Set_Active(@UART2_Read, @UART2_Write, @UART2_Data_Ready, @UART2_Tx_Idle); // set UART2 active RS485Master_Send(dat,1,160); // send through UART2 |
UART_Data_Ready
Prototype |
function UART_Data_Ready(): byte; |
---|---|
Returns |
Function returns 1 if data is ready or 0 if there is no data. |
Description |
The function tests if data in receive buffer is ready for reading. This is a generic routine which uses the active UART module previously activated by the UART_Set_Active routine. |
Requires |
MCU with the UART module. The UART module must be initialized before using this routine. See the UARTx_Init routine. |
Example |
var receive: byte; ... // read data if ready if (UART_Data_Ready() = 1) then receive := UART_Read(); |
UART_Tx_Idle
Prototype |
function UART_Tx_Idle(): byte |
---|---|
Returns |
|
Description |
Use the function to test if the transmit shift register is empty or not. This is a generic routine which uses the active UART module previously activated by the UART_Set_Active routine. |
Requires |
UART HW module must be initialized and communication established before using this function. See UARTx_Init. |
Example |
// If the previous data has been shifted out, send next data: if (UART_Tx_Idle() <> 0) begin ... end; |
UART_Read
Prototype |
function UART_Read(): byte; |
---|---|
Returns |
Received byte. |
Description |
The function receives a byte via UART. Use the UART_Data_Ready function to test if data is ready first. This is a generic routine which uses the active UART module previously activated by the UART_Set_Active routine. |
Requires |
MCU with the UART module. The UART module must be initialized before using this routine. See UARTx_Init routine. |
Example |
var receive: byte; ... // read data if ready if (UART_Data_Ready() = 1) then receive := UART_Read(); |
UART_Read_Text
Prototype |
procedure UART_Read_Text(var Output, Delimiter : array[255] of byte; Attempts : byte); |
---|---|
Returns |
Nothing. |
Description |
Reads characters received via UART until the delimiter sequence is detected. The read sequence is stored in the parameter This is a blocking call: the delimiter sequence is expected, otherwise the procedure exits( if the delimiter is not found). Parameter This is a generic routine which uses the active UART module previously activated by the UART_Set_Active routine. |
Requires |
UART HW module must be initialized and communication established before using this function. See UARTx_Init. |
Example |
Read text until the sequence “OK” is received, and send back what’s been received: UART1_Init(4800); // initialize UART module Delay_ms(100); while TRUE do begin if (UART_Data_Ready() = 1) then // if data is received begin UART_Read_Text(output, 'OK', 10); // reads text until 'OK' is found UART_Write_Text(output); // sends back text end; end; |
UART_Write
Prototype |
procedure UART_Write(TxData: byte); |
---|---|
Returns |
Nothing. |
Description |
The function transmits a byte via the UART module. This is a generic routine which uses the active UART module previously activated by the UART_Set_Active routine. Parameters :
|
Requires |
MCU with the UART module. The UART module must be initialized before using this routine. See UARTx_Init routine. |
Example |
var data_: byte; ... data := 0x1E UART_Write(data_); |
UART_Write_Text
Prototype |
procedure UART_Write_Text(var uart_text : string); |
---|---|
Returns |
Nothing. |
Description |
Sends text (parameter This is a generic routine which uses the active UART module previously activated by the UART_Set_Active routine. |
Requires |
UART HW module must be initialized and communication established before using this function. See UARTx_Init. |
Example |
Read text until the sequence “OK” is received, and send back what’s been received: UART1_Init(4800); // initialize UART module Delay_ms(100); while TRUE do begin if (UART_Data_Ready() = 1) then // if data is received begin UART_Read_Text(output, 'OK', 10); // reads text until 'OK' is found UART_Write_Text(output); // sends back text end; end; |
Library Example
This example demonstrates simple data exchange via UART. If MCU is connected to the PC, you can test the example from the mikroPascal PRO for PIC USART Terminal.
program UART; var uart_rd : byte; begin UART1_Init(9600); // Initialize UART module at 9600 bps Delay_ms(100); // Wait for UART module to stabilize UART1_Write_Text('Ready'); UART1_Write(10); UART1_Write(13); while (TRUE) do // Endless loop begin if (UART1_Data_Ready() <> 0) then // If data is received, begin uart_rd := UART1_Read(); // read the received data, UART1_Write(uart_rd); // and send data via UART end; end; end.
HW Connection
UART HW connection
What do you think about this topic ? Send us feedback!