monitor proto


  
  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 { corrected by: Willem van Willigen (vr0711)
      ## children [
      DEF text Text { string [ "click me!" ] }
      ## ] } see www.cs.vu.nl/~eliens/archive/avr/ch2-26.htm#2.6.3
      }
      ]
  }
  
  
  
  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