SRL Archive - Bugs

It doesn't work, and cause my script to stop working, as if it was in an infinite loop or something.

It's working fine for me. Also, I don't see how it could cause an infinite loop if it doesn't loop anything. Or maybe I misunderstood what you meant by that.

Edit: Could you post the part of your script using it?

Function CookOnFire(ID: Integer):boolean;
var
  Marker: Integer;
  ThePoint: TPoint;
  Item: TInvItem;
begin
  if R_ItemIDExists(Item, ID) then
  begin
    ThePoint := TileToMS(Tile(3075, 3429), 40);
    R_ClickItemID(ID, True, '');
    MMouse(ThePoint.x, ThePoint.y, 5, 5);
    GetMousePos(ThePoint.x, ThePoint.y);
    Wait(1500);
    if R_IsUpText('ire') then
    begin
      Writeln('UpText Found, Left Clicking Mouse');
      Mouse(ThePoint.x, Thepoint.y, 0, 0, True)
    end else
    begin
      Writeln('UpText Not Fount, Right Clicking Mouse');
      Mouse(ThePoint.x, Thepoint.y, 0, 0, False);
      R_ChooseOption('ire');
    end;
    MarkTime(Marker);
    while R_ItemIDExists(Item, ID) do
    begin
      Wait(500);
      if TimeFromMark(Marker) > 35000 then
        Exit;
    end;
  end;
  Result := True;
end; 

Test what the Uptext(its not really the uptext, its just the first menu option) is. R_GetUptext.

Sorry, I should have elaborated, it didn't say whether it was true or false, simba just sat there doing sod all…

put the mouse over the fire somehow, and then all r_getuptext and see what it prints out with a writeln.

I DID, It just got stuck in something simmilar to an infinite loop! RAWG!

Put some nice writeln's into r_IsUpText then and check where it breaks..

I guess it would be an error in r_getMenuText… There is a repeat loop… But shouldn't it be a "for(count := GetMenuCount downto 0) do" loop anyway?