Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Thu Jun 21, 2018 9:39 pm

All times are UTC




Post new topic Reply to topic  [ 1 post ] 
Author Message
 Post subject: bem i made need help improve
Thanked: 1 time(s)  Unread post Posted: Sat May 19, 2018 1:22 pm 
Contributor
Contributor



Joined: Sat May 19, 2018 11:38 am
Posts: 79
Been thanked: 26 time(s)
Has thanked: 27 time(s)
Contribution Points: 140
begin
Function.Execute("DropAtt")
Function.Execute("Party")
Function.Execute("Heal")
Keyboard.Hold keys("{<tab>}")
Keyboard.Release keys("{<tab>}")
Function.Execute("BOT")
end

function("BOT")
// Agro/Leader RGB red colour around fist
if Color.At coordinate is (RGB)("164", "0", "29", "409", "69")
begin loop()
Function.Execute("Attack")
Function.Execute("Loot")
// BOT will replay and not TAB n TABing find another target
if Color.At coordinate is not (RGB)("164", "0", "29", "409", "69")
begin
Function.Execute("Loot")
Macro.Break from loop("yes")
Macro.Restart("no")
end
end
// Main RGB/targeting mob => Have FUN on BOT
if Color.At coordinate is (RGB)("142", "135", "133", "584", "61")
begin loop()
Function.Execute("Attack")
Function.Execute("Loot")
// BOT will replay and not TAB n TABing find another target
if Color.At coordinate is not (RGB)("142", "135", "133", "584", "61")
begin
Function.Execute("Loot")
Macro.Break from loop("yes")
Macro.Restart("no")
end
end
// 2nd RGB/targeting mob => Have FUN on BOT
if Color.At coordinate is (RGB)("147", "22", "27", "597", "53")
begin loop()
Function.Execute("Attack")
Function.Execute("Loot")
// BOT will replay and not TAB n TABing find another target
if Color.At coordinate is not (RGB)("147", "22", "27", "597", "53")
begin
Function.Execute("Loot")
Macro.Break from loop("yes")
Macro.Restart("no")
end
end
function

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

function("Attack")
// do skill f2/f3 at Leader if DS>40%
if Color.At coordinate is (RGB)("164", "0", "29", "409", "69")
begin
Keyboard.Hold keys("{<f4>}")
Keyboard.Release keys("{<f4>}")
if Color.At coordinate is (RGB)("4", "228", "243", "143", "141")
begin
Keyboard.Hold keys("{<f2>}")
Keyboard.Release keys("{<f2>}")
end
end
// skill f1 put at number 2 DS>40% and skill f2/f3 put at number 3 DS>70% (mob HP>100% doesnt do skill)
if Color.At coordinate is (RGB)("198", "60", "49", "545", "55")
begin
Keyboard.Hold keys("{<f4>}")
Keyboard.Release keys("{<f4>}")
if Color.At coordinate is (RGB)("4", "228", "243", "184", "141")
begin
Keyboard.Hold keys("{<f2>}")
Keyboard.Release keys("{<f2>}")
end
if Color.At coordinate is (RGB)("4", "228", "243", "143", "141")
begin
Keyboard.Hold keys("{<f1>}")
Keyboard.Release keys("{<f1>}")
end
end
function

function("Heal")
// Set RGB your char at unique colour=>prefent this not to run if there is no char RGB
if Color.At coordinate is (RGB)("146", "169", "175", "33", "88")
begin
// put Vit C at number 8 = heal DS at
// 20% (RGB)("0", "206", "220", "125", "66")at 40% (RGB)("0", "206", "220", "145", "66")
if Color.At coordinate is not (RGB)("4", "228", "243", "142", "67")
begin
Keyboard.Hold keys("{<f8>}")
Keyboard.Release keys("{<f8>}")
end
if Color.At coordinate is not (RGB)("184", "47", "36", "135", "126")
begin
Keyboard.Hold keys("{<f7>}")
Keyboard.Release keys("{<f7>}")
end
if Color.At coordinate is not (RGB)("184", "47", "36", "188", "126")
begin
Keyboard.Hold keys("{<f6>}")
Keyboard.Release keys("{<f6>}")
end
end
function

function("Fatigue")
// put non-uselles item at 1st slot cuz it will auto-drop it for jacket (stay inventory window opened)
if Color.At coordinate is (RGB)("255", "175", "0", "224", "53")
begin
if Color.At coordinate is not (RGB)("29", "43", "89", "725", "150")
begin
Mouse.Move to coordinate("725", "150")
Function.Execute("Drop")
end
Keyboard.Hold keys("c")
Keyboard.Release keys("c")
Mouse.Move to coordinate("125", "200")
Mouse.Hold button("left")
Mouse.Release button("left")
Mouse.Move to coordinate("725", "150")
Mouse.Hold button("left")
Mouse.Release button("left")
Mouse.Move to coordinate("596", "240")
Keyboard.Hold keys("c")
Keyboard.Release keys("c")
Mouse.Move to coordinate("725", "150")
Mouse.Hold button("right")
Mouse.Release button("right")
Keyboard.Hold keys("{<f6>}")
Keyboard.Release keys("{<f6>}")
end
function

function("DropAtt")
// Auto drop attribut at slot 22-42(extra inventory 1)
if Color.At coordinate is (RGB)("121", "137", "136", "723", "321")
begin
Mouse.Move to coordinate("723", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "759", "321")
begin
Mouse.Move to coordinate("759", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "795", "321")
begin
Mouse.Move to coordinate("795", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "831", "321")
begin
Mouse.Move to coordinate("831", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "867", "321")
begin
Mouse.Move to coordinate("867", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "903", "321")
begin
Mouse.Move to coordinate("903", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "939", "321")
begin
Mouse.Move to coordinate("939", "321")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "723", "357")
begin
Mouse.Move to coordinate("723", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "759", "357")
begin
Mouse.Move to coordinate("759", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "795", "357")
begin
Mouse.Move to coordinate("795", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "831", "357")
begin
Mouse.Move to coordinate("831", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "867", "357")
begin
Mouse.Move to coordinate("867", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "903", "357")
begin
Mouse.Move to coordinate("903", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "939", "357")
begin
Mouse.Move to coordinate("939", "357")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "723", "393")
begin
Mouse.Move to coordinate("723", "393")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "759", "393")
begin
Mouse.Move to coordinate("759", "393")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "795", "393")
begin
Mouse.Move to coordinate("795", "393")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "831", "393")
begin
Mouse.Move to coordinate("831", "393")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "867", "393")
begin
Mouse.Move to coordinate("867", "393")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "903", "393")
begin
Mouse.Move to coordinate("903", "393")
Function.Execute("Drop")
end
if Color.At coordinate is (RGB)("121", "137", "136", "939", "393")
begin
Mouse.Move to coordinate("939", "393")
Function.Execute("Drop")
end
function

function("Drop")
begin
Mouse.Hold button("left")
Mouse.Release button("left")
Mouse.Move to coordinate("596", "240")
Mouse.Hold button("left")
Mouse.Release button("left")
Mouse.Move to coordinate("474", "235")
Mouse.Hold button("left")
Mouse.Release button("left")
end
function

function("Party")
if Color.At coordinate is (RGB)("9", "234", "249", "354", "213")
begin
Mouse.Move to coordinate("465", "234")
Mouse.Hold button("left")
Mouse.Release button("left")
end
function


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 1 post ] 

All times are UTC


You cannot post new topics in this forum
You can reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Jump to:  


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group