vr2-5-07.wrl
[ VRML source code ]
#VRML V2.0 utf8
#vr2-5-07.wrl
Shape {
appearance DEF Wood Appearance {
texture ImageTexture {
url "parli1.jpg"
}
}
geometry IndexedFaceSet {
coord DEF CrownPoint Coordinate {
point [
1 0 0,
0.1 0.1 0,
0 1 0,
-0.1 0.1 0,
-1 0 0,
-0.1 -0.1 0,
0 -1 0,
0.1 -0.1 0,
1 0 0
]
}
coordIndex [ 0, 1, 2, 3, 4, 5, 6, 7, 8 ]
solid FALSE
}
}
DEF Timer TimeSensor {
cycleInterval 4.0
loop TRUE
}
DEF Morph CoordinateInterpolator {
key [0.0, 0.5, 1.0]
keyValue [
#
1 0 0,
0.1 0.1 0,
0 1 0,
-0.1 0.1 0,
-1 0 0,
-0.1 -0.1 0,
0 -1 0,
0.1 -0.1 0,
1 0 0
#
1 0 0,
1 1 0,
0 1 0,
-1 1 0,
-1 0 0,
-1 -1 0,
0 -1 0,
1 -1 0,
1 0 0
#
1 0 0,
0.1 0.1 0,
0 1 0,
-0.1 0.1 0,
-1 0 0,
-0.1 -0.1 0,
0 -1 0,
0.1 -0.1 0,
1 0 0
]
}
ROUTE Timer.fraction_changed TO Morph.set_fraction
ROUTE Morph.value_changed TO CrownPoint.set_point