Hello Atodos a happy 2013 to all can someone help me

[Jerson]

How about adding another case
IF RX = "S" THEN StopAll

StopAll:
LOW 4
LOW 5
LOW 6
LOW 7
goto PROG

[cesar35]

hello Jerson
in this case the letter s has to come from vb6
has another way to do this pic
thanks for the reply

[Jerson]

Unfortunately, there is no way you can know when the key has stopped. So, you have 2 alternatives

1 - Let each command run for a small fraction of time before going back to prog
example

FRT:
     HIGH 4
     HIGH 6
     pause 100
     LOW 4
     LOW 6
GOTO PROG

2 - Put a timeout. So, if Serin does not give you a character, turn off all outputs
SERIN PORTA.0,T9600, 1000, Timeout, RX

Timeout:

   LOW 4
   LOW 5
   LOW 6
   LOW 7
goto PROG

This is from the manual
An optional Timeoutand Labelmay be included to allow the program
to continue if a character is not received within acertain amount of time.
Timeoutis specified in 1 millisecond units. If the serial input pin stays in
the idle state during the Timeouttime, the program will exit the SERIN
command and jump to Label

[cesar35]

Hello Jerson
Thanks for the reply
I made the example 2 it more of a lock works very well.
look at the video
thank you

[Jerson]

Nice video.