must start with 'quest'
veteran.quest:1:Abort (core dumped)

---------------------------------------------
-- Regulament -
---------------------------------------------
quest regulament begin
state start begin
when login begin
send_letter("Regulament-CITESTE!")
end
when button or info begin
say_title("Acesta este regulamentul jocului:")
say_albastru("1.Numele nu trebuie să conţina cuvinte obscene.")
say_rosu("2.Fara nick-uri gen GMPiColo sau orice nume de acest tip!Riscaţi ban permanent ip/pc!")
say_verde("3.Nu cereţi iteme!Se pedepseşte cu mute de la 10 la 32 ore!")
say_verde2("4.Modul serverului este pvm-Hard.")
say_auriu("5.Nu adresa cuvinte obscene celorlalţi jucători.")
say_negru("6.Nu abuzaţi de modul de joc LIBER.")
say_alb("7.Donaţiile se fac doar la [Own]PiColo.")
say_galben("8.Nu minţiţi în legătură cu donaţiile.Riscaţi ban.")
say("-- Citiţi şi pagina următoare va rugam! --")
say("--------------------------------------")
say_title("Dute la pagina urmatoare")
wait()
say_title("9.Bugurile se raportează la un Game Master sau la Magazin Diverse.")
say_title("10.Nu dati datele de logare nimănui!")
say_title("11.Nu abuzaţi de buguri.")
say_title("12.Respectaţi/faceţi cu stricteţe ce va cere GM-ul.")
say("Vă mulţumim pentru timpul acordat citirii acestui regulament.")
say("Respectă acest regulament şi nu vei avea probleme.")
say("Vizitează Situl serverului:www.Metin2NeTher.tk")
end
end

-----------------------------------------------
---- Quest realizat de Donici Cãtãlin ----
-----------------------------------------------
quest rasplata begin
state start begin
when login with pc.level >= 105 begin
set_state(player_level_max)
end
end

state player_level_max begin
when letter begin
send_letter("Veteran Metin2NeTher")
end

when button or info begin
say_title("Veteran Metin2NeTher:")
say("")
say_verde("Salut ".. pc.get_name() ..", dupã multã muncã si")
say_verde("nopti pierdute, ai ajuns la level 105.")
say_verde("Felicitãri! Sper sã rãmâi în continuare pe")
say_verde("serverul nostru.")
say("")
say_reward("O zi bunã în continuare !")
wait()
say_title("Rãsplatã:")
say("")
say_albastru2("Împreunã cu echipa, am decis,")
say_albastru2("sã îti oferim un cadou.")
say("")
say("")
say("")
say_auriu("Ai primit +500 HP permanent.")
say_auriu("Ai primit +50 atac permanent.")
say_auriu("Ai primit +50 aparare permanent.")
say_auriu("NOUU!Vei avea scris [Veteran]in fata numelui!!")

affect.add_collect(apply.MAX_HP,500,60602436560)
affect.add_collect(apply.ATT_GRADE_BONUS, 50, 60602436560)
affect.add_collect(apply.DEF_GRADE_BONUS, 50, 60602436560)
notice_all("Veteranul ".. pc.get_name() ..", a ajuns la level maxim.")
notice_all("Felicitãri din partea echipei Metin2NeTher!")
clear_letter()
set_state(__COMPLETE__)
q.done()
end
end
state __COMPLETE__ begin
end
end

-------------------------------------
--Xander QUEST
------------------------------------
quest intrare_mapmapabeche begin
state start begin
when login or levelup with pc.level >70 begin
set_state(v3transport)
end
end

state v3transport begin
when 20086.chat."SD3 LvL70" begin
say(""..mob_name(20086).."")
say("Locatia aceste harti este cunoscuta de foarte putini")
say("si cei care cunosc locatia o tin secreta.")
say("In aceasta Harta poti sa cresti de la nivelul 95+")
say("Doar un adevarat Razboinic poate intra Aici!.")
wait()
if pc.get_premium_remain_sec(PREMIUM_EXP) > 0 then
say("Esti pregatit sa treci de pragul lumii")
say("civilizate Daca ai peste nivelu 70")
say("")
wait()
end
if pc.level >69 then
say(""..mob_name(20086).."")
say("Pregatestete!Te voi duce unde doar marii")
say("eroi au acces!Ai grija!")
pc.remove_item(200001)
char_log(0,"GO_SPIDER1")
wait()
elseif pc.level >69 then
say(""..mob_name(20086).."")
say("Nu ai nivelu necesar.Intoarcete doar")
say("cand indeplinesti cerintele.")
char_log(0,"GO_SPIDER1","USE_ITEM(3217321)")
wait()
return
else
say(""..mob_name(20086).."")
say(" Nu ai nivelu necesar.Intoarcete doar")
say("cand indeplinesti cerintele.")
wait()
return
end

say("Pregatestete!Te voi duce unde doar marii")
say("eroi au acces!Ai grija!")
wait()
pc.warp( 88100 , 614900 )
return
end

end

end

quest regina_boss begin
state start begin

when 20095.chat."Catre etajul 3 din Dungeon." with pc.get_map_index() == 71 begin
if get_time() > game.get_event_flag("regina_time") then
game.set_event_flag("regina_zugang",0)
end
if pc.is_gm() or pc.count_item(80041) >= 1 then
say_title(""..mob_name(30123).."")
say("Bun venit "..pc.get_name().."")
say("Nu ai nevoie nici de chei nici de parola")
say("esti GM poti intra cand vrei.")
wait()
pc.warp(69000, 610000)
return
end
if game.get_event_flag("regina_zugang") == 0 and pc.count_item(30320) < 1 then
say_title(""..mob_name(30123).."")
say_reward("Pentru a intra în Temnita Reginei,")
say_reward("ai nevoie de "..item_name(30320).."")
say_item_vnum(30320)
say_reward("Aceasta cheie rasucita pica la Moartea Albastra.")
say_reward("Ai nevoie de ticket pentru a intra.")
return
end
if game.get_event_flag("regina_zugang") == 1 then
say_title(""..mob_name(30123).."")
pc.setqf("regina_pass", 078954687921)
if pc.getqf("ragage") == 1 then
pc.setqf("ragage",0)
say("Ai ticket-ul de intrare.")
say("Te voi teleporta imediat in camera reginei.")
pc.setqf("erlsss",1)
wait()
pc.warp(69000, 610000)
return
end
say("Introdu codul ales de liderul grupului.")
local passwort = tonumber(input(""))
--pc.setqf("regina_pass", passwort)
if game.get_event_flag("regina_passwort") == passwort then
say_title(""..mob_name(30123).."")
say("Ai introdus codul corect.")
if pc.count_item(30320) < 1 then
say("Nu te pot teleporta deoarece nu ai")
say(""..item_name(30320).."")
say_item_vnum(30320)
say("Ai nevoie de ticket.")
return
end
say("Te voi teleporta imediat.")
pc.setqf("erlsss",1)
wait()
if pc.can_warp() then
pc.remove_item("30320",1) end
pc.warp(69000, 610000)
elseif passi != pc.getqf("regina_pass") then
say_title(""..mob_name(30123).."")
say("")
return
end
end
if game.get_event_flag("regina_zugang") == 0 and pc.count_item(30320) >= 1 then
say_title(""..mob_name(30123).."")
say("Detin în mine, ultima otrava a reginei.")
say("Aceasta otrava magica te pot ajuta sã mergi în")
say_reward("Temnita Reginei.")
say("")
say("Ai nevoie de ticket.")
local i = select("Da, Vreau", "Nu, Multumesc")
if 1 == i then
say_title(""..mob_name(30123).."")
say("Ai nevoie de un cod pentru tine si grupul tau.")
say("Codul pe care îl vei introduce, va trebui sa ")
say("contina maxim 2 cifre.")
local passwort = tonumber(input(""))
if passwort and passwort <= 999999999 and pc.count_item(30320)>=1 then
game.set_event_flag("regina_zugang",1)
game.set_event_flag("regina_passwort",passwort)
local times = get_time() + 300 --Wartezeit
game.set_event_flag("regina_time", times)
say_title(""..mob_name(30123).."")
pc.setqf("ragage",1)
say("Parola aleasa este: "..passwort.."")
pc.remove_item("30320",1)
else
say_title(""..mob_name(30123).."")
say("Nu ai scris codul corect.")
end
end
end
end
when login with pc.get_map_index() == 195 and not pc.is_gm() begin
if pc.count_item("80041") >= 1 then chat("") return end
if pc.get_level() < 75 or pc.getqf("erlsss") == 0 and pc.get_map_index() == 195 then
chat("")
warp_to_village()
end
notice_in_map("[Temnita Reginei]:Bun venit în Temnita Reginei ! Incepem prima sarcina a voastra.")
notice_in_map("[Temnita Reginei]:Mergeti si cautati NPC-ul de acces, si aflati care este metinul corespunzator.")
pc.set_warp_location(71 , 6656, 4352)
end
when 8041.kill with pc.in_dungeon() begin
d.notice("Ati distrus metin-ul gresit..")
end -- Close when
when 2095.kill with pc.in_dungeon() begin
d.notice("Ati distrus metin-ul corect!")
d.kill_all()
d.notice("Regele paianjen vine cu trupele sale dupa tine..")
d.spawn_mob(2092, 367, 587)
end -- Close when
when time_spiderboss0.timer begin
d.notice("Ai la dispozitie 20 de minute pentru a omora Regele Paianjen!")
timer("time_spiderboss0", 1200)
end -- Close when
when time_spiderboss5.timer begin
d.notice("Tens apenas 15 minutos!")
timer("time_spiderboss5", 1200)
end -- Close when
when time_spiderboss10.timer begin
d.notice("Tens apenas 10 minutos!")
timer("time_spiderboss10", 1200)
end -- Close when
when time_spiderboss15.timer begin
d.notice("Tens apenas 5 minutos!")
timer("time_spiderboss15", 1200)
end -- Close when
when time_spiderboss20.timer begin
d.notice("Timpul a expirat, vei fi teleportat inapoi.")
timer("time_spiderboss20", 1200)
d.jump_all(6656, 4352)
end -- Close when
when 2092.kill with pc.in_dungeon() begin
d.notice("Spiritul raului te vrea plecat de aici.")
d.notice("Vei fi teleportat in aproximativ un minut!")
d.notice("Omoara mai repede, pana nu va fi prea tarziu.")
d.kill_all()
nation = { "Shinsoo" , "Chunjo" , "Jinno" }
notice_all("Jucatorul "..pc.get_name().." din regatul " .. nation [ pc.getempire() ] .. " a omorat Regele Paianjen!")
timer("spiderboss_time_out", 60)
end -- Close when
when spiderboss_time_out.timer with pc.get_map_index() == 195 begin
pc.setqf("spiderboss", 0)
d.jump_all(6656, 4352)
end -- Close when
when 20095.chat."Misterul Temnitei" with pc.getqf("spiderboss") == 1 begin
say_title(""..mob_name(20095).."")
say("")
say("Aceasta temnita cu mult timp in urma,")
say("era un parc de distractie pentru copii,")
say("dar intr-o zi un razboinic a omorat un paianjen si,")
say("blestemul a coborat asupra lui si intregii temnite..")
say("De atunci nimeni nu a mai avut curajul sa intre acolo!")
say("")
end -- Close when
end -- Close state
end -- Close quest

-------------------------------------
--Xander QUEST
------------------------------------
quest intrare_mapbetasparta begin
state start begin
when login or levelup with pc.level >80 begin
set_state(v3transport)
end
end

state v3transport begin
when 20086.chat."Mapa Metinelor LvL80" begin
say(""..mob_name(20086).."")
say("Locatia aceste harti este cunoscuta de foarte putini")
say("si cei care cunosc locatia o tin secreta.")
say("In aceasta Harta poti sa cresti de la nivelul 80+")
say("Doar un adevarat Razboinic poate intra Aici!.")
wait()
if pc.get_premium_remain_sec(PREMIUM_EXP) > 0 then
say("Esti pregatit sa treci de pragul lumii")
say("civilizate Daca ai peste nivelu 80")
say("")
wait()
end
if pc.level >79 then
say(""..mob_name(20086).."")
say("Pregatestete!Te voi duce unde doar marii")
say("eroi au acces!Ai grija!")
pc.remove_item(200001)
char_log(0,"GO_SPIDER1")
wait()
elseif pc.level >79 then
say(""..mob_name(20086).."")
say("Nu ai nivelu necesar.Intoarcete doar")
say("cand indeplinesti cerintele.")
char_log(0,"GO_SPIDER1","USE_ITEM(3217321)")
wait()
return
else
say(""..mob_name(20086).."")
say(" Nu ai nivelu necesar.Intoarcete doar")
say("cand indeplinesti cerintele.")
wait()
return
end

say("Pregatestete!Te voi duce unde doar marii")
say("eroi au acces!Ai grija!")
wait()
pc.warp( 38300 , 64000 )
return
end

end

end