API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jul 7th, 2012
248
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 51.20 KB | None | 0 0
raw download clone embed print report
  1. Global $Paused
  2. Global $DebugOn = True
  3. Global $runCount = 0
  4. ;0,8130952380952381 , 0,7314285714285714
  5. HotKeySet("=","Leave")
  6. HotKeySet("-", "Pause")
  7. HotKeySet("x", "Stop")
  8.  
  9. $default_resolutionX = 1680
  10. $default_resolutionY = 1050
  11. $x_ratio = @Desktopwidth / $default_resolutionX
  12. $y_ratio = @Desktopheight / $default_resolutionY
  13.  
  14.  
  15.  
  16. $Ruby = 0xB01D2D
  17. $Emerald = 0x58EE33
  18. $Amethyst = 0xA56DF1
  19. $Topaz = 0xFFF02F
  20.  
  21. $Yellow = 0xFFFF00 ;rare color code
  22. $Blue = 0x6969FF ;blue color code
  23. $Orange = 0xBF642F ;legendary color code
  24. $Green = 0x00FF00 ;SET color
  25.  
  26. $Left = 64
  27. $Top = 42
  28. $Right = 720
  29. $Bottom = 519
  30.  
  31. $timeBetweenGames = 1000 ; + Random(10000, 20000)
  32.  
  33. ; item levels and variables of manipulation items on stash or vendor
  34. $YellowItem = 0
  35. $OrangeItem = 0
  36. $GreenItem = 0
  37. $BlueItem = 0
  38. ;gem levels and variables of manipulation on stash drop
  39. $EmeraldGem = 0
  40. $TopazGem = 0
  41. $RubyGem = 0
  42. $AmethystGem = 0
  43.  
  44. $go = True
  45. $Leave = False
  46.  
  47.  
  48.  
  49.  
  50. While $go
  51.  
  52.  
  53. if($Leave) Then
  54. $Pixel1 = PixelSearch((1482 * $x_ratio),(20 * $y_ratio),(1535 * $x_ratio),(95 * $y_ratio),0xFFF000) ;searches top right screen for yellow of broken armor
  55. If Not @error Then
  56. Send("t")
  57. Sleep(8000)
  58. MouseClick("left", Round(1480 * $x_ratio),Round(281 * $y_ratio));begin movement towards merchant
  59. Sleep(1500)
  60. MouseClick("left", Round(1316 * $x_ratio),Round(206 * $y_ratio)) ;moves to get merchant in screen
  61. Sleep(1500)
  62. MouseClick("left", Round(845 * $x_ratio),Round(225 * $y_ratio)) ;NPC Merchant to the right of cain's home
  63. Sleep(1500)
  64. MouseClick("left", Round(521 * $x_ratio),Round(506 * $y_ratio)) ;button to open up repair menu
  65. Sleep(1500)
  66. MouseClick("left", Round(260 * $x_ratio),Round(595 * $y_ratio)) ;button to pay for repairs
  67. Sleep(2500)
  68. Send("{ESCAPE}") ;opens menu
  69. Sleep(1000)
  70. MouseClick("left", Round(841 * $x_ratio),Round(579 * $y_ratio)) ;button to leave game
  71. Sleep(5500)
  72. ;MouseClick("left", Round(875 * $x_ratio),Round(612 * $y_ratio)) ; dissmiss message
  73. ;SLeep(500)
  74. MouseClick("left", Round(1442 * $x_ratio),Round(112 * $y_ratio)) ;
  75. ;Sleep(1500)
  76.  
  77. ;Sleep(500)
  78. Sleep($timeBetweenGames)
  79. MouseClick("left", Round(230 * $x_ratio),Round(416 * $y_ratio)) ;button to resume game from main menu
  80. Sleep(500)
  81.  
  82. Sleep(4500)
  83.  
  84. Else
  85. MouseClick("right")
  86.  
  87. Sleep(800)
  88.  
  89.  
  90. MouseClick("middle", Round(498 * $x_ratio),Round(234 * $y_ratio)) ;starts the main run -- i'm used MIDDLE MOUSE CLICK for not to attack enemys
  91. Sleep(2000)
  92. MouseClick("middle", Round(128 * $x_ratio),Round(245 * $y_ratio)) ;-- i'm used MIDDLE MOUSE CLICK for not to attack enemys
  93. Sleep(2700)
  94. MouseClick("middle", Round(21 * $x_ratio),Round(508 * $y_ratio)) ;-- i'm used MIDDLE MOUSE CLICK for not to attack enemys
  95. Sleep(2500)
  96. MouseMove(Round(124 * $x_ratio),Round(223 * $y_ratio),1) ;moves cursor over to the CELLAR so the proper blue pixel becomes
  97.  
  98. Sleep(1000)
  99. $Pixel2 = PixelSearch(10,150,(200 * $x_ratio),(288 * $y_ratio),0x3B62E3,5) ;searches for the specific blue pixel that only occurs when mouse hovers over open CELLAR
  100. If Not @error Then
  101.  
  102. MouseClick("left",Round(124 *$x_ratio),Round(223 * $y_ratio)) ;CLICKED TO enter the CELLAR
  103.  
  104. Sleep(4000)
  105. MouseClick("middle",Round(60 *$x_ratio),Round(962 * $y_ratio)) ;Entrance to CELLAR -- i'm used MIDDLE MOUSE CLICK for not to interact with enemys
  106. Sleep(1400)
  107.  
  108. Send("w")
  109. Sleep(900)
  110. MouseClick("middle",Round(441 *$x_ratio),Round(185 * $y_ratio)) ; -- i'm used MIDDLE MOUSE CLICK for not to attack enemys
  111. Sleep(1800)
  112.  
  113. MouseClick("right")
  114. Send("a")
  115. Send("d")
  116. Send("{SHIFTDOWN}")
  117. MouseClick("left",Round(741 *$x_ratio),Round(448 * $y_ratio)) ; USE seven-sided strike (monk skill)
  118. Sleep(20)
  119. Send("{SHIFTUP}")
  120. Send("e")
  121. Send("d")
  122. Sleep(1500)
  123.  
  124. MouseClick("left",Round(496 *$x_ratio),Round(586 * $y_ratio)) ;moves left down
  125. Sleep(1500)
  126. MouseClick("left",Round(1282 *$x_ratio),Round (179 * $y_ratio)) ;moves left up
  127. Sleep(700)
  128. Send("d")
  129. ;MouseClick("right")
  130. ;Sleep(1000)
  131. ;MouseClick("middle",Round(696 *$x_ratio),Round (940 * $y_ratio)) ;moves right up
  132. ;Sleep(1700)
  133. ;MouseClick("middle",Round(507 *$x_ratio),Round (877 * $y_ratio)) ;moves right up
  134. ;Sleep(1100)
  135. ;MouseClick("middle",Round(1387 *$x_ratio),Round (127 * $y_ratio)) ;moves right up
  136. ;Sleep(2100)
  137. ;MouseClick("left",Round(351 *$x_ratio),Round (664 * $y_ratio)) ;moves right up
  138. ;Sleep(1100)
  139.  
  140. MouseClick("right")
  141. ;FindItemSlow()
  142.  
  143. ;Send("z")
  144. Finditemfast()
  145. ;Send("z")
  146. Send("a")
  147. Send("w")
  148. Send("e")
  149.  
  150. ;Send("z")
  151. Send("t")
  152. Sleep(8500)
  153.  
  154. if $runCount > 7 then
  155. Town()
  156. Send("{SPACE}") ;close all windows
  157. $runCount = 0
  158. else
  159. endif
  160.  
  161.  
  162.  
  163. Send("{Escape}") ;menu
  164. Sleep(200)
  165. MouseClick("left",Round(841 * $x_ratio),Round(566 * $y_ratio)) ;button to leave game
  166. Sleep(2700)
  167.  
  168. ;MouseClick("left", Round(875 * $x_ratio),Round(612 * $y_ratio)) ; dissmis message
  169. ;SLeep(4500)
  170. ;Send("{F8}")
  171. ;SLeep(500)
  172. MouseClick("left", Round(1442 * $x_ratio),Round(112 * $y_ratio)) ;
  173.  
  174. Sleep($timeBetweenGames)
  175. MouseClick("left",Round(230 * $x_ratio),Round(416 * $y_ratio)) ;button to resume game from main menu
  176. Sleep(500)
  177.  
  178. Sleep(3000)
  179. $runCount = $runCount +1
  180. Else
  181. MouseClick("left",Round(900 * $x_ratio),Round(900 * $y_ratio)) ;moves down screen away from CELLAR in attempt for safety before teleporting back to town
  182. Send("d")
  183. Sleep(1200)
  184. Send("w")
  185. Send("d")
  186. Send("a")
  187. Send("e")
  188. Sleep(200)
  189. Send("{ESCAPE}") ;menu
  190. MouseClick("left",Round(841 * $x_ratio),Round(579 * $y_ratio)) ;button to leave game
  191. Sleep(14500)
  192. ;MouseClick("left", Round(875 * $x_ratio),Round(612 * $y_ratio)) ; dissmis message
  193. ;Sleep(400)
  194. MouseClick("left", Round(1442 * $x_ratio),Round(112 * $y_ratio)) ;
  195. Sleep($timeBetweenGames)
  196. MouseClick("left",Round(230 * $x_ratio),Round(416 * $y_ratio)) ;button to resume game from main menu
  197.  
  198.  
  199. Sleep(4000)
  200.  
  201. EndIf
  202. EndIf
  203. EndIf
  204. $YellowItem = 0
  205. $OrangeItem = 0
  206. $GreenItem = 0
  207. $BlueItem = 0
  208.  
  209. $EmeraldGem = 0
  210. $TopazGem = 0
  211. $RubyGem = 0
  212. $AmethystGem = 0
  213. WEnd
  214.  
  215. Func Pause()
  216. $Leave = False
  217.  
  218. EndFunc ;==>Pause
  219.  
  220.  
  221. Func Town()
  222.  
  223. MouseClick("left",Round(1247 * $x_ratio),Round(105 * $y_ratio)) ;go to vendor nearly Decard Cain
  224. Sleep(2800)
  225. MouseClick("left",Round(1137 * $x_ratio),Round(130 * $y_ratio)) ;go to vendor nearly Decard Cain
  226. Sleep(2300)
  227.  
  228. SellItemPixelMap()
  229. Sleep(200)
  230.  
  231. MouseClick("left",Round(601 * $x_ratio),Round(852 * $y_ratio)) ;go to vendor nearly Decard Cain
  232. Sleep(2000)
  233.  
  234. MouseClick("left",Round(93 * $x_ratio),Round(920 * $y_ratio)) ;go to vendor nearly Decard Cain
  235. Sleep(2800)
  236.  
  237. DepositRarePixelMap()
  238.  
  239. EndFunc
  240.  
  241.  
  242.  
  243.  
  244.  
  245.  
  246.  
  247.  
  248. Func SellBlue()
  249.  
  250. ; selling blue items to vendor
  251. $Searching = True
  252. while $Searching
  253. $BlueItemVendor = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x141E3A )
  254. if Not @error Then
  255. MouseClick("right", $BlueItemVendor[0], $BlueItemVendor[1])
  256. Sleep(500)
  257. Else
  258. $Searching = False
  259. EndIf
  260. WEnd
  261.  
  262. ; more blue color
  263. $Searching = True
  264. while $Searching
  265. $BlueItemVendor = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x223E5D )
  266. if Not @error Then
  267. MouseClick("right", $BlueItemVendor[0], $BlueItemVendor[1])
  268. Sleep(500)
  269. Else
  270. $Searching = False
  271. EndIf
  272. WEnd
  273.  
  274. ; more blue color
  275. $Searching = True
  276. while $Searching
  277. $BlueItemVendor = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x101421 )
  278. if Not @error Then
  279. MouseClick("right", $BlueItemVendor[0], $BlueItemVendor[1])
  280. Sleep(500)
  281. Else
  282. $Searching = False
  283. EndIf
  284. WEnd
  285.  
  286. ; more blue color
  287. $Searching = True
  288. while $Searching
  289. $BlueItemVendor = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x18223D )
  290. if Not @error Then
  291. MouseClick("right", $BlueItemVendor[0], $BlueItemVendor[1])
  292. Sleep(500)
  293. Else
  294. $Searching = False
  295. EndIf
  296. WEnd
  297.  
  298. ; more blue color
  299. $Searching = True
  300. while $Searching
  301. $BlueItemVendor = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x0E16C3 )
  302. if Not @error Then
  303. MouseClick("right", $BlueItemVendor[0], $BlueItemVendor[1])
  304. Sleep(500)
  305. Else
  306. $Searching = False
  307. EndIf
  308. WEnd
  309.  
  310. ; more blue color
  311. $Searching = True
  312. while $Searching
  313. $BlueItemVendor = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x04047E )
  314. if Not @error Then
  315. MouseClick("right", $BlueItemVendor[0], $BlueItemVendor[1])
  316. Sleep(500)
  317. Else
  318. $Searching = False
  319. EndIf
  320. WEnd
  321. EndFunc
  322.  
  323.  
  324. Func SellItemPixelMap()
  325. ;$LogItemGet = FileOpen("C:\Users\ArthurMelo\Desktop\d3ItemGetLog.txt", 1)
  326.  
  327.  
  328. ;$line = [1208 1257 1303 1351 1398 1445 1491 1538 1586 1632]
  329. ;$collum = [594 639 686 732 779 827 ]
  330. ; $matrizInventory = $line*$collum
  331.  
  332.  
  333. ; For $count = 1 to 60
  334. ; Sleep(50)
  335. ; MouseClick("right", (StringLeft($matrizInventory[$count] , 4) * $x_ratio),(StringRight($matrizInventory[$count] , 3) * $y_ratio))
  336. ; Sleep(50)
  337. ; FileWrite($LogItemGet, StringLeft($matrizInventory[$count] , 4) & "," (StringRight($matrizInventory[$count] , 3)))
  338. ; next
  339.  
  340.  
  341.  
  342. ; selling blue and white items
  343. ;slot 1
  344. MouseClick("right", (1208 * $x_ratio),(594 * $y_ratio))
  345. Sleep(80)
  346. ;slot 2
  347. MouseClick("right", (1257 * $x_ratio),(594 * $y_ratio))
  348. Sleep(80)
  349. ;slot 3
  350. MouseClick("right", (1303 * $x_ratio),(594 * $y_ratio))
  351. Sleep(80)
  352. ;slot 4
  353. MouseClick("right", (1351 * $x_ratio),(594 * $y_ratio))
  354. Sleep(80)
  355. ;slot 5
  356. MouseClick("right", (1398 * $x_ratio),(594 * $y_ratio))
  357. Sleep(80)
  358. ;slot 6
  359. MouseClick("right", (1445 * $x_ratio),(594 * $y_ratio))
  360. Sleep(80)
  361. ;slot 7
  362. MouseClick("right", (1491 * $x_ratio),(594 * $y_ratio))
  363. Sleep(80)
  364. ;slot 8
  365. MouseClick("right", (1538 * $x_ratio),(594 * $y_ratio))
  366. Sleep(80)
  367. ;slot 9
  368. MouseClick("right", (1586 * $x_ratio),(594 * $y_ratio))
  369. Sleep(80)
  370. ;slot 10
  371. MouseClick("right", (1632 * $x_ratio),(594 * $y_ratio))
  372. Sleep(80)
  373. ;slot 11
  374. MouseClick("right", (1208 * $x_ratio),(639 * $y_ratio))
  375. Sleep(80)
  376. ;slot 12
  377. MouseClick("right", (1257 * $x_ratio),(639 * $y_ratio))
  378. Sleep(80)
  379. ;slot 13
  380. MouseClick("right", (1303 * $x_ratio),(639 * $y_ratio))
  381. Sleep(80)
  382. ;slot 14
  383. MouseClick("right", (1351 * $x_ratio),(639 * $y_ratio))
  384. Sleep(80)
  385. ;slot 15
  386. MouseClick("right", (1398 * $x_ratio),(639 * $y_ratio))
  387. Sleep(80)
  388. ;slot 16
  389. MouseClick("right", (1445 * $x_ratio),(639 * $y_ratio))
  390. Sleep(80)
  391. ;slot 17
  392. MouseClick("right", (1491 * $x_ratio),(639 * $y_ratio))
  393. Sleep(80)
  394. ;slot 18
  395. MouseClick("right", (1538 * $x_ratio),(639 * $y_ratio))
  396. Sleep(80)
  397. ;slot 19
  398. MouseClick("right", (1586 * $x_ratio),(639 * $y_ratio))
  399. Sleep(80)
  400. ;slot 20
  401. MouseClick("right", (1632 * $x_ratio),(639 * $y_ratio))
  402. Sleep(80)
  403. ;slot 21
  404. MouseClick("right", (1208 * $x_ratio),(686 * $y_ratio))
  405. Sleep(80)
  406. ;slot 22
  407. MouseClick("right", (1257 * $x_ratio),(686 * $y_ratio))
  408. Sleep(80)
  409. ;slot 23
  410. MouseClick("right", (1303 * $x_ratio),(686 * $y_ratio))
  411. Sleep(80)
  412. ;slot 24
  413. MouseClick("right", (1351 * $x_ratio),(686 * $y_ratio))
  414. Sleep(80)
  415. ;slot 25
  416. MouseClick("right", (1398 * $x_ratio),(686 * $y_ratio))
  417. Sleep(80)
  418. ;slot 26
  419. MouseClick("right", (1445 * $x_ratio),(686 * $y_ratio))
  420. Sleep(80)
  421. ;slot 27
  422. MouseClick("right", (1491 * $x_ratio),(686 * $y_ratio))
  423. Sleep(80)
  424. ;slot 28
  425. MouseClick("right", (1538 * $x_ratio),(686 * $y_ratio))
  426. Sleep(80)
  427. ;slot 29
  428. MouseClick("right", (1586 * $x_ratio),(686 * $y_ratio))
  429. Sleep(80)
  430. ;slot 30
  431. MouseClick("right", (1632 * $x_ratio),(686 * $y_ratio))
  432. Sleep(80)
  433. ;slot 31
  434. ;TOME OF SECRETS
  435. ;slot 32
  436. MouseClick("right", (1257 * $x_ratio),(732 * $y_ratio))
  437. Sleep(80)
  438. ;slot 33
  439. MouseClick("right", (1303 * $x_ratio),(732 * $y_ratio))
  440. Sleep(80)
  441. ;slot 34
  442. MouseClick("right", (1351 * $x_ratio),(732 * $y_ratio))
  443. Sleep(80)
  444. ;slot 35
  445. MouseClick("right", (1398 * $x_ratio),(732 * $y_ratio))
  446. Sleep(80)
  447. ;slot 36
  448. MouseClick("right", (1445 * $x_ratio),(732 * $y_ratio))
  449. Sleep(80)
  450. ;slot 37
  451. MouseClick("right", (1491 * $x_ratio),(732 * $y_ratio))
  452. Sleep(80)
  453. ;slot 38
  454. MouseClick("right", (1538 * $x_ratio),(732 * $y_ratio))
  455. Sleep(80)
  456. ;slot 39
  457. MouseClick("right", (1586 * $x_ratio),(732 * $y_ratio))
  458. Sleep(80)
  459. ;slot 40
  460. MouseClick("right", (1632 * $x_ratio),(732 * $y_ratio))
  461. Sleep(80)
  462. ;slot 41
  463.  
  464. ;RUBY
  465.  
  466. ;slot 42
  467.  
  468. ;AMETYST
  469.  
  470. ;slot 43
  471.  
  472. ;EMERALD
  473.  
  474. ;slot 44
  475.  
  476. ;TOPAZ
  477.  
  478. ;slot 45
  479.  
  480. MouseClick("right", (1398 * $x_ratio),(779 * $y_ratio))
  481. Sleep(80)
  482. ;slot 46
  483. MouseClick("right", (1445 * $x_ratio),(779 * $y_ratio))
  484. Sleep(80)
  485. ;slot 47
  486. MouseClick("right", (1491 * $x_ratio),(779 * $y_ratio))
  487. Sleep(80)
  488. ;slot 48
  489. MouseClick("right", (1538 * $x_ratio),(779 * $y_ratio))
  490. Sleep(80)
  491. ;slot 49
  492. MouseClick("right", (1586 * $x_ratio),(779 * $y_ratio))
  493. Sleep(80)
  494. ;slot 50
  495. MouseClick("right", (1632 * $x_ratio),(779 * $y_ratio))
  496. Sleep(80)
  497. ;slot 51
  498.  
  499. ;RUBY
  500.  
  501. ;slot 52
  502.  
  503. ;AMETYST
  504.  
  505. ;slot 53
  506.  
  507. ;EMERALD
  508.  
  509. ;slot 54
  510.  
  511. ;TOPAZ
  512.  
  513. ;slot 55
  514. MouseClick("right", (1398 * $x_ratio),(827 * $y_ratio))
  515. Sleep(80)
  516. ;slot 56
  517. MouseClick("right", (1445 * $x_ratio),(827 * $y_ratio))
  518. Sleep(80)
  519. ;slot 57
  520. MouseClick("right", (1491 * $x_ratio),(827 * $y_ratio))
  521. Sleep(80)
  522. ;slot 58
  523. MouseClick("right", (1538 * $x_ratio),(827 * $y_ratio))
  524. Sleep(80)
  525. ;slot 59
  526. MouseClick("right", (1586 * $x_ratio),(827 * $y_ratio))
  527. Sleep(80)
  528. ;slot 60
  529. MouseClick("right", (1632 * $x_ratio),(827 * $y_ratio))
  530. Sleep(80)
  531.  
  532.  
  533.  
  534. MouseClick("left",Round(506 * $x_ratio),Round(483 * $y_ratio)) ;click repair tab
  535. Sleep(200)
  536. MouseClick("left",Round(242 * $x_ratio),Round(528 * $y_ratio)) ;click repair
  537. Sleep(200)
  538. Send("{SPACE}") ;close windows
  539.  
  540.  
  541.  
  542. EndFunc
  543.  
  544.  
  545.  
  546. Func DepositRarePixelMap()
  547.  
  548. MouseClick("right", (1208 * $x_ratio),(594 * $y_ratio))
  549. Sleep(80)
  550. ;slot 2
  551. MouseClick("right", (1257 * $x_ratio),(594 * $y_ratio))
  552. Sleep(80)
  553. ;slot 3
  554. MouseClick("right", (1303 * $x_ratio),(594 * $y_ratio))
  555. Sleep(80)
  556. ;slot 4
  557. MouseClick("right", (1351 * $x_ratio),(594 * $y_ratio))
  558. Sleep(80)
  559. ;slot 5
  560. MouseClick("right", (1398 * $x_ratio),(594 * $y_ratio))
  561. Sleep(80)
  562. ;slot 6
  563. MouseClick("right", (1445 * $x_ratio),(594 * $y_ratio))
  564. Sleep(80)
  565. ;slot 7
  566. MouseClick("right", (1491 * $x_ratio),(594 * $y_ratio))
  567. Sleep(80)
  568. ;slot 8
  569. MouseClick("right", (1538 * $x_ratio),(594 * $y_ratio))
  570. Sleep(80)
  571. ;slot 9
  572. MouseClick("right", (1586 * $x_ratio),(594 * $y_ratio))
  573. Sleep(80)
  574. ;slot 10
  575. MouseClick("right", (1632 * $x_ratio),(594 * $y_ratio))
  576. Sleep(80)
  577. ;slot 11
  578. MouseClick("right", (1208 * $x_ratio),(639 * $y_ratio))
  579. Sleep(80)
  580. ;slot 12
  581. MouseClick("right", (1257 * $x_ratio),(639 * $y_ratio))
  582. Sleep(80)
  583. ;slot 13
  584. MouseClick("right", (1303 * $x_ratio),(639 * $y_ratio))
  585. Sleep(80)
  586. ;slot 14
  587. MouseClick("right", (1351 * $x_ratio),(639 * $y_ratio))
  588. Sleep(80)
  589. ;slot 15
  590. MouseClick("right", (1398 * $x_ratio),(639 * $y_ratio))
  591. Sleep(80)
  592. ;slot 16
  593. MouseClick("right", (1445 * $x_ratio),(639 * $y_ratio))
  594. Sleep(80)
  595. ;slot 17
  596. MouseClick("right", (1491 * $x_ratio),(639 * $y_ratio))
  597. Sleep(80)
  598. ;slot 18
  599. MouseClick("right", (1538 * $x_ratio),(639 * $y_ratio))
  600. Sleep(80)
  601. ;slot 19
  602. MouseClick("right", (1586 * $x_ratio),(639 * $y_ratio))
  603. Sleep(80)
  604. ;slot 20
  605. MouseClick("right", (1632 * $x_ratio),(639 * $y_ratio))
  606. Sleep(80)
  607. ;slot 21
  608. MouseClick("right", (1208 * $x_ratio),(686 * $y_ratio))
  609. Sleep(80)
  610. ;slot 22
  611. MouseClick("right", (1257 * $x_ratio),(686 * $y_ratio))
  612. Sleep(80)
  613. ;slot 23
  614. MouseClick("right", (1303 * $x_ratio),(686 * $y_ratio))
  615. Sleep(80)
  616. ;slot 24
  617. MouseClick("right", (1351 * $x_ratio),(686 * $y_ratio))
  618. Sleep(80)
  619. ;slot 25
  620. MouseClick("right", (1398 * $x_ratio),(686 * $y_ratio))
  621. Sleep(80)
  622. ;slot 26
  623. MouseClick("right", (1445 * $x_ratio),(686 * $y_ratio))
  624. Sleep(80)
  625. ;slot 27
  626. MouseClick("right", (1491 * $x_ratio),(686 * $y_ratio))
  627. Sleep(80)
  628. ;slot 28
  629. MouseClick("right", (1538 * $x_ratio),(686 * $y_ratio))
  630. Sleep(80)
  631. ;slot 29
  632. MouseClick("right", (1586 * $x_ratio),(686 * $y_ratio))
  633. Sleep(80)
  634. ;slot 30
  635. MouseClick("right", (1632 * $x_ratio),(686 * $y_ratio))
  636. Sleep(80)
  637. ;slot 31
  638. ;TOME OF SECRETS
  639. ;slot 32
  640. MouseClick("right", (1257 * $x_ratio),(732 * $y_ratio))
  641. Sleep(80)
  642. ;slot 33
  643. MouseClick("right", (1303 * $x_ratio),(732 * $y_ratio))
  644. Sleep(80)
  645. ;slot 34
  646. MouseClick("right", (1351 * $x_ratio),(732 * $y_ratio))
  647. Sleep(80)
  648. ;slot 35
  649. MouseClick("right", (1398 * $x_ratio),(732 * $y_ratio))
  650. Sleep(80)
  651. ;slot 36
  652. MouseClick("right", (1445 * $x_ratio),(732 * $y_ratio))
  653. Sleep(80)
  654. ;slot 37
  655. MouseClick("right", (1491 * $x_ratio),(732 * $y_ratio))
  656. Sleep(80)
  657. ;slot 38
  658. MouseClick("right", (1538 * $x_ratio),(732 * $y_ratio))
  659. Sleep(80)
  660. ;slot 39
  661. MouseClick("right", (1586 * $x_ratio),(732 * $y_ratio))
  662. Sleep(80)
  663. ;slot 40
  664. MouseClick("right", (1632 * $x_ratio),(732 * $y_ratio))
  665. Sleep(80)
  666. ;slot 41
  667.  
  668. ;RUBY
  669.  
  670. ;slot 42
  671.  
  672. ;AMETYST
  673.  
  674. ;slot 43
  675.  
  676. ;EMERALD
  677.  
  678. ;slot 44
  679.  
  680. ;TOPAZ
  681.  
  682. ;slot 45
  683.  
  684. MouseClick("right", (1398 * $x_ratio),(779 * $y_ratio))
  685. Sleep(80)
  686. ;slot 46
  687. MouseClick("right", (1445 * $x_ratio),(779 * $y_ratio))
  688. Sleep(80)
  689. ;slot 47
  690. MouseClick("right", (1491 * $x_ratio),(779 * $y_ratio))
  691. Sleep(80)
  692. ;slot 48
  693. MouseClick("right", (1538 * $x_ratio),(779 * $y_ratio))
  694. Sleep(80)
  695. ;slot 49
  696. MouseClick("right", (1586 * $x_ratio),(779 * $y_ratio))
  697. Sleep(80)
  698. ;slot 50
  699. MouseClick("right", (1632 * $x_ratio),(779 * $y_ratio))
  700. Sleep(80)
  701. ;slot 51
  702.  
  703. ;RUBY
  704.  
  705. ;slot 52
  706.  
  707. ;AMETYST
  708.  
  709. ;slot 53
  710.  
  711. ;EMERALD
  712.  
  713. ;slot 54
  714.  
  715. ;TOPAZ
  716.  
  717. ;slot 55
  718. MouseClick("right", (1398 * $x_ratio),(827 * $y_ratio))
  719. Sleep(80)
  720. ;slot 56
  721. MouseClick("right", (1445 * $x_ratio),(827 * $y_ratio))
  722. Sleep(80)
  723. ;slot 57
  724. MouseClick("right", (1491 * $x_ratio),(827 * $y_ratio))
  725. Sleep(80)
  726. ;slot 58
  727. MouseClick("right", (1538 * $x_ratio),(827 * $y_ratio))
  728. Sleep(80)
  729. ;slot 59
  730. MouseClick("right", (1586 * $x_ratio),(827 * $y_ratio))
  731. Sleep(80)
  732. ;slot 60
  733. MouseClick("right", (1632 * $x_ratio),(827 * $y_ratio))
  734. Sleep(80)
  735. Send("{SPACE}") ;close windows
  736. EndFunc
  737.  
  738.  
  739. Func DepositRare()
  740. $LogItemGet = FileOpen("C:\Users\ArthurMelo\Desktop\d3ItemGetLog.txt", 1)
  741. ;search for yellow itens on inventory
  742. $Searching = True
  743. while $Searching
  744.  
  745. $YellowInInventory = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x4B3B08)
  746. if Not @error Then
  747. MouseClick("right", $YellowInInventory[0], $YellowInInventory[1])
  748.  
  749. Sleep(500)
  750. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  751. Else
  752. $Searching = False
  753. EndIf
  754. WEnd
  755.  
  756. ; yellow color 2
  757. $Searching = True
  758. while $Searching
  759. $YellowInInventory2 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x5B4B10 )
  760. if Not @error Then
  761. MouseClick("right", $YellowInInventory2[0], $YellowInInventory2[1])
  762.  
  763. Sleep(500)
  764. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  765. Else
  766. $Searching = False
  767. EndIf
  768. WEnd
  769.  
  770. ; yellow color 3
  771. $Searching = True
  772. while $Searching
  773. $YellowInInventory3 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x45360B )
  774. if Not @error Then
  775. MouseClick("right", $YellowInInventory3[0], $YellowInInventory3[1])
  776. Sleep(500)
  777. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  778. Else
  779. $Searching = False
  780. EndIf
  781. WEnd
  782.  
  783. ; yellow color 4
  784. $Searching = True
  785. while $Searching
  786. $YellowInInventory4 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x433509 )
  787. if Not @error Then
  788. MouseClick("right", $YellowInInventory4[0], $YellowInInventory4[1])
  789. Sleep(500)
  790. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  791. Else
  792. $Searching = False
  793. EndIf
  794. WEnd
  795.  
  796. ; yellow color 5
  797. $Searching = True
  798. while $Searching
  799. $YellowInInventory5 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x78700B )
  800. if Not @error Then
  801. MouseClick("right", $YellowInInventory5[0], $YellowInInventory5[1])
  802. Sleep(500)
  803. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  804. Else
  805. $Searching = False
  806. EndIf
  807. WEnd
  808.  
  809. ; yellow color 6
  810. $Searching = True
  811. while $Searching
  812. $YellowInInventory6 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x645812 )
  813. if Not @error Then
  814. MouseClick("right", $YellowInInventory6[0], $YellowInInventory6[1])
  815. Sleep(500)
  816. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  817. Else
  818. $Searching = False
  819. EndIf
  820. WEnd
  821. ; yellow color 7
  822. $Searching = True
  823. while $Searching
  824. $YellowInInventory7 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x4D3F0E )
  825. if Not @error Then
  826. MouseClick("right", $YellowInInventory7[0], $YellowInInventory7[1])
  827. Sleep(500)
  828. FileWrite($LogItemGet, "YELLOW ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  829. Else
  830. $Searching = False
  831. EndIf
  832. WEnd
  833.  
  834. ;orange color 1
  835. $Searching = True
  836. while $Searching
  837. $OrangeInInventory = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xFF7F00 )
  838. if Not @error Then
  839. MouseClick("right", $OrangeInInventory[0], $OrangeInInventory[1])
  840. Sleep(500)
  841. FileWrite($LogItemGet, "ORANGE ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  842. Else
  843. $Searching = False
  844. EndIf
  845. WEnd
  846.  
  847. ; orange color 2
  848. $Searching = True
  849. while $Searching
  850. $OrangeInInventory2 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x4C280D )
  851. if Not @error Then
  852. MouseClick("right", $OrangeInInventory2[0], $OrangeInInventory2[1])
  853. Sleep(500)
  854. FileWrite($LogItemGet, "ORANGE ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  855. Else
  856. $Searching = False
  857. EndIf
  858. WEnd
  859.  
  860. ; orange color 3
  861. $Searching = True
  862. while $Searching
  863. $OrangeInInventory2 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xA85604 )
  864. if Not @error Then
  865. MouseClick("right", $OrangeInInventory2[0], $OrangeInInventory2[1])
  866. Sleep(500)
  867. FileWrite($LogItemGet, "ORANGE ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  868. Else
  869. $Searching = False
  870. EndIf
  871. WEnd
  872.  
  873. ; orange color 4
  874. $Searching = True
  875. while $Searching
  876. $OrangeInInventory2 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x261407 )
  877. if Not @error Then
  878. MouseClick("right", $OrangeInInventory2[0], $OrangeInInventory2[1])
  879. Sleep(500)
  880. FileWrite($LogItemGet, "ORANGE ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  881. Else
  882. $Searching = False
  883. EndIf
  884. WEnd
  885.  
  886. ; orange color 5
  887. $Searching = True
  888. while $Searching
  889. $OrangeInInventory2 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x4F2D0F )
  890. if Not @error Then
  891. MouseClick("right", $OrangeInInventory2[0], $OrangeInInventory2[1])
  892. Sleep(500)
  893. FileWrite($LogItemGet, "ORANGE ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  894. Else
  895. $Searching = False
  896. EndIf
  897. WEnd
  898.  
  899. ;orange color 6
  900. $Searching = True
  901. while $Searching
  902. $OrangeInInventory2 = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x8E5112 )
  903. if Not @error Then
  904. MouseClick("right", $OrangeInInventory2[0], $OrangeInInventory2[1])
  905. Sleep(500)
  906. FileWrite($LogItemGet, "ORANGE ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  907. Else
  908. $Searching = False
  909. EndIf
  910. WEnd
  911.  
  912.  
  913.  
  914. ;green color 1
  915. $Searching = True
  916. while $Searching
  917. $OrangeInInventory = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x00FF00,3 )
  918. if Not @error Then
  919. MouseClick("right", $OrangeInInventory[0], $OrangeInInventory[1])
  920. Sleep(500)
  921. FileWrite($LogItemGet, "GREEN ITEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  922. Else
  923. $Searching = False
  924. EndIf
  925. WEnd
  926. FileWrite($LogItemGet, "====================================================== " &@LF &@LF)
  927. FileClose($LogItemGet)
  928.  
  929. EndFunc
  930.  
  931.  
  932.  
  933.  
  934. Func DropInChestMyCheeeeepedDjemssss()
  935. $LogItemGet = FileOpen("C:\Users\ArthurMelo\Desktop\d3ItemGetLog.txt", 1)
  936.  
  937. ; Tome of secret
  938. $Searching = True
  939. while $Searching
  940.  
  941. $PixelTomeSecrets = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x56110F )
  942. if Not @error Then
  943. MouseClick("right", $PixelTomeSecrets[0], $PixelTomeSecrets[1])
  944. Sleep(500)
  945. FileWrite($LogItemGet, "TOME OF SECRETS ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  946. Else
  947. $Searching = False
  948. EndIf
  949. WEnd
  950.  
  951.  
  952. ; Yellow gems
  953. $Searching = True
  954. while $Searching
  955. $PixelYellowGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xce8200 )
  956. if Not @error Then
  957. MouseClick("right", $PixelYellowGem[0], $PixelYellowGem[1])
  958. Sleep(500)
  959. FileWrite($LogItemGet, "TOPAZ GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  960. Else
  961. $Searching = False
  962. EndIf
  963. WEnd
  964.  
  965. ; Yellow gems
  966. $Searching = True
  967. while $Searching
  968. $PixelYellowGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xc17900 )
  969. if Not @error Then
  970. MouseClick("right", $PixelYellowGem[0], $PixelYellowGem[1])
  971. Sleep(500)
  972. FileWrite($LogItemGet, "TOPAZ GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  973. Else
  974. $Searching = False
  975. EndIf
  976. WEnd
  977.  
  978.  
  979. ; Green gems
  980. $Searching = True
  981. while $Searching
  982. $PixelGreenGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x319e31 )
  983. if Not @error Then
  984. MouseClick("right", $PixelGreenGem[0], $PixelGreenGem[1])
  985. Sleep(500)
  986. FileWrite($LogItemGet, "EMERALD GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  987. Else
  988. $Searching = False
  989. EndIf
  990. WEnd
  991.  
  992. ; Green gems
  993. $Searching = True
  994. while $Searching
  995. $PixelGreenGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x3db835 )
  996. if Not @error Then
  997. MouseClick("right", $PixelGreenGem[0], $PixelGreenGem[1])
  998. Sleep(500)
  999. FileWrite($LogItemGet, "EMERALD GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  1000. Else
  1001. $Searching = False
  1002. EndIf
  1003. WEnd
  1004.  
  1005.  
  1006. ; Red gems
  1007. $Searching = True
  1008. while $Searching
  1009. $PixelRedGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xf01d1f)
  1010. if Not @error Then
  1011. MouseClick("right", $PixelRedGem[0], $PixelRedGem[1])
  1012. Sleep(500)
  1013. FileWrite($LogItemGet, "RUBY GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  1014. Else
  1015. $Searching = False
  1016. EndIf
  1017. WEnd
  1018.  
  1019. ; Red gems
  1020. $Searching = True
  1021. while $Searching
  1022. $PixelRedGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xe90b0b)
  1023. if Not @error Then
  1024. MouseClick("right", $PixelRedGem[0], $PixelRedGem[1])
  1025. Sleep(500)
  1026. FileWrite($LogItemGet, "RUBY GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  1027. Else
  1028. $Searching = False
  1029. EndIf
  1030. WEnd
  1031.  
  1032.  
  1033. ; Purple gems
  1034. $Searching = True
  1035. while $Searching
  1036. $PixelPurpledGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0x9905db )
  1037. if Not @error Then
  1038. MouseClick("right", $PixelPurpledGem[0], $PixelPurpledGem[1])
  1039. Sleep(500)
  1040. FileWrite($LogItemGet, "AMETYST GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  1041. Else
  1042. $Searching = False
  1043. EndIf
  1044. WEnd
  1045.  
  1046. ; Purple gems
  1047. $Searching = True
  1048. while $Searching
  1049. $PixelPurpledGem = PixelSearch((1183 * $x_ratio),(566 * $y_ratio),(1664 * $x_ratio),(852 * $y_ratio),0xb110f7 )
  1050. if Not @error Then
  1051. MouseClick("right", $PixelPurpledGem[0], $PixelPurpledGem[1])
  1052. Sleep(500)
  1053. FileWrite($LogItemGet, "AMETYST GEM FOUND ---- " & @MDAY &"/"& @MON&"/"&@YEAR&" - "& @HOUR & ":" & @MIN & @LF )
  1054. Else
  1055. $Searching = False
  1056. EndIf
  1057. WEnd
  1058.  
  1059. FileWrite($LogItemGet, "====================================================== "&@LF&@LF)
  1060. FileClose($LogItemGet)
  1061. EndFunc
  1062.  
  1063.  
  1064.  
  1065.  
  1066. Func FindItemSlow()
  1067. ;itemlog for drops and salvage items and gem drops ....
  1068. Sleep(500)
  1069. Send("{ALTDOWN}")
  1070. Send("{ALTUP}")
  1071. $work = 1
  1072. $checkCount = 0
  1073. $x1 = 362
  1074. $y1 = 146
  1075. $x2 = 1566
  1076. $y2 = 869
  1077.  
  1078. $sleepTimeBetweenCollectDrops = 1800
  1079.  
  1080. While $work == 1 And $checkCount <10
  1081.  
  1082. $work = 0
  1083.  
  1084. $PixelBlue = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Blue,3) ;searches for BLUE itens on the flor
  1085. If Not @error Then
  1086. MouseClick("left", $PixelBlue[0], $PixelBlue[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1087. Sleep($sleepTimeBetweenCollectDrops)
  1088. $work = 1
  1089.  
  1090.  
  1091. $BlueItem = $BlueItem + 1
  1092. $checkCount = $checkCount +1
  1093. EndIf
  1094. Send("{ALTDOWN}")
  1095. Send("{ALTUP}")
  1096. $PixelYellow = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Yellow,3) ;searches for YELLOW itens on the flor
  1097. If Not @error Then
  1098. MouseClick("left", $PixelYellow[0], $PixelYellow[1], 1, 10) ;clicks magic
  1099. Sleep($sleepTimeBetweenCollectDrops)
  1100. $work = 1
  1101.  
  1102. $YellowItem = $YellowItem +1
  1103. $checkCount = $checkCount +1
  1104. EndIf
  1105. Send("{ALTDOWN}")
  1106. Send("{ALTUP}")
  1107. $PixelOrange = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Orange,3) ;searches for ORANGE itens on the flor OH YEAH!
  1108. If Not @error Then
  1109. MouseClick("left", $PixelOrange[0], $PixelOrange[1], 1, 10) ;clicks legendary
  1110. Sleep($sleepTimeBetweenCollectDrops)
  1111. $work = 1
  1112.  
  1113. $OrangeItem = $OrangeItem +1
  1114. $checkCount = $checkCount +1
  1115. EndIf
  1116. Send("{ALTDOWN}")
  1117. Send("{ALTUP}")
  1118. $PixelGreen = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Green,3) ;searches for GREEN itens on the flor OH YEAH 2 !!!
  1119. If Not @error Then
  1120. MouseClick("left", $PixelGreen[0], $PixelGreen[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1121. Sleep($sleepTimeBetweenCollectDrops)
  1122. $work = 1
  1123.  
  1124. $GreenItem = $GreenItem +1
  1125. $checkCount = $checkCount +1
  1126. EndIf
  1127. ; search for gems
  1128.  
  1129. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Amethyst,9) ;searches for AMETHYST GEM
  1130. If Not @error Then
  1131. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1132. Sleep($sleepTimeBetweenCollectDrops)
  1133. $work = 1
  1134.  
  1135. $AmethystGem = $AmethystGem +1
  1136. $checkCount = $checkCount +1
  1137. EndIf
  1138. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio), $Ruby,6) ;searches for RUBY GEM
  1139. If Not @error Then
  1140. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1141. Sleep($sleepTimeBetweenCollectDrops)
  1142. $work = 1
  1143.  
  1144. $RubyGem = $RubyGem +1
  1145. $checkCount = $checkCount +1
  1146. EndIf
  1147. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Topaz,11) ;searches for TOPAZ GEM
  1148. If Not @error Then
  1149. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1150. Sleep($sleepTimeBetweenCollectDrops)
  1151. $work = 1
  1152.  
  1153. $TopazGem = $TopazGem +1
  1154. $checkCount = $checkCount +1
  1155. EndIf
  1156. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Emerald,11) ;searches for EMERALD GEM
  1157. If Not @error Then
  1158. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1159. Sleep($sleepTimeBetweenCollectDrops)
  1160. $work = 1
  1161.  
  1162. $EmeraldGem = $EmeraldGem +1
  1163. $checkCount = $checkCount +1
  1164. EndIf
  1165. WEnd
  1166. DEBUG("Finish Item Searching")
  1167. EndFunc
  1168.  
  1169.  
  1170.  
  1171. Func FindItemFast()
  1172.  
  1173. Send("{ALTDOWN}")
  1174. Send("{ALTUP}")
  1175. $work = 1
  1176. $checkCount = 0
  1177. $sleepTimeBetweenCollectDrops = 1200
  1178.  
  1179. $x1 = 14
  1180. $y1 = 342
  1181. $x2 = 1586
  1182. $y2 = 866
  1183.  
  1184.  
  1185. While $work == 1 And $checkCount <6
  1186.  
  1187. $work = 0
  1188.  
  1189. $PixelBlue = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Blue,3) ;searches for BLUE itens on the flor
  1190. If Not @error Then
  1191. MouseClick("left", $PixelBlue[0], $PixelBlue[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1192. Sleep($sleepTimeBetweenCollectDrops)
  1193. $work = 1
  1194.  
  1195.  
  1196. $BlueItem = $BlueItem + 1
  1197. $checkCount = $checkCount +1
  1198. EndIf
  1199. Send("{ALTDOWN}")
  1200. Send("{ALTUP}")
  1201. $PixelYellow = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Yellow,3) ;searches for YELLOW itens on the flor
  1202. If Not @error Then
  1203. MouseClick("left", $PixelYellow[0], $PixelYellow[1], 1, 10) ;clicks magic
  1204. Sleep($sleepTimeBetweenCollectDrops)
  1205. $work = 1
  1206.  
  1207. $YellowItem = $YellowItem +1
  1208. $checkCount = $checkCount +1
  1209. EndIf
  1210. Send("{ALTDOWN}")
  1211. Send("{ALTUP}")
  1212. $PixelOrange = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Orange,1) ;searches for ORANGE itens on the flor OH YEAH!
  1213. If Not @error Then
  1214. MouseClick("left", $PixelOrange[0], $PixelOrange[1], 1, 10) ;clicks legendary
  1215. Sleep($sleepTimeBetweenCollectDrops)
  1216. $work = 1
  1217.  
  1218. $OrangeItem = $OrangeItem +1
  1219. $checkCount = $checkCount +1
  1220. EndIf
  1221. Send("{ALTDOWN}")
  1222. Send("{ALTUP}")
  1223. $PixelGreen = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Green,3) ;searches for GREEN itens on the flor OH YEAH 2 !!!
  1224. If Not @error Then
  1225. MouseClick("left", $PixelGreen[0], $PixelGreen[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1226. Sleep($sleepTimeBetweenCollectDrops)
  1227. $work = 1
  1228.  
  1229. $GreenItem = $GreenItem +1
  1230. $checkCount = $checkCount +1
  1231. EndIf
  1232. ; search for gems
  1233.  
  1234. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Amethyst,9) ;searches for AMETHYST GEM
  1235. If Not @error Then
  1236. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1237. Sleep($sleepTimeBetweenCollectDrops)
  1238. $work = 1
  1239.  
  1240. $AmethystGem = $AmethystGem +1
  1241. $checkCount = $checkCount +1
  1242. EndIf
  1243. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Ruby,6) ;searches for RUBY GEM
  1244. If Not @error Then
  1245. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1246. Sleep($sleepTimeBetweenCollectDrops)
  1247. $work = 1
  1248.  
  1249. $RubyGem = $RubyGem +1
  1250. $checkCount = $checkCount +1
  1251. EndIf
  1252. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Topaz,5) ;searches for TOPAZ GEM
  1253. If Not @error Then
  1254. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1255. Sleep($sleepTimeBetweenCollectDrops)
  1256. $work = 1
  1257.  
  1258. $TopazGem = $TopazGem +1
  1259. $checkCount = $checkCount +1
  1260. EndIf
  1261. $SearchResult = PixelSearch(($x1 * $x_ratio),($y1 * $y_ratio),($x2 * $x_ratio),($y2 * $y_ratio),$Emerald,9) ;searches for EMERALD GEM
  1262. If Not @error Then
  1263. MouseClick("left", $SearchResult[0], $SearchResult[1], 1, 10) ;IF ITS THERE IT CLICKS IT.
  1264. Sleep($sleepTimeBetweenCollectDrops)
  1265. $work = 1
  1266.  
  1267. $EmeraldGem = $EmeraldGem +1
  1268. $checkCount = $checkCount +1
  1269. EndIf
  1270. WEnd
  1271. DEBUG("Finish Item Searching")
  1272.  
  1273. EndFunc
  1274.  
  1275.  
  1276.  
  1277.  
  1278. Func CheckDeath()
  1279.  
  1280. $PixelDeath = PixelSearch((670 * $x_ratio),(812 * $y_ratio),(1293 * $x_ratio),(881 * $y_ratio))
  1281. if Not @error Then
  1282. ; dead
  1283. EndIf
  1284. EndFunc
  1285.  
  1286.  
  1287. Func Stop() ;to allow the script to stop
  1288. Exit
  1289. EndFunc
  1290.  
  1291. Func Leave()
  1292. $Leave = True
  1293. EndFunc
  1294.  
  1295. Func DEBUG($MESSAGE)
  1296. If $DebugOn Then
  1297.  
  1298. EndIf
  1299. EndFunc ;==>Debug Info
  1300.  
  1301.  
  1302. Func SelectOneTabChest()
  1303. Sleep(200)
  1304. MouseClick("left",Round(496 * $x_ratio),Round(225 * $y_ratio)) ; 1st tab
  1305. EndFunc
  1306.  
  1307. Func SelectTwoTabChest()
  1308. Sleep(200)
  1309. MouseClick("left",Round(503 * $x_ratio),Round(352 * $y_ratio)) ; 1st tab
  1310. EndFunc
  1311.  
  1312. Func SelectThreeTabChest()
  1313. Sleep(200)
  1314. MouseClick("left",Round(498 * $x_ratio),Round(473 * $y_ratio)) ; 1st tab
  1315. EndFunc
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!