#!/bin/sh
mydir=`dirname $0`
mydir=`(cd $mydir; pwd -P)`
myname=`basename $0`
qedir=$mydir
ropt=''
if false; then
 while [ -n "$1" ]; do
  case $1 in
    -r)		ropt='-r' ;;
    -M)		Mopt='-M' ;;
    html)	t=50; te=html	args="html css" ;;
    ruby)	t=90; args="emacs command-1" ;;
    ruby-*)	t=60; te=${1%%-*}${1##*-} args=$1 ;;
    calc-*)	t=60; te=${1%%-*}${1##*-} args=$1 ;;
    data-*)	t=45; te=${1%%-*}${1##*-} args=$1 ;;
    data)	t=45; te=${1%%-*}${1##*-}
    		args="data-1 data-2 data-3 data-4 data-5 data-6" ;;
    *)		cat<<-EOF	>&2
		Usage: $myname html|ruby-1|ruby-2		- Do exam
		       $myname -r html|ruby-1|ruby-2		- Show rank
		EOF
      exit 1 ;;
  esac
  shift
 done
else
  cd $HOME/Ruby
  t=180; te=${1%%-*}${1##*-}; args=ruby-jd
fi
PATH=/usr/koeki/ruby/2.5.3/bin:$PATH
$qedir/qexam.rb -t $t -T "$te" $ropt $Mopt $args