All pastes #2052249 Raw Edit

Unnamed

public text v1 · immutable
#2052249 ·published 2011-04-30 13:55 UTC
rendered paste body
quest fikra_telling begin
        state start begin
                when oldwoman.chat."Fikra anlat bana." begin
                        if pc.level<=95 then
                                say_title("Yasli kadin:")
                                say("")
                                ---                                                   l
                                say("Yuzune gore uzun zamandir buralarda degilsin.")
                                say("Burada okuyacagin fikralar sana uygun degil.")
                                say("")
                                say("95 level ve 500k olduktan sonra gelebilirsin.")
                                say("")
                                say("")
                                return
                        end

                        if get_time()-pc.getqf("time") < 8*60*60 then
                                local passed_time = get_time() - pc.getqf("time")
                                say_title("Yasli kadin:")
                                say("")
                                ---                                                   l
                                say("Hergun yeni bir fikra okumak icin bana")
                                say("ugramalisin.Ufak bir tebessum bile")
                                say("yeter.")
                                say("")
                                wait()

                                local idx = pc.getqf("idx")
                                if idx!=0 then
                                        say_title("Yasli kadin:")
                                        say("")
                                        ---                                                   l
                                        say("Bugun fikra okumussun.")
										say("Tekrar yarin bakabilirsin.")
                                        say(locale.fikra_words[idx][1])
										
                                        wait()

                                        if pc.getqf("talisman") == 0 and special.fortune_telling[idx][42] > 0 then
                                                local talisman_cost = special.fortune_telling[idx][42]
                                                wait()
                                                say_title("Yasli kadin:")
                                                say("")
                                                ---                                                   l
                                                say("Kismetsiz olacaksin, ve daha seni")
                                                say("kotulukden koruyan muskayi almadin.. Benim")
                                                say("zenginlik muskami almak ")
                                                say("ister misin?")


                                                local s = select("Evet onu almak istiyorum.","Hayir almak istemiyorum.")
                                                if s == 1 then
                                                        if pc.gold < talisman_cost then
                                                                say_title("Yasli kadin:")
                                                                say("")
                                                                ---                                                   l
                                                                say("İyi biriyim, ama sana muskayi hediye edemem,")
                                                                say("ugursuzlukdan korunmak istiyorsan")
                                                                say("bana onun")
                                                                say("için para vermelisin.")
                                                                say("")

                                                                pc.setqf("talisman", 0)
                                                        else
                                                                pc.give_item2(70052,1)
                                                                pc.changegold(-talisman_cost)
                                                                pc.setqf("talisman", 1)
                                                        end
                                                else
                                                end
                                        end
                                end
                        end

                        local gold = 7777

                        say_title("Yasli kadin:")
                        say("")
                        ---                                                   l
                        say("Gulmeye hazir gibisin!")
                        say("Fikra dinlemek")
                        say("ister misin?")
                        say("")


                        local s = select("Fikra anlat.", "Kapat.")

                        if s == 2 then
                        say_title("Yasli kadin:")
                        say("")
                        ---                                                   l
                        say("Dogru.")
                        say("Madem gulmek istemiyorsun git burdan!")
                        say("Gorusmek uzere!")
                        say("")
                        return
                        end

                        local n = number(1, 10000)

                        local i
                        local idx
                        for i = 1, table.getn(special.fortune_telling) do
                                if n<=special.fortune_telling[i][1] then
                                        idx = i
                                        break
                                else
                                        n = n - special.fortune_telling[i][1]
                                end
                        end
                        i = idx

                        say(locale.fikra_words[i][2])
						pc.setqf("next_time", get_time()+60*60*22)
						pc.changegold(-500000)

                        local t = {}

                        n = 0
                        local j
                        for j = 2,4 do
                                if special.fortune_telling[i][j] != 0 then
                                        n=n+1
                                        t[n] = j
                                end
                        end

                        if n > 0 then
                                n = number(1, n)
                                __give_char_priv(t[n]-1, special.fortune_telling[i][t[n]])
                        end

                        pc.setqf("time", get_time())
                        pc.setqf("idx", i)

                        if special.fortune_telling[i][42]>0 then
                                wait()

                                say(locale.fikra_words[i][3])

                                local talisman_cost = special.fortune_telling[i][42]
                                local s = select("Evet,bir tane istiyorum.","Hayir, sagol.")
                                if s == 1 then
                                        if pc.gold < talisman_cost then
                                                ---                                                   l
                                                say("İyi biriyim ama sana muskayi hediye edemem")
                                                say("ugursuzlukdan korunmak istiyorsan")
                                                say("bana onun")
                                                say("için para vermelisin.")
                                                say("")
                                                say("Fiyati "..gold.." yang.")
                                                say("")
                                                pc.setqf("talisman", 0)

                                        else
                                                pc.give_item2(70052,1)
                                                pc.changegold(-talisman_cost)
                                                pc.setqf("talisman", 1)
                                        end

                                elseif s == 2 then
                                        say_title("Yasli kadin:")
                                        say("")
                                        ---                                                   l
                                        say("Gulmeye ihtiyacin yok demek. tamam sonra gel.")

                                        pc.setqf("talisman", 0)
                                end
                        end

                end -- end_of_when
        end -- end_of_state
end -- end_of_quest