#VRML V2.0 utf8 WorldInfo { title "永恒" info [ "Author: 金臂螳螂", "Date: March 1, 1998 (Sun)" ] } NavigationInfo { type "EXAMINE" } Background { groundAngle [0.523, 1.047, 1.571] groundColor [0 0 0, 0 0 1, 0 0 1, 0 1 1] skyAngle [0.523, 1.047, 1.571] skyColor [1 1 1, 1 1 1, 0 1 1, 0 1 1] } Group { children [ DEF EntryView Viewpoint { #此虚拟实境亦规定了进入,内外三个视点。 fieldOfView 1.57 orientation 1 0 0 0.79 position 0.0 -7.0 10.0 description "EntryView" }, DEF Outside Viewpoint { position 0 0 40 description "Outside" }, DEF Inside Viewpoint { position 0 0 6 description "Inside" } ] } Group { children [ DEF Lee Transform { children Shape { appearance Appearance { material Material { emissiveColor 1.0 0.5 0.0 } texture ImageTexture {url "stand.gif"} #粘贴图案为李小龙。 } geometry Box {size 3 3 3} #立方体 }, }, DEF Lee Transform { children Shape { appearance Appearance { material Material { emissiveColor 1.0 0.5 0.0 transparency 0.8 #颜色及透明的协调形成一雾状球网。 } } geometry Sphere {radius 10} #圆球 }, }, DEF Long Transform { translation 4.0 0.0 0.0 center -4.0 0.0 0.0 children [ Shape { appearance Appearance { material Material { diffuseColor 0.0 0.0 1.0 specularColor 0.9 0.9 0.9 shininess 0.3 } texture ImageTexture {url "reptile.gif"} #粘贴图案为龙。 } geometry Sphere { radius 0.5 } #球A,绕立方体(李小龙)旋转。 }, DEF Snake Transform { translation 1.0 0.0 0.0 center -1.0 0.0 0.0 children Shape { appearance Appearance { material Material { diffuseColor 0.7 0.7 0.7 shininess 1.3 } } geometry Sphere {radius 0.2} #球B,绕球A旋转。 } } ] }, DEF Bruce TimeSensor { cycleInterval 8.0 loop TRUE }, DEF Reptile TimeSensor { cycleInterval 5.0 loop TRUE }, DEF Serpent TimeSensor { cycleInterval 2.0 loop TRUE }, DEF LeePath OrientationInterpolator { key [ 0.0, 0.50, 1.0 ] keyValue [ 0.0 0.0 1.0 0.0, 0.0 0.0 1.0 3.14, 0.0 0.0 1.0 6.28 ] }, DEF LongPath OrientationInterpolator { key [ 0.0, 0.50, 1.0 ] keyValue [ 0.0 0.0 1.0 0.0, 0.0 0.0 1.0 3.14, 0.0 0.0 1.0 6.28 ] }, DEF SnakePath OrientationInterpolator { key [ 0.0, 0.50, 1.0 ] keyValue [ 0.0 0.0 1.0 0.0, 0.0 0.0 1.0 3.14, 0.0 0.0 1.0 6.28 ] } ] } ROUTE Bruce.fraction_changed TO LeePath.set_fraction ROUTE Reptile.fraction_changed TO LongPath.set_fraction ROUTE Serpent.fraction_changed TO SnakePath.set_fraction ROUTE LeePath.value_changed TO Lee.set_rotation ROUTE LongPath.value_changed TO Long.set_rotation ROUTE SnakePath.value_changed TO Snake.set_rotation #以上事件的设计教为复杂,不再赘述。提纲掣领,慢慢推求,自然明澈。 #不过一点数理,又有何难? #学而不知数理,犹如宝镜微尘,世上六艺乱纷纷,数乃人之根本。 #聪明蒙童易得,愚昧皓首难成,漫同高士细评论,算成无差分寸。