home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Programme_zum_Heft / Anwendungen / Kurztests / PostScript / PsIntrp / a-box < prev    next >
Text File  |  1987-09-06  |  346b  |  24 lines
  1.  
  2. save
  3.  
  4. /A { /simplex findfont 100 scalefont setfont
  5.      300 100 moveto
  6.      (A) true charpath
  7.      stroke
  8.    } def
  9.  
  10. /B { 100 100 moveto
  11.      100 200 lineto
  12.      200 200 lineto
  13.      200 100 lineto
  14.      closepath
  15.      stroke
  16.    } def
  17.  
  18.  2 pencolor 18 setlinewidth  B  A
  19.  1 pencolor  8 setlinewidth  B  A
  20.  3 pencolor  4 setlinewidth  B  A
  21.  
  22. restore
  23.  
  24.