home *** CD-ROM | disk | FTP | other *** search
/ OneVision 3.03 / OneVision3.03.iso / Apps / OneVision.app / ShapeElement.1Vmod / Shapes / AC_Rounded-Triangle.shape < prev    next >
Encoding:
Text File  |  1996-11-12  |  429 b   |  13 lines
  1. "AC_1" = "float:0:1:0.2";
  2. "Closepath" = "YES";
  3. "shape" = "
  4. { /Eckenradius AC_1 def
  5.  /Eckenradius Eckenradius width 2 div height 2 div 2 copy gt {exch} if pop mul def
  6.  Eckenradius 0 gt
  7.  {width 2 div 0 moveto width 0 width 2 div height Eckenradius arct width 2 div height 0 0 Eckenradius arct
  8.   0 0 width 0 Eckenradius arct
  9.  width 2 div 0 lineto}
  10.  {0 0 moveto width 0 rlineto width 2 div neg height rlineto 0 0 lineto}
  11.  ifelse
  12. }";
  13.