-- Boas não sei se a quest está correta , alguem poderias ajudar?
-- a intenção é pegar lv 92 girab chama-lo e o player coletar 10 gemas
-- apos a entrega de todas as gemas o player escolher um unico bonus .
quest collect_quest_lv92 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 92 and pc.level <= 150 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 Biólogo")
end
send_letter("A Pesquisa do Biólogo")
end
when button or info begin
say_title("~ Girab O Biólogo")
say("")
say("O Biólogo, aprendiz do Uriel,")
say("necessita da tua ajuda urgentemente.")
say("Corra e vai ajudá-lo.")
say("")
end
when __TARGET__.target.click or
20084.chat."GEMA AMARELA" begin
target.delete("__TARGET__")
say_title("~ Girab O Biólogo:")
say("")
--- l
say("Ainda bem que você pode me ajudar outra vez...")
say("Muito bem, já sabe como sou...")
wait()
say_title("~ Girab O Biólogo:")
say("")
say("Se me ajudar, vou te oferecer")
say("uma boa e desejada recompensa. ")
say("Eu gostaria de fazer isto sozinho, mas")
say("estou muito ocupado.")
say("Seria muito bom")
say("se pudesse fazer algo por mim.")
wait()
say_title("~ Girab O Biólogo:")
say("")
say("Tenho primeiro que te dizer do que se trata.")
say("Ouvi Falar Sobre umas Gemas.")
say("Elas são muito poderosas...")
say("Ela tem uma fonte de energia surreal ..")
say("Na Verdade são Três Gemas ...")
say("Mas a Primeira é a Amarela.!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- Time limit
pc.setqf("collect_count",0)--Items collected
pc.setqf("drink_drug",0) --quest potion 1
end
end
state go_to_disciple begin
when letter begin
send_letter("A Pesquisa do Biólogo")
end
when button or info begin
say_title("A Pesquisa do Biólogo")
--- l
say("")
say("Estou pesquisando sobre a Gema Amarela")
say("minhas pesquisas mostram que só um guerreiro forte")
say("e com bravura será capaz de consegui-las para mim . ")
say("O poder misterioso que ele tem é surreal. Existem varias")
say("lendas e segredos sobre essas Gemas.")
say("Mas, não posso lhe contar muito sobre , é Secreto.")
say("Se Você me trouxer 10 Gemas Amarelas ,")
say("Eu Falo mais sobre elas para você.")
say("")
say_item_vnum(30251)
say_reward(" Você já coletou ".." "..pc.getqf("collect_count").." Gemas Amarelas.")
say("")
end
when 71035.use begin --Quest potion
if get_time() < pc.getqf("duration") then
say("")
say("Você ainda não pode utilizar o Soro da Persuasão.")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("Você já utilizou o Soro da Persuasão.")
say("")
return
end
if pc.count_item(30251)==0 then
say_title("~ Girab O Biólogo:")
say("")
say("")
say("Você não possui nenhuma Gema Amarela!")
say("Por favor volte quando estiver em")
say("posse de algum Gema !")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 1135.kill or
1136.kill begin
local s = number(1, 100)
if s <= 50 and pc.count_item(30251)==0 then
pc.give_item2(30251, 1)
send_letter("Você adquiriu "..item_name(30251)..". ")
end
end
when 20084.chat." ~ Não gosto de esperar" with pc.count_item(30132) >0 begin
say(mob_name(20084))
say("")
say("Você deseja pular o tempo de espera? ")
local r = select("Sim","Fechar")
if r == 2 then
return
else
pc.remove_item("30132",1)
pc.setqf("duration", get_time()-1)
say("Pronto, agora você pode entregar sua missão novamente! ")
return
end
end
when 20084.chat."As Gemas Amarelas" with pc.count_item(30251) >0 begin
if get_time() > pc.getqf("duration") then
if pc.count_item(30251) >0 then
say_title("~ Girab O Biólogo:")
--- l
say("")
say("Oh! Você trouxe-me uma Gema Amarela")
say("Eu tenho que examiná-lo primeiro...")
say("Em breve Saberá mais , Aguarde ...")
say("")
pc.remove_item(30251, 1)
if is_test_server() then
pc.setqf("duration",get_time()+2)
else
pc.setqf("duration",get_time()+60*60*3) -----------------------------------1½Ã°£
end
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=80
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --less than 50
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say_title("~ Girab O Biólogo:")
say("")
say("Muito bem, Essa gema é verdadeira!")
say("Por favor, traga-me ".." mais "..10-pc.getqf("collect_count").. " Gemas Amarelas.")
say("Preciso de mais para analisar.")
say("Boa Sorte.")
say("")
pc.setqf("drink_drug",0) --Potion reset
return
end
say_title("~ Girab O Biólogo:")
say("")
say("HAHA, ótimo, você coletou todos as 10 Gemas!")
say("")
say("Encontre o Beak Go Para Rebecer a Recompensa .")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
return
else
say_title("~ Girab O Biólogo:")
say("")
say("")
say("Então, essa Gema é Falsa, está tentando me enrolar?")
say("Me Traga Outra e vê se não me enrola dessa vez.")
say("Quando conseguir, traga me daqui a 3 hora.")
say("")
pc.setqf("drink_drug",0) --Potion reset
return
end
else
say_title("~ Girab O Biólogo:")
say(""..item_name(30251).."Por favor, venha quando você encontra")
return
end
else
say("...")
say("Ainda não deu o tempo que pedi para você.")
say("Estou juntando material para fazer outra Análise!")
say("Lembre-se bem...")
say("Você só pode me entregar a cada 3 horas!")
say("")
return
end
end
end
20018.chat."Recompensa !" begin
target.delete("__TARGET__")
say_title("~ Baek Go:")
say("")
say("Como Recompemsa.")
say("Escolha um bônus, Apenas um .")
say("")
local s = select( "Bonus Guerreiro" , "Bonus Ninja", "Bonus Shura", "Bonus Shaman" )
if s == 1 then
say_reward("Bônus contra Guerreiros: 10%")
affect.add_collect_point(POINT_ATTBONUS_WARRIOR,10,60*60*24*1825*60) --60years
clear_letter()
elseif s == 2 then
say_reward("Bônus contra Ninjas: 10%")
affect.add_collect_point(POINT_ATTBONUS_ASSASSIN,10,60*60*24*1825*60) --60years
clear_letter()
elseif s == 3 then
say_reward("Bônus contra Shuras: 10%")
affect.add_collect_point(POINT_ATTBONUS_SURA,10,60*60*24*1825*60) --60years
clear_letter()
elseif s == 4 then
say_reward("Bônus contra Shamans: 10%")
affect.add_collect_point(POINT_ATTBONUS_SHAMAN,10,60*60*24*1825*60) --60years
clear_letter()
set_quest_state("collect_quest_lv94", "run")
set_state(__complete)
end
end
state __complete begin
end
end
-- Boas não sei se a quest está correta , alguem poderias ajudar?
-- a intenção é pegar lv 92 girab chama-lo e o player coletar 10 gemas
-- apos a entrega de todas as gemas o player escolher um unico bonus .
quest collect_quest_lv92 begin
state start begin
end
state run begin
when login or levelup with pc.level >= 92 and pc.level <= 150 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 Biólogo")
end
send_letter("A Pesquisa do Biólogo")
end
when button or info begin
say_title("~ Girab O Biólogo")
say("")
say("O Biólogo, aprendiz do Uriel,")
say("necessita da tua ajuda urgentemente.")
say("Corra e vai ajudá-lo.")
say("")
end
when __TARGET__.target.click or
20084.chat."GEMA AMARELA" begin
target.delete("__TARGET__")
say_title("~ Girab O Biólogo:")
say("")
--- l
say("Ainda bem que você pode me ajudar outra vez...")
say("Muito bem, já sabe como sou...")
wait()
say_title("~ Girab O Biólogo:")
say("")
say("Se me ajudar, vou te oferecer")
say("uma boa e desejada recompensa. ")
say("Eu gostaria de fazer isto sozinho, mas")
say("estou muito ocupado.")
say("Seria muito bom")
say("se pudesse fazer algo por mim.")
wait()
say_title("~ Girab O Biólogo:")
say("")
say("Tenho primeiro que te dizer do que se trata.")
say("Ouvi Falar Sobre umas Gemas.")
say("Elas são muito poderosas...")
say("Ela tem uma fonte de energia surreal ..")
say("Na Verdade são Três Gemas ...")
say("Mas a Primeira é a Amarela.!")
say("")
set_state(go_to_disciple)
pc.setqf("duration",0) -- Time limit
pc.setqf("collect_count",0)--Items collected
pc.setqf("drink_drug",0) --quest potion 1
end
end
state go_to_disciple begin
when letter begin
send_letter("A Pesquisa do Biólogo")
end
when button or info begin
say_title("A Pesquisa do Biólogo")
--- l
say("")
say("Estou pesquisando sobre a Gema Amarela")
say("minhas pesquisas mostram que só um guerreiro forte")
say("e com bravura será capaz de consegui-las para mim . ")
say("O poder misterioso que ele tem é surreal. Existem varias")
say("lendas e segredos sobre essas Gemas.")
say("Mas, não posso lhe contar muito sobre , é Secreto.")
say("Se Você me trouxer 10 Gemas Amarelas ,")
say("Eu Falo mais sobre elas para você.")
say("")
say_item_vnum(30251)
say_reward(" Você já coletou ".." "..pc.getqf("collect_count").." Gemas Amarelas.")
say("")
end
when 71035.use begin --Quest potion
if get_time() < pc.getqf("duration") then
say("")
say("Você ainda não pode utilizar o Soro da Persuasão.")
say("")
return
end
if pc.getqf("drink_drug")==1 then
say("")
say("Você já utilizou o Soro da Persuasão.")
say("")
return
end
if pc.count_item(30251)==0 then
say_title("~ Girab O Biólogo:")
say("")
say("")
say("Você não possui nenhuma Gema Amarela!")
say("Por favor volte quando estiver em")
say("posse de algum Gema !")
return
end
item.remove()
pc.setqf("drink_drug",1)
end
when 1135.kill or
1136.kill begin
local s = number(1, 100)
if s <= 50 and pc.count_item(30251)==0 then
pc.give_item2(30251, 1)
send_letter("Você adquiriu "..item_name(30251)..". ")
end
end
when 20084.chat." ~ Não gosto de esperar" with pc.count_item(30132) >0 begin
say(mob_name(20084))
say("")
say("Você deseja pular o tempo de espera? ")
local r = select("Sim","Fechar")
if r == 2 then
return
else
pc.remove_item("30132",1)
pc.setqf("duration", get_time()-1)
say("Pronto, agora você pode entregar sua missão novamente! ")
return
end
end
when 20084.chat."As Gemas Amarelas" with pc.count_item(30251) >0 begin
if get_time() > pc.getqf("duration") then
if pc.count_item(30251) >0 then
say_title("~ Girab O Biólogo:")
--- l
say("")
say("Oh! Você trouxe-me uma Gema Amarela")
say("Eu tenho que examiná-lo primeiro...")
say("Em breve Saberá mais , Aguarde ...")
say("")
pc.remove_item(30251, 1)
if is_test_server() then
pc.setqf("duration",get_time()+2)
else
pc.setqf("duration",get_time()+60*60*3) -----------------------------------1½Ã°£
end
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=60
else
pass_percent=80
end
local s= number(1,100)
if s<= pass_percent then
if pc.getqf("collect_count")< 9 then --less than 50
local index =pc.getqf("collect_count")+1
pc.setqf("collect_count",index)
say_title("~ Girab O Biólogo:")
say("")
say("Muito bem, Essa gema é verdadeira!")
say("Por favor, traga-me ".." mais "..10-pc.getqf("collect_count").. " Gemas Amarelas.")
say("Preciso de mais para analisar.")
say("Boa Sorte.")
say("")
pc.setqf("drink_drug",0) --Potion reset
return
end
say_title("~ Girab O Biólogo:")
say("")
say("HAHA, ótimo, você coletou todos as 10 Gemas!")
say("")
say("Encontre o Beak Go Para Rebecer a Recompensa .")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
return
else
say_title("~ Girab O Biólogo:")
say("")
say("")
say("Então, essa Gema é Falsa, está tentando me enrolar?")
say("Me Traga Outra e vê se não me enrola dessa vez.")
say("Quando conseguir, traga me daqui a 3 hora.")
say("")
pc.setqf("drink_drug",0) --Potion reset
return
end
else
say_title("~ Girab O Biólogo:")
say(""..item_name(30251).."Por favor, venha quando você encontra")
return
end
else
say("...")
say("Ainda não deu o tempo que pedi para você.")
say("Estou juntando material para fazer outra Análise!")
say("Lembre-se bem...")
say("Você só pode me entregar a cada 3 horas!")
say("")
return
end
end
end
20018.chat."Recompensa !" begin
target.delete("__TARGET__")
say_title("~ Baek Go:")
say("")
say("Como Recompemsa.")
say("Escolha um bônus, Apenas um .")
say("")
local s = select( "Bonus Guerreiro" , "Bonus Ninja", "Bonus Shura", "Bonus Shaman" )
if s == 1 then
say_reward("Bônus contra Guerreiros: 10%")
affect.add_collect_point(POINT_ATTBONUS_WARRIOR,10,60*60*24*1825*60) --60years
clear_letter()
elseif s == 2 then
say_reward("Bônus contra Ninjas: 10%")
affect.add_collect_point(POINT_ATTBONUS_ASSASSIN,10,60*60*24*1825*60) --60years
clear_letter()
elseif s == 3 then
say_reward("Bônus contra Shuras: 10%")
affect.add_collect_point(POINT_ATTBONUS_SURA,10,60*60*24*1825*60) --60years
clear_letter()
elseif s == 4 then
say_reward("Bônus contra Shamans: 10%")
affect.add_collect_point(POINT_ATTBONUS_SHAMAN,10,60*60*24*1825*60) --60years
clear_letter()
set_quest_state("collect_quest_lv94", "run")
set_state(__complete)
end
end
state __complete begin
end
end
ERRO : https://imgur.com/nxxShyp
Share this post
Link to post
Share on other sites