The devilscave.quest that .Nove posted, doesn't work for me, because when i login in the third level, i go back to city.
So, i created my own devil's catacomb quest, without d.s/getf. In fact, the quest isn't a dungeon, but, when finally i kill Charon (vnum 2597), it teleports me to the azrael's level, but, it send me to town too!
And... i don't know why.. if i change d.new_jump_all with pc.warp, it works!
But... a lot of persons killing Charon to go to the last level, it's.. i mean, it's not what i want.
Here the quest.
I hope someone can help me s:
Code:
quest catacumbas begin
state start begin
when 20367.chat."As Catacumbas do Demónio" begin
say_title("Guarda das Catacumbas:")
say("Por um momento chegas a acreditar que")
say("o Fantasma da Morte foi derrotado. Mas")
say("assim que cruzas a entrada para as")
say("Catacumbas do Demónio, um ar gélido abate-se")
say("sobre ti. Imediatamente consegues senti-lo:")
say("a morte reina aqui nas profundezas. Como sempre.")
say("Os gritos das almas amaldiçoadas acompanham")
say("cada passo teu. Apreensivo, ergues a tua arma:")
say("derrotas o Fantasma da Morte uma vez e irás")
say("fazê-lo novamente!")
wait()
say_title("Guarda das Catacumbas:")
say("Deves ser nível 75 para entrares.")
say("Precisas de um Grupo.")
say("")
wait()
if pc.get_level() >= 75 then
say_title("Guarda das Catacumbas:")
say("Sim... vejo que estás preparado")
say("como para entrares nesta nova aventura.")
say("Agora a decisão é tua: Queres entrar?")
local a = select ("Sim", "Não")
if a == 1 then
--if party.is_party() then
say_title("Guarda das Catacumbas:")
say("Serás teleportado.")
say("Boa sorte.")
wait()
pc.warp(415200, 4209200)
pc.setqf("piso", 1)
pc.setqf("droparchave", 1)
--else
--say_title("Guarda das Catacumbas:")
--say("Lamento, precisas de ter um grupo")
--say("para entrares nas catacumbas.")
--end
end
else
say_title("Guarda das Catacumbas:")
say("Desculpa, não és forte o suficiente")
say("como para entrares nas catacumbas.")
end
end
when 2501.kill or 2502.kill or 2503.kill or 2505.kill begin
if pc.getqf("piso") == 1 then
local chave = math.random(1, 500)
if chave >= 490 and pc.getqf("droparchave") == 1 then
pc.setqf("droparchave", 0)
game.drop_item("30311", 1)
end
end
end
when 30101.take with item.get_vnum() == 30311 begin
say_title("Estátua de Kud")
say("Serás teleportado.")
wait()
item.remove()
pc.warp(463200, 4208200)
pc.setqf("piso", 2)
end
when 30103.click begin
say_title("Tartaruga de Rocha")
say("Serás teleportado ao terceiro andar.")
wait()
pc.warp(542700, 4228200)
pc.setqf("piso", 3)
end
when mverdadeira.timer begin
if pc.getqf("piso") == 3 then
say_title("As Catacumbas do Demónio")
say("Serás teleportado.")
wait()
d.new_jump_all(209, 3143, 12657)
pc.setqf("piso", 4)
end
end
when 30104.click begin
if pc.getqf("piso") == 4 then
say_title("Estaca com Runas")
say("Serás teleportado.")
wait()
d.new_jump_all(209, 4917, 42925)
pc.setqf("piso", 5)
end
end
when 2591.kill begin
game.drop_item("30312", 1)
end
when 8038.kill begin
local sorte = math.random(1, 7)
if sorte == 1 then
pc.setqf("mverdadeira1", 1)
if pc.getqf("mverdadeira1") == 1 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
elseif sorte == 2 then
pc.setqf("mverdadeira2", 2)
if pc.getqf("mverdadeira2") == 2 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
elseif sorte == 3 then
pc.setqf("mverdadeira3", 3)
if pc.getqf("mverdadeira3") == 3 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
elseif sorte == 4 then
pc.setqf("mverdadeira2", 4)
if pc.getqf("mverdadeira4") == 4 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
elseif sorte == 5 then
pc.setqf("mverdadeira5", 2)
if pc.getqf("mverdadeira5") == 5 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
elseif sorte == 6 then
pc.setqf("mverdadeira2", 6)
if pc.getqf("mverdadeira6") == 6 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
elseif sorte == 7 then
pc.setqf("mverdadeira2", 7)
if pc.getqf("mverdadeira7") == 7 then
timer("mverdadeira", 3)
notice("Destruiram a metin verdadeira.")
else
notice("Destruiram uma metin falsa.")
end
end
end
when 30102.take with item.get_vnum() == 30312 begin
say_title("Obelisco de Basalto")
say("Serás teleportado.")
wait()
item.remove()
pc.setqf("piso", 6)
pc.warp(542200, 4278200)
end
when 2597.kill begin
timer("piso7", 3)
end
when piso7.timer begin
if pc.getqf("piso") == 6 then
say_title("As Catacumbas do Demónio")
say("Serão teleportados.")
wait()
d.new_jump_all(209, 4147, 43191)
pc.setqf("piso", 7)
end
end
when 2598.kill begin
if pc.getqf("piso") == 7 then
notice_all("O Grupo de "..pc.get_name().." matou o Azrael!")
timer("mandar_cidade", 30)
end
end
when mandar_cidade.timer begin
say_title("As Catacumbas do Demónio")
say("Parabéns por completarem as Catacumbas!")
say("Agora serão teleportados às vossas cidades.")
wait()
warp_to_village()
pc.setqf("piso", 0)
pc.setqf("droparchave", 0)
end
when 45minutos.timer begin
say_title("As Catacumbas do Demónio")
say("Aventureiros, o tempo esgotou-se.")
say("Serão teleportados às vossas cidades.")
wait()
warp_to_village()
end
when login with pc.get_map_index() == 209 begin
if pc.getqf("piso") == 1 then
say_title("As Catacumbas do Demónio")
say("Neste primeiro piso, deves matar os monstros")
say("até encontrares a Chave de Azurite.")
say_item_vnum(30311)
say("Quando a possuires, tens que a colocar na ")
say("Estátua de Kud, localizada no final deste mesmo")
say("Piso. Tens 45 minutos para completares o mapa todo")
say("por isso, apressa-te! Boa sorte!")
timer("45minutos", 2700)
elseif pc.getqf("piso") == 2 then
say_title("As Catacumbas do Demónio")
say("Parabéns, Chegaste ao segundo piso.")
say("Aqui terás que encontrar o caminho até à ")
say("Tartaruga de Rocha. Ela levar-te-á até ao ")
say("piso seguinte.")
elseif pc.getqf("piso") == 3 then
say_title("As Catacumbas do Demónio")
say("Neste terceiro piso, deverás descobrir")
say("qual a Metin verdadeira, destruindo todas")
say("as Metins da Desforra que vires.")
say("Quando a verdadeira for destruída, ")
say("passarão para o piso 4.")
elseif pc.getqf("piso") == 4 then
say_title("As Catacumbas do Demónio")
say("Aqui no Labirinto, deverão encontrar")
say("o caminho correto para chegar à Estaca ")
say("com Runas. Deverão seguir uma combinação")
say("correta, através dos portais, para chegar a ela.")
elseif pc.getqf("piso") == 5 then
say_title("As Catacumbas do Demónio")
say("No quinto andar das catacumbas, devem matar")
say("o Boss Tártaros, de modo a obter o Totem de Rosto.")
say_item_vnum(30312)
say("Uma vez que possuam este item, deverão mete-lo no")
say("Obelisco de Basalto.")
elseif pc.getqf("piso") == 6 then
say_title("As Catacumbas do Demónio")
say("Mata o Boss Charon e chegarás ao último")
say("andar das Catacumbas.")
elseif pc.getqf("piso") == 7 then
notice("Último andar das Catacumbas.")
notice("Matem o Azrael.")
end
end
end
end
