RudeBoiAlex
05-02-2007, 08:23 PM
How to add randoms and antiban to you're script
---------- My First Tut ---------
Ok im considering you know some scar knowledge just the basics of the basics.
--------------------------Randoms---------------------------
Ok somewere were you want to declare randoms put Procedure Randoms; It does not have to be Randoms; itcan be anything but make sure you put ; on the end of it.After that put Begin. so you have this
Procedure Randoms;
Begin
Now Under Begin put Findnormalrandoms;
Then under thaat put End; so that ends the procedure
final outcome should be
Procedure Randoms;
Begin
Findnormalrandoms;
End;
Very SIMPLEEE
<<<<<<------------Anitban----------->>>>>>
Ok put Procedure Antibanactions; or what ever name you want it to be.There are alot of ways of antiban here i will show you some of them.
Procedure AntiBanActions;
var
DBanMe: Integer;
begin
DBanMe:= Random(10);
case DBanMe of
0: RandomRClickEvery(2 + Random(13));
1: HoverSkill('Mining', False);
2: RandomChatEvery(10 + Random(5));
3: RotateEvery(20 + Random(10));
4: LeaveScreenEvery(5 + Random(5));
5: HoverEvery(15 + Random(5), 'Attack');
6: PickUpMouse;
7: BoredEvery(9 + Random(24));
8: DragItem(1, 1 + Random(18));
9: GameTab(1 + Random(12));
10: RotateEvery(7 + random(4));
end;
end; now i added in a
Var
DBanMe: integer; that just means when i say DBanMe scar will know that means a number/numbers.In Begin I Put DBanMe:= Random(10) then Case DBanMe of 1. then 2. ect..... that means it will pick a randon number up to 10 and perform that antiban action.
Here are just some antiban moves...
HoverSkill('Mining', False); this will how the mining skill.
GameTab(1 + Random(12)); that will click any gametab (a gametab it like the inventory tab the fighting tab ect...).
RotateEvery(7 + random(4)); That will rotate the screen every 7 + a random 1 - 4 secs.
THANKS FOR LOOKING AT MY TUT its my first ;) :spot: :D :sasmokin: :) :p :f:
---------- My First Tut ---------
Ok im considering you know some scar knowledge just the basics of the basics.
--------------------------Randoms---------------------------
Ok somewere were you want to declare randoms put Procedure Randoms; It does not have to be Randoms; itcan be anything but make sure you put ; on the end of it.After that put Begin. so you have this
Procedure Randoms;
Begin
Now Under Begin put Findnormalrandoms;
Then under thaat put End; so that ends the procedure
final outcome should be
Procedure Randoms;
Begin
Findnormalrandoms;
End;
Very SIMPLEEE
<<<<<<------------Anitban----------->>>>>>
Ok put Procedure Antibanactions; or what ever name you want it to be.There are alot of ways of antiban here i will show you some of them.
Procedure AntiBanActions;
var
DBanMe: Integer;
begin
DBanMe:= Random(10);
case DBanMe of
0: RandomRClickEvery(2 + Random(13));
1: HoverSkill('Mining', False);
2: RandomChatEvery(10 + Random(5));
3: RotateEvery(20 + Random(10));
4: LeaveScreenEvery(5 + Random(5));
5: HoverEvery(15 + Random(5), 'Attack');
6: PickUpMouse;
7: BoredEvery(9 + Random(24));
8: DragItem(1, 1 + Random(18));
9: GameTab(1 + Random(12));
10: RotateEvery(7 + random(4));
end;
end; now i added in a
Var
DBanMe: integer; that just means when i say DBanMe scar will know that means a number/numbers.In Begin I Put DBanMe:= Random(10) then Case DBanMe of 1. then 2. ect..... that means it will pick a randon number up to 10 and perform that antiban action.
Here are just some antiban moves...
HoverSkill('Mining', False); this will how the mining skill.
GameTab(1 + Random(12)); that will click any gametab (a gametab it like the inventory tab the fighting tab ect...).
RotateEvery(7 + random(4)); That will rotate the screen every 7 + a random 1 - 4 secs.
THANKS FOR LOOKING AT MY TUT its my first ;) :spot: :D :sasmokin: :) :p :f: