i know what it means but i cant figure it out all of my begins have an end and all my repeats have untils?
yes its messy not using scar tags so standards wont workProcedure MineOres;
var
time, x, y, OreColor: integer;
Begin
If FindColorTolerance(x, y, OreColor, MSX1, MSY1, MSX2, MSY2, 15) Then
Begin
Mouse(x, y, 1, 1, True);
MarkTime(time);
Repeat
Wait(200);
If (TimeFromMark(time) >= 20*1000) then break;
Until FindText('you manage');
Repeat
MineOres;
Until(InvFull);
End;
End;
Until FindText('you manage'); this is ruining it






Reply With Quote







