3085l1100664 1061 330 434 6661061711 10140 0ustar mlrljedit#VRML V2.0 utf8 Transform { translation 0 1 0 children [ Shape { appearance Appearance { material Material { diffuseColor 0.8 0 0 } } geometry Sphere { radius 0.5 } } ] } 3085l2100664 1061 330 1416 6661061730 10163 0ustar mlrljedit#VRML V2.0 utf8 # Define a PROTOtype: # A Thing with a given center and color PROTO Thing [ field SFVec3f center 0 0 0 field SFColor color 0.8 0 0 field SFNode thing NULL ] { Transform { translation IS center children [ Shape { appearance Appearance { material Material { diffuseColor IS color } } geometry IS thing } ] } } # Use the PROTOtype for displaying various things Thing { # Small red box at origin thing Box { size 0.5 0.5 0.5 } } Thing { # Red sphere at 1.5 meters up from origin center 0 1.5 0 thing Sphere { } } Thing { # Blue cone at 1 meter right from origin center 1 0 0 color 0 0 0.8 g thing Cone { } } 3085l3100664 1061 330 474 6661061741 10151 0ustar mlrljedit#VRML V2.0 utf8 Shape { appearance DEF APP Appearance { material Material { diffuseColor 0.8 0 0 } } geometry Box { } } Transform { translation 0 2 0 children [ Shape { appearance USE APP geometry Sphere { radius 0.5 } } ] } 3085l4100664 1061 330 651 6661061754 10153 0ustar mlrljedit#VRML V2.0 utf8 DEF TS TimeSensor { g cycleInterval 2.5 } DEF CI ColorInterpolator { key [0 0.33 0.67 1] keyValue [1 1 1, 1 0 0, 0 0 1, 1 1 1] } Group { children [ DEF BUTTON TouchSensor { } Shape { ggeometry Box { } gappearance Appearance { material DEF MAT Material { } } } ] } ROUTE BUTTON.touchTime TO TS.startTime ROUTE TS.fraction_changed TO CI.set_fraction ROUTE CI.value_changed TO MAT.diffuseColor 3085l5100664 1061 330 1531 6661062021 10156 0ustar mlrljeditDEF SCR Script { eventIn SFFloat set_fraction field SFInt32 curchoice 0 eventOut SFInt32 choice url "javascript: function set_fraction(val,time) { if(val < 0.6 && curchoice == 0) { choice = 1; curchoice = 1; } else if(val >= 0.6 && curchoice == 1) { choice = 0; curchoice = 0; } } " } g DEF BUTTON TouchSensor { } DEF SW Switch { gchoice [ Shape { geometry Box { } appearance Appearance { material DEF MAT Material { } } } Shape { geometry Sphere { radius 0.5 } appearance Appearance { material Material { diffuseColor 0 0 0.8 } } } g] } ROUTE TS.fraction_changed TO SCR.set_fraction ROUTE SCR.choice TO SW.whichChoice