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

jorgedionis

Members
  • Content Count

    6
  • Joined

  • Last visited

Community Reputation

10 Good

About jorgedionis

  • Rank
    Junior Member

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Hi, I need help with shot automatic in Call of Duty for PC. Thanks!
  2. Thanks!! Can you delete this post? Please...
  3. I need click in 0,00001 seconds, all fast it can run. What command is the faster?
  4. 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...
×
×
  • Create New...