Jump to content

Pesquisa Biólogo Nivel 90


tierrilopes
 Share

Recommended Posts

------------------------------------------------------COLLECT QUEST_lv90--METIN2 Collecting Quest ----------------------------------------------------quest collect_quest_lv90 begin state start begin end state run begin when login or levelup with pc.level >= 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, "Chaegirab") end q.set_icon("scroll_open_green.tga") send_letter("Pesquisa de Chaegirab") end when button or info begin say("") say("Chaegirab, aprendiz de Uriel precisa da tua ajuda.") say("Vai ter com ele e ajuda-o.") say("") end when __TARGET__.target.click or 20084.chat."Por favor ouve-me" begin target.delete("__TARGET__") --- l say_title("Chaegirab:") say("") say("Agradeço imenso o que tens passado para me ajudar.") say("No entanto, preciso que me faças outro favor.") say("Esta será a última vez que te pedirei ajuda, pois a minha pesquisa") say("está a chegar ao fim.") say("") wait() say_title("Chaegirab:") say("") say("Preciso que me tragas Notas do Lider.") say("Tem em atenção pois estas serão mais dificeis de arranjar!") say("") say_reward("Entrega 50 Notas do Líder a Chaegirab.") 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 Chaegirab") end when button or info begin say_title("Descobre informações sobre Bosses") --- l say("") say("Chaegirab está a pesquisar sobre monstros boss!") say("Colecciona 50 Notas do Lider apartir dos diferentes bosses:") say(mob_name(1093)..", "..mob_name(2307)..", "..mob_name(1304)..", ") say(mob_name(2091)..", "..mob_name(2092)..", "..mob_name(2191)..", ") say(mob_name(2206).." and "..mob_name(1901)..".") say_item_vnum(30168) say_reward("De momento entregas-te".." "..pc.getqf("collect_count").." Notas.") say("") end when 71035.use or 76020.use begin if get_time() < pc.getqf("duration") then syschat("Ainda não podes usar.") return end if pc.getqf("drink_drug")==1 then syschat("Já usas-te.") return end if pc.count_item(30168)==0 then syschat("Podes usar quando tiveres Notas do Líder.") return end item.remove() pc.setqf("drink_drug",1) end when 70030.use begin if get_time() > pc.getqf("redm_duration") then pc.setqf("monocles_used", 0) end if get_time() > pc.getqf("duration") then syschat("You can already give the next item to Chaegirab. No Monocle needed.") return end if pc.getqf("monocles_used") > 2 then syschat("You have already used 3 Red Monocles today.") return end if pc.getqf("monocles_used") == 0 then pc.setqf("redm_duration", get_time()+24*60*60) end item.remove() pc.setqf("duration", get_time()-1) local use = pc.getqf("monocles_used")+1 pc.setqf("monocles_used",use) syschat("You have used a Red Monocle. You can give the next Notice of Plague King to Chaegirab.") end when 691.kill or 1093.kill or 2307.kill or 1304.kill or 2091.kill or 2092.kill or 2191.kill or 2206.kill or 1901.kill begin local s = number(1, 100) if s <= 75 then pc.give_item2(30168, 1) send_letter("Nota do Líder!") end end when 20084.chat."Trouxes-te uma Nota do Líder? " with pc.count_item(30168) >0 begin if get_time() > pc.getqf("duration") then if pc.count_item(30168) >0 then say_title("Chaegirab:") --- l say("") say("Oh!! Dá-me um momento...") say("") pc.remove_item(30168, 1) if is_test_server() then pc.setqf("duration",get_time()+2) else pc.setqf("duration",get_time()+60*60*16) -----------------------------------22hours 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<= pass_percent then if pc.getqf("collect_count")< 49 then --less than 50 local index =pc.getqf("collect_count")+1 pc.setqf("collect_count",index) say_title("Chaegirab:") say("") say("Oh, Oh!! Excelente! Fizes-te um óptimo trabalho!") say("Só preciso de mais".." "..50-pc.getqf("collect_count").. "!!") say("Boa Sorte!") say("") pc.setqf("drink_drug",0) --Potion reset return end say_title("Chaegirab:") say("") say("Entregas-te todas as notas!!") say("Agora preciso da última peça:") say_item("Pedra-Espírita do Líder",30227,"") say("") pc.setqf("collect_count",0) pc.setqf("drink_drug",0) pc.setqf("duration",0) set_state(key_item) return else say_title("Chaegirab:") say("") say("Esta não serve.") say("Por favor traz-me outra.") say("") pc.setqf("drink_drug",0) --Potion reset return end else say_title("Chaegirab:") say("") say("Por favor volta quando encontrares "..item_name(30168)..".") return end else say_title("Biólogo Chaegirab:") say("") local hours = math.floor((pc.getqf("duration")-get_time())/60/60) local remaining = hours.." horas" if hours < 1 then remaining = "daqui a uns minutos" elseif hours < 2 then remaining = "mais logo" end say("Ainda não acabei de analisar a última. Traz-me isso "..remaining.."?") say("") end endend state key_item begin when letter begin send_letter("Pesquisa de Chaegirab") if pc.count_item(30227)>0 then local v = find_npc_by_vnum(20084) if v != 0 then target.vid("__TARGET__", v, "Chaegirab") end end end when button or info begin if pc.count_item(30227) >0 then say_title("Ganhas-te: Pedra-Espírita do Líder!") say("") --- l say("Finalmente consegui a Pedra-Espírita do Líder!") say("Está na hora de voltar a Chaegirab!") say("") return end say_title("Pedra-Espírita do Líder") say("") --- l say("Depois de entregues as Notas do Líder, Chaegirab,") say("pediu para lhe trazeres a Pedra-Espírita do Líder.") say_item_vnum(30227)----------A Pedra-Espírita do Líder say("Podes arranjar nos seguintes monstros: "..mob_name(1304)..", "..mob_name(1093).." ") say("and "..mob_name(1901)..".") say("") end when 1093.kill or 1304.kill or 1901.kill begin local s = number(1, 100) if s <= 30 and pc.count_item(30227)==0 then pc.give_item2(30227, 1) send_letter("Obtives-te Pedra-Espírita do Líder!") end end when __TARGET__.target.click or 20084.chat."Entregas-te Pedra-Espírita do Líder" with pc.count_item(30227) > 0 begin target.delete("__TARGET__") if pc.count_item(30227) > 0 then say_title("Chaegirab:") say("") say("OHOHOH!!! Bom trabalho..") say("Mais uma vez toma esta receita e leva-a a Baek-Go.") say("Ele sabe o que fazer com ela.") say("Mais uma vez, obrigado.") say("") pc.remove_item(30227,1) set_state(__reward) else say_title("Chaegirab:") say("") say("Traz-me "..item_name(30227)..".") say("") return end end end state __reward begin when letter begin send_letter("Recompensa de Chaegirab") 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("Recompensa de Chaegirab") say("") --- l say("Depois de teres ajudado Chaegirab com a") say("sua pesquisa, ele deu-te uma receita.") say("") say("Entrega-a a Baek-Go para ele fazer a poção.") say("") end when __TARGET__.target.click or 20018.chat."Take a look at this prescription" begin target.delete("__TARGET__") say_title("Baek-go:") say("") say("Deixa-me ver..") say("Outra receita de Chaegirab?") say("") say("Hmm... Aumento de Danos contra Jogadores.") say("") say("Cá está a poção!") say("") wait() say_title("Baek-go:") say("") say("E .. toma lá mais uma caixa.") say("") say_reward("Recompensa:") say_reward("+8% Dano contra Jogadores") say("") say_reward("This is a permanent effect.") affect.add_collect_point(POINT_ATTBONUS_WARRIOR,8,60*60*24*365*60) affect.add_collect_point(POINT_ATTBONUS_ASSASSIN,8,60*60*24*365*60) affect.add_collect_point(POINT_ATTBONUS_SURA,8,60*60*24*365*60) affect.add_collect_point(POINT_ATTBONUS_SHAMAN,8,60*60*24*365*60) pc.give_item2(50114) clear_letter() set_quest_state("collect_quest_lv92", "run") set_state(__complete) end end state __complete begin endend

biologo_lvl90.quest

biologo_lvl90.quest

Link to comment
Share on other sites

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
 Share

×
×
  • Create New...