# Copyright (C) 2002 Ensim Corporation. All Rights Reserved.
#

F_display_kb()
{
    more -c $KSGENDIR/lib/data/kb.dat
}

F_read_keyboard()
{
    echo ""
    _q_kb="us"
    echo "> Default system keyboard type is US"
    F_ckyorn "y" "> Is this choice correct?"
    if [ $_q_yorn = "y" ]
    then
        return
    fi

    echo ""
    echo "> Please enter the number corresponding to your system keyboard type."
    echo ""
    echo -n "  Press <ENTER> to view a list of choices ..."
    read _q_dummy
    echo ""
    _q_kb=""
    local _N_kb=`wc -l $KSGENDIR/lib/data/kb.dat | awk '{print $1}'`
    while [ X"$_q_kb" = X"" ] || [ $_q_kb -lt 1 ] || [ $_q_kb -gt $_N_kb ]
    do
      F_display_kb
      echo -n "Keyboard [Default is 80 (US)]: "
      read _q_kb
      if [ X"$_q_kb" = X"" ]
      then
          _q_kb=80
          break
      fi
      _q_kb=`echo $_q_kb | $AWK '/^[0-9]+$/ {print}'`
    done
    _q_kb=`head -$_q_kb $KSGENDIR/lib/data/kb.dat | tail -1 | awk '{print $2}'`
    return
}

# __END__
