#! /usr/local/bin/tcsh -f # A script to run a round-robin among all the indicated names # -q (quiet) option is helpful for just tabulating winners # Bug: It calls match, which is not too robust with error msgs. if ($1 == -h || $1 == --help || $1 == -help) then echo " "A script to run a round-robin among all the indicated names echo " "-q (quiet) option is helpful for just tabulating winners. echo "" echo Usage: $0 \[-q\] game... echo " "where each gamei is either a comp210 user id, or echo " "the pathname of an connect5 code \(scheme or executable\) echo "" echo " "Bug: It calls match, which is not too robust with error msgs. exit endif if ($1 == -q || $1 == --quiet) then set quiet = 1 shift else set quiet = 0 endif set noisy = (! $quiet) set matchProg = match-gui set matchFlags = "" if ($quiet) set matchFlags = "-q $matchFlags" set pass1names = `echo $argv` foreach student ($pass1names) shift pass1names set pass2names = `echo $pass1names` foreach opponent ($pass2names) $matchProg $matchFlags $student $opponent shift pass2names end end #! /usr/local/bin/tcsh -f