home *** CD-ROM | disk | FTP | other *** search
/ Freelog 41 / Freelog041.iso / PDF / gs704w32.exe / gs7.04 / lib / pdf2ps.cmd < prev    next >
OS/2 REXX Batch file  |  2002-01-31  |  860b  |  42 lines
  1. /* $Id: pdf2ps.cmd,v 1.2 2001/02/03 18:31:12 alexcher Exp $ */
  2. /*
  3.  * This file is maintained by a user: if you have any questions about it,
  4.  * please contact Mark Hale (mark.hale@physics.org).
  5.  */
  6.  
  7. /* Convert PDF to PostScript. */
  8.  
  9. parse arg params
  10.  
  11. gs='@gsos2'
  12. inext='.pdf'
  13. outext='.ps'
  14.  
  15. if params='' then call usage
  16.  
  17. options='-dNOPAUSE -dBATCH -dSAFER -sDEVICE=pswrite'
  18.  
  19. /* extract options from command line */
  20. i=1
  21. param=word(params,i)
  22. do while substr(param,1,1)='-'
  23.     options=options param
  24.     i=i+1
  25.     param=word(params,i)
  26. end
  27.  
  28. infile=param
  29. if infile='' then call usage
  30. outfile=word(params,i+1)
  31. if outfile='' then do
  32.     outfile=infile''outext
  33.     infile=infile''inext
  34. end
  35.  
  36. gs '-q -sOutputFile='outfile options infile
  37. exit
  38.  
  39. usage:
  40. say 'Usage: pdf2ps [-dASCII85DecodePages=false] [-dLanguageLevel=n] input[.pdf output.ps]'
  41. exit
  42.