// TMW2 scripts.
// Author:
//    Jesusalva
// Description:
//    Special Soul Menhir which only allows leaving the map.

000-1,22,22,0	script	Emergency Exit	NPC_SOUL_CURSED,2,2,{
OnTouch:
OnTalk:
OnTalkNearby:
    // Switch LOCATION$ and warp to nearest town's Soul Menhir
    .@lx=array_find(.LOCMASTER_LOC$, LOCATION$);
    debugmes "%s is %d", LOCATION$, .@lx;
    if (.@lx >= 0) {
        warp .LOCMASTER_MAP$[.@lx], .LOCMASTER_X[.@lx], .LOCMASTER_Y[.@lx];
        debugmes "%s (%d , %d)", .LOCMASTER_MAP$[.@lx], .LOCMASTER_X[.@lx], .LOCMASTER_Y[.@lx];
        end;
    }

    //if (getsavepoint(0) != "000-1") warp getsavepoint(0), getsavepoint(1), getsavepoint(2);
    if (getsavepoint(0) != "000-1") warp "Save", 0, 0;
    if (getsavepoint(0) != "000-1") end;
    savepoint "002-1", 53, 38;
    warp "002-1", 53, 38;
    end;

OnInit:
    setarray .LOCMASTER_LOC$, "Candor", "Tulim", "Halin", "Hurns",   "LoF", "Nival"; // 018-5 Lilit 024-1 Frostia
    setarray .LOCMASTER_MAP$,  "005-1", "003-1", "009-1", "012-1", "017-1", "020-1";
    setarray .LOCMASTER_X,          34,      40,      26,      86,     119,      56;
    setarray .LOCMASTER_Y,         101,      49,      30,      69,      87,      62;

    debugmes "Locmaster: Index 0: %s [%s.gat (%d, %d)]", .LOCMASTER_LOC$[0], .LOCMASTER_MAP$[0], .LOCMASTER_X[0], .LOCMASTER_Y[0];
    debugmes "Locmaster: Index 2: %s [%s.gat (%d, %d)]", .LOCMASTER_LOC$[2], .LOCMASTER_MAP$[2], .LOCMASTER_X[2], .LOCMASTER_Y[2];
    debugmes "Locmaster: Index 5: %s [%s.gat (%d, %d)]", .LOCMASTER_LOC$[5], .LOCMASTER_MAP$[5], .LOCMASTER_X[5], .LOCMASTER_Y[5];
    end;

}