home *** CD-ROM | disk | FTP | other *** search
/ Current Shareware 1994 January / SHAR194.ISO / graphuti / lparser2.zip / B6.POV < prev    next >
Text File  |  1993-10-13  |  16KB  |  338 lines
  1. // --- L-System Parser/Mutator --- Lj Lapre --- 
  2. // based on spiral00.ls
  3.  
  4. #include "colors.inc"
  5. #include "shapes.inc"
  6. #include "textures.inc"
  7.  
  8. #declare col_0  = colour red 1.0 green 1.0 blue 1.0
  9. #declare col_1  = colour red 0.8 green 0.498039 blue 0.196078
  10. #declare col_2  = colour red 1.0
  11. #declare col_3  = colour red 1.0 green 1.0
  12. #declare col_4  = colour green 1.0
  13. #declare col_5  = colour blue 1.0 green 1.0
  14. #declare col_6  = colour blue 1.0
  15. #declare col_7  = colour red 1.0 blue 1.0
  16.  
  17. camera {
  18.     location  <100, 100, 100>
  19.     direction <0, 0, 3.0>
  20.     look_at   <0, 0, 0>
  21. }
  22.  
  23. object { light_source { <200, 200, 100> color White } }
  24.  
  25. object {  
  26.         blob {
  27.         threshold 0.7
  28.         
  29.         component 1.0 4.7619 <0, 0, 0>
  30.         component 1.0 4.28571 <0, 4.7619, 0>
  31.         component 1.0 3.85714 <0, 8.98251, -0.744206>
  32.         component 1.0 3.47143 <0, 12.5835, -2.12648>
  33.         component 1.0 3.12428 <0, 15.4915, -4.02224>
  34.         component 1.0 2.81186 <0, 17.6457, -6.28513>
  35.         component 1.0 2.53067 <0, 19.0067, -8.74565>
  36.         component 1.0 2.2776 <0, 19.5693, -11.213>
  37.         component 1.0 2.04984 <0, 19.3759, -13.4824>
  38.         component 1.0 1.84486 <0, 18.5304, -15.3497>
  39.         component 1.0 1.66037 <0, 17.2079, -16.636>
  40.         component 1.0 1.49434 <0, 15.654, -17.2209>
  41.         component 1.0 1.3449 <0, 14.1661, -17.0826>
  42.         component 1.0 1.21041 <0, 13.049, -16.3336>
  43.         component 1.0 1.08937 <0, 12.5418, -15.2346>
  44.         component 1.0 0.980434 <0, 12.7263, -14.1609>
  45.         component 1.0 0.882391 <0, 13.4518, -13.5014>
  46.         component 1.0 0.794152 <0, 14.3341, -13.4937>
  47.         component 1.0 0.714736 <0, 14.8913, -14.0596>
  48.         component 1.0 4.7619 <0, 0, 0>
  49.         component 1.0 4.28571 <0, -4.7619, 4.16299e-007>
  50.         component 1.0 3.85714 <0, -8.98251, 0.744207>
  51.         component 1.0 3.47143 <0, -12.5835, 2.12648>
  52.         component 1.0 3.12429 <0, -15.4915, 4.02224>
  53.         component 1.0 2.81186 <0, -17.6457, 6.28513>
  54.         component 1.0 2.53067 <0, -19.0067, 8.74565>
  55.         component 1.0 2.2776 <0, -19.5693, 11.213>
  56.         component 1.0 2.04984 <0, -19.3759, 13.4824>
  57.         component 1.0 1.84486 <0, -18.5304, 15.3497>
  58.         component 1.0 1.66037 <0, -17.2079, 16.636>
  59.         component 1.0 1.49434 <0, -15.654, 17.2209>
  60.         component 1.0 1.3449 <0, -14.1661, 17.0826>
  61.         component 1.0 1.21041 <0, -13.049, 16.3336>
  62.         component 1.0 1.08937 <0, -12.5418, 15.2346>
  63.         component 1.0 0.980434 <0, -12.7263, 14.1609>
  64.         component 1.0 0.882391 <0, -13.4518, 13.5014>
  65.         component 1.0 0.794152 <0, -14.3341, 13.4937>
  66.         component 1.0 0.714736 <0, -14.8913, 14.0596>
  67.  
  68.         sturm
  69.         }
  70.  
  71.         finish { ambient 0.3 diffuse 0.7 phong 1 }
  72.     pigment { color col_2 }
  73. }
  74.  
  75. object {  
  76.         blob {
  77.         threshold 0.7
  78.         
  79.         component 1.0 4.7619 <0, 0, 0>
  80.         component 1.0 4.7619 <0, 4.7619, 0>
  81.         component 1.0 4.28571 <-0.826896, 9.45147, 4.49621e-008>
  82.         component 1.0 4.28571 <-2.2927, 13.4787, 1.24664e-007>
  83.         component 1.0 3.85714 <-4.5, 17.1523, 2.44686e-007>
  84.         component 1.0 3.85714 <-7.08093, 20.0187, 3.85023e-007>
  85.         component 1.0 3.47143 <-10.2054, 22.2804, 5.54913e-007>
  86.         component 1.0 3.47143 <-13.3816, 23.6813, 7.27619e-007>
  87.         component 1.0 3.12429 <-16.795, 24.3133, 9.13221e-007>
  88.         component 1.0 3.12428 <-19.9155, 24.1596, 1.0829e-006>
  89.         component 1.0 2.81186 <-22.8958, 23.2222, 1.24495e-006>
  90.         component 1.0 2.81186 <-25.2778, 21.7279, 1.37447e-006>
  91.         component 1.0 2.53067 <-27.1517, 19.6315, 1.47636e-006>
  92.         component 1.0 2.53067 <-28.2487, 17.3509, 1.53601e-006>
  93.         component 1.0 2.2776 <-28.5996, 14.8447, 1.55509e-006>
  94.         component 1.0 2.2776 <-28.2142, 12.5999, 1.53413e-006>
  95.         component 1.0 2.04984 <-27.102, 10.6123, 1.47366e-006>
  96.         component 1.0 2.04984 <-25.5616, 9.25993, 1.3899e-006>
  97.         component 1.0 1.84486 <-23.6335, 8.56401, 1.28506e-006>
  98.         component 1.0 1.84486 <-21.7893, 8.61518, 1.18479e-006>
  99.         component 1.0 1.66037 <-20.1196, 9.39978, 1.094e-006>
  100.         component 1.0 1.66037 <-19.0248, 10.6481, 1.03447e-006>
  101.         component 1.0 1.49434 <-18.5863, 12.2495, 1.01062e-006>
  102.         component 1.0 1.49434 <-18.8618, 13.7182, 1.0256e-006>
  103.         component 1.0 1.3449 <-19.8054, 14.877, 1.07691e-006>
  104.         component 1.0 1.3449 <-21.0495, 15.3876, 1.14456e-006>
  105.         component 1.0 1.21041 <-22.3776, 15.1756, 1.21677e-006>
  106.         component 1.0 1.21041 <-23.2987, 14.3903, 1.26686e-006>
  107.         component 1.0 1.08937 <-23.6124, 13.2212, 1.28391e-006>
  108.         component 1.0 1.08937 <-23.2488, 12.1943, 1.26414e-006>
  109.         component 1.0 0.980433 <-22.3303, 11.6086, 1.2142e-006>
  110.         component 1.0 0.980434 <-21.3543, 11.7017, 1.16113e-006>
  111.         component 1.0 0.88239 <-20.6884, 12.4214, 1.12492e-006>
  112.         component 1.0 0.88239 <-20.6729, 13.3036, 1.12408e-006>
  113.         component 1.0 0.794151 <-21.2963, 13.9282, 1.15797e-006>
  114.         component 1.0 0.794152 <-22.0903, 13.9158, 1.20115e-006>
  115.         component 1.0 0.714736 <-22.5853, 13.2948, 1.22807e-006>
  116.         component 1.0 0.714736 <-22.4369, 12.5956, 1.22e-006>
  117.         component 1.0 4.7619 <0, 0, 0>
  118.         component 1.0 4.7619 <0, -4.7619, 4.16299e-007>
  119.         component 1.0 4.28571 <-0.826896, -9.45147, 7.81311e-007>
  120.         component 1.0 4.28571 <-2.2927, -13.4787, 1.05368e-006>
  121.         component 1.0 3.85714 <-4.5, -17.1523, 1.25482e-006>
  122.         component 1.0 3.85714 <-7.08093, -20.0187, 1.36507e-006>
  123.         component 1.0 3.47143 <-10.2054, -22.2804, 1.3929e-006>
  124.         component 1.0 3.47143 <-13.3816, -23.6813, 1.34267e-006>
  125.         component 1.0 3.12429 <-16.795, -24.3133, 1.21232e-006>
  126.         component 1.0 3.12428 <-19.9155, -24.1596, 1.0292e-006>
  127.         component 1.0 2.81186 <-22.8958, -23.2222, 7.85195e-007>
  128.         component 1.0 2.81186 <-25.2778, -21.7279, 5.25042e-007>
  129.         component 1.0 2.53067 <-27.1517, -19.6315, 2.39874e-007>
  130.         component 1.0 2.53067 <-28.2487, -17.3509, -1.91458e-008>
  131.         component 1.0 2.2776 <-28.5996, -14.8447, -2.57331e-007>
  132.         component 1.0 2.2776 <-28.2142, -12.5999, -4.32614e-007>
  133.         component 1.0 2.04984 <-27.102, -10.6123, -5.45897e-007>
  134.         component 1.0 2.04984 <-25.5616, -9.25993, -5.80372e-007>
  135.         component 1.0 1.84486 <-23.6335, -8.56401, -5.36371e-007>
  136.         component 1.0 1.84486 <-21.7893, -8.61518, -4.31623e-007>
  137.         component 1.0 1.66037 <-20.1196, -9.39978, -2.72241e-007>
  138.         component 1.0 1.66037 <-19.0248, -10.6481, -1.03582e-007>
  139.         component 1.0 1.49434 <-18.5863, -12.2495, 6.02626e-008>
  140.         component 1.0 1.49434 <-18.8618, -13.7182, 1.73683e-007>
  141.         component 1.0 1.3449 <-19.8054, -14.877, 2.23682e-007>
  142.         component 1.0 1.3449 <-21.0495, -15.3876, 2.00671e-007>
  143.         component 1.0 1.21041 <-22.3776, -15.1756, 1.09922e-007>
  144.         component 1.0 1.21041 <-23.2987, -14.3903, -8.8173e-009>
  145.         component 1.0 1.08937 <-23.6124, -13.2212, -1.28078e-007>
  146.         component 1.0 1.08937 <-23.2488, -12.1943, -1.98079e-007>
  147.         component 1.0 0.980433 <-22.3303, -11.6086, -1.99341e-007>
  148.         component 1.0 0.980434 <-21.3543, -11.7017, -1.38131e-007>
  149.         component 1.0 0.88239 <-20.6884, -12.4214, -3.90125e-008>
  150.         component 1.0 0.88239 <-20.6729, -13.3036, 3.89584e-008>
  151.         component 1.0 0.794151 <-21.2963, -13.9282, 5.96643e-008>
  152.         component 1.0 0.794152 <-22.0903, -13.9158, 1.54044e-008>
  153.         component 1.0 0.714736 <-22.5853, -13.2948, -6.58008e-008>
  154.         component 1.0 0.714736 <-22.4369, -12.5956, -1.18854e-007>
  155.  
  156.         sturm
  157.         }
  158.  
  159.         finish { ambient 0.3 diffuse 0.7 phong 1 }
  160.     pigment { color col_3 }
  161. }
  162.  
  163. object {  
  164.         blob {
  165.         threshold 0.7
  166.         
  167.         component 1.0 4.7619 <0, 0, 0>
  168.         component 1.0 4.7619 <0, 4.7619, 0>
  169.         component 1.0 4.28571 <0.814334, 9.38022, 0.826896>
  170.         component 1.0 4.28571 <2.22446, 13.1568, 2.28156>
  171.         component 1.0 3.85714 <4.26545, 16.2544, 4.42787>
  172.         component 1.0 3.85714 <6.52226, 18.2285, 6.85428>
  173.         component 1.0 3.47143 <9.03296, 19.1455, 9.63512>
  174.         component 1.0 3.47143 <11.3054, 18.9481, 12.252>
  175.         component 1.0 3.12429 <13.3412, 17.6523, 14.7474>
  176.         component 1.0 3.12429 <14.7459, 15.6238, 16.6639>
  177.         component 1.0 2.81186 <15.487, 12.9027, 18.0084>
  178.         component 1.0 2.81186 <15.4483, 10.148, 18.5713>
  179.         component 1.0 2.53067 <14.6161, 7.46954, 18.3716>
  180.         component 1.0 2.53067 <13.2425, 5.5044, 17.5619>
  181.         component 1.0 2.2776 <11.3991, 4.37933, 16.2427>
  182.         component 1.0 2.2776 <9.5957, 4.31485, 14.8531>
  183.         component 1.0 2.04984 <7.98351, 5.30109, 13.582>
  184.         component 1.0 2.04984 <6.99315, 6.93651, 12.8428>
  185.         component 1.0 1.84486 <6.71327, 8.96628, 12.7833>
  186.         component 1.0 1.84486 <7.12229, 10.6551, 13.4031>
  187.         component 1.0 1.66037 <8.0656, 11.6735, 14.6182>
  188.         component 1.0 1.66037 <9.06215, 11.6926, 15.9461>
  189.         component 1.0 1.49434 <9.77994, 10.7386, 17.1>
  190.         component 1.0 1.49434 <9.85609, 9.34803, 17.6419>
  191.         component 1.0 1.3449 <9.20454, 8.01224, 17.4864>
  192.         component 1.0 1.3449 <8.16219, 7.43163, 16.8657>
  193.         component 1.0 1.21041 <7.09396, 7.8372, 16.1564>
  194.         component 1.0 1.21041 <6.55815, 8.89005, 15.8928>
  195.         component 1.0 1.08937 <6.70846, 10.0159, 16.311>
  196.         component 1.0 1.08937 <7.25889, 10.4225, 17.1586>
  197.         component 1.0 0.980433 <7.70257, 9.88726, 17.9973>
  198.         component 1.0 0.980434 <7.55694, 8.95752, 18.2723>
  199.         component 1.0 0.882391 <6.81444, 8.40372, 17.951>
  200.         component 1.0 0.882391 <6.09404, 8.7285, 17.5583>
  201.         component 1.0 0.794151 <5.90354, 9.58439, 17.6572>
  202.         component 1.0 0.794152 <6.21998, 9.97998, 18.2688>
  203.         component 1.0 0.714737 <6.43854, 9.51397, 18.8736>
  204.         component 1.0 0.714737 <6.07975, 8.8967, 18.9066>
  205.         component 1.0 4.7619 <0, 0, 0>
  206.         component 1.0 4.7619 <0, -4.7619, 4.16299e-007>
  207.         component 1.0 4.28571 <0.814334, -9.38022, -0.826895>
  208.         component 1.0 4.28571 <2.22446, -13.1568, -2.28156>
  209.         component 1.0 3.85714 <4.26545, -16.2544, -4.42787>
  210.         component 1.0 3.85714 <6.52226, -18.2285, -6.85428>
  211.         component 1.0 3.47143 <9.03296, -19.1455, -9.63511>
  212.         component 1.0 3.47143 <11.3054, -18.9481, -12.252>
  213.         component 1.0 3.12429 <13.3412, -17.6523, -14.7474>
  214.         component 1.0 3.12429 <14.7459, -15.6238, -16.6639>
  215.         component 1.0 2.81186 <15.487, -12.9027, -18.0084>
  216.         component 1.0 2.81186 <15.4483, -10.148, -18.5713>
  217.         component 1.0 2.53067 <14.6161, -7.46954, -18.3716>
  218.         component 1.0 2.53067 <13.2425, -5.5044, -17.5619>
  219.         component 1.0 2.2776 <11.3991, -4.37933, -16.2427>
  220.         component 1.0 2.2776 <9.5957, -4.31485, -14.8531>
  221.         component 1.0 2.04984 <7.98351, -5.30109, -13.582>
  222.         component 1.0 2.04984 <6.99314, -6.93651, -12.8428>
  223.         component 1.0 1.84486 <6.71327, -8.96628, -12.7833>
  224.         component 1.0 1.84486 <7.12229, -10.6551, -13.4031>
  225.         component 1.0 1.66037 <8.0656, -11.6735, -14.6182>
  226.         component 1.0 1.66037 <9.06215, -11.6926, -15.9461>
  227.         component 1.0 1.49434 <9.77994, -10.7386, -17.1>
  228.         component 1.0 1.49434 <9.85609, -9.34803, -17.6419>
  229.         component 1.0 1.3449 <9.20453, -8.01224, -17.4864>
  230.         component 1.0 1.3449 <8.16219, -7.43163, -16.8657>
  231.         component 1.0 1.21041 <7.09396, -7.83721, -16.1564>
  232.         component 1.0 1.21041 <6.55814, -8.89005, -15.8928>
  233.         component 1.0 1.08937 <6.70846, -10.0159, -16.311>
  234.         component 1.0 1.08937 <7.25889, -10.4225, -17.1586>
  235.         component 1.0 0.980434 <7.70256, -9.88726, -17.9973>
  236.         component 1.0 0.980434 <7.55694, -8.95752, -18.2723>
  237.         component 1.0 0.882391 <6.81444, -8.40372, -17.951>
  238.         component 1.0 0.882391 <6.09404, -8.7285, -17.5583>
  239.         component 1.0 0.794151 <5.90354, -9.58439, -17.6572>
  240.         component 1.0 0.794152 <6.21998, -9.97998, -18.2688>
  241.         component 1.0 0.714737 <6.43854, -9.51398, -18.8736>
  242.         component 1.0 0.714737 <6.07975, -8.8967, -18.9066>
  243.  
  244.         sturm
  245.         }
  246.  
  247.         finish { ambient 0.3 diffuse 0.7 phong 1 }
  248.     pigment { color col_4 }
  249. }
  250.  
  251. object {  
  252.         blob {
  253.         threshold 0.7
  254.  
  255.         component 1.0 4.7619 <0, 0, 0>
  256.         component 1.0 4.7619 <0, 4.7619, 0>
  257.         component 1.0 4.28571 <0.672926, 9.38022, -0.945551>
  258.         component 1.0 4.28572 <1.70531, 13.16, -2.68181>
  259.         component 1.0 3.85714 <2.94916, 16.2799, -5.3439>
  260.         component 1.0 3.85714 <4.00683, 18.3211, -8.44104>
  261.         component 1.0 3.47143 <4.705, 19.4175, -12.0726>
  262.         component 1.0 3.47143 <4.78498, 19.5566, -15.5403>
  263.         component 1.0 3.12428 <4.07605, 18.8975, -18.874>
  264.         component 1.0 3.12429 <2.66465, 17.8071, -21.4392>
  265.         component 1.0 2.81186 <0.460895, 16.521, -23.2421>
  266.         component 1.0 2.81186 <-2.05249, 15.5353, -24.0281>
  267.         component 1.0 2.53067 <-4.82945, 15.1119, -23.9025>
  268.         component 1.0 2.53067 <-7.21489, 15.4711, -23.1377>
  269.         component 1.0 2.2776 <-9.10342, 16.7338, -22.0227>
  270.         component 1.0 2.2776 <-10.1134, 18.5605, -21.1113>
  271.         component 1.0 2.04984 <-10.2991, 20.8018, -20.7507>
  272.         component 1.0 2.04984 <-9.86887, 22.7585, -21.1844>
  273.         component 1.0 1.84486 <-9.16978, 24.1761, -22.4895>
  274.         component 1.0 1.84486 <-8.72748, 24.6896, -24.2054>
  275.         component 1.0 1.66037 <-8.91335, 24.3747, -26.0137>
  276.         component 1.0 1.66037 <-9.79277, 23.6471, -27.2195>
  277.         component 1.0 1.49434 <-11.2763, 23.0055, -27.5992>
  278.         component 1.0 1.49434 <-12.7189, 22.9832, -27.2098>
  279.         component 1.0 1.3449 <-13.7255, 23.7995, -26.4659>
  280.         component 1.0 1.3449 <-13.9387, 25.0621, -26.0545>
  281.         component 1.0 1.21041 <-13.5311, 26.2922, -26.4144>
  282.         component 1.0 1.21041 <-13.0837, 26.8175, -27.4089>
  283.         component 1.0 1.08937 <-13.1615, 26.548, -28.5863>
  284.         component 1.0 1.08937 <-13.8848, 25.9779, -29.1682>
  285.         component 1.0 0.980433 <-14.9356, 25.7931, -28.9483>
  286.         component 1.0 0.980435 <-15.5454, 26.3264, -28.396>
  287.         component 1.0 0.88239 <-15.4436, 27.29, -28.246>
  288.         component 1.0 0.88239 <-15.0268, 27.8321, -28.8037>
  289.         component 1.0 0.794152 <-15.0009, 27.6247, -29.6609>
  290.         component 1.0 0.794151 <-15.5733, 27.1639, -29.9619>
  291.         component 1.0 0.714736 <-16.2656, 27.2196, -29.5768>
  292.         component 1.0 0.714737 <-16.3573, 27.8414, -29.2365>
  293.         component 1.0 4.7619 <0, 0, 0>
  294.         component 1.0 4.7619 <0, -4.7619, 4.16299e-007>
  295.         component 1.0 4.28571 <0.672926, -9.38022, 0.945552>
  296.         component 1.0 4.28571 <1.70531, -13.16, 2.68181>
  297.         component 1.0 3.85714 <2.94916, -16.2799, 5.3439>
  298.         component 1.0 3.85714 <4.00683, -18.3211, 8.44104>
  299.         component 1.0 3.47143 <4.705, -19.4175, 12.0726>
  300.         component 1.0 3.47143 <4.78498, -19.5566, 15.5403>
  301.         component 1.0 3.12428 <4.07605, -18.8975, 18.874>
  302.         component 1.0 3.12429 <2.66465, -17.8071, 21.4392>
  303.         component 1.0 2.81186 <0.460895, -16.521, 23.2421>
  304.         component 1.0 2.81186 <-2.05249, -15.5353, 24.0281>
  305.         component 1.0 2.53067 <-4.82945, -15.1119, 23.9025>
  306.         component 1.0 2.53067 <-7.21489, -15.4711, 23.1377>
  307.         component 1.0 2.2776 <-9.10342, -16.7338, 22.0227>
  308.         component 1.0 2.2776 <-10.1134, -18.5605, 21.1113>
  309.         component 1.0 2.04984 <-10.2991, -20.8018, 20.7507>
  310.         component 1.0 2.04984 <-9.86887, -22.7585, 21.1844>
  311.         component 1.0 1.84486 <-9.16978, -24.1761, 22.4895>
  312.         component 1.0 1.84486 <-8.72748, -24.6896, 24.2054>
  313.         component 1.0 1.66037 <-8.91335, -24.3747, 26.0137>
  314.         component 1.0 1.66037 <-9.79277, -23.6471, 27.2195>
  315.         component 1.0 1.49434 <-11.2763, -23.0055, 27.5992>
  316.         component 1.0 1.49434 <-12.7189, -22.9832, 27.2098>
  317.         component 1.0 1.3449 <-13.7255, -23.7995, 26.4659>
  318.         component 1.0 1.3449 <-13.9387, -25.0621, 26.0545>
  319.         component 1.0 1.21041 <-13.5311, -26.2922, 26.4144>
  320.         component 1.0 1.21041 <-13.0837, -26.8175, 27.4089>
  321.         component 1.0 1.08937 <-13.1615, -26.548, 28.5863>
  322.         component 1.0 1.08937 <-13.8848, -25.9779, 29.1682>
  323.         component 1.0 0.980433 <-14.9356, -25.7931, 28.9483>
  324.         component 1.0 0.980435 <-15.5454, -26.3264, 28.396>
  325.         component 1.0 0.88239 <-15.4436, -27.2899, 28.246>
  326.         component 1.0 0.88239 <-15.0268, -27.8321, 28.8037>
  327.         component 1.0 0.794152 <-15.0009, -27.6247, 29.6609>
  328.         component 1.0 0.794151 <-15.5733, -27.1639, 29.9619>
  329.         component 1.0 0.714737 <-16.2656, -27.2196, 29.5768>
  330.         component 1.0 0.714737 <-16.3573, -27.8414, 29.2365>
  331.  
  332.         sturm
  333.         }
  334.  
  335.         finish { ambient 0.3 diffuse 0.7 phong 1 }
  336.     pigment { color col_5 }
  337. }
  338.