serial to PIC

[kindows]

I am picbasic pro user
I made this program to send serial signal from PIC to PC

define osc 4
include "bs2defs.bas"

key1 var porta.2

findkey:
if key1 = 0 then press1

press1:
SEROUT PORTa.0,N9600,["KINDOWS 1 "]
goto findkey

by this program if I make port a.2 = 0 the program send this [kindows] as a serial signal from port a.0.

Now I need If I send serial signal from PC to PIC
If I send this [k] from PC to PIC and then PIC make any port like RA1 high to active a relay.
Please some one help me soon.

[mackrackit]

http://www.picbasic.co.uk/forum/showthread.php?t=561
Not sure of the PIC you are using...but if it has analog on it the above should help.

[kindows]

So So but I can't find the answer on it

[mackrackit]

I misread your post before...

 SERIN PORT?.?,N9600,[K],myVar
IF myVar = 3 THEN gosomeplace or dosomething

Send K and another value from the PC " K3 " for example.
The PIC will wait for the "K". When the PIC receives a "K" the next character will be written to myVar.

[kindows]

Hi..
thank u alot I lik [Always wear safety glasses while programming]

I forget to tell u I am new in PICBASIC PRO now only 2 weeks. I think the code will be like this:
define osc 4
include "bs2defs.bas"

wait:
SERIN PORTa.1,N9600,["K3"],myVar
IF myVar = 3 THEN out

out:
HIGH PORTb.7
PAUSE 300
LOW PORTb.7
goto wait

but I cant understand [myvar]. How I can decide it???
Thank u in advance.

[kindows]

its not working