media @ VU
[] readme course preface I 1 2 II 3 4 III 5 6 7 IV 8 9 10 V 11 12 afterthoughts appendix references examples resources _

talk show tell print

x-ball-1.vr

x-ball-1.vr (wrl ) [ flux / bitmanagement / cortona / octaga ]

bouncing ball (1)

object


  
  DEF OBJECT Transform {
  scale 0.5 0.5 0.5
  children [ 
  Shape  {
          geometry Sphere { radius 2 }
          appearance Appearance {
                  material DEF MATERIAL Material {
                          diffuseColor 1 0 0
                          }
                  }
  }
  ] }
  
  

sensor


  DEF TIME TimeSensor { loop TRUE cycleInterval 5 } #<l++>
  
  

script


  DEF SCRIPT Script {   
          directOutput TRUE
          field SFNode object USE OBJECT
          field SFNode material USE MATERIAL
          field SFFloat position 0
          field SFFloat color 0.5
          eventIn SFFloat set_fraction    
          url "javascript:
  

fraction


          function set_fraction(value) {  
                  if (value < 0.5) {
                          position += 0.1;
                          color = value;
                  } else {
                          position -= 0.1;
                          color = value;
                          }
                  object.translation.y = position;
                  material.diffuseColor = new SFColor(color,color,1);
                  }
                  "
          }#<l++>
  
  ROUTE TIME.fraction_changed TO SCRIPT.set_fraction
  
  

environment


  
  Viewpoint { position 0 0 20 }
  Background { skyColor 0.4 0.2 0.2 }
  
  


(C) A. Eliëns 21/5/2007

You may not copy or print any of this material without explicit permission of the author or the publisher.
In case of other copyright issues, contact the author.