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
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
|
// TMW-2 Script.
// Author:
// Saulc
// Jesusalva
// Notes:
// Tulim banker, and also handles PCLogin events: CheckClientVersion, and bank
// Take care of server updates, but instances are defined on their ships.
003-3,36,34,0 script Malindou NPC_LLOYD,{
function UpdateBF {
.@o=getbattleflag(getarg(0));
setbattleflag(getarg(0), .@o+getarg(1,0));
}
Banker(.name$, "Tulimshar", 14000);
close;
OnInit:
.sex = G_MALE;
.distance = 4;
// Update handler (use `date +%s` for this)
// Current UPDATE value: Qui Jun 7 08:10:55 -03 2018
if ($UPDATE < 1528369855) {
$UPDATE=1528369855;
debugmes "Warning.";
debugmes "Warning.";
debugmes "Warning: This introduces a server update:";
debugmes "";
debugmes "* Please create the imported guild";
debugmes "";
}
// Current UPDATE value: Dom Jun 17 21:32:45 -03 2018
if ($UPDATE < 1529281965) {
$UPDATE=1529281965;
debugmes "";
debugmes "* Please set #BankP for bankers";
debugmes "* Automatically creatining minimal GP reserves for Hasan Autumn's Quest";
debugmes "";
$HASAN_GP=rand(3,12)+rand(3,12)+rand(3,12);
}
// Current UPDATE value: Dom Jun 30 22:44:46 -03 2018
if ($UPDATE < 1530409486) {
$UPDATE=1530409486;
debugmes "";
debugmes "* Clearing invalid (deleted) items";
debugmes "";
DelItemFromEveryPlayer(729);
}
// Current UPDATE value: Qui Jul 12 02:40:02 -03 2018
if ($UPDATE < 1531374002) {
$UPDATE=1531374002;
debugmes "";
debugmes "* WARNING! WARNING! WARNING!";
debugmes "* ITEM ID VIOLATION DETECTED!";
debugmes "";
debugmes "* ALL POLISHED EMERALDS BECOME POLISHED AMETHYSTS, AND VICE-VERSA!";
debugmes "* This should not have an effect ingame.";
debugmes "";
}
// Current UPDATE value: Qui Ago 2 13:58:17 -03 2018
if ($UPDATE < 1533229097) {
$UPDATE=1533229097;
debugmes "";
debugmes "* ERASING all victories with Fafi Dragon";
debugmes "";
query_sql("UPDATE `quest` SET `count1` = '1' WHERE `quest`.`quest_id`="+LoFQuest_Fairy+" AND `count1` = '2'");
query_sql("UPDATE `quest` SET `count1` = '2' WHERE `quest`.`quest_id`="+LoFQuest_Fairy+" AND `count1` = '3'");
DelItemFromEveryPlayer(SkullMask);
}
// Current UPDATE value: Qua Ago 8 11:04:10 -03 2018
if ($UPDATE < 1533737050) {
$UPDATE=1533737050;
debugmes "";
debugmes "* REMOVING now rare items.";
debugmes "";
DelItemFromEveryPlayer(SilverMirror);
}
// Current UPDATE value: Seg Ago 27 20:20:21 -03 2018
if ($UPDATE < 1535412021) {
$UPDATE=1535412021;
debugmes "";
debugmes "* SETUP mana stone default values.";
debugmes "";
$MANA_BINT=30;
$MANA_BLVL=40;
$MANA_JLVL=10;
}
// Current UPDATE value: Qui Set 06 13:50:37 -03 2018
if ($UPDATE < 1536252637) {
$UPDATE=1536252637;
debugmes "";
debugmes "* Clearing invalid (deleted) items";
debugmes "* Initial Vault Values";
debugmes "";
DelItemFromEveryPlayer(802);
DelItemFromEveryPlayer(557);
$VAULT_01738039=rand(5,25);
}
// Current UPDATE value: Qui Set 13 14:17:50 -03 2018
if ($UPDATE < 1536859070) {
$UPDATE=1536859070;
debugmes "";
debugmes "* Aisen already have a completed node at PETMEMO.";
debugmes "* This was handled automatically, no special care is required.";
debugmes "";
}
// Current UPDATE value: Dom Set 16 22:21:05 -03 2018
if ($UPDATE < 1537147265) {
$UPDATE=1537147265;
debugmes "";
debugmes "* My Money quest state modified";
debugmes "* Foxhound Famine quest state modified";
debugmes "";
query_sql("UPDATE `quest` SET `count1` = '1' WHERE `quest`.`quest_id`="+ShipQuests_ArpanMoney+" AND `count1` = '2'");
query_sql("UPDATE `quest` SET `count2` = '6' WHERE `quest`.`quest_id`="+HalinarzoQuest_Foxhound+" AND `count1` >= '6'");
query_sql("UPDATE `quest` SET `count1` = '6' WHERE `quest`.`quest_id`="+HalinarzoQuest_Foxhound+" AND `count1` > '6'");
}
// This mensures Contributors Credits, and changes only during updates.
// All names in lower case. standard: 100 points. Non-TMW2 contributors
// should be disregarded if they're not involved with the project.
// You may get more points for complexity, difficulty, usability, etc.
// You may get less points if you don't do it yourself, eg. a bug report.
// See 003-2/lua.txt for rewards
$@CONTRIBUTORS = htnew;
htput($@CONTRIBUTORS, "jesusalva", 15000);
htput($@CONTRIBUTORS, "saulc", 12500);
htput($@CONTRIBUTORS, "lawncable", 1600);
htput($@CONTRIBUTORS, "polaczka", 700);
htput($@CONTRIBUTORS, "crazyfefe", 641);
htput($@CONTRIBUTORS, "4144", 550);
htput($@CONTRIBUTORS, "mishana", 500); // Rather magic number based on precedents, tweak if needed.
htput($@CONTRIBUTORS, "soren", 450);
htput($@CONTRIBUTORS, "rakinorf", 400);
htput($@CONTRIBUTORS, "pookie", 360);
htput($@CONTRIBUTORS, "ayruss", 210);
htput($@CONTRIBUTORS, "dustman", 175);
htput($@CONTRIBUTORS, "acsvln", 150);
htput($@CONTRIBUTORS, "ichigoblack",100);
htput($@CONTRIBUTORS, "acsvln", 100);
htput($@CONTRIBUTORS, "gnulinux", 80);
htput($@CONTRIBUTORS, "skydragon", 75);
htput($@CONTRIBUTORS, "guy of lieutnant dausen", 70);
htput($@CONTRIBUTORS, "dustman", 50);
htput($@CONTRIBUTORS, "msawis", 30);
htput($@CONTRIBUTORS, "dragonstar", 26);
htput($@CONTRIBUTORS, "demure", 12);
htput($@CONTRIBUTORS, "xtreem", 1);
//htput($@CONTRIBUTORS, "", 1);
end;
OnPCLoginEvent:
checkclientversion;
if (#MerchantBank) {
BankVault += max(0, #MerchantBank);
#MerchantBank = 0;
}
end;
OnInterIfInitOnce:
if (getbattleflag("monster_hp_rate") > 100)
end;
// We must also apply penalty for losing Mana Fragments
// Forest Mana Fragment is lost: (+1% HP, +5% pop, 20s faster removal)
UpdateBF("monster_hp_rate",1);
UpdateBF("mob_count_rate",5);
UpdateBF("mob_remove_delay",-20000);
// Just copy these lines as fragments are lost
end;
}
|
