XcanadamanX
2007-07-03 17:31:13
ok ive been having trouble with my smelter. i think this is my problem:
is there something there that would make it stop?
Function FindAll3:boolean;
var i,mymark:integer;
Begin
if (not(Loggedin2)) then exit;
writeln('waiting for flag to disappear')
MarkTime(mymark)
While (FlagDistance>8) do
begin
case i+1 of
1: begin
If FindFastRandoms then
begin
Result:=True;
exit;
end;
end;
2: Begin
If FindNormalRandoms then
begin
Result:= True;
exit;
end;
end;
3: If TimeFromMark(MyMark)>=8000 then exit;
end;
if (not(loggedin2)) then exit;
wait(5)
i:=i+1;
if i>3 then i:=0
end;
end;is there something there that would make it stop?