anchor.diff:        end;
       for i:=1 to 9 do
         t[i] := '';
  -    jeu(t, nomJoueur1, nomJoueur2, scoreJoueur1, scoreJoueur2, symJoueur1, symJoueur2, tourJoueur1, tourJoueur2);
  +    jeu(t, nomJoueur1, nomJoueur2, symJoueur1, symJoueur2);
       write('Une autre partie [Y/n] -> ');
       read (rep); 
       rep := upCase(rep);
  
positive.code: program tictactoe;
  {
    Simple jeu realise par mohamed Aziz knani
    (incomplet)
  }
  uses wincrt;
  
  
negative.code:   tab = array [1..9] of string;
    
  var
    countPartie, i   : integer;
    nomJoueur1, nomJoueur2    : string;
    symJoueur1, symJoueur2, rep    : char;
    bool   : boolean;
    t                         : tab;
    
  procedure joueur(var nom : string; var sym, symJoueur1 : char; nbJoueur : byte) ;
  