PROTO NetworkSFBool [
                       eventIn SFBool set_value
                       eventOut SFBool value_changed
                       eventIn SFBool value_fromnet
                       eventOut SFBool value_tonet
                       exposedField SFString tag       ""
                       exposedField SFBool   pilotOnly TRUE
                       field SFBool   localCopy TRUE
                       exposedField SFBool   echo      TRUE
                       exposedField SFBool   cont      FALSE
                      ]
  {
     Script {
        eventIn SFBool InSc IS set_value
        eventOut SFBool OutSc IS value_changed
        eventIn SFBool netInSc IS value_fromnet
        eventOut SFBool netOutSc IS value_tonet
        field SFBool local IS localCopy
  
        directOutput TRUE
        mustEvaluate TRUE
  
        url "javascript:
        function InSc(value) {
          netOutSc = value;
          if( local == true )
            OutSc = value;
        }
        function netInSc(value) {
          OutSc = value;
        }
      "
     }
  }