quest energy_sys begin 
    state start begin 
        when 20001.chat."Yeni Bir Teknik" with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin 
            say_title("Simyager") 
            say("Başardım!") 
            say("Nihayet yepyeni bri teknik geliştirebildim.") 
            say("Eşyaları tekrar işeleyerek onlardan saf enerji") 
            say("elde etmenin yolunu buldum.Ne şahane!") 
            wait() 
            say_title("Simyager") 
            say("Eşya benim bulduğum teknikle tahrip edilir ve") 
            say("enerji parçalarına ayrılır.Bu parçaların 30") 
            say("tanesi birleştirilince de güçlü bir enerji") 
            say("kristali elde edilir!Bir mücvher içerisinde") 
            say("toplanmış saf ve filtrelenmemiş bir enerji.Bu") 
            say("güç tüm teçhizatına işler.") 
            say("İlgini çekiyor mu?") 
            wait() 
            say_title("Simyager") 
            say("Avlanırken bulduğun silah, takı ve kıyafet gibi") 
            say("teçhizat malzemelerini bana getir.Onları işleyip") 
            say("enerji parçalarına ayıracağım.Krallığımızın") 
            say("geleceği ve umudu bu tekniğe bağlı.Yenilmez") 
            say("olacağız!") 
            set_state("make") 
        end 
    end 
    state make begin 
        when 20001.chat."Enerji Parçası Elde Et" with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin 
            say_title("Simyager") 
            say("Yapabildin mi?Enerji parçası elde edebildin mi?") 
            say("Simya yardımıyla parçalayabileceğim daha fazla") 
            say("eşya getir bana.Tekniğim henüz mükemmelleşmedi.") 
            say("Bu yüzden ne kadar parça elde edileceğine dair") 
            say("bir garanti veremeyeceğim.") 
            wait() 
            say_title("Simyager") 
            say("Tek bir şart var:Kendi seviyen ve eşyanın") 
            say("seviyesi en az 35 olmalı.Hım bir göz atalım") 
            say("bakalım...")  
            wait() 
            if pc.get_level() < 35 then 
                say_title("Simyager") 
                say("Sen henüz yeterince güçlü değilsin,") 
                say("en az 35 level olmalısın.") 
            else -- NICHT DE 
                say_title("Simyager") 
                say("Ah süper!Güçlü ve tecrübelisin.İşlenecek") 
                say("eşyayı ver bakalım.")         
            end 
             
        end 
         
        when 20001.chat."Enerji Kristali Üret" with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin 
            say_title("Simyager") 
            say("Gücün şimdiden tükendi mi yoksa?Kendini o kadar") 
            say("hırpalayıp hayatını tehlikeye atmamalısın.Enerji") 
            say("kristali üretmek için 30 enerji parçasına") 
            say("ihtiyacım var.") 
            wait() 
            if pc.get_level() < 35 then 
                say_title("Simyager") 
                say("Sen henüz yeterince güçlü değilsin,") 
                say("en az 35 level olmalısın.") 
            else 
                if pc.count_item(50118) >= 30 then 
                    say_title("Simyager") 
                    say("Güzel.Lazım olan 30 enerji parçasını getirdin.") 
                    say("Bunlardan bir enerji kristali üretebilirim.") 
                    say("Biraz bekle lütfen.") 
                    say("Deneyeceğim ama olacağına dair") 
                    say("garanti veremem") 
                    wait() 
                    say_title("Simyager") 
                    say("Herşey hazır durumda.Parçaları birleştirip") 
                    say("enerji kristali üretebiliriz.Ama bende bir") 
                    say("şekilde ekmeğimi kazanmalıyım.Tamir") 
                    say("aletleri de gökten inmiyor yani.") 
                    say("Masrafları karşılamak için 1000 yang") 
                    say("ödemeni istiyorum.Ödemeye hazırmısın?") 
                    if select("Elbette!","Hayır, henüz değil") == 2 then 
                        return 
                    end 
                     
                    pc.change_money(-1000) 
                    pc.remove_item(50118,30) 
                     
                    if number(0,1) == 1 then 
                        say_title("Simyager") 
                        say("İşte enerki kristalin.Sadece ilk girişimde") 
                        say("başarılı olunur hep.Simya sağı solu belli") 
                        say("olmayan bir bilim.Ufak tefek farklılıklar") 
				   say("başarısızlığa neden olabilir.Yani")
				   say("deneyşerde genelde küçük de olsa başarısızlığa")
				   say("uğrama riski bulunur.")
                        pc.give_item2(50119,1) 
                    else -- NICHT DE 
                        say_title("Simyager") 
                        say("Ne yazıkki işe yaramadı.") 
                        say("Enerji kristali üretemedik") 
                        return 
                    end 
                     
                else -- NICHT DE 
                    say_title("Simyager") 
                    say("Henüz yeterli enerji parçasına sahip değilsin.") 
                    say("Bunlardan enerji kristali üretemem.En az 30") 
                    say("topladığında tekrar gel.") 
                    return 
                end 
                 
            end 
        end 

        when 20001.take with (game.get_event_flag("energy") == 1 or pc.is_gm() == true) begin 
            if pc.get_level() < 35 then 
                say_title("Simyager") 
                say("Henüz yeterince güçlü değilsin.En az 35.") 
                say("seviyeye ulaştığında tekrar gel.") 
                return 
            end 
             
            if item.get_type() == 1 or item.get_type() == 2 then 
             
--                2070 - 2239 
--                80 - 369 
--                1040 - 1189 
--                3070 - 3249 
--                5040 - 5359 
--                4030 - 4069 
--                7070 - 7219 
--                11250 - 11299 
--                11450 - 11499 
--                11650 - 11699 
--                11850 - 11899 
--                12240 - 12699 

                local maxlvl = mysql_query("SELECT limitvalue0 FROM player.item_proto WHERE vnum='"..item.get_vnum().."' LIMIT 1;") 
--                test_chat(maxlvl[1][1]) 
                if tonumber(maxlvl[1][1]) < 35 then  
                    -- NICHT DE 
                    say_title("Simyager") 
                    say("Bu öğe uygun değil!") 
                    return 
                end 
             
                say_title("Simyager") 
                say(string.trim(item.get_name())) 
                say("Bu itemi enerji parçasına dönüştürmek istermisin?") 
                if select("Evet!","Hayır, henüz değil!") == 2 then 
                    return 
                else 
                    local anzahl = number(0,15) 
                    if anzahl > 0 then 
                        say_title("Simyager") 
                        say("Bu muhteşem"..anzahl.." Enerji parçası oluşturuldu.")  
                        pc.give_item2(50118, anzahl) 
                    else 
                        say_title("Simyager") 
                        say("Ne yazıkki başarısız oldu.") 
                        say("Başka bir item ile tekrar dene lütfen!") 
item.remove() 
                        return 
                    end 
                    item.remove() 
                end 
                 
            else -- NICHT DE 
                say_title("Simyager") 
                say("Bu öğe uygun değil!") 
            end 
        end 
         
        when login begin 
            if getenergytime() < 50000 then 
--                test_chat("[Energy]Kalan Süre: "..getenergytime()) 
                setenergytime(getenergytime() + get_time()) 
                cmdchat("energysystem "..getenergytyp().."|"..getenergyvalue().."#"..getenergytime()) 
            end 
        end 
        when logout begin 
            if getenergytime() > get_time() then 
                local energy = getenergytime() - get_time() 
                if energy > 0 then 
                    setenergytime(energy) 
                end 
            end 
        end 
         
        when 50119.use begin 
            if getenergytime() > get_time() then 
                chat("Du benutzst schon die Energie eines Energiekristalls!") 
                return 
            end 
             
            local anz = number(1,10) 
            boni_list = {} 
            boni_list [1] = {apply.ATTBONUS_HUMAN,    15} 
            boni_list [2] = {apply.ATTBONUS_MONSTER,    10} 
            boni_list [3] = {apply.CRITICAL_PCT,    10} 
            boni_list [4] = {apply.PENETRATE_PCT,    10} 
            boni_list [5] = {apply.MAX_HP,    1000} 
            boni_list [6] = {apply.MAX_SP,    2000} 
            boni_list [7] = {apply.HP_REGEN,    30} 
            boni_list [8] = {apply.STEAL_HP,    10} 
            boni_list [9] = {apply.ATT_GRADE_BONUS,    75} 
            boni_list [10] = {apply.ATT_GRADE_BONUS,    50} 
             
--            test_chat(anz) 
--            test_chat(boni_list[anz][1]) 
--            test_chat(boni_list[anz][2]) 

            affect.add_collect(boni_list[anz][1],boni_list[anz][2],7200) 
            setenergy(anz,boni_list[anz][2],get_time() + 7200) 

            cmdchat("energysystem "..anz.."|"..boni_list[anz][2].."#"..(get_time() + 7200)) 
             
            item.remove() 
            chat("Vücuda aktarılan kristal enerji hissediyorum..") 
             
        end 
    end 
end

quest energy_manage begin
    state start begin
        when 20001.chat."Enerji Kristali" with pc.is_gm() begin
            say_title("Merhaba!")
            say("Enerji Kristali oluşturma aktif olsun mu ?")
            local s = select("Evet","Hayır","Aynen Kalsın")
            if s == 1 then
                game.set_event_flag("energy",1)
                notice_all("Enerji kristali aktiftir!")
            elseif s == 2 then
                game.set_event_flag("energy",0)
                notice_all("Enerji kristeli deaktiftir!")
            elseif s == 3 then
                return
            end
        end
    end
end