SRL Archive - General Botting Help

Why So Slow?


351bryce

2014-02-18 02:58:11

So im Wondering why this script is so slow as i only have 100ms delay only will only press ctrl like every second is it because of pixel but it worked fine in a simular version without the timer.

program new;

const timetowait = 180000;

var x, y, counter: integer;

procedure fish;
begin
keydown(17);
wait(100);
keyup(17);
end

procedure antiafk;
begin
if ((getsystemtime + counter) > timetowait) then
begin
keydown(44);
wait(500);
keyup(44);
wait(100);
keydown(41);
wait(500);
keyup(41);
wait(100);
keydown(57);
wait(500);
keyup(57);
wait(100);
counter := getsystemtime;
end
end

begin
counter := getsystemtime;
Repeat
if findColorTolerance(x, y, 0, 235, 177, 267, 180, 1) then
begin
fish;
end
antiafk;

until(false)
end.

351bryce

2014-02-18 03:22:00

Fixed: it must take awhile to look at system time easy fix was to (if not) fishing then run that procedure.


program new;

const timetowait = 180000;

var x, y, counter: integer;

function findfish: boolean;
begin
if findColorTolerance(x, y, 0, 235, 177, 267, 180, 1) then
result := true;
end

procedure fish;
begin
presskey(17);
wait(100);
keyup(17);
end

procedure antiafk;
begin
if ((getsystemtime + counter) > timetowait) then
begin
keydown(44);
wait(500);
keyup(44);
wait(100);
keydown(41);
wait(500);
keyup(41);
wait(100);
keydown(57);
wait(500);
keyup(57);
wait(100);
counter := getsystemtime;
end
end

begin
counter := getsystemtime;
Repeat
if (findfish) then
begin
fish;
end
if (not findfish) then
begin
antiafk;
end

until(false)
end.








Turpinator

2014-02-18 03:54:17

 if ((getsystemtime + counter) > timetowait) then
is going to want to be…
 if ((getsystemtime - counter) > timetowait) then

(not sure what youre trying to accomplish though)