Guest User

modified

a guest
Jul 17th, 2020
918
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.59 KB | None | 0 0
  1. ^S::
  2.  
  3. loop {
  4.  
  5. ToolTip, Go To choose Character Screen (Loop %A_index%), 0, 0
  6.  
  7. Sleep, 750
  8. Send {p} ; menu
  9. Sleep, 750
  10.  
  11. send {right}
  12. sleep ,750
  13. send {right}
  14. sleep ,750
  15. send {right}
  16. sleep ,750
  17. send {right}
  18. sleep ,750
  19. send {right}
  20. sleep ,750
  21. send {enter}
  22. sleep ,7501
  23. sleep ,750
  24. send {down}
  25. sleep ,750
  26. send {down}
  27. sleep ,750
  28. send {down}
  29. sleep ,750
  30. send {down}
  31.  
  32. sleep,750
  33. send {enter}
  34. sleep, 750
  35. send {enter}
  36.  
  37. ToolTip, Wating For Swap Character Screen Confirmation (Loop %A_index%), 0, 0
  38.  
  39. Loop {
  40. Sleep, 500
  41. PixelGetColor, color, 785,586
  42. Sleep, 500
  43. } Until (color="0xF4F4F4") ; character select screen confirmation
  44.  
  45. ToolTip, Step 3/12 - Switching To First Character And Disconnecting , 0, 0
  46.  
  47. Sleep, 500
  48. Send {Left} ; 1st char
  49. Sleep, 1000
  50. Send {Enter}
  51. Sleep, 5000
  52.  
  53. ;-------------------------------Edit The Directory Here-------------------------------
  54.  
  55. cmdline := "netsh advfirewall firewall add rule name=""BATCH GTA 5 BLOCK"" dir=out action=block program=""E:\gta v\GTAV\GTA5.exe"""
  56. runwait, %cmdline%,, Hide
  57.  
  58. ;-------------------------------------------------------------------------------------
  59.  
  60. Sleep, 5000
  61. Send {Enter}
  62. Sleep, 50
  63.  
  64. cmdline := "netsh advfirewall firewall delete rule name=""BATCH GTA 5 BLOCK"""
  65. runwait, %cmdline%,, Hide
  66.  
  67. Sleep, 7000
  68. Send {Enter}
  69.  
  70.  
  71. Sleep, 7000
  72. Send {Enter}
  73.  
  74. ToolTip, Suspending And Wating For Second Character To Load (Loop %A_index%), 0, 0
  75.  
  76. ;-----Suspend
  77.  
  78. Sleep 45000
  79. Process_Suspend("GTA5.exe")
  80. Sleep, 15000
  81. Process_Resume("GTA5.exe")
  82.  
  83. ;-----------xxxxxxxxxxxx----------------
  84.  
  85. ;----Suspend Function
  86. Process_Suspend(PID_or_Name){
  87. PID := (InStr(PID_or_Name,".")) ? ProcExist(PID_or_Name) : PID_or_Name
  88. h:=DllCall("OpenProcess", "uInt", 0x1F0FFF, "Int", 0, "Int", pid)
  89. If !h
  90. Return -1
  91. DllCall("ntdll.dll\NtSuspendProcess", "Int", h)
  92. DllCall("CloseHandle", "Int", h)
  93. }
  94.  
  95. ;----Resume Function
  96. Process_Resume(PID_or_Name){
  97. PID := (InStr(PID_or_Name,".")) ? ProcExist(PID_or_Name) : PID_or_Name
  98. h:=DllCall("OpenProcess", "uInt", 0x1F0FFF, "Int", 0, "Int", pid)
  99. If !h
  100. Return -1
  101. DllCall("ntdll.dll\NtResumeProcess", "Int", h)
  102. DllCall("CloseHandle", "Int", h)
  103. }
  104. ProcExist(PID_or_Name=""){
  105. Process, Exist, % (PID_or_Name="") ? DllCall("GetCurrentProcessID") : PID_or_Name
  106. Return Errorlevel
  107. }
  108. ;------
  109.  
  110. Loop {
  111. Sleep, 5000
  112. Send {Up}
  113. PixelGetColor, color, 653, 318
  114. } Until (color="0x000000")
  115.  
  116. ;------------------xxxxxxxxxxxxxx------------------
  117.  
  118. ToolTip, Selling Apts (Loop %A_index%), 0, 0
  119.  
  120. Sleep, 700
  121. Send {Down}
  122. Sleep, 700
  123. Send {Down}
  124. Sleep, 700
  125. Send {Enter}
  126. Sleep, 2000
  127. MouseClick, left, 604, 437,2, 10 ; Dynasty8
  128. Sleep, 1500
  129. MouseClick, left, 229, 320,2, 10 ; View Property
  130. Sleep, 1500
  131. MouseClick, left, 183, 186,2, 10 ; low to high
  132. Sleep, 1500
  133. MouseClick, left, 213, 312,2, 10
  134. Sleep, 1500
  135. MouseClick, left, 620, 435,2, 10
  136.  
  137. Sleep, 800
  138. Send {Enter}
  139. Sleep, 800
  140. Send {Enter}
  141. Sleep, 5000
  142.  
  143. sleep, 2000
  144. MouseClick, left, 381, 476, 2, 10 ; back to map
  145. Sleep, 1500
  146. MouseClick, left, 233, 183, 2, 10 ; high to low
  147. Sleep, 1500
  148. MouseClick, left, 183, 186, 2, 10 ; low to high
  149. Sleep, 1500
  150. MouseClick, left, 213, 312, 2, 10
  151. Sleep, 1500
  152. MouseClick, left, 620, 435, 2, 10
  153. Sleep, 1500
  154.  
  155. send {down}
  156. Sleep, 800
  157. Send {Enter}
  158. Sleep, 800
  159. Send {Enter}
  160. Sleep, 5000
  161.  
  162. sleep, 2000
  163. MouseClick, left, 381, 476, 2, 10 ; back to map
  164. Sleep, 1500
  165. MouseClick, left, 233, 183, 2, 10 ; high to low
  166. Sleep, 1500
  167. MouseClick, left, 183, 186, 2, 10 ; low to high
  168. Sleep, 1500
  169. MouseClick, left, 213, 312, 2, 10
  170. Sleep, 1500
  171. MouseClick, left, 620, 435, 2, 10
  172. Sleep, 1500
  173.  
  174. send {down}
  175. Sleep, 800
  176. send {down}
  177. Sleep, 800
  178. Send {Enter}
  179. Sleep, 800
  180. Send {Enter}
  181. Sleep, 5000
  182.  
  183. sleep, 2000
  184. MouseClick, left, 381, 476, 2, 10 ; back to map
  185. Sleep, 1500
  186. MouseClick, left, 233, 183, 2, 10 ; high to low
  187. Sleep, 1500
  188. MouseClick, left, 183, 186, 2, 10 ; low to high
  189. Sleep, 1500
  190. MouseClick, left, 213, 312, 2, 10
  191. Sleep, 1500
  192. MouseClick, left, 620, 435, 2, 10
  193. Sleep, 1500
  194.  
  195. send {down}
  196. Sleep, 800
  197. send {down}
  198. Sleep, 800
  199. send {down}
  200. Sleep, 800
  201. Send {Enter}
  202. Sleep, 800
  203. Send {Enter}
  204. Sleep, 5000
  205.  
  206. sleep, 2000
  207. MouseClick, left, 381, 476, 2, 10 ; back to map
  208. Sleep, 1500
  209. MouseClick, left, 233, 183, 2, 10 ; high to low
  210. Sleep, 1500
  211. MouseClick, left, 183, 186, 2, 10 ; low to high
  212. Sleep, 1500
  213. MouseClick, left, 213, 312, 2, 10
  214. Sleep, 1500
  215. MouseClick, left, 620, 435, 2, 10
  216. Sleep, 1500
  217.  
  218. send {down}
  219. Sleep, 800
  220. send {down}
  221. Sleep, 800
  222. send {down}
  223. Sleep, 800
  224. send {down}
  225. Sleep, 800
  226. Send {Enter}
  227. Sleep, 800
  228. Send {Enter}
  229. Sleep, 5000
  230.  
  231. sleep, 2000
  232. MouseClick, left, 381, 476, 2, 10 ; back to map
  233. Sleep, 1500
  234. MouseClick, left, 233, 183, 2, 10 ; high to low
  235. Sleep, 1500
  236. MouseClick, left, 183, 186, 2, 10 ; low to high
  237. Sleep, 1500
  238. MouseClick, left, 213, 312, 2, 10
  239. Sleep, 1500
  240. MouseClick, left, 620, 435, 2, 10
  241. Sleep, 1500
  242.  
  243. send {down}
  244. Sleep, 800
  245. send {down}
  246. Sleep, 800
  247. send {down}
  248. Sleep, 800
  249. send {down}
  250. Sleep, 800
  251. send {down}
  252. Sleep, 800
  253. Send {Enter}
  254. Sleep, 800
  255. Send {Enter}
  256. Sleep, 5000
  257.  
  258. MouseClick, left, 654, 52, 5, 25 ; exit browser
  259.  
  260. ToolTip, loading single player (Loop %A_index%), 0, 0
  261. sleep,800
  262. send {p}
  263. sleep,800
  264. send {right}
  265. sleep,800
  266. send {enter}
  267. sleep,800
  268. send {up}
  269. sleep,800
  270. send {up}
  271. sleep,800
  272. send {enter}
  273. sleep, 800
  274. send {enter}
  275.  
  276. ToolTip, Waiting To Load (Loop %A_index%), 0, 0
  277. Loop {
  278. Sleep, 5000
  279. Send {Up}
  280. Sleep, 500
  281. PixelGetColor, color, 653, 318
  282. } Until (color="0x000000") ; Load Confirmation
  283.  
  284. Sleep, 1500
  285.  
  286. If (A_Index >= 100) ;
  287. Return
  288. }
  289. ^Esc::ExitApp
Add Comment
Please, Sign In to add comment