is there any way to have it wait until it doesn;t find willow in the top corner
i believe the code is uptext but scar doesnt reconize it
Code:procedure ChopLogs; var i,x,y,m: integer; treecolors: array [0..3] of integer; treeNames: array [0..2] of String; begin treecolors[0]:= 3759203; treecolors[1]:= 5406322; treecolors[2]:= 6132352; treecolors[3]:= 3363673; treenames[0]:= 'Wil'; treenames[1]:= 'llo'; treenames[2]:= 'low'; repeat if (not LoggedIn) then Exit; for i := 0 to 3 do if FindObjTPA(x, y, treecolors[i], 10, 2, 15, 25, 10, [treenames[0], treenames[1], treenames[2]]) then begin FindObjTPA(x, y, treecolors[i], 10, 2, 15, 25, 10, [treenames[0], treenames[1], treenames[2]]) Wait(100 + Random(300)); begin Mouse(x, y, 4, 4, True); MarkTime(M); repeat wait(10); //Findrandoms; until not uptext(treenames[0], treenames[1], treenames[2]); end; end; AntiBanz; // FindRandoms; if not (LoggedIn) then begin NextPlayer(False); LoginPlayer; end; until invfull end;




Reply With Quote










