home *** CD-ROM | disk | FTP | other *** search
/ Mega Top 1 / os2_top1.zip / os2_top1 / APPS / TEKST / DVIDVI / A5BOOKLE.BAT next >
DOS Batch File  |  1992-01-20  |  2KB  |  50 lines
  1. @echo off
  2. REM Given a DVI file, this command file carries out some of the steps
  3. REM needed to produce an A5 booklet suitable for folding and stapling.
  4. REM It is assumed the user has set up a page format suitable for A5 paper.
  5. REM The fancy pagination is done by Tom Rokicki's DVIDVI program.
  6. REM Note that 148mm = A5 width = half A4 height.
  7. REM
  8. REM We assume that the following symbols have been defined:
  9. REM a5booklet :== @disk$utils:[utilities.tex.dvidvi]a5booklet
  10. REM dvidvi    :== $disk$utils:[utilities.tex.dvidvi]dvidvi
  11. REM
  12. if not %1 == "" goto :file_given
  13. echo.
  14. echo.
  15. echo Usage:  a5booklet file[.dvi]
  16. echo.
  17. go to :exit
  18.  
  19. :file_given
  20. dvidvi -m 4:-1,2(148mm,0mm) %1 part1
  21. dvidvi -m 4:-3,0(148mm,0mm) %1 part2
  22. REM
  23. REM Now explain how to preview or PSPRINT the new DVI files.
  24. REM
  25. echo.
  26. echo.
  27. echo PART1.DVI and PART2.DVI have been created; each part contains the pages that
  28. echo must be printed on the same side of the paper.  In both parts, each A4 page
  29. echo contains two side-by-side A5 pages from your original document.
  30. echo.
  31. echo To preview these DVI files you need to tell DVISCR to display each page
  32. echo in a landscaped orientation; for example:
  33. echo.
  34. echo      $ dviscr part1
  35. echo.
  36. echo To create an A5 booklet suitable for folding and stapling, carry out the
  37. echo following steps (assuming you are using a LaserWriter):
  38. echo. 
  39. echo   1. $ psprint /land /nobanner /notify part1
  40. echo   2. When this job has finished, take the output and put it back into
  41. echo      the input cassette without changing the orientation in any way.
  42. echo   3. $ psprint /land part2
  43. echo   4. Depending on the number of pages, the final output may not be collated.
  44. echo      You may need to change the placement of the bottom sheet(s).
  45. echo.
  46. echo.
  47.  
  48. :exit
  49.  
  50.