Cod: Selectaţi tot
----------------------------------
-- LvL 90 / Notiz der Anführer
----------------------------------
state biode90 begin
when login or levelup with pc.level >=90 begin
set_state(vbcubiode90)
end
end
state vbcubiode90 begin
when letter begin
local v = find_npc_by_vnum(20084)
if v != 0 then target.vid("__TARGET__", v, "Biologe")
end
send_letter("&Colectarea insemnelor lider")
q.set_icon("scroll_open_green.tga")
end
when button or info begin
say_title("Cererea biologului")
say("Biologul are nevoie de ajutorul tau dute si vezi ce")
say("vrea sa faci pentru el. Bineinteles vei primi si ")
say("o recompensa binemeritata. ")
say("")
end
when __TARGET__.target.click or 20084.chat."Insemne lider." begin
target.delete("__TARGET__")
say_title("Biologul Regatului:")
say("Oh, ai venit sa ma ajuti? ")
say("Ei bine eu sunt biologul acestui regat, si ma ocup")
say("cu studiul numeroaselor plante din regat.")
say("Daca ma ajuti cu cercetarea eu te voi rasplati din")
say("plin cu retete secrete ce iti vor imbunatatii.")
say("calitatile de luptator.")
wait()
say_title("Biologul Regatului:")
say("De aceasta data eu ma ocup de insemnele lider,")
say("in acest moment ma ocup de un alt studiu si nu")
say("pot pleca in excursie de cercetare. Trebuie sa ")
say("vanezi Lideri sau sefi de grup.")
wait()
say_title("Biologul Regatului:")
say("Odata ce ai gasit un lider va")
say("trebuii sa colectezi 1 insemn in ")
say("perfecta stare pentru cercetarile mele.")
say("")
set_state(colecteaza_insemne)
pc.setqf("duration",0)
pc.setqf("collect_count",0)
end
end
state colecteaza_insemne begin
when letter begin
send_letter("&Colectarea insemnelor lider.")
q.set_icon("scroll_open_green.tga")
end
when button or info begin
say_title("Metin2Phoenix - Insemnele liderilor:")
say("Biologul te-a trimis sa vanezi lideri pt.")
say("a colecta 50 insemne lider. Colecteaza-le pe")
say("toate si du biologului pe rand cate una pentru")
say("a finaliza cercetarile actuale.")
say("")
say("Info:Poti duce un insemn la 3 ora.")
say_item_vnum(30168)
say("Pana acum ai "..pc.getqf("collect_count").." insemne lider.")
say("")
end
when 591.kill or 691.kill or 791.kill or 793.kill or 991.kill or 992.kill or 993.kill or 1091.kill or 1092.kill or 1093.kill or 1304.kill or
1403.kill or 2091.kill or 2191.kill or 2206.kill or 2207.kill or 2306.kill or 2493.kill or 2494.kill or 5001.kill or 5004.kill or
5161.kill or 5162.kill or 5163.kill begin
local rand = number(0,6)
if rand<5 then pc.give_item2(30168, 1)
end
end
when 20084.chat."Am un insemn lider." with pc.count_item(30168)>0 begin
if get_time()>pc.getqf("duration") then
say("Da-mi un moment te rog. Multumesc pentru")
say("timpul acordat. Acum voi verifica sa vad")
say("daca insemnul acesta este util.")
say("Sansa ca un insemn sa fie bun: 95%")
pc.remove_item("30168", 1)
pc.setqf("duration",get_time() + 60*60*3)
wait()
local rand = number(0,99)
if rand > 20 then
local count = pc.getqf("collect_count")+1
if count<1 then
pc.setqf("collect_count", count)
say_title("Biologul Regatului:")
say("Foarte bine, acest insemn este de calitate.")
say("Il voi contoriza.")
say("Pana acum ai "..pc.getqf("collect_count").." insemne lider.")
say("Trebuie sa imi aduci in total 50.")
say("")
else
say_title("Biologul Regatului:")
say("Se pare ca ai adunat toate crengute rosii.")
say("Totusi mai am o mica sarcina. Am nevoie de")
say("o bijuterie a sufletului pentru a insemnele..")
say_item_vnum(30227)
say("")
pc.setqf("collect_count",0)
pc.setqf("duration",0)
set_state(marea_cheie)
end
else
say_title("Biologul Regatului:")
say("Aceast insemn este de calitate proasta.")
say("Adu-mi alta mai tarziu.Totusi va dura.")
say("vreo ora sa o distrug pe aceasta.Existenta sa")
say("nu aduce nimic bun.")
end
else
say_title("Biologul:")
say("Imi pare rau,dar nu am reusit sa termin")
say("de studiat,ultimul insemn adus de tine.")
say("Acest lucru dureaza 3 ore.")
say_item_vnum(30168)
end
end
when 20084.chat."Insemn lider-Elimina timp" with get_time() <= pc.getqf("duration") begin
say_title("Biologul Regatului:")
say("Planta magica contine acid sulfuric")
say("Doar o picatura din ea pe un obiect si")
say("a fost distrus!Daca imi oferi una voi putea")
say("sparge insemnul mai repede!Ai una?")
say_item("Floarea biologului","31066","")
local s = select ("Da,am la mine.", "Inapoi")
if s == 2 then
return
elseif s == 1 then
if pc.count_item(31066) > 0 then
say_title("Biologul:")
say("Aceasta planta este magnifica.Voi putea distruge")
say("insemnul imediat.")
say(" . . . ")
say(" . . . ")
say("Gata.Insemnul a fost distrus.Acum astept sa imi")
say("dai alta pentru cercetari!")
pc.remove_item(31066, 1)
pc.setqf("duration", get_time()-1)
end
elseif pc.count_item(31066) == 0 then
say_title("Biologul:")
say("Nu detii nici o planta de acest gen.")
say("Ce e drept..este destul de rara.")
say("Iti dau un sfat:O vei gasii in cufarul")
say("floral.")
say_item_vnum(30167)
end
end
end
state marea_cheie begin
when letter begin
send_letter("&P. sufletului liderilor")
q.set_icon("scroll_open_green.tga")
end
when button or info begin
say_title("P. sufletului liderilor")
say("Felicitari! Ai colectat toate cele 50 insemne")
say("Acum trebuie sa capturati piatra liderilor")
say_item_vnum(30227)
say("Aceasta piatra sigilieaza insemnele.")
say("")
end
when 591.kill or 691.kill or 791.kill or 793.kill or 991.kill or 992.kill or 993.kill or 1091.kill or 1092.kill or 1093.kill or 1304.kill or
1403.kill or 2091.kill or 2191.kill or 2206.kill or 2207.kill or 2306.kill or 2493.kill or 2494.kill or 5001.kill or 5004.kill or
5161.kill or 5162.kill or 5163.kill begin
if pc.count_item(30227)<1 then
local rand = number(0,5)
if rand<5 then pc.give_item2(30227, 1)
end
end
end
when 20084.chat."P. sufletului liderilor" begin
if pc.count_item(30227)>0 then
say_title("Biologul Chaegirab")
say("Felicitarile mele ucenicule, se pare ca ai la")
say("tine P. sufletului insemnelor.")
say("Cautare noastra este pe sfarsit acum mergi la")
say("Baek-Go, si dui aceasta reteta.")
pc.remove_item(30227,1)
set_state(marea_cheie_reward)
else
say_title("Biologul Regatului")
say("Nu ai gasit "..item_name(30227).." !")
say("")
say("")
end
end
end
state marea_cheie_reward begin
when letter begin
send_letter("&Gasestel pe Baek-Go")
q.set_icon("scroll_open_green.tga")
local v = find_npc_by_vnum(20018)
target.vid("__TARGET__", v, "Doktor")
end
when button or info begin
say_title("Gasestel pe Baek-Go")
say("L-ai ajutat pe Biolog sa studieze insemnele")
say("lider. Acum mergi la Baek-Go.")
say("")
end
when __TARGET__.target.click or 20018.chat."Reteta biologului" begin
target.delete("__TARGET__")
say_title("Baek-Go:")
say("Bun venit la mine straine(o).Ce este cu aceasta ")
say("reteta ? Oh, biologul te-a trimis la mine ?")
say("Aceasta reteta permite posesorului sau sa aibe")
say("ceva atac impotriva semioamenilor si valoare atac.")
say("dar si rezistenta impotriva celorlalte caractere!")
horse.set_level(21)
wait()
say_title("Baek-Go:")
say("Aceasta reteta trimisa de biolog trebuie sa o")
say("procur pentru tine. Este deja gata.")
say("")
say("Ai primit 10% Tare impotriva Razboinic,Ninja,Sura,Saman.")
say("")
affect.add_collect(apply.ATT_BONUS_TO_WARRIOR,10,60*60*24*365*60)
affect.add_collect(apply.ATT_BONUS_TO_ASSASSIN,10,60*60*24*365*60)
affect.add_collect(apply.ATT_BONUS_TO_SURA,10,60*60*24*365*60)
affect.add_collect(apply.ATT_BONUS_TO_SHAMAN,10,60*60*24*365*60)
pc.give_item2("50114")
complete_quest()
pc.setqf("bio_donex", 1)
end
end
end Problema: Dupa ce termin de facut misiunea, apare iar, o fac din nou si iar apare si tot asa, de ce nu se opreste la level 90 ? Ce este gresit?
PS: Am lasat doar ultima misiune pentru ca imi zice ca sunt prea multe caractere.
de 
de