SRL Archive - Help and Support

here's the lowdown:
mining gold there's only 2 gold ores so when they are both mined I have to wait for them to come back which means I'll have to do an anti ban or something to avoid them timeing until it finds the ore.
I'm really bad at this kinda thing but I attempted and all I got was a never ending loop of anti ban and after a bit of my genious modification a script that freezes…..any suggestions. Oh and plz don't laugh at my antiban/script :D

procedure MyAntiBan; 
var
  DItem, DBanMe, AntiBanRatio: Integer;
begin
  if not (LoggedIn) then Exit;
  AntiBanRatio := 25 + (25 * AntiBanAmount);
  DBanMe := Random(AntiBanRatio);
  case DBanMe of
    0: MMouse(Random(MSX2), Random(MSY2), 0, 0);
    1: PickUpMouse;
    2: HoverSkill('mining', False);
    3: HoverSkill('smithing', False);
    4: begin
        DItem := 1 + random(14);
        if (ExistsItem(DItem)) then
          DragItem(DItem, 15 + random(10));
      end
    5: begin
        GameTab(1 + random(12));
        wait(1500 + random(500));
        GameTab(4);
      end;
  end;
end;

function MineGold: Boolean;
var
Bx, By: Integer;
begin
  if (not (LoggedIn)) then Exit;
  if(not(Players[CurrentPlayer].loc='Gold'))then
  Exit;
  HighestAngle;
  MakeCompass('N')
  Gametab(4)
  repeat
  repeat
    if not (LoggedIn) then Exit;
    wait(5 + random(5));
    if (GasCheck(Bx, By)) then
    begin
      HandleGas;
    end;
    repeat
      Wait(1342+random(242));
      MyAntiBan; //The antiban rofl waffle
      Wait(1342+random(242));
    until(FindObjOre2(x, y, 'Min', Gold, 8, 1))
    if FindObjOre2(x, y, 'Min', Gold, 8, 1) then
    begin
      Wait(5 + random(10));
      Mouse(x, y, 2, 2, true);
      Wait(5 + random(10));
      Flag;
      Wait(5 + random(10));
      Result:=True
      Break;
    end;
  until (false)
  begin
    UntilMined;
  end;
until (InvFull)
end;

oh and here's to missing out on ur 900th post >.<
better get camera ready soon :D

Make another case so say

i:=random(10)
case i of 
  5:myantiban
  7:myantiban
end;

Then your anitban wont be called every time

;) he's a smart one thx

:P your welcome.