home *** CD-ROM | disk | FTP | other *** search
- // Polyray include file: PEDESTAL.INC
- // by Rob McGregor
- //
- // A marble pedestal for the statue of Venus to sit upon...
-
- static define pedestal
- object {
- // TORUS
- object {
- torus 0.4, 0.125, <0.0, 0.0, 0.0>, <0.0, 1.0, 0.0>
- scale <0.9, 0.5, 0.9>
- translate <0.0, 0.7, 0.0>
- }
- +
- // DISC
- object {
- disc <0.0, 0.0, 0.0>, <0.0, 1.0, 0.0>, 0.01 , 0.4
- translate <0.0, 0.75, 0.0>
- }
- +
- // RAW DATA
- object {
- object {
- polygon 3,
- <0.4, 0.7, 0.0>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.7, -0.2351>,
- <0.4, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.4, 0.0, 0.0>,
- <0.4, 0.7, 0.0>,
- <0.3236, 0.7, -0.2351>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.0, -0.2351>,
- <0.4, 0.0, 0.0>,
- <0.3236, 0.7, -0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.4, 0.0, 0.0>,
- <0.3236, 0.0, -0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <0.3236, 0.0, -0.2351>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.7, -0.2351>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.7, -0.3804>,
- <0.3236, 0.7, -0.2351>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.0, -0.2351>,
- <0.3236, 0.7, -0.2351>,
- <0.1236, 0.7, -0.3804>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.0, -0.3804>,
- <0.3236, 0.0, -0.2351>,
- <0.1236, 0.7, -0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.3236, 0.0, -0.2351>,
- <0.1236, 0.0, -0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <0.1236, 0.0, -0.3804>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.7, -0.3804>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.7, -0.3804>,
- <0.1236, 0.7, -0.3804>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.0, -0.3804>,
- <0.1236, 0.7, -0.3804>,
- <-0.1236, 0.7, -0.3804>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.0, -0.3804>,
- <0.1236, 0.0, -0.3804>,
- <-0.1236, 0.7, -0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.1236, 0.0, -0.3804>,
- <-0.1236, 0.0, -0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <-0.1236, 0.0, -0.3804>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.7, -0.3804>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.7, -0.2351>,
- <-0.1236, 0.7, -0.3804>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.0, -0.3804>,
- <-0.1236, 0.7, -0.3804>,
- <-0.3236, 0.7, -0.2351>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.0, -0.2351>,
- <-0.1236, 0.0, -0.3804>,
- <-0.3236, 0.7, -0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <-0.1236, 0.0, -0.3804>,
- <-0.3236, 0.0, -0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <-0.3236, 0.0, -0.2351>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.7, -0.2351>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.4, 0.7, 0.0>,
- <-0.3236, 0.7, -0.2351>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.0, -0.2351>,
- <-0.3236, 0.7, -0.2351>,
- <-0.4, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.4, 0.0, 0.0>,
- <-0.3236, 0.0, -0.2351>,
- <-0.4, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <-0.3236, 0.0, -0.2351>,
- <-0.4, 0.0, 0.0>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <-0.4, 0.0, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.4, 0.7, 0.0>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.7, 0.2351>,
- <-0.4, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.4, 0.0, 0.0>,
- <-0.4, 0.7, 0.0>,
- <-0.3236, 0.7, 0.2351>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.0, 0.2351>,
- <-0.4, 0.0, 0.0>,
- <-0.3236, 0.7, 0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <-0.4, 0.0, 0.0>,
- <-0.3236, 0.0, 0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <-0.3236, 0.0, 0.2351>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.7, 0.2351>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.7, 0.3804>,
- <-0.3236, 0.7, 0.2351>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.3236, 0.0, 0.2351>,
- <-0.3236, 0.7, 0.2351>,
- <-0.1236, 0.7, 0.3804>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.0, 0.3804>,
- <-0.3236, 0.0, 0.2351>,
- <-0.1236, 0.7, 0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <-0.3236, 0.0, 0.2351>,
- <-0.1236, 0.0, 0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <-0.1236, 0.0, 0.3804>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.7, 0.3804>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.7, 0.3804>,
- <-0.1236, 0.7, 0.3804>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <-0.1236, 0.0, 0.3804>,
- <-0.1236, 0.7, 0.3804>,
- <0.1236, 0.7, 0.3804>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.0, 0.3804>,
- <-0.1236, 0.0, 0.3804>,
- <0.1236, 0.7, 0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <-0.1236, 0.0, 0.3804>,
- <0.1236, 0.0, 0.3804>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <0.1236, 0.0, 0.3804>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.7, 0.3804>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.7, 0.2351>,
- <0.1236, 0.7, 0.3804>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.1236, 0.0, 0.3804>,
- <0.1236, 0.7, 0.3804>,
- <0.3236, 0.7, 0.2351>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.0, 0.2351>,
- <0.1236, 0.0, 0.3804>,
- <0.3236, 0.7, 0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.1236, 0.0, 0.3804>,
- <0.3236, 0.0, 0.2351>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <0.3236, 0.0, 0.2351>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.7, 0.2351>,
- <0.0, 0.7, 0.0>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.4, 0.7, 0.0>,
- <0.3236, 0.7, 0.2351>,
- <0.0, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.3236, 0.0, 0.2351>,
- <0.3236, 0.7, 0.2351>,
- <0.4, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.4, 0.0, 0.0>,
- <0.3236, 0.0, 0.2351>,
- <0.4, 0.7, 0.0>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.3236, 0.0, 0.2351>,
- <0.4, 0.0, 0.0>
- }
- +
- object {
- polygon 3,
- <0.0, 0.0, 0.0>,
- <0.0, 0.0, 0.0>,
- <0.4, 0.0, 0.0>
- }}}
-
- static define real_marble
- texture {
- special surface {
- color cylindrical_imagemap(image("c:\raab\bmp\imagemap\stone\tanmarbl.tga"), P, 10)
- //ambient 0.1
- //diffuse 0.6
- //specular white, 0.6
- //microfacet Cook 7
- }
- }
-