Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Thu Sep 20, 2018 1:15 am

All times are UTC




Post new topic Reply to topic  [ 2 posts ] 
Author Message
 Post subject: Bot stops to Work after a bit of time
Thanked: 0 time(s)  Unread post Posted: Wed Sep 05, 2018 11:47 am 
New User
New User



Joined: Sun Feb 18, 2018 10:10 pm
Posts: 10
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 19
Hey guys im using this DMO bot and it works but after a bit of time my blue eye crashes and i get a cant handle erorr but its still running after i click Ok thats the error i get

05.09.2018 13:25:53
Exception type: System.OutOfMemoryException
Message: Nicht genügend Arbeitsspeicher.
Trace: bei System.Drawing.Graphics.FromHdcInternal(IntPtr hdc)
bei System.Drawing.Font.GetHeight()
bei System.Drawing.Font.get_Height()
bei System.Windows.Forms.Control.get_FontHeight()
bei System.Windows.Forms.TextBoxBase.get_PreferredHeight()
bei System.Windows.Forms.TextBoxBase.get_DefaultSize()
bei System.Windows.Forms.Control..ctor(Boolean autoInstallSyncContext)
bei System.Windows.Forms.TextBoxBase..ctor()
bei System.Windows.Forms.TextBox..ctor()
bei System.Windows.Forms.ThreadExceptionDialog..ctor(Exception t)
bei System.Windows.Forms.Application.ThreadContext.OnThreadException(Exception t)
bei System.Windows.Forms.Control.WndProcException(Exception e)
bei System.Windows.Forms.Control.ControlNativeWindow.OnThreadException(Exception e)
bei System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
bei System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& msg)
bei System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(Int32 dwComponentID, Int32 reason, Int32 pvLoopData)
bei System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)
bei System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
bei System.Windows.Forms.Application.Run(Form mainForm)
bei †††
††††ˆ.†††
††††ˆŒ.†††
†††‰ž—(String[] )

---------------------------------------------------


And this is my DMO bot



begin loop()
Keyboard.Hold keys("{<tab>}4")
Function.Execute("Human Pause")
Keyboard.Release keys("{<tab>}4")
Function.Execute("Human Pause")
Keyboard.Hold keys("2")
Keyboard.Release keys("2")
Function.Execute("Heal")
Function.Execute("AntiAutoCheck")
// RGB of the digi you want to attack
if Color.At coordinate is (RGB)("36", "120", "181", "782", "80")
begin loop()
Keyboard.Hold keys("{<f3>}")
Keyboard.Release keys("{<f3>}")
Keyboard.Hold keys("3")
Keyboard.Release keys("3")
Keyboard.Hold keys("2")
Keyboard.Release keys("2")
Function.Execute("Heal")
Function.Execute("AntiAutoCheck")
// Same co ordinates of the previous check
if Color.At coordinate is not (RGB)("36", "120", "181", "782", "80")
begin
Macro.Restart("yes")
end
end
// RGB of the red square of aggro monsters around the fist
if Color.At coordinate is (RGB)("111", "27", "25", "572", "56")
begin loop()
Keyboard.Hold keys("{<f3>}")
Keyboard.Release keys("{<f3>}")
Keyboard.Hold keys("3")
Keyboard.Release keys("3")
Keyboard.Hold keys("2")
Keyboard.Release keys("2")
Function.Execute("Heal")
Function.Execute("AntiAutoCheck")
// Same RGB from above
if Color.At coordinate is not (RGB)("111", "27", "25", "572", "56")
begin
Macro.Restart("yes")
end
end
// Same RGB from above
if Color.At coordinate is not (RGB)("111", "27", "25", "572", "56")
begin
Macro.Restart("yes")
end
end

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

function("Heal")
// RGB of a part of digimon hp , preferable about 75% of your digimon HP , this uses Hp DISK in slot F4
if Color.At coordinate is not (RGB)("198", "60", "49", "197", "127")
begin
Keyboard.Hold keys("{<7>}")
Keyboard.Release keys("{<7>}")
end
// RGB of a part of digimon hp to use FOOD in slot F6 , preferably specify about 50% of digimon HP
if Color.At coordinate is not (RGB)("216", "65", "54", "115", "128")
begin
Keyboard.Hold keys("{<f7>}")
Keyboard.Release keys("{<f7>}")
end
// RGB for Digimon DS to use DS DISK in slot 8
if Color.At coordinate is not (RGB)("15", "241", "255", "134", "142")
begin
Keyboard.Hold keys("{<8>}")
Macro.Pause("50")
Keyboard.Release keys("{<8>}")
end
// RGB for TAMER DS , slot F8
if Color.At coordinate is not (RGB)("15", "241", "255", "137", "68")
begin
Keyboard.Hold keys("{<f8>}")
Macro.Pause("50")
Keyboard.Release keys("{<f8>}")
end
function

function("AntiAutoCheck")
begin
// Here is the Pixel Pattern for Yellow time Progress Bar
if Color.Pixel pattern can be located on screen("207,173,0,5,0,207,173,0,0,5,198,163,7,0,5,235,192,32,0,5,253,241,50,-5,0,253,241,50,0,-5,235,192,32,0,-5,198,163,7", "0")
begin
if System.Process is not running("MADCATZMP")
begin
Function.Execute("OpenMP")
end
// Here is the Pixel Pattern for Yellow time Progress Bar
Color.Wait for and locate pixel pattern("207,173,0,5,0,207,173,0,0,5,198,163,7,0,5,235,192,32,0,5,253,241,50,-5,0,253,241,50,0,-5,235,192,32,0,-5,198,163,7", "0", "CoX", "CoY")
Window.Get window id("MadCatz MP", "no", "0", "MADCATZMPID2")
Window.Restore("{MADCATZMPID2}", "no")
Window.Set always on top("{MADCATZMPID2}", "no", "yes")
Macro.Pause("200")
Window.Bring to front("{MADCATZMPID2}", "no")
// Variables to Calculate
Variable.Evaluate (Math)("{CoX}+8", "StartX")
Variable.Evaluate (Math)("{CoY}-57", "StartY")
Variable.Evaluate (Math)("{CoX}+49", "EndX")
Variable.Evaluate (Math)("{CoY}-16", "EndY")
Variable.Evaluate (Math)("{CoX}-3", "AllX")
Variable.Evaluate (Math)("{CoY}+35", "AllY")
Variable.Evaluate (Math)("{CoX}+243", "AllEndX")
Variable.Evaluate (Math)("{CoY}+131", "AllEndY")
// Select Mouse Coordinates to Mark Target Button
Window.Bring to front("{MADCATZMPID2}", "no")
Macro.Pause("100")
Window.Set text("{MADCATZMPID2}", "yes", "3", "{StartX}")
Macro.Pause("50")
Window.Set text("{MADCATZMPID2}", "yes", "5", "{StartY}")
Macro.Pause("50")
Window.Set text("{MADCATZMPID2}", "yes", "6", "{EndY}")
Macro.Pause("50")
Window.Set text("{MADCATZMPID2}", "yes", "4", "{EndX}")
Macro.Pause("50")
// Select Mouse Coordinates to Mark Area Button
Window.Set text("{MADCATZMPID2}", "yes", "9", "{AllX}")
Macro.Pause("50")
Window.Set text("{MADCATZMPID2}", "yes", "11", "{AllY}")
Macro.Pause("50")
Window.Set text("{MADCATZMPID2}", "yes", "12", "{AllEndY}")
Macro.Pause("50")
Window.Set text("{MADCATZMPID2}", "yes", "10", "{AllEndX}")
Macro.Pause("50")
Window.Bring to front("{MADCATZMPID2}", "no")
Window.Get location("{MADCATZMPID2}", "no", "no", "MPX", "MPY")
Variable.Evaluate (Math)("{MPX}+30", "MPX")
Variable.Evaluate (Math)("{MPY}+7", "MPY")
Window.Send mouse click("{MADCATZMPID2}", "yes", "0", "30", "7", "Left")
// Here is the Pixel Pattern for Yellow time Progress Bar
if Color.Pixel pattern can be located on screen("207,173,0,5,0,207,173,0,0,5,198,163,7,0,5,235,192,32,0,5,253,241,50,-5,0,253,241,50,0,-5,235,192,32,0,-5,198,163,7", "0")
begin loop()
Window.Send mouse click("{MADCATZMPID2}", "yes", "26", "10", "10", "left")
Macro.Pause("1000")
if Mouse.Coordinates are within("{AllX}", "{AllEndX}", "{AllY}", "{AllEndY}")
begin
Mouse.Click("left")
end
// Here is the Pixel Pattern for Yellow time Progress Bar
if Color.Pixel pattern can not be located on screen near coordinate("207,173,0,5,0,207,173,0,0,5,198,163,7,0,5,235,192,32,0,5,253,241,50,-5,0,253,241,50,0,-5,235,192,32,0,-5,198,163,7", "0", "{CoX}", "{CoY}", "20")
begin
Window.Send mouse click("{MADCATZMPID2}", "yes", "27", "10", "10", "left")
Window.Set always on top("{MADCATZMPID2}", "no", "no")
Macro.Restart("no")
end
end
end
end
function

function("OpenMP")
if System.Process is not running("MADCATZMP")
begin
// in here the path of the Program
System.Launch application("C:\GDMO\MADCATZMP.exe", "no")
System.Wait for process to start("MADCATZMP")
if System.Process is running("MADCATZMP")
begin
Window.Wait for window to appear("MadCatz MP", "no")
Window.Get window id("MadCatz MP", "no", "0", "MADCATZMPID")
Window.Set always on top("{MADCATZMPID}", "no", "yes")
Macro.Pause("200")
Window.Bring to front("{MADCATZMPID}", "no")
if Window.Is visible("{MADCATZMPID}", "no")
begin
Window.Bring to front("{MADCATZMPID}", "no")
Window.Send mouse click("{MADCATZMPID}", "yes", "0", "30", "5", "Left")
Macro.Pause("100")
Window.Close("{MADCATZMPID}", "no")
Macro.Pause("100")
Window.Wait for window to appear("MadCatz MP", "no")
Window.Get window id("MadCatz MP", "no", "0", "MADCATZMPID4")
Window.Bring to front("{MADCATZMPID4}", "no")
Window.Get location("{MADCATZMPID4}", "no", "no", "MPX", "MPY")
Macro.Pause("200")
Variable.Evaluate (Math)("{MPX}+30", "MPX2")
Variable.Evaluate (Math)("{MPY}+5", "MPY2")
Window.Send mouse click("{MADCATZMPID4}", "yes", "0", "30", "5", "Left")
Window.Set text("{MADCATZMPID4}", "yes", "18", "0")
Macro.Pause("100")
Window.Set text("{MADCATZMPID4}", "yes", "20", "1")
Macro.Pause("100")
Window.Set text("{MADCATZMPID4}", "yes", "29", "60")
end
end
Macro.Pause("200")
Function.Execute("MovingMP")
end
function

function("MovingMP")
// this place is the icon in the title bar so it will move it the the end of the screen to not interfere with the game if macro is appeard
if Window.Is visible("{MADCATZMPID4}", "no")
begin
Window.Get location("{MADCATZMPID4}", "no", "no", "MPX", "MPY")
Variable.Evaluate (Math)("{MPX}+30", "MPX2")
Variable.Evaluate (Math)("{MPY}+7", "MPY2")
Mouse.Move to coordinate("{MPX2}", "{MPY2}")
System.Get combined screen resolution("ResoX", "ResoY")
Variable.Evaluate (Math)("{ResoX}-25", "ResX")
Variable.Divide (Math)("ResoY", "2")
Variable.Evaluate (Math)("{ResoY}-100", "ResY")
Window.Set location("{MADCATZMPID4}", "yes", "{ResX}", "{ResY}")
Window.Set always on top("{MADCATZMPID4}", "no", "yes")
Window.Bring to front("{MADCATZMPID4}", "no")
end
function




Thanks for reading


Top
 Profile  
Reply with quote  
 Post subject: Re: Bot stops to Work after a bit of time
Thanked: 0 time(s)  Unread post Posted: Sun Sep 16, 2018 4:49 pm 
New User
New User



Joined: Sun Sep 16, 2018 4:35 pm
Posts: 3
Location: Brasil
Been thanked: 0 time(s)
Has thanked: 1 time(s)
Contribution Points: 14
It usualy stops after some time because the keyboard on emulator stucks, i fixed that repeating the line of code that stops working. If it is not that maybe it's a error in a color coordinate. try change some things


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 2 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:  


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