Nivel 10 - Ajuda para o Sr.Soon

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Nivel 10 - Ajuda para o Sr.Soon

Mensagem por Admin em Dom Dez 11, 2016 2:45 am

Ajuda para o Sr.Soon

Código:
quest subquest_5 begin
        state start begin
                when login or levelup with pc.level >= 10 and pc.level <= 15 begin
                        set_state(information)
                end
        end

        state information begin
                when letter begin
                        local v = find_npc_by_vnum(20023)
                        if v != 0 then
                                target.vid("__TARGETF__", v, "Ajuda para o Sr.Soon")
                        end
                end

                when __TARGETF__.target.click or
                        20023.chat."Ajuda para o Sr.Soon" with pc.level >= 10 begin
                        target.delete("__TARGETF__")
                        say_title("Sr.Soon:")
                        say("")
                        say("Bla, bla... Que diabos... Quem é você?")
                        say("Nunca me perturbe enquanto estou a ler!")
                        say("Dei-me apenas um minuto!")
                  say("")
                        say("Desculpe, eu não queria gritar consigo.")
                  say("Às vezes ao ler eu acho algo que não entendo e")
                        say("e isso é muito frustrante.")
                        say("")

                    wait()

                        say_title("Sr.Soon:")
                        say("")
                        say("Eu estou a estudar os Leque usados pelos Xamãs.")
                        say("")
                        say("Estou com alguma dificuldade em descobrir quais são")
                        say("os melhores, e é impossivel para testá-los todos.")
                        say("O Uriel, o sábio, poderia facilmente reconhecer os")
                        say("leques, poderia perguntar a ele?")
                   say("")
                        say("Eu estou interessado nos seguintes tipos de leques:")
                        say("Leque Oceânico, Leque Ave do Paraíso, Leque Triplo,")
                        say("e Leque Asa de Grou.")
                   say("")
                        wait()

                        say_title("Sr.Soon:")
                        say("")
                        say("Eu quero que ele liste todos os leques de acordo com")
                        say("seu valor de ataque.")
                   say("")
                        local s=select("Eu vou perguntar."," Eu não vou perguntar.")
                        if 2==s then
                                say("Realmente quer cancelar esta tarefa?")
                                local a=select("Sim","Não")
                                        if  2==a then
                                                say_title("Sr.Soon:")
                                                say("")
                                                say("Isso é bom de se ouvir.")
                                                say("Simplesmente volte mais tarde.")
                                                return
                                        end
                                say_title("Sr.Soon:")
                                say("")
                                say("Que vergonha... ")
                                say("")
                                say("Então deixe-me ler em paz.")
                        say("")
                                clear_letter()
                                set_state(__GIVEUP__)
                                return
                        end
                        say_title("Sr.Soon:")
                        say("")
                        say("Agora estou realmente feliz!")
                        say("")
                        say("Isto vai dar um bom livro.")
                        say("")

                        set_state(ask_to)

                end
        end

        state ask_to begin
                when info or button begin
                        say_title("Ajuda para o Sr.Soon")
                        say("")
                        say("Vá até Uriel e peça uma lista de leques.")
                        say("")
                end

                when letter begin
                        local v = find_npc_by_vnum(20011)
                        if v != 0 then
                                target.vid("__TARGETF__", v, "A favour for Mr.Soon.")
                        end
                        send_letter("Ajuda para o Sr.Soon")
                end



                when __TARGETF__.target.click or
                        20011.chat."Ajuda para o Sr.Soon" begin
                        target.delete("__TARGETF__")

                        say_title("Uriel:")
                        say("")
                        say("O que o traz até mim?")
                        say("O Sr.Soon mandou você?")
                        say("Ele lê sobre tudo, mas às vezes eu gostaria que")
                        say("ele também aprendesse algo.")
                        say("Ele está sempre me perturbando.")
                  say("")
                        say("Bem, diga-me o que ele quer desta vez!")
                        say("")
                        wait()

                        say_title("Uriel:")
                        say("")
                        say("Ele quer que eu liste os leques de acordo com seu")
                        say("valor de ataque?")
                        say("Isso é bastante fácil.")
                  say("")
                        say("Aqui está: Leque Ave do Paraíso, Leque Triplo,")
                        say("Leque Oceânico e Leque Asa de Grou.")
                        say("")
                        say("Ok?")
                        say("")

                        set_state(return_to)
                end
        end

        state return_to begin
                when letter begin
                        send_letter("Returne ao Sr.Soon.")
                        local v = find_npc_by_vnum(20023)
                        if v != 0 then
                                target.vid("__TARGETF__", v, "Ajuda para o Sr.Soon")
                        end
                end


                when info or button begin
                        say_title("Retorne ao Sr.Soon")
                        say("")
                        say("Retorne a Sr.Soon e informe-o sobre os leques.")
                        say("")
                end

                when __TARGETF__.target.click or 20023.chat."Lista de Leques" begin
                        target.delete("__TARGETF__")
                        say_title("Sr.Soon:")
                        say("")
                        say("Então, Uriel pode dar uma resposta clara?")
                        say("")

                        local s = select(
                                                                "Aquatico, Oceanico, Asa de Grou, Triplo.",
                                                                "Oceanico, Triplo, Aquatico, Asa de Grou.",
                                                                "Ave do Paraíso, Triplo, Oceânico, Asa de Grou.",
                                                                "Oh não, eu esqueci.")

                        if s == 2 then
                                say_title("Sr.Soon:")
                                say("")
                                say("Muito obrigado!")
                                say("Agora eu posso ler descansado.")
                                say("")

                                pc.give_exp2(6000)
                                set_quest_state("levelup","run")
                                pc.change_money(10000)

                      say_title("Recompensa:")
                      say("")
                       say_reward("Recebeu 6.000 Pontos de Experiência.")
                                say_reward("Recebeu 10.000 Yang.")
                                say("")

                                clear_letter()

                                set_state(__COMPLETE__)

                        elseif s==4 then
                        say_title("Sr.Soon:")
                        say("")
                        say("Não tenho certeza se isso está correto.")
                        say("Por favor, verifique.")
                        say("")
                        local s=select("Sim, está correto!","Não tenho certeza..")
                        if 2==s then
                        say("Você deseja realmente cancelar esta tarefa?")
                        local a=select("Sim","Não")
                        if  2==a then
                        say_title("Sr.Soon:")
                        say("")
                        say("É bom ouvir, volte mais tarde.")
                        say("")
                        return
                        end
                        say_title("Sr.Soon:")
                        say("")
                        say("Isso não é bom de se ouvir!")
                        say("Vá embora...")
                        say("")
                        set_state(__GIVEUP__)
        end
        say_title("Sr.Soon:")
        say("")
        say("Maravilhoso, volte mais tarde.")
        say("")
set_state(ask_to)

                        else
                                say_title("Sr.Soon:")
                                say("")
                                say("Tem certeza de que a ordem está correta?")
                                say("")
                                local s=select("Sim, eu tenho.","Não, não tenho.")
                                if 2==s then
                                        say("Deseja realmente cancelar esta tarefa?")
                                        local a=select("Sim","Não")
                                                if  2==a then
                                                        say_title("Sr.Soon:")
                                                        say("")
                                                        say("Que bom!")
                                                        say("Isso é optimo!")
                                                        say("Volte Sempre.")
                                                        say("")
                                                        return
                                                end
                                        say_title("Sr.Soon:")
                                        say("")
                                        say("Teria sido muito bom..")
                                        say("")
                                        say("Vá se embora...")
                                        say("")
                                        set_state(__GIVEUP__)
                                end
                                say_title("Sr.Soon:")
                                say("")
                                say("Eu não sei se isso está correto.")
                                say("Por favor, pergunte ao Uriel novamente e preste")
                                say("atenção desta vez.")
                        say("")
                                set_state(ask_to)
                        end
                end
        end

        state __GIVEUP__ begin
        end
        state __COMPLETE__ begin
                when enter begin
                        q.done()
                end
        end
end

Admin
Admin

Mensagens : 6
Data de inscrição : 09/12/2016

Ver perfil do usuário http://metin2-selene.forumeiros.com

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum