media @ VU
vrml-math-FCCcp.vr
vrml-math-FCCcp.vr
(wrl
)
[ flux /
bitmanagement /
cortona /
octaga
]
NavigationInfo{ type "EXAMINE" }
Viewpoint{ position 0 0 10 description "[100]"}
Viewpoint{ position 7 0 7 orientation 0 1 0 .785 description "[110]"}
Viewpoint{ position 5.8 5.8 5.8 orientation -1 1 0 .955 description "[111]"}
PROTO My[ field SFVec3f trans 0 0 0] {
Transform{ translation IS trans
children[
Shape{
appearance Appearance{
material Material{ diffuseColor 1 1 0 transparency .35}}
geometry Sphere{ radius .75}}]}
}
Background{ skyColor 0 0 0.75 }
DEF Clock TimeSensor { cycleInterval 10}
DEF Animation OrientationInterpolator {
key [ 0, 1 ]
keyValue [ 1 1 1 0, 1 1 1 2.08 ]}
DEF XForm Transform{ scale 1.5 1.5 1.5
children[
My{ trans 1 1 1} My{ trans 1 -1 1} My{ trans 1 -1 -1}
My{ trans 1 1 -1} My{ trans -1 1 1} My{ trans -1 -1 1}
My{ trans -1 -1 -1} My{ trans -1 1 -1}
My{ trans 1 0 0} My{ trans 0 1 0} My{ trans 0 0 1}
My{ trans -1 0 0} My{ trans 0 -1 0} My{ trans 0 0 -1}
Shape{ appearance Appearance{ material Material{ emissiveColor 1 1 1}}
geometry IndexedLineSet{ coord Coordinate{ point[
1 1 1, 1 -1 1, 1 -1 -1, 1 1 -1, -1 1 1, -1 -1 1, -1 -1 -1, -1 1 -1]}
coordIndex[0 1 2 3 0 2 -1 4 5 6 7 4 6 -1
7 0 4 3 -1 4 1 5 0 -1 5 2 6 1 -1 6 3 7 2 -1 1 3 -1 5 7]}}
DEF Touch TouchSensor{}
]
}
ROUTE Touch.touchTime TO Clock.startTime
ROUTE Clock.fraction_changed TO Animation.set_fraction
ROUTE Animation.value_changed TO XForm.rotation
(C) A. Eliëns
2/9/2007
You may not copy or print any of this material without explicit permission of the author or the publisher.
In case of other copyright issues, contact the author.