VRMLでオブジェクトを初期位置に戻したい

Question

前提

VRMLでセンサノードを使用したプログラムを作成しています。
TouchSensorを正常に動作させたいです。

実現したいこと

• VRML上でオブジェクト（太陽）をドラックで動かした後、TouchSensorを追加した「赤い球（ボタン）」をクリックすることでオブジェクトが初期位置に戻るようにしたい

発生している問題・エラーメッセージ

エラーが生じているわけではなさそうです。

libfreewrl version 4.0.0
openGL version 4.6.0 Compatibility Profile Context 22.20.02.220623
duktape javascript engine version 20000

該当のソースコード

#VRML V2.0 utf8

#ヘッドライトをオフにする．
NavigationInfo { headlight FALSE }

#点光源を追加（太陽位置）
PointLight { radius 80 }

#視点を追加する．
DEF VIEW Viewpoint{
    position 0 0 80
    description "default view"
}

#背景を追加する．
DEF BG Background {
    skyColor 0 0.25 0.5
}

#公転角Ry(θ)で回転させる．
DEF EARTH Transform {
    rotation 0 1 0 0
    children [

#半径rの円軌道上に移動させる．
        DEF EARTH_AXIS_TRANS Transform {
            translation 30 0 0
            children [

#地球と地軸を公転角θと反対角となるRy(-θ)で回転させる．
                DEF EARTH_BACKSPIN Transform{
                    rotation 0 1 0 0
                    children [

#地球と地軸をZ軸に-23.5度 = -0.41015237375[rad]回転させる．
                        DEF EARTH_TILT Transform {
                            rotation 0 0 1 -0.41015237375
                            children [

#地球と地軸を反時計回りに自転させる．
                                DEF EARTH_ROT Transform {
                                    rotation 0 1 0 0
                                    children [

#地球を追加する．
                                        DEF EARTH_OBJ Shape {
                                            appearance Appearance {
                                                material Material {
                                                    ambientIntensity 0.5
                                                    diffuseColor 1 1 1
                                                }
                                                texture ImageTexture {
                                                    url "----" 
                                                }
                                            }
                                            geometry Sphere { radius 3 }
                                        }
                                        
#地軸を追加する．
                                        DEF EARTH_AXIS_OBJ Shape {
                                            appearance Appearance {
                                                material Material {
                                                    ambientIntensity 0.5
                                                    diffuseColor 1 1 1
                                                }
                                            }
                                            geometry Cylinder {
                                                radius 0.05
                                                height 10
                                            }
                                        }
#月の公転 MOON
                                        DEF MOON Transform{
                                            rotation 0 1 0 0
                                            children[
#月を公転軌道上に移動 MOON_AXIS_TRANS
                                            DEF MOON_AXIS_TRANS Transform{
                                                translation 5 0 0 
                                                children[
#月の自転 MOON_ROT
                                                DEF MOON_ROT Transform{
                                                    rotation 0 1 0 0
                                                    children [
#月の追加 MOON_OBJ
                                                        DEF MOON_OBJ Shape{
                                                            appearance Appearance{
                                                                material Material{
                                                                    ambientIntensity 0.5
                                                                    diffuseColor 1 1 1
                                                                }
                                                                texture ImageTexture{
                                                                    url "-----"
                                                                }
                                                            }
                                                            geometry Sphere{
                                                                radius 0.8
                                                            }
                                                        }
                                                    ]
                                                }
                                                ]
                                            }
                                            ]
                                        }
                                    ]
                                }
                            ]
                        }
                    ]
                }
            ]
        }
    ]
}

#太陽を追加する．
DEF SUN_OBJ Transform {
    children[
        Shape {
            appearance Appearance {
                material Material {
                    ambientIntensity 0.8
                    emissiveColor 1 1 0
                }
            }
            geometry Sphere {
                radius 10
            }
        }
        DEF SUN_PS PlaneSensor {}
    ]
}
ROUTE SUN_PS.translation_changed TO SUN_OBJ.translation


# 赤い球
Transform {
    translation 0 -30 0
    children [
        Shape {
            appearance Appearance {
            material Material {
                diffuseColor 1 0 0 
            }
        }
        geometry Sphere {
            radius 1
        }
    }
    DEF Ball_ThS TouchSensor {}
    ]
}

# 位置リセットスクリプト
DEF Sc Script {
    eventIn SFTime reset
    eventOut SFVec3f resetPosition
    field SFVec3f initPos 0 0 0
    url "javascript:function reset (RES) {resetPosition = initPos;}"
}


ROUTE Ball_ThS.touchTime TO Sc.reset
ROUTE Sc.resetPosition TO SUN_OBJ.translation
ROUTE Sc.resetPosition TO SUN_PS.offset


#地球と地軸を反時計回りに自転させる．:タイマー
DEF EARTH_ROT_T TimeSensor {
    loop TRUE
    cycleInterval 10
}

#地球と地軸を反時計回りに自転させる．:キーフレーム毎の回転角
DEF ROTATION_ROT OrientationInterpolator {
    key [0, 0.25, 0.5, 0.75, 1 ]
    keyValue [
        0 1 0 0, 
        0 1 0 1.570796325, 
        0 1 0 3.14159265, 
        0 1 0 4.712388975, 
        0 1 0 6.2831853 ]     
}

#地球と地軸を公転角θと反対角となるRy(-θ)で回転させる．：タイマー
DEF EARTH_BACKSPIN_T TimeSensor {
    loop TRUE
    cycleInterval 20
}

#地球と地軸を公転角θと反対角となるRy(-θ)で回転させる．：キーフレーム毎の回転角
DEF EARTH_BACKSPIN_ROTATION OrientationInterpolator {
    key [0, 0.25, 0.5, 0.75, 1 ]
    keyValue [
        0 1 0 0,
        0 1 0 -1.570796325, 
        0 1 0 -3.14159265, 
        0 1 0 -4.712388975, 
        0 1 0 -6.2831853 ]
}

#公転角Ry(θ)で回転させる．：タイマー
DEF EARTH_T TimeSensor {
    loop TRUE
    cycleInterval 10
}

#公転角Ry(θ)で回転させる．：キーフレーム毎の回転角
DEF ROTATION OrientationInterpolator{
    key [0, 0.25, 0.5, 0.75, 1 ]
    keyValue [
        0 1 0 0, 
        0 1 0 1.570796325, 
        0 1 0 3.14159265, 
        0 1 0 4.712388975, 
        0 1 0 6.2831853 ]
}

#公転角Ry(θ)で回転させる．：タイマー
DEF MOON_T TimeSensor {
    loop TRUE
    cycleInterval 10
}

#公転角Ry(θ)で回転させる．：キーフレーム毎の回転角
DEF ROTATION2 OrientationInterpolator{
    key [0, 0.25, 0.5, 0.75, 1 ]
    keyValue [
        0 1 0 0, 
        0 1 0 1.570796325, 
        0 1 0 3.14159265, 
        0 1 0 4.712388975, 
        0 1 0 6.2831853 ]
}

#公転角Ry(θ)で回転させる．：タイマー
DEF MOON_ROT_T TimeSensor {
    loop TRUE
    cycleInterval 10
}

#公転角Ry(θ)で回転させる．：キーフレーム毎の回転角
DEF ROTATION2_ROT OrientationInterpolator{
    key [0, 0.25, 0.5, 0.75, 1 ]
    keyValue [
        0 1 0 0, 
        0 1 0 1.570796325, 
        0 1 0 3.14159265, 
        0 1 0 4.712388975, 
        0 1 0 6.2831853 ]
}

ROUTE EARTH_ROT_T.fraction_changed TO ROTATION_ROT.set_fraction
ROUTE ROTATION_ROT.value_changed TO EARTH_ROT.rotation

ROUTE EARTH_BACKSPIN_T.fraction_changed TO EARTH_BACKSPIN_ROTATION.set_fraction
ROUTE EARTH_BACKSPIN_ROTATION.value_changed TO EARTH_BACKSPIN.rotation

ROUTE EARTH_T.fraction_changed TO ROTATION.set_fraction
ROUTE ROTATION.value_changed TO EARTH.rotation

試したこと

下記のサイトを参考にコードを修正してみました。
サンプル集 - VRML with JavaScript Tutorial

補足情報

• プログラミング超初心者なので質問以前で何か問題がありましたら、ご指摘いただけますと幸いです。　
• 自身のブラウザに、VRML Viewer(freeWRL Launcher4.0)をインストールして動作確認をしています。

Answer 1

話の腰を折ってしまうかもしれませんが、VRML は現在推奨されていない古い技術となっています。
VRML はブラウザが WebGL に対応していなかった頃の技術で、昨今ではプラグインを用いた 3D 表示は推奨されていません。
three.js といったライブラリで VRML 自体を表示することは可能ですが VRML のイベントには対応していなかったと思います。
VRML の後継としては X3D という規格があります。
X3D を用いた場合の touchSensor の例がありましたのでご参考までに URL をご連携いたします。
X3DOM という JavaScript のライブラリがあり、こちらを用いると X3D 形式のデータおよびイベントを処理できるようです。

■ ボールをクリックしたらアニメーション
https://www.fit.ac.jp/~yamazawa/jikken3/touchSensor.htm
■ X3DOM.
https://github.com/x3dom/x3dom