# =======================
# Multiplayer Quirks
# =======================
MPjoin = func(n) {
  #print(n.getValue(), " added");
  setprop("instrumentation/radar",n.getValue(),"radar/y-shift",0);
  setprop("instrumentation/radar",n.getValue(),"radar/x-shift",0);
  setprop("instrumentation/radar",n.getValue(),"radar/rotation",0);
  setprop("instrumentation/radar",n.getValue(),"radar/in-range",0);
  setprop("instrumentation/radar",n.getValue(),"radar/h-offset",180);
  setprop("instrumentation/radar",n.getValue(),"joined",1);
}

MPleave= func(n) {
  #print(n.getValue(), " removed");
  setprop("instrumentation/radar",n.getValue(),"radar/in-range",0);
  setprop("instrumentation/radar",n.getValue(),"joined",0);
}

#need to copy the properties so that we never try to access a non-existent property in XML
MPradarProperties = func {
  targetList= props.globals.getNode("ai/models/").getChildren("multiplayer");

  foreach (d; props.globals.getNode("ai/models/").getChildren("aircraft")) {
    append(targetList,d);
  }

  foreach (m; targetList) {
    var string = "instrumentation/radar/ai/models/"~m.getName()~"["~m.getIndex()~"]/";
    if (getprop(string,"joined")==1 or m.getName()=="aircraft") {
      var factor = getprop("instrumentation/radar/range-factor");
      if (factor != nil ) {
        setprop(string,"radar/y-shift",m.getNode("radar/y-shift").getValue() * factor);
        setprop(string,"radar/x-shift",m.getNode("radar/x-shift").getValue() * factor);
      }
      setprop(string,"radar/rotation",m.getNode("radar/rotation").getValue());
      setprop(string,"radar/h-offset",m.getNode("radar/h-offset").getValue());

      if (getprop("instrumentation/radar/selected")==2){
        if (getprop(string~"radar/x-shift") < -0.04 or
          getprop(string~"radar/x-shift") > 0.04) {
          setprop(string,"radar/in-range",0);
        } else {
          setprop(string,"radar/in-range",m.getNode("radar/in-range").getValue());
        }
      } else {
        setprop(string,"radar/in-range",m.getNode("radar/in-range").getValue());
      }
    }
  }

  # this is a good place to deal with the range scaling factors
  if (getprop("instrumentation/radar/selected")==2) {
    if (getprop("instrumentation/radar/range")==10) {
      setprop("instrumentation/radar/range",20);
      setprop("instrumentation/radar/range-factor",0.002);
    } elsif (getprop("instrumentation/radar/range")==20) {
      setprop("instrumentation/radar/range-factor",0.003246);
    } else { #40
      setprop("instrumentation/radar/range-factor",0.001623);
    }
  } elsif (getprop("instrumentation/radar/selected")==3 or getprop("instrumentation/radar/selected")==4) {
    if (getprop("instrumentation/radar/range")==40) {
      setprop("instrumentation/radar/range",20);
      setprop("instrumentation/radar/range-factor",0.001888);
    } elsif (getprop("instrumentation/radar/range")==20) {
      setprop("instrumentation/radar/range-factor",0.001888);
    } else { #10
      setprop("instrumentation/radar/range-factor",0.003776);
    }
  }
  settimer(MPradarProperties,0.05);
}

# ===================
# Boresight Detecting
# ===================
locking=0;
found=-1;

boreSightLock = func {
  if (getprop("instrumentation/radar/selected") == 1) {
    targetList= props.globals.getNode("ai/models/").getChildren("multiplayer");

    foreach (d; props.globals.getNode("ai/models/").getChildren("aircraft")) {
      append(targetList,d);
    }

    foreach (m; targetList) {
      var string = "instrumentation/radar/ai/models/"~m.getName()~"["~m.getIndex()~"]";
      var string1 = "ai/models/"~m.getName()~"["~m.getIndex()~"]";
      if (getprop(string1~"radar/in-range")) {

        hOffset = getprop(string1~"radar/h-offset");
        vOffset = getprop(string1~"radar/v-offset");

        #really should be a cone, but is a square pyramid to avoid trigonemetry
        if(hOffset < 3 and hOffset > -3 and vOffset < 3 and vOffset > -3) {
          if (locking == 11) {
            setprop(string~"radar/boreLock",2);
            setprop("instrumentation/radar/lock",2);
            setprop("sim[0]/hud/current-color",1);
            locking -= 1;
          } elsif (locking ==1 or locking ==3 or locking ==5 or locking ==7 or locking ==9 ) {
            setprop("instrumentation/radar/lock",1);
            setprop(string1~"radar/boreLock",1);
          } else {
            setprop("instrumentation/radar/lock",0);
            setprop(string~"radar/boreLock",1);
          }

          if (found != m.getIndex()) {
            found=m.getIndex();
            locking=0;
          } else {
            locking += 1;
          }
          settimer(boreSightLock, 0.2);
          return;
        }
      }
    }
    setprop(string~"radar/boreLock",0);
    locking=0;
    setprop("sim[0]/hud/current-color",0);
  }

  locking=0;
  setprop("sim[0]/hud/current-color",0);
  found =-1;
  setprop("instrumentation/radar/lock",0);

  settimer(boreSightLock, 0.2);
}

setlistener("ai/models/model-added", MPjoin);
setlistener("ai/models/model-removed", MPleave);
settimer(MPradarProperties,1.0);
settimer(boreSightLock, 1.0);
