Bvural41 1
Bvural41
Mt2Hizmet 1
Mt2Hizmet
SLyFeLLowTR 1
SLyFeLLowTR
DEVLOPER 1
DEVLOPER
noisiv 1
noisiv
Manwe Work 1
Manwe Work
mavzermete 1
mavzermete
Hikaye Ekle

BİLGİ YARIŞMASI quest

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!

Arkadaşlar Paylaşıldıysa Silebilirim Konuyu Ben Göremediğim için Paylaşıyorum Belki İşinize Yarar. Kendi Serverimi Kapattığım için Kanıt Atamadım Kullanan Arkadaşlar Kanıt Atarsa Sevinirim İyi Formlar :)

Bilgi Yarışması quest :
Kod:
    state start begin
        when 50034.use begin
            say_title("Bilgi Yarışması! ")
            say("")
            ----"123456789012345678901234567890123456789012345678901234567890"|
            say("Bilgi yarışmasına hoş geldin! Eğer 3 soruyu ")
            say("doğru cevaplarsan ödül kazanacaksın. ")
            say("")
            say("Hazır mısın? ")
            say("")
            local s=select("Hadi Başlayalım! ", "Vazgeçtim. ")
            if 2==s then
                return
            end

            pc.remove_item(50034, 1)

            local size=3
            local chance=pc.getqf("chance")

            -- Chance!
            if 0==chance then
                pc.setqf("chance", number(3, 5))
            elseif pc.getqf("success_count")==chance then
                pc.setqf("success_count", 0)
                pc.setqf("chance", number(3, 5))
                size=5
            end

            say_title("Bilgi Yarışması! ")

        say("")
        ----"123456789012345678901234567890123456789012345678901234567890"|
        say(""..size.." soruyu doğru cevaplarsan ")
        say("ödül kazanacaksın. ")

            wait()

            for i=1, size+1 do

                local quiz_index=number(1, table.getn(locale.quiz))
                local quiz_data=locale.quiz[quiz_index]

                say_title("Bilgi Yarışması #"..i.." ")
                say("")
                say(quiz_data[1])
                say("")
                local s=select(quiz_data[2], quiz_data[3], quiz_data[4], quiz_data[5])
                if s==quiz_data[6] then
                    if i==size then
                        say_title("Bilgi Yarışması! ")
                        say("")
                        say("Tüm soruları doğru cevapladın, ")
                        say("işte ödülün! ")
                        say("")

                        pc.setqf("success_count", pc.getqf("success_count")+1)

                        if 5==size then
                            say_item_vnum(50513)
                            say_reward("Ruh taşı kazandın. ")
                            pc.give_item2(50513)
                        else
                            say_item_vnum(50513)
                            say_reward("Ruh taşı kazandın. ")
                            pc.give_item2(50513)
                        end
                        say("")
                        return
                    else
                        say_title("Bilgi Yarışması! ")
                        say("")
                        say_reward("Doğru! ")
                        say("")
                        say("Bir sonraki soruya geçiliyor. ")
                        say("")
                        wait()
                    end
                else
                    say_title("Bilgi Yarışması! ")
                    say("")
                    say("Yanlış cevap! ")
                    say("")
                    say("Üzgünüm, daha sonra tekrar dene! ")
                    say("")
                    return
                end
            end

        end
    end
end
 

Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)

Geri
Üst