anchor.diff:  end;
   
   function TItems.GetInventory: string;
  -begin
  -
  +var
  +  SL: TStringList;
  +  I, FCount: Integer;
  +  FItem: Item;
  +begin
  +  Result := '';
  +  SL := TStringList.Create;
  +  try
  +    FCount := Clamp(Items_Inventory_GetCount(), 0, 26);
  +    for I := 0 to FCount - 1 do
  +    begin
  +      FItem := Items_Inventory_GetItem(I);
  +      SL.Append(Items.RenderInvItem(5, 2, I, FItem, False, False));
  +    end;
  +    Result := SL.Text;
  +  finally
  +    SL.Free;
  +  end;
   end;
   
   function TItems.GetItemEnum(AItemID: Integer): TItemEnum;
  
positive.code: 
  implementation
  
  uses Math, SysUtils, uTerminal, gnugettext, uMsgLog, uScenes, uGame;
  
  { TItems }
  
  
negative.code: interface
  
  uses BearLibItems, uCommon, uMap, uPlayer;
  
  type
    TItemType = (itCoin, itPotion, itBlade, itAxe, itSpear, itMace, itHelm,
      itArmour);
  