Cu acest quest setati dropul generalului:
Cod: Selectaţi tot
quest General_Setaou begin
state start begin
when 2492.kill with pc.get_map_index()==73 begin
game.drop_item(30179, 1)
game.drop_item(30179, 1)
game.drop_item(30179, 1)
notice("Ai invins General Setaou acum poti trece!")
notice("In camera de cristal!")
end
end
endEvent de paste: Activarea se face de la iepuras.(30129)
Cod: Selectaţi tot
quest easter_event begin
state start begin
when 30129.chat."GM: Deschide event-ul de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 0 begin
say_title(""..mob_name(30129).."")
say_reward("Vrei sa deschizi event-ul de Paste?")
start_event = select("Da", "Nu")
if start_event == 2 then
return;
end
game.set_event_flag("easter_start", 1)
game.set_event_flag("easter_eggs_count", 0)
game.set_event_flag("easter_empty_baskets_count", 0)
game.set_event_flag("easter_egg_baskets_count", 0)
notice("Evenimentul de Paste s-a deschis! Vorbeste cu Iepurasul de Paste!")
end
when 30129.chat."Ouale de Paste" with game.get_event_flag("easter_start") == 1 begin
say_title(""..mob_name(30129).."")
say("Salut!")
say("Se stie in randul nostru ca Iepurasii de Paste")
say("sunt din ce in ce mai putin crezuti de catre")
say("copiii din cele trei regate. De aceea, eu am")
say("fost trimit pentru a va dovedi ca Iepurasii")
say("de Paste exista!")
say_reward("Drept consecinta, am venit cu o armata de pietre")
say_reward("Metin, ca sa ma razbun pe necredinta oamenilor!")
wait()
say_pc_name()
say("")
say("Ma gandesc ca poate Iepurasul s-ar mai linisti")
say("daca oamenii de pretutindeni i-ar aduce oua,")
say("luand exemplu de la el, care in fiecare an")
say("munceste pe rupte ca sa vopseasca ouale")
say("si sa le dea copiiilor...")
wait()
set_state(give_eggs)
end
end
state give_eggs begin
when 30129.chat."Am adus oua de Paste" with game.get_event_flag("easter_start") == 1 begin
say_title(""..mob_name(30129).."")
say("Ai adus oua de Paste? Vai... ce frumos! Si eu")
say("care credeam ca trebuie sa recurg la forta")
say("pentru a convinge oamenii ca exist si eu pe")
say("lume...")
if pc.count_item(50160) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50160)
elseif pc.count_item(50161) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50161)
elseif pc.count_item(50162) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50162)
elseif pc.count_item(50163) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50163)
elseif pc.count_item(50164) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50164)
elseif pc.count_item(50165) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50165)
elseif pc.count_item(50166) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50166)
elseif pc.count_item(50167) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50167)
elseif pc.count_item(50168) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50168)
elseif pc.count_item(50169) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50169)
elseif pc.count_item(50170) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50170)
elseif pc.count_item(50171) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50171)
elseif pc.count_item(50172) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50172)
elseif pc.count_item(50173) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50173)
elseif pc.count_item(50174) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50174)
elseif pc.count_item(50175) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50175)
elseif pc.count_item(50176) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50176)
elseif pc.count_item(50177) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50177)
elseif pc.count_item(50178) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50178)
elseif pc.count_item(50179) != 0 then
say_reward("Multumesc, iti voi da un cadou pentru")
say_reward("acest fapt!")
pc.setqf("easter_egg_vnum", 50179)
else
say_reward("Of... Nu ai oua??? Eram sigur ca")
say_reward("e prea frumos ca sa fie adevarat...")
return;
end
wait()
say_title(""..mob_name(30129).."")
say("Vrei sa imi dai acest ou in schimbul unui")
say("cadou?")
say_item("Ou de Paste", pc.getqf("easter_egg_vnum"), "")
select_egg = select("Da", "Nu")
if select_egg == 2 then
say_title(""..mob_name(30129).."")
say("Asta e... In viata nu faci doar lucruri care")
say("iti plac...")
return;
else
pc.remove_item(pc.getqf("easter_egg_vnum"), 1)
pc.setqf("easter_egg_vnum", 0)
game.set_event_flag("easter_eggs_count", game.get_event_flag("easter_eggs_count")+1)
say_title(""..mob_name(30129).."")
say("Uite cadoul tau...")
local s = number(1, 43)
if 1 <= s and 5 >= s then
say_item("Elixirul Cercetatorului - 1 buc.", 71035, "")
pc.give_item2(71035,1)
elseif 5 >= s and 10 <= s then
say_item("Medalia Dragonului - 5 buc.", 71004, "")
pc.give_item2(71004,5)
elseif 10 >= s and 5 <= s then
say_item("Coada Scorpion + - 1 buc.", 30081, "")
pc.give_item2(30081,1)
elseif 20 >= s and 10 <= s then
say_item("Busola Pietrelor Metin - 1 buc.", 27989, "")
pc.give_item2(27989,1)
elseif 21 == s then
say_item("Metal Magic - 1 buc.", 25041, "")
pc.give_item2(25041,1)
elseif 22 == s then
say_item("Colier de Lacrima Cer+0 - 1 buc.", 16200, "")
pc.give_item2(16200,1)
elseif 23 == s then
say_item("Cercei de Lacrima Cer+0 - 1 buc.", 17200, "")
pc.give_item2(17200,1)
elseif 24 == s then
say_item("Bratara Lacrima Cer+0 - 1 buc.", 14200, "")
pc.give_item2(14200,1)
elseif 25 == s then
say_item("Papuci de Phoenix+0 - 1 buc.", 15200, "")
pc.give_item2(15200,1)
elseif 26 == s then
say_item("Scut Vultur+0 - 1 buc.", 13060, "")
pc.give_item2(13060,1)
elseif 27 == s then
say_item("Scut Tigru+0 - 1 buc.", 13080, "")
pc.give_item2(13080,1)
elseif 28 == s then
say_item("Scut Leu+0 - 1 buc.", 13100, "")
pc.give_item2(13100,1)
elseif 29 == s then
say_item("Scut Solzi de Dragon+0 - 1 buc.", 13120, "")
pc.give_item2(13120,1)
elseif 30 == s then
say_item("Cartea Comandantului - 1 buc.", 70003, "")
pc.give_item2(70003,1)
elseif 31 == s then
say_item("Lingou 97kk - 1 buc.", 30600, "")
pc.give_item2(30600,1)
elseif 32 == s then
say_item("Perla alba - 1 buc.", 27992, "")
pc.give_item2(27992,1)
elseif 33 == s then
say_item("Perla Albastra - 1 buc.", 27993, "")
pc.give_item2(27993,1)
elseif 34 == s then
say_item("Perla Visinie - 1 buc.", 27994, "")
pc.give_item2(27994,1)
elseif 35 == s then
say_item("Binecuvantarea Vietii - 10 buc.", 71018, "")
pc.give_item2(71018,10)
elseif 36 == s then
say_item("Binecuvantarea Magiei - 15 buc.", 71019, "")
pc.give_item2(71019,15)
elseif 37 == s then
say_item("Binecuvantarea Dragon - 10 buc.", 71020, "")
pc.give_item2(71020,10)
elseif 38 == s then
say_item("Lingou 243kk - 1 buc.", 30601, "")
pc.give_item2(30601,1)
elseif 39 == s then
say_item("Pho-Hwan De Atac Negru - 1 buc.", 436, "")
pc.give_item2(436,1)
elseif 40 == s then
say_item("Otel de war - 1 buc.", 11290, "")
pc.give_item2(11290,1)
elseif 41 == s then
say_item("Otel de ninja - 1 buc.", 11290, "")
pc.give_item2(11490,1)
elseif 42 == s then
say_item("Otel de Sura - 1 buc.", 11690, "")
pc.give_item2(11690,1)
elseif 43 == s then
say_item("Otel de Shaman - 1 buc.", 11890, "")
pc.give_item2(11890,1)
end
end
end
when 30129.chat."Am un cos gol" with pc.count_item(50180) >= 1 and game.get_event_flag("easter_start") == 1 begin
say_title(""..mob_name(30129).."")
say("Ai un cos gol? Daca vrei sa pui oua in el,")
say("da-mi cosul, iar apoi da-mi ouale, le voi")
say("pune eu in cos.")
give_basket = select("Da cosul", "Nu da cosul")
if give_basket == 2 then
return;
else
pc.remove_item(50180, 1)
game.set_event_flag("easter_empty_baskets_count", game.get_event_flag("easter_empty_baskets_count")+1)
say_title("Informatii:")
say("Pentru a-i da ouale Iepurasului de Paste, trage")
say("ouale pe el.")
pc.setqf("easter_make_basket_active", 1)
pc.setqf("easter_make_basket_needed_eggs", 3)
end
end
when 30129.take with pc.getqf("easter_make_basket_active") == 1 and game.get_event_flag("easter_start") == 1 begin
if item.vnum >= 50160 and item.vnum <= 50179 then
if pc.getqf("easter_make_basket_needed_eggs") >= 1 then
pc.setqf("easter_make_basket_needed_eggs", pc.getqf("easter_make_basket_needed_eggs")-1)
pc.remove_item(item.vnum, 1)
game.set_event_flag("easter_eggs_count", game.get_event_flag("easter_eggs_count")+1)
say_title(""..mob_name(30129).."")
if pc.getqf("easter_make_basket_needed_eggs") == 0 then
say("Multumesc! Se pare ca am terminat cosul.")
say("Poftim!")
pc.setqf("easter_make_basket_active", 0)
pc.give_item2(50181,1)
return;
end
say("Multumesc! Mai am nevoie de "..pc.getqf("easter_make_basket_needed_eggs").." oua pentru")
say("a realiza cosul.")
else
say_title(""..mob_name(30129).."")
say("Multumesc! Se pare ca am terminat cosul.")
say("Poftim!")
pc.setqf("easter_make_basket_active", 0)
pc.give_item2(50181,1)
end
else
say_title(""..mob_name(30129).."")
say("Acest obiect nu este un ou. Nu il pot pune in cos.")
end
end
when 30129.chat."Am un cos cu Oua de Paste" with pc.count_item(50181) >= 1 and game.get_event_flag("easter_start") == 1 begin
say_title(""..mob_name(30129).."")
say("Ai un cos cu oua? Ce frumos ar fi")
say("daca mi-ai da acest cos! Iti voi da o recompensa")
say("frumoasa in schimbul lui!")
give_basket = select("Da cosul", "Nu da cosul")
if give_basket == 2 then
return;
else
pc.remove_item(50181, 1)
game.set_event_flag("easter_egg_baskets_count", game.get_event_flag("easter_egg_baskets_count")+1)
say_title(""..mob_name(30129).."")
say("Uite cadoul tau...")
local s = number(1, 43)
if 1 <= s and 5 >= s then
say_item("Elixirul Cercetatorului - 1 buc.", 71035, "")
pc.give_item2(71035,1)
elseif 5 >= s and 10 <= s then
say_item("Medalia Dragonului - 5 buc.", 71004, "")
pc.give_item2(71004,5)
elseif 10 >= s and 5 <= s then
say_item("Coada Scorpion + - 1 buc.", 30081, "")
pc.give_item2(30081,1)
elseif 20 >= s and 10 <= s then
say_item("Busola Pietrelor Metin - 1 buc.", 27989, "")
pc.give_item2(27989,1)
elseif 21 == s then
say_item("Metal Magic - 1 buc.", 25041, "")
pc.give_item2(25041,1)
elseif 22 == s then
say_item("Colier de Lacrima Cer+0 - 1 buc.", 16200, "")
pc.give_item2(16200,1)
elseif 23 == s then
say_item("Cercei de Lacrima Cer+0 - 1 buc.", 17200, "")
pc.give_item2(17200,1)
elseif 24 == s then
say_item("Bratara Lacrima Cer+0 - 1 buc.", 14200, "")
pc.give_item2(14200,1)
elseif 25 == s then
say_item("Papuci de Phoenix+0 - 1 buc.", 15200, "")
pc.give_item2(15200,1)
elseif 26 == s then
say_item("Scut Vultur+0 - 1 buc.", 13060, "")
pc.give_item2(13060,1)
elseif 27 == s then
say_item("Scut Tigru+0 - 1 buc.", 13080, "")
pc.give_item2(13080,1)
elseif 28 == s then
say_item("Scut Leu+0 - 1 buc.", 13100, "")
pc.give_item2(13100,1)
elseif 29 == s then
say_item("Scut Solzi de Dragon+0 - 1 buc.", 13120, "")
pc.give_item2(13120,1)
elseif 30 == s then
say_item("Cartea Comandantului - 1 buc.", 70003, "")
pc.give_item2(70003,1)
elseif 31 == s then
say_item("Lingou 97kk - 1 buc.", 30600, "")
pc.give_item2(30600,1)
elseif 32 == s then
say_item("Perla alba - 1 buc.", 27992, "")
pc.give_item2(27992,1)
elseif 33 == s then
say_item("Perla Albastra - 1 buc.", 27993, "")
pc.give_item2(27993,1)
elseif 34 == s then
say_item("Perla Visinie - 1 buc.", 27994, "")
pc.give_item2(27994,1)
elseif 35 == s then
say_item("Binecuvantarea Vietii - 10 buc.", 71018, "")
pc.give_item2(71018,10)
elseif 36 == s then
say_item("Binecuvantarea Magiei - 15 buc.", 71019, "")
pc.give_item2(71019,15)
elseif 37 == s then
say_item("Binecuvantarea Dragon - 10 buc.", 71020, "")
pc.give_item2(71020,10)
elseif 38 == s then
say_item("Lingou 243kk - 1 buc.", 30601, "")
pc.give_item2(30601,1)
elseif 39 == s then
say_item("Pho-Hwan De Atac Negru - 1 buc.", 436, "")
pc.give_item2(436,1)
elseif 40 == s then
say_item("Otel de war - 1 buc.", 11290, "")
pc.give_item2(11290,1)
elseif 41 == s then
say_item("Otel de ninja - 1 buc.", 11290, "")
pc.give_item2(11490,1)
elseif 42 == s then
say_item("Otel de Sura - 1 buc.", 11690, "")
pc.give_item2(11690,1)
elseif 43 == s then
say_item("Otel de Shaman - 1 buc.", 11890, "")
pc.give_item2(11890,1)
end
end
end
when 30129.chat."GM: Statistici Event de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 1 begin
local eggs = game.get_event_flag("easter_eggs_count")
local empty_baskets = game.get_event_flag("easter_empty_baskets_count")
local egg_baskets = game.get_event_flag("easter_egg_baskets_count")
say_title(""..mob_name(30129).."")
say_reward("Pana acum, "..eggs.." oua au fost duse la iepuras!")
say("")
say_reward("Pana acum, "..empty_baskets.." cosuri goale au fost duse la iepuras!")
say("")
say_reward("Pana acum, "..egg_baskets.." cosuri cu oua au fost duse la iepuras!")
return;
end
when 30129.chat."GM: Inchide event-ul de Paste" with pc.is_gm() and game.get_event_flag("easter_start") == 1 begin
say_title(""..mob_name(30129).."")
say_reward("Vrei sa inchizi event-ul de Paste?")
close_event = select("Da", "Nu")
if close_event == 2 then
return;
end
say_title(""..mob_name(30129).."")
say_reward("Sigur vrei sa faci acest lucru?")
say_reward("Este ultima sansa de a te razgandi!!!")
close = select("Da", "Nu")
if close_event == 2 then
return;
end
game.set_event_flag("easter_start", 0)
game.set_event_flag("easter_eggs_count", 0)
game.set_event_flag("easter_empty_baskets_count", 0)
game.set_event_flag("easter_egg_baskets_count", 0)
notice_all("Evenimentul de Paste s-a incheiat!")
notice_all("Ouale si cosurile le puteti distruge la Cetateanul Turmentat!")
end
when login with game.get_event_flag("easter_start") == 0 begin
pc.setqf("easter_make_basket_active", 0)
pc.setqf("easter_make_basket_needed_eggs", 0)
set_state(start)
end
end
endElibereaza camera dragonului:
Cod: Selectaţi tot
quest protect_dragon begin
state start begin
when letter with pc.is_gm() begin
send_letter("Elibereaza Camera Dragonului")
end
when info or button with pc.is_gm() begin
game.set_event_flag("dragontemple_used",0)
game.set_event_flag("dragontemple_block",0)
chat("Camera eliberata!")
send_letter("Elibereaza Camera Dragonului")
end
end
endCod: Selectaţi tot
quest sterge_item begin
state start begin
when 20041.take begin
say_title("Cetateanul Turmentat:")
say("Vrei sa distrugi acest obiect?")
say_item(item.get_name(item.vnum), item.vnum, "")
say("")
say("")
say("")
say("")
say("")
say("")
local destroy = select("Da","Nu")
if destroy == 2 then
return
else
local s = number(1, 200)
say_title("Cetateanul Turmentat:")
say("Pentru siguranta, introdu codul de mai jos:")
say_reward(s)
local code = tonumber(input(""))
if code == s then
item.remove()
say_title("Cetateanul Turmentat:")
say("Obiectul a fost distrus cu succes!")
wait()
return
else
say_title("Cetateanul Turmentat:")
say("Codul este incorect!")
end
end
end
end
endCod: Selectaţi tot
uest activare_rate begin
state start begin
when letter with pc.is_gm() begin
send_letter("Activeaza Ratele")
end
when info or button with pc.is_gm() begin
command("priv_empire 0 1 400 10000")
command("priv_empire 0 2 400 10000")
command("priv_empire 0 3 400 10000")
command("n Ratele au fost activate!")
command("priv_empire 0 4 400 10000")
send_letter("Activeaza Ratele")
end
end
endCod: Selectaţi tot
quest piatracurcubeu begin
state start begin
when 50512.use begin
say_title("Piatra curcubeu:")
say("Vrei sa-ti ridici toate abilitatile la")
say("gradul perfect?")
say("Selecteaza skilurile care vrei sa le")
say("dobandesti.")
if pc.job ==0 then
say("Selecteaza tipul abilitatilor detinute:.")
local s=select("Corp","Mental")
if s==1 then
pc.set_skill_group(1)
pc.set_skill_level(1 ,59)
pc.set_skill_level(2 ,59)
pc.set_skill_level(3 ,59)
pc.set_skill_level(4 ,59)
pc.set_skill_level(5 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
if s==2 then
pc.set_skill_group(2)
pc.set_skill_level(16 ,59)
pc.set_skill_level(17 ,59)
pc.set_skill_level(18 ,59)
pc.set_skill_level(19 ,59)
pc.set_skill_level(20 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
elseif pc.job ==1 then
say("Selecteaza tipul abilitatilor detinute:.")
local s=select("Lupta aproape","Lupta cu arcul")
if s==1 then
pc.set_skill_group(3)
pc.set_skill_level(31 ,59)
pc.set_skill_level(32 ,59)
pc.set_skill_level(33 ,59)
pc.set_skill_level(34 ,59)
pc.set_skill_level(35 ,59)
pc.set_skill_level(36 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
if s==2 then
pc.set_skill_group(4)
pc.set_skill_level(46 ,59)
pc.set_skill_level(47 ,59)
pc.set_skill_level(48 ,59)
pc.set_skill_level(49 ,59)
pc.set_skill_level(50 ,59)
pc.set_skill_level(51 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
elseif pc.job ==2 then
say("Selecteaza tipul abilitatilor detinute:.")
local s=select("Magie neagra","Arme magice")
if s==1 then
pc.set_skill_group(5)
pc.set_skill_level(76 ,59)
pc.set_skill_level(77 ,59)
pc.set_skill_level(78 ,59)
pc.set_skill_level(79 ,59)
pc.set_skill_level(80 ,59)
pc.set_skill_level(81, 59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
if s==2 then
--Waffe
pc.set_skill_group(6)
pc.set_skill_level(61 ,59)
pc.set_skill_level(62 ,59)
pc.set_skill_level(63 ,59)
pc.set_skill_level(64 ,59)
pc.set_skill_level(65 ,59)
pc.set_skill_level(66 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
elseif pc.job ==3 then
say("Selecteaza tipul abilitatilor detinute:.")
local s=select("Vindecare","Dragon")
if s==1 then
pc.set_skill_group(7)
pc.set_skill_level(106 ,59)
pc.set_skill_level(107 ,59)
pc.set_skill_level(108 ,59)
pc.set_skill_level(109 ,59)
pc.set_skill_level(110 ,59)
pc.set_skill_level(111 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
if s==2 then
pc.set_skill_group(8)
pc.set_skill_level(91 ,59)
pc.set_skill_level(92 ,59)
pc.set_skill_level(93 ,59)
pc.set_skill_level(94 ,59)
pc.set_skill_level(95 ,59)
pc.set_skill_level(96 ,59)
pc.remove_item(50512, 1)
say("Toate magiile ti-au fost facute perfect!")
end
end
end
end
endCod: Selectaţi tot
quest hair begin
state start begin
function My_hair_item(vnum,index)
hair_list={}
-- vnum /hair/ option / howmuch / duration
hair_list [74001] = {1001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74002] = {1002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74003] = {1003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74004] = {1004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74005] = {1005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74006] = {1006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74007] = {1007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74008] = {1008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74009] = {1009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74010] = {1010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74011] = {1011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74012] = {1012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74251] = {2001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74252] = {2002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74253] = {2003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74254] = {2004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74255] = {2005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74256] = {2006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74257] = {2007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74258] = {2008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74259] = {2009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74260] = {2010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74261] = {2011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74262] = {2012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74501] = {3001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74502] = {3002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74503] = {3003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74504] = {3004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74505] = {3005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74506] = {3006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74507] = {3007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74508] = {3008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74509] = {3009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74510] = {3010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74511] = {3011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74512] = {3012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74751] = {4001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74752] = {4002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74753] = {4003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74754] = {4004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74755] = {4005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74756] = {4006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74757] = {4007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74758] = {4008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [74759] = {4009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [74760] = {4010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [74761] = {4011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [74762] = {4012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75001] = {1001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75002] = {1002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75003] = {1003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75004] = {1004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75005] = {1005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75006] = {1006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75007] = {1007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75008] = {1008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75009] = {1009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75010] = {1010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75011] = {1011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75012] = {1012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75201] = {2001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75202] = {2002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75203] = {2003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75204] = {2004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75205] = {2005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75206] = {2006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75207] = {2007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75208] = {2008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75209] = {2009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75210] = {2010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75211] = {2011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75212] = {2012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75401] = {3001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75402] = {3002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75403] = {3003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75404] = {3004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75405] = {3005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75406] = {3006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75407] = {3007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75408] = {3008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75409] = {3009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75410] = {3010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75411] = {3011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75412] = {3012, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75601] = {4001, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75602] = {4002, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75603] = {4003, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75604] = {4004, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75605] = {4005, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75606] = {4006, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75607] = {4007, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75608] = {4008, apply.ATTBONUS_SHAMAN, 10, 2592000}
hair_list [75609] = {4009, apply.ATTBONUS_WARRIOR, 10, 2592000}
hair_list [75610] = {4010, apply.ATTBONUS_ASSASSIN, 10, 2592000}
hair_list [75611] = {4011, apply.ATTBONUS_SURA, 10, 2592000}
hair_list [75612] = {4012, apply.ATTBONUS_SHAMAN, 10, 2592000}
return hair_list[vnum][index]
end
function leave_log(item_vnum)
char_log(0, "CHANGE_HAIR", string.format("USE_ITEM(%d)",item_vnum)) -- Set Item log
--char_log(0, "CHANGE_HAIR", string.format("SET_HAIR(%d)",item_vnum)) --Set Item log
char_log(0, "CHANGE_HAIR", string.format("END_SEC(%d)",get_time()+ hair.My_hair_item(item_vnum,4)) ) -- Duration log
--char_log(0, "CHANGE_HAIR", string.format("AFFECT(%s), DURATION:%d)",hair.My_hair_item(item_vnum,2),get_time()+ hair.My_hair_item(item_vnum,4))) -- Effect set log
char_log(0, "CHANGE_HAIR", "CHANGE_HAIR_END") -- End log
end
when 74001.use or
74002.use or
74003.use or
74004.use or
74005.use or
74006.use or
74007.use or
74008.use or
74009.use or
74010.use or
74011.use or
74012.use or
75001.use or
75002.use or
75003.use or
75004.use or
75005.use or
75006.use or
75007.use or
75008.use or
75009.use or
75010.use or
75011.use or
75012.use with pc.get_job()==0 begin
pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
affect.remove_hair()
affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
pc.setqf("limit_time",get_time()+ hair.My_hair_item(item.vnum,4))
hair.leave_log(item.vnum)
item.remove()
end
when 74251.use or
74252.use or
74253.use or
74254.use or
74255.use or
74256.use or
74257.use or
74258.use or
74259.use or
74260.use or
74261.use or
74262.use or
75201.use or
75202.use or
75203.use or
75204.use or
75205.use or
75206.use or
75207.use or
75208.use or
75209.use or
75210.use or
75211.use or
75212.use with pc.get_job()==1 begin
pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
affect.remove_hair()
affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
pc.setqf("limit_time",get_time()+hair.My_hair_item(item.vnum,4))
hair.leave_log(item.vnum)
item.remove()
end
when 74501.use or
74502.use or
74503.use or
74504.use or
74505.use or
74506.use or
74507.use or
74508.use or
74509.use or
74510.use or
74511.use or
74512.use or
75401.use or
75402.use or
75403.use or
75404.use or
75405.use or
75406.use or
75407.use or
75408.use or
75409.use or
75410.use or
75411.use or
75412.use with pc.get_job()==2 begin
pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
affect.remove_hair()
affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
pc.setqf("limit_time",get_time()+hair.My_hair_item(item.vnum,4))
hair.leave_log(item.vnum)
item.remove()
end
when 74751.use or
74752.use or
74753.use or
74754.use or
74755.use or
74756.use or
74757.use or
74758.use or
74759.use or
74760.use or
74761.use or
74762.use or
75601.use or
75602.use or
75603.use or
75604.use or
75605.use or
75606.use or
75607.use or
75608.use or
75609.use or
75610.use or
75611.use or
75612.use with pc.get_job()==3 begin
pc.set_part(PART_HAIR, hair.My_hair_item(item.vnum,1))
affect.remove_hair()
affect.add_hair(hair.My_hair_item(item.vnum,2),hair.My_hair_item(item.vnum,3) , hair.My_hair_item(item.vnum,4))
pc.setqf("limit_time",get_time()+ hair.My_hair_item(item.vnum,4))
hair.leave_log(item.vnum)
item.remove()
end
end
endCod: Selectaţi tot
quest teleportarea_jucatorului begin
state start begin
when 40004.use begin
local ramas = pc.getqf("next_time") - get_time()
local ramas_min = ramas / 60
if get_time() < pc.getqf("next_time")then
say_title("Teleportarea jucatorului:")
say("Trebuie sa mai astepti "..ramas_min.." minute[ENTER]pentru a te putea teleporta din nou!")
else
say_title("Teleportarea jucatorului:")
say("Acest obiect iti permite sa te teleportezi la un[ENTER]jucator.")
say_reward("Vrei sa te teleportezi?")
local a = select("Da","Nu am timp!")
if a == 1 then
say_title("Teleportarea jucatorului:")
say_reward("Scrie numele jucatorului la care vrei sa te[ENTER]teleportezi:")
local name = input()
if pc.get_level() < 35 then
say_title("Teleportarea jucatorului:")
say("Poti folosi acest item decat dupa nivelul 35!")
else
pc.teleport(name)
pc.remove_item(40004, 1)
pc.setqf("next_time", get_time() + 3600)
end
end
end
end
end
end1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest .
2. Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).
3. Îl puneţi acolo (să fie .quest) şi da-ţi permisiuni 777.
4. Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/quest apoi ./qc nume_quest.quest
5. Intraţi pe server şi scrieţi /reload q .
6. Testaţi quest-ul .
Voi revenii cu alte quest-uri mult mai interesante... acestea consider ca sunt mai esentiale pentru unele servere.
de 
de