kein RXD Empfang nach "Reset"

[neo3000]

Hallo,
Wenn ich per vb.net einen Befehl an die C-Control schicke nachdem ich ein Programm in die Control geladen habe werden die gesendeten Befehle reibungslos umgesetzt. Wenn ich aber ein Reset auf der CC ausführe oder die Stromzufuhr trenne, und danach wieder Befehle an die Station schicken möchte werden diese nicht mehr erkannt, bzw nicht ausgeführt.
Ich denke dass das Problem nicht im vb.net Programm liegt sondern eher am CCbasic Programm. Muss ich noch etwas hinzufügen damit nach einem Reset auch wieder etwas vom PC empfangen werden kann??

define befehl byte[11]

#init
STATION_IO=off:EXTPORT=STATION_IO
befehl = 0
LIGHT=off
goto LOOP

#LOOP
gosub auswertung
print"AD1";:print ADC1;:print"&H";
pause 5
print"AD2";:print ADC2;:print"&H";
pause 5
goto LOOP

#auswertung
if RXD then get befehl
if befehl = 100 then gosub K1ON
if befehl = 101 then gosub K1OFF
return

#K1ON
REL1 = on:EXTPORT=STATION_IO
return
#K1OFF
REL1 = off:EXTPORT=STATION_IO
return


Danke, Markus