anchor.diff:    UViewMain;
   
   var
  -  PbProfile    : TMemIniFile;
  +  PbProfile    : TIniFile;
     PbNumber     : integer;
     PbLoadedFile : string;
   
  -  GmProfile    : TMemIniFile;
  +  GmProfile    : TIniFile;
     GmNumber     : integer;
     GmLoadedFile : string;
   
  
positive.code: 
    SetPbNth(index, format('%d %d', [n, nOk]));
    if storeLast
      then PbSetLast(index);
  
    pbProfile.UpdateFile
  end;
  
  // -- Access to last game in sequence mode -----------------------------------
  
negative.code: // ---------------------------------------------------------------------------
  
  initialization
    PbProfile := TIniFile.Create(ChangeFileExt(ParamStr(0), '.pb'));
    PbLoadedFile := '';
    GmProfile := TIniFile.Create(ChangeFileExt(ParamStr(0), '.gm'));
    GmLoadedFile := ''
  finalization
    PbProfile.Free;
  