// TMW2 scripts.
// Authors:
//    Jesusalva
// Description:
//    This script controls access to Ships, fixing variables.

003-1,82,68,0	script	TulimShip	NPC_HIDDEN,0,0,{

OnTouch:
    LOCATION$="Tulim";
    goto L_Warp;

L_Warp:
    warp "002-3@"+LOCATION$, 31, 28;
    closedialog;
    close;
}

003-1,120,25,0	script	TulimShip#M	NPC_HIDDEN,0,0,{

OnTouch:
    LOCATION$="Tulim";
    goto L_Warp;

L_Warp:
    /* Is Hurnscald already liberated? Precendence. */
    if (!$HURNS_LIBDATE) {
        if (is_gm())
            dispbottom l("GMs are NOT allowed on Hurnscald Liberation day.");
        else
        dispbottom l("Please right click me to join the Liberation Force on Hurnscald.");
        //query_sql("is Saulc GM online?", <array variable>);
        dispbottom l("The ship is locked, probably unable to leave port.");

    end;
    }

    warp "016-1@"+LOCATION$, 21, 26;
    closedialog;
    close;
}