Return to Rays.eps CVS log

Up to [NeXTSTEP 3.3 examples] / Examples / PostScript

Annotation of Examples/PostScript/Rays.eps, revision 1.1

1.1     ! root        1: %!PS-Adobe-2.0 EPSF-2.0
        !             2: %%Title: Rectangle.eps
        !             3: %%Creator: Adobe Systems Inc
        !             4: %%CreationDate: Tue Aug 14 10:37:05 1990
        !             5: %%Pages: 0 1
        !             6: %%BoundingBox: 4 1 465 135 
        !             7: %%DocumentFonts: Times-BoldItalic
        !             8: %%EndComments
        !             9: % Modified from a program on pg 103 of  Adobe's 
        !            10: % PostScript Language and Cookbook ("The Blue Book")
        !            11: 
        !            12: /Times-BoldItalic findfont 180 scalefont setfont
        !            13: 
        !            14: /rays 
        !            15: {0 1 179 
        !            16:  {gsave rotate 0 0 moveto 500 0 lineto stroke grestore}
        !            17:  for
        !            18: } def
        !            19: 
        !            20: 15 10 translate
        !            21: 1 setlinewidth 0 setgray
        !            22: 
        !            23: newpath 0 0 moveto (NeXT) true charpath 
        !            24: gsave 2 setlinewidth stroke grestore   % outline the word 
        !            25: clip newpath 150 -10 translate rays    % draw rays clipped to the outline
        !            26: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.