Blue Eye Macro

begin
     Keyboard.Hold keys("{<tab>}")
     Macro.Pause("200")
     Keyboard.Release keys("{<tab>}")
     Macro.Pause("200")
     Function.Execute("Bot")
     Function.Execute("Heal")
 end

function("Loot")
     begin
          Keyboard.Hold keys("{<f4>}")
          Macro.Pause("250")
          Keyboard.Release keys("{<f4>}")
          Macro.Pause("250")
     end
function

function("Bot")
     // ARGOMON
     if  Color.At coordinate is not (RGB)("163", "237", "44", "768", "42")
          begin
               Macro.Break from loop("yes")
               Function.Execute("Bot2")
          end
     // Just fill with the same co ords from above
     if  Color.At coordinate is (RGB)("163", "237", "44", "768", "42")
          begin loop()
               Keyboard.Hold keys("{<f1>}")
               Macro.Pause("200")
               Keyboard.Release keys("{<f1>}")
               Macro.Pause("200")
               Keyboard.Hold keys("{<f4>}")
               Macro.Pause("350")
               Keyboard.Release keys("{<f4>}")
               Macro.Pause("500")
               Function.Execute("Heal")
               // fill with the same co ords from above
               if  Color.At coordinate is not (RGB)("163", "237", "44", "768", "42")
                    begin
                         Macro.Break from loop("yes")
                         Macro.Restart("no")
                         Function.Execute("Heal")
                    end
          end
function

function("Bot2")
     // ARGOMON
     if  Color.At coordinate is not (RGB)("163", "237", "44", "768", "42")
          begin
               Macro.Break from loop("yes")
               Macro.Restart("no")
          end
     // fill with same co ords from above
     if  Color.At coordinate is (RGB)("163", "237", "44", "768", "42")
          begin loop()
               Keyboard.Hold keys("{<f1>}")
               Macro.Pause("350")
               Keyboard.Release keys("{<f1>}")
               Macro.Pause("500")
               Keyboard.Hold keys("{<f4>}")
               Macro.Pause("350")
               Keyboard.Release keys("{<f4>}")
               Macro.Pause("500")
               Function.Execute("Heal")
               // fill with same co ords from above
               if  Color.At coordinate is not (RGB)("163", "237", "44", "768", "42")
                    begin
                         Macro.Break from loop("yes")
                         Macro.Restart("no")
                         Function.Execute("Heal")
                    end
          end
function

function("Heal")
     // RGB of a part of digimon hp , preferable about 25% of your digimon HP , this uses Hp DISK in slot F7
     if  Color.At coordinate is not (RGB)("216", "65", "54", "188", "128")
          begin
               Keyboard.Hold keys("{<f7>}")
               Macro.Pause("50")
               Keyboard.Release keys("{<f7>}")
          end
     // RGB of a part of digimon hp to use FOOD in slot 7 , preferably specify about 50% of digimon HP
     if  Color.At coordinate is not (RGB)("216", "65", "54", "132", "128")
          begin
               Keyboard.Hold keys("{<f5>}")
               Macro.Pause("50")
               Keyboard.Release keys("{<f5>}")
          end
     // RGB for Digimon DS to use DS DISK in slot F8
     if  Color.At coordinate is not (RGB)("4", "228", "243", "119", "141")
          begin
               Keyboard.Hold keys("{<f8>}")
               Macro.Pause("50")
               Keyboard.Release keys("{<f8>}")
          end
     // RGB for TAMER DS , slot 8
     if  Color.At coordinate is not (RGB)("0", "162", "179", "146", "65")
          begin
               Keyboard.Hold keys("{<f6>}")
               Macro.Pause("50")
               Keyboard.Release keys("{<f6>}")
          end
function