Vrmlscript Debugging

#VRML V2.0 utf8

Shape {
      appearance Appearance { material Material {} }
      geometry Sphere {}
}

DEF SCRIPT Script {
   eventIn SFVec3f position
   eventOut MFString debugText 
   url "vrmlscript:

function position(value) {
   x = Math.round(value[0] * 10) / 10;
   y = Math.round(value[1] * 10) / 10;
   z = Math.round(value[2] * 10) / 10;
   debugText[0] = 'pos: (' + x + ', ' + y + ', ' + z + ')';
}"

}


DEF NEAR ProximitySensor { size 1000 1000 1000 }

DEF TT Transform {
   children Transform {
      translation -.1 .1 -.3
      scale .02 .02 .02
      children Shape {
	 geometry DEF DEBUG Text { }
      }
   }
}

ROUTE NEAR.position_changed TO TT.translation
ROUTE NEAR.orientation_changed TO TT.rotation
ROUTE NEAR.position_changed TO SCRIPT.position
ROUTE SCRIPT.debugText TO DEBUG.string


mrl