Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Thu Jul 27, 2017 4:47 pm

All times are UTC




Post new topic Reply to topic  [ 11 posts ]  Go to page 1, 2  Next
Author Message
 Post subject: Coin farming bot
Thanked: 4 time(s)  Unread post Posted: Tue Jul 26, 2016 4:12 am 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Jul 31, 2015 4:37 pm
Posts: 657
Been thanked: 111 time(s)
Has thanked: 16 time(s)
Contribution Points: 710
I just made this super simple bot, you only need to edit the rgb with the color of the head of the digi you wanna kill, use the one that appears at the top hp bar. This bot is the simpliest possible, doesnt heal ds nor hp, so use a lv95+ with some ev to farm.
It also has antimacro.

Code:
 
begin loop()
     Keyboard.Press key("{<tab>}")
     Keyboard.Release keys("{<tab>}")
     Keyboard.Press key("4")
     Keyboard.Release keys("4")
     Function.Execute("kill")
     Function.Execute("Anti-Macro Protector")
 end

function("kill")
     // color de la cara del digi
     if  Color.At coordinate is (RGB)("", "", "", "", "")
          begin loop()
               Function.Execute("Anti-Macro Protector")
               Keyboard.Press key("1")
               Keyboard.Release keys("1")
               Keyboard.Press key("4")
               Keyboard.Release keys("4")
               // color de la cara del digi, mismo de arriba
               if  Color.At coordinate is not (RGB)("", "", "", "", "")
                    begin
                         Macro.Restart("No")
                    end
          end
function

function("Anti-Macro Protector")
     begin
          //  Locate time progression bar and pick the (X,Y) coordinates of the first  point
          if  Color.Pixel pattern can be located on screen("207,173,0,5,0,207,173,0,0,5,199,163,7,0,5,236,192,32,0,5,253,241,50,0,5,255,217,12,-5,0,255,218,12,0,-5,253,241,50,0,-5,235,192,32,0,-5,198,163,7", "4")
               begin
                    //  Locate time progression bar and pick the (X,Y) coordinates of  the first point
                    Color.Wait for and locate pixel pattern("207,173,0,5,0,207,173,0,0,5,199,163,7,0,5,236,192,32,0,5,253,241,50,0,5,255,217,12,-5,0,255,218,12,0,-5,253,241,50,0,-5,235,192,32,0,-5,198,163,7", "4", "X", "Y")
                    // Set the X and Y axis at the face to identify
                    Variable.Evaluate (Math)("{X} + 22", "X1")
                    Variable.Evaluate (Math)("{X} + 33", "X2")
                    Variable.Evaluate (Math)("{X} + 44", "X3")
                    Variable.Evaluate (Math)("{Y} - 43", "Y1")
                    Variable.Evaluate (Math)("{Y} - 32", "Y2")
                    Variable.Evaluate (Math)("{Y} - 21", "Y3")
                    //  Set the X and Y axis to locates each icon
                    Variable.Evaluate (Math)("{X} + 20", "Xicon1")
                    Variable.Evaluate (Math)("{X} + 70", "Xicon2")
                    Variable.Evaluate (Math)("{X} + 120", "Xicon3")
                    Variable.Evaluate (Math)("{X} + 170", "Xicon4")
                    Variable.Evaluate (Math)("{X} + 220", "Xicon5")
                    Variable.Evaluate (Math)("{Y} + 58", "Yrow1")
                    Variable.Evaluate (Math)("{Y} + 108", "Yrow2")
                    //  Pick the RGB at 5 points on the picture to identify
                    Color.Get color at coordinate (RGB)("{X1}", "{Y1}", "R1", "G1", "B1")
                    Color.Get color at coordinate (RGB)("{X3}", "{Y1}", "R2", "G2", "B2")
                    Color.Get color at coordinate (RGB)("{X2}", "{Y2}", "R3", "G3", "B3")
                    Color.Get color at coordinate (RGB)("{X1}", "{Y3}", "R4", "G4", "B4")
                    Color.Get color at coordinate (RGB)("{X3}", "{Y3}", "R5", "G5", "B5")
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 1 row 1
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon1}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon1}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon1}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon1}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon1}", "{Yrow1}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon1}", "{Yrow1}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon1}", "{Yrow1}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 2 row 1
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon2}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon2}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon2}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon2}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon2}", "{Yrow1}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon2}", "{Yrow1}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon2}", "{Yrow1}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 3 row 1
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon3}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon3}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon3}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon3}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon2}", "{Yrow1}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon3}", "{Yrow1}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon3}", "{Yrow1}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 4 row 1
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon4}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon4}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon4}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon4}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon4}", "{Yrow1}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon4}", "{Yrow1}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon4}", "{Yrow1}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 5 row 1
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon5}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon5}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon5}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon5}", "{Yrow1}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon5}", "{Yrow1}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon5}", "{Yrow1}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon5}", "{Yrow1}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 1 row 2
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon1}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon1}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon1}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon1}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon1}", "{Yrow2}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon1}", "{Yrow2}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon1}", "{Yrow2}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 2 row 2
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon2}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon2}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon2}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon2}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon2}", "{Yrow2}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon2}", "{Yrow2}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon2}", "{Yrow2}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 3 row 2
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon3}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon3}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon3}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon3}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon3}", "{Yrow2}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon3}", "{Yrow2}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon3}", "{Yrow2}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 4 row 2
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon4}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon4}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon4}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon4}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon4}", "{Yrow2}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon4}", "{Yrow2}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon4}", "{Yrow2}", "left")
                         end
                    Macro.Pause("100")
                    //  If the RBG picked on the face matche with the icon 5 row 2
                    if  Color.Near coordinate is within (RGB range)("{R1}", "{G1}", "{B1}", "5", "{Xicon5}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R2}", "{G2}", "{B2}", "5", "{Xicon5}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R3}", "{G3}", "{B3}", "5", "{Xicon5}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R4}", "{G4}", "{B4}", "5", "{Xicon5}", "{Yrow2}", "15")
                         and
                         Color.Near coordinate is within (RGB range)("{R5}", "{G5}", "{B5}", "5", "{Xicon5}", "{Yrow2}", "15")
                         begin
                              Mouse.Move to coordinate("{Xicon5}", "{Yrow2}")
                              Macro.Pause("3000")
                              Mouse.Click at coordinate("{Xicon5}", "{Yrow2}", "left")
                         end
                    Macro.Pause("100")
               end
     end
function

_________________
Corgis are awsome~~
Simple bot for farming coins: viewtopic.php?f=304&t=28256


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Tue Jul 26, 2016 5:22 am 


download??


Top
  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Tue Jul 26, 2016 2:12 pm 
New User
New User



Joined: Tue Jul 19, 2016 1:47 pm
Posts: 19
Been thanked: 3 time(s)
Has thanked: 5 time(s)
Contribution Points: 25
Oh Thank you !! :D


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 1 time(s)  Unread post Posted: Tue Jul 26, 2016 6:05 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Jul 31, 2015 4:37 pm
Posts: 657
Been thanked: 111 time(s)
Has thanked: 16 time(s)
Contribution Points: 710
Shanox26 wrote:
Oh Thank you !! :D


You welcome

_________________
Corgis are awsome~~
Simple bot for farming coins: viewtopic.php?f=304&t=28256


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 1 time(s)  Unread post Posted: Wed Jul 27, 2016 1:42 am 
Silver Contributor
Silver Contributor



Joined: Wed Jul 13, 2016 3:24 pm
Posts: 111
Been thanked: 8 time(s)
Has thanked: 11 time(s)
Contribution Points: 96
Thanks


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Sun Jul 31, 2016 7:32 am 
Contributor
Contributor



Joined: Fri Jun 24, 2016 8:16 am
Posts: 79
Been thanked: 3 time(s)
Has thanked: 74 time(s)
Contribution Points: 25
thanks


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Thu Aug 04, 2016 10:26 am 
Silver Contributor
Silver Contributor



Joined: Tue Oct 21, 2014 7:27 am
Posts: 194
Been thanked: 4 time(s)
Has thanked: 12 time(s)
Contribution Points: 20
Thank you for your bot


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Sun Aug 07, 2016 10:28 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Jul 31, 2015 4:37 pm
Posts: 657
Been thanked: 111 time(s)
Has thanked: 16 time(s)
Contribution Points: 710
libinjie wrote:
Thank you for your bot


You're welcome

_________________
Corgis are awsome~~
Simple bot for farming coins: viewtopic.php?f=304&t=28256


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Mon Aug 15, 2016 9:54 pm 
Contributor
Contributor



Joined: Sat Aug 13, 2016 7:21 pm
Posts: 52
Been thanked: 4 time(s)
Has thanked: 2 time(s)
Contribution Points: 7
Thanks guy ^.^

_________________
If you like do not hesitate to click this Thank You ^.^ -------------------------------------------->>>>>>>>>


Top
 Profile  
Reply with quote  
 Post subject: Re: Coin farming bot
Thanked: 0 time(s)  Unread post Posted: Mon Sep 12, 2016 4:07 am 
New User
New User



Joined: Mon Sep 12, 2016 3:52 am
Posts: 2
Been thanked: 0 time(s)
Has thanked: 0 time(s)
Contribution Points: 13
How can i use the bot


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 11 posts ]  Go to page 1, 2  Next

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