hugoOlivera

La probare

Ola Metin2Zone aqui traigo 3 quest de eventos halloween,navidad y sanvalentin la quest fue reparada x Keko

 

QUEST HALLOWEEN

-------------------------------------
--Mt2 blk (c) 2012
-------------------------------------
quest special_drop begin
state start begin
  when 20078.chat."Evento de halloween" with pc.is_gm() begin
						say_title("Empezar el evento")
						say("Mt2Devoradores")
						say("Quieres comenzar el evento?")
						say("los monstruos que maten los users")
						say("les dara unos items especiales")
						say("")
						say_reward("Que quieres hacer??")
		
				  local evento = select ("Actvarlo" , "Desactivarlo" ,  "Salir")
								if evento == 1 then

												  game.set_event_flag("halloween_drop", 1)
												  notice_all("El evento de halloween a comenzado")
												  notice_all("Solo los personajes del 1 al 99 les caera el items")
								elseif evento == 2 then

												  game.set_event_flag("halloween_drop", 0)
												  notice_all("El evento de halloween a terminado")
												  notice_all("esperamos que os haya gustado")
								elseif evento == 3 then
												  return
												  end
						   end
  when kill with not npc.is_pc() and game.get_event_flag("halloween_drop") == 1 begin
  local s = number(1, 100)
   if s <= 20 then
   if pc.get_level() >= 1 and pc.get_level() <= 20 then
		game.drop_item(50095)
		return
   end
   elseif s <= 18 then
   if pc.get_level() >= 21 and pc.get_level() <= 40 then
		game.drop_item(50095)
		 return
   end

   elseif s <= 16 then
		if pc.get_level() >= 41 and pc.get_level() <= 50 then
		game.drop_item(50095)
		return
   end

  else if s <= 15 then
   if pc.get_level() >= 51 and pc.get_level() <= 60 then
		game.drop_item(50095)
		return
   end

   elseif s <= 14 then
		if pc.get_level() >= 61 and pc.get_level() <= 99 then
		game.drop_item(50095)
   end
  end
end
	  
	  
  end
end
end

QUEST NAVIDAD

-------------------------------------
--Mt2 blk (c) 2012
-------------------------------------
quest special_drop begin
state start begin
  when 20078.chat."Evento de Navidad" with pc.is_gm() begin
						say_title("Empezar el evento")
						say("Mt2Devoradores")
						say("Quieres comenzar el evento?")
						say("los monstruos que maten los users")
						say("les dara unos items especiales")
						say("")
						say_reward("Que quieres hacer??")
		
				   local evento = select ("Actvarlo" , "Desactivarlo" ,  "Salir")
								if evento == 1 then

												  game.set_event_flag("Navidad_drop", 1)
												  notice_all("El evento de Navidad a comenzado")
			  notice_all("Solo los personajes del 1 al 99 les caera el items")
								 elseif evento == 2 then

												  game.set_event_flag("Navidad_drop", 0)
												  notice_all("El evento de Navidad a terminado")
												  notice_all("esperamos que os haya gustado")
								elseif evento == 3 then
												  return
												  end
						   end
 when kill with not npc.is_pc() and game.get_event_flag("Navidad_drop") == 1 begin
  local s = number(1, 100)
   if s <= 20 then
   if pc.get_level() >= 1 and pc.get_level() <= 20 then
	   game.drop_item(50010)
		return
   end
   elseif s <= 18 then
   if pc.get_level() >= 21 and pc.get_level() <= 40 then
		game.drop_item(50010)
		 return
   end

   elseif s <= 16 then
		if pc.get_level() >= 41 and pc.get_level() <= 50 then
		game.drop_item(50010)
		return
   end

  else if s <= 15 then
   if pc.get_level() >= 51 and pc.get_level() <= 60 then
	   game.drop_item(50010)
		return
   end

   elseif s <= 14 then
		if pc.get_level() >= 61 and pc.get_level() <= 99 then
		game.drop_item(50010)
   end
  end
end
	  
	  
  end
end
end

QUEST SANVALENTIN

-------------------------------------
--Mt2 blk (c) 2012
-------------------------------------
quest special_drop begin
state start begin
  when 20079.chat."Evento de Sanvalentin" with pc.is_gm() begin
						say_title("Empezar el evento")
						say("Mt2Devoradores")
						say("Quieres comenzar el evento?")
						say("los monstruos que maten los users")
						say("les dara unos items especiales")
						say("")
						say_reward("Que quieres hacer??")
		
				   local evento = select ("Actvarlo" , "Desactivarlo" ,  "Salir")
								if evento == 1 then

												  game.set_event_flag("Sanvalentin_drop", 1)
												  notice_all("El evento de Sanvalentin a comenzado")
			  notice_all("Solo los personajes del 1 al 99 les caera el items")
								elseif evento == 2 then

												  game.set_event_flag("Sanvalentin_drop", 0)
												  notice_all("El evento de Sanvalentin a terminado")
			  notice_all("esperamos que os haya gustado")
								elseif evento == 3 then
												  return
												  end
						   end
  when kill with not npc.is_pc() and game.get_event_flag("Sanvalentin_drop") == 1 begin
  local s = number(1, 100)
   if s <= 20 then
   if pc.get_level() >= 1 and pc.get_level() <= 20 then
		game.drop_item(50024)
  game.drop_item(50025)
  game.drop_item(50031)
  game.drop_item(50032)
		return
   end
   elseif s <= 18 then
   if pc.get_level() >= 21 and pc.get_level() <= 40 then
		game.drop_item(50024)
  game.drop_item(50025)
  game.drop_item(50031)
  game.drop_item(50032)
		 return
   end

   elseif s <= 16 then
		if pc.get_level() >= 41 and pc.get_level() <= 50 then
		game.drop_item(50024)
  game.drop_item(50025)
  game.drop_item(50031)
  game.drop_item(50032)
		return
   end

  else if s <= 15 then
   if pc.get_level() >= 51 and pc.get_level() <= 60 then
		game.drop_item(50024)
  game.drop_item(50025)
  game.drop_item(50031)
  game.drop_item(50032)
		return
   end

   elseif s <= 14 then
		if pc.get_level() >= 61 and pc.get_level() <= 99 then
		game.drop_item(50024)
  game.drop_item(50025)
  game.drop_item(50031)
  game.drop_item(50032)
   end
  end
end
	  
	  
  end
end
end

Creditos:Keko x arreglar la quest

 

KeKo: Añadida opcion de terminar el evento.

Muy buen aporte