Something

case "$-" in *i*)
        set -o emacs
        alias exit='clear; exit'

        prompt()
        {
                if [ $(/usr/bin/id -u) -eq 0 ]; then
                        echo '# '
                else
                        echo '$ '
                fi
        }

        escape()
        {
                echo $1 | sed 's/\//\\/g'
        }

        curdir()
        {
                pwd | sed "s/\/$(escape $HOME)/~/"
        }

        export PS1="\$USER@NetBSD \$(curdir)\$(prompt)"

        ;;
esac