home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ray Tracing Box
/
RAY_CD.mdf
/
raytrace
/
_pov_dat
/
bbugfi
/
bugfish.inc
< prev
next >
Wrap
Text File
|
1993-06-09
|
5KB
|
246 lines
#include "mycol.inc"
#include "leg.inc"
#include "wingtex.inc"
#declare BODY =
composite {
// ELLIPSOID
object {
quadric {
<1 1 1>
<0 0 0>
<0 0 0>
-1.0
scale <1 1 1>
scale <1 0.5 1>
rotate <0 90 0>
}
texture { BUGTEX }
}
// ELLIPSOID
object {
quadric {
<1 1 1>
<0 0 0>
<0 0 0>
-1.0
scale <1 1 1>
scale <0.8 0.3 0.8>
rotate <0 90 0>
translate <0 0.004338 1.44538>
}
texture { BUGTEX }
}
// ELLIPSOID
object {
quadric {
<1 1 1>
<0 0 0>
<0 0 0>
-1.0
scale <1 1 1>
scale <0.5 0.1 0.5>
rotate <0 90 0>
translate <0 0 2.5>
}
texture { BUGTEX }
}
// SPHERE
object {
sphere {<-0.475 0 -0.675> 0.35}
texture { BUGTEX }
}
// SPHERE
object {
sphere {<0.475 0 -0.675> 0.35}
texture { BUGTEX }
}
// CONE (beak)
object {
intersection {
intersection {Cone_Y
translate < 0 -1 0 >
}
scale <0.1 0.5 0.1>
scale <0.5 1.1 0.5>
rotate <220 0 0>
translate <0 -0.95 -1.25>
}
texture { color Red
phong 1.0 phong_size 200
ambient 0.1 diffuse 0.3 }
}
} // end BODY
#declare RIDGE =
composite {
object {
intersection { Disk_X }
scale < 0.01 0.25 0.25>
translate <0 0.5 0>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.25 0.25>
translate <0 0.45987 0.285714>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.25 0.25>
translate <0 0.390456 0.554622>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.25 0.25>
translate <0 0.286334 0.823528>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.25 0.25>
translate <0 0.251627 1.10924>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.2 0.2>
translate <0 0.286334 1.37815>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.19 0.19>
translate <0 0.286334 1.64706>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.175 0.175>
translate <0 0.251627 1.93277>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.15 0.15>
translate <0 0.112798 2.20168>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.2 0.2>
translate <0 0.494577 -0.252101>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.175 0.175>
translate <0 0.45987 -0.453782>
texture { BUGTEX }
}
object {
intersection { Disk_X }
scale <0.01 0.15 0.15>
translate <0 0.373102 -0.605042>
texture { BUGTEX }
}
} // end RIDGE
#declare EYES =
composite {
// SPHERE
object {
sphere {<-0.450 -0.05 -.95> 0.12}
texture { color Green phong_size 200 phong 1.0 specular 1.0 roughness 0.001}
}
object {
sphere {<-0.450 -0.05 -1.0> 0.06}
texture { color Black phong_size 200 phong 1.0 specular 1.0 roughness 0.001}
}
// SPHERE
object {
sphere {<0.450 -0.05 -.95> 0.12}
texture { color Green phong_size 200 phong 1.0 specular 1.0 roughness 0.001}
}
object {
sphere {<0.450 -0.05 -1.0> 0.06}
texture { color Black phong_size 200 phong 1.0 specular 1.0 roughness 0.001}
}
} // end composite EYES
#declare WING =
composite {
object {
intersection {
intersection {
quadric { Cylinder_Y texture { color Gray50 } }
plane { <0 1 0> -1 inverse }
plane { <0 1 0> 1 }
}
}
bounded_by { box { <-1 -1 -1> <1 1 1> } }
scale <1.5 0.01 1.0>
translate <1.95 .3 0>
rotate <0 0 12>
translate <0 0 .4>
texture { WINGTEX }
}
object {
intersection {
intersection {
quadric { Cylinder_Y texture { color Gray50 } }
plane { <0 1 0> -1 inverse }
plane { <0 1 0> 1 }
}
}
bounded_by { box { <-1 -1 -1> <1 1 1> } }
scale <1.5 0.01 1.0>
translate <1.95 .3 0>
rotate <0 0 10>
translate <0 0 -.4>
texture { WINGTEX }
}
} // end WING
#declare BUGFISH =
composite {
composite { BODY }
composite { RIDGE }
composite { RIDGE rotate <0 0 12> translate <-0.1 0 0> }
composite { RIDGE rotate <0 0 -12> translate <0.1 0 0> }
composite { EYES }
composite { WING }
composite { WING rotate <0 180 0> }
composite { LEG scale <.2 .2 .2> rotate <0 20 0> translate <0 -.3 0> }
composite { LEG scale <.2 .2 .2> translate <0 -.3 .15> }
composite { LEG scale <.2 .2 .2> rotate <0 -20 0> translate <0 -.3 .3> }
composite { LEG scale <.2 .2 .2> rotate <0 160 0> translate <0 -.3 0> }
composite { LEG scale <.2 .2 .2> rotate <0 180 0> translate <0 -.3 .15> }
composite { LEG scale <.2 .2 .2> rotate <0 200 0> translate <0 -.3 .3> }
bounded_by { box { <-7 -10 -5> <7 5 5> } }
} // end BUGFISH
composite { BUGFISH rotate <0 30 0> translate <-48.5 294.0 -620> }