PassCmd_.au3

Opt("WinTitleMatchMode", 1) ; совпадение окна по началу заголовка
If WinExists("Password Commander RUS") Then ; если окно существует
    Run(@ScriptDir & '\PassCmd.exe') ; то активируем программу
    Exit ; и завершаем скрипт
EndIf

Run(@ScriptDir & '\PassCmd.exe')

Opt("WinTitleMatchMode", 3) ; точное совпадение окна по заголовку

$hWndR = 0
$hWndA = 0

$timer = TimerInit()

Do ; цикл ускоряет доступ к окну взависимости от регистрации
    If WinExists("Регистрация") Then $hWndR = WinWaitActive('Регистрация', '', 1)
    If WinExists("Авторизация") Then $hWndA = WinWaitActive('Авторизация', '', 1)
    If $hWndR Or $hWndA Then ExitLoop
    Sleep(10)
Until TimerDiff($timer) > 3000

If $hWndR Then ; если окно регистрации, то закрываем эти диалоги
    ControlClick($hWndR, "", "[CLASS:TButton; INSTANCE:2]")
    $hWndR = WinWaitActive('Passcmd', '', 2)
    If Not $hWndR Then Exit ; проверка и выход в случае проблемы
    ControlClick($hWndR, "", "[CLASS:Button; INSTANCE:1]")
    $hWndA = WinWaitActive('Авторизация', '', 5) ; ожидая активации нужного окна
EndIf

If $hWndA Then ; если активировано окно авторизации, то осуществляем вход
    ControlSend($hWndA, "", "[CLASS:TStealthEdit; INSTANCE:1]", 'часть моего пароля')
    Send('{HOME}') ; ставим курсор в начало, чтобы ввести недостающую часть длинного пароля
EndIf