home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1996 February
/
PCWK0296.iso
/
sharewar
/
dos
/
program
/
gs300sr1
/
gs300sr1.exe
/
PS2EPSI
< prev
next >
Wrap
Text File
|
1994-07-27
|
859b
|
53 lines
#!/bin/sh
LOCALPATH=/usr/local/bin
PATH=/bin:/usr/bin:/usr/ucb\:$LOCALPATH\
export PATH outfile
if [ $# -lt 1 -o $# -gt 2 ]; then
echo "Usage: pstoepsi file.ps [file.epsi]" 1>&2
exit 1
fi
infile=$1
if [ $# -eq 1 ]
then
case "${infile}" in
*.ps) base=`basename ${infile} .ps` ;;
*.cps) base=`basename ${infile} .cps` ;;
*.eps) base=`basename ${infile} .eps` ;;
*.epsf) base=`basename ${infile} .epsf` ;;
*) base=`basename ${infile}` ;;
esac
outfile=${base}.epsi
else
outfile=$2
fi
gs -q -dNOPAUSE -dNODISPLAY ps2epsi.ps < ${infile} 1>&2
(
cat << BEGINEPS
/InitDictCount countdictstack def
gsave
save
mark
newpath
/showpage {} def
BEGINEPS
cat ${infile}
cat << ENDEPS
countdictstack InitDictCount sub { end } repeat
cleartomark
restore
grestore
ENDEPS
) >> ${outfile}
exit 0