Screen saver?

[Larry Dighera]

In article <1990Jul13.211826.27338 at msuinfo.cl.msu.edu> jhl at kira.msu.edu (John Lawitzke) writes:
>Does anyone know of any console screen savers for SCO Xenix 386?

# Xenix screen dump
#
# Copyright Dighera Data Services Mon Aug  7 13:35:03 PDT 1989


DMP_FIL="screen.out"
export DMP_FIL

# getopt
count="1"
for i
do
	count="`expr $count + 1`"
	case $i in
		-f) DMP_FIL=`eval "(echo $"$count")"` ;
			break ;;
		*)echo "Usage: $0 [-f dumpfile]" 1>&2;
			exit 1;;
	esac
done

# doit
savtty="`stty -g`"
stty -echo ixon ixoff -ixany
echo '\033[2i'
head -24 | sed 's/ $//' >> "$DMP_DIR$DMP_FIL"
stty "$savtty"
-- 
USPS: The Consultants' Exchange, PO Box 12100, Santa Ana, CA  92712
TELE: (714) 842-6348: BBS (N81); (714) 842-5851: Xenix guest account (E71)
UUCP: conexch Any ACU 2400 17148425851 ogin:-""-ogin:-""-ogin: nuucp
UUCP: ...!uunet!spsd!conexch!root || ...!ccicpg!conexch!root