Xref: utzoo rec.humor:45644 alt.sources:2597
Path: utzoo!utgpu!cs.utexas.edu!yale!think.com!sdd.hp.com!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!linac!att!cbnewse!danj1
From: Dan_Jacobson@ATT.COM
Newsgroups: rec.humor,alt.sources
Subject: nasty-shell [Re: Joke Shell]
Message-ID: <DANJ1.90Nov18013022@cbnewse.ATT.COM>
Date: 18 Nov 90 07:30:31 GMT
References: <Nov.17.23.53.47.1990.10116@romulus.rutgers.edu>
Sender: danj1@cbnewse.att.com (Dan Jacobson)
Reply-To: danj1@ihlpa.att.com
Followup-To: rec.humor,alt.sources.d
Organization: AT&T-BL, Naperville IL, USA
Lines: 46
In-Reply-To: deen@romulus.rutgers.edu's message of 18 Nov 90 04:53:49 GMT

Arcive-name: nasty-shell

[I don't read rec.humor, so will miss all the excitement.]

>>>>> On 18 Nov 90 04:53 GMT, deen@romulus.rutgers.edu (Cinnamon Raisin) said:
Cinnamon> 	Has anyone created any sort of joke shell for Unix.

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then feed it
# into a shell via "sh file" or similar.  To overwrite existing files,
# type "sh file -c".
# The tool that generated this appeared in the comp.sources.unix newsgroup;
# send mail to comp-sources-unix@uunet.uu.net if you want that tool.
# Contents:  nasty-shell
# Wrapped by danj1@ihlpa on Sun Nov 18 01:29:18 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
echo If this archive is complete, you will see the following message:
echo '          "shar: End of archive."'
if test -f 'nasty-shell' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'nasty-shell'\"
else
  echo shar: Extracting \"'nasty-shell'\" \(603 characters\)
  sed "s/^X//" >'nasty-shell' <<'END_OF_FILE'
X: #nasty-shell, totally prejudiced towards SYS V UNIX,  Dan_Jacobson@ATT.COM
Xusage="$0"; test $# -gt 0 && { echo $0: usage $usage; exit 1;}
Xx='1>&2 echo "\nThank you for using $0.  Deposit 25 cents please, then
X	hit <RETURN> \c"; read y' 
Xvideo_on=`tput blink`; test -z "$video_on" && video_on=`tput smso`
Xvideo_off=`tput rmso` #no tput rmblink
Xprompt_message=\
X"NASTY-Shell Version 0.0, Copyright (c)1989 Dan Jacobson, DanCo Corporation"
XPS1="$video_on$prompt_message>$video_off " sh -i #ksh doesn't show all
X						 #my beautiful prompt
Xeval $x
Xtput rs1; tput rs2; tput rs3 #fix up the bloody terminal
END_OF_FILE
  if test 603 -ne `wc -c <'nasty-shell'`; then
    echo shar: \"'nasty-shell'\" unpacked with wrong size!
  fi
  chmod +x 'nasty-shell'
  # end of 'nasty-shell'
fi
echo shar: End of archive.
exit 0
-- 
Dan_Jacobson@ATT.COM  Naperville IL USA  +1 708-979-6364