#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 [
Transform {
translation 0.2 0 0
children [
DEF Pause-Sp Shape {
appearance Appearance {
material Material {
diffuseColor 0 0.2 0.8
}
}
geometry Box {
size 0.2 0.7 0.05
}
}
]
}
Transform {
translation -0.2 0 0
children [
USE Pause-Sp
]
}
DEF Pause-ThS TouchSensor {}
]
}
# タイムセンサー
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 SFTime pause
field SFNode TiS USE TiS
directOutput TRUE
url "javascript:
function pause () {
TiS.enabled = !TiS.enabled;
}
"
}
ROUTE Pause-ThS.touchTime TO Sc.pause
ROUTE TiS.fraction_changed TO OI.set_fraction
ROUTE OI.value_changed TO Cone-Tf.rotation