Jump to content
  • Sky
  • Blueberry
  • Slate
  • Blackcurrant
  • Watermelon
  • Strawberry
  • Orange
  • Banana
  • Apple
  • Emerald
  • Chocolate
  • Charcoal
jorgedionis

I need be more fast!

Recommended Posts

Hi! I need help with a .scar for a game. On this game there aren't administrators so I want be the fast!!

 

I want to collect some minerals of a mine.

 

That is my configuration but there are people faster than me.

 

 

constResource1 = 11508879; // Colour of resource - Pega el color del recurso Nº1Resource2 = 12299420; // Colour of resource - Pega el color del recurso Nº2Resource3 = 15985372; // Colour of resource - Pega el color del recurso Nº3CollectTime = 4300; // Time to collect - Tiempo de recoleccion (2400 = 2.4 Segundos)varx, y, lvlx, lvly: Integer;function TargetResource1: Boolean;beginResult := FindColor(x, y, Resource1, 0, 0, 800, 600);end;function TargetResource2: Boolean;beginResult := FindColor(x, y, Resource1, 0, 0, 800, 600);end;function TargetResource3: Boolean;beginResult := FindColor(x, y, Resource3, 0, 0, 800, 600);end;function NextResource1: Boolean;beginResult := FindColor(x, y, Resource1, 0, 0, 800, 600);end;function NextResource2: Boolean;beginResult := FindColor(x, y, Resource2, 0, 0, 800, 600);end;function NextResource3: Boolean;beginResult := FindColor(x, y, Resource3, 0, 0, 800, 600);end;procedure Collect;beginif (TargetResource1 or TargetResource2 or TargetResource3) thenbeginMoveMouse(x, y);Wait(-5);MouseBtnDown(x, y, mbLeft);Wait(-5);MouseBtnUp(x, y, mbLeft);Wait(-5);MoveMouse((x + 20), (y + 20));Wait(-5);MouseBtnDown((x + 20), (y + 20), mbLeft);Wait(-5);MouseBtnUp((x + 20), (y + 20), mbLeft);Wait(-5);Wait(CollectTime);end;end;function NoResource: Boolean;beginResult := not FindColor(x, y, 1683891, 0, 0, 800, 600);end;function FindLevel: Boolean;beginResult := FindColor(lvlx, lvly, 25087, 0, 0, 500, 500);end;procedure LevelUp;beginif FindLevel thenbeginend;end;beginCollect;repeatif NoResource thenCollect;if (NextResource1 or NextResource2 or NextResource3) thenCollect;if FindLevel thenLevelUp;until False;end.

 

 

-----

I want be more fast because the mouse move slow that I want...

Edited by Freddy
Restored post

Share this post


Link to post
Share on other sites
Thanks!! Can you delete this post?

 

Please...

 

Please do not erase your question. We've taken the time to answer your question, others may benefit from the answer as well.

Share this post


Link to post
Share on other sites
On 12/7/2016 at 22:36, Wanted said:

SetMousePos sí, suponiendo que la detección de bot no sea parte del juego que estás jugando.

 

On 11/7/2016 at 0:54, Wanted said:

Use MoveMouseEx tiene una velocidad de mouse personalizada ... o solo OSI y MMouse.

 
 
Hello friend, I really want you to teach me how to configure the scard divi to be faster, I download the programs you mentioned and it does not work, will you help me?

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


×
×
  • Create New...