seytan_katakombu.lua

[cixx12]

Ö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.

[/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

 

[sasak47]

++

 

[MelihAKINN]

Güncel