login.lua

main 731 lines · 33.3 KB Raw
Alex Alex Commit Server upload 18/10/2026 23:38
1local FirstPlayer = 00
2local PassiveCores = 00
3local onlyGod = false
4local onlyStaff = false
5local eventMessage = ''
6function onGlobalRestore(player)
7 -- NINHOS [RANDOM]
8 if Game.getStorageValue(_GLOBAL_RANDOM.NINHOS["SYSTEM"].NINHO_1) == nil then
9 Game.setStorageValue(_GLOBAL_RANDOM.NINHOS["SYSTEM"].NINHO_1, math.random(01, #_GLOBAL_RANDOM.NINHOS["FACIL"]))
10 Game.setStorageValue(_GLOBAL_RANDOM.NINHOS["SYSTEM"].NINHO_2, math.random(01, #_GLOBAL_RANDOM.NINHOS["MEDIO"]))
11 Game.setStorageValue(_GLOBAL_RANDOM.NINHOS["SYSTEM"].NINHO_3, math.random(01, #_GLOBAL_RANDOM.NINHOS["DIFICIL"]))
12 Game.setStorageValue(_GLOBAL_RANDOM.NINHOS["SYSTEM"].NINHO_4, math.random(01, #_GLOBAL_RANDOM.NINHOS["IMPOSSIVEL"]))
13 end
14 -- BOOSTER CREATURE
15 if Game.getStorageValue(_SYSTEM.TASK.MONSTER[01][00].BOOSTER) == nil then
16 for X = 01, #_SYSTEM.TASK.MONSTER do
17 local mathRandom = math.random(01, #_SYSTEM.TASK.MONSTER[X])
18 if X ~= 07 then
19 Game.setStorageValue(_SYSTEM.TASK.MONSTER[X][00].BOOSTER, _SYSTEM.TASK.MONSTER[X][mathRandom].IMG_ID)
20 end
21 end
22 end
23 -- SAQUEADORES [RANDOM]
24 for SAQUE_RANK = 01, 05 do
25 local Saquear = {}
26 if Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQUE_RANK][01]) == nil then
27 for i = 01, #_GLOBAL_RANDOM.SAQUEADORES[SAQUE_RANK] do
28 table.insert(Saquear, i)
29 end
30
31 local R_1 = math.random(01, #Saquear)
32 Game.setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQUE_RANK][01], Saquear[R_1])
33 table.remove(Saquear, R_1)
34 table.sort(Saquear)
35
36 local R_2 = math.random(01, #Saquear)
37 Game.setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQUE_RANK][02], Saquear[R_2])
38 table.remove(Saquear, R_2)
39 table.sort(Saquear)
40
41 local R_3 = math.random(01, #Saquear)
42 Game.setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQUE_RANK][03], Saquear[R_3])
43 table.remove(Saquear, R_3)
44 table.sort(Saquear)
45
46 local R_4 = math.random(01, #Saquear)
47 Game.setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQUE_RANK][04], Saquear[R_4])
48 table.remove(Saquear, R_4)
49 table.sort(Saquear)
50
51 local R_5 = math.random(01, #Saquear)
52 Game.setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQUE_RANK][05], Saquear[R_5])
53 table.remove(Saquear, R_5)
54 table.sort(Saquear)
55 end
56 end
57 -- EVENTOS MENSAIS
58 local Mes = tonumber(os.date("%m", os.time()))
59 local Dia = tonumber(os.date("%d", os.time()))
60 local WeekDay = os.date('%A')
61 if Game.getStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_ID) == nil then
62 if Dia >= _GLOBAL_RANDOM.EVENTOS_TABLE[Mes].DATA_INICIO and Dia <= _GLOBAL_RANDOM.EVENTOS_TABLE[Mes].DATA_FIM then
63 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_ID, Mes)
64 eventMessage = 'O Evento [ ' .._GLOBAL_RANDOM.EVENTOS_TABLE[Mes].EVENT_NAME.. ' ] est� ativo no servidor. Para mais informa��es (MENU > ACTIVE > EVENTOS).'
65
66 if Mes == 02 then -- MODO ONLINE
67 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_1, 00)
68 end
69 if Mes == 03 then -- CRYPTBLOOD
70 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_1, 00)
71 end
72 if Mes == 05 then -- ESTOQUE DE SUPRIMENTOS
73 local TAB_ITEMS_1 = {}
74 local TAB_ITEMS_2 = {}
75 local TAB_ITEMS_3 = {}
76 for X = 01, 20 do
77 table.insert(TAB_ITEMS_1, _GLOBAL_RANDOM.EVENTOS_TABLE[Mes].ITEMS_TASK[01][X])
78 table.insert(TAB_ITEMS_2, _GLOBAL_RANDOM.EVENTOS_TABLE[Mes].ITEMS_TASK[02][X])
79 table.insert(TAB_ITEMS_3, _GLOBAL_RANDOM.EVENTOS_TABLE[Mes].ITEMS_TASK[03][X])
80 end
81
82 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_1, math.random(40, 50))
83 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_2, math.random(30, 40))
84 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_3, math.random(20, 30))
85
86 -- WHITE POINTS
87 local ID_1 = math.random(01, #TAB_ITEMS_1)
88 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_4, TAB_ITEMS_1[ID_1])
89 table.remove(TAB_ITEMS_1, ID_1)
90
91 local ID_2 = math.random(01, #TAB_ITEMS_1)
92 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_5, TAB_ITEMS_1[ID_2])
93 table.remove(TAB_ITEMS_1, ID_2)
94
95 local ID_3 = math.random(01, #TAB_ITEMS_1)
96 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_6, TAB_ITEMS_1[ID_3])
97 table.remove(TAB_ITEMS_1, ID_3)
98
99 -- YELLOW POINTS
100 local IDD_1 = math.random(01, #TAB_ITEMS_2)
101 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_7, TAB_ITEMS_2[IDD_1])
102 table.remove(TAB_ITEMS_2, IDD_1)
103
104 local IDD_2 = math.random(01, #TAB_ITEMS_2)
105 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_8, TAB_ITEMS_2[IDD_2])
106 table.remove(TAB_ITEMS_2, IDD_2)
107
108 local IDD_3 = math.random(01, #TAB_ITEMS_2)
109 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_9, TAB_ITEMS_2[IDD_3])
110 table.remove(TAB_ITEMS_2, IDD_3)
111
112 -- BLUE POINTS
113 local IDDD_1 = math.random(01, #TAB_ITEMS_3)
114 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_10, TAB_ITEMS_3[IDDD_1])
115 table.remove(TAB_ITEMS_3, IDDD_1)
116
117 local IDDD_2 = math.random(01, #TAB_ITEMS_3)
118 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_11, TAB_ITEMS_3[IDDD_2])
119 table.remove(TAB_ITEMS_3, IDDD_2)
120
121 local IDDD_3 = math.random(01, #TAB_ITEMS_3)
122 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_12, TAB_ITEMS_3[IDDD_3])
123 table.remove(TAB_ITEMS_3, IDDD_3)
124
125 end
126 if Mes == 11 then -- PILARES DA FORTUNA
127 for X = 01, 05 do
128 local POS_PILLAR = Tile(_GLOBAL_RANDOM.EVENTOS_TABLE[11].PILLAR_POS[X].TILE[01], _GLOBAL_RANDOM.EVENTOS_TABLE[11].PILLAR_POS[X].TILE[02], _GLOBAL_RANDOM.EVENTOS_TABLE[11].PILLAR_POS[X].TILE[03])
129 local CHECK_PILLAR = POS_PILLAR:getTopCreature()
130 if CHECK_PILLAR then
131 doRemoveCreature(CHECK_PILLAR:getId())
132 end
133
134 Game.createMonster('Pillar of Fortune', _GLOBAL_RANDOM.EVENTOS_TABLE[11].PILLAR_POS[X].POS[01])
135 end
136
137 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[11].PILLAR_STEP, 01)
138 end
139 if Mes == 12 then -- OS ESCOLHIDOS
140 local ClassMonster = {01, 02, 03, 04, 05, 06, 07, 08, 09, 10, 11}
141 local ClassUm = math.random(01, #ClassMonster)
142 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_1, ClassMonster[ClassUm])
143 table.remove(ClassMonster, ClassUm)
144
145 local ClassDois = math.random(01, #ClassMonster)
146 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_2, ClassMonster[ClassDois])
147 table.remove(ClassMonster, ClassDois)
148
149 local ClassTres = math.random(01, #ClassMonster)
150 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_3, ClassMonster[ClassTres])
151 table.remove(ClassMonster, ClassTres)
152
153 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_4, 00)
154 if Game.getStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_5) == 01 then
155 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_5, 02)
156 else
157 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_5, 01)
158 end
159 end
160 else
161 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_ID, 0)
162 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_1, nil)
163 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_2, nil)
164 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_3, nil)
165 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_4, nil)
166 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_5, nil)
167 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_6, nil)
168 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_7, nil)
169 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_8, nil)
170 Game.setStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_UID_9, nil)
171 end
172 end
173 -- EVENTOS DI�RIOS
174 Game.setStorageValue(_GLOBAL_RANDOM.DAILY_EVENTS.STORAGE, _GLOBAL_RANDOM.DAILY_EVENTS.WEEK[WeekDay].ID)
175 if WeekDay == "Monday" then
176 db.query("DELETE FROM `player_storage` WHERE `player_storage`.`key` = " .._GLOBAL_RANDOM.WARZONE.EXP_STORAGE.. ";")
177 player:setStorageValue(_GLOBAL_RANDOM.WARZONE.EXP_STORAGE, nil)
178 end
179 if WeekDay == "Tuesday" then
180 PassiveCores = math.random(01, 04)
181 Game.setStorageValue(_GLOBAL_RANDOM.DAILY_EVENTS.PASSIVE, PassiveCores)
182 end
183 if WeekDay == "Saturday" then
184 local shopProduct = {}
185 local chooseQntPromo = math.random(05, 10)
186 for _SHOP = 01, #_SHOP_PRODUCTS do
187 for _SHOP_ITEM = 01, #_SHOP_PRODUCTS[_SHOP] do
188 if _SHOP_PRODUCTS[_SHOP][_SHOP_ITEM].VISIBLE then
189 local str = _SHOP.. "-" .._SHOP_ITEM
190 table.insert(shopProduct, str)
191 end
192 end
193 end
194 for X = 01, chooseQntPromo do
195 local chooseItem = math.random(01, #shopProduct)
196 local choose_id = shopProduct[chooseItem]
197
198 table.remove(shopProduct, chooseItem)
199 local split = choose_id:splitTrimmed("-")
200 local CATEGORIA = tonumber(split[01])
201 local INDEX = tonumber(split[02])
202
203 if _SHOP_PRODUCTS[CATEGORIA][INDEX].VIP.ORIGIN_PRICE >= 05 then
204 local percentPromo = math.random(10, 50) * (_SHOP_PRODUCTS[CATEGORIA][INDEX].VIP.ORIGIN_PRICE / 100)
205 _SHOP_PRODUCTS[CATEGORIA][INDEX].VIP.PROMO_PRICE = (_SHOP_PRODUCTS[CATEGORIA][INDEX].VIP.ORIGIN_PRICE - math.floor(percentPromo))
206 end
207 if _SHOP_PRODUCTS[CATEGORIA][INDEX].ONLINE.ORIGIN_PRICE > 00 then
208 if _SHOP_PRODUCTS[CATEGORIA][INDEX].ONLINE.ORIGIN_PRICE >= 05 then
209 local percentPromo = math.random(10, 50) * (_SHOP_PRODUCTS[CATEGORIA][INDEX].ONLINE.ORIGIN_PRICE / 100)
210 _SHOP_PRODUCTS[CATEGORIA][INDEX].ONLINE.PROMO_PRICE = (_SHOP_PRODUCTS[CATEGORIA][INDEX].ONLINE.ORIGIN_PRICE - math.floor(percentPromo))
211 end
212 end
213 end
214 end
215 -- DESAFIOS DI�RIOS
216 local desafioDiario = {}
217 for _TAB = 01, #_DESAFIOS do
218 table.insert(desafioDiario, _TAB)
219 end
220 for _DES = 01, 10 do
221 local chooseDesafio = math.random(01, #desafioDiario)
222 local checkRepeat = 00
223 for REPEAT = 01, 10 do
224 if _DAILYS[REPEAT].ID > 00 then
225 if _DAILYS[REPEAT].ID == chooseDesafio then
226 checkRepeat = 01
227 end
228 end
229 end
230 if checkRepeat == 00 then
231 _DAILYS[_DES].ID = chooseDesafio
232 else
233 _DES = _DES - 01
234 end
235 end
236
237 db.query("DELETE FROM `player_storage` WHERE `player_storage`.`key` = " .._SYSTEM.DOUBLE_EXP_ONE.. " OR `player_storage`.`key` = " .._DESAFIOS[00].DESAFIO_ID.. " OR `player_storage`.`key` = " .._DESAFIOS[00].DESAFIO_COUNT.. ";")
238 player:setStorageValue(_SYSTEM.DOUBLE_EXP_ONE, nil)
239 player:setStorageValue(_DESAFIOS[00].DESAFIO_ID, nil)
240 player:setStorageValue(_DESAFIOS[00].DESAFIO_COUNT, nil)
241 FirstPlayer = 01
242end
243function onLogin(player)
244 if onlyGod then
245 local playerAccount = player:getAccountId()
246 if playerAccount ~= 19 then
247 return false
248 end
249 elseif onlyStaff then
250 if player:getGroup():getId() < 2 then
251 return false
252 end
253 end
254 local diasSemana = {
255 ["Sunday"] = "Domingo",
256 ["Monday"] = "Lunes",
257 ["Tuesday"] = "Martes",
258 ["Wednesday"] = "Miercoles",
259 ["Thursday"] = "Jueves",
260 ["Friday"] = "Viernes",
261 ["Saturday"] = "Sabado"
262 }
263
264 local mesesAno = {
265 ["January"] = "Enero",
266 ["February"] = "Febrero",
267 ["March"] = "Marzo",
268 ["April"] = "Abril",
269 ["May"] = "Mayo",
270 ["June"] = "Junio",
271 ["July"] = "Julio",
272 ["August"] = "Agosto",
273 ["September"] = "Septiembre",
274 ["October"] = "Octubre",
275 ["November"] = "Noviembre",
276 ["December"] = "Diciembre"
277 }
278
279 local lastLogin = player:getLastLoginSaved()
280 if lastLogin and lastLogin > 0 then
281 local diaCompleto = diasSemana[os.date("%A", lastLogin)]
282 local mesCompleto = mesesAno[os.date("%B", lastLogin)]
283
284 local hora24 = os.date("%H", lastLogin) -- Hora en formato de 24 horas
285 local sufijoAMPM = tonumber(hora24) < 12 and "AM" or "PM"
286 local hora = os.date("%I:%M", lastLogin) -- Hora en formato de 12 horas
287
288 local fecha = string.format("%d de %s de %s a las %s %s", os.date("%d", lastLogin), mesCompleto, os.date("%Y", lastLogin), hora, sufijoAMPM)
289 local loginStr = "Bienvenido a " .. configManager.getString(configKeys.SERVER_NAME) .. "!"
290 loginStr = string.format(loginStr .. "\nSu ultima visita fue el %s, %s.", diaCompleto, fecha)
291 player:sendTextMessage(MESSAGE_STATUS_DEFAULT, loginStr)
292 else
293 local loginStr = "Bienvenido a " .. configManager.getString(configKeys.SERVER_NAME) .. "!"
294 player:sendTextMessage(MESSAGE_STATUS_DEFAULT, loginStr .. "\nEsta es su primera vez iniciando sesion!")
295 end
296
297 if player:getLastLoginSaved() <= 0 then
298 player:setStorageValue(_QUESTLOG[01].UID_01, 01) --[[ PRIMEIROS PASSOS ]]--
299 addEvent(function() player:sendCancelMessage("@TutorShow 00") end, 3000)
300
301 local playerName = player:getName()
302 db.query("UPDATE `players` SET `level` = '1', `vocation` = '1', `town_id` = '1', `lastlogin` = '0', `health` = '100', `healthmax` = '100', `experience` = '0', `maglevel` = '0', `mana` = '0', `manamax` = '0', `manaspent` = '0', `cap` = '470', `skill_fist` = '10', `skill_fist_tries` = '0', `skill_club` = '10', `skill_club_tries` = '0', `skill_sword` = '10', `skill_sword_tries` = '0', `skill_axe` = '10', `skill_axe_tries` = '0', `skill_dist` = '10', `skill_dist_tries` = '0', `skill_shielding` = '10', `skill_shielding_tries` = '0', `skill_fishing` = '10', `skill_fishing_tries` = '0' WHERE `players`.`name` = '" ..playerName.. "';")
303 player:setVocation(01)
304 player:teleportTo({x=3999, y=991, z=07})
305 player:getPosition():sendMagicEffect(CONST_ME_TELEPORT)
306 player:setStorageValue(_SYSTEM.INVENTARIO[03].UID_01, 10000) -- Backpack Inicial
307 player:setStorageValue(_SYSTEM.SKILL_CURE[01], 01) -- Skill de Cura Inicial
308 player:setStorageValue(_SYSTEM.SKILL_CURE[02], 100) -- Skill de Cura Quantidade
309 else
310 if loginStr ~= "" then
311 player:sendTextMessage(MESSAGE_STATUS_DEFAULT, loginStr)
312 end
313 end
314
315 player:setStorageValue(_PLAYER_INFO.DEF, nil)
316 player:setStorageValue(_PLAYER_INFO.ESQ, nil)
317 player:setStorageValue(_PLAYER_INFO.FIRE, nil)
318 player:setStorageValue(_PLAYER_INFO.ICE, nil)
319 player:setStorageValue(_PLAYER_INFO.ENERGY, nil)
320 player:setStorageValue(_PLAYER_INFO.EARTH, nil)
321 player:setStorageValue(_PLAYER_INFO.DEATH, nil)
322 player:setStorageValue(_PLAYER_INFO.RES_PLAYER, nil)
323 player:setStorageValue(_PLAYER_INFO.EXTRA_DEF, nil)
324 player:setStorageValue(_PLAYER_INFO.EXTRA_ESQ, nil)
325 player:setStorageValue(_PLAYER_INFO.EXTRA_MAG, nil)
326 player:setStorageValue(_PLAYER_INFO.CURA_ESQ, nil)
327 player:setStorageValue(_PLAYER_INFO.FEAR_PARA, nil)
328 player:setStorageValue(_PLAYER_INFO.BOMB_FIRE, nil)
329 player:setStorageValue(_PLAYER_INFO.BOMB_ENERGY, nil)
330 player:setStorageValue(_PLAYER_INFO.BOMB_ICE, nil)
331 player:setStorageValue(_PLAYER_INFO.BOMB_EARTH, nil)
332 player:setStorageValue(_PLAYER_INFO.BOMB_DEATH, nil)
333 player:setStorageValue(_PLAYER_INFO.BOMB_HOLY, nil)
334 player:setStorageValue(_PLAYER_INFO.BOMB_PHYSICAL, nil)
335 player:setStorageValue(_PLAYER_INFO.CANCEL_INV, nil)
336 player:setStorageValue(_PLAYER_INFO.CAN_PARA, nil)
337 player:setStorageValue(_PLAYER_INFO.DMG_HALF, nil)
338 player:setStorageValue(_PLAYER_INFO.FREE_RUN, nil)
339 player:setStorageValue(_SYSTEM.IDLE_COUNT, nil)
340 doInventario(player, 07)
341
342 player:setStorageValue(_PLAYER_INFO.LOGOUT_DELAY, _PLAYER_INFO.SECONDS_DELAY + 05)
343 -- RESTAURANDO HP & RESET SPEED
344 player:setMaxHealth((player:getLevel() * 10) + 140)
345 player:changeSpeed(player:getBaseSpeed())
346
347 -- SISTEMA DE COMPENSA��O
348 if player:getTown():getId() > 01 then -- DANGEROUS
349 local OnlineInsert = 00
350 if player:getTown():getId() == 02 or player:getTown():getId() == 03 or player:getTown():getId() == 17 then
351 OnlineInsert = 01
352 elseif player:getTown():getId() == 04 or player:getTown():getId() == 05 or player:getTown():getId() == 18 then
353 OnlineInsert = 02
354 elseif player:getTown():getId() == 06 or player:getTown():getId() == 07 or player:getTown():getId() == 19 then
355 OnlineInsert = 04
356 elseif player:getTown():getId() == 09 or player:getTown():getId() == 10 or player:getTown():getId() == 20 then
357 OnlineInsert = 03
358 elseif player:getTown():getId() == 11 or player:getTown():getId() == 12 or player:getTown():getId() == 21 then
359 OnlineInsert = 05
360 elseif player:getTown():getId() == 13 or player:getTown():getId() == 14 or player:getTown():getId() == 22 then
361 OnlineInsert = 06
362 elseif player:getTown():getId() == 23 or player:getTown():getId() == 24 or player:getTown():getId() == 25 then
363 OnlineInsert = 07
364 elseif player:getTown():getId() == 26 or player:getTown():getId() == 27 or player:getTown():getId() == 28 then
365 OnlineInsert = 08
366 elseif player:getTown():getId() == 29 or player:getTown():getId() == 30 or player:getTown():getId() == 31 then
367 OnlineInsert = 09
368 end
369
370 player:sendCancelMessage("@DGTime 00 00 00")
371 player:sendCancelMessage("@ResetDG")
372 for X = 01, #_SYSTEM.DANGEROUS do
373 for Z = 01, #_SYSTEM.DANGEROUS[X] do
374 player:setStorageValue(_SYSTEM.DANGEROUS[X][Z].STORAGE, nil)
375 player:setStorageValue(_SYSTEM.DANGEROUS[X][Z].RECOMPENSA, nil)
376 end
377 end
378 player:setTown(Town(01))
379 player:teleportTo(player:getTown():getTemplePosition())
380 if OnlineInsert > 0 then
381 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "Sistema de compensa��o: Online Coins devolvidos (x" ..OnlineInsert.. ").")
382 player:sendCancelMessage("@LootMSG 3160 0 0 " ..OnlineInsert)
383 player:setStorageValue(_SYSTEM.ONLINE_COIN, (player:getStorageValue(_SYSTEM.ONLINE_COIN) + OnlineInsert))
384 end
385 end
386 -- SALAS PVP
387 if player:getStorageValue(_PVP_ROOM[00].PVP_SALA_ID) > 00 then
388 player:setStorageValue(_PVP_ROOM[00].PVP_SALA_ID, nil)
389 player:setStorageValue(_PVP_ROOM[00].TIME_ID, nil)
390 player:sendCancelMessage("@NoTeleport 00")
391 player:sendCancelMessage("@ResetDG")
392 player:setTown(Town(01))
393 player:teleportTo(player:getTown():getTemplePosition())
394 end
395 if player:getStorageValue(_SYSTEM.CURSED_TREE) > 00 then -- ARVORE AMALDI�OADA
396 local OnlineInsert = 00
397 if player:getStorageValue(_SYSTEM.CURSED_TREE) == 01 then
398 OnlineInsert = player:getStorageValue(_SYSTEM.CURSED_TREE)
399 elseif player:getStorageValue(_SYSTEM.CURSED_TREE) == 02 then
400 OnlineInsert = player:getStorageValue(_SYSTEM.CURSED_TREE)
401 elseif player:getStorageValue(_SYSTEM.CURSED_TREE) == 03 then
402 OnlineInsert = player:getStorageValue(_SYSTEM.CURSED_TREE)
403 elseif player:getStorageValue(_SYSTEM.CURSED_TREE) == 04 then
404 OnlineInsert = player:getStorageValue(_SYSTEM.CURSED_TREE)
405 end
406
407 player:setStorageValue(_SYSTEM.CURSED_TREE, nil)
408 player:setTown(Town(01))
409 player:teleportTo(player:getTown():getTemplePosition())
410 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "Sistema de compensa��o: Online Coins devolvidos (x" ..OnlineInsert.. ").")
411 player:sendCancelMessage("@LootMSG 3160 0 0 " ..OnlineInsert)
412 player:setStorageValue(_SYSTEM.ONLINE_COIN, (player:getStorageValue(_SYSTEM.ONLINE_COIN) + OnlineInsert))
413 end
414 -- REMOVER STORAGE DE TRADE
415 if player:getStorageValue(_SYSTEM.PLAYER_TRADE_ACT) > 00 then
416 player:sendCancelMessage("@ClosedTrade")
417 player:setStorageValue(_SYSTEM.PLAYER_TRADE_ACT, nil)
418 end
419 -- RESTAURANDO BACKPACK
420 if player:getStorageValue(_SYSTEM.INVENTARIO[03].UID_01) < 01 then
421 player:setStorageValue(_SYSTEM.INVENTARIO[03].UID_01, 10000) -- Backpack Inicial
422 end
423 -- TUTORIAL DE PRIMEIRA MORTE
424 if player:getStorageValue(_SYSTEM.FIRST_DEAD_TUTOR) > 00 then
425 player:sendCancelMessage("@TutorShow 35")
426 player:setStorageValue(_SYSTEM.FIRST_DEAD_TUTOR, nil)
427 end
428 -- NOTIFICA��O DO MARKET & EMAIL
429 if player:getStorageValue(_SYSTEM.NOTIFY_MARKET_GOLD) > 00 then
430 player:sendTextMessage(MESSAGE_INFO_DESCR, "Voc� vendeu produtos no Market.")
431 PlayerGoldCoins(player, 02, player:getStorageValue(_SYSTEM.NOTIFY_MARKET_GOLD))
432 player:setStorageValue(_SYSTEM.NOTIFY_MARKET_GOLD, nil)
433 end
434 if player:getStorageValue(_SYSTEM.NOTIFY_MARKET_VIP) > 00 then
435 player:sendCancelMessage("@LootMSG 3218 3 0 " ..player:getStorageValue(_SYSTEM.NOTIFY_MARKET_VIP))
436 player:sendTextMessage(MESSAGE_INFO_DESCR, "Voc� vendeu produtos no Market.")
437 PlayerVipCoins(player, 02, player:getStorageValue(_SYSTEM.NOTIFY_MARKET_VIP))
438 player:setStorageValue(_SYSTEM.NOTIFY_MARKET_VIP, nil)
439 end
440 if player:getStorageValue(_SYSTEM.MESSAGE_ALERT) > 00 then
441 player:sendTextMessage(MESSAGE_INFO_DESCR, "Voc� possui um novo email em sua Caixa de Mensagem.\nDigite Ctrl + Z para verificar.")
442 player:setStorageValue(_SYSTEM.MESSAGE_ALERT, nil)
443 end
444 -- MORRER NA FENDA DIMENSIONAL
445 if player:getStorageValue(_SYSTEM.FENDAS_DIMENSIONAL[01]) > 00 then
446 player:setStorageValue(_SYSTEM.FENDAS_DIMENSIONAL[01], nil)
447
448 if player:getStorageValue(_QUESTLOG[167].UID_01) == 03 then
449 player:setStorageValue(_QUESTLOG[167].UID_01, 02)
450 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ MISS�O FRACASSADA ]\nVoc� morreu em combate.")
451
452 doBackpack(player, 12)
453 player:sendCancelMessage("@LoadQuestWindows")
454 else
455 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ FENDA DIMENSIONAL ]\nVoc� falhou em selar a fenda Dimensional.")
456 end
457 end
458 player:setStorageValue(_SYSTEM.PLAYER_EXHAUST, nil)
459 -- CHECAR PENALIDADES
460 player:sendCancelMessage("@Penalidade " ..player:getStorageValue(_SYSTEM.PENALIDADES[01]))
461 -- CHECK PREMIUM
462 if not player:isPremium() then
463 if player:getStorageValue(_SYSTEM.PREMIUM_TIME) > 00 then
464 player:setStorageValue(_SYSTEM.PREMIUM_TIME, nil)
465 -- REMOVER SUMMON EQUIPADO
466 player:setStorageValue(_SYSTEM.INVENTARIO[10].UID_01, nil)
467 player:setStorageValue(_SYSTEM.INVENTARIO[10].UID_02, nil)
468 player:setStorageValue(_SYSTEM.INVENTARIO[10].UID_03, nil)
469
470 if player:getSex() == PLAYERSEX_FEMALE then
471 local newOutfit = { lookType = 136 }
472 player:setOutfit(newOutfit)
473 else
474 local newOutfit = { lookType = 128 }
475 player:setOutfit(newOutfit)
476 end
477
478 player:setTown(Town(01))
479 player:teleportTo({x=3999, y=991, z=07})
480 player:sendOutfitWindow()
481 end
482 end
483 -- STAMINA
484 nextUseStaminaTime[player.uid] = 0
485 -- RESET MAESTRIA SPELLS
486 player:setStorageValue(_SYSTEM.MAESTRIA[03], nil)
487 player:setStorageValue(_SYSTEM.MAESTRIA[04], nil)
488 -- RESET NINHOS (Player)
489 player:setStorageValue(_SYSTEM.GLOBAL_INDEX[01], nil)
490 player:setStorageValue(_SYSTEM.GLOBAL_INDEX[02], nil)
491 player:setStorageValue(_SYSTEM.GLOBAL_INDEX[03], nil)
492 player:setStorageValue(_SYSTEM.GLOBAL_INDEX[04], nil)
493 -- RESET PONTOS ONLINE
494 if player:getStorageValue(_SYSTEM.DEATH_COUNT) == 1 then
495 player:setStorageValue(_SYSTEM.DEATH_COUNT, 0)
496 else
497 player:setStorageValue(_SYSTEM.COUNT_ONLINE_COIN, 3600)
498 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "Permane�a x1 hora online para ganhar Online Points.")
499 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "Pressione Ctrl + Z para abrir seu Painel de Mensagens.")
500 end
501 -- CHEATS ATIVADOS
502 if _CHEATS.DANGEROUS_UNLOCK_LEVEL then
503 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Ignorar requisito de level para entrar nas Dangerous.")
504 end
505 if _CHEATS.DANGEROUS_UNLOCK_ONLINE then
506 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa de Online Points para entrar nas Dangerous.")
507 end
508 if _CHEATS.UPGRADE_COIN_FREE then
509 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa pagar para dar upgrade em um item.")
510 end
511 if _CHEATS.UPGRADE_ITEM_FREE then
512 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa oferecer nenhum item para dar upgrade em um equipamento.")
513 end
514 if _CHEATS.IMORTAL_MODE then
515 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Voc� est� imortal a qualquer dano.")
516 end
517 if _CHEATS.FURIUS_SHOOTING then
518 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Qualquer dano causar� 10.000 de dano extra.")
519 end
520 if _CHEATS.FREE_BLACKLIST then
521 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa mais de Tokens para enfrentar um boss na Blacklist.")
522 end
523 if _CHEATS.BROADCAST_ELITE then
524 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Todos os online ser�o notificados quando um monstro elite surgir no mapa.")
525 end
526 if _CHEATS.NINHO_ONLINE_FREE then
527 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa de Online Points para entrar nos Ninhos.")
528 end
529 if _CHEATS.CURSED_ONLINE_FREE then
530 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa de Online Points para enfrentar os desafios da �rvore Amaldi�oada.")
531 end
532 if _CHEATS.POWERBOX_GOLD_FREE then
533 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa pagar gold coins para comprar uma Power Box.")
534 end
535 if _CHEATS.POWERBOX_TOKENS_FREE then
536 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa pagar tokens para comprar uma Power Box.")
537 end
538 if _CHEATS.MACHINE_SORT_FREE then
539 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa pagar para abrir uma Machine Sort.")
540 end
541 if _CHEATS.MAESTRIA_COIN_FREE then
542 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa pagar gold coins para avan�ar em Maestria.")
543 end
544 if _CHEATS.MAESTRIA_LEVEL_UNLOCK then
545 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Ignorar requisito de level para avan�ar em Maestria.")
546 end
547 if _CHEATS.ESPECIALISTA_COIN_FREE then
548 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: N�o precisa pagar para iniciar os desafios de Especialista.")
549 end
550 if _CHEATS.ESPECIALISTA_LEVEL_UNLOCK then
551 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Ignorar requisito de level para iniciar os desafios de Especialista.")
552 end
553 if _CHEATS.GOLD_MINER_UNLOCK then
554 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_BLUE, "[ CHEATS ATIVADO ]: Multiplica o ganho de gold coins em drop de monstros e venda de itens.")
555 end
556
557 -- RESET TAXA | CRITICAL
558 player:setStorageValue(_SYSTEM.CRITICAL_VALUES[01], nil)
559 player:setStorageValue(_SYSTEM.CRITICAL_VALUES[02], nil)
560 -- RESET BUFF RING
561 player:setStorageValue(_SYSTEM.AMULET_VALUES[00][01], 0)
562 player:setStorageValue(_SYSTEM.AMULET_VALUES[00][02], 0)
563 player:setStorageValue(_SYSTEM.AMULET_VALUES[00][03], 0)
564 -- RESET GLOBALEVENTS
565 player:setStorageValue(_SYSTEM.GLOBAL_INDEX[01], nil)
566 player:setStorageValue(_SYSTEM.GLOBAL_INDEX[02], nil)
567 -- RESET EXP CREATURE BOOTS | BLACKLIST
568 player:setStorageValue(_SYSTEM.TASK[00].TIMER, nil)
569 -- FALHANDO MISS�ES
570 if player:getStorageValue(_QUESTLOG[166].UID_01) == 02 then
571 player:setStorageValue(_QUESTLOG[166].UID_01, 01)
572 player:setStorageValue(10993, 00)
573 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ MISS�O FRACASSADA ]\nVoc� morreu ou foi desconectado em combate.")
574
575 doBackpack(player, 12)
576 player:sendCancelMessage("@LoadQuestWindows")
577 end
578 if player:getStorageValue(_QUESTLOG[169].UID_01) > 01 and player:getStorageValue(_QUESTLOG[169].UID_01) < 100 then
579 player:setStorageValue(_QUESTLOG[169].UID_01, 01)
580 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ MISS�O FRACASSADA ]\nVoc� morreu ou foi desconectado em combate.")
581
582 doBackpack(player, 12)
583 player:sendCancelMessage("@LoadQuestWindows")
584 end
585 if player:getStorageValue(_QUESTLOG[188].UID_01) == 02 or player:getStorageValue(_QUESTLOG[188].UID_01) == 03 then
586 player:setStorageValue(_QUESTLOG[188].UID_01, 01)
587 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ MISS�O FRACASSADA ]\nVoc� foi desconectado durante o teste.")
588
589 doBackpack(player, 12)
590 player:sendCancelMessage("@LoadQuestWindows")
591 end
592 if player:getStorageValue(_QUESTLOG[197].UID_01) == 03 then
593 player:setStorageValue(_QUESTLOG[197].UID_01, 02)
594 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ MISS�O FRACASSADA ]\nVoc� foi desconectado durante o combate.")
595
596 doBackpack(player, 12)
597 player:sendCancelMessage("@LoadQuestWindows")
598 end
599 if player:getStorageValue(_QUESTLOG[198].UID_01) == 02 then
600 player:setStorageValue(_QUESTLOG[198].UID_01, 01)
601 player:sendTextMessage(MESSAGE_STATUS_WARNING, "[ MISS�O FRACASSADA ]\nVoc� foi desconectado durante o combate.")
602
603 doBackpack(player, 12)
604 player:sendCancelMessage("@LoadQuestWindows")
605 end
606
607 if FirstPlayer == 00 then
608 onGlobalRestore(player)
609 end
610 local DAILY_EVENT = Game.getStorageValue(_GLOBAL_RANDOM.DAILY_EVENTS.STORAGE) or 0
611 player:sendCancelMessage("@DailyEvent " ..DAILY_EVENT.. " " ..PassiveCores)
612 local EVENT_DAILY = {
613 [01] = "A cada 1 hora, monstro Joker ser� invocado. Elimine-os e ganhe itens para upgrade de armas.",
614 [03] = "A cada 1 hora, o boss Devovorga ser� invocado. Elimine-o e ganhe um buff aleat�rio do Shop.",
615 [04] = "Durante todo o dia, todos ganham um b�nus de venda baseada no n�mero de jogadores online.",
616 [05] = "Durante todo o dia, toda recompensa em PVP Points das Salas PVP � dobrada.",
617 [06] = "Dia de promo��o no Shop.",
618 [07] = "Atividades como Task, Boss ou Dangerous tem recompensas melhoradas quando feitas em grupo.",
619 }
620 local CORES = {
621 [00] = "--",
622 [01] = "Vermelho",
623 [02] = "Azul",
624 [03] = "Verde",
625 [04] = "Amarelo",
626 }
627
628 if DAILY_EVENT == 02 then
629 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "[EVENTO DI�RIO] O Boost de Passiva est� aplicada na cor [ " ..CORES[PassiveCores].. " ].")
630 else
631 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, "[EVENTO DI�RIO] " ..EVENT_DAILY[DAILY_EVENT])
632 end
633
634 if player:getStorageValue(_GLOBAL_RANDOM.WARZONE.EXP_STORAGE) > 00 then
635 player:sendTextMessage(MESSAGE_STATUS_WARNING, "Seu b�nus de EXP total da Warzone �: [ " ..(player:getStorageValue(_GLOBAL_RANDOM.WARZONE.EXP_STORAGE) * 05).. "% ].")
636 end
637 if player:getStorageValue(_SYSTEM.WARZONE) > 00 then
638 player:setTown(Town(01))
639 player:removeCondition(CONDITION_OUTFIT)
640 player:setMaxHealth((player:getLevel() * 10) + 140)
641 player:sendCancelMessage("@NoTeleport 00")
642 player:setStorageValue(_SYSTEM.WARZONE, nil)
643 player:teleportTo({x=3999, y=991, z=7})
644 end
645 if Game.getStorageValue(_GLOBAL_RANDOM.WARZONE.STORAGE_START_WARZONE) == 01 then
646 if _GLOBAL_RANDOM.WARZONE.LEFT_TIMER[01] > 20 then
647 if player:getLevel() >= _GLOBAL_RANDOM.WARZONE.LEVEL then
648 local players = Game.getPlayers()
649 local totalPlayer = 00
650 for _, targetPlayer in ipairs(players) do
651 if targetPlayer:getLevel() >= _GLOBAL_RANDOM.WARZONE.LEVEL then
652 if targetPlayer:getStorageValue(_SYSTEM.WARZONE) > 00 then
653 if _GLOBAL_RANDOM.WARZONE.LEFT_TIMER[01] >= 10 then
654 totalPlayer = totalPlayer + 01
655 end
656 end
657 end
658 end
659 player:sendCancelMessage("@WarzoneStart " ..totalPlayer)
660 end
661 end
662 end
663 -- BUFF SHOP AND TOOLS SHOP
664 onLoadShop(player)
665 doInventario(player, 05)
666 local DESCONTRUIR_EVENT = 00
667 if Game.getStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_ID) > 00 then
668 if Game.getStorageValue(_GLOBAL_RANDOM.EVENTOS_TABLE[00].EVENT_ID) == 08 then
669 DESCONTRUIR_EVENT = 01
670 end
671 player:sendTextMessage(MESSAGE_STATUS_CONSOLE_ORANGE, eventMessage)
672 end
673 if player:getStorageValue(_DESAFIOS[00].DESAFIO_TYPE) == 02 then
674 DESCONTRUIR_EVENT = 01
675 end
676 player:sendCancelMessage("@ToolsLoad " ..player:getStorageValue(_SYSTEM.TOOLS[01]).. " " ..player:getStorageValue(_SYSTEM.TOOLS[02]).. " " ..DESCONTRUIR_EVENT)
677 player:sendCancelMessage("@RemoveMarkMap")
678 -- ATUALIZANDO BAUS DOS SAQUEADORES
679 for SAQ_RANK = 01, 05 do
680 if player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][01]) ~= Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQ_RANK][01]) then
681 --print(player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][01]).. " ~= " ..Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][00][01]))
682 player:setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][01], nil)
683 end
684 if player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][02]) ~= Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQ_RANK][02]) then
685 --print(player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][02]).. " ~= " ..Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][00][02]))
686 player:setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][02], nil)
687 end
688 if player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][03]) ~= Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQ_RANK][03]) then
689 --print(player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][03]).. " ~= " ..Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][00][03]))
690 player:setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][03], nil)
691 end
692 if player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][04]) ~= Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQ_RANK][04]) then
693 --print(player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][04]).. " ~= " ..Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][00][04]))
694 player:setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][04], nil)
695 end
696 if player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][05]) ~= Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][SAQ_RANK][05]) then
697 --print(player:getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][01][05]).. " ~= " ..Game.getStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][00][05]))
698 player:setStorageValue(_GLOBAL_RANDOM.SAQUEADORES[00][02][SAQ_RANK][05], nil)
699 end
700 end
701 -- PROMOTION
702 local vocation = player:getVocation()
703 local promotion = vocation:getPromotion()
704 if player:isPremium() then
705 local value = player:getStorageValue(PlayerStorageKeys.promotion)
706 if not promotion and value ~= 1 then
707 player:setStorageValue(PlayerStorageKeys.promotion, 1)
708 elseif value == 1 then
709 player:setVocation(promotion)
710 end
711 elseif not promotion then
712 player:setVocation(vocation:getDemotion())
713 end
714
715
716 -- EVENTS
717 player:registerEvent("Sentinelas")
718 player:registerEvent("ModalWindow_TGun")
719 player:registerEvent("ExtendedOpcode")
720 player:registerEvent("PlayerDeath")
721 player:registerEvent("PVPZoneDeath")
722 player:registerEvent("Defense")
723 player:registerEvent("QuestLevel")
724 player:registerEvent("Think")
725 player:registerEvent("onLoot")
726 player:registerEvent("onDGKill")
727 player:registerEvent("SendTitlesOnLogin")
728 player:registerEvent("PlayerLogout")
729 return true
730end
731
Top