Jump to content

Pesquisa Biólogo Nivel 94


tierrilopes

Recommended Posts

------------------------------------------------------COLLECT QUEST_lv94--METIN2 Collection Quest----------------------------------------------------quest collect_quest_lv94 begin state start begin end state run begin when login or levelup with pc.level >= 94 begin set_state(information) end end state information begin when letter begin local v = find_npc_by_vnum(20091) if v != 0 then target.vid("__TARGET__", v, "Seon-Pyeong") end q.set_icon("scroll_open_green.tga") send_letter("Pesquisa de Seon-Pyeong") end when button or info begin say_title("Pesquisa de Seon-Pyeong") say("") say("Seon-Pyeong está no Vale Seungryong") say("à tua procura.") say("Vai ver o que se passa.") say("") end when __TARGET__.target.click or 20091.chat."Weapon collecter Seon-Pyeong" begin target.delete("__TARGET__") --- l say_title("Seon-Pyeong:") say("") say("Oh.. Bravo Guerreiro! Estava à tua procura!") say("Preciso que me ajudes, os monstros da Gruta das Almas têm") say("jóias importantes para me ajudar na minha pesquisa!") say("") wait() say_title("Seon-Pyeong:") say("") say("As jóias têm que ser perfeitas!") say("Quando me trouxeres uma eu avalio-as!") say("Por favor, traz-me 10 Jóias da Sabedoria!") 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("Pesquisa de Seon-Pyeong") end when button or info begin say_title("Jóias da Sabedoria") --- l say("Seon-Pyeong, precisa que colecciones") say("Jóias da Sabedoria para ajudar com a pesquisa dele.") say("Estas jóias podem ser arranjadas nos seguintes monstros:") say_reward("Arqueira Setao | Comandante Setao") say_item_vnum(30252) say_reward("Entregas-te".." "..pc.getqf("collect_count").." jóias.") say("") end when 71035.use or 76020.use begin if get_time() < pc.getqf("duration") then syschat("Ainda não podes.") return end if pc.getqf("drink_drug")==1 then syschat("Já usas-te.") return end if pc.count_item(30251)==0 then syschat("Poderás usar quando tiveres os Jóias da Malevolência.") return end item.remove() pc.setqf("drink_drug",1) end when 2402.kill or 2404.kill begin local s = number(1, 100) if s <= 1 then pc.give_item2(30252, 1) send_letter("Obtives-te Jóia da Sabedoria!") end end when 20091.chat."Trouxes-te a Jóia da Sabedoria?" begin if get_time() > pc.getqf("duration") then if pc.count_item(30252) > 0 then say("Seon-Pyeong") say("Oh!! Trouxes-te-me uma...") say("Um momento...") say("Tenho que a verificar...") say("") pc.remove_item(30252, 1) if is_test_server() then pc.setqf("duration",get_time()+2) else pc.setqf("duration",get_time()+60*60*6) end wait() local pass_percent if pc.getqf("drink_drug")==0 then pass_percent=30 else pass_percent=75 end local s= number(1,100) if s<= pass_percent then if pc.getqf("collect_count") < 9 then local index = pc.getqf("collect_count")+1 pc.setqf("collect_count",index) say("Seon-Pyeong:") say("Oh, Oh!! Excelente! Fizes-te um óptimo trabalho...") say("Só precisa de trazer mais".." "..10-pc.getqf("collect_count").. " !!") say("Continua assim!") say("") pc.setqf("drink_drug",0) return end while true do say_title("Seon-Pyeong:") say("") say("Entregas-te todas as 10!") say("Escolhe bem qual das recompensas queres!") say_reward("Não poderás escolher o mesmo bónus duas vezes!") say("") s2 = select("Max VD +1500","Defesa +500","Valor Ataque +200") if 1== s2 then if pc.getf("collect_quest_lv92","block_id") == 1 then say_white("Não podes escolher o mesmo bónus duas vezes.") wait() else affect.add_collect(1, 1500, 60*60*24*365*60) pc.setf("collect_quest_lv94","block_id",1) break end elseif 2== s2 then if pc.getf("collect_quest_lv92","block_id") == 2 then say_white("Não podes escolher o mesmo bónus duas vezes.") wait() else affect.add_collect(apply.DEF_GRADE_BONUS, 500, 60*60*24*365*60) pc.setf("collect_quest_lv94","block_id",2) break end else if pc.getf("collect_quest_lv92","block_id") == 3 then say_white("Não podes escolher o mesmo bónus duas vezes.") wait() else affect.add_collect(apply.ATT_GRADE_BONUS,200,60*60*24*365*60) pc.setf("collect_quest_lv94","block_id",3) break end end end pc.setqf("collect_count",0) pc.setqf("drink_drug",0) pc.setqf("duration",0) clear_letter() set_quest_state("collect_quest_lv96", "run") set_state(__complete2__) return else say("Seon-Pyeong:") say("Este não serve...") say("Por favor traz-me outro.") say("") pc.setqf("drink_drug",0) return end else say("Seon-Pyeong:") say("Volta quando encontrares: "..item_name(30252).."") return end else local hoursleft = math.ceil((pc.getqf("duration")-get_time())/60/60) say("Seon-Pyeong:") say("Ainda não acabei de analisar o último..") say("Poderias trazer isso") say("daqui a "..hoursleft.." horas?") say("") return end end end state __complete begin end state __complete2__ begin endend

biologo_lvl94.quest

biologo_lvl94.quest

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...