Unk3n0w7 1,321 Posted September 26, 2013 boas pessoal , hoje venho partilhar uma quest que para conseguirem cavalo têm que matar x moob ! Vi esta quest no metin2zone e quis partilhar ! PS : A Quest está em espanhol ! Quem traduzir agradecia ! quest NuevaCaballo begin state start begin local s = find_npc_by_vnum(20349) if s != 0 then target.vid("__TARGET__", s, "Consigue tu caballo inicial") end when __TARGET__.target.click or 20349.chat."Consigue tu caballo inicial" with pc.get_level() < 1 begin target.delete("__TARGET__") say_title("Chico del establo:") say("Con esta funcion te permitire") say("Subir de nivel tu caballo") say("Pero tienes que matar 20 perros") say("Despues de subirlo podras cabalgar") say("Saludos.") say("") locale temo = select ("Si lo quiero" , "Salir") if temo == 2 then return end if temo == 1 then timer("tiempo", 1200) q.set_counter("perros", 20) end when 101.kill with q.set_counter("perros") == 0 begin say_title("".. pc.get_name() ..":") say("Felizidades as conseguido matar los perros") say("En el tiempo estimado...") say("Tu premio:") say_reward("Caballo principiante") horse.set_level(1) horse.summon() set_state(mester) end when tiempo.timer begin say_title("Fracasaste la micion") say("Lo siento pero as fracasado") say("Intenta de nuevo :c") end state mester begin local d = find_npc_by_vnum(20349) if d != 0 then target.vid("__TARGET__", d, "Consigue tu caballo armado") end when __TARGET__.target.click or 20349.chat."Consigue tu caballo armado" with pc.get_level() < 25 begin target.delete("__TARGET__") say_title("Chico del establo:") say("Con esta funcion te permitire") say("Subir de nivel tu caballo") say("Pero tienes que matar 20 perros") say("Despues de subirlo podras cabalgar") say("Saludos.") say("") locale temo1 = select ("Si lo quiero" , "Salir") if temo == 2 then return end if temo == 1 then timer("tiempo1", 1200) q.set_counter("perros1", 20) end when 101.kill with q.set_counter("perros1") == 0 begin say_title("".. pc.get_name() ..":") say("Felizidades as conseguido matar los perros") say("En el tiempo estimado...") say("Tu premio:") say_reward("Caballo principiante") horse.set_level(11) horse.summon() set_state(mester1) end when tiempo1.timer begin say_title("Fracasaste la micion") say("Lo siento pero as fracasado") say("Intenta de nuevo :c") end state mester1 begin local a = find_npc_by_vnum(20349) if a != 0 then target.vid("__TARGET__", a, "Consigue tu caballo militar") end when __TARGET__.target.click or 20349.chat."Consigue tu caballo militar" with pc.get_level() < 50 begin target.delete("__TARGET__") say_title("Chico del establo:") say("Con esta funcion te permitire") say("Subir de nivel tu caballo") say("Pero tienes que matar 20 perros") say("Despues de subirlo podras cabalgar") say("Saludos.") say("") locale temo1 = select ("Si lo quiero" , "Salir") if temo == 2 then return end if temo == 1 then timer("tiempo2", 1200) q.set_counter("perros2", 20) end when 101.kill with q.set_counter("perros2") == 0 begin say_title("".. pc.get_name() ..":") say("Felizidades as conseguido matar los perros") say("En el tiempo estimado...") say("Tu premio:") say_reward("Caballo principiante") horse.set_level(21) horse.summon() set_state(completada) end when tiempo2.timer begin say_title("Fracasaste la micion") say("Lo siento pero as fracasado") say("Intenta de nuevo :c") end end state completada begin endend Fonte : Metin2Zone ! 2 carlos9534 and źĩмßáßŵúĕ reacted to this Share this post Link to post Share on other sites
SINOLOGY 220 Posted February 12, 2014 Esta quest está a dar-me o seguinte erro:Pelo que entendo de Inglês cheguei à conclusão que há algum problema na quest em relação ao comando when ou falta-me alguma função Cumprimentos; BURNERD. Share this post Link to post Share on other sites
Mastema 98 Posted February 13, 2014 Acho que precisas de meter 3 ou 4 end no final da quest Share this post Link to post Share on other sites
SINOLOGY 220 Posted February 13, 2014 Bem pessoal, já estive de roda da quest e já corrigi (penso eu) alguns erros, mas agora consigo um novo erro: Deixo aqui o meu .quest de agora (ainda com algum erro): quest cavalo begin state start begin when login with pc.get_level() > 1 begin local s = find_npc_by_vnum(20349) if s != 0 then target.vid("__TARGET__", s, "Consigue tu caballo inicial") end end when __TARGET__.target.click or 20349.chat."Consigue tu caballo inicial" with pc.get_level() > 1 begin target.delete("__TARGET__") say_title("Chico del establo:") say("Con esta funcion te permitire") say("Subir de nivel tu caballo") say("Pero tienes que matar 20 perros") say("Despues de subirlo podras cabalgar") say("Saludos.") say("") locale temo0 = select ("Si lo quiero" , "Salir") if temo0 == 2 then return end if temo0 == 1 then timer("tiempo", 1200) pc.setqf("perros", 20) q.set_counter("PerrosSalvajes", 20) end when 101.kill begin local s = pc.getqf("perros") if s <= 20 then pc.setqf("perros", s) q.set_counter("PerrosSalvajes", s) end if s == 0 then say_title("".. pc.get_name() ..":") say("Felizidades as conseguido matar los perros") say("En el tiempo estimado...") say("Tu premio:") say_reward("Caballo principiante") horse.set_level(1) horse.summon() set_state(seguir) end end when tiempo.timer begin say_title("Fracasaste la micion") say("Lo siento pero as fracasado") say("Intenta de nuevo ....") end end state seguir begin when login with pc.get_level() > 25 begin local s = find_npc_by_vnum(20349) if s != 0 then target.vid("__TARGET__", s, "Consigue tu caballo armado") end end when __TARGET__.target.click or 20349.chat."Consigue tu caballo armado" with pc.get_level() > 25 begin target.delete("__TARGET__") say_title("Chico del establo:") say("Con esta funcion te permitire") say("Subir de nivel tu caballo") say("Pero tienes que matar 20 perros") say("Despues de subirlo podras cabalgar") say("Saludos.") say("") locale temo1 = select ("Si lo quiero" , "Salir") if temo1 == 2 then return end if temo1 == 1 then timer("tiempo1", 1200) q.set_counter("PerrosSalvajes", 20) pc.setqf("perros1", 20) end when 101.kill begin local d = pc.getqf("perros1") if d <= 20 then pc.setqf("perros1", d) q.set_counter("PerrosSalvajes", d) end if d == 0 then say_title("".. pc.get_name() ..":") say("Felizidades as conseguido matar los perros") say("En el tiempo estimado...") say("Tu premio:") say_reward("Caballo principiante") horse.set_level(11) horse.summon() set_state(siguiendo) end end when tiempo1.timer begin say_title("Fracasaste la micion") say("Lo siento pero as fracasado") say("Intenta de nuevo ....") end end state siguiendo begin when login with pc.get_level() > 50 begin local s = find_npc_by_vnum(20349) if s != 0 then target.vid("__TARGET__", s, "Consigue tu caballo militar") end end when __TARGET__.target.click or 20349.chat."Consigue tu caballo militar" with pc.get_level() > 50 begin target.delete("__TARGET__") say_title("Chico del establo:") say("Con esta funcion te permitire") say("Subir de nivel tu caballo") say("Pero tienes que matar 20 perros") say("Despues de subirlo podras cabalgar") say("Saludos.") say("") locale temo2 = select ("Si lo quiero" , "Salir") if temo2 == 2 then return end if temo2 == 1 then timer("tiempo2", 1200) q.set_counter("PerrosSalvajes", 20) pc.setqf("perros2", 20) end when 101.kill begin local a = pc.getqf("perros2") if a <= 20 then pc.setqf("perros2", a) q.set_counter("PerrosSalvajes", a) end if a == 0 then say_title("".. pc.get_name() ..":") say("Felizidades as conseguido matar los perros") say("En el tiempo estimado...") say("Tu premio:") say_reward("Caballo principiante") horse.set_level(21) horse.summon() set_state(completada) end end when tiempo2.timer begin say_title("Fracasaste la micion") say("Lo siento pero as fracasado") say("Intenta de nuevo ....") end endstate completada begin endend Share this post Link to post Share on other sites
мαя¢σs ๖ۣۣۜDaniel 69 Posted April 9, 2014 alguém ajuda na quest? já tentei resolver mas não consigo :s Share this post Link to post Share on other sites
Z3R0 33 Posted January 4, 2016 Alguem poderia corrigir a quest ? Share this post Link to post Share on other sites
[DEV]Runah 341 Posted January 4, 2016 https://mega.nz/#!ShlVhboa!V-vDS0TlrJgmnu_US9IK5Uf4MnJSbnYyQjFJLAoJWjU http://pastie.org/10669170 fiz de cabeça n testei mas deve dar. 1 NOO reacted to this Share this post Link to post Share on other sites