Jump to content

Necesito Evento de pascua mejorado


santos2002

Recommended Posts

hola

 

Quest del conejo id 30129 hacer un contador de huevos y cambiarlo por item

total 7:por ejemplo:

 

80 huevos = item

100 huevos = item

140 huevos = item

200 huevos = item

250 huevos = item

300 huevos = item

350 huevos = item

 

la quest que te pongo da 20 huevos a la vez. si la podeis poner que de menos mejor.

 

 

Esta es la quest para añadir lo que pido:

 

-------------------------------------

--Metin2 - 2012

-------------------------------------

quest special_drop begin

state start begin

when 20086.chat."Evento de pascua" with pc.is_gm() begin

say_title("Empezar el evento")

say("Metin2 QueSuerte")

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("pascua_drop", 1)

notice_all("El evento de huevos de pascua a 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 a terminado")

notice_all("esperamos que os haya gustado")

elseif evento == 3 then

return

end

end

when 101.kill or 102.kill or 103.kill or 104.kill or 105.kill or 106.kill or 107.kill or 108.kill or 109.kill or 110.kill or 111.kill or

112.kill or 113.kill or 114.kill or 115.kill or 171.kill or 172.kill or 173.kill or 174.kill or 175.kill or 176.kill or 178.kill or

179.kill or 180.kill or 181.kill or 182.kill or 183.kill or 184.kill or 185.kill or 301.kill or 302.kill or 303.kill or 304.kill or

331.kill or 332.kill or 333.kill or 334.kill or 351.kill or 352.kill or 353.kill or 354.kill or 401.kill or 402.kill or 403.kill or

404.kill or 405.kill or 406.kill or 431.kill or 432.kill or 433.kill or 434.kill or 435.kill or 436.kill or 451.kill or 452.kill or

453.kill or 454.kill or 455.kill or 456.kill or 501.kill or 502.kill or 503.kill or 504.kill or 551.kill or 552.kill or 553.kill or

554.kill or 601.kill or 602.kill or 603.kill or 604.kill or 631.kill or 632.kill or 633.kill or 634.kill or 635.kill or 636.kill or

637.kill or 651.kill or 652.kill or 653.kill or 654.kill or 655.kill or 656.kill or 657.kill or 701.kill or 702.kill or 703.kill or

704.kill or 705.kill or 706.kill or 707.kill or 731.kill or 732.kill or 733.kill or 734.kill or 735.kill or 736.kill or 737.kill or

751.kill or 752.kill or 753.kill or 754.kill or 755.kill or 756.kill or 757.kill or 771.kill or 772.kill or 773.kill or 774.kill or

775.kill or 776.kill or 777.kill or 795.kill or 901.kill or 902.kill or 903.kill or 904.kill or 905.kill or 906.kill or 907.kill or

931.kill or 932.kill or 933.kill or 934.kill or 935.kill or 936.kill or 937.kill or 1001.kill or 1002.kill or 1003.kill or 1004.kill or

1061.kill or 1062.kill or 1063.kill or 1064.kill or 1065.kill or 1066.kill or 1067.kill or 1068.kill or 1069.kill or 1070.kill or

1071.kill or 1101.kill or 1102.kill or 1103.kill or 1104.kill or 1105.kill or 1106.kill or 1107.kill or 1131.kill or 1132.kill or

1134.kill or 1135.kill or 1136.kill or 1137.kill or 1171.kill or 1172.kill or 1173.kill or 1174.kill or 1175.kill or 1176.kill or

1177.kill or 1301.kill or 1302.kill or 1303.kill or 1305.kill or 1331.kill or 1332.kill or 1333.kill or 1334.kill or 1335.kill or

2001.kill or 2002.kill or 2003.kill or 2004.kill or 2005.kill or 2031.kill or 2032.kill or 2033.kill or 2034.kill or 2035.kill or

2036.kill or 2061.kill or 2062.kill or 2063.kill or 2064.kill or 2065.kill or 2051.kill or 2052.kill or 2053.kill or 2054.kill or

2055.kill or 2071.kill or 2072.kill or 2073.kill or 2074.kill or 2075.kill or 2076.kill or 2101.kill or 2102.kill or 2103.kill or

2104.kill or 2105.kill or 2106.kill or 2107.kill or 2108.kill or 2131.kill or 2132.kill or 2133.kill or 2134.kill or 2135.kill or

2151.kill or 2152.kill or 2152.kill or 2153.kill or 2154.kill or 2155.kill or 2156.kill or 2157.kill or 2158.kill or 2201.kill or

2202.kill or 2203.kill or 2204.kill or 2205.kill or 2231.kill or 2232.kill or 2233.kill or 2234.kill or 2235.kill or 2291.kill or

1401.kill or 1402.kill or 1403.kill or 1501.kill or 1502.kill or 1503.kill or 1601.kill or 1602.kill or 1603.kill or 2301.kill or

2302.kill or 2303.kill or 2304.kill or 2305.kill or 2311.kill or 2312.kill or 2313.kill or 2314.kill or 2315.kill or 2306.kill or

2307.kill or 7013.kill or 7014.kill or 7015.kill or 7016.kill or 7017.kill or 7018.kill or 1151.kill or 1152.kill or 1153.kill or

1154.kill or 1155.kill or 1156.kill or 1157.kill with game.get_event_flag("pascua_drop") == 1 begin

local s = number(1, 500)

if s <= 20 then

if pc.get_level() >= 1 and pc.get_level() <= 20 then

game.drop_item(50160)

game.drop_item(50161)

game.drop_item(50162)

game.drop_item(50163)

game.drop_item(50164)

game.drop_item(50165)

game.drop_item(50166)

game.drop_item(50167)

game.drop_item(50168)

game.drop_item(50169)

game.drop_item(50170)

game.drop_item(50171)

game.drop_item(50172)

game.drop_item(50173)

game.drop_item(50174)

game.drop_item(50175)

game.drop_item(50176)

game.drop_item(50177)

game.drop_item(50178)

game.drop_item(50179)

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

 

 

 

nuchas gracias

Link to comment
Share on other sites

modificar esa quest para hacer un contador de huevos de pascua para juntarlos y por ellos den un item.

 

los id de los huevos son del 50161 al 50179

 

lo que quiero pues si cojo 80 huevos tengo un item (hay que poner su id)

si cojo 100 huevos otro mejor item asi hasta 7 diferentes.

 

en esa quest digo que dan los 20 de una vez haber si se baja que den menos de una vez.

Link to comment
Share on other sites

Bueno, al fin no me respondistes, sería algo como esto, termina de editar los comentarios.

 

-------------------------------------
--Metin2 - 2012
-------------------------------------
quest special_drop begin
state start begin
  when 20086.chat."Evento de pascua" with pc.is_gm() begin
   say_title("Empezar el evento")
   say("Metin2 QueSuerte")
   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("pascua_drop", 1)
    notice_all("El evento de huevos de pascua a 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 a terminado")
    notice_all("esperamos que os haya gustado")
   elseif evento == 3 then
    return
   end
  end

  when 101.kill or 102.kill or 103.kill or 104.kill or 105.kill or 106.kill or 107.kill or 108.kill or 109.kill or 110.kill or 111.kill or
  112.kill or 113.kill or 114.kill or 115.kill or 171.kill or 172.kill or 173.kill or 174.kill or 175.kill or 176.kill or 178.kill or
  179.kill or 180.kill or 181.kill or 182.kill or 183.kill or 184.kill or 185.kill or 301.kill or 302.kill or 303.kill or 304.kill or
  331.kill or 332.kill or 333.kill or 334.kill or 351.kill or 352.kill or 353.kill or 354.kill or 401.kill or 402.kill or 403.kill or
  404.kill or 405.kill or 406.kill or 431.kill or 432.kill or 433.kill or 434.kill or 435.kill or 436.kill or 451.kill or 452.kill or
  453.kill or 454.kill or 455.kill or 456.kill or 501.kill or 502.kill or 503.kill or 504.kill or 551.kill or 552.kill or 553.kill or
  554.kill or 601.kill or 602.kill or 603.kill or 604.kill or 631.kill or 632.kill or 633.kill or 634.kill or 635.kill or 636.kill or
  637.kill or 651.kill or 652.kill or 653.kill or 654.kill or 655.kill or 656.kill or 657.kill or 701.kill or 702.kill or 703.kill or
  704.kill or 705.kill or 706.kill or 707.kill or 731.kill or 732.kill or 733.kill or 734.kill or 735.kill or 736.kill or 737.kill or
  751.kill or 752.kill or 753.kill or 754.kill or 755.kill or 756.kill or 757.kill or 771.kill or 772.kill or 773.kill or 774.kill or
  775.kill or 776.kill or 777.kill or 795.kill or 901.kill or 902.kill or 903.kill or 904.kill or 905.kill or 906.kill or 907.kill or
  931.kill or 932.kill or 933.kill or 934.kill or 935.kill or 936.kill or 937.kill or 1001.kill or 1002.kill or 1003.kill or 1004.kill or
  1061.kill or 1062.kill or 1063.kill or 1064.kill or 1065.kill or 1066.kill or 1067.kill or 1068.kill or 1069.kill or 1070.kill or
  1071.kill or 1101.kill or 1102.kill or 1103.kill or 1104.kill or 1105.kill or 1106.kill or 1107.kill or 1131.kill or 1132.kill or
  1134.kill or 1135.kill or 1136.kill or 1137.kill or 1171.kill or 1172.kill or 1173.kill or 1174.kill or 1175.kill or 1176.kill or
  1177.kill or 1301.kill or 1302.kill or 1303.kill or 1305.kill or 1331.kill or 1332.kill or 1333.kill or 1334.kill or 1335.kill or
  2001.kill or 2002.kill or 2003.kill or 2004.kill or 2005.kill or 2031.kill or 2032.kill or 2033.kill or 2034.kill or 2035.kill or
  2036.kill or 2061.kill or 2062.kill or 2063.kill or 2064.kill or 2065.kill or 2051.kill or 2052.kill or 2053.kill or 2054.kill or
  2055.kill or 2071.kill or 2072.kill or 2073.kill or 2074.kill or 2075.kill or 2076.kill or 2101.kill or 2102.kill or 2103.kill or
  2104.kill or 2105.kill or 2106.kill or 2107.kill or 2108.kill or 2131.kill or 2132.kill or 2133.kill or 2134.kill or 2135.kill or
  2151.kill or 2152.kill or 2152.kill or 2153.kill or 2154.kill or 2155.kill or 2156.kill or 2157.kill or 2158.kill or 2201.kill or
  2202.kill or 2203.kill or 2204.kill or 2205.kill or 2231.kill or 2232.kill or 2233.kill or 2234.kill or 2235.kill or 2291.kill or
  1401.kill or 1402.kill or 1403.kill or 1501.kill or 1502.kill or 1503.kill or 1601.kill or 1602.kill or 1603.kill or 2301.kill or
  2302.kill or 2303.kill or 2304.kill or 2305.kill or 2311.kill or 2312.kill or 2313.kill or 2314.kill or 2315.kill or 2306.kill or
  2307.kill or 7013.kill or 7014.kill or 7015.kill or 7016.kill or 7017.kill or 7018.kill or 1151.kill or 1152.kill or 1153.kill or
  1154.kill or 1155.kill or 1156.kill or 1157.kill with game.get_event_flag("pascua_drop") == 1 begin
 
   local s = number(1, 500)
   if s <= 20 then
    if pc.get_level() >= 1 and pc.get_level() <= 20 then
	 local huevo = {
	  50160, 50161, 50162, 50163, 50164, 50165, 50166, 50167, 50168, 50169
	  50170, 50171, 50172, 50173, 50174, 50175, 50176, 50177, 50178, 50179
	 }
	
	 game.drop_item(huevo[math.random(1, 20)])
    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
  when 9005.chat."Los Huevos" begin --Elige tu NPC
   for go = 50160, 50179, 1  do
    cantidad = pc.count_item(go) + cantidad
   end
   say("Tienes un total de " .. cantidad .. " huevos")
   say("Quieres cambiarlos?")
  
   local k = select("Si", "No")
   if k == 1 then
    local premios = {idpremio1, idpremio2, idpremio3, idpremio4, idpremio5, idpremio6, idpremio7} --Aca van los codigos de los premios
    local huevos_necesarios = {uno, dos, tres, cuatro, cinco, seis, siete} --Aca van los numeros de los huevos necesarios para cada premio
    local p = select("Premio 1", "Premio 2", "Premio 3", "Premio 4", "Premio 5", "Premio 6", "Premio 7", "Cancelar")
   
    if p != 8 and cantidad >= huevos_necesarios[p] then
	 say("Ahora tienes " .. item_name(premios[p]))
	 pc.give_item2(premios[p])
	 say("Felicitaciones.")
	 local acumulador_de_huevos = 0
	 for go = 50160, 50179, 1  do
	  if pc.count_item(go) >= huevos_necesarios[p] and acumulador_de_huevos == 0 then
	   pc.remove_item(go, huevos_necesarios[p])
	   break
	  else
	   acumulador_de_huevos = pc.count_item(go) + acumulador_de_huevos
	   if acumulador_de_huevos <= huevos_necesarios[p] then
	    pc.remove_item(go, pc.count_item(go))
	   else
	    pc.remove_item(go, pc.count_item(go) - (acumulador_de_huevos - huevos_necesarios[p]))
	   end
	  
	  end
	 end
    else
	 say("No tienes los huevos necesarios WEON")
    end
   end
  end
end
end
Link to comment
Share on other sites

  • 3 years later...

quest evento begin
state start begin
when npc_id.chat."activar evento" with pc.is_gm() begin
local s = select("si","cancelar","cerrar")
if s == 3 then
return
elseif s == 1 then
game.set_event_flag("easter_drop", 1)
notice_all("evento activo")
elseif s == 2 then
game.set_event_flag("easter_drop", 0)
notice_all("evento inactivo")
end
end

when npc_id.chat."canjear huevos" begin
say("texto")
local s2 = select("canjear","info","cerrar")
if s2 == 3 then
return
elseif s2 == 2 then
say("texto")
elseif s2 == 1 then
local s3 = select("item1","item2","item3","salir")
if s3 == 4 then
return
elseif s3 == 1 then
if pc.count_item(50160)> 2 == false then
chat("error")
else
pc.remove_item(50160,2)
pc.give_item2(29,1)
end
elseif s3 == 2 then
if pc.count_item(50160)> 2 == false then
chat("error")
else
pc.remove_item(50160,2)
pc.give_item2(39,1)
end
elseif s3 == 3 then
if pc.count_item(50179)> 2 == false then
chat("error")
else
pc.remove_item(50179,2)
pc.give_item2(49,1)
end
end
end
end
end
end


 

Link to comment
Share on other sites

quest evento begin

state start begin

when npc_id.chat."activar evento" with pc.is_gm() begin

local s = select("si","cancelar","cerrar")

if s == 3 then

return

elseif s == 1 then

game.set_event_flag("easter_drop", 1)

notice_all("evento activo")

elseif s == 2 then

game.set_event_flag("easter_drop", 0)

notice_all("evento inactivo")

end

end

 

when npc_id.chat."canjear huevos" begin

say("texto")

local s2 = select("canjear","info","cerrar")

if s2 == 3 then

return

elseif s2 == 2 then

say("texto")

elseif s2 == 1 then

local s3 = select("item1","item2","item3","salir")

if s3 == 4 then

return

elseif s3 == 1 then

if pc.count_item(50160)> 2 == false then

chat("error")

else

pc.remove_item(50160,2)

pc.give_item2(29,1)

end

elseif s3 == 2 then

if pc.count_item(50160)> 2 == false then

chat("error")

else

pc.remove_item(50160,2)

pc.give_item2(39,1)

end

elseif s3 == 3 then

if pc.count_item(50179)> 2 == false then

chat("error")

else

pc.remove_item(50179,2)

pc.give_item2(49,1)

end

end

end

end

end

end

 

 

 

men dime porque cuando meto esta quest nunca me drop y donde podria edictar los mob para que me drop en esta quest

 

quest event_oua begin

state start begin

when login begin

if game.get_event_flag("oua_event") == 1 then

notice("Evento: Evento de Pascuas activado!")

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("oua_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(50162)

--game.drop_item(50162)

else

end

else

end

elseif m_ind == 63 or m_ind == 64 and pc.get_level() <= 40 then

if game.get_event_flag("oua_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(50162)

--game.drop_item(50162)

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("oua_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(50162)

--game.drop_item(50162)

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("oua_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(50162)

--game.drop_item(50162)

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("oua_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(50162)

--game.drop_item(50162)

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("oua_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(50162)

--game.drop_item(50162)

else

end

else

end

end

end

end

when 20087.chat."<GM> Evento de Pascuas" with pc.is_gm() begin

if game.get_event_flag("oua_event") == 1 then

say_title("Administrar evento:")

say("")

say("Evento con huevos pascuas : ~ Activo ")

say("")

say_reward("Activar evento?")

local s=select("Si", "No")

if s==1 then

say_title("Administrar evento:")

say("")

say("El evento acabo.")

say("~ Hasta el proximo!")

game.set_event_flag("oua_event", 0)

char_log(0, "Oua_event_end from" ..pc.get_name())

notice_all("Evento con huevos pascuas ~ Terminado.")

elseif s==2 then

say_title("Administrar evento:")

say("")

say("~ Adios!")

end

else

say_title("Administrar evento:")

say("")

say("Evento con huevos pascuas : ~ Cerrado ")

say("")

say_reward("¿Empezar evento?")

local s=select("Si", "No")

if s==1 then

say_title("Administrar evento:")

say("")

say("El evento ~ empezo! .")

say("~ Suerteeee a todoss!")

game.set_event_flag("oua_event", 1)

char_log(0, "Oua_event_start from" ..pc.get_name())

notice_all("Evento con huevos pascuas ~ A empezado !")

elseif s==2 then

say_title("Administrar evento:")

say("")

say("~ Adios!")

end

end

end

when 20087.chat."<GM> Evento con huevos pascuas " with pc.is_gm() begin

if pc.get_name() == "NombreGM" or pc.get_name() == "...."or pc.get_name() == "....."then

say_title("Administrar evento:")

say("")

say("Como quieres que sea el drop?")

say("")

say_reward("Entre 1-100")

say("")

local new_chance = tonumber(input())

if new_chance < 0 or new_chance > 100 then

say_title("Administrar evento:")

say("")

say("Has introducido datos incorrectos~")

else

char_log(0, "Oua_event_chance from" ..pc.get_name().. " to " ..new_chance.. "%")

game.set_event_flag("mond_drop_chance", new_chance)

say_title("Administrar evento:")

say("")

say("Drop actual " ..new_chance.. " setat.")

say("~ Adios !")

end

else

say_title("Administrar evento:")

say("")

say("No tienes los derechos a ejecuta esto.")

end

end

end

end

Link to comment
Share on other sites

Cajas luz luna,huevos pascura etc ya vienen por defecto con opcion de drop en todos los games actuales,no hace falta editar el mob drop,con poner el comando en un event_flag ya dropean,en la quest que puse lo hize asi por que no veo la necesidad de poner .kills en algo que ya viene por defecto

Link to comment
Share on other sites

  • Dilong locked this topic
Guest
This topic is now closed to further replies.
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...