I have my own mining procedure and I need to put anti-randoms and anti-ban in it:
SCAR Code:
procedure CheckPick;
begin
if(FindPick)then
begin
// if(FearlessDebug)then Writeln('Found pickaxe.');
end else
begin
Writeln('Can''t Find(useable)Pick');
Writeln('Switching to next player.');
Players[CurrentPlayer].loc:= 'NoPick';
PlayerProgressReport;
NextPlayer(False);
end;
end;
and
SCAR Code:
procedure GetPickHeadColor;
begin
if(FindPickHeadColor)then
begin
// if(FearlessDebug)then Writeln('Found PickaxeHeadColor.');
end else
begin
Writeln('Can''t FindPickHeadColor.');
Writeln('Switching to next Player.');
Players[CurrentPlayer].loc:= 'NoPickHeadColor';
PlayerProgressReport;
NextPlayer(False);
end;
end;
SCAR Code:
procedure CheckFight;
begin
if(FindFight)then
begin
RunAwayDirection(RunDir);
wait(13000);
RunBack;
FightsPlayer:= FightsPlayer+1;
FightsTotal:= FightsTotal+1;
end;
end;
SCAR Code:
procedure CheckGas;
begin
if(GasColors(gx, gy))then
begin
GassesPlayer:= GassesPlayer+1;
GassesTotal:= GassesTotal+1;
end;
end;
SCAR Code:
procedure FckRandoms;
begin
FindNormalRandoms;//I didnt declare this one but you know what it is:p
FindFastRandoms;
end;
And the last:
SCAR Code:
procedure AntiBannage; //My Anti-Ban.
var
DBanMe: Integer;
begin
DBanMe := Random(13);
case DBanMe of
0: RandomRClickEvery(2 + Random(13));
1: HoverSkill('Mining', False);
2: RotateEvery(20 + Random(10));
3: LeaveScreenEvery(5 + Random(5));
4: BoredEvery(15 + Random(5))
5: PickUpMouse;
6: BoredEvery(9 + Random(24));
7: DragItem(1, 1 + Random(18));
8: GameTab(1 + Random(12));
9: RotateEvery(7 + random(4));
10: MouseBox(MSX1, MMY1, MMX2, MMY2, 3);
11: SleepAndMoveMouse(600000 + random(300000))
12: IdleTime(1000 + Random(350),500,1.0);
13: AskMining; //This is my own procedure just random talking
end;
end;
So now this is like the setup of my mining procedure:
1. Searches for a rock until found uptext mine;
2. Moves mouse to it.
3. It clicks on it(left or right and chooseoption)
4. Checks if it says 'no curr ore available' then it needs to restart the searching for a rock.. (MAybe exit/break or something else)
5. waits until in chat 'you manage';
This repeats until inv full.
So where between these do I need to put my anti-randoms and anti-ban and fight stuff? Please answer with a list so I can order it correctly
Thanks