Nufineek
2014-02-23 12:28:46
I wrote this antiban, performing slightly different actions for each account. What do you think about that? What would you change? I call each of the procedures (Antiban and lookingAt Web) twice in the script.
Function Antiban: Boolean;
Var
I: Integer;
Begin
I := Random(600);
Case accNumber of
1, 4:
Begin
Case I Of
1:
begin
boredHuman(true);
minimap.clickCompass();
end;
4..45:
Begin
hoverSkill(Skill_herblore);
Wait(GaussRangeInt(1000,2000));
End;
46..48: mouseMovingObject;
49..100: SleepAndMoveMouse(RandomRange(100,MouseB));
101..270:
Begin
MouseOffClient(Random(4));
Wait(RandomRange(2000, MouseB));
End;
271..331:
wait(randomRange(1000, 4000));
331..333:
randomRClickItem();
339..341:
smallRandomMouse();
342..344:
randomGameTab(true);
345..349:
smallRandomMouse;
350..419:
pickUpMouse;
end;
end;
2, 5:
Begin
Case I Of
1..7:
begin
boredHuman(true);
minimap.clickCompass();
end;
8..25:
Begin
hoverSkill(Skill_herblore);
Wait(GaussRangeInt(1000,2000));
End;
26..48: mouseMovingObject;
49..100: SleepAndMoveMouse(RandomRange(100,MouseB));
101..199:
Begin
MouseOffClient(Random(4));
Wait(RandomRange(2000, MouseB));
End;
241..331:
wait(randomRange(4000, 7000));
331..338:
randomRClickItem();
339..341:
smallRandomMouse();
342..344:
randomGameTab(true);
345..349:
smallRandomMouse;
350..400:
pickUpMouse;
end;
end;
3, 6:
Begin
Case I Of
1..2:
begin
boredHuman(true);
minimap.clickCompass();
end;
3..38:
Begin
hoverSkill(Skill_herblore);
Wait(GaussRangeInt(1000,2000));
End;
39..40: mouseMovingObject;
41..121: SleepAndMoveMouse(RandomRange(100,MouseB));
122..199:
Begin
MouseOffClient(Random(4));
Wait(RandomRange(2000, MouseB));
End;
271..331:
wait(randomRange(8000, 13000));
331..360:
randomRClickItem();
361..368:
smallRandomMouse();
369..370:
randomGameTab(true);
371..420:
pickUpMouse;
end;
end;
End;
Wait(GaussRangeInt(0, AntiB));
End; procedure lookingAtWeb;
var
I: integer;
begin
i := random(1000);
Case AccNumber of
1, 4:
begin
Case I of
0..12:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (long)');
wait(30000 + randomRange(20000, 30000));
end;
13:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (med)');
wait(30000 + randomRange(5000, 15000));
end;
14..18:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (short)');
wait(5000 + randomRange(2000, 7000));
end;
end;
end;
2, 5:
begin
Case I of
0..1:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (long)');
wait(30000 + randomRange(5000, 12000));
end;
2..15:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (med)');
wait(15000 + randomRange(3000, 9000));
end;
16..19:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (short)');
wait(1500 + randomRange(1000, 3000));
end;
end;
end;
3, 6:
begin
Case I of
0..2:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (long)');
wait(30000 + randomRange(10000, 25000));
end;
3..11:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (med)');
wait(11000 + randomRange(2000, 5000));
end;
12..22:
begin
mouseOffClient(OFF_CLIENT_RANDOM);
writeln('Pretending to looking at another website. (short)');
wait(4000 + randomRange(2000, 7000));
end;
end;
end;
end;
end;