#!/bin/sh

case $1 in
hack)
  vtwm.gamma &
  emacs -name Palantiri &
  sleep 3
  xterm -name Orb &  
  zstart
  xsetroot -solid black
  xload &
  fclock &
  xscreensaver
  ;;
tool)
  vtwm.gamma &
  emacs -name Palantiri &
  sleep 3
  xterm -name Orb &
  zstart $HOME/.Private/silent.zsubs
  xsetroot -solid black
  xload &
  fclock &
  xscreensaver
  ;;
sipb)
  vtwm.gamma &
  emacs -name Palantiri &
  sleep 3
  xterm -name Orb &
  zstart $HOME/.Private/quiet.zsubs
  xsetroot -solid black
  xload &
  fclock &
  xscreensaver
  ;;  
min)
  xterm -name Orb &
  zstart ~/.Private/silent.zsubs
  xsetroot -solid black
  xscreensaver
  ;;
inf)
  xhost inf.mit.edu
  xrdb $HOME/.resources
  rlogin inf -x
  ;;
black)
  nawm &
  emacs -rn Black &
  xterm -name Black &
  zstart $HOME/.Private/quiet.zsubs
  xsetroot -solid black
  ;;
"")
  echo "Try again, bonehead..."
  ;;
*)
  echo "Using default..."
  vtwm.gamma &
  emacs -name Palantiri &
  xterm -name Orb &
  zstart
  xscreensaver
  ;;
esac