special_drop.quest

quest special_drop begin
	state start begin

		function info()
			return {
				["huevos_min_max"] = {50160, 50179},
				["niveles"] = {1, 21},
				["prob"] = 1,
				["premios"] = {
					["id_objetos"] = {10, 11, 12, 13, 14, 15, 19},
					["cantidad_id_objetos"] = {1, 1, 1, 1, 1, 1, 1},
					["huevos_req"] = {20, 30, 40, 50, 70, 90, 100}},
			}
		end

		when 30129.chat."Evento de pascua" with pc.is_gm() begin
			say_title("Empezar el evento")
			say("Metin2...")
			say("¿Quieres comenzar el evento?")
			say("Los monstruos que maten los jugadores")
			say("les dará unos objetos especiales")
			say("")
			say_reward("¿Que quieres hacer?")
			local evento = select ("Activarlo" , "Desactivarlo" , "Salir")
			if evento == 1 then
				game.set_event_flag("pascua_drop", 1)
				notice_all("El evento de huevos de pascua ha comenzado!")
				notice_all("Solo los personajes del 1 al 99 les caera el items")
				notice_all("Que tengais Mucha Suerte....")
			elseif evento == 2 then
				game.set_event_flag("pascua_drop", 0)
				notice_all("El evento de huevos de pascua ha terminado")
				notice_all("esperamos que os haya gustado!")
			end
		end

		when kill with not npc.is_pc()  begin
			local sett = special_drop.info()
			local s = number(1, 100)
			if s <= sett.prob then
				game.drop_item(number(sett.huevos_min_max[1], sett.huevos_min_max[2]))
			end
		end

		when 30129.chat."Los Huevos" begin --Elige tu NPC
			local sett = special_drop.info()
			local cantidad = 0
			for go = sett.huevos_min_max[1], sett.huevos_min_max[2], 1  do
				cantidad = pc.count_item(go) + cantidad
			end
			say_title(mob_name(npc.get_race()))
			say("[ENTER]Tienes un total de "..cantidad.." huevos")
			say("[ENTER]¿Quieres cambiarlos?")

			local k = select("Sí ", "No")
			if k == 1 then
				local p = select(item_name(sett.premios.id_objetos[1]), item_name(sett.premios.id_objetos[2]),
				item_name(sett.premios.id_objetos[3]), item_name(sett.premios.id_objetos[4]),
				item_name(sett.premios.id_objetos[5]), item_name(sett.premios.id_objetos[6]),
				item_name(sett.premios.id_objetos[7]), "Cancelar")

				if p != (table.getn(sett.premios.id_objetos)+1) and cantidad >= sett.premios.huevos_req[p] then
					say_title(mob_name(npc.get_race()))
					say("[ENTER]Ahora tienes " .. item_name(sett.premios.id_objetos[p]).." x"..sett.premios.cantidad_id_objetos[p])
					pc.give_item2(sett.premios.id_objetos[p], sett.premios.cantidad_id_objetos[p])
					say("[ENTER]Felicitaciones!")
					local acumulador_de_huevos = 0
					for go = sett.huevos_min_max[1], sett.huevos_min_max[2], 1  do
						local huevos_necesarios = sett.premios.huevos_req[p]
						if pc.count_item(go) >= huevos_necesarios and acumulador_de_huevos == 0 then
							pc.remove_item(go, huevos_necesarios)
							break
						else
							acumulador_de_huevos = pc.count_item(go) + acumulador_de_huevos
							if acumulador_de_huevos <= huevos_necesarios then
								pc.remove_item(go, pc.count_item(go))
							else
								pc.remove_item(go, pc.count_item(go) - (acumulador_de_huevos - huevos_necesarios))
							end

						end
					end
				else
					syschat("No tienes los huevos necesarios")
				end
			end
		end
	end
end