home *** CD-ROM | disk | FTP | other *** search
/ Jason Aller Floppy Collection / 179.img / WS6#18P5.LZH / IBMFEED.PS < prev    next >
Text File  |  1990-02-17  |  2KB  |  42 lines
  1.  
  2. %  .bn1 pull letter from upper tray on the IBM 4216.
  3. /ibmul {statusdict begin 2 setpapertray 
  4.     /letter true setupperpapersize false settrayswitch end
  5.     /pgsize 11 inch def} def
  6.  
  7. %  .bn2 pull letter from lower tray on the IBM 4216.
  8. /ibmll {statusdict begin 1 setpapertray 
  9.     /letter true setlowerpapersize false settrayswitch end
  10.     /pgsize 11 inch def} def
  11.  
  12. %  .bn3 pull legal from upper tray on the IBM 4216.
  13. /ibmulg {statusdict begin 2 setpapertray 
  14.     /legal true setupperpapersize false settrayswitch end
  15.     /pgsize 14 inch def} def
  16.  
  17. %  .bn4 pull legal from lower tray on the IBM 4216.
  18. /ibmllg {statusdict begin 1 setpapertray 
  19.     /legal true setlowerpapersize false settrayswitch end
  20.     /pgsize 14 inch def} def
  21.  
  22. %  .bn5 pull letter continuous on the IBM 4216.
  23. /ibmcl {statusdict begin 1 setpapertray 
  24.     /letter true setlowerpapersize 
  25.     /letter true setupperpapersize true settrayswitch end
  26.     /pgsize 11 inch def} def
  27.  
  28. %  .bn6 pull legal continuous on the IBM 4216.
  29. /ibmclg {statusdict begin 1 setpapertray 
  30.     /legal true setlowerpapersize 
  31.     /legal true setupperpapersize true settrayswitch end
  32.     /pgsize 14 inch def} def
  33.  
  34. %  .bn7 pull #10 envelope on the IBM 4216.
  35. /ibm10e {statusdict begin 3 setpapertray 
  36.     /4.125x9.5envelope true setenvelopesize false settrayswitch end
  37.     /pgsize 9.5 inch def} def
  38.  
  39. %  .bn8 pull euro envelope on the IBM 4216.
  40. /ibmeure {statusdict begin 3 setpapertray 
  41.     /102x229envelope true setenvelopesize false settrayswitch end} def
  42.