Blue Eye Macro

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

function("Bot")
// Click on any of the empty spaces then click on the glass and click on a part in the digimon's face ( from the bottom part of his face and choose a unique spot on it so he will only attack that digi)
if Color.At coordinate is not (RGB)("123", "0", "0", "735", "72")
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)("123", "0", "0", "735", "72")
begin loop()
Keyboard.Hold keys("{<f3>}")
Macro.Pause("400")
Keyboard.Release keys("{<f3>}")
Macro.Pause("100")
Keyboard.Hold keys("{<f4>}")
Macro.Pause("50")
Keyboard.Release keys("{<f4>}")
Macro.Pause("50")
Function.Execute("Heal")
// fill with the same co ords from above
if Color.At coordinate is not (RGB)("123", "0", "0", "735", "72")
begin
Macro.Break from loop("yes")
Macro.Restart("no")
Function.Execute("Heal")
end
end
function

function("Bot2")
// Click on any of the empty spaces then click on the glass and click on a part in the digimon's face ( from the bottom part of his face and choose a unique spot on it so he will only attack that digi)
if Color.At coordinate is not (RGB)("222", "227", "198", "732", "75")
begin
Macro.Break from loop("yes")
end
// Just fill with the same co ords from above
if Color.At coordinate is (RGB)("222", "227", "198", "732", "75")
begin loop()
Keyboard.Hold keys("{<f3>}")
Macro.Pause("400")
Keyboard.Release keys("{<f3>}")
Macro.Pause("100")
Keyboard.Hold keys("{<f4>}")
Macro.Pause("50")
Keyboard.Release keys("{<f4>}")
Macro.Pause("50")
Function.Execute("Heal")
// fill with the same co ords from above
if Color.At coordinate is not (RGB)("222", "227", "198", "732", "75")
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 50%of your digimon HP , this uses Hp DISK in slot f7
if Color.At coordinate is not within (RGB range)("24", "239", "255", "0", "292", "93")
begin
Keyboard.Hold keys("{<f7>}")
Macro.Pause("10")
Keyboard.Release keys("{<f7>}")
end
// RGB of a part of digimon hp to use FOOD in slot 7 , preferably specify about 25% of digimon HP
if Color.At coordinate is not within (RGB range)("214", "65", "57", "0", "285", "152")
begin
Keyboard.Hold keys("{<f5>}")
Macro.Pause("10")
Keyboard.Release keys("{<f5>}")
end
// RGB for Digimon DS to use DS DISK in slot F8
if Color.At coordinate is not within (RGB range)("0", "227", "247", "0", "289", "165")
begin
Keyboard.Hold keys("{<f8>}")
Macro.Pause("10")
Keyboard.Release keys("{<f8>}")
end
// RGB for TAMER DS , slot 8
if Color.At coordinate is not within (RGB range)("214", "65", "57", "0", "316", "152")
begin
Keyboard.Hold keys("{<f6>}")
Macro.Pause("10")
Keyboard.Release keys("{<f6>}")
end
function

function("Human Pause")
begin
Variable.Set random number("HumanTime", "50", "100")
Macro.Pause("{HumanTime}")
end
function


click esc-shortcut
1 > f3
4 > f4

info :
f5 = cc
f6 = bread
f7 = vitamin
f8 = disk ds

resolusi : 1020 x 768

I`ll try this when i get my BEM back

ok thx ^^

Goood u are god