Transforming Sound

#VRML V2.0 utf8

DEF MOVEME Transform {
   children [
      Shape { 
	 appearance DEF APP Appearance { material Material {} }
	 geometry Sphere {}
      }
      Sound {
	 maxFront 100
	 maxBack 100
	 source AudioClip {
	    url [ "doh.wav" ]
	    loop TRUE
	 }
      }
     ]
}

DEF TIMER1 TimeSensor { 
   cycleInterval 12
   loop TRUE
}

DEF MOVER PositionInterpolator {
   key [ 0 .5 1 ]
   keyValue [ 0 0 -100,  0 0 8, 0 0 -100 ]
}

ROUTE TIMER1.fraction_changed TO MOVER.set_fraction
ROUTE MOVER.value_changed TO MOVEME.translation


mrl