Advertisement
Taum

1231

Aug 10th, 2022
547
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 2.20 KB | None | 0 0
  1. HotKeySet("{F4}", "_Exit")
  2. Func _Exit()
  3. Sleep(100)
  4. Exit
  5. EndFunc ;==> _Exit()
  6. Opt("PixelCoordMode", 0)
  7. $close =("C:\Users\Taum\Desktop\close cs.exe")
  8. $prog =("nnn1-10.exe")
  9. $steam = ("taumnnn1")
  10. $sda = ("C:\Users\Taum\Desktop\SDA\SDA NNN\1-20\Steam Desktop Authenticator.exe")
  11. Run(@ScriptDir & '\' & $steam & '.bat')
  12. Sleep(17000)
  13. WinActivate("Steam Guard — Необходима авторизация компьютера")
  14. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  15. if not WinExists("Steam Desktop Authenticator") Then
  16.    Run($sda)
  17.    Sleep(2000)
  18.    Send("1313")
  19.    Send("{enter}")
  20.    $b = 0
  21.    While $b = 0
  22.       $d = ControlGetText("Steam Desktop Authenticator", "", "[Class:WindowsForms10.EDIT.app.0.afceb_r7_ad1; INSTANCE:2]")
  23.       If $d <> "" Then
  24.          $b = 1
  25.       EndIf
  26.    WEnd
  27. EndIf
  28. WinActivate("Steam Desktop Authenticator")
  29. WinWaitActive("Steam Desktop Authenticator")
  30. Sleep (300)
  31. WinMove("Steam Desktop Authenticator", "", 1000, 167)
  32. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r7_ad1; INSTANCE:1]")
  33. Send("{end}")
  34. $sda = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r7_ad1; INSTANCE:2]")
  35. Send("{home}")
  36. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r7_ad1; INSTANCE:2]")
  37. $b = 0
  38. $c = "Account: " & $steam
  39. if $a = $c Then
  40.    $b = 1
  41. EndIf
  42. While $b <>1
  43.    Send("{down 1}")
  44.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r7_ad1; INSTANCE:2]")
  45.    if $a = $c Then
  46.       $b = 1
  47.    EndIf
  48.    if $b <> 1 and $a = $sda then
  49.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA" )
  50.       Exit
  51.    EndIf
  52. WEnd
  53. $d = ControlGetText("Steam Desktop Authenticator", "", "[Class:WindowsForms10.EDIT.app.0.afceb_r7_ad1; INSTANCE:2]")
  54. ClipPut($d)
  55. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  56. WinActivate("Steam Guard — Необходима авторизация компьютера")
  57. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  58. Send('+{INS}')
  59. Send("{enter}")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement