File: fern.inc

package info (click to toggle)
terraform 0.9.0-2
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 5,008 kB
  • ctags: 2,529
  • sloc: ansic: 28,422; sh: 3,336; pascal: 1,896; makefile: 710; yacc: 318
file content (39 lines) | stat: -rw-r--r-- 956 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
/*****************************************************************************
 This taken from: 
    The Genesis Toolkit is freeware and copyright by Joerg Schrammel
      <http://www.rhein-ruhr.de/~schrammel/index.htm>
 ****************************************************************************/


#local FB = triangle{ <-0.125,0,0>,<0,0.5,0>,<0.125,0,0>
 texture{
  pigment{
     image_map{
       gif "fern.gif"
       interpolate 2.0
       filter 0 1.0
       filter 3 0.5
       filter 8 0.5
     }
     translate<0.5,0,0>
     scale<0.2,0.5,0.5>
  }
 }
 hollow
}

#declare FernObj = object {
 union{
  object{FB rotate<20,0,0>rotate<0,70,0>}
  object{FB rotate<20,0,0>rotate<0,20,0>}
  object{FB rotate<20,0,0>rotate<0,-50,0>}
  object{FB rotate<50,0,0>rotate<0,170,0>}
  object{FB rotate<50,0,0>rotate<0,120,0>}
  object{FB rotate<50,0,0>rotate<0,-150,0>}
 }
}

#macro fern () 
  object { FernObj } 
#end