autoit script

#RequireAdmin
#include <WinAPIProc.au3>
#include <GuiListBox.au3>
$er=0
$path = ("S:\Program Files\SDA-1.0.9\Steam Desktop Authenticator.exe")


$login = "vasya228"
Run(@ScriptDir & "\" & $login & "_cs.bat")
_checkSDA ()
_steamstart ()
_csname ()
_startgame ()



Func _checkSDA () ;проверка на наличие СДА и если нет то открываем
    if not WinExists("Steam Desktop Authenticator") Then
        Run($path) ; запускаем sda
        Local $iID = ProcessExists('Steam Desktop Authenticator.exe')
        If FileGetVersion(_WinAPI_GetProcessFileName($iID)) <> "1.0.10.0" Then ;если версия старая, то нажимаем "не качать новую версию"
            WinWaitActive("New Version","",5)
            WinActivate("New Version")
            WinWaitActive("New Version")
            Send("{right}")
            Send("{enter}")
        Else
            WinActivate("Steam Desktop Authenticator")
        EndIf
    Else
    WinActivate("Steam Desktop Authenticator")
    EndIf
    WinMove("Steam Desktop Authenticator", "",5,400);передвигаем сда в удобное место, желательно где не будет окон кс и стима, для стабильности работы, можно и не передвигать, но будет больше шанс ошибки
    WinActivate("Steam Desktop Authenticator")
EndFunc

Func _steamstart () ;поиск кода сда и вставка в стим
   WinWaitActive("Steam Desktop Authenticator","", 2)
   SendKeepActive("Steam Desktop Authenticator")
   WinActivate("Steam Desktop Authenticator")
   WinWaitActive("Steam Desktop Authenticator","", 10)
   ControlClick("Steam Desktop Authenticator", "", "[NAME:listAccounts]")
   $listboxHandle = ControlGetHandle("Steam Desktop Authenticator", "", "[NAME:listAccounts]")
   $count = _GUICtrlListBox_GetCount($listboxHandle)
   $b = 0
   For $sdai = 0 To $count - 1
      $itemText = _GUICtrlListBox_GetText($listboxHandle, $sdai)
      If $itemText = $login Then
         SendKeepActive($listboxHandle)
         _GUICtrlListBox_SetCurSel($listboxHandle, $sdai)
         _GUICtrlListBox_ClickItem($listboxHandle, $sdai, "left", False)
         SendKeepActive("")
         $b = 1
      EndIf
   Next
   If $b = 0 then
      MsgBox (0, "Ошибка", "Аккаунт '" & $c & "' отсутствует в SDA")
      Exit
   EndIf
   $listboxHandle = ControlGetHandle("Steam Desktop Authenticator", "", "[Text:Copy")
   SendKeepActive($listboxHandle)
   Sleep(1000)
   WinActivate("Steam Desktop Authenticator")
   ControlClick("Steam Desktop Authenticator", "", "[Text:Copy]")
   WinActivate("Steam Desktop Authenticator")
   ControlClick("Steam Desktop Authenticator", "", "[Text:Copy]")
   SendKeepActive("")
   WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
   Do
      Sleep(300)
   Until WinExists("Вход в Steam")
   $swh=WinGetHandle("Вход в Steam")
   WinSetTitle($swh, "", "Вход_Steam "& $login)
   WinActivate("Вход_Steam "& $login)
   WinWaitActive("Вход_Steam "& $login,"",5)
   SendKeepActive("Вход_Steam "& $login)
   WinActivate("Вход_Steam "& $login)
   WinWaitActive("Вход_Steam "& $login)
   Sleep(100)
   AutoItSetOption("PixelCoordMode",0)
   $ppp=0xE0E1E6
   $pp=0xE0E1E6
   $pppp=0xE0E1E6
   $er=0
   Do
      $sss=WinGetHandle("Вход_Steam "& $login)
      $ppp=PixelGetColor ( 526, 280, $sss)
      $pp=PixelGetColor ( 415, 200, $sss)
      $pppp=PixelGetColor ( 251, 250, $sss)
      $hhh=Hex($ppp,6)
      $hh=Hex($pp,6)
      $hhhh=Hex($pppp,6)
      WinActivate("Вход_Steam "& $login)
      If $pp=0x2B77FF Or $pppp=0x2B78FF Then
         $er=1
      EndIf
   Until $ppp=0x1A99FF Or $pp=0x2B77FF Or $pppp=0x2B78FF
   Sleep(100)
   WinActivate("Вход_Steam "& $login)
   Send('+{INS}')
   SendKeepActive("")
EndFunc

Func _csname () ;переименовывание кс
   If $er=0 Then
      WinExists("Counter-Strike: Global Offensive - Direct3D 9")
      WinActivate("Counter-Strike: Global Offensive - Direct3D 9")
      WinWaitActive("Counter-Strike: Global Offensive - Direct3D 9")
      $z = 0
      while $z = 0
         $x = WinGetPos("Counter-Strike: Global Offensive - Direct3D 9")
         if $x[2] < 420 and $x[3] < 420 Then
            $z = 1
         EndIf
      WEnd
      WinSetTitle("Counter-Strike: Global Offensive - Direct3D 9", "", "csgo - " & $login)
      $m = 0
      While $m = 0
         $k = Winlist()
         for $i = 1 to $k[0][0]
            if StringRegExp($k[$i][0], "csgo - " & $login) then
               $m = 1
            EndIf
         Next
      WEnd
   EndIf
EndFunc

Func _startgame () ;нажимаем поиск десматча
If $er=0 Then
   WinExists("csgo - "& $login)
   WinWaitActive("csgo - "& $login)
   Sleep (3500)
   $x = WinGetPos("csgo - "& $login)
   MouseClick('primary', $x[0] + 16, $x[1] + 64, 1)
   MouseClick('primary', $x[0] + 169, $x[1] + 79, 1)
   MouseClick('primary', $x[0] + 311, $x[1] + 313, 1)
EndIf
EndFunc