PROTO monitor [
  exposedField SFVec3f translation 0 0 0
  exposedField SFVec3f scale 1 1 1
  eventIn MFString string 
  ]{
  
  
  Transform {
  translation IS translation
  scale IS scale
  children [
      Shape {
      appearance Appearance {
        material Material { diffuseColor 1 1 1 }
        }
      geometry Group { 
      children [ DEF text Text { string [ "click me!" ] } ]
      }
      }
      ]
  }
  
  
  
  Script {
  directOutput TRUE
  eventIn MFString string IS string
  field SFNode text USE text
  url "vrmlscript: 
  function string(value,time) { text.string = value; }
  "
  }## end script
  
  } ## end monitor