Cod: Selectaţi tot
quest halloween_dr begin
state start begin
when login begin
if game.get_event_flag("mondlicht_event") == 1 then
notice("Eventul Halloween a început!")
notice("ªansa dovleacului Halloween este " ..game.get_event_flag("mond_drop_chance").. "%")
end
end
when kill begin
local m_ind = pc.get_map_index()
if npc.is_pc() then
else
if m_ind == 1 or m_ind == 3 or m_ind == 21 or m_ind == 23 or m_ind == 41 or m_ind == 43 and pc.get_level() <= 20 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 65 or m_ind == 61 or m_ind == 104 and pc.get_level() <= 60 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 62 or m_ind == 71 or m_ind == 67 and pc.get_level() <= 70 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 68 or m_ind == 72 or m_ind == 73 or m_ind == 66 and pc.get_level() <= 90 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
elseif m_ind == 103 or m_ind == 70 or m_imd == 69 and pc.get_level() <= 250 then
if game.get_event_flag("mondlicht_event") == 1 then
local chance = number(1, 100)
local chance_max = game.get_event_flag("mond_drop_chance")
if chance <= chance_max then
pc.give_item2(50095)
--game.drop_item(50095)
else
end
else
end
end
end
end
when 9003.chat."GM: Event drop Halloween" with pc.is_gm() begin
if game.get_event_flag("mondlicht_event") == 1 then
say_title("Administrare event:")
say("")
say("Eventul Halloween este pornit!")
say("")
say_reward("Opriþi event-ul?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare event:")
say("")
say("Eventul a fost oprit.")
say("Mult noroc.")
say("")
game.set_event_flag("mondlicht_event", 0)
char_log(0, "Eventul Halloween a fost oprit de " ..pc.get_name())
notice_all("Eventul Halloween s-a terminat!")
elseif s==2 then
say_title("Administrare event:")
say("")
say("Ne mai revedem.")
say("")
end
else
say_title("Administrare event:")
say("")
say("Eventul Halloween este oprit!")
say("")
say_reward("Porniþi eventul?")
local s=select("Da", "Nu")
if s==1 then
say_title("Administrare event:")
say("")
say("Eventul a fost pornit.")
say("Mult noroc.")
say("")
game.set_event_flag("mondlicht_event", 1)
char_log(0, "Eventul Halloween a fost pornit de " ..pc.get_name())
notice_all("Eventul Halloween a început!")
notice_all("Mult noroc ºi distracþie plãcutã!www.pro-area.com")
elseif s==2 then
say_title("Administrare event:")
say("")
say("Ne mai revedem.")
say("")
end
end
end
when 9003.chat."GM: Sansa drop Halloween" with pc.is_gm() begin
if pc.get_name() == "[GA]Jo3y" or pc.get_name() == "[SGA]Cyry" then
say_title("Administrare event:")
say("")
say("Cât de mare ar trebui sa fie ºansa de drop?")
say("")
say_reward("1-100")
say("")
local new_chance = tonumber(input())
if new_chance < 0 or new_chance > 100 then
say_title("Administrare event:")
say("")
say("Numarul introdus este incorect!")
say("")
else
char_log(0, "Sansa drop Halloween a fost setata de " ..pc.get_name().. " la " ..new_chance.. "%")
game.set_event_flag("mond_drop_chance", new_chance)
say_title("Administrare event:")
say("")
say("ªansa de drop este setata la " ..new_chance.. " %.")
say("")
say("Ne mai revedem.")
say("")
end
else
say_title("Administrare event:")
say("")
say("Nu aveþi drepturile necesare pentru a efectua acest lucru.")
say("")
end
end
end
end
))))))))
))
.
de 
de 
de