%V 0
%I bb Thu Sep 25 13:56:50 1980
%C original from Bell
a0
B=/usr/lib/style
echo " " $*
sflag=-s
lflag=
lcon=
rflag=
rcon=
mflag=-ms
mlflag=
eflag=
Pflag=
for i in $*
do case $i in
-r) rflag=-r; shift; rcon=$1;shift;continue;;
-l)lflag=-l; shift; lcon=$1;shift;continue;;
-mm) mflag=-mm;shift;continue;;
-ms) mflag=-ms;shift;continue;;
-ml) mlflag=-ml;shift;continue;;
-p) sflag=-p;shift;continue;;
-a) sflag=-a;shift;continue;;
-e) eflag=-e;shift;continue;;
-P) Pflag=-P;shift;continue;;
esac
done
deroff $mflag $mlflag $*^$B/style1^$B/style2^$B/style3 $rflag $rcon $lflag $lcon $sflag $eflag $Pflag
.
%E
%I bb Wed Dec 17 14:40:25 1980
%C converted for UTS
c1 5
name=$0
bin=/usr/lib/style
lflag=-s
.
c7 9
sflag=
pflag=
aflag=
.
c11 23
nflag=
wflag=
file=
ok=true

for arg
do
	if [ "$ok" ]; then
                case $arg in
                -l) lflag=-l; shift;;
                -r) rflag="-r $2"; ok=""; shift; shift;;
                -s) sflag="-s $2"; ok=""; shift; shift;;
                -p) pflag=-p; shift;;
                -a) aflag=-a; shift;;
                -e) eflag=-e; shift;;
                -n) nflag=-n; shift;;
                -w) wflag=-w; shift;;
                -*) echo 1>&2 $name: invalid \'$arg\' option; exit 1;;
                 *) file="$file $arg"; shift;;
                esac
	else
		ok=true
	fi
.
c25
/usr/lib/ss/fonts -x $file \
	| deroff $lflag \
	| $bin/style1 \
	| $bin/style2 \
	| $bin/style3 $rflag $sflag $pflag $eflag $nflag $aflag $wflag
.
%E
