Blue Eye Macro

  begin
     if  Color.At coordinate is not (RGB)("129", "193", "245", "568", "63")
          begin
               Keyboard.Hold keys("{<tab>}")
               Function.Execute("AFK1")
               Keyboard.Release keys("{<tab>}")
               Function.Execute("Loot")
          end
     if  Color.At coordinate is (RGB)("170", "156", "173", "546", "92")
          begin
               Keyboard.Hold keys("{<tab>}")
               Function.Execute("AFK1")
               Keyboard.Release keys("{<tab>}")
               Function.Execute("Loot")
          end
     if  Color.At coordinate is (RGB)("129", "193", "245", "568", "63")
          begin loop()
               Function.Execute("Skill")
               if  Color.At coordinate is (RGB)("198", "60", "49", "574", "55")
                    begin
                         Keyboard.Hold keys("{<f4>}")
                         Function.Execute("AFK1")
                         Keyboard.Release keys("{<f4>}")
                         Function.Execute("Loot")
                         Function.Execute("AFK2")
                    end
               if  Color.At coordinate is (RGB)("184", "189", "157", "600", "700")
                    begin
                         Macro.Break from loop("yes")
                    end
          end
 end

function("Skill")
     if  Color.At coordinate is (RGB)("198", "60", "49", "715", "55")
          begin
               Keyboard.Hold keys("{<f2>}")
               Function.Execute("AFK1")
               Keyboard.Release keys("{<f2>}")
               Function.Execute("AFK2")
               Keyboard.Hold keys("{<f2>}")
               Function.Execute("AFK1")
               Keyboard.Release keys("{<f2>}")
               Function.Execute("AFK2")
          end
function

function("Heal")
     begin
          // Burger/CC =>put at number 8 - 25%
          if  Color.At coordinate is not (RGB)("198", "60", "49", "140", "127")
               begin
                    Keyboard.Hold keys("8")
                    Function.Execute("AFK1")
                    Keyboard.Release keys("8")
               end
          // Burger/CC =>put at number 8 - 25%
          if  Color.At coordinate is not (RGB)("15", "241", "255", "135", "68")
               begin
                    Keyboard.Hold keys("8")
                    Function.Execute("AFK1")
                    Keyboard.Release keys("8")
               end
          if  Color.At coordinate is (RGB)("184", "189", "157", "600", "700")
               begin
                    // cornbread =>put at f6 - 65%
                    if  Color.At coordinate is not (RGB)("198", "60", "49", "194", "127")
                         begin
                              Keyboard.Hold keys("4")
                              Function.Execute("AFK1")
                              Keyboard.Release keys("4")
                         end
               end
          // HP Disc =>put at 5 - 40%
          if  Color.At coordinate is not (RGB)("198", "60", "49", "164", "127")
               begin
                    Keyboard.Hold keys("5")
                    Function.Execute("AFK1")
                    Keyboard.Release keys("5")
               end
          // Disc DS F/G =>put at 6
          if  Color.At coordinate is not (RGB)("15", "241", "255", "143", "142")
               begin
                    Keyboard.Hold keys("6")
                    Function.Execute("AFK1")
                    Keyboard.Release keys("6")
               end
          if  Color.At coordinate is (RGB)("184", "189", "157", "600", "700")
               begin
                    // Vitamin =>put at 7
                    if  Color.At coordinate is not (RGB)("15", "241", "255", "143", "68")
                         begin
                              Keyboard.Hold keys("7")
                              Function.Execute("AFK1")
                              Keyboard.Release keys("7")
                         end
               end
     end
function

function("Loot")
     begin
          Keyboard.Hold keys("{<f5>}")
          Function.Execute("AFK1")
          Keyboard.Release keys("{<f5>}")
          Function.Execute("AFK1")
          Function.Execute("Heal")
          Keyboard.Hold keys("{<f5>}")
          Function.Execute("AFK1")
          Keyboard.Release keys("{<f5>}")
          Function.Execute("AFK1")
     end
function

function("AFK1")
     begin
          Variable.Set random number("AFK1", "100", "150")
          Macro.Pause("{AFK1}")
     end
function

function("AFK2")
     begin
          Variable.Set random number("AFK2", "600", "800")
          Macro.Pause("{AFK2}")
     end
function