home *** CD-ROM | disk | FTP | other *** search
/ OneVision 3.03 / OneVision3.03.iso / Apps / OneVision.app / ShapeElement.1Vmod / Shapes / AK_Star.shape < prev    next >
Encoding:
Text File  |  1996-11-12  |  444 b   |  19 lines
  1. "AK_1" = "int:3:50:6";
  2. "AK_2" = "float:0:1:0.5";
  3. "Closepath" = "YES";
  4. "shape" = "
  5. {width height scale 0.5 0.5 translate 0.5 0.5 scale 
  6.  /Spitzen AK_1 def
  7.  /Innenradius AK_2 def
  8.  Spitzen 1000 le
  9.   {/Spitzen Spitzen def}
  10.   {/Spitzen 1000 def} ifelse
  11.  Spitzen 1 gt
  12.   {/Spitzen Spitzen def}
  13.   {/Spitzen 1 def} ifelse
  14. 1 0 moveto
  15.  false
  16.  Spitzen 2 mul 1 sub {360 Spitzen 2 mul div rotate {false 1} {true Innenradius} ifelse 0 lineto} repeat
  17.  pop
  18. }";
  19.