#VRML V2.0 utf8

# Prototype of a text message
PROTO TEXT [
  eventIn MFString set_message
  field MFString message "Value=0"
  exposedField SFColor color 0 1 0
  exposedField SFVec3f translation 0 0 0
] 
{
  Transform {
    translation IS translation
    children  Shape {
      geometry DEF THESTRING Text { 
  	  string IS message
	  fontStyle FontStyle { family "SANS" size 0.3 }
      }
      appearance Appearance { material Material { diffuseColor IS color }}
    }
  }

  DEF MS Script {
    eventIn MFString set_message IS set_message
    field SFNode message USE THESTRING
    url "javascript:
 	function set_message(value) {
        message.set_string = value;
	}
	"
  }
}

TEXT { message ["Hello World"] }