"Sihirli Kırmızı Kalem: RinaMT2 Tekniği"

Questi ben yazmadım fakat düzenleme/fixlemeler bana aittir. Demirciden Kırmızı tüy kalem verdirtiyorsunuz istediğiniz eşyalar karşılığında. Kırmızı tuy kalem ne işe yarıyor derseniz 2 kere kullanabiliyorsunuz bu nesneyi; Her kullanımda beceri hasarı veya ortalama hasar seçtiriyor. Verdiği özellikleri kendiniz ayarlayabilirsiniz. İleride vaktim olursa tüy kalem sıfırlama questide yazabilirim. Kullanacaklara şimdiden hayırlı olsun.
NOT: Questleri kendinize göre düzenlemede zorluk yaşıyorsanız yazın, vakit buldukça yardımcı olmaya çalışırım.

Kırmızı Tüy Kalem Questi:
Kod:

quest kizil_tuy_kalem begin
    state start begin
        when 70029.use begin
            say_title("Kırmızı Tüy Kalem ")
            say("Merhaba "..pc.getname().."")
            say_kirmizi(" Bu eşyayı 2 kere kullanabilirsin")
            say_kirmizi(" İlk Okuduğunda +%5 Ortalama Zarar ya da +%5 Beceri hasarı   kazanırsın. İkinci okuyuşunda ise +%6 Beceri hasarı ya da    +%6 Ortalama zarar kazanırsın.")
            local sec = select("Beceri Hasarı ", "Ortalama Zarar ", "Kapat ")
            local ret = pc.getqf("kizil_tuy_kalem")
            if ret == 0 and sec == 1 then
            say_title("Kırmızı Tüy Kalem")
                say("Sana +%5 Beceri Hasarı Veriyorum.")
                say("Bunun Etkisi Sınırsızdır.")
                pc.setqf("kizil_tuy_kalem", 1)
                pc.removeitem(70029, 1)
                affect.add_collect(71,5,60*60*24*365*60)

            elseif ret == 1 and sec == 1 then
            say_title("Kırmızı Tüy Kalem")
                say("Sana +%6 Beceri Hasarı Veriyorum.")
                say("Bunun Etkisi Sınırsızdır.")
                pc.setqf("kizil_tuy_kalem", 2)
                pc.removeitem(70029, 1)
                affect.add_collect(71,6,60*60*24*365*60)
                
            elseif ret == 0 and sec == 2 then
            say_title("Kırmızı Tüy Kalem")
                say("Sana +%5 Ortalama Zarar Veriyorum.")
                say("Bunun Etkisi Sınırsızdır.")
                pc.setqf("kizil_tuy_kalem", 1)
                pc.removeitem(70029, 1)
                affect.add_collect(72,5,60*60*24*365*60)

            elseif ret == 1 and sec == 2 then
            say_title("Kırmızı Tüy Kalem")
                say("Sana +%6 Ortalama Zarar Veriyorum.")
                say("Bunun Etkisi Sınırsızdır.")
                pc.setqf("kizil_tuy_kalem", 2)
                pc.removeitem(70029, 1)
                affect.add_collect(72,6,60*60*24*365*60)
            elseif sec == 3 then
            say("Peki, sen bilirsin")
            elseif ret == 2 then
            say_title("Kırmızı Tüy Kalem")
                say("Bu eşya 2 sefer kullanım içindir hakkınız bitmiş! ")
            else
                say("Bir hata oluştu.")
            end
        end
    end
end

Kırmızı Tüy Kalem Üretme Questi:
Kod:

quest kizil_tuy begin
    state start begin
        when 20016.chat."Kırmızı Tüy Kalem " begin
            local mevcutwon = pc.count_item(70029)
            say_title("[WINDOW_SIZE width;350|height;400]Depo Görevisi: ")
            say("")
            say("Demek Kırmızı Tüy Kalem istiyorsun. ")
            say("Ama herşeyin bir bedeli vardır unutma!")
            say("Bu özel eşyayı kazanabilmek için yeterli malzemen varmı? ")
            say("")
            say_blue2("Mevcut Tüy: "..mevcutwon)
            say_reward("Şimdi ne yapmak istiyorsun ?")
            local s = select("Kırmızı Tüy Al ","Vazgeç    ")
            if s == 3 then
                say_title("[WINDOW_SIZE width;350|height;400]Demirci: ")
                say("")
                say("Demek vazgeçiyorsun...")
                say("Fikrini değiştirirsen tekrar beklerim şimdilik hoşçakal!")
                return
            elseif s == 1 then
                say_title("[WINDOW_SIZE width;350|height;400]Demirci: ")
                say("")
                say_blue2("x4 Erdemli adamın notu - x4 Erdemli adamın değneği ")
                say_blue2("x4 Meleğin kutsaması - x2 Azrail sandığı ")
                say_blue2("x4 Altın sertifika ")
                say("Yukardaki eşyalar  karşılığında 1 Tüy alacaksın.")
                say_reward("Devam etmek istiyormusun ?")
                local ss = select("Evet","Hayır")
                if ss == 2 then
                    say_title("[WINDOW_SIZE width;350|height;400]Demirci: ")
                    say("")
                    say("Demek vazgeçiyorsun...")
                    say("Fikrini değiştirirsen tekrar beklerim şimdilik hoşçakal!")
                    return
                elseif ss == 1 then
                    if pc.count_item(50040) < 4 or pc.count_item(70023) < 4 or pc.count_item(70021) < 4 or pc.count_item(50186) < 2 or pc.count_item(70028) < 4 then
                        say_title("[WINDOW_SIZE width;350|height;400]Demirci: ")
                        say("")
                        say_reward("Yeterli miktarda eşyaya sahip değilsin.")
                        return
                    end
                    say_title("[WINDOW_SIZE width;350|height;400]Demirci: ")
                    say("")
                    say_reward("İşlem Başarıyla Tamamlorı!")
                    say_reward("1 Tüy Kazorın.")
                    say_item_vnum(70029)
                    pc.give_item2("70029",1)
                    pc.remove_item("50040",4)
                    pc.remove_item("70023",4)
                    pc.remove_item("70021",4)
                    pc.remove_item("50186",2)
                    pc.remove_item("70028",4)
                end
            end
        end
    end
end

Paylaşım için teşekkürler

Paylaşım için teşekkürler lakin renkli say komutu ekli olmayanlarda hata oluşacaktır. Onları da eklemenizde fayda var.
​

Paylaşım için teşekkür ederim