Log in

View Full Version : Hover Skill Going Slow



Devoker
05-29-2009, 08:08 AM
For an anti-ban, I am using HoverSkill as a part of it. For some reason, it moves super slow.

Here is the script:


{================================================= =}
{================= AutoTalker V1.0 ================}
{================================================= =}

Program AutoTalker;
{.include SRL/SRL.Scar}

Var
Messages : Integer;

Const
{=========================================}
Message1 = (' ');
Message2 = (' ');
Message3 = (' ');

{=========================================}

Procedure AutoTalker;
Begin
TypeSend(Message1)
Wait(2000 + Random(1000))
inc(Messages)
TypeSend(Message2)
Wait(1500 + Random(1000))
inc(Messages)
TypeSend(Message3)
Wait(1750 + Random(1000))
inc(Messages)
End;

Procedure AntiBan;
Begin
Begin
MakeCompass('W');
Wait(1000 + Random(500));
MakeCompass('E');
Wait(1250 + Random(500));
MakeCompass('S');
Wait(1500 + Random(500));
End;
Begin
HoverSkill('Random',False);
Wait(750 + Random(500));
End;
End;

Procedure ProgressReport;
Begin
ClearDebug;
WriteLn('|======================================== ==========|');
WriteLn('| Willow Cutter Report |');
WriteLn('|======================================== ==========|');
WriteLn(' Time Running: ' + TimeRunning );
WriteLn(' Messages Said: ' + IntToStr(Messages));
WriteLn('|======================================== ==========|');
WriteLn('| Created By: Devoker. |');
WriteLn('|======================================== ==========|');
End;

Begin
AutoTalker;
repeat
Autotalker;
AntiBan;
ProgressReport;
until(False)
End.

Here is the HoverSkill part:


Procedure AntiBan;
Begin
Begin
MakeCompass('W');
Wait(1000 + Random(500));
MakeCompass('E');
Wait(1250 + Random(500));
MakeCompass('S');
Wait(1500 + Random(500));
End;
Begin
HoverSkill('Random',False);
Wait(750 + Random(500));
End;
End;

senrath
05-29-2009, 08:20 AM
You forgot SetupSRL :P

Devoker
05-29-2009, 01:29 PM
Oh, okay. Thank you.

ian.
05-29-2009, 02:48 PM
Doesn't fix it and don't make multiple threads, please. There is something wrong with it, I'll check it out.

Da 0wner
05-29-2009, 03:11 PM
99_, SetupSRL; does fix it because MouseSpeed is not set without it and when it is called it is set to like 15 or something.

Tniffoc
05-30-2009, 01:11 AM
The only way to fix it without calling the full SetupSRL; (Don't know why you wouldn't want to ...) is to set MouseSpeed to something higher liek I think 15 works.

Dark Arcana
05-30-2009, 02:22 PM
If you mean HoverSkill is slow try removing this line:

Wait(750 + Random(500));