My .prompt file
The lines in typewriter font are from the original file. Comments follow in the bullets.

#
umask 022
if ($slevel == 0) then
    alias getprompt 'set prompt="! ${THISHOST}\\\!$cwd:t>  "'
else
    alias getprompt 'set prompt="! ${slevel} ${THISHOST}\\\!$cwd:t>  
"'
endif
alias cd 'cd \!*; getprompt'
alias pushd 'pushd \!*; getprompt'
alias popd 'popd \!*; getprompt'
getprompt