Painel do Usuário
Mensagens: 0
-
Alterar
-
Ver
-
Tópicos e mensagens
Últimos assuntos
Os membros mais ativos da semana
Nenhum usuário |
Quest Girabe De Coleta Lv 30
ToP Game :: Metin2 :: Quest/Tradução
Página 1 de 1
Quest Girabe De Coleta Lv 30
Eu escluir todas as quest do meu server quando lembrei do quanto essa quest aki e boa pois da coisas ao personagens permanente por isso eu arumei ela em alemão traduzi fiz melhoramentos e puis portugues
- Código:
----------------------------------------------------
--COLLECT QUEST_lv30
--By Sinv@l
----------------------------------------------------
quest collect_quest_lv30 begin
state start begin
when login or levelup with pc.level &--#62;= 30 and pc.level &--#60;= 90 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "Girab o Biologo")
end
send_letter("Estudo do Biologo")
end
when button or info begin
say_title("Estudo do Biologo")
say("")
say("Girab o Biologo, aprendiz do Uriel,")
say("necessita de sua ajuda urgente.")
say("Corra e vá ajuda-lo.")
say("")
end
when __TARGET__.target.click or
20084.chat."I need your help." begin
target.delete("__TARGET__")
say_title("Girab o Biologo:")
--- l
say("")
say("Oh! Por favor, me ajude...")
say("Eu coleciono informações sobre monstros de nosso")
say("reino, eu não posso lidar com isso sozinho..")
say("Na verdade, eu deveria recolher a informação")
say("para as pesquisas.")
say("Eu acho que você pode imaginar que eu tenho problemas em")
say("conseguir os materias, por tanto me ajude. Claro que ")
say("você receberá uma boa recompensa por me ajudar.")
say("")
wait()
say_title("Girab o Biologo:")
say("")
say("Eu farei pesquisas nos dentes de orc do")
say("Vale Suryong, esse dente é capaz de derreter ferro.")
say("Por isso eles são muito interessantes para mim.")
say("Provavelmente, estão relacionados com o futuro.")
say("Os dentes de orc devem ser uma chave para a evolução.")
say("")
wait()
say_title("Girab o Biologo:")
say("")
say("Você pode trazer alguns dentes de orc?")
say("Eu preciso de um dente forte, mas")
say("apenas um de cada vez, para que eu possa examina-los.")
say("Boa Sorte.")
say("")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
end
end
state go_to_disciple begin
when letter begin
send_letter("Estudo do Biologo")
end
when button or info begin
say_title("Estudo do Biologo")
--- l
say("")
say("O biologo precisa de dentes de orc do")
say("Vale Suryong para examinar.")
say("Sempre traga um de cada vez, para que ele")
say("tenha tempo de examina-los.")
say("")
say("")
say_item_vnum(30006)
say_reward("Você ja entregou ".." "..pc.getqf("collect_count").." dentes de orc.")
say("")
end
when 71035.use begin
if get_time() &--#60; pc.getqf("duration") then
say("")
say("Você não pode usar o Soro da Persuasão ainda.")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("Você ja usou o Soro da Persuasão.")
say("")
return
end
if pc.count_item(30006)==0 then
say_title("Girab o Biologo:")
say("")
say("Quando você for entregar os dentes, ")
say("poderá usar o Soro da Persuasão.")
say("")
return
end
item.remove()
pc.setqf("drink_drug",1)
end[/center]
when 20084.chat."GM: collect_quest_lv30.skip_delay" with pc.count_item(30006) &--#62;0 and pc.is_gm() and get_time() &--#60;= pc.getqf("duration") begin
say(mob_name(20084))
say("Você é GM, OK")
pc.setqf("duration", get_time()-1)
return
end
when 20084.chat."Entregar Dente de Orc" with pc.count_item(30006) &--#62;0 begin
if get_time() &--#62; pc.getqf("duration") then
if pc.count_item(30006) &--#62;0 then
say_title("Girab o Biologo:")
--- l
say("")
say("Oh! Você me trouxe um dente de orc")
say("Eu tenho que testa-lo primeiro...")
say("Isso precisa de tempo..")
say("")
pc.remove_item("30006",1)
if is_test_server() then
pc.setqf("duration",get_time()+2)
else
pc.setqf("duration",get_time()+60*60*22) -----------------------------------22½Ã°£
end
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=90
end
local s= number(1,100)
if s&--#60;= pass_percent then
if pc.getqf("collect_count")&--#60; 9 then
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say_title("Girab o Biologo:")
say("")
say("Oh! Parabéns..")
say("Traga".." mais"..10-pc.getqf("collect_count").. " dentes.")
say("Preciso de mais para analisar.")
say("Boa Sorte.")
say("")
say("")
pc.setqf("drink_drug",0)
return
end
say_title("Girab o Biologo:")
say("")
say("Você entregou todos os dentes.")
say("Mas agora eu preciso de uma pedra especial.")
say("A Pedra da Alma Orc, você consegue ")
say("encontrar também?")
say("Você pode obte-la dos Orcs.")
say("")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Girab o Biologo:")
say("Hum..infelizmente ele quebrou..")
say("Eu sinto muito. Mas eu não posso usa-lo.")
say("Por favor, trage outro.")
say("")
pc.setqf("drink_drug",0)
return
end
else
say_title("Girab o Biologo:")
say("Você não tem um "..item_name(30006).."!")
return
end
else
say_title("Girab o Biologo:")
--- l
say("")
say("Eu sinto muito, mas...")
say("estou analisando o dente que você trouxe ")
say("ainda.. Você pode trazer")
say("outro dente mais tarde?")
say("")
say("")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Estudo do Biologo")
if pc.count_item(30220)&--#62;0 then
local v = find_npc_by_vnum(20084)
if v != 0 then
target.vid("__TARGET__", v, "")
end
end
end
when button or info begin
if pc.count_item(30220) &--#62;0 then
say_title("Pedra da Alma Orc")
say("")
--- l
say_reward("Você encontrou a Pedra da Alma Orc")
say_reward("Leve-a para o Biologo.")
say_reward("Ele espera por você.")
say("")
return
end
say_title("Pedra da Alma Orc")
say("")
--- l
say("Para terminar os exames")
say("precisarei da Pedra da Alma Orc.")
say("Você já entregou os 10 dentes.")
say_item_vnum(30220)
say("Traga-me a pedra.")
say("Você pode obte-la dos "..mob_name(635).."and")
say(""..mob_name(636).."and"..mob_name(637)..".")
say("")
end
when 635.kill or
636.kill or
637.kill begin
local s = number(1, 500)
if s == 1 and pc.count_item(30220)==0 then
pc.give_item2(30220, 1)
send_letter("Você encontrou a Pedra da Alma Orc.")
end
end
when __TARGET__.target.click or
20084.chat."Eu tenho a Pedra da Alma Orc" with pc.count_item(30220) &--#62; 0 begin
target.delete("__TARGET__")
if pc.count_item(30220) &--#62; 0 then
say_title("Girab o Biologo:")
--- l
say("")
say("Muito Obrigado.")
say("Irei te recompensar..")
say("Leve a receita secreta que contém")
say("informações sobre o Futuro.")
say("Entregue-a para Baek Go,")
say("para novos testes.")
say("Com sua ajuda eu aprendi muito sobre os Orcs.")
say("")
say("")
pc.remove_item(30220,1)
set_state(__reward)
else
say_title("Girab o Biologo")
say("Você não tem a "..item_name(30220).."!")
say("")
return
end
end
end
state __reward begin
when letter begin
send_letter("A recompensa do Biologo")
local v = find_npc_by_vnum(20018)
if v != 0 then
target.vid("__TARGET__", v, "Baek-Go")
end
end
when button or info begin
say_title("A recompensa do Biologo")
--- l
say("")
say("Como recompensa por me ajudar")
say("vou lhe dar um receita")
say("para a poção secreta.")
say("Por favor de isto a Baek Go, ele vai criar a ")
say("poção.")
say("")
end
when __TARGET__.target.click or
20018.chat."A Receita Secreta" begin
target.delete("__TARGET__")
say_title("Baek Go:")
say("")
say("Deixe-me dar uma olhada..")
say("É a receita que o Girab lhe deu?")
say("Hmm, ótimo.")
say("Você ganhou uma caixa vermelha.")
say("Obrigado.")
say("")
----------- l
say_reward("Como recompensa pelo Biologo,")
say_reward("você recebeu +60% de velocidade de movimento.")
say_reward("Permanente.")
affect.add_collect(apply.MOV_SPEED, 60, 60*60*24*365*60) -- 60Years
pc.give_item2(50109)
clear_letter()
set_quest_state("collect_quest_lv40", "run")
set_state(__complete)
end
end
state __giveup__ begin
when 20084.chat."Another Trial." begin
say_title("Girab o Biologo:")
say("")
say("Você pode tentar de novo?")
say("Hmm, muito bom")
say("Atrai-me muito bem, mas")
say("por favor, tente novamente.")
say("Ok, te vejo mais tarde.")
set_state(start)
end
end
state __complete begin
end
end
Tópicos semelhantes
» Quest Girabe Lv 40 50 60 70 Traduzidas
» Quest Log Vip é GM
» [Quest]Bloquear uso de bot rodar
» [Quest}Invocar Mobs
» [Quest] Inicio Personalizada
» Quest Log Vip é GM
» [Quest]Bloquear uso de bot rodar
» [Quest}Invocar Mobs
» [Quest] Inicio Personalizada
ToP Game :: Metin2 :: Quest/Tradução
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
Ter Nov 10, 2020 5:12 pm por jrasb
» Bot Rodar E Bot Pesca [Mkmt2] 100% Funcionavel !!!!
Seg Jan 09, 2017 9:05 am por FALKNERY13
» Novas Bg tops
Qui Jul 09, 2015 5:21 am por NurfPT
» [Tutorial] Instalar Server Files De Metin2 Em Freebsd
Qui Jul 09, 2015 5:11 am por NurfPT
» [Quest] Npc Pede Item E Da Item Com Imagem
Sex Jan 23, 2015 4:18 am por pedrinhoida17
» Download Escondidos
Qui Jan 22, 2015 8:18 pm por dj_eisonsmo@hotmail.com
» [NPC] Top d++
Qui Jan 22, 2015 8:12 pm por dj_eisonsmo@hotmail.com
» Nova quest Npc Banco.
Qui Jan 15, 2015 6:52 pm por blad69
» Tutorial Como Implementar Bonus Ao Lado Do Inventario
Qua Jan 14, 2015 1:29 pm por lamtj92