HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!
Öncelikle şunu belirteyim quest yapımı bana ait değildir. Katakomba girerken lusiferı bir kez kesmek yeterli olmuyordu her girmek istediğinizde lusifer kesmek zorunda kalıyordunuz bunu düzelttim ve benimle aynı sorunu yaşayan insanlar varsa faydalansınlar istedim map index kısımlarını kendime göre düzenledim sizde isterseniz değiştirebilirsiniz bu şekilde kalsa bile bir sıkıntı oluşacağını zannetmiyorum umarım faydalı olmuşumdur.
Kod:
[/B]
[B]quest seytan_katakombu begin
state start begin
when 1093.kill with pc.in_dungeon() and pc.get_map_index() >= 200 and pc.get_map_index() < 200 begin
d.kill_all()
notice_in_map("Görevi başarıyla tamamladın.")
notice_in_map("Bir kaç dakika içerisinde ışınlanacaksın.")
notice_in_map("Seni Şeytan Katakombu'nda bekleyeceğim!")
notice_in_map("Peşimden gel, öfkem felaketin olsun!")
d.kill_all()
timer("devil_end_jump", 30)
game.set_event_flag("Azrail_dead",1)
local times = get_time() + 28800 --Wartezeit
game.set_event_flag("Go_catacomb", times)
end
when devil_end_jump.timer begin
d.exit_all()
end
when 20367.chat."Şeytan Katakombu'na gider" with pc.get_map_index() == 65 begin
if get_time() > game.get_event_flag("Go_catacomb") then
game.set_event_flag("Azrail_dead",0)
end
if pc.level < 75 then
say_title("Katakomb Bekçisi:")
say("75. seviyenin altında oldugun için")
say("katakombu başaramazsın..")
return
end
if game.get_event_flag("Azrail_dead") == 0 then
say("Şeytanın İnine şimdi girmek istiyor musun?")
local s = select("Evet", "Girme")
if s == 1 then
pc.warp(315200,1209200)
return
end
end
end
when login with pc.get_map_index() == 216 begin
say("Ruh Kristalı Anahtarı'nı ele geçirmek için")
say("yaratıkları yok et. Bu")
say("sana 2. katın kapısını açar.")
pc.set_warp_location(65 , 5913, 995)
end
when 2503.kill or
2504.kill or
2505.kill begin
local rka = number(1,10)
if rka==1 then
game.drop_item(30311, 1)
end
end
when 30101.take with item.vnum == 30311 begin
item.remove()
say("Kapı artık açık.")
say("Acele edin gidelim.")
wait()
say("Şimdi gerçek bir macera başlıyor.")
say("2. seviyeye geçmek için sadece bir saatin var.")
wait()
d.new_jump_all(216, 3622, 12079)
d.setf("catacomb_kat2", 1)
game.set_event_flag("Azrail_dead",0)
end
when login with pc.in_dungeon() and d.getf("catacomb_kat2") == 1 begin
d.regen_file("data/dungeon/katakomb/catacomb_kat2.txt")
say("3. seviyeye geçmek için kapalı kapıları yok et.")
say("")
say("")
say("60 dakika kaldı!")
timer("catacomb_5dakika", 3300)
timer("catacomb_10dakika", 3000)
timer("catacomb_20dakika", 2400)
timer("catacomb_30dakika", 1800)
timer("catacomb_30dakika", 900)
timer("catacomb_bitti", 3600)
pc.set_warp_location(65 , 5913, 995)
end
when 30103.chat."Özel bölüm" with pc.count_item(30319) > 0 begin
say("Kapalı kapıları kırdın ve buraya kadar geldin.")
wait()
say("Azrail'i görebilmen için Küçülen Kafa'ya ")
say("ihtiyacın var.")
say("")
say("Küçülen Kafa'ya sahip değilsen mağaradan")
say("dışarı atılacaksın.")
pc.remove_item(30319)
game.set_event_flag("Azrail_dead",0)
wait()
npc.purge()
timer("katakomb_kat_3", 3)
end
when katakomb_kat_3.timer begin
d.jump_all(3072+1376, 12032+250)
d.regen_file("data/dungeon/katakomb/catacomb_kat3.txt")
d.notice("Gerçek Misilleme Metinini bul ve yok et!")
d.setf("catacomb_metin", 2)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 2 begin
d.notice("Bu Metin taşı sahte, gerçeğini bul.")
d.setf("catacomb_metin", 3)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 3 begin
d.notice("Bu Metin taşı sahte, gerçeğini bul.")
d.setf("catacomb_metin", 4)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 4 begin
d.notice("Bu Metin taşı sahte, gerçeğini bul.")
d.setf("catacomb_metin", 5)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 5 begin
d.notice("Bu Metin taşı sahte, gerçeğini bul.")
d.setf("catacomb_metin", 6)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 6 begin
d.notice("Bu Metin taşı sahte, gerçeğini bul.")
d.setf("catacomb_metin", 7)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 7 begin
d.notice("Bu Metin taşı sahte, gerçeğini bul.")
d.setf("catacomb_metin", 8)
end
when 8038.kill with pc.in_dungeon() and d.getf("catacomb_metin") == 8 begin
d.notice("Gerçek Metin taşı yokedildi. 4. seviyeye hızlı bir şekilde devam edelim.")
timer("catacomb_labirent", 5)
end
when catacomb_labirent.timer begin
d.setf("level", 4)
d.jump_all(3072+70, 12032+585)
d.regen_file("data/dungeon/katakomb/catacomb_kat4.txt")
d.notice("5. seviyeye ulaşmak için labirentte yolunuzu bulun!")
local lab = number(1,4)
if lab == 1 then
d.regen_file("data/dungeon/katakomb/catacomb_warps1.txt")
end
if lab == 2 then
d.regen_file("data/dungeon/katakomb/catacomb_warps2.txt")
end
if lab == 3 then
d.regen_file("data/dungeon/katakomb/catacomb_warps3.txt")
end
if lab == 4 then
d.regen_file("data/dungeon/katakomb/catacomb_warps4.txt")
end
end
when 30104.chat."5. seviyeye ilerle" begin
say("Şeytan ruhlarını hissedebiliyor musun?")
wait()
say("Devam etmek istiyor musun?")
wait()
timer("katakomb_kat_5", 6)
end
when katakomb_kat_5.timer begin
d.setf("level", 5)
d.jump_all(3072+846, 12032+898)
d.regen_file("data/dungeon/katakomb/catacomb_kat5.txt")
d.notice("Tartorusları yen ve altıncı seviyeye geçebilmek için Surat Totemini ele geçirin.")
local gar = number(1,5)
if gar == 1 then
d.regen_file("data/dungeon/katakomb/catacomb_boss1.txt")
end
if gar == 2 then
d.regen_file("data/dungeon/katakomb/catacomb_boss2.txt")
end
if gar == 3 then
d.regen_file("data/dungeon/katakomb/catacomb_boss3.txt")
end
if gar == 4 then
d.regen_file("data/dungeon/katakomb/catacomb_boss4.txt")
end
if gar == 5 then
d.regen_file("data/dungeon/katakomb/catacomb_boss5.txt")
end
end
when 2591.kill begin
local tar = number(1,1)
if tar==1 then
game.drop_item(30312, 1)
end
end
when 30102.take with item.vnum == 30312 begin
d.notice("Uzaklardan ulumaları duyuluyor. Gaddar Azrail'i uyandırdınız.")
item.remove()
npc.purge()
timer("catacomb_kat_6", 6)
end
when catacomb_kat_6.timer begin
d.setf("level", 6)
d.jump_all(3072+1358, 12032+671)
d.regen_file("data/dungeon/katakomb/catacomb_kat6.txt")
d.notice("Kharoon ve diğer tüm düşmanları yenin!")
end
when 2597.kill begin
d.kill_all()
timer("catacomb_1kharoon", 5)
end
when catacomb_1kharoon.timer begin
say("Kharoon'u öldürdün. Mağaranın en son")
say("seviyesine ışınlanıyorsunuz.")
timer("catacomb_kharoon", 5)
end
when catacomb_kharoon.timer begin
d.setf("level", 7)
d.jump_all(3072+73, 12032+1157)
d.regen_file("data/dungeon/katakomb/catacomb_kat7.txt")
d.notice("Azrail'i yenin!")
end
when 2598.kill begin
d.kill_all()
timer("catacomb_1azrail", 5)
end
when catacomb_1azrail.timer begin
say("Azrail yenildi. Devil's Catacomb'a nihayet")
say("huzur hakim. Şimdi yeryüzüne ışınlanacaksın.")
timer("catacomb_azrail", 30)
end
when catacomb_5dakika.timer begin
d.notice("Kalan süre: 5 dakika")
end
when catacomb_10dakika.timer begin
d.notice("Kalan süre: 10 dakika")
end
when catacomb_20dakika.timer begin
d.notice("Kalan süre: 20 dakika")
end
when catacomb_30dakika.timer begin
d.notice("Kalan süre: 30 dakika")
end
when catacomb_45dakika.timer begin
d.notice("Kalan süre: 45 dakika")
d.exit_all()
end
when catacomb_bitti.timer begin
game.set_event_flag("kuleazrail",0)
d.notice("Süre bitti!")
d.exit_all()
end
when catacomb_azrail.timer begin
d.exit_all()
end
end
end
Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)
Benzer konular
