fail () { echo 2>&1 "$0: $1"; exit 1; }
-test $# = 2 || fail "usage: $0 VC SCRIPT"
+test $# -ge 2 || fail "usage: $0 VC SCRIPT [ARGS]"
vc="$1"
script="$2"
+shift; shift
cd "$(dirname $0)"
test -L .tclshrc || fail "no .tclshrc symlink"
test -x "./$script" || fail "script not executable"
-openvt -f -c "$vc" -w -- screen ./"$script"
+openvt -f -c "$vc" -w -- screen ./"$script" "$@"