Salutare tuturor
In sfarsit am rezolvat faptul ca nu aparea dragonul dar acum m-am lovit de altceva ce nu gasesc rezolvare...
Omor dragonul dar nu imi apare nimic scris si nu ma teleporteaza din camera. Dupa ce il omor ma lasa tot acolo si nu se mai intampla nimic.
Ce pot face sa ma teleporteze de exemplu inapoi in v4 ?

Este de la quest. Posteaza questul aici

FreshXL scrie:Este de la quest. Posteaza questul aici

Este questul de la tine

----------------------------------------------------
--Camera_de_cristal_by_demonn
----------------------------------------------------
quest Camera_de_cristal begin
state start begin

when 30121.chat."Templul Dragonului." with pc.get_map_index() == 73 begin
if get_time() > game.get_event_flag("Grotte_time") then
game.set_event_flag("Grotte_zugang",0)
end
if pc.is_gm() or pc.count_item(80041) >= 1 then
say_title(""..mob_name(30123).."")
say("Bun venit "..pc.get_name().."")
say("Nu ai nevoie nici de chei nici de parola")
say("esti GM poti intra cand vrei.")
wait()
pc.warp(843200, 1066900)
return
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) < 3 then
say_title(""..mob_name(30123).."")
say_reward("Pentru a intra în templul lui Beran,")
say_reward("ai nevoie de "..item_name(30179).."")
say_item_vnum(30179)
say_reward("Aceastã cheie rãsucitã picã la Cãpitanul Setaou.")
say_reward("Ai nevoie de trei Chei Rãsucite pentru a intra.")
return
end
if game.get_event_flag("Grotte_zugang") == 1 then
say_title(""..mob_name(30123).."")
pc.setqf("grotte_passworto", 078954687921)
if pc.getqf("abgabe") == 1 then
pc.setqf("abgabe",0)
say("Ai cele trei Chei Rãsucite.")
say("Te voi teleporta imediat în camera de cristal.")
pc.setqf("erlaubt",1)
wait()
pc.warp(843200, 1066900)
return
end
say("Introdu codul ales de liderul grupului.")
local passwort = tonumber(input(""))
--pc.setqf("grotte_passworto", passwort)
if game.get_event_flag("Grotte_passwort") == passwort then
say_title(""..mob_name(30123).."")
say("Ai introdus codul corect.")
if pc.count_item(30179) < 3 then
say("Nu te pot teleporta deoarece nu ai")
say(""..item_name(30179).."")
say_item_vnum(30179)
say("Ai nevoie de cele trei Chei Rãsucite.")
return
end
say("Te voi teleporta imediat.")
pc.setqf("erlaubt",1)
wait()
if pc.can_warp() then
pc.remove_item("30179",3) end
pc.warp(843200, 1066900)
elseif passi != pc.getqf("grotte_passworto") then
say_title(""..mob_name(30123).."")
say("")
return
end
end
if game.get_event_flag("Grotte_zugang") == 0 and pc.count_item(30179) >= 3 then
say_title(""..mob_name(30123).."")
say("Deþin în mine, ultima suflare a zului dragon.")
say("Aceastã suflare magicã te pot ajuta sã mergi în")
say_reward("Camera de cristal.")
say("")
say("Ai nevoie de cele trei chei rãsucite.")
local i = select("Da, Vreau", "Nu, Mulþumesc")
if 1 == i then
say_title(""..mob_name(30123).."")
say("Ai nevoie de un cod pentru tine ºi grupul tãu.")
say("Codul pe care îl vei introduce, va trebui sã ")
say("conþinã maxim 2 cifre.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30179)>=1 then
game.set_event_flag("Grotte_zugang",1)
game.set_event_flag("Grotte_passwort",passwort)
local times = get_time() + 300 --Wartezeit
game.set_event_flag("Grotte_time", times)
say_title(""..mob_name(30123).."")
pc.setqf("abgabe",1)
say("Parola aleasa este: "..passwort.."")
notice_in_map("[Pocal Magic]:Parola camerei alese este "..passwort.." ")
pc.remove_item("30179",3)
else
say_title(""..mob_name(30123).."")
say("Nu ai scris codul corect.")
end
end
end
end
when login with pc.get_map_index() == 189 and not pc.is_gm() begin
if pc.count_item("80041") >= 1 then chat("") return end
if pc.get_level() < 75 or pc.getqf("erlaubt") == 0 and pc.get_map_index() == 189 then
chat("")
warp_to_village()
end
notice_in_map("[Camera de cristal]:Bun venit în camera de cristal ! Incepem prima sarcina a voastra.")
notice_in_map("[Camera de cristal]:Spargeti toate metinele, si aflati care este metinul corespunzator.")
pc.set_warp_location(73 , 1825, 12207)
end
when 8031.kill with pc.get_map_index() == 189 begin
timer("skipia_boss_goo", 10)
notice_in_map("[Camera de cristal]:Ati spart metinul corespunzator.")
notice_in_map("[Camera de cristal]:Il veti intalni pe Beran-Setaou. Ce veti face ?")
d.kill_all()
end
when skipia_boss_goo.timer begin
game.set_event_flag("Grotte_zugang",0)
d.new_jump_all(189, 8432, 10669)
d.setf("grotte_boss", 1)
d.spawn_mob(9012, 64, 142)
end
when 8031.kill or 8032.kill or 8033.kill or 8034.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
local n =d.getf("count") + 1
d.setf("count", n)
notice_in_map("[Camera de cristal]:Ati spart pana acum "..n.." metine.")
if n > 2 then
local t = number(1,4)
notice_in_map("[Camera de cristal]:Beran-Setaou este foarte furios.")
notice_in_map("[Camera de cristal]:Cheama si mai multe metine.")
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
end
end
when 2493.kill with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
d.setf("grotte_boss", 3)
notice_all("Cu o ultima suflare de speranta liderul "..pc.get_name().."")
notice_all("Urmat de razboinici lui de încredere, au reusit sã invinga Dragonul Albastru.")
timer("skipia_boss_end", 60)
d.spawn_mob(9012, 64, 142)
d.kill_all()
d.clear_regen()
end

when login with pc.in_dungeon() and d.getf("grotte_boss") == 2 begin
pc.set_warp_location(73 , 1825, 12207)
end
when login with pc.in_dungeon() and d.getf("grotte_boss") == 1 begin
timer("skipia_boss_end", 3600)
d.set_regen_file("data/dungeon/skia_boss.txt")
local t = number(1,4)
if 1 == t then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == t then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == t then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
local o = number(1,4)
if 1 == o then
d.regen_file("data/dungeon/skia_boss1.txt")
elseif 2 == o then
d.regen_file("data/dungeon/skia_boss2.txt")
elseif 3 == o then
d.regen_file("data/dungeon/skia_boss3.txt")
else
d.regen_file("data/dungeon/skia_boss4.txt")
end
d.setf("grotte_boss", 2)
d.notice("[Camera de cristal]:Aveti la dispozitie 60 de minute sa îi capturati sufletul lui Beran.")
d.setf("count", 0)
pc.set_warp_location(73 , 1825, 12207)
end

when login with pc.in_dungeon() and d.getf("grotte_boss") == 3 begin -- begin
--pc.warp(181700, 1220600)
end
when skipia_boss_end.timer begin
d.exit_all()
end
when skipia_boss_ende.timer begin
kill_all_in_map(189)
game.set_event_flag("Grotte_zugang",0)
d.setf("grotte_boss", 1)
d.exit_all()
end
when login with pc.get_map_index() != 189 or not pc.in_dungeon() begin
pc.setqf("erlaubt",0)
end
end
end

Am revolvat. Era de la directorul ,,map,, la sfarsi avem dungeon end/dungeon start- erau acolo mai multe ramasite de quest

T/C

Marcat ca rezolvat. Topic mutat in Probleme Rezolvate.