Mikroelektronika MIKROE-724 Scheda Tecnica
388
mikoBasic PRO for dsPIC30/33 and PIC24
MikroElektronika
character = s1[0] ‘ Take first char from string
index = 0 ‘ Initialize index variable
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)
wend
end.
Connection Example
Simple Transmitter connection
Simple Receiver connection