start of 1 acc NEW

$steam = ("vasya228") ;указываем ваш логин
$sda = ("D:\Program Files\SDA-1.0.10\Steam Desktop Authenticator.exe") ;указываем путь для сда
Run(@ScriptDir & '\' & $steam & '_cs.bat') ; запускаем стим
WinWaitActive("Steam Guard — Необходима авторизация компьютера")
if not WinExists("Steam Desktop Authenticator") Then
   Run($sda) ; запускаем sda
   $b = 0
   While $b = 0
      $d = ControlGetText("Steam Desktop Authenticator", "", "[Class:WindowsForms10.EDIT.app.0.afceb_r9_ad1; INSTANCE:2]")
      If $d <> "" Then
         $b = 1
      EndIf
   WEnd
EndIf
WinActivate("Steam Desktop Authenticator")
WinWaitActive("Steam Desktop Authenticator")
Sleep (300)
WinMove("Steam Desktop Authenticator", "", 1408, 296)
ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
Sleep (300)
Send("{end}")
$sda = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:2]")
Send("{home}")
$a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:2]")
$b = 0
$c = "Account: " & $steam
if $a = $c Then
   $b = 1
EndIf
While $b <>1
   Send("{down 1}")
   $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:2]")
   if $a = $c Then
      $b = 1
   EndIf
   if $b <> 1 and $a = $sda then
      MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA" )
      Exit
   EndIf
WEnd
$d = ControlGetText("Steam Desktop Authenticator", "", "[Class:WindowsForms10.EDIT.app.0.afceb_r9_ad1; INSTANCE:2]")
ClipPut($d)
WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
WinActivate("Steam Guard — Необходима авторизация компьютера")
WinWaitActive("Steam Guard — Необходима авторизация компьютера")
Send('+{INS}')
Send("{enter}")
WinActivate("Counter-Strike: Global Offensive — Steam")
WinWaitActive("Counter-Strike: Global Offensive — Steam")
WinWaitClose("Counter-Strike: Global Offensive — Steam")
WinExists("Counter-Strike: Global Offensive")
WinActivate("Counter-Strike: Global Offensive")
WinWaitActive("Counter-Strike: Global Offensive")
$z = 0
while $z = 0
   $x = WinGetPos("Counter-Strike: Global Offensive")
   if $x[2] < 420 and $x[3] < 420 Then
      $z = 1
   EndIf
WEnd
WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - " & $steam)
$m = 0
While $m = 0
   $k = Winlist()
   for $i = 1 to $k[0][0]
      if StringRegExp($k[$i][0], "csgo - " & $steam) then
         $m = 1
      EndIf
   Next
   if $m = 0 Then
      WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - "& $steam)
   EndIf
WEnd
WinExists("csgo - "& $steam)
WinWaitActive("csgo - "& $steam)
Sleep (3000)
$x = WinGetPos("csgo - "& $steam)
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)
Exit