#VRML V2.0 utf8
Viewpoint {}
NavigationInfo {
type "EXAMINE"
}
# 赤円錐
DEF Cone-Tf Transform {
children [
Transform {
translation 3 0 0
children [
Shape {
appearance Appearance {
material Material {
diffuseColor 1 0 0
}
}
geometry Cone {
height 0.5
bottomRadius 0.2
}
}
]
}
]
}
# スライダー
Group {
children [
DEF Slider-Tf Transform {
translation 1 0 0
children [
Shape {
appearance Appearance {
material Material {
diffuseColor 0 0.8 0
}
}
geometry Sphere {
radius 0.2
}
}
]
}
Shape {
appearance Appearance {
material Material {
diffuseColor 0.5 0 0
}
}
geometry Box {
size 2 0.1 0.1
}
}
DEF Slider-PlS PlaneSensor {
minPosition -0.99 0
maxPosition 1 0
offset 1 0 0
}
DEF Slider-ThS TouchSensor {}
]
}
ROUTE Slider-PlS.translation_changed TO Slider-Tf.translation
# タイムセンサー
DEF TiS TimeSensor {
loop TRUE
cycleInterval 5
}
# 回転アニメ
DEF OI OrientationInterpolator {
key [ 0.0 0.25 0.5 0.75 1.0 ]
keyValue [
0 0 1 0
0 0 1 1.5708
0 0 1 3.1416
0 0 1 4.7124
0 0 1 6.2832
]
}
# スピード調整スクリプト
DEF Sc Script {
eventIn SFVec3f adjustSpeed
eventIn SFBool enableTimeSensor
eventOut SFTime cycleInterval
eventOut SFBool enabledTiS
url "javascript:
function adjustSpeed (vec) {
cycleInterval = 10 / ( vec.x + 1 );
}
function enableTimeSensor (active) {
enabledTiS = !active;
}
"
}
ROUTE Slider-PlS.translation_changed TO Sc.adjustSpeed
ROUTE Sc.cycleInterval TO TiS.cycleInterval
ROUTE Slider-ThS.isActive TO Sc.enableTimeSensor
ROUTE Sc.enabledTiS TO TiS.enabled
ROUTE TiS.fraction_changed TO OI.set_fraction
ROUTE OI.value_changed TO Cone-Tf.rotation