home *** CD-ROM | disk | FTP | other *** search
- {
- *
- * BRIDGE.DAT 10-16-91
- *
- * Written by: Jim Parker
- * jparker@baks.bell-atl.com
- *
- * DKBTrace scene description of a suspension bridge over water. Part of
- * a larger animation. Fairly simplistic so as not to slow down DKB too
- * much when I needed to generate a large number of frames.
- *
- * This file is released into the public domain and may be used or altered
- * by anyone as desired. I would appreciate it if any cool changes could
- * be sent to me.
- *
- }
-
- INCLUDE "colors.dat"
- INCLUDE "shapes.dat"
- INCLUDE "textures.dat"
-
- VIEW_POINT
- LOCATION <60.0 10 -300>
- UP <0.0 1.0 0.0>
- RIGHT <1.33333 0.0 0.0>
- {LOOK_AT <0.0 10.0 0.0>}
- END_VIEW_POINT
-
- { Light }
-
- OBJECT
- SPHERE <0.0 0.0 0.0> 2.0 END_SPHERE
- TRANSLATE <200.0 200.0 -150.0>
- TEXTURE
- COLOR White
- AMBIENT 1.0
- DIFFUSE 0.0
- END_TEXTURE
- LIGHT_SOURCE
- COLOR White
- END_OBJECT
-
- { Sky }
-
- OBJECT
- SPHERE <0.0 0.0 0.0> 500.0 END_SPHERE
- TEXTURE
- 0.05
- GRADIENT <0.0 1.0 0.0>
- COLOR_MAP [0.0 0.5 COLOR RED 0.9 GREEN 0.9 BLUE 0.0
- COLOR RED 0.85 GREEN 0.548039 BLUE 0.548039]
- [0.5 0.8 COLOR RED 0.85 GREEN 0.548039 BLUE 0.548039
- COLOR RED 0.85 GREEN 0.548039 BLUE 0.548039]
- [0.8 1.0 COLOR RED 0.85 GREEN 0.548039 BLUE 0.548039
- COLOR RED 0.9 GREEN 0.9 BLUE 0.0]
- END_COLOR_MAP
- SCALE <300.0 300.0 300.0>
- AMBIENT 0.7
- DIFFUSE 0.0
- END_TEXTURE
- COLOR RED 0.7 GREEN 0.3 BLUE 0.3
- END_OBJECT
-
- { Cloudly }
-
- OBJECT
- SPHERE <0.0 0.0 0.0> 489.0 END_SPHERE
-
- TEXTURE
- BOZO
- TURBULENCE 0.7
- COLOR_MAP
- [0.0 0.6 COLOR RED 1.0 GREEN 1.0 BLUE 1.0 ALPHA 1.0
- COLOR RED 1.0 GREEN 1.0 BLUE 1.0 ALPHA 1.0]
- [0.6 0.8 COLOR RED 1.0 GREEN 1.0 BLUE 1.0 ALPHA 1.0
- COLOR RED 1.0 GREEN 1.0 BLUE 1.0]
- [0.8 1.001 COLOR RED 1.0 GREEN 1.0 BLUE 1.0
- COLOR RED 0.8 GREEN 0.8 BLUE 0.8]
- END_COLOR_MAP
- SCALE <100.0 20.0 100.0>
- AMBIENT 0.7
- DIFFUSE 0.0
- END_TEXTURE
- COLOR RED 0.7 GREEN 0.7 BLUE 1.0
- END_OBJECT
-
- { Water }
-
- OBJECT
- PLANE <0.0 1.0 0.0> -10.0 END_PLANE
-
- TEXTURE
- COLOR Blue
- WAVES 0.05
- REFLECTION 0.8
- FREQUENCY 5000.0
- SCALE <3000.0 3000.0 3000.0>
- END_TEXTURE
- COLOR Blue
- END_OBJECT
-
- OBJECT
- PLANE <0.0 1.0 0.0> -11.0 END_PLANE
- TEXTURE
- 0.05
- COLOR Blue
- AMBIENT 1.0
- DIFFUSE 0.0
- END_TEXTURE
- COLOR Blue
- END_OBJECT
-
-
- { Here there be bridge }
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <3 100 2>
- TRANSLATE <97 18 -25>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <3 100 2>
- TRANSLATE <-97 18 -25>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <3 100 2>
- TRANSLATE <97 18 25>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <3 100 2>
- TRANSLATE <-97 18 25>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <500 2 27>
- TRANSLATE <0 30 0>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <3 3 27>
- TRANSLATE <97 116 0>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- Cube
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <3 3 27>
- TRANSLATE <-97 116 0>
- END_OBJECT
-
-
- { Begin support/cables }
-
- OBJECT
- INTERSECTION
- DIFFERENCE
- QUADRIC
- Cylinder_Z
- END_QUADRIC
- QUADRIC
- Cylinder_Z
- SCALE <0.95 0.95 1>
- END_QUADRIC
- END_DIFFERENCE
- PLANE <0 0 1> 0 INVERSE END_PLANE
- PLANE <0 0 1> 1 END_PLANE
- PLANE <0 1 0> 0 END_PLANE
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <100 60 5>
- TRANSLATE <0 100 -26>
- END_OBJECT
-
- OBJECT
- INTERSECTION
- DIFFERENCE
- QUADRIC
- Cylinder_Z
- END_QUADRIC
- QUADRIC
- Cylinder_Z
- SCALE <0.95 0.95 1>
- END_QUADRIC
- END_DIFFERENCE
- PLANE <0 0 1> 0 INVERSE END_PLANE
- PLANE <0 0 1> 1 END_PLANE
- PLANE <0 1 0> 0 END_PLANE
- END_INTERSECTION
- TEXTURE
- COLOR Brown
- END_TEXTURE
- SCALE <100 60 5>
- TRANSLATE <0 100 24>
- END_OBJECT
-
-
- { Cables }
-
-
- DECLARE Cable =
-
- OBJECT
- INTERSECTION
- QUADRIC Cylinder_Y END_QUADRIC
- PLANE <0 1 0> 10 END_PLANE
- PLANE <0 -1 0> 0 END_PLANE
- END_INTERSECTION
- TEXTURE
- COLOR White
- END_TEXTURE
- {COLOR SteelBlue}
- COLOR White
- SCALE <0.5 1 0.5>
- END_OBJECT
-
-
- { Closest cables }
-
- OBJECT
- Cable
- SCALE <1 4.3 1>
- TRANSLATE <-90 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3.9 1>
- TRANSLATE <-80 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3 1>
- TRANSLATE <-70 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2.5 1>
- TRANSLATE <-60 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2.1 1>
- TRANSLATE <-50 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.8 1>
- TRANSLATE <-40 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.6 1>
- TRANSLATE <-30 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <-20 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <-10 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.2 1>
- TRANSLATE <0 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <10 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <20 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.6 1>
- TRANSLATE <30 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.8 1>
- TRANSLATE <40 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2 1>
- TRANSLATE <50 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2.5 1>
- TRANSLATE <60 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3 1>
- TRANSLATE <70 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3.9 1>
- TRANSLATE <80 30 -25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 4.3 1>
- TRANSLATE <90 30 -25>
- END_OBJECT
-
-
-
- { Farthest Cables }
-
- OBJECT
- Cable
- SCALE <1 4.3 1>
- TRANSLATE <-90 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3.9 1>
- TRANSLATE <-80 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3 1>
- TRANSLATE <-70 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2.5 1>
- TRANSLATE <-60 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2.1 1>
- TRANSLATE <-50 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.8 1>
- TRANSLATE <-40 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.6 1>
- TRANSLATE <-30 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <-20 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <-10 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.2 1>
- TRANSLATE <0 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <10 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.3 1>
- TRANSLATE <20 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.6 1>
- TRANSLATE <30 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 1.8 1>
- TRANSLATE <40 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2 1>
- TRANSLATE <50 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 2.5 1>
- TRANSLATE <60 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3 1>
- TRANSLATE <70 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 3.9 1>
- TRANSLATE <80 30 25>
- END_OBJECT
-
-
- OBJECT
- Cable
- SCALE <1 4.3 1>
- TRANSLATE <90 30 25>
- END_OBJECT
-
-
-
-
-