SHARE
TWEET

Untitled

a guest Nov 22nd, 2019 79 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. function("Ride")
  2.      begin
  3.           begin
  4.                Mouse.Move to coordinate("468", "592")
  5.                Mouse.Hold button("left")
  6.                Function.Execute("Human Pause")
  7.                Mouse.Release button("left")
  8.           end
  9.           begin loop()
  10.                Function.Execute("Heal")
  11.                if  Color.At coordinate is (RGB)("0", "137", "215", "712", "27")
  12.                     begin
  13.                          Keyboard.Press key("1")
  14.                          Function.Execute("Human Pause2")
  15.                          Macro.Restart stopwatch("Ride")
  16.                     end
  17.                Keyboard.Press key("4")
  18.                if  Color.At coordinate is (RGB)("59", "59", "70", "594", "702")
  19.                     begin
  20.                          Macro.Restart stopwatch("dropRide")
  21.                     end
  22.                if  Macro.Stopwatch counter is greater than("Ride", "4000")
  23.                     begin
  24.                          if  Macro.Stopwatch counter is greater than("dropRide", "4000")
  25.                               begin
  26.                                    Macro.Break from loop("no")
  27.                               end
  28.                     end
  29.           end
  30.           // Monta na ride
  31.           while  Color.At coordinate is not (RGB)("24", "45", "62", "664", "584")
  32.                begin
  33.                     Keyboard.Press key("r")
  34.                end
  35.           while  Color.At coordinate is not (RGB)("129", "34", "24", "102", "53")
  36.                begin
  37.                     Function.Execute("Heal")
  38.                     Macro.Pause("4000")
  39.                end
  40.      end
  41. function
  42.  
  43. function("Human Pause")
  44.      begin
  45.           Variable.Set random number("HumanTime", "300", "600")
  46.           Macro.Pause("{HumanTime}")
  47.      end
  48. function
  49.  
  50. function("Human Pause2")
  51.      begin
  52.           Variable.Set random number("HumanTime2", "100", "150")
  53.           Macro.Pause("{HumanTime2}")
  54.      end
  55. function
  56.  
  57. function("Heal")
  58.      // RGB of a part of digimon hp , preferable about 75% of your digimon HP , this uses Hp DISK in slot F4
  59.      if  Color.At coordinate is not (RGB)("177", "48", "35", "138", "127")
  60.           begin
  61.                Keyboard.Hold keys("{<f4>}")
  62.                Keyboard.Release keys("{<f4>}")
  63.           end
  64.      // RGB of a part of digimon hp to use FOOD in slot F6 , preferably specify about 50% of digimon HP
  65.      if  Color.At coordinate is not (RGB)("129", "34", "24", "201", "128")
  66.           begin
  67.                Keyboard.Hold keys("{<f6>}")
  68.                Function.Execute("Human Pause")
  69.                Keyboard.Release keys("{<f6>}")
  70.           end
  71.      // RGB for Digimon DS to use DS DISK in slot F3
  72.      if  Color.At coordinate is not (RGB)("0", "94", "232", "138", "142")
  73.           begin
  74.                Keyboard.Hold keys("{<f3>}")
  75.                Macro.Pause("50")
  76.                Keyboard.Release keys("{<f3>}")
  77.           end
  78.      // RGB for TAMER DS , slot F5
  79.      if  Color.At coordinate is not (RGB)("1", "146", "254", "190", "67")
  80.           begin
  81.                Keyboard.Hold keys("{<f5>}")
  82.                Macro.Pause("50")
  83.                Keyboard.Release keys("{<f5>}")
  84.           end
  85. function
  86.  
  87. function("HPbreak")
  88.      begin
  89.           // Se o bixo tá sem vida, para o loop pra procurar outro
  90.           if  Color.At coordinate is not (RGB)("177", "48", "35", "552", "55")
  91.                begin
  92.                     Macro.Break from loop("yes")
  93.                end
  94.      end
  95. function
RAW Paste Data
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!
 
Top