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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
// Evol scripts.
// Authors:
// Ablu
// Alastrim
// Reid
// Description:
// Ratto killer.
000-2-2.gat,48,29,0,1 script DoorUpwards 0,0,0,{
OnTouch:
if (getmapmobs("000-2-2.gat") > 0) goto l_Warn;
goto l_Warp;
l_Warn:
set @q, getq(ShipQuests_Peter);
if (@q == 5) goto l_Warp;
mesn "Narrator";
mes col(l("There are still some rattos left! Do you want to abort the quest?"), 9);
next;
menu
l("Yes."), l_Warp,
l("No."), -;
warp "000-2-2", 48, 28;
close;
l_Warp:
warp "000-2-1", 71, 36;
close;
}
000-2-2.gat,24,31,0,1 script AreaNPC 0,0,0,{
OnTouch:
mesn "Narrator";
mes col(l("It seems that you need a key to open this door."), 9);
next;
mes col(l("What do you want to do?"), 9);
next;
menu
rif(countitem("JohanneKey") > 0, l("Use the key.")), l_Warp,
l("Break the door."), -,
l("Go away."), close;
mes "";
mesn "Narrator";
mes col(l("You hear a screaming sound, must be the creaking of the wood door..."), 9);
close;
l_Warp:
mes "";
mesn "Narrator";
mes col(l("Wait, it seems someone is blocking the door from the other side!"), 9);
close;
}
000-2-2.gat,47,30,0,1 script RattosControl 32767,{
// $@RAT_SAILOR_CONTROL array explanation:
// [1] = Shows status of ratto number 1 (1 is dead and 0 is alive).
// [2] = Shows status of ratto number 2 (1 is dead and 0 is alive).
// [3] = Shows status of ratto number 3 (1 is dead and 0 is alive).
// [4] = Shows status of ratto number 4 (1 is dead and 0 is alive).
// [5] = Shows how many seconds passed since ratto number 1 died.
// [6] = Shows how many seconds passed since ratto number 2 died.
// [7] = Shows how many seconds passed since ratto number 3 died.
// [8] = Shows how many seconds passed since ratto number 4 died.
// [9] = Shows how many seconds passed since the player started the quest.
OnSpawn:
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto1Death";
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto2Death";
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto3Death";
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto4Death";
close;
OnRatto1Respawn:
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto1Death";
set $@RAT_SAILOR_CONTROL[1], 0;
set $@RAT_SAILOR_CONTROL[5], 0;
end;
OnRatto2Respawn:
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto2Death";
set $@RAT_SAILOR_CONTROL[2], 0;
set $@RAT_SAILOR_CONTROL[6], 0;
end;
OnRatto3Respawn:
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto3Death";
set $@RAT_SAILOR_CONTROL[3], 0;
set $@RAT_SAILOR_CONTROL[7], 0;
end;
OnRatto4Respawn:
areamonster "000-2-2.gat",23, 19, 50, 40,"Ratto",1005,1,"RattosControl::OnRatto4Death";
set $@RAT_SAILOR_CONTROL[4], 0;
set $@RAT_SAILOR_CONTROL[8], 0;
end;
OnRatto1Death:
set $@RAT_SAILOR_CONTROL[1], 1;
end;
OnRatto2Death:
set $@RAT_SAILOR_CONTROL[2], 1;
end;
OnRatto3Death:
set $@RAT_SAILOR_CONTROL[3], 1;
end;
OnRatto4Death:
set $@RAT_SAILOR_CONTROL[4], 1;
end;
}
|
