: help - help command

if $1x != x goto havarg

cat /hlp/help.hlp
goto topics

: havarg
if ! -r /hlp/$1.hlp goto nope

cat /hlp/$1.hlp
exit

: nope
echo ""
echo 'No help available for "' $1 '".'
echo ""

: topics
echo "Help is available for:"
echo ""

ls /hlp/*.hlp >help.tmp
ed - help.tmp
g+/hlp/+s+++
g+\.hlp+s+++
w
q
pr -6 -w80 -l1 -t help.tmp
rm help.tmp
echo ""
