Unit Play;
Interface
  Procedure StartGame;
  Procedure MyMove(C:Char);
  Procedure YourMove(Var C:Char);