<?xml version="1.0" encoding="iso-8859-1"?>
<!DOCTYPE muclient>
<!-- MuClient version 4.84 -->

<muclient>
<plugin
   name="UU_Libdir"
   author="Tetrikitty; Co-author: Quotid"
   id="577217ac6e395b7790339ded"
   language="JScript"
   purpose="Convert NSEW directions to library directions."
   save_state="y"
   date_written="2016-4-3 21:10:32"
   requires="4.84"
   version="1.0"
   >
</plugin>

<triggers>
<trigger
    enabled = "y"
    regexp = "y"
    keep_evaluating = "y"
    group = "libdir"
    send_to = "12"
    match = "^This is (somewhere in|the south end of) the Library of Unseen University."
    sequence = "98"
   >
   <send>
        EnableTriggerGroup ("libdir2", true)
        CallPlugin("496a1ee23b8152c39a850c9b", "enableMove", "false");
        CallPlugin("496a1ee23b8152c39a850c9b", "enableMoveLib", "true");
   </send>
</trigger>
  <trigger
   enabled="y"
   regexp="y"
   keep_evaluating="y"
   group = "libdir"
   send_to="12"
   match="(^|^>)\[(?!(Library|.*(specialized|birthday|Discworld|achievement|first time|killed by|gains a level|Cpu|Machine|Reclaimed|Cleaning|joined the|now worshipping|now a member of).*)).*\]$"
   sequence="99"
  >
  <send>
    DeleteTemporaryAliases();
    EnableTriggerGroup ("libdir2", false);
    CallPlugin("496a1ee23b8152c39a850c9b", "enableMove", "true");
    CallPlugin("496a1ee23b8152c39a850c9b", "enableMoveLib", "false");
    DeleteVariable("facing");
   </send>
  </trigger>
  <trigger
   enabled="n"
   regexp="y"
   keep_evaluating="y"
   group = "libdir2"
   send_to="12"
   match="^There (is|are) .+? obvious exit(|s): (.*)\.$"
   sequence="99"
  >
  <send>
    set_relaliases("%3");
   </send>
  </trigger>
  <trigger
   enabled="y"
   regexp="y"
   keep_evaluating="y"
   group = "libdir2"
   send_to="12"
   match="^There is a strange distortion in space and time (.*) you!$"
   sequence="99"
  >
  <send>
    distortionalert("%1");
   </send>
  </trigger>
</triggers>

<!--  Aliases  -->

<aliases>
</aliases>

<!--  Variables  -->

<variables>
</variables>

<!--  Script  -->


<script>
<![CDATA[
 function set_relaliases(currentexits){
    DeleteTemporaryAliases();
    DeleteTemporaryTriggers();
    var compassexits = ["n","e","s","w"];
    var longcompassexits = ["north","east","south","west"];
    var relativeexits = ["fw","rt","bw","lt"];
    var longrelativeexits = ["forward","right","backward","left"];
    var facing = parseInt("0" + GetVariable("facing"));
    SetVariable("facing",facing);
    Note("Currently facing: "+facing+", "+longcompassexits[facing]+".");
    for (i=0;i<4;i++) {
        var j = (i-facing+4)%4;
        var tmpExit = longrelativeexits[j];
        if (currentexits.indexOf(tmpExit) > -1){
            AddAlias("librarycompass"+(i+1), compassexits[i%4],
                "SetVariable(\"facing\",\"" +i +"\");\r\nSend(\""+tmpExit+"\");\r\nDeleteTemporaryAliases();",
                1+1024+8192+16384, "");
            SetAliasOption ("librarycompass"+(i+1), "send_to", 12);
            SetAliasOption ("librarycompass"+(i+1), "sequence", 20);
            SetAliasOption ("librarycompass"+(i+1), "keep_evaluating", "n");

            AddAlias("librarylongcompass"+(i+1), longcompassexits[i],
                "SetVariable(\"facing\",\"" +i+"\");\r\nSend(\""+tmpExit+"\");\r\nDeleteTemporaryAliases();",
                1+1024+8192+16384, "");
            SetAliasOption ("librarylongcompass"+(i+1), "send_to", 12);
            SetAliasOption ("librarylongcompass"+(i+1), "sequence", 20);
            SetAliasOption ("librarylongcompass"+(i+1), "keep_evaluating", "n");

            AddAlias("libraryrelative"+(i+1), relativeexits[i],
                "SetVariable(\"facing\",\"" +j+"\");\r\nSend(\""+relativeexits[i]+"\");\r\nDeleteTemporaryAliases();",
                1+1024+8192+16384, "");
            SetAliasOption ("libraryrelative"+(i+1), "send_to", 12);
            SetAliasOption ("libraryrelative"+(i+1), "sequence", 20);
            SetAliasOption ("libraryrelative"+(i+1), "keep_evaluating", "n");

            AddAlias("librarylongrelative"+(i+1), longrelativeexits[i],
                "SetVariable(\"facing\",\"" +j+"\");\r\nSend(\""+relativeexits[i]+"\");\r\nDeleteTemporaryAliases();",
                1+1024+8192+16384, "");
            SetAliasOption ("librarylongrelative"+(i+1), "send_to", 12);
            SetAliasOption ("librarylongrelative"+(i+1), "sequence", 20);
        }
    }
    if (currentexits.indexOf("south") > -1){
        AddAlias("libraryout"+(i+1), "s",
            "SetVariable(\"facing\",\"" +i +"\");\r\nSend(\"s\");\r\nEnableTriggerGroup (\"libdir2\", false);",
            1+1024+8192+16384, "");
        SetAliasOption ("libraryout"+(i+1), "send_to", 12);
        SetAliasOption ("libraryout"+(i+1), "sequence", 20);
        SetAliasOption ("libraryout"+(i+1), "keep_evaluating", "n");
    }
 }
 function distortionalert(distexit){
    var longcompassexits = ["north","east","south","west"];
    var facing = parseInt("0" + GetVariable("facing"));
    if (distexit.indexOf("up ahead of") > -1){
        var distort = facing;
    } else if (distexit.indexOf("to the right of") > -1){
        var distort = facing+1;
    } else if (distexit.indexOf("behind") > -1){
        var distort = facing+2;
    } else if (distexit.indexOf("to the left of") > -1){
        var distort = facing+3;
    }
    ColourNote ("red", "black", "WARNING: Distortion "+longcompassexits[distort%4]+".");
 }
]]>
</script>
</muclient>