Advertisement
Guest User

Untitled

a guest
Nov 21st, 2019
160
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.72 KB | None | 0 0
  1. #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
  2. ; #Warn ; Enable warnings to assist with detecting common errors.
  3. SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
  4. SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
  5.  
  6. #SingleInstance, Force
  7.  
  8. SetBatchLines, 1ms
  9. SetKeyDelay,0
  10. xexura := 1853 ;2418-2508 2498 = 90% 2475 = 60%
  11. xvita := 1833
  12. xgran := 1850
  13. xsio := 1230 ;1080-1280 1230 = 80% 1210 = 70% 1190 = 60% 1170 = 50%
  14. xtrue := 1071
  15. HealthYsio := 419
  16. HealthY := 153
  17.  
  18. Loop,
  19. {
  20.  
  21. label:
  22. Sleep, %var%
  23. Random, var, 20, 40
  24. Random, vary, 5, 10
  25. Random, varx, 1001, 1030
  26. If WinActive("Tibia")
  27. {
  28. SetKeyDelay,%var%,%var%
  29. PixelGetColor, Checkexura, %xexura%, %HealthY% ;Pixel of %yourhp for exura
  30. PixelGetColor, Checkvita, %xvita%, %HealthY% ;Pixel of %yourhp for vita
  31. PixelGetColor, Checkgran, %xgran%, %HealthY% ;Pixel of %yourhp for egran
  32. If ((Checkexura != 0x7D7DFF) And (Checkvita != 0x7D7DFF))
  33. {
  34. Sleep, %vary%
  35. Send, {F8 down}
  36. Sleep, %var%
  37. Send, {F8 up}
  38. ;hotkey for exura vita
  39. Goto, label3 ;ignore rest of script if heal is done
  40. }
  41. Else
  42. If ((Checkgran != 0x7D7DFF) And (Checkexura != 0x7D7DFF))
  43. {
  44. Sleep, %vary%
  45. Send, {F2 down}
  46. Sleep, %var%
  47. Send, {F2 up} ;hotkey for exura gran
  48. Goto, label3 ;ignore rest of script if heal is done
  49. }
  50. Goto, label
  51. label3:
  52. Sleep, %varx% ;cooldown for healing
  53. }
  54. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement