Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Thu May 24, 2018 11:36 pm

All times are UTC




Post new topic Reply to topic  [ 47 posts ]  Go to page 1, 2, 3, 4, 5  Next
Author Message
 Post subject: Elrayes Attribute Disposer (UPDATED)(23/03)
Thanked: 9 time(s)  Unread post Posted: Sun Apr 24, 2016 4:41 am 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 810
Location: Egypt , Portsaid
Been thanked: 233 time(s)
Has thanked: 10 time(s)
Contribution Points: 1896
Hello BEM Community ,
Today i'm Bringing You Attribute Disposer Script .
ATTENTION: YOU NEED THE PACK01 SKIN IN ORDER TO MAKE IT PRESS YES BUTTON TO CONFIRM THROWING AWAY THE ATT .
That's the Skin :
Attachment:
File comment: That's The Skin Used For it .
Skin.rar [2.7 KiB]
Downloaded 52 times

That the Backup :
Attachment:
File comment: That's the Backup For the Skin .
Backup.rar [5.96 KiB]
Downloaded 41 times

At First The Code Is :
Code:
 begin
     Function.Execute("RGB")
     Function.Execute("Checking")
 end

function("Checking")
     begin
          //  Locate Attribute Pattern
          if  Color.Pixel pattern can be located on screen("116,111,117,5,0,60,62,63,5,0,52,52,52,5,0,108,105,114,0,5,80,78,77,0,5,79,77,76,0,5,96,91,97,-5,0,74,71,73,-5,0,92,93,90,-5,0,102,99,108,0,-5,69,69,69,0,-5,64,64,64", "10")
               begin
                    Variable.Set("Attribute", "116,111,117,5,0,60,62,63,5,0,52,52,52,5,0,108,105,114,0,5,80,78,77,0,5,79,77,76,0,5,96,91,97,-5,0,74,71,73,-5,0,92,93,90,-5,0,102,99,108,0,-5,69,69,69,0,-5,64,64,64")
                    Function.Execute("AttCheck")
               end
          //  Locate Attribute Pattern
          if  Color.Pixel pattern can be located on screen("54,53,55,5,0,43,44,44,5,0,42,42,42,5,0,53,52,54,0,5,47,47,47,0,5,47,47,46,0,5,50,49,51,-5,0,46,45,46,-5,0,50,50,49,-5,0,52,51,53,0,-5,45,45,45,0,-5,44,44,44", "10")
               begin
                    Variable.Set("Attribute2", "54,53,55,5,0,43,44,44,5,0,42,42,42,5,0,53,52,54,0,5,47,47,47,0,5,47,47,46,0,5,50,49,51,-5,0,46,45,46,-5,0,50,50,49,-5,0,52,51,53,0,-5,45,45,45,0,-5,44,44,44")
                    Function.Execute("AttCheck2")
               end
     end
function

function("AttCheck")
     begin
          //  Locate Attribute Pattern
          if  Color.Pixel pattern can be located on screen("{Attribute}", "10")
               begin
                    //  Choose (X,Y) For Attribute
                    Color.Wait for and locate pixel pattern("{Attribute}", "10", "ATTX", "ATTY")
                    Mouse.Move to coordinate("{ATTX}", "{ATTY}")
                    Macro.Pause("500")
                    Mouse.Hold button("left")
                    Macro.Pause("500")
                    Mouse.Release button("left")
                    Macro.Pause("500")
                    Mouse.Move to coordinate("{HalfX}", "{HalfY}")
                    Macro.Pause("500")
                    Mouse.Hold button("left")
                    Macro.Pause("500")
                    Mouse.Release button("left")
                    Macro.Pause("500")
                    if  Color.At coordinate is (RGB)("{YESR}", "{YESG}", "{YESB}", "{YESX2}", "{YESY}")
                         begin loop()
                              Mouse.Move to coordinate("{YESX}", "{YESY}")
                              Mouse.Hold button("left")
                              Macro.Pause("1000")
                              Mouse.Release button("left")
                              if  Color.At coordinate is not (RGB)("{YESR}", "{YESG}", "{YESB}", "{YESX2}", "{YESY}")
                                   begin
                                        Macro.Break from loop("yes")
                                   end
                         end
               end
          if  Color.Pixel pattern can be located on screen("{Attribute}", "10")
               begin
                    Macro.Restart("no")
               end
     end
function

function("AttCheck2")
     begin
          //  Locate Attribute Pattern
          if  Color.Pixel pattern can be located on screen("{Attribute2}", "10")
               begin
                    //  Choose (X,Y) For Attribute
                    Color.Wait for and locate pixel pattern("{Attribute2}", "10", "ATTX2", "ATTY2")
                    Mouse.Move to coordinate("{ATTX2}", "{ATTY2}")
                    Macro.Pause("500")
                    Mouse.Hold button("left")
                    Macro.Pause("500")
                    Mouse.Release button("left")
                    Macro.Pause("500")
                    Mouse.Move to coordinate("{HalfX}", "{HalfY}")
                    Macro.Pause("500")
                    Mouse.Hold button("left")
                    Macro.Pause("500")
                    Mouse.Release button("left")
                    Macro.Pause("500")
                    if  Color.At coordinate is (RGB)("{YESR}", "{YESG}", "{YESB}", "{YESX2}", "{YESY}")
                         begin loop()
                              Mouse.Move to coordinate("{YESX}", "{YESY}")
                              Mouse.Hold button("left")
                              Macro.Pause("1000")
                              Mouse.Release button("left")
                              if  Color.At coordinate is not (RGB)("{YESR}", "{YESG}", "{YESB}", "{YESX2}", "{YESY}")
                                   begin
                                        Macro.Break from loop("yes")
                                   end
                         end
               end
          if  Color.Pixel pattern can be located on screen("{Attribute2}", "10")
               begin
                    Macro.Restart("no")
               end
     end
function

function("RGB")
     begin
          System.Get combined screen resolution("YESSX", "YESY")
          Variable.Evaluate (Math)("{YESSX}/2", "YESX")
          Variable.Evaluate (Math)("{YESX}-65", "YESX")
          Variable.Divide (Math)("YESY", "2")
          Variable.Evaluate (Math)("{YESY}-150", "YESY")
          Variable.Evaluate (Math)("{YESSX}+30", "YESX2")
          Variable.Set("YESR", "238")
          Variable.Set("YESG", "0")
          Variable.Set("YESB", "0")
          System.Get combined screen resolution("HalfX", "HalfY")
          Variable.Divide (Math)("HalfX", "2")
          Variable.Divide (Math)("HalfY", "2")
     end
function

 


2nd You Have To Adjust The Pixels in the RGB Pattern
Click On The Investigate
Attachment:
1.png
1.png [ 27.15 KiB | Viewed 905 times ]

Then Be Careful Of These Steps They're Easy !!! But Careful
1st Make Range Pixel 10
Then Do As The Picture :

Attachment:
2.png
2.png [ 321.04 KiB | Viewed 905 times ]

Then is To Copy The Pattern What have You Got To The Next Code !!
Attachment:
3.png
3.png [ 38.01 KiB | Viewed 905 times ]

Then Click On The Investigate
Attachment:
4.png
4.png [ 27.52 KiB | Viewed 905 times ]

Then Be Careful Of These Steps They're Easy !!! But Careful
1st Make Range Pixel 10
Then Do As The Picture :

Attachment:
5.png
5.png [ 299.05 KiB | Viewed 905 times ]

Then is To Copy The Pattern What have You Got To The Next Code !!
Attachment:
6.png
6.png [ 50.05 KiB | Viewed 905 times ]


Now We Are Finished !!!
Try It !!

Thanks For Your Time And Am Sorry if it took long way to describe !!
If You Like Please Click Thank You !!!

_________________
--------------------------------------------------------------------------------
All Of My Scripts Can Be Found in Here !!!
viewtopic.php?f=304&p=190914
--------------------------------------------------------------------------------


Last edited by Elrayes on Fri Mar 30, 2018 9:19 pm, edited 8 times in total.

Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Tue Apr 26, 2016 10:23 pm 
Silver Contributor
Silver Contributor



Joined: Tue Sep 23, 2014 8:57 pm
Posts: 144
Been thanked: 12 time(s)
Has thanked: 31 time(s)
Contribution Points: 241
I have tested this on 1024x768 and it works like a charm. It was a bit hard to setup but still, great work!

EDIT: It seems to be messing with my regular bot(HyBoi), any idea why? Bot 2 Gives an error saying: "Color sample couldn't be retrieved..."


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 1 time(s)  Unread post Posted: Tue Apr 26, 2016 10:58 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 810
Location: Egypt , Portsaid
Been thanked: 233 time(s)
Has thanked: 10 time(s)
Contribution Points: 1896
supermixer wrote:
I have tested this on 1024x768 and it works like a charm. It was a bit hard to setup but still, great work!

Well thanks for ur feedback and am going to do a video tutorial !! and i've added one line to it to make it open inventory by it self!! and exit it again by it self:)
EDIT:Actually am using it in HyBoi Too but look add the Code
Code:
Function.Execute("AttCheck")

At the end of ur begin functions !!


Attachments:
2016-04-27_010128.png
2016-04-27_010128.png [ 15.94 KiB | Viewed 6492 times ]

_________________
--------------------------------------------------------------------------------
All Of My Scripts Can Be Found in Here !!!
viewtopic.php?f=304&p=190914
--------------------------------------------------------------------------------


Last edited by Elrayes on Tue Apr 26, 2016 11:02 pm, edited 1 time in total.
Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Tue Apr 26, 2016 11:01 pm 
Silver Contributor
Silver Contributor



Joined: Tue Sep 23, 2014 8:57 pm
Posts: 144
Been thanked: 12 time(s)
Has thanked: 31 time(s)
Contribution Points: 241
ahmedwaill wrote:
supermixer wrote:
I have tested this on 1024x768 and it works like a charm. It was a bit hard to setup but still, great work!

Well thanks for ur feedback and am going to do a video tutorial !! and i've added one line to it to make it open inventory by it self!! and exit it again by it self:)

Please check the edited version of my message :/

EDIT: Thanks a lot! It worked now.


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Tue Apr 26, 2016 11:15 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 810
Location: Egypt , Portsaid
Been thanked: 233 time(s)
Has thanked: 10 time(s)
Contribution Points: 1896
supermixer wrote:
ahmedwaill wrote:
supermixer wrote:
I have tested this on 1024x768 and it works like a charm. It was a bit hard to setup but still, great work!

Well thanks for ur feedback and am going to do a video tutorial !! and i've added one line to it to make it open inventory by it self!! and exit it again by it self:)

Please check the edited version of my message :/

EDIT: Thanks a lot! It worked now.

Your Welcome :) And Now i've Edited the Code Again To Be A Little Faster and not to interrupt the Full bot scripts :) check it and Replace the Code in ur begin Functions
Code:
Function.Execute("AttCheck")

With
Code:
Function.Execute("Checking")

_________________
--------------------------------------------------------------------------------
All Of My Scripts Can Be Found in Here !!!
viewtopic.php?f=304&p=190914
--------------------------------------------------------------------------------


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Mon May 02, 2016 10:05 am 
New User
New User
User avatar



Joined: Thu Oct 29, 2015 7:09 pm
Posts: 25
Been thanked: 0 time(s)
Has thanked: 4 time(s)
Contribution Points: 34
hi Mr.ahmed, can you share your RGB too? It's kinda hard to investigate the color precisely.. :(

edit: It's working eventhough I couldn't capture the RGB precisely.. thank you

_________________
Seize My Castle! :)
Image


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Mon May 02, 2016 12:07 pm 
Contributor
Contributor
User avatar



Joined: Tue Jan 05, 2016 7:14 am
Posts: 62
Location: Malolos Bulacan
Been thanked: 2 time(s)
Has thanked: 0 time(s)
Contribution Points: 0
for any attributes sir and py ATT can??


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Mon May 02, 2016 10:44 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 810
Location: Egypt , Portsaid
Been thanked: 233 time(s)
Has thanked: 10 time(s)
Contribution Points: 1896
henschel01 wrote:
for any attributes sir and py ATT can??

if u make it it will drop all attribute items even py att

_________________
--------------------------------------------------------------------------------
All Of My Scripts Can Be Found in Here !!!
viewtopic.php?f=304&p=190914
--------------------------------------------------------------------------------


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Wed May 04, 2016 10:17 am 
New User
New User
User avatar



Joined: Thu Oct 29, 2015 7:09 pm
Posts: 25
Been thanked: 0 time(s)
Has thanked: 4 time(s)
Contribution Points: 34
sorry.. i dont know why but sometimes the bot also dropped other things like Seals, egg datas, etc or is it only happened to me? also sometimes the bot got stucked in yes / no option when trying to threw away the attributes :/

_________________
Seize My Castle! :)
Image


Top
 Profile  
Reply with quote  
 Post subject: Re: New Dropping Att Code By Me
Thanked: 0 time(s)  Unread post Posted: Wed May 04, 2016 4:48 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 810
Location: Egypt , Portsaid
Been thanked: 233 time(s)
Has thanked: 10 time(s)
Contribution Points: 1896
Kamui wrote:
sorry.. i dont know why but sometimes the bot also dropped other things like Seals, egg datas, etc or is it only happened to me? also sometimes the bot got stucked in yes / no option when trying to threw away the attributes :/

hey bro sry didnt see ur previous reply..
look it's eaay and i've done a video tutorial and Gonna upload it today but not nw..
about
it's dropping other items check ur rgb if u made it correct or wrong

_________________
--------------------------------------------------------------------------------
All Of My Scripts Can Be Found in Here !!!
viewtopic.php?f=304&p=190914
--------------------------------------------------------------------------------


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 47 posts ]  Go to page 1, 2, 3, 4, 5  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