home *** CD-ROM | disk | FTP | other *** search
/ OneVision 3.03 / OneVision3.03.iso / Apps / OneVision.app / ShapeElement.1Vmod / Shapes / AR_Grid.shape < prev    next >
Encoding:
Text File  |  1996-11-12  |  341 b   |  24 lines
  1. "AR_1" = "int:0:100:3";
  2. "AR_2" = "int:0:100:2";
  3. "Closepath" = "NO";
  4. "shape" = "
  5. {width height scale
  6.  /Zeilen AR_1 def
  7.  /Spalten AR_2 def
  8. 0 0 moveto
  9. Spalten 0 gt
  10. {0 1 Spalten
  11. {
  12.   Spalten div 1 exch sub 0 moveto
  13.   0 1 rlineto
  14. } for}
  15. {} ifelse
  16. Zeilen 0 gt
  17. {0 1 Zeilen
  18. {
  19.   Zeilen div 1 exch sub 1 exch moveto
  20.   -1 0 rlineto
  21. } for}
  22. {} ifelse
  23.  
  24. }";