SRL Archive - Help

Finding AntiBan hard to use.


shstiger2009

2011-12-26 17:55:42

Hey everyone. I have a script in production where loads/hr is a big deal. It influences GP/hr and if AntiBan is called every time, would decrease that dramatically. Is there anyway I can call an AntiBan way less often than every time? Like, maybe 5 times an hour? Something like that. Thanks in advance!

Shuttleu

2011-12-26 17:58:24

sure, you can either use a timer and check if it has passed 12 mins since it last run, or you can do something like i do

procedure TheAntiban;
var
Chance: Integer;
begin
Chance:= Random(101);
if Chance<=AntibanChance then
case Random(101) of
1..20: HoverSkill('Woodcutting', false);
21..40: PickUpMouse;
41..60: RandomMovement;
61..80: BoredHuman;
81..100: ExamineInv;
end;
ChooseOption('ancel');
end;
where AntibanChance is a number between 0 and 100 (0 being never and 100 being everytime

~shut

shstiger2009

2011-12-26 18:06:32

Ok, the timer would be pretty sweet. How would I do that? I know I'd be using TimeRunning but just don't see how I could call a certain procedure every 12 mins. I guess in my loop it would be something like:

if (TimeRunning>720000) then
AntiBan;

But how would I do it every 12 minutes? Doing what I did there looks like it would AntiBan every time after it had been running for 12 minutes.

PatDuffy

2011-12-26 18:07:34

That would not work because TimeRunning is the total time, once the script has been running for 12 minutes it would AntiBan every time

Shuttleu

2011-12-26 18:09:47

something like the following

var
AntibanTimer: Integer
put that in the global variables
procedure TheAntiban;
var
Chance: Integer;
begin
if not (TimeFromMark(AntibanTimer) => 720000) then
exit;
case Random(101) of
1..20: HoverSkill('Woodcutting', false);
21..40: PickUpMouse;
41..60: RandomMovement;
61..80: BoredHuman;
81..100: ExamineInv;
end;
ChooseOption('ancel');
MarkTime(AntibanTimer);
end;
that would be the antiban procedure


MarkTime(AntibanTimer);
and put that just after LoginPlayer;

~shut

shstiger2009

2011-12-26 18:28:39

I get a Syntax error in the line:

if not (TimeFromMark(AntibanTimer) => 720000) then

Shuttleu

2011-12-26 18:30:09

swap the = and > over

~shut

shstiger2009

2011-12-26 18:34:30

Ok, I'll just have to play around with it. It's working but calling the AntiBan every time.