Hello Atodos a happy 2013 to all
I made a small program to drive a robot using the PicBasic program I made ​​in visual basic 6
I'm with a difficulty of making the robot motors stop when I release the button on the keyboard.
I need the pic reset all ports without using VISULA basic.Eu program could do more on own pic is connecting the engine and deligando

The program's pic is here.
A hug to everyone
Include "modedefs.bas"
TRISA=1 'PORT A input
TRISB=%00001111 'PORT B output
PORTB=0
RX VAR BYTE

PROG:
SERIN PORTA.0,T9600,RX
IF RX = "A" THEN FRT
IF RX = "B" THEN TRA
IF RX = "C" THEN DIR
IF RX = "D" THEN ESQ
GOTO PROG

FRT:
HIGH 4
HIGH 6
GOTO PROG

TRA:
HIGH 5
HIGH 7
GOTO PROG

DIR:
HIGH 5
HIGH 6
GOTO PROG

ESQ:
HIGH 4
HIGH 7
GOTO PROG