home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 077.lha / Postscript / Examples / rotate-box < prev    next >
Text File  |  1986-11-20  |  236b  |  24 lines
  1.  
  2. 3 pencolor
  3. 2 penmode
  4. save
  5.  
  6. /b {-10 -10  moveto
  7.     -10  10  lineto
  8.      10  10  lineto
  9.      10 -10  lineto
  10.     -10 -10  lineto
  11. } def
  12.  
  13. 400 200 translate
  14.  
  15. 20 { b
  16.      fill
  17.      5 rotate
  18.      1.1 1.1 scale
  19.    } repeat
  20.  
  21. restore
  22. 0 penmode
  23.  
  24.