Mikroelektronika MIKROE-350 Fiche De Données

while (character <> 0)    ' String ends with zero
Man_Send(character)     ' Send character

Delay_ms(90)            ' Wait for a while
Inc(index)              ' Increment index variable

character = s1[index]   ' Take next char from string

wend
Man_Send(0x0E)            ' Send "end" byte
Delay_ms(1000)

Simple Transmitter connection

Simple Receiver connection

254

- SOFTWARE AND HARDWARE SOLUTIONS FOR EMBEDDED WORLD

CHAPTER 6