'****************************************************************
'*  Name    : BlimpBotEasyRadioTX for PIC18F252                 *
'*  Author  : Leif & Jury                                       *
'*  Notice  : Copyright (c) 2006                                *
'*          : All Rights Reserved                               *
'*  Date    : 4/9/2006                                          *
'*  Version : 3.0                                               *
'*  Notes   :                                                   *
'*          :                                                   *
'****************************************************************
INCLUDE "modedefs.bas"
DEFINE OSC 20

RFbaud CON 32       'RF connection speed
RFTX var PORTC.4    'pin to transmit serial from PIC to RF
RFRX VAR PORTC.5    'pin to transmit serial from RF to PIC


CPUbaud CON 16468   'CPU serial connection speed
CPUTX VAR PORTC.6   'pin to transmit serial from PIC to CPU
CPURX VAR PORTC.7   'pin to transmit serial from CPU to PIC

indicatorLED var PORTC.2


OUTPUT indicatorLED 'set indicatorLED pin to output
output RFTX         'set RFTX pin to output
input RFRX          'set RFRX pin to input
OUTPUT CPUTX        'set CPUTX pin to output
INPUT CPURX         'set CPURX pin to input


high indicatorLED
pause 500
low indicatorLED
pause 500

' -----------------
' setup the RF channel
' -----------------
serout2 RFTX, RFbaud,0,["ER_CMD#C4"]      
pause 20
serout2 RFTX, RFbaud,0,["ACK"]
' -----------------
inByte var byte


MAIN:
    SERIN2 CPURX, CPUbaud,[inByte]
    high indicatorLED
    serout2 RFTX, RFbaud,[inByte]
    pause 50
    low indicatorLED
    pause 50
goto main