serial to PIC

[kindows]

Yes it's like your drawing but not working. I send {k3} from the windows terminal and from another 2 programs and it's not working. I am using PICBASIC PRO and PIC16F84a and My code now exactly like this:

define osc 4
include "bs2defs.bas"

wating:
SERIN PORTa.1,N9600,["K"],b1

IF b1 = 51 THEN out ' Ascii 51 = decimal 3 (When you type 3 myvar will be 51)

goto wating ' this line is esential otherwise any key will activate the function

out:

HIGH PORTb.7

PAUSE 300

LOW PORTb.7

goto watin
-------------------------------------

best regard
kindows

[aratti]

check if hyperterminal settings are OK.

In my case serial port is # 2, it could be different for your computer. The setting of snap 165 must be the same.

Al.

[kindows]

Avery thing is same I am using USB converter [USB to serial 232] and I set up it to work in port 8 and I test it with another hardware [ customer LCD] and that is working fine.

[kindows]

plz help me.

[aratti]

I think the problem is with the USB-RS232 converter and the resistor connection to the pic.

You must use a Max232 to connect pic to your PC with this converter.
In such a case you must also change your code as follow :

SERIN PORTa.1,T9600,["K"],b1


Al.

[Ioannis]

wating:
SERIN PORTa.1,N9600,["K"],b1

IF b1 = 51 THEN out ' Ascii 51 = decimal 3 (When you type 3 myvar will be 51)

goto wating ' this line is esential otherwise any key will activate the function

out:

HIGH PORTb.7

PAUSE 300

LOW PORTb.7

goto watin

Your loop label is wrong. watin instead of wating

Ioannis

[kindows]

Thanks for all how help me to finalize my project its working fine now. The problem was with output time I make it before 300 only that is not enough to make the LED blinking I make it now 3000 and its working fine now.

Thanks for all and I hope we can find good idea to be in progress [[ [progress began with an idea]]] and on that time we will wear safety glasses while programming

[mackrackit]

I am glad it is working. But.....
You should be able to see 300 millisecond blink.
How long does the LED stay on now? Your code says 3 seconds.

[kindows]

3 sec.That is fine to make relay work

but now I have new Question I think u can help [blinking LED]

best Regard in advance
------------------------
KINDOWS

[mackrackit]

Try this and see if you see it blink

blink:
HIGH PORTb.7
PAUSE 250
LOW PORTb.
PAUSE 250
GOTO blink