Thank you, guys. You really help out in a pinch.
Edit: So I changed it just slightly. And I ran into a weird bug. (at least I think It's weird)
PHP Code:
procedure Banking;
var
trueBank: Boolean;
begin
repeat
trueBank := not(trueBank)
if (FindDTM(GoldOre,x,y,MIX1,MIY1,MIX2,MIY2)) then
begin
wait(500+Random(1000));
if (FindBSpot(x,y)) Then
begin
Writeln('Attempting to deposit Gold Ore ');
ClickMouse2(True);
Wait(RandomRange(2250, 2750));
if (FindDTM(GoldOre, x, y, MSX1, MSY1, MSX2, MSY2)) then
begin
Mouse(x,y,3,3,False);
Wait(RandomRange(700,850));
ChooseOption('ll');
wait(400 + Random(150));
end;
end else
begin
SymbolAccuracy := 0.35
FindSymbol(x,y,'bank');
Mouse(x,y,0,0,true);
Wait(RandomRange(1000,1300));
SymbolAccuracy := 0.80
wait(1500+Random(1000));
Banking;
end;
end;
until(trueBank = False)
GoToGold;
end;
What happens is that it will repeat "GoToGold;" too. I thought that putting "until(trueBank = False)" would repeat everything before it.