Advertisement
Guest User

torchlight 1 fishing script

a guest
Jul 31st, 2015
138
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.14 KB | None | 0 0
  1. Meat420()
  2. {
  3.  
  4. counter:=0
  5.  
  6. MyRares:
  7. if GetKeyState("Escape", "P")
  8. ToolTip
  9.  
  10. WinActivate Torchlight
  11. Sleep, 10
  12.  
  13. ; click on fishing hole:
  14. MouseMove, 390, 346 ; coords are for 640x480 windowed
  15. Sleep 25
  16. Send, {LButton down}
  17. Sleep 25
  18. Send, {LButton up}
  19.  
  20. loop {
  21. ; px, py, x1, y1, x2, y2, colour hexcode, # of shades, speed
  22. ; coords are for 640x480 windowed
  23. PixelSearch, Px, Py, 295, 340, 305, 350, 0x857B8E, 12, Fast
  24.  
  25. if GetKeyState("Escape", "P")
  26. {
  27. ToolTip
  28. break
  29. }
  30. else{
  31. if not ErrorLevel
  32. {
  33. counter++
  34. ToolTip %counter%
  35. Sleep 10
  36.  
  37. ; click on catch fish button:
  38. MouseMove, 325, 338 ; coords are for 640x480 windowed
  39. Sleep 33
  40. Send, {LButton down}
  41. Sleep 25
  42. Send, {LButton up}
  43.  
  44. ; w8 for fish catching animation:
  45. Sleep 4350
  46.  
  47. ; click on ok button:
  48. MouseMove, 330, 320 ; coords are for 640x480 windowed
  49. Sleep 25
  50. Send, {LButton down}
  51. Sleep 30
  52. Send, {LButton up}
  53. Sleep 30
  54.  
  55. ; reset:
  56. Goto, MyRares
  57. }
  58. }
  59. Sleep 40
  60. }
  61.  
  62. }
  63.  
  64. F3::Meat420()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement