define OSC 20

inputData var byte  ' variable to receive data into
pulseWidthVar var byte 

' set initial value for pulseWidthVar
pulseWidthVar = 0

high portb.7
pause 200
low portb.7
pause 200
high portb.7
pause 200
low portb.7
pause 200

main:
     ' input byte from processing via the BlueSMIRF chip
     ' note: needs inverted logic, hence the 84
     serin2 portc.7, 84, 1000, nodata, [inputData]  
     
     ' turn on LED
     if inputData = "a" then
        high portb.5
     endif
     ' turn off LED
     if inputData = "b" then
        low portb.5
     endif
     ' output string back through blueSMIRF chip onto processing
     serout2 portc.6, 84, [inputData]
     
     ' status loop LED 
     high portb.7
     pause 50
     low portb.7
     pause 50
 
nodata:
     high portb.2
     pause 50
     low portb.2
     pause 50 

goto main