Art Money Pro 7.33

[tupica]

Подскажите пожалуйста, как вызвать прогу из "%ProgramFiles%\ArtMoney\artmoney733.exe", затем вставить пароль в окно (скрин1), нажать OK (скрин2), согласиться с лицензией(скрин3),нажать OK (скрин4), и выйти из проги (убить процесс artmoney733.exe).Т.е автоматизировать процесс регистрации.Пишу т.к не силён в AutoIT.

Спасибо.Концовку сам доделал:

$sPassword = "XXXX"
...........
ControlClick($sAbout_Title, "", "TTeButton3")

Sleep(50)

If ProcessExists("artmoney733.exe") Then ProcessClose("artmoney733.exe")

[Creat0R]

$sPassword = "MyPass"
$sRegister_Title = "[CLASS:TForm18;TITLE:Регистрация]"
$sAbout_Title = "[CLASS:TForm10;TITLE:О программе]"

Run (http://www.autoitscript.com/autoit3/docs/functions/Run.htm)(@ProgramFilesDir (http://www.autoitscript.com/autoit3/docs/macros.htm#@programfilesdir) & "\ArtMoney\artmoney733.exe")

WinWait (http://www.autoitscript.com/autoit3/docs/functions/WinWait.htm)($sRegister_Title, "", 5)
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) Not (http://www.autoitscript.com/autoit3/docs/keywords.htm#Not) BitAND (http://www.autoitscript.com/autoit3/docs/functions/BitAND.htm)(WinGetState (http://www.autoitscript.com/autoit3/docs/functions/WinGetState.htm)($sRegister_Title), 2) Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then) Exit (http://www.autoitscript.com/autoit3/docs/keywords.htm#Exit)

ControlSetText (http://www.autoitscript.com/autoit3/docs/functions/ControlSetText.htm)($sRegister_Title, "", "TEdit1", $sPassword)
ControlClick (http://www.autoitscript.com/autoit3/docs/functions/ControlClick.htm)($sRegister_Title, "", "TBitBtn2")

WinWait (http://www.autoitscript.com/autoit3/docs/functions/WinWait.htm)($sAbout_Title, "", 5)
If (http://www.autoitscript.com/autoit3/docs/keywords.htm#If) Not (http://www.autoitscript.com/autoit3/docs/keywords.htm#Not) BitAND (http://www.autoitscript.com/autoit3/docs/functions/BitAND.htm)(WinGetState (http://www.autoitscript.com/autoit3/docs/functions/WinGetState.htm)($sAbout_Title), 2) Then (http://www.autoitscript.com/autoit3/docs/keywords.htm#Then) Exit (http://www.autoitscript.com/autoit3/docs/keywords.htm#Exit)

ControlCommand (http://www.autoitscript.com/autoit3/docs/functions/ControlCommand.htm)($sAbout_Title, "", "TTeCheckBox1", "Check")
ControlClick (http://www.autoitscript.com/autoit3/docs/functions/ControlClick.htm)($sAbout_Title, "", "TTeButton3")