summaryrefslogtreecommitdiff
path: root/npc/003-1/ship.txt
blob: cefea5338b51c7fcc0ac8455ae4f088a631b714e (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
// 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) {
        query_sql("SELECT online FROM char WHERE charname='Saulc GM'", .@online);
        if (is_gm())
            dispbottom l("GMs are NOT allowed on Hurnscald Liberation day.");
        else if (.@online)
            dispbottom l("Right click on the NPC to join the Liberation Force on Hurnscald.");
        else
            dispbottom l("The ship is locked, probably unable to leave port.");
    end;
    }

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