umask 022
set path = (. /va/goldman/bin /usr/local /usr/local/bin /usr/ucb /bin /usr/bin )
if ($?TERM) then
        set cdpath = (. ~)
        set mail = /usr/spool/mail/$USER
        set history = 80
#
        if ($?LEVEL) then
                set level = $LEVEL
                @ level = $level + 1
                setenv LEVEL $level
        else
                setenv LEVEL '0'
                set level = '0'
        endif
        set prompt = "[${level}:\!]\
; "
#
        alias s source
        alias u uptime
        alias bye logout
        alias ls 'ls -F'
        alias ll 'ls -l'
        alias contest '/etc/ac -p | sort +1nr | tee contest.out | more'
        alias imprint '/usr/local/bin/imprint -P223 \!*'
        alias imprint 'expand -4 \!* | /usr/local/bin/imprint -P223 -h \!#:1'
        alias ? 'history | more'
        alias bsh '@ level = $level + 1; setenv LEVEL $level; sh \!*'
        alias rget 'rcp \!#:2:${cwd}/\!#:1 .'
        alias rput 'rcp \!#:1 \!#2:${cwd}'
        alias vlp 'echo \(load \"/usr/src/ucb/vlp/vlp\"\) \(vlp \!*\) | lisp  >'
        alias nvlp 'echo \(load \"/usr/src/ucb/vlp/vlp\"\) \(vlp \!*\) | lisp |'
        alias ivlp 'echo \(load \"/usr/src/ucb/vlp/vlp\"\) \(vlp \!*\) | lisp |'
        alias upload '; stty raw ; stty -echo ; getbytes \!#:1 < /dev/tty > \!#'
        if ($TERM == sun) then
                alias close   'echo -n "^[[2t"'
                alias header  'echo -n "^[]l\!*^[\"'
                alias icon    'echo -n "^[]I\!*^[\"'
                alias iheader 'echo -n "^[]L\!*^[\"'
                alias refresh 'echo -n "^[[7t"'
                alias size 'echo -n "^[[8;\!#:1;\!#:2t"'
                alias standard 'echo -n "^[[8;34;80t"'
                if ($?SYSLINE) then
                        alias cd 'chdir \!*; echo "dir: $cwd:t ($cwd) | host: $'
                else
                        alias cd 'chdir \!* ; echo -n "^[]ldir: $cwd:t ($cwd) |'
                endif
        endif
endif
