Ejjman
2007-04-18 18:33:13
procedure Walk(ToFrom : string);
var
xx, yy, rx, ry : integer;
begin
if(not(LoggedIn))then Exit;
if(ToFrom = 'To')then
begin
if(FindColorSpiralTolerance(xx, yy, RockColor, 650, 9, 717, 157, 2))then
begin
MouseFlag(xx, yy + 6 + random(4), 1, 1);
FindFastRandoms;
if(FindSymbol(rx, ry, 'furnace'))then
begin
MouseFlag(rx + random(3), ry + 5 + random(3), 2, 2, True);
FindFastRandoms;
end;
end else
begin
writeln('Cannot find the rock color! Please restart and get correctly.');
TerminateScript;
end;
end;
if(ToFrom = 'From')then.......This is a procedure of mine that I'm having troubles with. Last night, it was working perfectly. But now, it will only click the rock, and NOT the symbol. I've tried putting the SymbolAccuracy := 0.2-0.8. It STILL does not find the dumb symbol. I added an end else in there to write something if not found, and it DOES. I dunno what the problem could be. Maybe they updated the symbol or something? Anyway, thanks for looking!
EDIT: What I mean is that it is NOT stopping at the FindFastRandoms for any reason with the end else part. Lol