Blue Eye Logo

Blue Eye Macro

Automation is freedom
It is currently Wed Jan 24, 2018 9:41 am

All times are UTC




Post new topic Reply to topic  [ 245 posts ]  Go to page Previous  1 ... 21, 22, 23, 24, 25
Author Message
 Post subject: Re: New Macro Protector Script By Elrayes™
Thanked: 1 time(s)  Unread post Posted: Wed Dec 27, 2017 3:32 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 507
Location: Egypt , Portsaid
Been thanked: 145 time(s)
Has thanked: 10 time(s)
Contribution Points: 1093
polinator098 wrote:
This may sound noobish, but do I need to be full screen for macro protector to work? I was using it before and I still go banned but was in windows mode 1024*768.

nope it should work with both full screen and window mode

_________________
All Of My Scripts Can Be Found in Here !!!
http://bridgeurl.com/elrayes-scripts-1
---------------------------------------------------------------------------------------------------------------------------------------------------------------
if i Helped You Just Hit Thanks Button =====================================>
---------------------------------------------------------------------------------------------------------------------------------------------------------------


Top
 Profile  
Reply with quote  
 Post subject: Re: New Macro Protector Script By Elrayes™
Thanked: 0 time(s)  Unread post Posted: Tue Jan 02, 2018 12:44 pm 
New User
New User
User avatar



Joined: Tue Jan 02, 2018 12:34 pm
Posts: 2
Been thanked: 0 time(s)
Has thanked: 2 time(s)
Contribution Points: 10
hello sir..
i got an error "find any same image has stopped working" when i start macro..
here is my script

begin loop()
Keyboard.Hold keys("{<tab>}4")
Function.Execute("Human Pause")
Keyboard.Release keys("{<tab>}4")
Function.Execute("Human Pause")
Function.Execute("Heal")
Function.Execute("AttCheck")
// RGB of the digi you want to attack
if Color.At coordinate is (RGB)("255", "255", "255", "544", "54")
begin loop()
Keyboard.Hold keys("1")
Function.Execute("Human Pause")
Keyboard.Release keys("1")
Keyboard.Hold keys("4")
Function.Execute("Human Pause")
Keyboard.Release keys("4")
Function.Execute("Heal")
// Same co ordinates of the previous check
if Color.At coordinate is not (RGB)("255", "255", "255", "544", "54")
begin
Macro.Restart("no")
end
end
// RGB of the red square of aggro monsters around the fist
if Color.At coordinate is (RGB)("164", "0", "29", "581", "69")
begin loop()
Keyboard.Hold keys("4")
Function.Execute("Human Pause")
Keyboard.Release keys("4")
Keyboard.Hold keys("1")
Function.Execute("Human Pause")
Keyboard.Release keys("1")
Function.Execute("Heal")
// Same RGB from above
if Color.At coordinate is not (RGB)("164", "0", "29", "581", "69")
begin
Macro.Restart("no")
end
end
// Same RGB from above
if Color.At coordinate is not (RGB)("164", "0", "29", "581", "69")
begin
Macro.Restart("no")
end
end

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

function("Heal")
// RGB of a part of digimon hp , preferable about 25% of your digimon HP , this uses Hp DISK in slot F7
if Color.At coordinate is not (RGB)("216", "65", "54", "139", "151")
begin
Keyboard.Hold keys("{<f7>}")
Function.Execute("Human Pause")
Keyboard.Release keys("{<f7>}")
end
// RGB of a part of digimon hp to use FOOD in slot 7 , preferably specify about 50% of digimon HP
if Color.At coordinate is not (RGB)("216", "65", "54", "141", "128")
begin
Keyboard.Hold keys("7")
Function.Execute("Human Pause")
Keyboard.Release keys("7")
end
// RGB for Digimon DS to use DS DISK in slot F8
if Color.At coordinate is not (RGB)("24", "205", "196", "123", "93")
begin
Keyboard.Hold keys("{<f8>}")
Macro.Pause("50")
Keyboard.Release keys("{<f8>}")
end
// RGB for TAMER DS , slot 8
if Color.At coordinate is not (RGB)("24", "205", "196", "141", "93")
begin
Keyboard.Hold keys("8")
Macro.Pause("50")
Keyboard.Release keys("8")
end
function

function("AttCheck")
begin
// Locate Attribute Pattern
if Color.Pixel pattern can be located on screen("142,137,143,5,0,133,130,139,5,0,131,130,133,5,0,132,126,135,5,0,127,125,131,0,5,99,93,102,0,5,93,87,96,0,5,95,93,99,0,5,109,102,114,0,5,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,0,-5,109,102,114,0,-5,90,92,93,0,-5,78,77,80,0,-5,111,109,115", "15")
begin
// Choose (X,Y) For Attribute
Color.Wait for and locate pixel pattern("142,137,143,5,0,133,130,139,5,0,131,130,133,5,0,132,126,135,5,0,127,125,131,0,5,99,93,102,0,5,93,87,96,0,5,95,93,99,0,5,109,102,114,0,5,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,0,-5,109,102,114,0,-5,90,92,93,0,-5,78,77,80,0,-5,111,109,115", "15", "X", "Y")
Mouse.Move to coordinate("{X}", "{Y}")
Function.Execute("AFK3")
Mouse.Hold button("left")
Function.Execute("AFK3")
Mouse.Release button("left")
Function.Execute("AFK3")
Mouse.Move to coordinate("556", "348")
Function.Execute("AFK3")
Mouse.Hold button("left")
Function.Execute("AFK3")
Mouse.Release button("left")
Function.Execute("AFK3")
Mouse.Move to coordinate("629", "232")
Function.Execute("AFK3")
Mouse.Hold button("left")
Function.Execute("AFK3")
Mouse.Release button("left")
end
end
function

function("AFK3")
begin
Variable.Set random number("AFK3", "200", "200")
Macro.Pause("{AFK3}")
end
function

function("AntiAutoCheck")
begin
if System.Process is not running("MADCATZMP")
begin
Function.Execute("OpenMP")
end
// 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
// 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")
File.Read first line("C:\GDMO\MADCATZMPID.txt", "MADCATZMPID2")
Window.Restore("{MADCATZMPID2}", "no")
File.Write text("C:\GDMO\Spots.txt", "no", "{CoX}")
File.Write text("C:\GDMO\Spots.txt", "yes", "{CoY}")
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.Get text("{MADCATZMPID2}", "yes", "3", "no", "StartX1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "3", "{StartX1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "3", "{StartX}")
Macro.Pause("50")
Keyboard.Press keys("{<tab>}")
Window.Get text("{MADCATZMPID2}", "yes", "5", "no", "StartY1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "5", "{StartY1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "5", "{StartY}")
Macro.Pause("50")
Window.Get text("{MADCATZMPID2}", "yes", "6", "no", "EndY1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "6", "{EndY1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "6", "{EndY}")
Macro.Pause("50")
Window.Get text("{MADCATZMPID2}", "yes", "4", "no", "EndX1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "4", "{EndX1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "4", "{EndX}")
Macro.Pause("50")
// Select Mouse Coordinates to Mark Area Button
Window.Get text("{MADCATZMPID2}", "yes", "9", "no", "AllX1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "9", "{AllX1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "9", "{AllX}")
Macro.Pause("50")
Keyboard.Press keys("{<tab>}")
Window.Get text("{MADCATZMPID2}", "yes", "11", "no", "AllY1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "11", "{AllY1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "11", "{AllY}")
Macro.Pause("50")
Window.Get text("{MADCATZMPID2}", "yes", "12", "no", "AllEndY1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "12", "{AllEndY1}")
Window.Send press keys("{MADCATZMPID2}", "yes", "12", "{AllEndY}")
Macro.Pause("50")
Window.Get text("{MADCATZMPID2}", "yes", "10", "no", "AllEndX1")
Window.Set selected text("{MADCATZMPID2}", "Yes", "10", "{AllEndX1}")
Window.Send press keys("{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", "5", "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()
Macro.Pause("200")
Keyboard.Press keys("{<f9>}")
Macro.Pause("500")
if Mouse.Coordinates are not equal to("{MPX}", "{MPY}")
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("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
Keyboard.Press keys("{<f10>}")
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.Get text("{MADCATZMPID4}", "yes", "18", "no", "Seconds")
Window.Set selected text("{MADCATZMPID4}", "Yes", "18", "{Seconds}")
Window.Send press keys("{MADCATZMPID4}", "yes", "18", "0")
Macro.Pause("100")
Window.Get text("{MADCATZMPID4}", "yes", "20", "no", "Second")
Window.Set selected text("{MADCATZMPID4}", "Yes", "20", "{Second}")
Window.Send press keys("{MADCATZMPID4}", "yes", "20", "1")
Macro.Pause("100")
Window.Get text("{MADCATZMPID4}", "yes", "29", "no", "Percentage")
Window.Set selected text("{MADCATZMPID4}", "Yes", "29", "{Percentage}")
Window.Send press keys("{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
System.Get combined screen resolution("ResoX", "ResoY")
Variable.Evaluate (Math)("{ResoX}-25", "ResX")
Variable.Divide (Math)("ResoY", "2")
Variable.Evaluate (Math)("{ResoY}-100", "ResY")
Mouse.Move to coordinate relative to window("30", "7", "{MADCATZMPID4}", "no")
Mouse.Hold button("Left")
Mouse.Move to coordinate("{ResX}", "{ResY}")
Mouse.Release button("Left")
Mouse.Save coordinate to variable("MouseX", "MouseY")
File.Write text("C:\GDMO\MADCATZMPID.txt", "No", "{MADCATZMPID4}")
File.Write text("C:\GDMO\Macro.txt", "No", "{MouseX}")
File.Write text("C:\GDMO\\Macro.txt", "Yes", "{MouseY}")
Window.Set always on top("{MADCATZMPID4}", "no", "yes")
Window.Bring to front("{MADCATZMPID4}", "no")
end
function

any advice would be helpful thanks..


Top
 Profile  
Reply with quote  
 Post subject: Re: New Macro Protector Script By Elrayes™
Thanked: 0 time(s)  Unread post Posted: Tue Jan 02, 2018 3:42 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 507
Location: Egypt , Portsaid
Been thanked: 145 time(s)
Has thanked: 10 time(s)
Contribution Points: 1093
deadMaN wrote:
hello sir..
i got an error "find any same image has stopped working" when i start macro..
here is my script
Code:
 begin loop()
     Keyboard.Hold keys("{<tab>}4")
     Function.Execute("Human Pause")
     Keyboard.Release keys("{<tab>}4")
     Function.Execute("Human Pause")
     Function.Execute("Heal")
     Function.Execute("AttCheck")
     // RGB of the digi you want to attack
     if  Color.At coordinate is (RGB)("255", "255", "255", "544", "54")
          begin loop()
               Keyboard.Hold keys("1")
               Function.Execute("Human Pause")
               Keyboard.Release keys("1")
               Keyboard.Hold keys("4")
               Function.Execute("Human Pause")
               Keyboard.Release keys("4")
               Function.Execute("Heal")
               // Same co ordinates of the previous check
               if  Color.At coordinate is not (RGB)("255", "255", "255", "544", "54")
                    begin
                         Macro.Restart("no")
                    end
          end
     // RGB of the red square of aggro monsters around the fist
     if  Color.At coordinate is (RGB)("164", "0", "29", "581", "69")
          begin loop()
               Keyboard.Hold keys("4")
               Function.Execute("Human Pause")
               Keyboard.Release keys("4")
               Keyboard.Hold keys("1")
               Function.Execute("Human Pause")
               Keyboard.Release keys("1")
               Function.Execute("Heal")
               // Same RGB from above
               if  Color.At coordinate is not (RGB)("164", "0", "29", "581", "69")
                    begin
                         Macro.Restart("no")
                    end
          end
     // Same RGB from above
     if  Color.At coordinate is not (RGB)("164", "0", "29", "581", "69")
          begin
               Macro.Restart("no")
          end
 end

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

function("Heal")
     // RGB of a part of digimon hp , preferable about 25% of your digimon HP , this uses Hp DISK in slot F7
     if  Color.At coordinate is not (RGB)("216", "65", "54", "139", "151")
          begin
               Keyboard.Hold keys("{<f7>}")
               Function.Execute("Human Pause")
               Keyboard.Release keys("{<f7>}")
          end
     // RGB of a part of digimon hp to use FOOD in slot 7 , preferably specify about 50% of digimon HP
     if  Color.At coordinate is not (RGB)("216", "65", "54", "141", "128")
          begin
               Keyboard.Hold keys("7")
               Function.Execute("Human Pause")
               Keyboard.Release keys("7")
          end
     // RGB for Digimon DS to use DS DISK in slot F8
     if  Color.At coordinate is not (RGB)("24", "205", "196", "123", "93")
          begin
               Keyboard.Hold keys("{<f8>}")
               Macro.Pause("50")
               Keyboard.Release keys("{<f8>}")
          end
     // RGB for TAMER DS , slot 8
     if  Color.At coordinate is not (RGB)("24", "205", "196", "141", "93")
          begin
               Keyboard.Hold keys("8")
               Macro.Pause("50")
               Keyboard.Release keys("8")
          end
function

function("AttCheck")
     begin
          //  Locate Attribute Pattern
          if  Color.Pixel pattern can be located on screen("142,137,143,5,0,133,130,139,5,0,131,130,133,5,0,132,126,135,5,0,127,125,131,0,5,99,93,102,0,5,93,87,96,0,5,95,93,99,0,5,109,102,114,0,5,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,0,-5,109,102,114,0,-5,90,92,93,0,-5,78,77,80,0,-5,111,109,115", "15")
               begin
                    //  Choose (X,Y) For Attribute
                    Color.Wait for and locate pixel pattern("142,137,143,5,0,133,130,139,5,0,131,130,133,5,0,132,126,135,5,0,127,125,131,0,5,99,93,102,0,5,93,87,96,0,5,95,93,99,0,5,109,102,114,0,5,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,-5,0,128,121,133,0,-5,109,102,114,0,-5,90,92,93,0,-5,78,77,80,0,-5,111,109,115", "15", "X", "Y")
                    Mouse.Move to coordinate("{X}", "{Y}")
                    Function.Execute("AFK3")
                    Mouse.Hold button("left")
                    Function.Execute("AFK3")
                    Mouse.Release button("left")
                    Function.Execute("AFK3")
                    Mouse.Move to coordinate("556", "348")
                    Function.Execute("AFK3")
                    Mouse.Hold button("left")
                    Function.Execute("AFK3")
                    Mouse.Release button("left")
                    Function.Execute("AFK3")
                    Mouse.Move to coordinate("629", "232")
                    Function.Execute("AFK3")
                    Mouse.Hold button("left")
                    Function.Execute("AFK3")
                    Mouse.Release button("left")
               end
     end
function

function("AFK3")
     begin
          Variable.Set random number("AFK3", "200", "200")
          Macro.Pause("{AFK3}")
     end
function

function("AntiAutoCheck")
     begin
          if  System.Process is not running("MADCATZMP")
               begin
                    Function.Execute("OpenMP")
               end
          // 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
                    // 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")
                    File.Read first line("C:\GDMO\MADCATZMPID.txt", "MADCATZMPID2")
                    Window.Restore("{MADCATZMPID2}", "no")
                    File.Write text("C:\GDMO\Spots.txt", "no", "{CoX}")
                    File.Write text("C:\GDMO\Spots.txt", "yes", "{CoY}")
                    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.Get text("{MADCATZMPID2}", "yes", "3", "no", "StartX1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "3", "{StartX1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "3", "{StartX}")
                    Macro.Pause("50")
                    Keyboard.Press keys("{<tab>}")
                    Window.Get text("{MADCATZMPID2}", "yes", "5", "no", "StartY1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "5", "{StartY1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "5", "{StartY}")
                    Macro.Pause("50")
                    Window.Get text("{MADCATZMPID2}", "yes", "6", "no", "EndY1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "6", "{EndY1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "6", "{EndY}")
                    Macro.Pause("50")
                    Window.Get text("{MADCATZMPID2}", "yes", "4", "no", "EndX1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "4", "{EndX1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "4", "{EndX}")
                    Macro.Pause("50")
                    // Select Mouse Coordinates to Mark Area Button
                    Window.Get text("{MADCATZMPID2}", "yes", "9", "no", "AllX1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "9", "{AllX1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "9", "{AllX}")
                    Macro.Pause("50")
                    Keyboard.Press keys("{<tab>}")
                    Window.Get text("{MADCATZMPID2}", "yes", "11", "no", "AllY1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "11", "{AllY1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "11", "{AllY}")
                    Macro.Pause("50")
                    Window.Get text("{MADCATZMPID2}", "yes", "12", "no", "AllEndY1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "12", "{AllEndY1}")
                    Window.Send press keys("{MADCATZMPID2}", "yes", "12", "{AllEndY}")
                    Macro.Pause("50")
                    Window.Get text("{MADCATZMPID2}", "yes", "10", "no", "AllEndX1")
                    Window.Set selected text("{MADCATZMPID2}", "Yes", "10", "{AllEndX1}")
                    Window.Send press keys("{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", "5", "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()
                              Macro.Pause("200")
                              Keyboard.Press keys("{<f9>}")
                              Macro.Pause("500")
                              if  Mouse.Coordinates are not equal to("{MPX}", "{MPY}")
                                   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("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
                                        Keyboard.Press keys("{<f10>}")
                                        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.Get text("{MADCATZMPID4}", "yes", "18", "no", "Seconds")
                                   Window.Set selected text("{MADCATZMPID4}", "Yes", "18", "{Seconds}")
                                   Window.Send press keys("{MADCATZMPID4}", "yes", "18", "0")
                                   Macro.Pause("100")
                                   Window.Get text("{MADCATZMPID4}", "yes", "20", "no", "Second")
                                   Window.Set selected text("{MADCATZMPID4}", "Yes", "20", "{Second}")
                                   Window.Send press keys("{MADCATZMPID4}", "yes", "20", "1")
                                   Macro.Pause("100")
                                   Window.Get text("{MADCATZMPID4}", "yes", "29", "no", "Percentage")
                                   Window.Set selected text("{MADCATZMPID4}", "Yes", "29", "{Percentage}")
                                   Window.Send press keys("{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
               System.Get combined screen resolution("ResoX", "ResoY")
               Variable.Evaluate (Math)("{ResoX}-25", "ResX")
               Variable.Divide (Math)("ResoY", "2")
               Variable.Evaluate (Math)("{ResoY}-100", "ResY")
               Mouse.Move to coordinate relative to window("30", "7", "{MADCATZMPID4}", "no")
               Mouse.Hold button("Left")
               Mouse.Move to coordinate("{ResX}", "{ResY}")
               Mouse.Release button("Left")
               Mouse.Save coordinate to variable("MouseX", "MouseY")
               File.Write text("C:\GDMO\MADCATZMPID.txt", "No", "{MADCATZMPID4}")
               File.Write text("C:\GDMO\Macro.txt", "No", "{MouseX}")
               File.Write text("C:\GDMO\\Macro.txt", "Yes", "{MouseY}")
               Window.Set always on top("{MADCATZMPID4}", "no", "yes")
               Window.Bring to front("{MADCATZMPID4}", "no")
          end
function

any advice would be helpful thanks..

That's weird actually I don't have a solution for that ..

_________________
All Of My Scripts Can Be Found in Here !!!
http://bridgeurl.com/elrayes-scripts-1
---------------------------------------------------------------------------------------------------------------------------------------------------------------
if i Helped You Just Hit Thanks Button =====================================>
---------------------------------------------------------------------------------------------------------------------------------------------------------------


Top
 Profile  
Reply with quote  
 Post subject: Re: New Macro Protector Script By Elrayes™
Thanked: 1 time(s)  Unread post Posted: Tue Jan 02, 2018 3:42 pm 
VIP Contributor
VIP Contributor
User avatar



Joined: Fri Nov 01, 2013 10:45 pm
Posts: 507
Location: Egypt , Portsaid
Been thanked: 145 time(s)
Has thanked: 10 time(s)
Contribution Points: 1093
Try to add Macro Pauses between the script maybe u get that error due to the speed of the script

_________________
All Of My Scripts Can Be Found in Here !!!
http://bridgeurl.com/elrayes-scripts-1
---------------------------------------------------------------------------------------------------------------------------------------------------------------
if i Helped You Just Hit Thanks Button =====================================>
---------------------------------------------------------------------------------------------------------------------------------------------------------------


Top
 Profile  
Reply with quote  
 Post subject: Re: New Macro Protector Script By Elrayes™
Thanked: 0 time(s)  Unread post Posted: Wed Jan 24, 2018 6:54 am 
New User
New User
User avatar



Joined: Tue Jan 02, 2018 12:34 pm
Posts: 2
Been thanked: 0 time(s)
Has thanked: 2 time(s)
Contribution Points: 10
the MP works perfect when im using BEM 2.5 version...
i wonder why got problem when using 2.61 version :? :?


Top
 Profile  
Reply with quote  
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 245 posts ]  Go to page Previous  1 ... 21, 22, 23, 24, 25

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