API tools faq
paste
Guest User

Chest MultiBoxing v2

a guest
May 8th, 2014
197
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.61 KB | None | 0 0
raw download clone embed print report
  1. ;//////////////////////////////////////
  2. ;// MADE BY www.GG-bots.com // ENJOY!//
  3. ;//////////////////////////////////////
  4. #RequireAdmin
  5.  
  6. #include <WindowsConstants.au3>
  7. #include <GUIConstants.au3>
  8. #include <GUIConstantsEx.au3>
  9. #include <ButtonConstants.au3>
  10. #include <GUIConstantsEx.au3>
  11. #include <StaticConstants.au3>
  12. #include <WindowsConstants.au3>
  13. #include <GuiButton.au3>
  14.  
  15. Global $PauseUnpause
  16. Global $UnPaused
  17.  
  18. Opt("GUIOnEventMode", 1)
  19. Opt("TrayMenuMode", 1)
  20. Opt("MouseCoordMode", 2)
  21. Opt("PixelCoordMode", 2)
  22. Opt("SendCapslockMode", 0)
  23.  
  24. HotKeySet("{F5}", "Start") ;;Start Script
  25. HotKeySet("{F6}", "Pause") ;;Pause Script
  26. HotKeySet("{F7}", "ExitScript") ;;Exit Script
  27. HotKeySet("{NUMPAD2}", "MouseCoords") ;;Toggle GUI for mouse coordinates and the Hex color it's on
  28. HotKeySet("{NUMPAD0}", "PauseUnpause") ;;Freeze coords and pixel info
  29.  
  30. ;;----;\
  31. ;;;GUI;;> DON'T CHANGE! This is for the Pixel/mouse coordinate tool. Enable this with NUMPAD 2, NUMPAD 0 will freeze the value, I use this to find coordinates and pixel colors.
  32. ;;----;/
  33. #Region ### START Koda GUI section ### Form=C:\Users\BLACKFENCER\Downloads\BotStuff\CovBot\Exploit-o-bot-GUI.kxf
  34. $Form1 = GUICreate("MultiBox this Bitch", 269, 107, 196, 131)
  35. $Button1 = GUICtrlCreateButton("Start", 16, 72, 75, 25)
  36. $Button2 = GUICtrlCreateButton("Pause", 96, 72, 75, 25)
  37. $Button3 = GUICtrlCreateButton("Exit/Stop", 176, 72, 75, 25)
  38. $Radio1 = GUICtrlCreateRadio("Fuck the Coven", 8, 24, 113, 17)
  39. $Radio2 = GUICtrlCreateRadio("Battlefields: Siege Runes Chests", 8, 48, 177, 17)
  40. $Label1 = GUICtrlCreateLabel("Choose Exploit to run:", 8, 8, 107, 17)
  41. $Label2 = GUICtrlCreateLabel("(25% MS)", 184, 48, 55, 17)
  42. $Label3 = GUICtrlCreateLabel("(Monk Only for now)", 120, 24, 99, 17)
  43. GUICtrlSetOnEvent($Button1, "Start")
  44. GUICtrlSetOnEvent($Button3, "ExitScript")
  45. GUISetState(@SW_SHOW)
  46. #EndRegion ### END Koda GUI section ###
  47.  
  48. GUICreate("Cursor Info", 160, 40, -1, -1, -1, $WS_EX_TOOLWINDOW + $WS_EX_TOPMOST)
  49. $label1 = GUICtrlCreateLabel("", 5, 5, 150, 15)
  50. $label2 = GUICtrlCreateLabel("", 5, 20, 150, 15)
  51. $ox = -1
  52. $oy = -1
  53. $oc = -1
  54. ;------------------------------------------------------------------------;
  55. Func SetLabels($x, $y, $col)
  56. $textPos = "Mouse pos x:" & $x & " y:" & $y
  57. $textCol = "Color: " & Hex($col, 6)
  58. GUICtrlSetData($label1, $textPos)
  59. GUICtrlSetData($label2, $textCol)
  60. EndFunc ;==>SetLabels
  61. ;------------------------------------------------------------------------;
  62. Func MousePos()
  63. $pos = MouseGetPos()
  64. $col = PixelGetColor($pos[0], $pos[1])
  65. If ($ox <> $pos[0] Or $oy <> $pos[1] Or $oc <> $col) Then
  66. $ox = $pos[0]
  67. $oy = $pos[1]
  68. $oc = $col
  69. SetLabels($pos[0], $pos[1], $col)
  70. EndIf
  71. EndFunc ;==>MousePos
  72. ;------------------------------------------------------------------------;
  73. Func MouseCoords()
  74.  
  75. GUISetState(@SW_SHOW)
  76.  
  77. $PauseUnpause = 1
  78.  
  79. While 1
  80.  
  81. If $PauseUnpause = 1 Then
  82. Switch GUIGetMsg()
  83. Case $GUI_EVENT_CLOSE
  84. Exit
  85.  
  86. EndSwitch
  87. MousePos()
  88. Sleep(25)
  89.  
  90. EndIf
  91. WEnd
  92. EndFunc ;==>MouseCoords
  93. ;------------------------------------------------------------------------;
  94. Func PauseUnpause()
  95. $PauseUnpause = $PauseUnpause * - 1 + 1
  96. EndFunc ;==>PauseUnpause
  97.  
  98. ;;-----------------;\
  99. ;;;HOTKEY FUNCTIONS;;>
  100. ;;-----------------;/
  101.  
  102. Func Start()
  103. WinActivate("Diablo III")
  104. $UnPaused = Not $UnPaused
  105. $Coven = _GUICtrlButton_GetCheck ($Radio1)
  106. $Battlefields = _GUICtrlButton_GetCheck ($Radio2)
  107. If $Battlefields = $BST_CHECKED Then
  108. RoutineSiege()
  109. ElseIf $Coven = $BST_CHECKED Then
  110. RoutineCoven()
  111. EndIf
  112. EndFunc ;==>Start
  113. ;------------------------------------------------------------------------;
  114. Func Pause()
  115. While 1
  116. Sleep(10)
  117. WEnd
  118. EndFunc ;==>Pause
  119. ;------------------------------------------------------------------------;
  120. Func ExitScript()
  121. Exit
  122. EndFunc ;==>ExitScript
  123. ;------------------------------------------------------------------------;
  124.  
  125. While 1
  126. Sleep (10)
  127. WEnd
  128.  
  129. ;;---------;\
  130. ;;;Main Run;;>
  131. ;;---------;/
  132.  
  133. Func RoutineCoven()
  134. While $UnPaused
  135. MouseClick("left", 150, 334, 1, 0) ;Clicking Resume Game
  136. Sleep(Random(14000, 15000, 1))
  137. MouseClick("left", 208, 72, 2, 0) ;Moving...
  138. Sleep(5500)
  139. Sleep(Random(5500, 6000, 1))
  140. MouseClick("left", 1139, 544, 1, 0) ;Moving...
  141. Sleep(Random(1500, 1700, 1))
  142. MouseMove (1169, 0, 0) ;Moving...
  143. Sleep(Random(100, 120, 1))
  144. Send("{2 DOWN}") ;Dashing strike over wall..
  145. Sleep(Random(100, 120, 1))
  146. Send("{2 UP}")
  147. Sleep(Random(500, 600, 1))
  148. MouseMove (1894, 777, 0) ;Moving...
  149. Sleep(Random(100, 120, 1))
  150. Send("{2 DOWN}") ;Dashing strike over wall..
  151. Sleep(Random(100, 120, 1))
  152. Send("{2 UP}")
  153. Sleep(Random(500, 600, 1))
  154. MouseClick("left", 1812, 1079, 1, 0) ;Moving...
  155. Sleep(Random(2000, 2200, 1))
  156. MouseClick("left", 961, 610, 1, 0) ;Moving...
  157. Sleep(Random(500, 600, 1))
  158.  
  159. $QuestGiver = PixelSearch(1000, 600, 1415, 960, 0x585D59, 2) ;Checking for Quest
  160. If @Error Then ;Exit game and restart if quest isn't there
  161. Send("{T DOWN}")
  162. Sleep(Random(100, 120, 1))
  163. Send("{T UP}")
  164. Sleep(Random(6500, 7000, 1))
  165. Send("{ESC DOWN}")
  166. Sleep(Random(100, 120, 1))
  167. Send("{ESC UP}")
  168. Sleep(Random(1000, 1200, 1))
  169. MouseClick("left", 253, 479, 1, 0) ;Moving...
  170. Sleep(Random(6000, 6600, 1))
  171.  
  172. ElseIf Not @Error Then
  173. MouseClick("left", $QuestGiver[0] - 6, $QuestGiver[1] - 3, 2, 0) ;Clicking Quest NPC if he's there
  174. Sleep(Random(3000, 3200, 1))
  175. MouseClick("left", 428, 0, 1, 0) ;Moving...
  176. Sleep(Random(3000, 3200, 1))
  177. MouseClick("left", 255, 109, 1, 0) ;Moving...
  178. Sleep(Random(3000, 3200, 1))
  179. MouseMove (0, 1030, 0) ;Moving...
  180. Sleep(Random(100, 120, 1))
  181. Send("{2 DOWN}") ;Dashing strike over wall..
  182. Sleep(Random(100, 120, 1))
  183. Send("{2 UP}")
  184. Sleep(Random(600, 720, 1))
  185. MouseMove (320, 1079, 0) ;Moving...
  186. Sleep(Random(100, 120, 1))
  187. Send("{2 DOWN}") ;Dashing strike over wall..
  188. Sleep(Random(100, 120, 1))
  189. Send("{2 UP}")
  190. Sleep(Random(600, 720, 1))
  191. MouseClick("left", 1154, 969, 1, 0) ;Moving...
  192. Sleep(Random(1600, 1800, 1))
  193. MouseClick("left", 1230, 818, 1, 0) ;Moving...
  194. Sleep(Random(800, 1000, 1))
  195.  
  196. Do
  197. $QuestTurnIn = PixelSearch(1250, 250, 1760, 550, 0x83767C, 1) ;Checking for Turn-in NPC, searches for the pixel until it is found, this assures that the quest was turned in properly.
  198. Until Not @error
  199.  
  200. If Not @Error Then
  201. MouseClick("left", $QuestTurnIn[0], $QuestTurnIn[1] + 10, 2, 0) ;Clicking Turn-in NPC and exiting the game.
  202. Sleep(Random(3000, 3200, 1))
  203. Send("{T DOWN}")
  204. Sleep(Random(100, 120, 1))
  205. Send("{T UP}")
  206. Sleep(Random(6500, 6700, 1))
  207. Send("{ESC DOWN}")
  208. Sleep(Random(100, 120, 1))
  209. Send("{ESC UP}")
  210. Sleep(Random(1000, 1200, 1))
  211. MouseClick("left", 253, 479, 1, 0) ;Moving...
  212. Sleep(Random(6000, 6200, 1))
  213. EndIf
  214. EndIf
  215. WEnd
  216. EndFunc
  217.  
  218. ;//////Siege Chests///////
  219. Func RoutineSiege()
  220. While $UnPaused
  221. MouseClick("left", 150, 334, 1, 0) ;Clicking Resume Game
  222. Sleep(Random(18500, 19000, 1))
  223. Send("{M DOWN}")
  224. Sleep(Random(100, 120, 1))
  225. Send("{M UP}")
  226. Sleep(Random(600, 720, 1))
  227. MouseClick("left", 329, 191, 1, 0) ;Clicking WayPoint
  228. Sleep(Random(600, 720, 1))
  229. MouseClick("left", 329, 191, 1, 0) ;Clicking WayPoint
  230. Sleep(Random(8400, 8600, 1))
  231. MouseClick("left", 616, 440, 3, 0)
  232. Sleep(Random(2800, 3000, 1))
  233. MouseClick("left", 91, 334, 3, 0)
  234. Sleep(Random(2800, 3000, 1))
  235.  
  236. $Chest1 = PixelSearch(490, 167, 804, 446, 0xb6a1ad, 2) ;Check for Chest
  237. $Chest1 = PixelSearch(490, 167, 804, 446, 0xb6a1ad, 2) ;Check for Chest
  238. If Not @error Then
  239. MouseClick("left", $Chest1[0], $Chest1[1] + 24, 2, 1) ;Looting Chest
  240. MouseClick("left", $Chest1[0], $Chest1[1] + 24, 2, 1) ;Loot Chest // In case of missed first time
  241. Sleep(Random(2200, 2300, 1))
  242. Loot()
  243. Sleep(Random(400, 600, 1))
  244. Send("{T DOWN}")
  245. Sleep(Random(100, 120, 1))
  246. Send("{T UP}")
  247. Sleep(Random(7100, 7300, 1))
  248. Send("{ESC DOWN}")
  249. Sleep(Random(100, 120, 1))
  250. Send("{ESC UP}")
  251. Sleep(Random(3500, 3900, 1))
  252. MouseClick("left", 131, 318, 1, 0)
  253. Sleep(Random(10300, 10500, 1))
  254.  
  255. ElseIf @error Then
  256. Sleep(Random(600, 900, 1))
  257. MouseClick("left", 648, 612, 3, 0)
  258. Sleep(Random(2900, 3120, 1))
  259. MouseClick("left", 652, 641, 3, 0)
  260. Sleep(Random(2900, 3100, 1))
  261. MouseClick("left", 483, 324, 2, 0)
  262. Sleep(Random(2200, 2400, 1))
  263. Loot()
  264. Sleep(Random(400, 600, 1))
  265. Send("{T DOWN}")
  266. Sleep(Random(100, 120, 1))
  267. Send("{T UP}")
  268. Sleep(Random(7100, 7300, 1))
  269. Send("{ESC DOWN}")
  270. Sleep(Random(100, 120, 1))
  271. Send("{ESC UP}")
  272. Sleep(Random(3500, 3900, 1))
  273. MouseClick("left", 131, 318, 1, 0)
  274. Sleep(Random(10300, 10500, 1))
  275. EndIf
  276. WEnd
  277. EndFunc
  278.  
  279.  
  280. Func Loot() ;//These functions basically look for Chests/Bodies and also loots Legs/Sets.
  281. MouseMove(689, 353, 1)
  282. Send("{W Down}")
  283. Sleep(Random(100, 120, 1))
  284. Send("{W Up}")
  285. Sleep(Random(800, 1000, 1))
  286. Send("{ALTDOWN}")
  287. Sleep(Random(300, 400, 1))
  288. Send("{SHIFTDOWN}")
  289. Sleep(Random(300, 400, 1))
  290. Send("{R DOWN}")
  291. Sleep(Random(300, 400, 1))
  292. Send("{R UP}")
  293. Sleep(Random(300, 400, 1))
  294. Send("{ALTUP}")
  295. Sleep(Random(300, 400, 1))
  296. Send("{SHIFTUP}")
  297. Sleep(Random(1500, 1800, 1))
  298.  
  299.  
  300. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  301. If Not @error Then
  302. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  303. Sleep(Random(1800, 2000, 1))
  304. EndIf
  305.  
  306. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  307. If Not @error Then
  308. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  309. Sleep(Random(1800, 2000, 1))
  310. EndIf
  311.  
  312. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  313. If Not @error Then
  314. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  315. Sleep(Random(1800, 2000, 1))
  316. EndIf
  317.  
  318. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  319. If Not @error Then
  320. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  321. Sleep(Random(1800, 2000, 1))
  322. EndIf
  323.  
  324. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  325. If Not @error Then
  326. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  327. Sleep(Random(1800, 2000, 1))
  328. EndIf
  329.  
  330. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  331. If Not @error Then
  332. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  333. Sleep(Random(1800, 2000, 1))
  334. EndIf
  335.  
  336. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  337. If Not @error Then
  338. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  339. Sleep(Random(1800, 2000, 1))
  340. EndIf
  341.  
  342. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  343. If Not @error Then
  344. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  345. Sleep(Random(1800, 2000, 1))
  346. EndIf
  347.  
  348. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  349. If Not @error Then
  350. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  351. Sleep(Random(1800, 2000, 1))
  352. EndIf
  353.  
  354. ;//Switching to Alt 1//
  355. MouseClick("left", 500, 800, 1, 0)
  356. Sleep(Random(1500, 1800, 1))
  357.  
  358. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  359. If Not @error Then
  360. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  361. Sleep(Random(1800, 2000, 1))
  362. Send ("I")
  363. Sleep(Random(1800, 2000, 1))
  364. MouseClick("left", 1015, 389, 1, 0)
  365. Sleep(Random(500, 800, 1))
  366. MouseClick("left", 636, 325, 1, 0)
  367. Send ("I")
  368. Sleep(Random(1800, 2000, 1))
  369. EndIf
  370.  
  371. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  372. If Not @error Then
  373. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  374. Sleep(Random(1800, 2000, 1))
  375. Send ("I")
  376. Sleep(Random(1800, 2000, 1))
  377. MouseClick("left", 1015, 389, 1, 0)
  378. Sleep(Random(500, 800, 1))
  379. MouseClick("left", 636, 325, 1, 0)
  380. Send ("I")
  381. Sleep(Random(1800, 2000, 1))
  382. EndIf
  383.  
  384. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  385. If Not @error Then
  386. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  387. Sleep(Random(1800, 2000, 1))
  388. EndIf
  389.  
  390.  
  391.  
  392. ;//Switching to Alt 2//
  393. MouseClick("left", 870, 777, 1, 0)
  394. Sleep(Random(1500, 1800, 1))
  395.  
  396.  
  397. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  398. If Not @error Then
  399. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  400. Sleep(Random(1800, 2000, 1))
  401. Send ("I")
  402. Sleep(Random(1800, 2000, 1))
  403. MouseClick("left", 1015, 389, 1, 0)
  404. Sleep(Random(500, 800, 1))
  405. MouseClick("left", 636, 325, 1, 0)
  406. Send ("I")
  407. Sleep(Random(1800, 2000, 1))
  408. EndIf
  409.  
  410. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  411. If Not @error Then
  412. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  413. Sleep(Random(1800, 2000, 1))
  414. Send ("I")
  415. Sleep(Random(1800, 2000, 1))
  416. MouseClick("left", 1015, 389, 1, 0)
  417. Sleep(Random(500, 800, 1))
  418. MouseClick("left", 636, 325, 1, 0)
  419. Send ("I")
  420. Sleep(Random(1800, 2000, 1))
  421. EndIf
  422.  
  423. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  424. If Not @error Then
  425. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  426. Sleep(Random(1800, 2000, 1))
  427. EndIf
  428.  
  429.  
  430. ;//Switching Back to Main//
  431. MouseClick("left", 555, 800, 1, 0)
  432. Sleep(Random(1500, 1800, 1))
  433.  
  434. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  435. If Not @error Then
  436. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  437. Sleep(Random(1800, 2000, 1))
  438. EndIf
  439.  
  440. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  441. If Not @error Then
  442. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  443. Sleep(Random(1800, 2000, 1))
  444. EndIf
  445.  
  446. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  447. If Not @error Then
  448. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  449. Sleep(Random(1800, 2000, 1))
  450. EndIf
  451.  
  452. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  453. If Not @error Then
  454. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  455. Sleep(Random(1800, 2000, 1))
  456. EndIf
  457.  
  458. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  459. If Not @error Then
  460. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  461. Sleep(Random(1800, 2000, 1))
  462. EndIf
  463.  
  464. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  465. If Not @error Then
  466. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  467. Sleep(Random(1800, 2000, 1))
  468. EndIf
  469.  
  470. $LegColor = PixelSearch(390, 185, 872, 476, 0xFF8000, 2)
  471. If Not @error Then
  472. MouseClick("left", $LegColor[0], $LegColor[1], 1, 1)
  473. Sleep(Random(1800, 2000, 1))
  474. EndIf
  475.  
  476. $SetColor = PixelSearch(390, 185, 872, 476, 0x00FF00, 2)
  477. If Not @error Then
  478. MouseClick("left", $SetColor[0], $SetColor[1], 1, 1)
  479. Sleep(Random(1800, 2000, 1))
  480. EndIf
  481.  
  482. $GemColor = PixelSearch(390, 185, 872, 476, 0x99BBFF, 2)
  483. If Not @error Then
  484. MouseClick("left", $GemColor[0], $GemColor[1], 1, 1)
  485. Sleep(Random(1800, 2000, 1))
  486. EndIf
  487.  
  488.  
  489. Sleep(Random(800, 1000, 1))
  490. Send("{ALTDOWN}")
  491. Sleep(Random(300, 400, 1))
  492. Send("{SHIFTDOWN}")
  493. Sleep(Random(300, 400, 1))
  494. Send("{R DOWN}")
  495. Sleep(Random(300, 400, 1))
  496. Send("{R UP}")
  497. Sleep(Random(300, 400, 1))
  498. Send("{ALTUP}")
  499. Sleep(Random(300, 400, 1))
  500. Send("{SHIFTUP}")
  501. Sleep(Random(1500, 1800, 1))
  502. EndFunc
  503.  
  504. Func CheckChest()
  505. $Chest1 = PixelSearch(580, 219, 1342, 880, 0xAA9BAA, 2)
  506. If Not @error Then
  507. MouseClick("left", $Chest1[0], $Chest1[1] + 24, 2, 1)
  508. Sleep(Random(2200, 2400, 1))
  509. Loot()
  510. MouseClick("left", 1012, 720, 1, 0) ;Moving...
  511. Send("{T DOWN}")
  512. Sleep(Random(100, 120, 1))
  513. Send("{T UP}")
  514. Sleep(Random(7100, 7300, 1))
  515. Send("{ESC DOWN}")
  516. Sleep(Random(100, 120, 1))
  517. Send("{ESC UP}")
  518. Sleep(Random(1000, 1200, 1))
  519. MouseClick("left", 253, 479, 1, 0)
  520. Sleep(Random(6300, 6500, 1))
  521. EndIf
  522. EndFunc
  523.  
  524. Func CheckBody()
  525. $LootBody1 = PixelSearch(580, 219, 1342, 880, 0x6F5F60, 1)
  526. If Not @error Then
  527. MouseClick("left", $LootBody1[0], $LootBody1[1], 1, 0)
  528. Sleep(Random(2000, 2200, 1))
  529. Loot()
  530. Sleep(Random(1800, 2000, 1))
  531. EndIf
  532. EndFunc
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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!