# функція, що створює тур з набором суперників
    public function CreateRound($idSch, $idTrn, $idRnd)
    {
  $prevSch = $this->FTennisDB->GetScheduleByRnd($idTrn, ($idRnd-1));
  if(empty($prevSch)) $prevSch = 0;
  $rounds = $this->GetRounds($prevSch);
  $count  = count($rounds);
  $draw = $this->GetRndDrawByID($idRnd);
  if($count == 0) # це початковий тур, дані вичитуємо з draw
  {
   $players = $this->GetPlayersByTrn($idTrn);
   $hdr = (int)($draw/2);
   $top = (int)($hdr/2);
   $bot = $top + 1;
   # спочатку просто формуємо порожню сітку
   for($i = 1; $i < $hdr+1; $i++)
   {
    $this->SetRound($idSch, $i, 0, 0);
   }
   $players = array_values($players);
   if(empty($r1)) # ще нема сіяних
   {
    $r1 = $this->SetRound($idSch, 1, $players[0]['idPlr'], 0);
    unset($players[0]);
    $players = array_values($players);
   }
   if(empty($r2)) # ще нема сіяних
   {
    $r2 = $this->SetRound($idSch, $hdr, 0, $players[0]['idPlr']);
    unset($players[0]);
    $players = array_values($players);
   }
   if(empty($r3)) # ще нема сіяних
   {
    $r3 = $this->SetRound($idSch, $top, 0, $players[0]['idPlr']);
    unset($players[0]);
    $players = array_values($players);
   }
   if(empty($r4)) # ще нема сіяних
   {
    $r4 = $this->SetRound($idSch, $bot, $players[0]['idPlr'], 0);
    unset($players[0]);
    $players = array_values($players);
   }
   # формуємо верхню половину сітки, перші гравці
   for($i = 2; $i < $top; $i++)
   {
    $cnt = count($players);
    if($cnt == 0) break;
    $k = mt_rand(0, $cnt-1);
    $plr1 = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $i, $plr1, 0);

   }
   # формуємо нижню половину сітки, перші гравці
   for($i = $bot+1; $i < $hdr; $i++)
   {
    $cnt = count($players);
    if($cnt == 0) break;
    $k = mt_rand(0, $cnt-1);
    $plr1 = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $i, $plr1, 0);
   }
   $rivalvs = $this->GetRounds($idSch);
   # формуємо верхню половину сітки, другі гравці
   for($i = 2; $i < $top; $i++)
   {
    $cnt = count($players);
    if($cnt == 0) break;
    $plr1 = $rivalvs[$i]['idP1'];
    $k = mt_rand(0, $cnt-1);
    $plr2 = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $i, $plr1, $plr2);
   }
   $rivalvs = $this->GetRounds($idSch);
   # формуємо нижню половину сітки, другі гравці
   for($i = $bot+1; $i < $hdr; $i++)
   {
    $cnt = count($players);
    if($cnt == 0) break;
    $plr1 = $rivalvs[$i]['idP1'];
    $k = mt_rand(0, $cnt-1);
    $plr2 = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $i, $plr1, $plr2);
   }
   # записуємо тих, хто залишився до сіяних
   $cnt = count($players);
   if($cnt != 0)
   {
    $k = mt_rand(0, $cnt-1);
    $plr = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $bot, $r4['idP1'], $plr);
   }
   $cnt = count($players);
   if($cnt != 0)
   {
    $k = mt_rand(0, $cnt-1);
    $plr = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $top, $plr, $r3['idP2']);
   }
   $cnt = count($players);
   if($cnt != 0)
   {
    $k = mt_rand(0, $cnt-1);
    $plr = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, $hdr, $plr, $r2['idP2']);
   }
   $cnt = count($players);
   if($cnt != 0)
   {
    $k = mt_rand(0, $cnt-1);
    $plr = $players[$k]['idPlr'];
    unset($players[$k]);
    $players = array_values($players);
    $this->SetRound($idSch, 1, $r1['idP1'], $plr);
   }
  }
  else    # це наступний тур, дані беремо з попереднього
  {
   $j = 0;
   for($i = 1; $i < $count; $i += 2)
   {
    $j++;
    $idP1 = $rounds[$i]['idWnr'];
    $idP2 = $rounds[$i+1]['idWnr'];
    $this->SetRound($idSch, $j, $idP1, $idP2);
   }
  }
    }