API tools faq
paste
Advertisement
snajper23

start of 18 accs

snajper23
Jul 7th, 2021 (edited)
4,421
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 42.96 KB | None | 0 0
raw download clone embed print report
  1. ;0_1
  2. Run(@ScriptDir & '\snajper610_cs.bat') ; запускаем батник в папке с этим скриптом
  3. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  4. if not WinExists("Steam Desktop Authenticator") Then ; проверка запущен ли sda версия 1.0.9
  5.    Run("D:\Program Files\SDA-1.0.9\Steam Desktop Authenticator.exe") ; запускаем sda если не запущен
  6.    WinWaitActive("New Version") ; если у вас старая версия 1.0.9 то отменяет обновление
  7.    Send("{right}") ; если у вас старая версия 1.0.9 то отменяет обновление
  8.    Send("{enter}") ; если у вас старая версия 1.0.9 то отменяет обновление
  9. EndIf
  10. WinActivate("Steam Desktop Authenticator")
  11. WinWaitActive("Steam Desktop Authenticator")
  12. Sleep (300)
  13. WinMove("Steam Desktop Authenticator", "", 1408, 296) ; перемещаем сда для удобства
  14. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  15. Sleep (300)
  16. Send("{home}")
  17. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  18. $b = 0
  19. $c = "Account: snajper610" ; название акка из сда
  20. $d = 1
  21. if $a = $c Then
  22.    $b = 1
  23. EndIf
  24. While $b <>1
  25.    Send("{down 1}")
  26.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  27.    $d = $d + 1
  28.    if $a = $c Then
  29.       $b = 1
  30.    EndIf
  31.    if $d > 61 then ; 61 это кол-во всех аков в сда которые там зареганы
  32.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  33.       Exit
  34.    EndIf
  35. WEnd
  36. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  37. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  38. WinActivate("Steam Guard — Необходима авторизация компьютера")
  39. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  40. Send('+{INS}')
  41. Send("{enter}")
  42. WinActivate("Counter-Strike: Global Offensive — Steam")
  43. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  44. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  45. WinExists("Counter-Strike: Global Offensive")
  46. WinActivate("Counter-Strike: Global Offensive")
  47. WinWaitActive("Counter-Strike: Global Offensive")
  48. $z = 0
  49. while $z = 0
  50.    $x = WinGetPos("Counter-Strike: Global Offensive")
  51.    if $x[2] < 420 and $x[3] < 420 Then
  52.       $z = 1
  53.    EndIf
  54. WEnd
  55. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - snajper610") ; переименовуем кс
  56. $m = 0
  57. While $m = 0
  58.    $k = Winlist()
  59.    for $i = 1 to $k[0][0]
  60.       if StringRegExp($k[$i][0], "(csgo - snajper610)") then
  61.          $m = 1
  62.       EndIf
  63.    Next
  64.    if $m = 0 Then
  65.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - snajper610") ; переименовуем кс 2
  66.    EndIf
  67. WEnd
  68. WinExists("csgo - snajper610")
  69. WinWaitActive("csgo - snajper610")
  70. Sleep (3000)
  71. MouseClick('primary', 17, 65, 1) ; нажать играть
  72. MouseClick('primary', 170, 80, 1) ; нажать бой на смерть
  73. MouseClick('primary', 312, 314, 1) ; нажать начать
  74.  
  75. ;0_2
  76. Run(@ScriptDir & '\snajper6102_cs.bat') ; запускаем стим
  77. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  78. WinActivate("Steam Desktop Authenticator")
  79. WinWaitActive("Steam Desktop Authenticator")
  80. Sleep (300)
  81. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  82. Sleep (300)
  83. Send("{home}")
  84. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  85. $b = 0
  86. $c = "Account: snajper6102"
  87. $d = 1
  88. if $a = $c Then
  89.    $b = 1
  90. EndIf
  91. While $b <>1
  92.    Send("{down 1}")
  93.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  94.    $d = $d + 1
  95.    if $a = $c Then
  96.       $b = 1
  97.    EndIf
  98.    if $d > 61 then
  99.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  100.       Exit
  101.    EndIf
  102. WEnd
  103. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  104. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  105. WinActivate("Steam Guard — Необходима авторизация компьютера")
  106. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  107. Send('+{INS}')
  108. Send("{enter}")
  109. WinActivate("Counter-Strike: Global Offensive — Steam")
  110. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  111. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  112. WinExists("Counter-Strike: Global Offensive")
  113. WinActivate("Counter-Strike: Global Offensive")
  114. WinWaitActive("Counter-Strike: Global Offensive")
  115. $z = 0
  116. while $z = 0
  117.    $x = WinGetPos("Counter-Strike: Global Offensive")
  118.    if $x[2] < 420 and $x[3] < 420 Then
  119.       $z = 1
  120.    EndIf
  121. WEnd
  122. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - snajper6102")
  123. $m = 0
  124. While $m = 0
  125.    $k = Winlist()
  126.    for $i = 1 to $k[0][0]
  127.       if StringRegExp($k[$i][0], "(csgo - snajper6102)") then
  128.          $m = 1
  129.       EndIf
  130.    Next
  131.    if $m = 0 Then
  132.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - snajper6102")
  133.    EndIf
  134. WEnd
  135. WinExists("csgo - snajper6102")
  136. WinWaitActive("csgo - snajper6102")
  137. Sleep (3000)
  138. MouseClick('primary', 337, 65, 1)
  139. MouseClick('primary', 490, 80, 1)
  140. MouseClick('primary', 632, 314, 1)
  141.  
  142. ;1_1
  143. Run(@ScriptDir & '\saloman610_cs.bat') ; запускаем стим
  144. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  145. WinActivate("Steam Desktop Authenticator")
  146. WinWaitActive("Steam Desktop Authenticator")
  147. Sleep (300)
  148. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  149. Sleep (300)
  150. Send("{home}")
  151. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  152. $b = 0
  153. $c = "Account: saloman610"
  154. $d = 1
  155. if $a = $c Then
  156.    $b = 1
  157. EndIf
  158. While $b <>1
  159.    Send("{down 1}")
  160.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  161.    $d = $d + 1
  162.    if $a = $c Then
  163.       $b = 1
  164.    EndIf
  165.    if $d > 61 then
  166.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  167.       Exit
  168.    EndIf
  169. WEnd
  170. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  171. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  172. WinActivate("Steam Guard — Необходима авторизация компьютера")
  173. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  174. Send('+{INS}')
  175. Send("{enter}")
  176. WinActivate("Counter-Strike: Global Offensive — Steam")
  177. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  178. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  179. WinExists("Counter-Strike: Global Offensive")
  180. WinActivate("Counter-Strike: Global Offensive")
  181. WinWaitActive("Counter-Strike: Global Offensive")
  182. $z = 0
  183. while $z = 0
  184.    $x = WinGetPos("Counter-Strike: Global Offensive")
  185.    if $x[2] < 420 and $x[3] < 420 Then
  186.       $z = 1
  187.    EndIf
  188. WEnd
  189. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman610")
  190. $m = 0
  191. While $m = 0
  192.    $k = Winlist()
  193.    for $i = 1 to $k[0][0]
  194.       if StringRegExp($k[$i][0], "(csgo - saloman610)") then
  195.          $m = 1
  196.       EndIf
  197.    Next
  198.    if $m = 0 Then
  199.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman610")
  200.    EndIf
  201. WEnd
  202. WinExists("csgo - saloman610")
  203. WinWaitActive("csgo - saloman610")
  204. Sleep (3000)
  205. MouseClick('primary', 657, 65, 1)
  206. MouseClick('primary', 810, 80, 1)
  207. MouseClick('primary', 952, 314, 1)
  208.  
  209. ;1_2
  210. Run(@ScriptDir & '\saloman6102_cs.bat') ; запускаем стим
  211. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  212. WinActivate("Steam Desktop Authenticator")
  213. WinWaitActive("Steam Desktop Authenticator")
  214. Sleep (300)
  215. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  216. Sleep (300)
  217. Send("{home}")
  218. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  219. $b = 0
  220. $c = "Account: saloman6102"
  221. $d = 1
  222. if $a = $c Then
  223.    $b = 1
  224. EndIf
  225. While $b <>1
  226.    Send("{down 1}")
  227.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  228.    $d = $d + 1
  229.    if $a = $c Then
  230.       $b = 1
  231.    EndIf
  232.    if $d > 61 then
  233.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  234.       Exit
  235.    EndIf
  236. WEnd
  237. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  238. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  239. WinActivate("Steam Guard — Необходима авторизация компьютера")
  240. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  241. Send('+{INS}')
  242. Send("{enter}")
  243. WinActivate("Counter-Strike: Global Offensive — Steam")
  244. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  245. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  246. WinExists("Counter-Strike: Global Offensive")
  247. WinActivate("Counter-Strike: Global Offensive")
  248. WinWaitActive("Counter-Strike: Global Offensive")
  249. $z = 0
  250. while $z = 0
  251.    $x = WinGetPos("Counter-Strike: Global Offensive")
  252.    if $x[2] < 420 and $x[3] < 420 Then
  253.       $z = 1
  254.    EndIf
  255. WEnd
  256. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6102")
  257. $m = 0
  258. While $m = 0
  259.    $k = Winlist()
  260.    for $i = 1 to $k[0][0]
  261.       if StringRegExp($k[$i][0], "(csgo - saloman6102)") then
  262.          $m = 1
  263.       EndIf
  264.    Next
  265.    if $m = 0 Then
  266.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6102")
  267.    EndIf
  268. WEnd
  269. WinExists("csgo - saloman6102")
  270. WinWaitActive("csgo - saloman6102")
  271. Sleep (3000)
  272. MouseClick('primary', 977, 65, 1)
  273. MouseClick('primary', 1130, 80, 1)
  274. MouseClick('primary', 1272, 314, 1)
  275.  
  276. ;1_3
  277. Run(@ScriptDir & '\saloman6103_cs.bat') ; запускаем стим
  278. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  279. WinActivate("Steam Desktop Authenticator")
  280. WinWaitActive("Steam Desktop Authenticator")
  281. Sleep (300)
  282. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  283. Sleep (300)
  284. Send("{home}")
  285. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  286. $b = 0
  287. $c = "Account: saloman6103"
  288. $d = 1
  289. if $a = $c Then
  290.    $b = 1
  291. EndIf
  292. While $b <>1
  293.    Send("{down 1}")
  294.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  295.    $d = $d + 1
  296.    if $a = $c Then
  297.       $b = 1
  298.    EndIf
  299.    if $d > 61 then
  300.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  301.       Exit
  302.    EndIf
  303. WEnd
  304. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  305. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  306. WinActivate("Steam Guard — Необходима авторизация компьютера")
  307. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  308. Send('+{INS}')
  309. Send("{enter}")
  310. WinActivate("Counter-Strike: Global Offensive — Steam")
  311. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  312. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  313. WinExists("Counter-Strike: Global Offensive")
  314. WinActivate("Counter-Strike: Global Offensive")
  315. WinWaitActive("Counter-Strike: Global Offensive")
  316. $z = 0
  317. while $z = 0
  318.    $x = WinGetPos("Counter-Strike: Global Offensive")
  319.    if $x[2] < 420 and $x[3] < 420 Then
  320.       $z = 1
  321.    EndIf
  322. WEnd
  323. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6103")
  324. $m = 0
  325. While $m = 0
  326.    $k = Winlist()
  327.    for $i = 1 to $k[0][0]
  328.       if StringRegExp($k[$i][0], "(csgo - saloman6103)") then
  329.          $m = 1
  330.       EndIf
  331.    Next
  332.    if $m = 0 Then
  333.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6103")
  334.    EndIf
  335. WEnd
  336. WinExists("csgo - saloman6103")
  337. WinWaitActive("csgo - saloman6103")
  338. Sleep (3000)
  339. MouseClick('primary', 1297, 65, 1)
  340. MouseClick('primary', 1450, 80, 1)
  341. MouseClick('primary', 1592, 314, 1)
  342.  
  343. ;1_4
  344. Run(@ScriptDir & '\saloman6104_cs.bat') ; запускаем стим
  345. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  346. WinActivate("Steam Desktop Authenticator")
  347. WinWaitActive("Steam Desktop Authenticator")
  348. Sleep (300)
  349. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  350. Sleep (300)
  351. Send("{home}")
  352. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  353. $b = 0
  354. $c = "Account: saloman6104"
  355. $d = 1
  356. if $a = $c Then
  357.    $b = 1
  358. EndIf
  359. While $b <>1
  360.    Send("{down 1}")
  361.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  362.    $d = $d + 1
  363.    if $a = $c Then
  364.       $b = 1
  365.    EndIf
  366.    if $d > 61 then
  367.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  368.       Exit
  369.    EndIf
  370. WEnd
  371. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  372. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  373. WinActivate("Steam Guard — Необходима авторизация компьютера")
  374. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  375. Send('+{INS}')
  376. Send("{enter}")
  377. WinActivate("Counter-Strike: Global Offensive — Steam")
  378. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  379. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  380. WinExists("Counter-Strike: Global Offensive")
  381. WinActivate("Counter-Strike: Global Offensive")
  382. WinWaitActive("Counter-Strike: Global Offensive")
  383. $z = 0
  384. while $z = 0
  385.    $x = WinGetPos("Counter-Strike: Global Offensive")
  386.    if $x[2] < 420 and $x[3] < 420 Then
  387.       $z = 1
  388.    EndIf
  389. WEnd
  390. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6104")
  391. $m = 0
  392. While $m = 0
  393.    $k = Winlist()
  394.    for $i = 1 to $k[0][0]
  395.       if StringRegExp($k[$i][0], "(csgo - saloman6104)") then
  396.          $m = 1
  397.       EndIf
  398.    Next
  399.    if $m = 0 Then
  400.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6104")
  401.    EndIf
  402. WEnd
  403. WinExists("csgo - saloman6104")
  404. WinWaitActive("csgo - saloman6104")
  405. Sleep (3000)
  406. MouseClick('primary', 1617, 65, 1)
  407. MouseClick('primary', 1770, 80, 1)
  408. MouseClick('primary', 1912, 314, 1)
  409.  
  410. ;1_5
  411. Run(@ScriptDir & '\saloman6105_cs.bat') ; запускаем стим
  412. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  413. WinActivate("Steam Desktop Authenticator")
  414. WinWaitActive("Steam Desktop Authenticator")
  415. Sleep (300)
  416. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  417. Sleep (300)
  418. Send("{home}")
  419. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  420. $b = 0
  421. $c = "Account: saloman6105"
  422. $d = 1
  423. if $a = $c Then
  424.    $b = 1
  425. EndIf
  426. While $b <>1
  427.    Send("{down 1}")
  428.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  429.    $d = $d + 1
  430.    if $a = $c Then
  431.       $b = 1
  432.    EndIf
  433.    if $d > 61 then
  434.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  435.       Exit
  436.    EndIf
  437. WEnd
  438. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  439. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  440. WinActivate("Steam Guard — Необходима авторизация компьютера")
  441. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  442. Send('+{INS}')
  443. Send("{enter}")
  444. WinActivate("Counter-Strike: Global Offensive — Steam")
  445. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  446. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  447. WinExists("Counter-Strike: Global Offensive")
  448. WinActivate("Counter-Strike: Global Offensive")
  449. WinWaitActive("Counter-Strike: Global Offensive")
  450. $z = 0
  451. while $z = 0
  452.    $x = WinGetPos("Counter-Strike: Global Offensive")
  453.    if $x[2] < 420 and $x[3] < 420 Then
  454.       $z = 1
  455.    EndIf
  456. WEnd
  457. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6105")
  458. $m = 0
  459. While $m = 0
  460.    $k = Winlist()
  461.    for $i = 1 to $k[0][0]
  462.       if StringRegExp($k[$i][0], "(csgo - saloman6105)") then
  463.          $m = 1
  464.       EndIf
  465.    Next
  466.    if $m = 0 Then
  467.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6105")
  468.    EndIf
  469. WEnd
  470. WinExists("csgo - saloman6105")
  471. WinWaitActive("csgo - saloman6105")
  472. Sleep (3000)
  473. MouseClick('primary', 17, 365, 1)
  474. MouseClick('primary', 170, 380, 1)
  475. MouseClick('primary', 312, 614, 1)
  476.  
  477. ;1_6
  478. Run(@ScriptDir & '\saloman6106_cs.bat') ; запускаем стим
  479. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  480. WinActivate("Steam Desktop Authenticator")
  481. WinWaitActive("Steam Desktop Authenticator")
  482. Sleep (300)
  483. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  484. Sleep (300)
  485. Send("{home}")
  486. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  487. $b = 0
  488. $c = "Account: saloman6106"
  489. $d = 1
  490. if $a = $c Then
  491.    $b = 1
  492. EndIf
  493. While $b <>1
  494.    Send("{down 1}")
  495.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  496.    $d = $d + 1
  497.    if $a = $c Then
  498.       $b = 1
  499.    EndIf
  500.    if $d > 61 then
  501.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  502.       Exit
  503.    EndIf
  504. WEnd
  505. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  506. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  507. WinActivate("Steam Guard — Необходима авторизация компьютера")
  508. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  509. Send('+{INS}')
  510. Send("{enter}")
  511. WinActivate("Counter-Strike: Global Offensive — Steam")
  512. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  513. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  514. WinExists("Counter-Strike: Global Offensive")
  515. WinActivate("Counter-Strike: Global Offensive")
  516. WinWaitActive("Counter-Strike: Global Offensive")
  517. $z = 0
  518. while $z = 0
  519.    $x = WinGetPos("Counter-Strike: Global Offensive")
  520.    if $x[2] < 420 and $x[3] < 420 Then
  521.       $z = 1
  522.    EndIf
  523. WEnd
  524. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6106")
  525. $m = 0
  526. While $m = 0
  527.    $k = Winlist()
  528.    for $i = 1 to $k[0][0]
  529.       if StringRegExp($k[$i][0], "(csgo - saloman6106)") then
  530.          $m = 1
  531.       EndIf
  532.    Next
  533.    if $m = 0 Then
  534.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6106")
  535.    EndIf
  536. WEnd
  537. WinExists("csgo - saloman6106")
  538. WinWaitActive("csgo - saloman6106")
  539. Sleep (3000)
  540. MouseClick('primary', 337, 365, 1)
  541. MouseClick('primary', 490, 380, 1)
  542. MouseClick('primary', 632, 614, 1)
  543.  
  544. ;1_7
  545. Run(@ScriptDir & '\saloman6107_cs.bat') ; запускаем стим
  546. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  547. WinActivate("Steam Desktop Authenticator")
  548. WinWaitActive("Steam Desktop Authenticator")
  549. Sleep (300)
  550. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  551. Sleep (300)
  552. Send("{home}")
  553. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  554. $b = 0
  555. $c = "Account: saloman6107"
  556. $d = 1
  557. if $a = $c Then
  558.    $b = 1
  559. EndIf
  560. While $b <>1
  561.    Send("{down 1}")
  562.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  563.    $d = $d + 1
  564.    if $a = $c Then
  565.       $b = 1
  566.    EndIf
  567.    if $d > 61 then
  568.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  569.       Exit
  570.    EndIf
  571. WEnd
  572. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  573. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  574. WinActivate("Steam Guard — Необходима авторизация компьютера")
  575. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  576. Send('+{INS}')
  577. Send("{enter}")
  578. WinActivate("Counter-Strike: Global Offensive — Steam")
  579. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  580. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  581. WinExists("Counter-Strike: Global Offensive")
  582. WinActivate("Counter-Strike: Global Offensive")
  583. WinWaitActive("Counter-Strike: Global Offensive")
  584. $z = 0
  585. while $z = 0
  586.    $x = WinGetPos("Counter-Strike: Global Offensive")
  587.    if $x[2] < 420 and $x[3] < 420 Then
  588.       $z = 1
  589.    EndIf
  590. WEnd
  591. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6107")
  592. $m = 0
  593. While $m = 0
  594.    $k = Winlist()
  595.    for $i = 1 to $k[0][0]
  596.       if StringRegExp($k[$i][0], "(csgo - saloman6107)") then
  597.          $m = 1
  598.       EndIf
  599.    Next
  600.    if $m = 0 Then
  601.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6107")
  602.    EndIf
  603. WEnd
  604. WinExists("csgo - saloman6107")
  605. WinWaitActive("csgo - saloman6107")
  606. Sleep (3000)
  607. MouseClick('primary', 657, 365, 1)
  608. MouseClick('primary', 820, 380, 1)
  609. MouseClick('primary', 952, 614, 1)
  610.  
  611. ;1_8
  612. Run(@ScriptDir & '\saloman6108_cs.bat') ; запускаем стим
  613. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  614. WinActivate("Steam Desktop Authenticator")
  615. WinWaitActive("Steam Desktop Authenticator")
  616. Sleep (300)
  617. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  618. Sleep (300)
  619. Send("{home}")
  620. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  621. $b = 0
  622. $c = "Account: saloman6108"
  623. $d = 1
  624. if $a = $c Then
  625.    $b = 1
  626. EndIf
  627. While $b <>1
  628.    Send("{down 1}")
  629.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  630.    $d = $d + 1
  631.    if $a = $c Then
  632.       $b = 1
  633.    EndIf
  634.    if $d > 61 then
  635.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  636.       Exit
  637.    EndIf
  638. WEnd
  639. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  640. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  641. WinActivate("Steam Guard — Необходима авторизация компьютера")
  642. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  643. Send('+{INS}')
  644. Send("{enter}")
  645. WinActivate("Counter-Strike: Global Offensive — Steam")
  646. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  647. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  648. WinExists("Counter-Strike: Global Offensive")
  649. WinActivate("Counter-Strike: Global Offensive")
  650. WinWaitActive("Counter-Strike: Global Offensive")
  651. $z = 0
  652. while $z = 0
  653.    $x = WinGetPos("Counter-Strike: Global Offensive")
  654.    if $x[2] < 420 and $x[3] < 420 Then
  655.       $z = 1
  656.    EndIf
  657. WEnd
  658. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6108")
  659. $m = 0
  660. While $m = 0
  661.    $k = Winlist()
  662.    for $i = 1 to $k[0][0]
  663.       if StringRegExp($k[$i][0], "(csgo - saloman6108)") then
  664.          $m = 1
  665.       EndIf
  666.    Next
  667.    if $m = 0 Then
  668.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6108")
  669.    EndIf
  670. WEnd
  671. WinExists("csgo - saloman6108")
  672. WinWaitActive("csgo - saloman6108")
  673. Sleep (3000)
  674. MouseClick('primary', 977, 365, 1)
  675. MouseClick('primary', 1130, 380, 1)
  676. MouseClick('primary', 1272, 614, 1)
  677.  
  678. ;1_9
  679. Run(@ScriptDir & '\saloman6109_cs.bat') ; запускаем стим
  680. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  681. WinActivate("Steam Desktop Authenticator")
  682. WinWaitActive("Steam Desktop Authenticator")
  683. Sleep (300)
  684. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  685. Sleep (300)
  686. Send("{home}")
  687. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  688. $b = 0
  689. $c = "Account: saloman6109"
  690. $d = 1
  691. if $a = $c Then
  692.    $b = 1
  693. EndIf
  694. While $b <>1
  695.    Send("{down 1}")
  696.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  697.    $d = $d + 1
  698.    if $a = $c Then
  699.       $b = 1
  700.    EndIf
  701.    if $d > 61 then
  702.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  703.       Exit
  704.    EndIf
  705. WEnd
  706. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  707. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  708. WinActivate("Steam Guard — Необходима авторизация компьютера")
  709. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  710. Send('+{INS}')
  711. Send("{enter}")
  712. WinActivate("Counter-Strike: Global Offensive — Steam")
  713. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  714. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  715. WinExists("Counter-Strike: Global Offensive")
  716. WinActivate("Counter-Strike: Global Offensive")
  717. WinWaitActive("Counter-Strike: Global Offensive")
  718. $z = 0
  719. while $z = 0
  720.    $x = WinGetPos("Counter-Strike: Global Offensive")
  721.    if $x[2] < 420 and $x[3] < 420 Then
  722.       $z = 1
  723.    EndIf
  724. WEnd
  725. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6109")
  726. $m = 0
  727. While $m = 0
  728.    $k = Winlist()
  729.    for $i = 1 to $k[0][0]
  730.       if StringRegExp($k[$i][0], "(csgo - saloman6109)") then
  731.          $m = 1
  732.       EndIf
  733.    Next
  734.    if $m = 0 Then
  735.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman6109")
  736.    EndIf
  737. WEnd
  738. WinExists("csgo - saloman6109")
  739. WinWaitActive("csgo - saloman6109")
  740. Sleep (3000)
  741. MouseClick('primary', 1297, 365, 1)
  742. MouseClick('primary', 1450, 380, 1)
  743. MouseClick('primary', 1592, 614, 1)
  744.  
  745. ;1_10
  746. Run(@ScriptDir & '\saloman61010_cs.bat') ; запускаем стим
  747. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  748. WinActivate("Steam Desktop Authenticator")
  749. WinWaitActive("Steam Desktop Authenticator")
  750. Sleep (300)
  751. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  752. Sleep (300)
  753. Send("{home}")
  754. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  755. $b = 0
  756. $c = "Account: saloman61010"
  757. $d = 1
  758. if $a = $c Then
  759.    $b = 1
  760. EndIf
  761. While $b <>1
  762.    Send("{down 1}")
  763.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  764.    $d = $d + 1
  765.    if $a = $c Then
  766.       $b = 1
  767.    EndIf
  768.    if $d > 61 then
  769.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  770.       Exit
  771.    EndIf
  772. WEnd
  773. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  774. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  775. WinActivate("Steam Guard — Необходима авторизация компьютера")
  776. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  777. Send('+{INS}')
  778. Send("{enter}")
  779. WinActivate("Counter-Strike: Global Offensive — Steam")
  780. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  781. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  782. WinExists("Counter-Strike: Global Offensive")
  783. WinActivate("Counter-Strike: Global Offensive")
  784. WinWaitActive("Counter-Strike: Global Offensive")
  785. $z = 0
  786. while $z = 0
  787.    $x = WinGetPos("Counter-Strike: Global Offensive")
  788.    if $x[2] < 420 and $x[3] < 420 Then
  789.       $z = 1
  790.    EndIf
  791. WEnd
  792. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61010")
  793. $m = 0
  794. While $m = 0
  795.    $k = Winlist()
  796.    for $i = 1 to $k[0][0]
  797.       if StringRegExp($k[$i][0], "(csgo - saloman61010)") then
  798.          $m = 1
  799.       EndIf
  800.    Next
  801.    if $m = 0 Then
  802.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61010")
  803.    EndIf
  804. WEnd
  805. WinExists("csgo - saloman61010")
  806. WinWaitActive("csgo - saloman61010")
  807. Sleep (3000)
  808. MouseClick('primary', 1617, 365, 1)
  809. MouseClick('primary', 1770, 380, 1)
  810. MouseClick('primary', 1912, 614, 1)
  811.  
  812. ;1_11
  813. Run(@ScriptDir & '\saloman61011_cs.bat') ; запускаем стим
  814. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  815. WinActivate("Steam Desktop Authenticator")
  816. WinWaitActive("Steam Desktop Authenticator")
  817. Sleep (300)
  818. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  819. Sleep (300)
  820. Send("{home}")
  821. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  822. $b = 0
  823. $c = "Account: saloman61011"
  824. $d = 1
  825. if $a = $c Then
  826.    $b = 1
  827. EndIf
  828. While $b <>1
  829.    Send("{down 1}")
  830.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  831.    $d = $d + 1
  832.    if $a = $c Then
  833.       $b = 1
  834.    EndIf
  835.    if $d > 61 then
  836.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  837.       Exit
  838.    EndIf
  839. WEnd
  840. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  841. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  842. WinActivate("Steam Guard — Необходима авторизация компьютера")
  843. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  844. Send('+{INS}')
  845. Send("{enter}")
  846. WinActivate("Counter-Strike: Global Offensive — Steam")
  847. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  848. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  849. WinExists("Counter-Strike: Global Offensive")
  850. WinActivate("Counter-Strike: Global Offensive")
  851. WinWaitActive("Counter-Strike: Global Offensive")
  852. $z = 0
  853. while $z = 0
  854.    $x = WinGetPos("Counter-Strike: Global Offensive")
  855.    if $x[2] < 420 and $x[3] < 420 Then
  856.       $z = 1
  857.    EndIf
  858. WEnd
  859. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61011")
  860. $m = 0
  861. While $m = 0
  862.    $k = Winlist()
  863.    for $i = 1 to $k[0][0]
  864.       if StringRegExp($k[$i][0], "(csgo - saloman61011)") then
  865.          $m = 1
  866.       EndIf
  867.    Next
  868.    if $m = 0 Then
  869.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61011")
  870.    EndIf
  871. WEnd
  872. WinExists("csgo - saloman61011")
  873. WinWaitActive("csgo - saloman61011")
  874. Sleep (3000)
  875. MouseClick('primary', 17, 665, 1)
  876. MouseClick('primary', 170, 680, 1)
  877. MouseClick('primary', 312, 914, 1)
  878.  
  879. ;1_12
  880. Run(@ScriptDir & '\saloman61012_cs.bat') ; запускаем стим
  881. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  882. WinActivate("Steam Desktop Authenticator")
  883. WinWaitActive("Steam Desktop Authenticator")
  884. Sleep (300)
  885. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  886. Sleep (300)
  887. Send("{home}")
  888. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  889. $b = 0
  890. $c = "Account: saloman61012"
  891. $d = 1
  892. if $a = $c Then
  893.    $b = 1
  894. EndIf
  895. While $b <>1
  896.    Send("{down 1}")
  897.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  898.    $d = $d + 1
  899.    if $a = $c Then
  900.       $b = 1
  901.    EndIf
  902.    if $d > 61 then
  903.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  904.       Exit
  905.    EndIf
  906. WEnd
  907. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  908. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  909. WinActivate("Steam Guard — Необходима авторизация компьютера")
  910. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  911. Send('+{INS}')
  912. Send("{enter}")
  913. WinActivate("Counter-Strike: Global Offensive — Steam")
  914. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  915. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  916. WinExists("Counter-Strike: Global Offensive")
  917. WinActivate("Counter-Strike: Global Offensive")
  918. WinWaitActive("Counter-Strike: Global Offensive")
  919. $z = 0
  920. while $z = 0
  921.    $x = WinGetPos("Counter-Strike: Global Offensive")
  922.    if $x[2] < 420 and $x[3] < 420 Then
  923.       $z = 1
  924.    EndIf
  925. WEnd
  926. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61012")
  927. $m = 0
  928. While $m = 0
  929.    $k = Winlist()
  930.    for $i = 1 to $k[0][0]
  931.       if StringRegExp($k[$i][0], "(csgo - saloman61012)") then
  932.          $m = 1
  933.       EndIf
  934.    Next
  935.    if $m = 0 Then
  936.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61012")
  937.    EndIf
  938. WEnd
  939. WinExists("csgo - saloman61012")
  940. WinWaitActive("csgo - saloman61012")
  941. Sleep (3000)
  942. MouseClick('primary', 337, 665, 1)
  943. MouseClick('primary', 490, 680, 1)
  944. MouseClick('primary', 632, 914, 1)
  945.  
  946. ;1_13
  947. Run(@ScriptDir & '\saloman61013_cs.bat') ; запускаем стим
  948. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  949. WinActivate("Steam Desktop Authenticator")
  950. WinWaitActive("Steam Desktop Authenticator")
  951. Sleep (300)
  952. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  953. Sleep (300)
  954. Send("{home}")
  955. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  956. $b = 0
  957. $c = "Account: saloman61013"
  958. $d = 1
  959. if $a = $c Then
  960.    $b = 1
  961. EndIf
  962. While $b <>1
  963.    Send("{down 1}")
  964.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  965.    $d = $d + 1
  966.    if $a = $c Then
  967.       $b = 1
  968.    EndIf
  969.    if $d > 61 then
  970.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  971.       Exit
  972.    EndIf
  973. WEnd
  974. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  975. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  976. WinActivate("Steam Guard — Необходима авторизация компьютера")
  977. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  978. Send('+{INS}')
  979. Send("{enter}")
  980. WinActivate("Counter-Strike: Global Offensive — Steam")
  981. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  982. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  983. WinExists("Counter-Strike: Global Offensive")
  984. WinActivate("Counter-Strike: Global Offensive")
  985. WinWaitActive("Counter-Strike: Global Offensive")
  986. $z = 0
  987. while $z = 0
  988.    $x = WinGetPos("Counter-Strike: Global Offensive")
  989.    if $x[2] < 420 and $x[3] < 420 Then
  990.       $z = 1
  991.    EndIf
  992. WEnd
  993. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61013")
  994. $m = 0
  995. While $m = 0
  996.    $k = Winlist()
  997.    for $i = 1 to $k[0][0]
  998.       if StringRegExp($k[$i][0], "(csgo - saloman61013)") then
  999.          $m = 1
  1000.       EndIf
  1001.    Next
  1002.    if $m = 0 Then
  1003.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61013")
  1004.    EndIf
  1005. WEnd
  1006. WinExists("csgo - saloman61013")
  1007. WinWaitActive("csgo - saloman61013")
  1008. Sleep (3000)
  1009. MouseClick('primary', 657, 665, 1)
  1010. MouseClick('primary', 810, 680, 1)
  1011. MouseClick('primary', 952, 914, 1)
  1012.  
  1013. ;1_14
  1014. Run(@ScriptDir & '\saloman61014_cs.bat') ; запускаем стим
  1015. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  1016. WinActivate("Steam Desktop Authenticator")
  1017. WinWaitActive("Steam Desktop Authenticator")
  1018. Sleep (300)
  1019. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  1020. Sleep (300)
  1021. Send("{home}")
  1022. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  1023. $b = 0
  1024. $c = "Account: saloman61014"
  1025. $d = 1
  1026. if $a = $c Then
  1027.    $b = 1
  1028. EndIf
  1029. While $b <>1
  1030.    Send("{down 1}")
  1031.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  1032.    $d = $d + 1
  1033.    if $a = $c Then
  1034.       $b = 1
  1035.    EndIf
  1036.    if $d > 61 then
  1037.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  1038.       Exit
  1039.    EndIf
  1040. WEnd
  1041. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  1042. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  1043. WinActivate("Steam Guard — Необходима авторизация компьютера")
  1044. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  1045. Send('+{INS}')
  1046. Send("{enter}")
  1047. WinActivate("Counter-Strike: Global Offensive — Steam")
  1048. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  1049. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  1050. WinExists("Counter-Strike: Global Offensive")
  1051. WinActivate("Counter-Strike: Global Offensive")
  1052. WinWaitActive("Counter-Strike: Global Offensive")
  1053. $z = 0
  1054. while $z = 0
  1055.    $x = WinGetPos("Counter-Strike: Global Offensive")
  1056.    if $x[2] < 420 and $x[3] < 420 Then
  1057.       $z = 1
  1058.    EndIf
  1059. WEnd
  1060. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61014")
  1061. $m = 0
  1062. While $m = 0
  1063.    $k = Winlist()
  1064.    for $i = 1 to $k[0][0]
  1065.       if StringRegExp($k[$i][0], "(csgo - saloman61014)") then
  1066.          $m = 1
  1067.       EndIf
  1068.    Next
  1069.    if $m = 0 Then
  1070.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61014")
  1071.    EndIf
  1072. WEnd
  1073. WinExists("csgo - saloman61014")
  1074. WinWaitActive("csgo - saloman61014")
  1075. Sleep (3000)
  1076. MouseClick('primary', 977, 665, 1)
  1077. MouseClick('primary', 1130, 680, 1)
  1078. MouseClick('primary', 1272, 914, 1)
  1079.  
  1080. ;1_15
  1081. Run(@ScriptDir & '\saloman61015_cs.bat') ; запускаем стим
  1082. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  1083. WinActivate("Steam Desktop Authenticator")
  1084. WinWaitActive("Steam Desktop Authenticator")
  1085. Sleep (300)
  1086. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  1087. Sleep (300)
  1088. Send("{home}")
  1089. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  1090. $b = 0
  1091. $c = "Account: saloman61015"
  1092. $d = 1
  1093. if $a = $c Then
  1094.    $b = 1
  1095. EndIf
  1096. While $b <>1
  1097.    Send("{down 1}")
  1098.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  1099.    $d = $d + 1
  1100.    if $a = $c Then
  1101.       $b = 1
  1102.    EndIf
  1103.    if $d > 61 then
  1104.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  1105.       Exit
  1106.    EndIf
  1107. WEnd
  1108. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  1109. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  1110. WinActivate("Steam Guard — Необходима авторизация компьютера")
  1111. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  1112. Send('+{INS}')
  1113. Send("{enter}")
  1114. WinActivate("Counter-Strike: Global Offensive — Steam")
  1115. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  1116. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  1117. WinExists("Counter-Strike: Global Offensive")
  1118. WinActivate("Counter-Strike: Global Offensive")
  1119. WinWaitActive("Counter-Strike: Global Offensive")
  1120. $z = 0
  1121. while $z = 0
  1122.    $x = WinGetPos("Counter-Strike: Global Offensive")
  1123.    if $x[2] < 420 and $x[3] < 420 Then
  1124.       $z = 1
  1125.    EndIf
  1126. WEnd
  1127. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61015")
  1128. $m = 0
  1129. While $m = 0
  1130.    $k = Winlist()
  1131.    for $i = 1 to $k[0][0]
  1132.       if StringRegExp($k[$i][0], "(csgo - saloman61015)") then
  1133.          $m = 1
  1134.       EndIf
  1135.    Next
  1136.    if $m = 0 Then
  1137.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61015")
  1138.    EndIf
  1139. WEnd
  1140. WinExists("csgo - saloman61015")
  1141. WinWaitActive("csgo - saloman61015")
  1142. Sleep (3000)
  1143. MouseClick('primary', 1297, 665, 1)
  1144. MouseClick('primary', 1450, 680, 1)
  1145. MouseClick('primary', 1592, 914, 1)
  1146.  
  1147. ;1_16
  1148. Run(@ScriptDir & '\saloman61016_cs.bat') ; запускаем стим
  1149. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  1150. WinActivate("Steam Desktop Authenticator")
  1151. WinWaitActive("Steam Desktop Authenticator")
  1152. Sleep (300)
  1153. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.LISTBOX.app.0.afceb_r9_ad1; INSTANCE:1]")
  1154. Sleep (300)
  1155. Send("{home}")
  1156. $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  1157. $b = 0
  1158. $c = "Account: saloman61016"
  1159. $d = 1
  1160. if $a = $c Then
  1161.    $b = 1
  1162. EndIf
  1163. While $b <>1
  1164.    Send("{down 1}")
  1165.    $a = ControlGetText ("Steam Desktop Authenticator", "", "[Class:WindowsForms10.Window.8.app.0.afceb_r9_ad1; INSTANCE:1]")
  1166.    $d = $d + 1
  1167.    if $a = $c Then
  1168.       $b = 1
  1169.    EndIf
  1170.    if $d > 61 then
  1171.       MsgBox (0, "Ошибка", "Аккаунт отсутствует в SDA")
  1172.       Exit
  1173.    EndIf
  1174. WEnd
  1175. ControlClick("Steam Desktop Authenticator", "", "[Class:WindowsForms10.BUTTON.app.0.afceb_r9_ad1; INSTANCE:3]")
  1176. WinSetState("Steam Desktop Authenticator", "", @SW_MINIMIZE)
  1177. WinActivate("Steam Guard — Необходима авторизация компьютера")
  1178. WinWaitActive("Steam Guard — Необходима авторизация компьютера")
  1179. Send('+{INS}')
  1180. Send("{enter}")
  1181. WinActivate("Counter-Strike: Global Offensive — Steam")
  1182. WinWaitActive("Counter-Strike: Global Offensive — Steam")
  1183. WinWaitClose("Counter-Strike: Global Offensive — Steam")
  1184. WinExists("Counter-Strike: Global Offensive")
  1185. WinActivate("Counter-Strike: Global Offensive")
  1186. WinWaitActive("Counter-Strike: Global Offensive")
  1187. $z = 0
  1188. while $z = 0
  1189.    $x = WinGetPos("Counter-Strike: Global Offensive")
  1190.    if $x[2] < 420 and $x[3] < 420 Then
  1191.       $z = 1
  1192.    EndIf
  1193. WEnd
  1194. WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61016")
  1195. $m = 0
  1196. While $m = 0
  1197.    $k = Winlist()
  1198.    for $i = 1 to $k[0][0]
  1199.       if StringRegExp($k[$i][0], "(csgo - saloman61016)") then
  1200.          $m = 1
  1201.       EndIf
  1202.    Next
  1203.    if $m = 0 Then
  1204.       WinSetTitle("Counter-Strike: Global Offensive", "", "csgo - saloman61016")
  1205.    EndIf
  1206. WEnd
  1207. WinExists("csgo - saloman61016")
  1208. WinWaitActive("csgo - saloman61016")
  1209. Sleep (3000)
  1210. MouseClick('primary', 1617, 665, 1)
  1211. MouseClick('primary', 1770, 680, 1)
  1212. MouseClick('primary', 1912, 914, 1)
  1213. Exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!