PROTO NetworkSFColor [
  eventIn SFColor set_value
  eventOut SFColor value_changed
  eventIn SFColor value_fromnet
  eventOut SFColor value_tonet
  exposedField SFString tag       ""
  exposedField SFBool   pilotOnly TRUE
  field SFBool   localCopy TRUE
  exposedField SFBool   echo      TRUE
  exposedField SFBool   cont      FALSE
]
{
  Script {
    eventIn SFColor InSc IS set_value
    eventOut SFColor OutSc IS value_changed
    eventIn SFColor netInSc IS value_fromnet
    eventOut SFColor 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;
      }
    "
  }
}