Взаимодействие с шахматным движком

[Maks1888]

Имеется следующий скрипт

#include <GUIConstantsEx.au3>
#include <Constants.au3>

$Pid = Run("C:\Users\User\Documents\critter_1.6a_win\Critter_1.6a_32bit.exe", @SystemDir, @SW_MAXIMIZE, 0x2)

ControlSend("C:\Users\User\Documents\critter_1.6a_win\Critter_1.6a_32bit.exe","","","uci"&@CR)
$Disc = GUICreate('Mouse', 400, 500) ; ГЛАВНОЕ ОКНО ПРОГРАММЫ
Opt("GUIOnEventMode", 1)
$InputChess = GUICtrlCreateInput("", 120,0, 90,20)
GUICtrlCreateButton("Отправить команду",0,0,120,20)
GUICtrlSetOnEvent(-1,"command")
Func command()
	$chess = GUICtrlRead($InputChess)
	ControlSend("C:\Users\User\Documents\critter_1.6a_win\Critter_1.6a_32bit.exe","","",$chess&@CR)
EndFunc

GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents")
$Input = GUICtrlCreateInput("",0,100,400,400)
GUISetState()

While 1
	$Text = StdoutRead($Pid)&@CR
	If $Text <> "" Then
		GUICtrlSetData($Input, $Text)
	EndIf
	$Text2 = ConsoleRead()
	Sleep(200)
WEnd
Func SpecialEvents() ; закрывает окно
	Exit
EndFunc

Вся заноза в команде Run() . Если устанавливаю флаг 0x2 то консольный движок на мгновение мелькнет и исчезнет, а в текстом поле появится пара строк. (Если флаг не устанавливаю либо суммирую с другими. Движок запускается, принимает команды от моего скрипта, выводит свою информацию, но скрипт не перехватывает вывод движка). Почему движок закрывается?

 

[Maks1888]

Большое спасибо всем откликнувшимся. Этот форум ничем не выделяется среди серой массы. Вся эта масса учит меня только одному. Если что то тебе надо, делай сам, ни на кого надейся. Полезный урок жизни, за него спасибо.