36 lines · 724 B · Text
RawDownload
/* $Id: eps2eps.cmd,v 1.4 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" Encapsulated PostScript. */ parse arg params gs='@gsos2' if params='' then call usage options='-dNOPAUSE -dBATCH -dSAFER' /* extract options from command line */i=1param=word(params,i)do while substr(param,1,1)='-'	options=options param	i=i+1	param=word(params,i)end infile=paramif infile='' then call usageoutfile=word(params,i+1)if outfile='' then call usage gs '-q -sDEVICE=epswrite -sOutputFile='outfile options infileexit usage:say 'Usage: eps2eps ...switches... input.eps output.eps'exit