Tipologie server:PVM MEDIUM
*Resursă folosită:-
*ServerFiles utilizat:-
*Syserr:-
Poză:-
*Detalii suplimentare:
quest collect_quest_lv30 begin
state start begin
when login or levelup with pc.level >= 30 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, "Biologul Chaegirab:")
end
q.set_icon("scroll_open_green.tga")
send_letter("Bilog - Metin2Argo")
end
when button or info begin
say_title("Cercetările Biologului:")
say("Biologul Chaegirab, ucenicul lui Uriel, are nevoie")
say("de ajutor imediat.")
say("Grăbeşte-te şi vorbeşte cu el.")
end
when __TARGET__.target.click or 20084.chat."Am nevoie de ajutorul tău." begin
target.delete("__TARGET__")
say_title("Biologul Chaegirab:")
say("Oh!!! Te rog, ajută-mă...")
say("Colectez informaţii despre monştrii din regat,dar")
say("nu mă pot descurca singur... Aş dori să le pot")
say("colecta eu,dar poţi să îţi imaginezi că aş avea")
say("probleme deoarece sunt doar un om de ştiinţă.")
say("Te rog ajută-mă. Desigur, vei primi o recompensă.")
wait()
say_title("Biologul Chaegirab:")
say("Cercetez Orcii din Valea Seungryong. Dinţii de orc")
say("sunt capabili să treacă cu uşurinţă prin fier.")
say("De asta sunt aşa de interesat de ei. Teoria mea")
say("este că noi suntem legaţi de Orci. Dinţii lor")
say("trebuie să fie o cheie pentru evoluţia noastră.")
wait()
say_title("Biologul Chaegirab:")
say("Poţi să îmi aduci câţiva Dinţi de Orc?")
say("Dar te rog să îmi aduci câte unul la un interval")
say("mai mare de timp pentru a putea să îi examinez")
say("în detaliu. Succes !")
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("&Dinţii de Orc")
end
when button or info begin
say_title("Dinţii de Orc din Valea Seungryong:")
say("Biologul Chaegirab are nevoie de Dinţi de Orcilor")
say("din Valea Seungryong pentru a îi examina.")
say("Trebuie să îi duci câte unul la un interval de 2")
say("ore pentru a avea timp să îi examineze")
say_reward("Ai găsit "..pc.getqf("collect_count").." Dinţi de Orc până acum.")
end
when 71035.use or 76020.use begin
if get_time() < pc.getqf("duration") then
syschat("Nu poţi folosi Elixirul Exploratorului încă.")
return
end
if pc.getqf("drink_drug")==1 then
syschat("Ai folosit deja Elixirul Exploratorului.")
return
end
if pc.count_item(30006)==0 then
syschat("Nu poţi folosi Elixirul Exploratorului dacă nu ai un Dinte de Orc.")
return
end
pc.remove_item(71035, 1)
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("Deja îi poţi da Biologului următorul obiect. Nu trebuie să foloseşti Monoclul.")
return
end
if pc.getqf("monocles_used") > 4 then
syschat("Ai folosit deja 3 Monoacle Roşii pe ziua de azi.")
return
end
if pc.getqf("monocles_used") == 0 then
pc.setqf("redm_duration", get_time()+24*60*60)
end
pc.remove_item(70030, 1)
pc.setqf("duration", get_time()-1)
local use = pc.getqf("monocles_used")+1
pc.setqf("monocles_used",use)
syschat("Ai folosit un Monoclu Roşu. Îi poţi da următorul Dinte de Orc Biologului.")
end
when 20084.chat."GM: Sari peste timpul de aşteptare Quest Lv.30" with pc.count_item(30006) >0 and pc.is_gm() and get_time() <= pc.getqf("duration") begin
say(mob_name(20084))
say("Eşti un GM, OK !")
pc.setqf("duration", get_time()-1)
return
end
when 20084.chat."Dinţii de Orc." with pc.count_item(30006) >0 begin
if get_time() > pc.getqf("duration") then
if pc.count_item(30006) >0 then
say_title("Biologul Chaegirab:")
say("Salut!! Mi-ai adus un Dinte de Orc?")
say("Trebuie să îl verific mai întâi...")
say("Aşteaptă puţin.")
pc.remove_item("30006",1)
pc.setqf("duration",get_time()+2*60*60)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=70
else
pass_percent=100
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_title("Biologul Chaegirab:")
say("Ohhh!! Eşti cel mai bun...")
say("Te rog adu-mi încă "..10-pc.getqf("collect_count").. " Dinţi de Orc.")
say("Am nevoie de mai mulţi pentru a îmi finaliza")
say("cercetarea. Îţi doresc mult succes !")
pc.setqf("drink_drug",0)
return
end
say_title("Biologul Chaegirab::")
say("Ai reuşit să colectezi toţi Dinţii de Orc!")
say("Dar acum am nevoie de o Piatră a Sufletului. Este")
say("numită Piatra Sufletului Jinunggyi. O poţi găsi")
say("pentru mine? O poţi obţine de la Orci.")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Chaegirab:")
say("Hum....din păcate acesta este spart.")
say("Îmi pare rău dar nu îl pot folosi..")
say("Te rog să îmi aduci altul, bine?")
pc.setqf("drink_drug",0)
return
end
else
say_title("Chaegirab:")
say("Nu ai "..item_name(30006).."!")
return
end
else
say_title("Chaegirab:")
local hoursleft = math.floor((pc.getqf("duration")-get_time())/60)
say("Îmi pare foarte rău....")
say("Nu am terminat de analizat ultimul Dinte adus.")
say("Îmi pare foarte rău... Poţi să mi-l aduci peste")
say(""..hoursleft.." minute?")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Bilog - Metin2Argo")
if pc.count_item(30220)>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) >0 then
say_title("Piatra Sufletului:")
say_reward("În sfârşit ai găsit P. Sufletului Jinunggyi")
say_reward("Du-te cu ea la Biolog. Acesta te aşteaptă.")
return
end
say_title("Piatra Specială:")
say("Ai colectat deja 10 Dinţi de Orc.")
say("Pentru cercetarea sa Biologul Chaegirab are nevoie")
say("de asemenea de P. Sufletului Jinunggyi.")
say_item_vnum(30220)
say("Du-i piatra Biologului Chaegirab când o găseşti.")
say("O poţi obţine de la "..mob_name(635)..", ")
say(""..mob_name(636).." şi "..mob_name(637)..".")
end
when 635.kill or 636.kill or 637.kill begin
local s = number(1, 100)
if s == 1 and pc.count_item(30220)==0 then
pc.give_item2(30220, 1)
send_letter("&Ai găsit P. Sufletului Jinunggyi!")
end
end
when __TARGET__.target.click or 20084.chat."Am adus P. Sufletului Jinungyi." with pc.count_item(30220) > 0 begin
target.delete("__TARGET__")
if pc.count_item(30220) > 0 then
say_title("Biologul Chaegirab:")
say("Ohh!!! Îţi mulţumesc foarte mult!")
say("Ca şi recompensă îţi voi creşte rezistenţa ..")
say("Aceasta este o reţetă secretă care conţine detalii")
say("despre putere...")
say("Du-te cu ea la Baek-Go. El va produce Poţiunea")
say("Puterii. Succes !")
say("Cu ajutorul tău am învăţat multe despre Orci.")
pc.remove_item(30220,1)
set_state(__reward)
else
say_title("Biologul Chaegirab:")
say("Nu ai "..item_name(30220).."!")
return
end
end
end
state __reward begin
when letter begin
send_letter("&Reţeta Secretă ")
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("Recompensa Biologului:")
say("Drept recomepensă pentru ajutorul oferit ")
say("cercetărilor Biologului Chaegirab acesta ţi-a dat")
say("o reţetă secretă. Du-te cu ea la Baek-Go pentru a")
say("crea o poţiune specială.")
end
when __TARGET__.target.click or 20018.chat."Reţeta Secretă." begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Lasă-mă să arunc o privire..")
say("Aceasta este reţeta pe care Biolgoul ţi-a dat-o?")
say("Hmm, creşte viteza de mişcare. Nu e rău, eh?")
say_reward("Viteza de mişcare ţi-a fost crescută cu +10.")
say_reward("Acest efect este permanent.")
affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60)
affect.add_collect(1, 1000, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60)
affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
affect.add_collect_point(POINT_DEF_BONUS,10,60*60*24*365*60)
affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_WARRIOR,4,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_ASSASSIN,4,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_SURA,4,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_SHAMAN,4,60*60*24*365*60
affect.add_collect_point(POINT_ATTBONUS_WARRIOR,3,60*60*24*365*60)
affect.add_collect_point(POINT_ATTBONUS_ASSASSIN,3,60*60*24*365*60)
affect.add_collect_point(POINT_ATTBONUS_SURA,3,60*60*24*365*60)
affect.add_collect_point(POINT_ATTBONUS_SHAMAN,3,60*60*24*365*60)
clear_letter()
set_state(__complete)
end
state __complete begin
end
end
state start begin
when login or levelup with pc.level >= 30 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, "Biologul Chaegirab:")
end
q.set_icon("scroll_open_green.tga")
send_letter("Bilog - Metin2Argo")
end
when button or info begin
say_title("Cercetările Biologului:")
say("Biologul Chaegirab, ucenicul lui Uriel, are nevoie")
say("de ajutor imediat.")
say("Grăbeşte-te şi vorbeşte cu el.")
end
when __TARGET__.target.click or 20084.chat."Am nevoie de ajutorul tău." begin
target.delete("__TARGET__")
say_title("Biologul Chaegirab:")
say("Oh!!! Te rog, ajută-mă...")
say("Colectez informaţii despre monştrii din regat,dar")
say("nu mă pot descurca singur... Aş dori să le pot")
say("colecta eu,dar poţi să îţi imaginezi că aş avea")
say("probleme deoarece sunt doar un om de ştiinţă.")
say("Te rog ajută-mă. Desigur, vei primi o recompensă.")
wait()
say_title("Biologul Chaegirab:")
say("Cercetez Orcii din Valea Seungryong. Dinţii de orc")
say("sunt capabili să treacă cu uşurinţă prin fier.")
say("De asta sunt aşa de interesat de ei. Teoria mea")
say("este că noi suntem legaţi de Orci. Dinţii lor")
say("trebuie să fie o cheie pentru evoluţia noastră.")
wait()
say_title("Biologul Chaegirab:")
say("Poţi să îmi aduci câţiva Dinţi de Orc?")
say("Dar te rog să îmi aduci câte unul la un interval")
say("mai mare de timp pentru a putea să îi examinez")
say("în detaliu. Succes !")
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("&Dinţii de Orc")
end
when button or info begin
say_title("Dinţii de Orc din Valea Seungryong:")
say("Biologul Chaegirab are nevoie de Dinţi de Orcilor")
say("din Valea Seungryong pentru a îi examina.")
say("Trebuie să îi duci câte unul la un interval de 2")
say("ore pentru a avea timp să îi examineze")
say_reward("Ai găsit "..pc.getqf("collect_count").." Dinţi de Orc până acum.")
end
when 71035.use or 76020.use begin
if get_time() < pc.getqf("duration") then
syschat("Nu poţi folosi Elixirul Exploratorului încă.")
return
end
if pc.getqf("drink_drug")==1 then
syschat("Ai folosit deja Elixirul Exploratorului.")
return
end
if pc.count_item(30006)==0 then
syschat("Nu poţi folosi Elixirul Exploratorului dacă nu ai un Dinte de Orc.")
return
end
pc.remove_item(71035, 1)
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("Deja îi poţi da Biologului următorul obiect. Nu trebuie să foloseşti Monoclul.")
return
end
if pc.getqf("monocles_used") > 4 then
syschat("Ai folosit deja 3 Monoacle Roşii pe ziua de azi.")
return
end
if pc.getqf("monocles_used") == 0 then
pc.setqf("redm_duration", get_time()+24*60*60)
end
pc.remove_item(70030, 1)
pc.setqf("duration", get_time()-1)
local use = pc.getqf("monocles_used")+1
pc.setqf("monocles_used",use)
syschat("Ai folosit un Monoclu Roşu. Îi poţi da următorul Dinte de Orc Biologului.")
end
when 20084.chat."GM: Sari peste timpul de aşteptare Quest Lv.30" with pc.count_item(30006) >0 and pc.is_gm() and get_time() <= pc.getqf("duration") begin
say(mob_name(20084))
say("Eşti un GM, OK !")
pc.setqf("duration", get_time()-1)
return
end
when 20084.chat."Dinţii de Orc." with pc.count_item(30006) >0 begin
if get_time() > pc.getqf("duration") then
if pc.count_item(30006) >0 then
say_title("Biologul Chaegirab:")
say("Salut!! Mi-ai adus un Dinte de Orc?")
say("Trebuie să îl verific mai întâi...")
say("Aşteaptă puţin.")
pc.remove_item("30006",1)
pc.setqf("duration",get_time()+2*60*60)
wait()
local pass_percent
if pc.getqf("drink_drug")==0 then
pass_percent=70
else
pass_percent=100
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_title("Biologul Chaegirab:")
say("Ohhh!! Eşti cel mai bun...")
say("Te rog adu-mi încă "..10-pc.getqf("collect_count").. " Dinţi de Orc.")
say("Am nevoie de mai mulţi pentru a îmi finaliza")
say("cercetarea. Îţi doresc mult succes !")
pc.setqf("drink_drug",0)
return
end
say_title("Biologul Chaegirab::")
say("Ai reuşit să colectezi toţi Dinţii de Orc!")
say("Dar acum am nevoie de o Piatră a Sufletului. Este")
say("numită Piatra Sufletului Jinunggyi. O poţi găsi")
say("pentru mine? O poţi obţine de la Orci.")
pc.setqf("collect_count",0)
pc.setqf("drink_drug",0)
pc.setqf("duration",0)
set_state(key_item)
return
else
say_title("Chaegirab:")
say("Hum....din păcate acesta este spart.")
say("Îmi pare rău dar nu îl pot folosi..")
say("Te rog să îmi aduci altul, bine?")
pc.setqf("drink_drug",0)
return
end
else
say_title("Chaegirab:")
say("Nu ai "..item_name(30006).."!")
return
end
else
say_title("Chaegirab:")
local hoursleft = math.floor((pc.getqf("duration")-get_time())/60)
say("Îmi pare foarte rău....")
say("Nu am terminat de analizat ultimul Dinte adus.")
say("Îmi pare foarte rău... Poţi să mi-l aduci peste")
say(""..hoursleft.." minute?")
say("")
return
end
end
end
state key_item begin
when letter begin
send_letter("Bilog - Metin2Argo")
if pc.count_item(30220)>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) >0 then
say_title("Piatra Sufletului:")
say_reward("În sfârşit ai găsit P. Sufletului Jinunggyi")
say_reward("Du-te cu ea la Biolog. Acesta te aşteaptă.")
return
end
say_title("Piatra Specială:")
say("Ai colectat deja 10 Dinţi de Orc.")
say("Pentru cercetarea sa Biologul Chaegirab are nevoie")
say("de asemenea de P. Sufletului Jinunggyi.")
say_item_vnum(30220)
say("Du-i piatra Biologului Chaegirab când o găseşti.")
say("O poţi obţine de la "..mob_name(635)..", ")
say(""..mob_name(636).." şi "..mob_name(637)..".")
end
when 635.kill or 636.kill or 637.kill begin
local s = number(1, 100)
if s == 1 and pc.count_item(30220)==0 then
pc.give_item2(30220, 1)
send_letter("&Ai găsit P. Sufletului Jinunggyi!")
end
end
when __TARGET__.target.click or 20084.chat."Am adus P. Sufletului Jinungyi." with pc.count_item(30220) > 0 begin
target.delete("__TARGET__")
if pc.count_item(30220) > 0 then
say_title("Biologul Chaegirab:")
say("Ohh!!! Îţi mulţumesc foarte mult!")
say("Ca şi recompensă îţi voi creşte rezistenţa ..")
say("Aceasta este o reţetă secretă care conţine detalii")
say("despre putere...")
say("Du-te cu ea la Baek-Go. El va produce Poţiunea")
say("Puterii. Succes !")
say("Cu ajutorul tău am învăţat multe despre Orci.")
pc.remove_item(30220,1)
set_state(__reward)
else
say_title("Biologul Chaegirab:")
say("Nu ai "..item_name(30220).."!")
return
end
end
end
state __reward begin
when letter begin
send_letter("&Reţeta Secretă ")
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("Recompensa Biologului:")
say("Drept recomepensă pentru ajutorul oferit ")
say("cercetărilor Biologului Chaegirab acesta ţi-a dat")
say("o reţetă secretă. Du-te cu ea la Baek-Go pentru a")
say("crea o poţiune specială.")
end
when __TARGET__.target.click or 20018.chat."Reţeta Secretă." begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Lasă-mă să arunc o privire..")
say("Aceasta este reţeta pe care Biolgoul ţi-a dat-o?")
say("Hmm, creşte viteza de mişcare. Nu e rău, eh?")
say_reward("Viteza de mişcare ţi-a fost crescută cu +10.")
say_reward("Acest efect este permanent.")
affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60)
affect.add_collect(1, 1000, 60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60)
affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60)
affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
affect.add_collect_point(POINT_DEF_BONUS,10,60*60*24*365*60)
affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60)
affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_WARRIOR,4,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_ASSASSIN,4,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_SURA,4,60*60*24*365*60)
affect.add_collect_point(POINT_RESIST_SHAMAN,4,60*60*24*365*60
affect.add_collect_point(POINT_ATTBONUS_WARRIOR,3,60*60*24*365*60)
affect.add_collect_point(POINT_ATTBONUS_ASSASSIN,3,60*60*24*365*60)
affect.add_collect_point(POINT_ATTBONUS_SURA,3,60*60*24*365*60)
affect.add_collect_point(POINT_ATTBONUS_SHAMAN,3,60*60*24*365*60)
clear_letter()
set_state(__complete)
end
state __complete begin
end
end
de 
de 
de