Quest event cl

quest event_cl begin
	state start begin
	when login begin
		if game.get_event_flag("event_cl") == 1 then
			notice("[Event] Dropul la cufere clar de luna este activat.")
		end
	end

		when letter with pc.is_gm() begin
		send_letter("Admin Event Cl")
		end

		when button or info begin
		if pc.is_gm() then
		local s=select ( "Porneste evenimentul", "Opreste evenimentul", "Sansa drop", "Iesire" )

			if s==1 then
				notice_all("[Event] Dropul la cufere clar de luna este activat.")
				game.set_event_flag("event_cl", 1)
				say ( "Ai activat dropul la cufere clar de luna." )
				wait ()
				send_letter("Admin Event Cl")
			return

			elseif s==2 then
				notice_all("[Event] Dropul la cufere clar de luna este dezactivat.")
				game.set_event_flag("event_cl", 0)
				say ( "Ai oprit dropul la cufere clar de luna." )
				wait ()
				send_letter("Admin Event Cl")
			return

			elseif s==3 then
				say_title ( "Seteaza sansa de drop." )
				say ( "Intre 1-300 [ENTER]" )

					local sansa_r8sentinel = tonumber(input())
					if sansa_r8sentinel < 0 or sansa_r8sentinel > 300 then

				say_title ( "Valoare incorecta" )
				say ( "Valoarea introdusa nu este corecta." )
				say ( "Sansa de drop trebuie sa fie intre 1-300" )
				wait ()

				else

                    char_log(0, "event_cl_sansa_noua from" ..pc.get_name().. " to " ..sansa_r8sentinel.. "%")
                    game.set_event_flag ( "event_cl_sansa", sansa_r8sentinel)

                say_title ( "Eveniment campionat mondial: " )
                say_orange ("Sansa a fost modificata: " ..sansa_r8sentinel.. "%.[ENTER]")

					wait ()

					send_letter("Admin Event Cl")
					return
					end

			elseif s==4 then
				send_letter("Admin Event Cl")
				return
			end
		end
	end
		when kill with npc.get_level() > pc.get_level() - 20 and game.get_event_flag("event_cl") == 1 begin --restrctie de nivel pentru drop
		--when kill with not npc.is_pc() and game.get_event_flag("event_cl") == 1 begin --fara restrctie de nivel pentru drop
			local chance = number(1, 200) --sansa normala de drop
				local sansa_r8sentinel = game.get_event_flag("event_cl_sansa")

					if chance <= sansa_r8sentinel then
						pc.give_item2(50011, 1)-- item dropat
			end
		end
	end
end