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;
}
|
