home *** CD-ROM | disk | FTP | other *** search
/ gdead.berkeley.edu / gdead.berkeley.edu.tar / gdead.berkeley.edu / pub / gdead / tape-labels / audio-tape-setup-NeXT < prev    next >
Text File  |  1993-06-18  |  1KB  |  27 lines
  1. #!/bin/csh -f
  2. #%%       alias tape_prolog awk '/^%.PS/,/^%%BeginDoc//^%%EndDoc/,/^%%EndPro/'
  3. #%%       alias tape_trailer awk '/^%%Trailer/,/^--eof--\$/'
  4. #%%       setenv TAPEPS ~/ps/audio-tape.ps
  5. #%%       alias catapes '(tape_prolog $TAPEPS;cat \!*; tape_trailer $TAPEPS)'
  6. #%%       alias printapes '(catapes \!*) | lpr'
  7. #
  8. #%%   'tape_prolog' and 'tape_trailer' are 'awk' programs that will extract
  9. #%%   the important part of this file.  TAPEPS is a variable that points at 
  10. #%%   the place your copy of the file is.  'catapes' takes one or more files 
  11. #%%   as arguments, and splices their contents in with the PostScript code at
  12. #%%   the appropriate place.  
  13. #%%
  14. #%%   With the above aliases, the command "printapes tape1 tape2 tape3" will
  15. #%%   concatentate the PostScript code defined in this file, the definitions
  16. #%%   of your labels (which presumably are the contents of the files "tape1,"
  17. #%%   "tape2," and "tape3"), and the necessary trailer together, and hand that
  18. #%%   as input to "lpr" (or whatever command it is that you use for printing).
  19. # now our locally-modified lines: (open calls the Postscript previewer)
  20. alias tape_prolog awk '/^%.PS/,/^%%BeginDoc//^%%EndDoc/,/^%%EndPro/'
  21. alias tape_trailer awk '/^%%Trailer/,/^--eof--\$/'
  22. setenv TAPEPS ./audio-tape-123.ps
  23. alias catapes '(tape_prolog $TAPEPS;cat \!*; tape_trailer $TAPEPS)'
  24. alias printapes '(catapes \!*) | lpr'
  25. alias pvtapes '(catapes \!*) | open'
  26. alias pvtapes2 '(catapes \!*) > /tmp/tapes.ps ; open /tmp/tapes.ps'
  27.