Mikroelektronika MIKROE-350 データシート

ページ / 526
while TRUE               ' endless loop
Msg_Rcvd = CANSPIRead(Rx_ID , RxTx_Data , Rx_Data_Len,
Can_Rcv_Flags)   ' receive message
if ((Rx_ID = 12111) and Msg_Rcvd) then
' if message received check id
PORTC = RxTx_Data[0] ' id correct, output data at PORTC
Inc(RxTx_Data[0])    ' increment received data
CANSPIWrite(Tx_ID, RxTx_Data, 1, Can_Send_Flags)             
' send incremented data back
end if
wend
end.
HW Connection
Example of interfacing CAN transceiver MCP2510 with MCU via SPI interface
188
MIKROELEKTRONIKA
- SOFTWARE AND HARDWARE SOLUTIONS FOR EMBEDDED WORLD
Libraries
mikroBasic PRO for AVR
CHAPTER 6