Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Wed Jul 06, 2022 6:48 am

All times are UTC




Post new topic Reply to topic  [ 5 posts ] 
Author Message
 Post subject: can any one solve this chapca
Thanked: 0 time(s)  Unread post Posted: Wed May 18, 2022 4:25 am 
New User
New User



Joined: Tue Apr 26, 2022 8:20 pm
Posts: 5
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 19
There is some way to make BEM identify patterns?

If anyone know a way to config BEM on solving this simple captcha, i will be very thankful!


Attachments:
File comment: solve this chapca please
IMG_20220518_111746_720.jpg
IMG_20220518_111746_720.jpg [ 47.07 KiB | Viewed 237 times ]
File comment: just normal chapca
IMG_20220518_111752_442.jpg
IMG_20220518_111752_442.jpg [ 47 KiB | Viewed 237 times ]
Top
 Profile  
Reply with quote  
 Post subject: Re: can any one solve this chapca
Thanked: 1 time(s)  Unread post Posted: Thu May 19, 2022 10:57 pm 
Partner / License admin
Partner / License admin
User avatar



Joined: Sun Oct 10, 2010 5:16 pm
Posts: 2256
Location: USA
Been thanked: 534 time(s)
Has thanked: 38 time(s)
Contribution Points: 17731
Those numbers are pretty large so you should be able to make pixel patterns for those pretty easily.

To set up the macro you would need to first set up a pixel pattern to find the captcha box (unless it's always in the same place then you just need the coordinates for each number). Then set up pixel patterns for each number 1-9.

The macro could then be scripted to find the box, look at the location for the first number and what number it is, and repeat for the other three numbers. Then find the matching pixel pattern down below of the numbers to click on (in order).

It's not too hard but would take some time to make all the pixel patterns. I think there's some similar ones on the forum where people have done this if you want to do a forum search.

_________________
----------------------------------------Syrifina---------------------------------------------------
PM me for licenses and/or licensing information: Click Here
[Be sure to include and update your profile with your BE ID]

Forum Rules
Reminder of rules regarding Contribution points
Getting started in 1, 2, 3
Virtual Drivers; Manual Installers


Top
 Profile  
Reply with quote  
 Post subject: Re: can any one solve this chapca
Thanked: 0 time(s)  Unread post Posted: Fri May 20, 2022 4:40 am 
New User
New User



Joined: Tue Apr 26, 2022 8:20 pm
Posts: 5
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 19
itis fix position no move..


Top
 Profile  
Reply with quote  
 Post subject: Re: can any one solve this chapca
Thanked: 0 time(s)  Unread post Posted: Fri May 20, 2022 9:31 am 
New User
New User



Joined: Tue Apr 26, 2022 8:20 pm
Posts: 5
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 19
begin
if Color.Pixel pattern can be located on screen("3,5,2,-427,-69,46,50,58,325,-1,45,49,66,-2,146,47,49,61,-323,8,43,48,61,7,87,47,51,65,316,0,47,51,60", "5")
begin
Color.Wait for and locate pixel pattern("7,9,14,64,-3,44,48,59,66,1,44,48,59,-1,26,21,25,35,-64,2,20,21,29,-62,1,33,37,48", "5", "x", "y")
Mouse.Move to coordinate("{x}", "{y}")
Variable.Evaluate (Math)("{x}+40", "x1")
Variable.Evaluate (Math)("{x}+114", "Xnum1")
Variable.Evaluate (Math)("{x}+173", "Xnum2")
Variable.Evaluate (Math)("{x}-2", "Xnum3")
Variable.Evaluate (Math)("{x}+114", "Xnum4")
Variable.Evaluate (Math)("{y}+132", "y1")
Variable.Evaluate (Math)("{y}+199", "y2")
Macro.Pause("1000")
Function.Execute("1stNum")
Function.Execute("2ndNum")
Function.Execute("3rdNum")
Function.Execute("4thNum")
end
end

function("1stNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("57,65,0,9,-1,41,97,33,-1,1,8,85,33,-1,6,49,52,99,-1,2,66,81,8,6,5,0,12,41,-2,4,49,52,74,-4,1,16,69,8,-3,-2,82,89,8", "5", "{x1}", "{y1}", "40")
begin
Mouse.Move to coordinate("{Xnum1}", "{y2}")
Macro.Pause("750")
end
end
function

function("2ndNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("66,8,16,-3,0,82,12,24,-4,-2,24,77,90,4,-1,16,28,66,2,-4,0,89,49,4,-4,24,77,99,4,1,41,36,41,-1,4,57,52,99,0,4,24,48,16,-1,3,8,85,74,4,1,99,4,49,-5,3,16,0,41", "5", "{x1}", "{y1}", "40")
begin
Variable.Add (Math)("x1", "58")
Mouse.Move to coordinate("{Xnum2}", "{y2}")
Macro.Pause("750")
end
end
function

function("3rdNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("33,20,99,2,-3,82,81,24,-1,-4,16,89,0,-3,-4,74,73,0,4,-3,8,93,16,0,-4,49,89,49,-4,0,82,65,49,-3,0,24,40,24", "5", "{x1}", "{y1}", "40")
begin
Variable.Add (Math)("x1", "58")
Mouse.Move to coordinate("{Xnum3}", "{y2}")
Macro.Pause("750")
end
end
function

function("4thNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("16,93,66,5,0,0,69,49,2,2,24,97,33,0,3,8,93,16,-3,3,90,85,16,-2,0,99,60,24,4,3,66,77,24,1,4,41,28,82,-2,4,33,20,99,-5,1,57,97,74,-3,-3,0,16,24", "5", "{x1}", "{y1}", "50")
begin
Variable.Add (Math)("x1", "58")
Mouse.Move to coordinate("{Xnum4}", "{y2}")
Macro.Pause("750")
end
end
function


Top
 Profile  
Reply with quote  
 Post subject: Re: can any one solve this chapca
Thanked: 0 time(s)  Unread post Posted: Fri May 20, 2022 9:47 am 
New User
New User



Joined: Tue Apr 26, 2022 8:20 pm
Posts: 5
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 19
ahyaara wrote:
begin
if Color.Pixel pattern can be located on screen("3,5,2,-427,-69,46,50,58,325,-1,45,49,66,-2,146,47,49,61,-323,8,43,48,61,7,87,47,51,65,316,0,47,51,60", "5")
begin
Color.Wait for and locate pixel pattern("7,9,14,64,-3,44,48,59,66,1,44,48,59,-1,26,21,25,35,-64,2,20,21,29,-62,1,33,37,48", "5", "x", "y")
Mouse.Move to coordinate("{x}", "{y}")
Variable.Evaluate (Math)("{x}+40", "x1")
Variable.Evaluate (Math)("{x}+114", "Xnum1")
Variable.Evaluate (Math)("{x}+173", "Xnum2")
Variable.Evaluate (Math)("{x}-2", "Xnum3")
Variable.Evaluate (Math)("{x}+114", "Xnum4")
Variable.Evaluate (Math)("{y}+132", "y1")
Variable.Evaluate (Math)("{y}+199", "y2")
Macro.Pause("1000")
Function.Execute("1stNum")
Function.Execute("2ndNum")
Function.Execute("3rdNum")
Function.Execute("4thNum")
end
end

function("1stNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("57,65,0,9,-1,41,97,33,-1,1,8,85,33,-1,6,49,52,99,-1,2,66,81,8,6,5,0,12,41,-2,4,49,52,74,-4,1,16,69,8,-3,-2,82,89,8", "5", "{x1}", "{y1}", "40")
begin
Mouse.Move to coordinate("{Xnum1}", "{y2}")
Macro.Pause("750")
end
end
function

function("2ndNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("66,8,16,-3,0,82,12,24,-4,-2,24,77,90,4,-1,16,28,66,2,-4,0,89,49,4,-4,24,77,99,4,1,41,36,41,-1,4,57,52,99,0,4,24,48,16,-1,3,8,85,74,4,1,99,4,49,-5,3,16,0,41", "5", "{x1}", "{y1}", "40")
begin
Variable.Add (Math)("x1", "58")
Mouse.Move to coordinate("{Xnum2}", "{y2}")
Macro.Pause("750")
end
end
function

function("3rdNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("33,20,99,2,-3,82,81,24,-1,-4,16,89,0,-3,-4,74,73,0,4,-3,8,93,16,0,-4,49,89,49,-4,0,82,65,49,-3,0,24,40,24", "5", "{x1}", "{y1}", "40")
begin
Variable.Add (Math)("x1", "58")
Mouse.Move to coordinate("{Xnum3}", "{y2}")
Macro.Pause("750")
end
end
function

function("4thNum")
begin
if Color.Pixel pattern can be located on screen near coordinate("16,93,66,5,0,0,69,49,2,2,24,97,33,0,3,8,93,16,-3,3,90,85,16,-2,0,99,60,24,4,3,66,77,24,1,4,41,28,82,-2,4,33,20,99,-5,1,57,97,74,-3,-3,0,16,24", "5", "{x1}", "{y1}", "50")
begin
Variable.Add (Math)("x1", "58")
Mouse.Move to coordinate("{Xnum4}", "{y2}")
Macro.Pause("750")
end
end
function

not work reason just edit 2 line ((blue bold...from BEM botter tread author.
can add click mouse affter macro pause ?


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

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:  
cron


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