Jump to content

Pesquisa Biólogo Nivel 80


tierrilopes

Recommended Posts

------------------------------------------------------COLLECT QUEST_lv80--METIN2 Collecting Quest----------------------------------------------------quest collect_quest_lv80 begin state start begin end state run begin when login or levelup with pc.level >= 80 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 do Biólogo") end when button or info begin say("") say("Biólogo Chaegirab, aprendiz de Uriel,") say("precisa da tua ajuda.") say("") say("Vai ver o que se passa.") say("") end when __TARGET__.target.click or 20084.chat."Listen" begin target.delete("__TARGET__") say_title("Chaegirab:") say("") --- l say("Oh Olá!!! Como estou feliz por te ver...") say("Preciso de pesquisar a Planície Seca, mas") say("não o consigo fazer sozinho..") say("Por isso, preciso que me ajudes com isso.") say("Certamente serás bem recompensado.") say("") wait() say_title("Chaegirab:") say("") say("Preciso que vás lá e derrotes os gigantes.") say("Eles têm algo que me interessa: Certificado de Tugyi.") say("") say("Poderás trazer-me 30 destes certificados?") say("Boa Sorte!") 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("Pesquisa do Biólogo") end when button or info begin say_title("A Pesquisa do Biólogo") --- l say("") say("Chaegirab, aprendiz de Uriel") say("está a examinar Certificados de Tugyi.") say("Traz 30 desses certificados para ele os") say("puder investigar.") say("") say_item_vnum(30166) say("") say_reward("Já coleccionas-te".." "..pc.getqf("collect_count").."certificados") 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(30166)==0 then syschat("Poderás usar quando tiveres certificados.") 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()+7*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 Giant Symbol to Chaegirab.") end when 1401.kill or 1402.kill or 1403.kill or 1601.kill or 1602.kill or 1603.kill begin local s = number(1, 100) if s <= 5 then pc.give_item2(30166, 1) send_letter("Encontras-te "..item_name(30166)..".") end end when 20084.chat."Os Certificados" with pc.count_item(30166) >0 begin if get_time() > pc.getqf("duration") then say_title("Chaegirab") --- l say("") say("Oh!! Trouxes-te um certificado...") say("Vou verificá-lo dá-me um momento...") say("") pc.remove_item(30166, 1) pc.setqf("duration",get_time()+60*60*12) -----------------------------------22½Ã°£ 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")< 29 then --weniger als 30 local index =pc.getqf("collect_count")+1 pc.setqf("collect_count",index) say("Chaegirap:") say("Oh!! Maravilhoso! Era mesmo isto!") say("Só restam".." "..30-pc.getqf("collect_count").. " certificados.") say("Boa Sorte!") say("") pc.setqf("drink_drug",0) return end --- l say_title("Chaegirab:") say("") say("Encontras-te todos os certificados!!!") say("Só estou a faltar uma coisa:") say_reward("Pedra-Espírita Tugyi") say("") say("Poderias-me trazer uma?") 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("Hmm... Este não serve...") say("Por favor traz-me outro.") say("") pc.setqf("drink_drug",0) return end else say_title("Biólogo Chaegirab:") say("") local hours = math.floor((pc.getqf("duration")-get_time())/60/60) local remaining = hours.." hours" if hours < 1 then remaining = "uns minutos" elseif hours < 2 then remaining = "mais logo" end say("Imensas desculpas, ainda não acabei de analisar o último") say("que me trouxes-te. Volta daqui a "..remaining.."?") say("") end end end state key_item begin when letter begin send_letter("Pesquisa do Biólogo") if pc.count_item(30225)>0 then local v = find_npc_by_vnum(20084) if v != 0 then target.vid("__TARGET__", v, "Chaegirap") end end end when button or info begin if pc.count_item(30225) >0 then say_title("Pedra-Espírita Tugyi") say("") --- l say("Finalmente encontras-te a Pedra-Espírita Tugyi!") say("") say("Leva-a a Chaegirab.") say("") return end say_title("Pedra-Espírita Tugyi") say("") --- l say("Nesta pesquisa entregas-te 30 Certificados Tugyi.") say("Agora ele já só precisa da Pedra-Espírita Tugyi.") say("Poderás encontrá-la na Planicie Seca!") say_item_vnum(30225) say("Trá-la a Chaegirab.") say("") end when 1401.kill or 1402.kill or 1403.kill or 1601.kill or 1602.kill or 1603.kill begin local s = number(1, 100) if s == 1 and pc.count_item(30225)==0 then pc.give_item2(30225, 1) send_letter("Encontras-te a Pedra-Espírita Tugyi.") end end when __TARGET__.target.click or 20084.chat."Encontras-te a Pedra-Espírita Tugyi" with pc.count_item(30225) > 0 begin target.delete("__TARGET__") say_title("Chaegirap") say("") --- l say("Oh! Muito Obrigado!") say("Como recompensa aumentarei os teus poderes.") say("Toma esta receita e entrega-a a Baek-Go. Ele saberá o que fazer com ela.") say("") say("Estou extremamente agradecido.") say("") pc.remove_item(30225,1) set_state(__reward) end end state __reward begin when letter begin send_letter("A 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_title("A recompensa de Chaegirab") --- l say("Como recompensa por ajudares Chaegirab com a sua pesquisa,") say("Chaegirab, deu-te uma receita.") say("") say("Entrega-a a Baek-go para uma recompensa.") say("") end when __TARGET__.target.click or 20018.chat."The Secret Recipe" begin target.delete("__TARGET__") say_title("Baek-Go:") say("") say("Deixa-me ver..") say("Foi esta a receita que ele te deu?") say("Hmm... +10% Dano Total e +6 Velocidade Ataque.") say("Cá vamos nós.") say("") wait() say("Baek-Go:") say("") say("Aproveita e leva esta caixa também!") say("") --- l say_reward("Recompensa por ajudares Chaegirab:") say_reward("+10% Dano Total e +6 Velocidade Ataque") say_reward("") say_reward("Estas efeitos são permanentes.") affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60) --60Jahre affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60) --60³â pc.give_item2(50114) clear_letter() set_quest_state("collect_quest_lv85", "run") set_state(__complete) end end state __complete begin endend

biologo_lvl80.quest

biologo_lvl80.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...