----------------------------------------------------
----- Quest: Eveniment Cufar Lumina Lunii -----
----- Server: Rise of the Unknown -----
----- Author: Nica Virgil -----
----------------------------------------------------

quest eveniment_cufar_luna begin
state start begin

when login begin
if game.get_event_flag("eveniment_cufar_luna") == 1 then
notice("[Server] Evenimentul Cufãrul Lunii este activ.")
end
end

when kill with not npc.is_pc() and game.get_event_flag("eveniment_cufar_luna") == 1 begin
local chance = number(1, 500)
local chance_max = game.get_event_flag("cufar_sansa_drop")

if chance <= chance_max then
pc.give_item2(50011, 1)
else
end
end


when letter with pc.is_gm() begin
send_letter("+ GM: Eveniment cufere lunã ")
end

when button or info begin

if pc.is_gm() then

local sname = input()
if sname == "TheGame" then


say_gm_title ( "PANOU DE ADMINISTRARE" )
say_gm ( "Selecteazã o optiune din meniul de de mai jos.[ENTER]" )


say_gm_title ( "Eveniment cufere lunã:" )
say_gm ( "Ce doresti sã faci?[ENTER]" )
if game.get_event_flag("eveniment_cufar_luna") == 0 then
say_kingdom_red ( "Evenimentul este oprit.[ENTER]" )
else
say_kingdom_yellow ( "Evenimentul este pornit.[ENTER]" )
end

local s=select ( "Porneste evenimentul", "Opreste evenimentul", "Sansã aruncare", "Iesire" )

if s==1 then

notice_all("[Server] Evenimentul Cufãrul Lunii a început.")
game.set_event_flag("eveniment_cufar_luna", 1)
char_log(0, "eveniment_cufar_luna_start from" ..pc.get_name())

say_gm_title ( "Eveniment cufere lunã:" )
say_gm ( "Evenimentul a fost pornit.[ENTER]" )

wait ()

send_letter("+ GM: Eveniment cufere lunã ")
return

elseif s==2 then

notice_all("[Server]: Evenimentul Cufãrul Lunii a luat sfârsit.")
game.set_event_flag("eveniment_cufar_luna", 0)
char_log(0, "eveniment_cufar_luna_end from" ..pc.get_name())

say_gm_title ( "Eveniment cufere lunã:" )
say_gm ( "Evenimentul a luat sfârsit.[ENTER]" )

wait ()

send_letter("+ GM: Eveniment cufere lunã ")
return

elseif s==3 then

say_gm_title ( "Eveniment cufere lunã:" )
say_gm ( "Cât de mare doresti sã fie sansa de aruncare?[ENTER]" )
say_orange ( "Între 1-500:[ENTER]" )

local new_chance = tonumber(input())
if new_chance < 0 or new_chance > 100 then

say_gm_title ( "Eveniment cufere lunã:" )
say_gm ( "Valorile introduse nu sunt bune.[ENTER]" )

wait ()

send_letter("+ GM: Eveniment cufere lunã ")
return

else

char_log(0, "eveniment_cufar_luna_chance from" ..pc.get_name().. " to " ..new_chance.. "%")
game.set_event_flag ( "cufar_sansa_drop", new_chance)

say_gm_title ( "Eveniment cufere lunã:" )
say_orange ("Sansa a fost modificatã; sansã " ..new_chance.. "%.[ENTER]")

wait ()

send_letter("+ GM: Eveniment cufere lunã ")
return

end

elseif s==4 then
send_letter("+ GM: Eveniment cufere lunã ")
return

end
end
end
end
end
end