%!PS-Adobe-2.0 %%Title: Green Book Listing 4-2, on page 60. %%Creator: "extract" program %%CreationDate: Mon May 9 09:50:06 PDT 1988 %%EndComments % --- cut here --- %!PS-Adobe-2.0 %%Title: simple line printer emulator /buff 5000 string def /leftmargin 72 def /topmargin 72 def /bottom 72 def /top 792 topmargin sub def /ptsize 10 def /lead 10 def /EOLchar (\n) def % line feed /F { findfont exch scalefont setfont } bind def /newline { %def currentpoint exch pop lead sub dup bottom lt { %if showpage pop top } if leftmargin exch moveto } bind def /emulate { %def { %loop currentfile buff readstring exch EOLchar { %loop (innermost) search { %ifelse show newline }{ %else show exit } ifelse } loop not { %if readstring found EOF exit } if } loop showpage leftmargin top moveto } bind def %%EndProlog %%BeginSetup ptsize /Courier F leftmargin top moveto %%EndSetup emulate I wasted time, and now doth time waste me; For now hath time made me his numbering clock; My thoughts are minutes. - William Shakespeare
file: /Techref/language/PS/emulate-txt.pl.htm, 1KB, , updated: 2003/9/4 12:19, local time: 2024/11/26 14:57,
18.190.160.6:LOG IN
|
©2024 These pages are served without commercial sponsorship. (No popup ads, etc...).Bandwidth abuse increases hosting cost forcing sponsorship or shutdown. This server aggressively defends against automated copying for any reason including offline viewing, duplication, etc... Please respect this requirement and DO NOT RIP THIS SITE. Questions? <A HREF="http://sxlist.com/Techref/language/PS/emulate-txt.pl.htm"> language PS emulate-txt</A> |
Did you find what you needed? |
Welcome to sxlist.com!sales, advertizing, & kind contributors just like you! Please don't rip/copy (here's why Copies of the site on CD are available at minimal cost. |
Welcome to sxlist.com! |
.