User manual
386
mikoPascal PRO for dsPIC30/33 and PIC24
MikroElektronika
begin
Man_Send(0x0B); // Send “start” byte
Delay_ms(100); // Wait for a while
character := s1[0]; // Take rst char from string
index := 0; // Initialize index variable
while (character <> 0) do // String ends with zero
begin
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
end;
Man_Send(0x0E); // Send “end” byte
Delay_ms(1000);
end;
end.
Connection Example
Simple Transmitter connection
Simple Receiver connection