home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1995 August / NEBULA.bin / SourceCode / Palettes / Object / title.psw < prev   
Encoding:
Text File  |  1993-01-18  |  276 b   |  17 lines
  1. defineps PSWTitle(float xscale,yscale)
  2.  
  3. gsave
  4. xscale yscale scale
  5.  
  6. 108 132 translate
  7.  
  8. /Times-Italic findfont 80 scalefont setfont
  9. /printIt {0 0 moveto (SUM IT) show} def
  10. 22 0 translate
  11. .98 -.02 0 {setgray printIt -1 .5 translate} for
  12. 2 3 div setgray printIt 
  13.  
  14. grestore
  15.  
  16. endps
  17.