ref: 49d7ca8d92e5667f3e5ece4c6acbc1064701e2f8
dir: /sys/src/cmd/gs/lib/ps2ps.cmd/
/* $Id: ps2ps.cmd,v 1.3 2002/02/21 21:49:28 giles Exp $ */ /* * This file is maintained by a user: if you have any questions about it, * please contact Mark Hale (mark.hale@physics.org). */ /* "Distill" PostScript. */ parse arg params gs='@gsos2' if params='' then call usage options='-dNOPAUSE -dBATCH' /* extract options from command line */ i=1 param=word(params,i) do while substr(param,1,1)='-' options=options param i=i+1 param=word(params,i) end infile=param if infile='' then call usage outfile=word(params,i+1) if outfile='' then call usage gs '-q -sDEVICE=pswrite -sOutputFile='outfile options infile exit usage: say 'Usage: ps2ps ...switches... input.ps output.ps' exit