#VRML V2.0 utf8

PROTO PlayerSocket [
  eventIn SFFloat set_path_time
  eventIn MFFloat set_position_path_keys
  eventIn MFFloat set_orientation_path_keys
  eventIn MFVec3f set_position_path_points
  eventIn MFRotation set_orientation_path_points

  eventIn SFBool bindViewpoint
  eventIn SFRotation set_rotation
  eventIn SFVec3f set_position
  eventIn SFVec3f set_scale
  eventIn MFNode addChildren
  eventIn MFNode set_children
  eventIn MFNode removeChildren
  eventOut MFNode children_changed
  eventIn MFNode addGeometry
  eventIn MFNode set_geometry
  eventIn MFNode removeGeometry
  eventOut SFBool bind_changed
  eventOut MFNode geometry_changed
  eventOut SFRotation rotation_changed
  eventOut SFVec3f position_changed
  eventIn SFInt32 set_choice
  eventOut SFBool socketReady 

] {
  Group {
    children [
      Viewpoint { 
          set_bind IS bindViewpoint
          set_position IS set_position
          set_orientation IS set_rotation
      }
      DEF P1 ProximitySensor {
        size 1000 1000 1000
        enabled FALSE
        position_changed IS position_changed
        orientation_changed IS rotation_changed
      },
      DEF T2 Transform {
        children [
          Group {
            children [
              Group {
                addChildren IS addChildren
                set_children IS set_children
                removeChildren IS removeChildren
                children_changed IS children_changed
              },
              Switch {
                choice [
                  DEF T1 Transform {
                    set_scale IS set_scale
                    addChildren IS addGeometry
                    set_children IS set_geometry
                    removeChildren IS removeGeometry
                    children_changed IS geometry_changed
                  }
                ]
                set_whichChoice IS set_choice
              }
            ]
          }
        ]
      }
   ]
  }
  DEF Route_Maker Script {
    mustEvaluate TRUE
    eventIn SFVec3f set_position IS set_position
    eventIn SFRotation set_rotation IS set_rotation
    eventIn SFBool set_running
    eventOut SFVec3f skip_position
    eventOut SFRotation skip_rotation
    eventOut SFTime start_time
    eventOut SFTime stop_time
    eventOut MFVec3f update_trail
    eventOut MFRotation update_spin
    eventOut SFBool running_changed
    eventOut SFBool socketReady IS socketReady 
    field SFBool running FALSE
    field SFBool jump TRUE
    field SFBool jumpS TRUE
    field SFVec3f last_position 0 0 0
    field SFRotation last_rotation 0 1 0 0
    url "javascript:
      function initialize() {
        print('PlayerSocket pre-init'); 
        socketReady=true;
        print('PlayerSocket route_maker initialize'); 
        update_trail[0]=last_position; update_trail[1]=last_position;
        update_spin[0]=last_rotation; update_spin[1]=last_rotation;
      }
      function shutdown() {
          print('PlayerSocket route_maker shutdown'); 
      } 
      function set_rotation(value, timestamp) {
        print('PlayerSocket route_maker set_rotation to ['+value[0]+','+value[1]+','+value[2]+','+value[3]+'] at '+timestamp);
        if (value==last_rotation) return;
        if (jumpS) {
          jumpS=false; last_rotation=value; skip_rotation=value;
          update_spin[0]=last_rotation; update_spin[1]=last_rotation;
          return;
        }
        update_spin[0]=last_rotation;
        update_spin[1]=value;
        if (!running) {
          running=true; running_changed=running;
          start_time=timestamp; stop_time=1+timestamp;
        }
        last_rotation=value;
      }
      function set_position(value, timestamp) {
        print('PlayerSocket route_maker set_position to ['+value[0]+','+value[1]+','+value[2]+'] at '+timestamp);
        if (value==last_position)
          return;
        if (jump) {
          skip_position=value; jump=false;last_position=value;
          update_trail[0]=last_position; update_trail[1]=last_position;
          return;
        }
        update_trail[0]=last_position;
        update_trail[1]=value;
        if (!running) {
          running=true;
          running_changed=running;
          start_time=timestamp;
          stop_time=timestamp+1;
        }
        last_position=value;
      }
      function set_running(value,timestamp) {
        running=value;
        running_changed=running;
        if (!value) {
          update_trail[1]=last_position; update_trail[0]=last_position;
          update_spin[1]=last_rotation; update_spin[0]=last_rotation;
          skip_position=last_position; skip_rotation=last_rotation;
        }
      }
    "
  },
  DEF TIMER TimeSensor {
    enabled TRUE
    startTime -1
    stopTime 0
    cycleInterval 1
  },
  DEF INTERP PositionInterpolator {
    key [0,1]
    keyValue [0 0 0, 0 0 0]
  }
  DEF INTERPS OrientationInterpolator {
    key [0,1]
    keyValue [0 1 0 0, 0 1 0 0]
  }
  ROUTE TIMER.isActive TO Route_Maker.set_running
  ROUTE Route_Maker.start_time TO TIMER.set_startTime
  ROUTE Route_Maker.stop_time TO TIMER.set_stopTime
  ROUTE Route_Maker.skip_position TO T2.set_translation
  ROUTE Route_Maker.skip_rotation TO T2.set_rotation
  ROUTE TIMER.fraction_changed TO INTERP.set_fraction
  ROUTE TIMER.fraction_changed TO INTERPS.set_fraction
  ROUTE Route_Maker.update_trail TO INTERP.set_keyValue
  ROUTE Route_Maker.update_spin TO INTERPS.set_keyValue
  # The next two routes really won't work unless the viewpoint is
  # DEF'd, since they really should go there instead.
  ROUTE INTERP.value_changed TO T2.set_translation
  ROUTE INTERPS.value_changed TO T2.set_rotation
  ROUTE P1.position_changed TO T2.set_translation
  ROUTE P1.orientation_changed TO T2.set_rotation
}
PlayerSocket {}