Just needs to be coded better, more efficiently etc, your sxcier than that so you should make it leeter, and show who is da boss ay
Like:
Simba Code:
{*
#############################################################################################
*********SPS_WalkToPos, by Leetsxc**********
#############################################################################################
Made from Orginal SPS_WalkToPos function
- Walks to position, P.
FEATURES
- Break's from loop when Distance from flag has been reached
- Will Randomly Select Run if Below a Random Percentage of 20-40 Energy Level
- No Longer uses Flag as it was to unreliable and would get you stuck in infinite Wait Loops
- Uses a Random Sleep and Move Mouse while waiting to reach specified Flag distance
- Tracks Energy Percentage to see if it has decreased, if it hasn't it will enable run
sxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxcsxc
*}
function SPS_WalkToPosSXC(P: TPoint; Distance:integer): boolean;
var
s:string;
Time, EnergyPercentage:integer;
MM: TPoint;
begin
if not LoggedIn then
Exit;
EnergyPercentage:=GetMMLevels('run', s);
if(Random(10) < 5)then
if(not(FindcolorTolerance(x, y, 6740716, 714, 99, 734, 118, 4)))then
if(EnergyPercentage > 20)then
SetRun(true);
MM := SPS_PosToMM_SxC(P);
if (MM.X > 0) then
begin
MMouse(MM.X, MM.Y, 0, 0);
sleep(randomrange(50,100));
ClickMouse2(true);
Marktime(Time);
repeat
sleep(100);
if(FlagPresent())then
begin
Result:=true;
break;
end;
if(TimeFromMark(Time)>5000)then
Exit;
until(false);
if WaitFunc(@IsMoving, 1, 3000 + random(500)) then
while isMoving do
begin
if(FlagDistance < Distance)then
break;
if(EnergyPercentage > 20)then
if(TimefromMark(Time)> 2000)then
if(not(GetMMLevels('run', s) < EnergyPercentage))then
begin
mousespeed:=Randomrange(10,35);
if(Debug)then
writeln('Energy Percentage hasnt decreased so we are not running.');
Mouse(715, 98, 20, 20, true);
EnergyPercentage:=0; //Stop tracking screw using another var to do so
sleep(1000+random(400));
end;
if(random(100) < 10)then
begin
mousespeed:=Randomrange(10,35);
SleepAndMoveMouse(random(500));
end;
if(Random(10) < 5)then
if(not(FindcolorTolerance(x, y, 6740716, 714, 99, 734, 118, 4)))then
if(EnergyPercentage > 20)then
SetRun(true);
sleep(200);
sleep(random(200));
end;
end;
end;