anchor.diff:              7..9 : x := 8;
             end;
             case i of
  -            1, 4, 7 : y := 2;
  -            2, 5, 8 : y := 6;
  -            3, 6, 9 : y := 10;
  +            1, 4, 7 : y := 20;
  +            2, 5, 8 : y := 24;
  +            3, 6, 9 : y := 28;
             end;
           if t[i] = '1' then
             begin
               gotoxy(y, x);
               write(symJoueur1);
  -            gotoxy(1, 10);
  +            gotoxy(1, 11);
             end
           else
             begin
               gotoxy(y, x);
               write(symJoueur2);
  -            gotoxy(1, 10);
  +            gotoxy(1, 11);
             end; 
         end;
       end;
  
positive.code:       bool := true
      else bool := false;
    until bool = false ;
  END.
negative.code:          symJoueur2, ' % ', nomJoueur2, ' : ', scoreJoueur2);
    writeln;
    writeln;
    writeln('                  ---|---|---');
    writeln('                   1 | 2 | 3 ');
    writeln('                  ---|---|---');
    writeln('                   4 | 5 | 6 ');
    writeln('                  ---|---|---');
    writeln('                   7 | 8 | 9 ');
    writeln('                  ---|---|---');
    writeln;
    for i:=1 to 9 do
      begin
        if t[i] <> '' then 
  