Plechito 45 Euro Değerinde Sattığı Zindan (Chamber of Wisdom) + QUEST 1.0

Zindanda 1 adet bug var grupla girildiğinde sınırsız olarak son bossa kadar gelebiliyorsunuz ayrıyetten de türkçeleştirdim ben kullandım çok hoş bir zindan konuya dahil edebilirsin
quest:

quest ChamberWisdom_zone begin
    state start begin
        when login with ChamberWisdomLIB.isActive() begin
            local settings = ChamberWisdomLIB.Settings();          
            if not(party.is_party()) then
                server_timer("ChamberWisdom_FinalExit", settings["dungeon_timer"], d.get_map_index()) ---- Full dungeon timer
                d.set_regen_file("data/dungeon/chamber_of_wisdom/regen_books.txt");
                d.setf("ChamberWisdom_level", 1); d.setf("ChamberWisdom_1st_stone", 1); d.setf("ChamberWisdom_book_mech", 1);
                pc.setqf("ChamberWisdom_reward", 0)
                       
                ChamberWisdomLIB.spawnBooks()
                ChamberWisdomLIB.setOutCoords()
               
                d.spawn_mob_dir(9346, 270, 306, 5)              
                d.spawn_mob(8480, 273, 266)
            end
        end
       
        --Destroying first stone
        when 8480.kill with ChamberWisdomLIB.isActive() and not npc.is_pc() and d.getf("ChamberWisdom_level") == 1 begin
            local settings = ChamberWisdomLIB.Settings();          
            if d.getf("ChamberWisdom_1st_stone") == 1 then
                game.drop_item(settings["Item_Key"], 1);
                d.setf("ChamberWisdom_1st_stone", 0);
            end
        end
       
        ---Putting keys to locked books, if you put key to wrong book, you have to repeat the actual quest again until you unlock the right book
        when 9345.take with item.get_vnum() == 30812 and ChamberWisdomLIB.isActive() and d.getf("ChamberWisdom_level") == 1 begin
            local settings = ChamberWisdomLIB.Settings();          
            if d.getf("ChamberWisdom_book_mech") == 1 then
                if npc.get_vid() == d.get_unique_vid("protected_book_1") then
                    d.kill_unique("protected_book_1")
                    item.remove();
                    game.drop_item(settings["Item_Books"][1], 1);
                    d.setf("ChamberWisdom_book_mech", 2);
                   
                    d.notice("Bilgelik Odasi: Dogru olani actiniz!");
                    d.notice("Bilgelik Odasi: Dikkatli olun, canavarlar geliyor!");
                   
                    timer("ChamberWisdom_1stwave_spawn", 10)
                else
                    item.remove();
                    d.setf("ChamberWisdom_1st_stone", 1);
                    d.spawn_mob(8480, 273, 266);
                   
                    d.notice(string.format("Bilgelik Odasi: Yanlis %s'in anahtari digerlerini deneyiniz!", mob_name(9345)));
                end
                       
            elseif d.getf("ChamberWisdom_book_mech") == 2 then
                if npc.get_vid() == d.get_unique_vid("protected_book_2") then
                    d.kill_unique("protected_book_2")
                    item.remove();
                    game.drop_item(settings["Item_Books"][2], 1);
                    d.setf("ChamberWisdom_book_mech", 3);
                   
                    d.notice("Bilgelik Odasi: Dogru olani actiniz!");
                    d.notice("Bilgelik Odasi: simdi tum taslari yok edin!");
                   
                    timer("ChamberWisdom_2ndwave_spawn", 10)
                else
                    item.remove();
                    d.setf("ChamberWisdom_1st_stone", 1);
                    timer("ChamberWisdom_1stwave_spawn", 10)
                   
                    d.notice(string.format("Bilgelik Odasi: Yanlis %s'in anahtari digerlerini deneyiniz!", mob_name(9345)));
                    d.notice("Bilgelik Odasi: Canavarlar yeniden geliyor!");
                end
               
            elseif d.getf("ChamberWisdom_book_mech") == 3 then
                if npc.get_vid() == d.get_unique_vid("protected_book_3") then
                    d.kill_unique("protected_book_3")
                    item.remove();
                    game.drop_item(settings["Item_Books"][3], 1);
                    d.setf("ChamberWisdom_book_mech", 4);
                   
                    d.notice("Bilgelik Odasi: Dogru olani actiniz!");
                    d.notice("Bilgelik Odasi: Baska bir canavar dalgasi geliyor.");
                   
                    timer("ChamberWisdom_3rdwave_spawn", 10)
                else
                    item.remove();
                    timer("ChamberWisdom_2ndwave_spawn", 10)
                   
                    d.notice(string.format("Bilgelik Odasi: Yanlis %s'in anahtari digerlerini deneyiniz!", mob_name(9345)));
                    d.notice("Bilgelik Odasi: Tum taslari yeniden yok edin!");
                end
               
            elseif d.getf("ChamberWisdom_book_mech") == 4 then
                if npc.get_vid() == d.get_unique_vid("protected_book_4") then
                    d.kill_unique("protected_book_4")
                    item.remove();
                    game.drop_item(settings["Item_Books"][4], 1);
                    d.setf("ChamberWisdom_level", 2); d.setf("ChamberWisdom_book_mech", 0);
                   
                    d.notice("Bilgelik Odasi: Dogru olani actiniz!");
                    d.notice(string.format("Bilgelik Odasi: Tum kitaplari %s konumuna gotur.", mob_name(9346)));
                end
            end
        end
       
        ----Spawning first wave of monsters
        when ChamberWisdom_1stwave_spawn.timer begin
            d.regen_file("data/dungeon/chamber_of_wisdom/regen_1f_a.txt");          
            d.setf("ChamberWisdom_monsters_1c", d.count_monster()); d.setf("ChamberWisdom_monsters_1", 1);
        end
       
       
        ---Killing first wave of monsters
        when kill with ChamberWisdomLIB.isActive() and not npc.is_pc() and d.getf("ChamberWisdom_monsters_1") == 1 begin
            local settings = ChamberWisdomLIB.Settings();          
            if pc.get_x() > 11464 and pc.get_y() > 22728 and pc.get_x() < 11604 and pc.get_y() < 22886 then              
               
                d.setf("ChamberWisdom_monsters_1c", d.getf("ChamberWisdom_monsters_1c")-1)  
                if d.getf("ChamberWisdom_monsters_1c") < 1 then
                    d.setf("ChamberWisdom_monsters_1", 0); d.setf("ChamberWisdom_monsters_1c", 0);
                   
                    game.drop_item(settings["Item_Key"], 1);
                end
            end
        end
       
        ---Spawning 8 stones
        when ChamberWisdom_2ndwave_spawn.timer begin
            d.regen_file("data/dungeon/chamber_of_wisdom/regen_1f_b.txt");          
            d.setf("ChamberWisdom_stone_2", 1);
        end
       
        ----Destroying of all 8 stones
        when 8481.kill with ChamberWisdomLIB.isActive() and not npc.is_pc() and d.getf("ChamberWisdom_level") == 1 begin
            local settings = ChamberWisdomLIB.Settings(); local Stone_count = 8;
           
            if d.getf("ChamberWisdom_stone_2") == 1 then
                d.setf("ChamberWisdom_stone_2_k", d.getf("ChamberWisdom_stone_2_k")+1);
                if (d.getf("ChamberWisdom_stone_2_k") < Stone_count) then
                    d.notice(string.format("Bilgelik odasi:%d tas kaldi!", Stone_count-d.getf("ChamberWisdom_stone_2_k")))
                else
                    d.setf("ChamberWisdom_stone_2", 0); d.setf("ChamberWisdom_stone_2_k", 0);
                    game.drop_item(settings["Item_Key"], 1);
                end
            end
        end
       
        ---Spawning second wave of monsters
        when ChamberWisdom_3rdwave_spawn.timer begin
            d.regen_file("data/dungeon/chamber_of_wisdom/regen_1f_c.txt");          
            d.setf("ChamberWisdom_monsters_2c", d.count_monster()); d.setf("ChamberWisdom_monsters_2", 1);
        end
       
        ----Killing second wave of monsters
        when kill with ChamberWisdomLIB.isActive() and not npc.is_pc() and d.getf("ChamberWisdom_monsters_2") == 1 begin
            local settings = ChamberWisdomLIB.Settings();
           
            if pc.get_x() > 11464 and pc.get_y() > 22728 and pc.get_x() < 11604 and pc.get_y() < 22886 then              
               
                d.setf("ChamberWisdom_monsters_2c", d.getf("ChamberWisdom_monsters_2c")-1)  
                if d.getf("ChamberWisdom_monsters_2c") < 1 then
                    d.setf("ChamberWisdom_monsters_2", 0);
                   
                    game.drop_item(settings["Item_Key"], 1);
                end
            end
        end
       
        ----Talking with professor, you need all 4 book items collected from locked books, after that, boss is spawned
        when 9346.chat."Kitaplarim var" with ChamberWisdomLIB.isActive() and d.getf("ChamberWisdom_level") == 2 begin
            local settings = ChamberWisdomLIB.Settings(); local Items = settings["Item_Books"];      
           
            if pc.count_item(Items[1]) < 1 or pc.count_item(Items[2]) < 1 or pc.count_item(Items[3]) < 1 or pc.count_item(Items[4]) < 1 then
                setskin(NOWINDOW)
                syschat("Bilgelik Odasi: 4 kitabin tumune ihtiyaciniz var!")
            else
           
                for index = 1, table.getn(Items) do
                    pc.remove_item(Items[index], pc.count_item(Items[index]));
                end
               
                addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(225, 150, "chamber_npc3.tga")
                say("[ENTER][ENTER]")
                say_title(string.format("%s:", mob_name(npc.get_race())))
                say("Bu kitaplar cok onemli! Neden sakladiklarini biliyorlardi![ENTER]Bu kitaplar kacinilmasi gereken ozel buyuler iceriyor[ENTER]bu yerde karanlik guc.[ENTER]Burasi buyuk bir sihirbaz tarafindan yapildi![ENTER] Yani ne yaptiklarini biliyorlardi![ENTER]Kitaplari alacagim ve[ENTER]tum bu canavarlari yeniden karanliga gonderecegim!")
                wait()              
                setskin(NOWINDOW)
                npc.kill()
               
                d.notice("Bilgelik Odasi: Onu oldurduler!")
                d.notice("Bilgelik Odasi: Buyuk bir sey geliyor!")
               
                timer("ChamberWisdom_boss_reveal", 10)
            end
        end
       
        ----Spawn of the final boss
        when ChamberWisdom_boss_reveal.timer begin
            local settings = ChamberWisdomLIB.Settings();
           
            d.set_unique("final_boss", d.spawn_mob(settings["boss_data"][1], settings["boss_data"][2], settings["boss_data"][3]))
            d.setf("ChamberWisdom_boss_kill", 1);
        end
       
        ---Killing the final boss
        when 4311.kill with ChamberWisdomLIB.isActive() and d.getf("ChamberWisdom_level") == 2 and d.getf("ChamberWisdom_boss_kill") == 1 begin
            local settings = ChamberWisdomLIB.Settings();
           
            d.setf("ChamberWisdom_boss_kill", 0); d.setf("ChamberWisdom_can_take_reward", 1);
            ChamberWisdomLIB.clearTimers()
            d.spawn_mob_dir(9347, 270, 306, 1)
           
            d.notice("Bilgelik Odasi: Canavari oldurdun!")
            server_timer("ChamberWisdom_FinalExitOut", settings["dungeon_timer_out"], d.get_map_index())
        end
       
        ---Taking reward from magical shelf
        when 9347.chat."Odulunu Al?" with ChamberWisdomLIB.isActive() and d.getf("ChamberWisdom_can_take_reward") == 1 begin
            local settings = ChamberWisdomLIB.Settings();
            local Reward = settings["Item_Reward"];
            local randomNumber = number(1, table.getn(Reward));
           
            if pc.getqf("ChamberWisdom_reward") == 0 then
                if pc.count_item(settings["Item_To_Reward"]) >= 1 then
                    pc.remove_item(settings["Item_To_Reward"], 1)
                    addimage(25, 10, "chamber_wisdom_bg1.tga");
                    say("[ENTER][ENTER]")
                    say_title(string.format("%s:", mob_name(npc.get_race())))
                    say("Dostum Zindani Tamamladin Envanterine Sandıgini[ENTER]Yolladim Bile!!")
                    pc.give_item2(tonumber(Reward[randomNumber]))
                    pc.setqf("ChamberWisdom_reward", 1)
                else
                    setskin(NOWINDOW);
                    syschat(string.format("odul almak icin% s gerekiyor!", item_name(30817)));
                end
            else
                setskin(NOWINDOW);
                syschat("Zaten odulunu aldin!")
            end
        end                                  
       
        --- Dungeon end timer
        when ChamberWisdom_FinalExit.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.notice("Bilgelik Odasi: Basarisiz oldun!")
                server_timer("ChamberWisdom_FinalExitOut", 5, d.get_map_index())
            end
        end
       
        --- After that timer, whole dungeon is closed
        when ChamberWisdom_FinalExitOut.server_timer begin
            if d.select(get_server_timer_arg()) then
                d.exit_all()
            end
        end
       
        ------------
        --Dungeon enter
        ------------
        when 9341.chat."Bilgelik Odasi" with not ChamberWisdomLIB.isActive() begin
            say_size(350,350); addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(220, 200, "chamber_npc1.tga")
            say("[ENTER][ENTER]")
            say_title(string.format("%s:[ENTER]", mob_name(npc.get_race())))
            say("Hey savasci![ENTER]Seni bir saniyeligine odunc alabilir miyim?[ENTER]universitemizde arkadaslarimla calisiyordum[ENTER]ve kotu birsey oldu![ENTER]Kutuphanedeki tum kitaplar canlanmaya basladi.[ENTER]Ve bu en kotu sey bile degil. Buyuk canavar[ENTER]kutuphanemizi ve okulumuzu isgal etti. Yardima ihtiyacimiz var!")
            say_reward("Bunu yapabilir misin?")
            if (select("Evet, tabii", "hayir, uzgunum") == 1) then
                if (party.is_party()) then
                    say_size(350,350); addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(225, 200, "chamber_npc1.tga")
                    say("[ENTER][ENTER]")
                    say_reward("[ENTER][ENTER]Grupla Giremezsiniz")
                   
                else
                    ChamberWisdomLIB.checkEnter()
                    say_size(350,350); addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(225, 200, "chamber_npc1.tga")
                    say_reward("[ENTER]Zindani 60 dakika icinde bitirmelisiniz.[ENTER]Aksi takdirde zindandan[ENTER]isinlanacaksiniz.[ENTER][ENTER]Iyi sanslar dilerim!")
                    wait()
                    ChamberWisdomLIB.CreateDungeon();
                   
                   
                end
            end
        end
       
        ----Picking the key to be able to get reward in the dungeon. Possible only once per defined time (1 day by deafult)
        when 9341.chat."Ozel Anahtar Al(Son Kat Icin Gerekli)" with not ChamberWisdomLIB.isActive() begin
            local settings = ChamberWisdomLIB.Settings();
           
            addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(225, 150, "chamber_npc1.tga")
            say("[ENTER][ENTER]")
            say_title(string.format("%s:", mob_name(npc.get_race())))
           
            if ((get_global_time() - pc.getf("chamber_reward","chamber_reward_time")) < settings["reward_cooldown"]) then
           
                local remaining_wait_time = (pc.getf("chamber_reward","chamber_reward_time") - get_global_time() + settings["reward_cooldown"])
                say("Secene kadar beklemelisin")
                say_item(""..item_name(settings["Item_To_Reward"]).."", settings["Item_To_Reward"], "")
                say("again.[ENTER]")
                say_reward("Tekrar secebilirsin: "..get_time_remaining(remaining_wait_time)..'[ENTER]')
                return
            else
                say(string.format("Bu ozel anahtar %s icindir[ENTER]Acmaniza ve gormenize izin verir[ENTER]Bazen gercekten harika seyler vardir.", mob_name(9347)))
                say_reward("Iste basliyoruz!")
                say_item(""..item_name(settings["Item_To_Reward"]).."", settings["Item_To_Reward"], "")
                pc.give_item2(settings["Item_To_Reward"], 1)
               
                pc.setf("chamber_reward","chamber_reward_time", get_global_time())
                pc.setqf("chamber_reward", get_time() + settings["reward_cooldown"])
            end
        end
        ------------
        --Time reset - ONLY FOR GM
        ------------
                when 9341.chat."Zaman sifirlama" with pc.is_gm() and not ChamberWisdomLIB.isActive() begin
            local settings = ChamberWisdomLIB.Settings();
            addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(225, 150, "chamber_npc1.tga")
            say("[ENTER][ENTER]")
            if select("Zamani sifirla","Kapat") == 2 then return end
                addimage(25, 10, "chamber_wisdom_bg1.tga"); addimage(225, 150, "chamber_npc1.tga")
                say("[ENTER][ENTER]")
                say_title(string.format("%s:[ENTER]", mob_name(npc.get_race())))
                say("[ENTER]Zaman sifirlandi.")
                pc.setf("chamber_of_wisdom","exit_chamber_of_wisdom_time", 0)
                pc.setqf("chamber_of_wisdom", get_time() - settings["dungeon_cooldown"])
        end
       
        ------------
        -- Set waiting time for next enter (1 hour - 3600 seconds)
        ------------
       
        when logout with ChamberWisdomLIB.isActive() begin
            local settings = ChamberWisdomLIB.Settings(); local Items = settings["Item_Books"];      
                       
            for index = 1, table.getn(Items) do
                pc.remove_item(Items[index], pc.count_item(Items[index]));
            end
           
            if not pc.is_gm() then
                pc.setf("chamber_of_wisdom","exit_chamber_of_wisdom_time", get_global_time())
                pc.setqf("chamber_of_wisdom", get_time() + settings["dungeon_cooldown"])
            end
        end
    end
end

Bu da zindanın videosu kendim hazırladım

Zindan Yapılışı Video