Advertisement
Guest User

Untitled

a guest
Nov 21st, 2019
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.57 KB | None | 0 0
  1. // shit
  2. //
  3. //
  4. begin
  5. end
  6. begin loop()
  7. Keyboard.Hold keys("{<tab>}4")
  8. Keyboard.Release keys("{<tab>}4")
  9. Function.Execute("Heal")
  10. // RGB of the digi you want to attack
  11. if Color.At coordinate is (RGB)("146", "135", "98", "727", "47")
  12. begin loop()
  13. Keyboard.Release keys("1")
  14. Function.Execute("Human Pause2")
  15. Keyboard.Release keys("{<f2>}")
  16. Function.Execute("Human Pause2")
  17. Keyboard.Release keys("{<f1>}")
  18. Function.Execute("Human Pause2")
  19. Keyboard.Hold keys("4")
  20. Function.Execute("Human Pause2")
  21. Keyboard.Release keys("4")
  22. Function.Execute("Heal")
  23. // Same co ordinates of the previous check
  24. if Color.At coordinate is not (RGB)("177", "48", "35", "552", "55")
  25. begin
  26. Macro.Restart("yes")
  27. end
  28. end
  29. end
  30.  
  31. function("Human Pause")
  32. begin
  33. Variable.Set random number("HumanTime", "300", "600")
  34. Macro.Pause("{HumanTime}")
  35. end
  36. function
  37.  
  38. function("Human Pause2")
  39. begin
  40. Variable.Set random number("HumanTime2", "100", "150")
  41. Macro.Pause("{HumanTime2}")
  42. end
  43. function
  44.  
  45. function("Heal")
  46. // RGB of a part of digimon hp , preferable about 75% of your digimon HP , this uses Hp DISK in slot F4
  47. if Color.At coordinate is not (RGB)("198", "60", "49", "197", "127")
  48. begin
  49. Keyboard.Hold keys("{<f4>}")
  50. Keyboard.Release keys("{<f4>}")
  51. end
  52. // RGB of a part of digimon hp to use FOOD in slot F6 , preferably specify about 50% of digimon HP
  53. if Color.At coordinate is not (RGB)("216", "65", "54", "115", "128")
  54. begin
  55. Keyboard.Hold keys("{<f6>}")
  56. Function.Execute("Human Pause")
  57. Keyboard.Release keys("{<f6>}")
  58. end
  59. // RGB for Digimon DS to use DS DISK in slot F3
  60. if Color.At coordinate is not (RGB)("15", "241", "255", "134", "142")
  61. begin
  62. Keyboard.Hold keys("{<f3>}")
  63. Macro.Pause("50")
  64. Keyboard.Release keys("{<f3>}")
  65. end
  66. // RGB for TAMER DS , slot F5
  67. if Color.At coordinate is not (RGB)("15", "241", "255", "137", "68")
  68. begin
  69. Keyboard.Hold keys("{<f5>}")
  70. Macro.Pause("50")
  71. Keyboard.Release keys("{<f5>}")
  72. end
  73. function
  74.  
  75. function("if")
  76. function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement