Cateva quest-uri folositoare pentru orice server

Deconectat
Avatar utilizator
Adrian.
Nivel 3
Nivel 3
Mesaje: 313
Membru din: 29 Iul 2013
Localitate: Pe aici pe undeva .
Status: Bini Di Tat.
Server Metin2: Nu stiu...
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 3
Contact:

Cateva quest-uri folositoare pentru orice server

Mesajde Adrian. » 12 Aug 2013, 16:33

Generalul Setou.
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
end



Event 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
end



Elibereaza 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
end


Sterge item de la cetateanul turmentat:

Cod: 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
end


Activare rate:

Cod: 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
end


Piatra curcubeu:

Cod: 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
end


Bonusuri frizuri:

Cod: 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
end


Teleportarea jucatorului(Permite cu ajutorul unui item sa te teleportezi la un jucator odata pe ora):

Cod: 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
end

Tutorial instalare quest:
1. 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.
Imagine
Imagine
Imagine

Deconectat
Avatar utilizator
Drog
Membru Club
Membru Club
Mesaje: 874
Membru din: 12 Aug 2013
Reputație: Moderator
Server Metin2: Metin2Cybele
Regat: Jinno
Mulțumiri acordate: 1
Mulțumiri primite: 1
Contact:

Re: Cateva quest-uri folositoare pentru orice server

Mesajde Drog » 12 Aug 2013, 20:33

Foarte folositoare, mulțumim.
Imagine

Deconectat
Avatar utilizator
Adrian.
Nivel 3
Nivel 3
Mesaje: 313
Membru din: 29 Iul 2013
Localitate: Pe aici pe undeva .
Status: Bini Di Tat.
Server Metin2: Nu stiu...
Regat: Chunjo
Mulțumiri acordate: 0
Mulțumiri primite: 3
Contact:

Re: Cateva quest-uri folositoare pentru orice server

Mesajde Adrian. » 12 Aug 2013, 20:51

Drog scrie:Foarte folositoare, mulțumim.

Cu placere.
Imagine
Imagine
Imagine

Deconectat
Avatar utilizator
Yoghy
Utilizator interzis !
Utilizator interzis !
Mesaje: 439
Membru din: 22 Ian 2014
Status: -------
Server Metin2: New York
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 6

Re: Cateva quest-uri folositoare pentru orice server

Mesajde Yoghy » 18 Mai 2014, 15:53

Mutat in Resurse Metin2 !
Imagine

Deconectat
Avatar utilizator
Metin2TBX
Utilizator interzis !
Utilizator interzis !
Mesaje: 35
Membru din: 29 Mai 2014
Status: Metin2TBX
Server Metin2: Metin2TBX
Regat: Jinno
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: Cateva quest-uri folositoare pentru orice server

Mesajde Metin2TBX » 29 Mai 2014, 18:22

mersi chiar aveam nevoie

Deconectat
Avatar utilizator
EL.
Nou Venit
Nou Venit
Mesaje: 31
Membru din: 26 Apr 2014
Status: Sunt bine mersi ^.^
Server Metin2: mt2.apocalypse.ro
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: Cateva quest-uri folositoare pentru orice server

Mesajde EL. » 01 Iun 2014, 22:30

thx

Deconectat
Avatar utilizator
Răzvaan
Utilizator interzis !
Utilizator interzis !
Mesaje: 2052
Membru din: 15 Mar 2015
Localitate: Suceava
Reputație: Super Ad Moderator
Lider Ad Moderatori
Lider Mister
Fost Lider Moderatori
Fost Lider Trial Moderatori
Fost Lider Miss
Nume anterioare: ElAlcon, Brian O'Conner, Grinchzvan
Status: Un fel de două feluri
Server Metin2: da
Regat: Shinsoo
Mulțumiri acordate: 1
Mulțumiri primite: 41
Contact:

Re: Cateva quest-uri folositoare pentru orice server

Mesajde Răzvaan » 08 Iul 2015, 11:43

Subiect mutat in Quest-uri.
Imagine

SERVICII: PHOTOSHOP, PHPBB, METIN2

Deconectat
Avatar utilizator
n3bu
Deţinător Server
Deţinător Server
Mesaje: 135
Membru din: 08 Iul 2015
Status: Sunt bine mersi ^.^
Mulțumiri acordate: 0
Mulțumiri primite: 0

Re: Cateva quest-uri folositoare pentru orice server

Mesajde n3bu » 15 Iul 2015, 15:42

multumesc,aveam nevoie de cel cu teleportarea si cel cu bonusurile


Înapoi la “Quest-uri”

Cine este conectat

Utilizatori ce ce navighează pe acest forum: k3nnz0r12, Madalinosu și 5 vizitatori