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
|
// 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 "";
//$HASAN_GP=rand(3,12)+rand(3,12)+rand(3,12); // Already initialized on the main server
}
// Current UPDATE value: Dom Jun 30 22:44:46 -03 2018
if ($UPDATE < 1530409486) {
$UPDATE=1530409486;
debugmes "";
debugmes "* Clearing invalid items";
debugmes "";
DelItemFromEveryPlayer(729);
//$HASAN_GP=rand(3,12)+rand(3,12)+rand(3,12); // Already initialized on the main server
}
// Current UPDATE value: Qui Jul 12 02:40:02 -03 2018
if ($UPDATE < 1531374002) {
$UPDATE=1531374002;
debugmes "";
//debugmes "* DESTROYING EVERY POLISHED EMERALD OR AMETHYST";
//debugmes "* Reason: Item ID Violation!";
debugmes "* WARNING! WARNING! WARNING!";
debugmes "* ITEM ID VIOLATION DETECTED!";
debugmes "";
debugmes "* ALL POLISHED EMERALDS BECOME POLISHED AMETHYSTS, AND VICE-VERSA!";
debugmes "* All players must contact a GM to do the swap.";
debugmes "";
//DelItemFromEveryPlayer(5033);
//DelItemFromEveryPlayer(5036);
//$HASAN_GP=rand(3,12)+rand(3,12)+rand(3,12); // Already initialized on the main server
}
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);
}
if ($UPDATE < 1533737050) {
$UPDATE=1533737050;
debugmes "";
debugmes "* REMOVING now rare items.";
debugmes "";
DelItemFromEveryPlayer(SilverMirror);
}
// 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, "soren", 450);
htput($@CONTRIBUTORS, "rakinorf", 400);
htput($@CONTRIBUTORS, "pookie", 260);
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;
}
|
