anchor.diff:        P[3].Append(IntToStr(Level));
         P[4].Append(IntToStr(Dungeon));
         P[5].Append(IntToStr(Turns));
  -      Line := P[0].Count - 1;
  +      Line := Count - 1;
         Save;
         Exit;
       end;
     except
       on E: Exception do
  -      Error.Add('Scors.Add', E.Message);
  +      Error.Add('Scores.Add', E.Message);
     end;
   end;
   
  
positive.code: implementation
  
  uses
    SysUtils,
    Trollhunter.Utils,
    uZip,
  
negative.code: type
    TScores = class(TObject)
    private
      P: array [0 .. 5] of TStringList;
      FLine: Integer;
      FMaxCount: Integer;
      procedure SetMaxCount(const Value: Integer);
  