Yardım Cata quest

quest devilcave begin
state start begin
--DC Status Reset
when 20367.chat."Katacomb Durumu Sifirla" with pc.is_gm begin
say_title("Katakomb Bekcisi")
say("")
say_reward("Statu Sifirlandi!")
say("")
game.set_event_flag("dc_versuche",1)
game.set_event_flag("dcgamer",0)
game.set_event_flag("dc_geschaft",0)
end
--Configuration
when 20367.chat."Katamob Ayarlari!" with game.get_event_flag("block_dc_config") == 0 and pc.is_gm begin
game.set_event_flag("dc_is_ok",1)
game.set_event_flag("block_dc_config",1)
game.set_event_flag("dc_versuche",1)
end
--FaiL... Entry
--when 20367.chat."seytan Katakombu (lv.80)" with game.get_event_flag("dc_is_ok") == 1 and pc.getqf("can_in_dc") == 0 and pc.get_level() > 80 begin
--say_title("Katakomb Bekcisi")
--say("")
--say_reward("seytan Katakombunu acamiyorum!")
--say("")
--say_reward("Azraili yenebilecek kisiler gecebilmelidir")
--say_reward("")
--end
--when 20367.chat."seytan Katakombu (lv.80)" with game.get_event_flag("dc_is_ok") == 1 and pc.getqf("can_in_dc") == 1 and pc.get_level() < 80 begin
--say_title("Katakomb Bekcisi")
--say("")
--say_reward("Sen cok zayifsin gecemezsin")
--say("")
--end
--Sensenmannrelikt Abgabe!
--when 20367.take with item.vnum == 30122 and pc.getqf("can_in_dc") == 0 begin
--if pc.get_level() < 80 then
--say_title("Katakomb Bekcisi")
--say("")
--say_reward("80 Level olman lazim.")
--say("")
--else
--item.remove()
--say_title("Katakomb Bekcisi")
--say("")
--say_reward("seytan Katacombuna girebilirsiniz.")
--say("")
--pc.setqf("can_in_dc", 1)
--end
--end
--Entry
when 20367.chat."seytan Katakombu (lv.80)" with game.get_event_flag("dc_is_ok") == 1 and pc.getqf("can_in_dc") == 0 begin
if pc.get_level() < 80 then
say_title("Katakomb Bekcisi")
say("")
say_reward("Katakomba Girmek İcin levelin Yeterli Degil!")
say("")
else
say_title("Katakomb Bekcisi")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
say("")
wait()
say_title("Katakomb Bekcisi")
say("")
say("simdiye Kadar "..game.get_event_flag("dcgamer").." Kisi Onu Yoketmeye calisti ")
say("ve"..game.get_event_flag("dc_geschaft").." Kez Yokedildi")
say("Azraili Yenmek İcin!")
wait()
say_title("Katakomb Bekcisi")
say("")
say_reward("Denemek İstermisin")
say_reward("Onu "..game.get_event_flag("dc_versuche")..". kez")
say_reward("yenmek istiyor musun?")
say("")
local dc_login = select("Evet", "Hayir")
if dc_login == 1 then
pc.warp(314800, 1209800)
elseif dc_login == 2 then
return
end
end
end
--Ebene 1
when login with pc.get_map_index() == 300 begin
game.set_event_flag(("dcgamer"), game.get_event_flag("dcgamer")+1)
game.set_event_flag(("dc_versuche"), game.get_event_flag("dc_versuche")+1)
say_title("seytan Katakombu")
say("2.Seviyeye Gecmek İcin Asagidaki İteme İhtiyacin Var..")
say_item("Ruh Kristali Anahtari", 30311, "")
say("İtemi Bulduktan Sonra Heykelin ustune Surukleyin!")
say("")
say_reward("İyi sanslar!")
say("")
pc.setqf("sksgedroppt", 0)
end
when kill with not npc.is_pc() and pc.get_map_index() == 300 begin
local sks = number(1,15)
if sks==1 and pc.getqf("sksgedroppt")==0 then
pc.setqf("sksgedroppt", 1)
chat("Ruh Kristali Anahtari dustu!")
game.drop_item(30311, 1)
else
chat("Anahtar bu canavarda degil")
end
end
when 30101.take with item.vnum == 30311 begin
item.remove()
d.new_jump_all(300, 3636, 12086)
timer("dc1", 600)
d.notice("Tas Kaplumbaganin yanina gitmen gerek.")
d.notice("Sadece 10 Dakikan Var")
d.regen_file("data/dungeon/devilcave/dc_regen_ebene2.txt")
d.regen_file("data/dungeon/devilcave/dc_regen_tore.txt")
d.regen_file("data/dungeon/devilcave/dc_regen_tore_left.txt")
d.spawn_mob(30103, 741, 221)
end
when dc1.timer begin
d.notice("Zaman Doldu!")
warp_all_to_village()
end







when dc20.timer begin
d.notice("Son 50 Dakika !")
timer("dc3", 300)
end
when dc30.timer begin
d.notice("Son 45 Dakika !")
timer("dc4", 300)
end
when dc40.timer begin
d.notice("Son 40 Dakika !")
timer("dc5", 300)
end
when dc50.timer begin
d.notice("Son 35 Dakika !")
timer("dc6", 300)
end
when dc60.timer begin
d.notice("Son 30 Dakika !")
timer("dc7", 300)
end
when dc70.timer begin
d.notice("Son 25 Dakika !")
timer("dc8", 300)
end
when dc80.timer begin
d.notice("Son 20 Dakika !")
timer("dc9", 300)
end
when dc90.timer begin
d.notice("Son 15 Dakika !")
timer("dc10", 300)
end
when dc100.timer begin
d.notice("Son 10 Dakika !")
timer("dc11", 300)
end
when dc101.timer begin
d.notice("Son 5 Dakika !")
timer("dc12", 300)
end
when dc110.timer begin
d.notice("Zaman Doldu!")
warp_all_to_village()
end
--Ebene 2
when 30103.chat."Devam...(Kat 3)" begin
npc.purge()
say_reward("Yazit :")
say("Uzun Bir Yola Hazir Ol..")
wait()
d.new_jump_all(300, 4427, 12284)
timer("dc1", 6000)
timer("dc2", 600)
d.setf("goto_ebene3", 0)
d.notice("Daha uzun bir yol var.")
d.notice("Kristal metini bul ve yok et.")
d.regen_file("data/dungeon/devilcave/dc_regen_ebene3.txt")
local metindv = number(1,4)
if metindv==1 then
d.spawn_mob(8028, 1351, 348)
d.spawn_mob(8028, 1148, 350)
d.spawn_mob(8028, 1151, 155)
d.spawn_mob(8029, 1351, 149)
end
if metindv==2 then
d.spawn_mob(8028, 1351, 348)
d.spawn_mob(8028, 1148, 350)
d.spawn_mob(8029, 1151, 155)
d.spawn_mob(8028, 1351, 149)
end
if metindv==3 then
d.spawn_mob(8028, 1351, 348)
d.spawn_mob(8029, 1148, 350)
d.spawn_mob(8028, 1151, 155)
d.spawn_mob(8028, 1351, 149)
end
if metindv==4 then
d.spawn_mob(8029, 1351, 348)
d.spawn_mob(8028, 1148, 350)
d.spawn_mob(8028, 1151, 155)
d.spawn_mob(8028, 1351, 149)
end
end
when 8028.kill with pc.in_dungeon() begin
d.notice("Yanlis Metin Yok Edildi!")
end
when 8029.kill with pc.in_dungeon() begin
d.notice("Dogru Metin !")
timer("dc2", 6000)
timer("devils_catacomb_goto_ebene5", 5)
end
when dc2.timer begin
d.notice("Zaman Doldu!")
warp_all_to_village()
end



--Ebene 4 (Labirent)
when devils_catacomb_goto_ebene4.timer begin
d.new_jump_all(300, 3143, 12657)
d.setf("Labirent", 1)
timer("dc3", 600)
d.notice("Labirentin Sonunu Bul!")
d.notice("Runik Diregini Bul")
if game.get_event_flag("dc_is_wartung") == 1 then
d.spawn_mob(20082, 72, 586)
end
end
when 20082.chat."Yazit(Labirent)" with pc.in_dungeon() begin
say_title(".....")
timer("dc3", 6000)
d.notice("Dogru Yolu Buldun Tebrikler.")
timer("devils_catacomb_goto_ebene5", 5)
end
when dc3.timer begin
d.notice("Zaman Doldu!")
warp_all_to_village()
end
--Ebene 6 (Tartaros)
when devils_catacomb_goto_ebene5.timer begin
d.new_jump_all(300, 3917, 12925)
d.notice("Surat totemini bul.")
d.notice("Bazalt dikilitas'in yanina git ve totemi kullan.")
d.spawn_mob(30102, 848, 739)
timer("dc4", 600)
d.regen_file("data/dungeon/devilcave/dc_regen_ebene5.txt")
local tartaros = number(1,4)
if tartaros==1 then
d.spawn_mob(2593, 991, 848)
end
if tartaros==2 then
d.spawn_mob(2593, 999, 652)
end
if tartaros==3 then
d.spawn_mob(2593, 848, 577)
end
if tartaros==4 then
d.spawn_mob(2593, 703, 644)
end
if tartaros==5 then
d.spawn_mob(2593, 692, 817)
end
end
when 2593.kill with pc.in_dungeon() begin
d.notice("Starcruizah yok oldu.")
game.drop_item(30312, 1)
end
when 30102.take with item.vnum == 30312 begin
timer("dc4", 6000)
item.remove()
npc.purge()
say_reward("...")
d.notice("Basarili!")
timer("devils_catacomb_goto_ebene6", 5)
end
when dc4.timer begin
d.notice("Zaman Doldu!")
warp_all_to_village()
end
--Ebene 7 (Charon)
when devils_catacomb_goto_ebene6.timer begin
d.new_jump_all(300, 4411, 12736)
timer("dc5", 600)
d.notice("Son Asama İcin Kharonu oldurun!")
d.regen_file("data/dungeon/devilcave/dc_regen_ebene6.txt")
end
when 2597.kill with pc.in_dungeon() begin
timer("dc5", 6000)
d.notice("Kharonu Yok Ettin")
d.notice("simdi Sira Azrailde!")
timer("devils_catacomb_goto_ebene7", 10)
end
when dc5.timer begin
d.notice("Zaman Doldu!")
warp_all_to_village()
end
--Ebene 8 (Azrael)
when devils_catacomb_goto_ebene7.timer begin
d.new_jump_all(300, 3147, 13191)
d.notice("Azrail'i Yoket Ve odulunu Al!")
d.regen_file("data/dungeon/devilcave/dc_regen_ebene7.txt")
end
when 2685.kill with pc.in_dungeon() begin
game.set_event_flag(("dc_geschaft"), game.get_event_flag("dc_geschaft")+1)
local level = pc.get_level()
d.notice("Tebrikler!")
d.kill_all()
d.kill_all()
notice_all(""..pc.get_name().." adli oyuncu."..(level).." Levelde seytan Katakombunda Azraili Yoketti!")
timer("goout_from_dc", 60)
d.spawn_mob(9012, 74, 1159)
pc.give_item2(50186)
end
end
end