Back to Piciul- [Legacy 3554]'s profile
Piciul- [Legacy 3554]

Posts by Piciul- [Legacy 3554]

933 posts

Topics Posts
  1. #401
    [Resursă] Quest Servere Pvp
    Reply in Gaming
    
quest inel_exp begin
    state start begin
        when 70007.use begin
         local inel=select("Experienta", "Yang", "Marmura", "Skilluri P", "Nimic")
         if 1==inel then
            say("Ziua buna aventurierule! Vad ca ai auzit de mine.")
            say("Spark m-a conceput special sa va ajut sa deveniti")
            say("razboinici adevarati. Asadar, de aceasta data vrei")
            say("putina experienta?")
            local exp=select("Desigur", "Nu, multumesc")
            if 1==exp then
               pc.give_exp2("999999999")
            elseif 2==exp then
               say("Ei bine, este alegerea ta.")
               return
            end
         elseif 2==inel then
            say("Ziua buna aventurierule! Vad ca ai auzit de mine.")
            say("Spark m-a conceput special sa va ajut sa deveniti")
            say("razboinici adevarati. Asadar, de aceasta data vrei")
            say("ceva yang?")
            local yang=select("Vreau, pupati-as talpile", "Nu")
            if 1==yang then
               pc.give_gold("500000000")
            elseif 2==yang then
               say("Ok, este alegerea ta.")
               return
            end
         elseif 3==inel then
            say("Ziua buna aventurierule! Vad ca ai auzit de mine.")
            say("Spark m-a conceput special sa va ajut sa deveniti")
            say("razboinici adevarati. Asadar, de aceasta data vrei")
            say("cateva marmure?")
            local marm=select("Da, desigur", "Nu")
            if 1==marm then
               pc.give_item2("70024")
            elseif 2==marm then
               say("Ok, tu alegi.")
               return
            end
         elseif 4==inel then
            say("Ziua buna aventurierule! Vad ca ai auzit de mine.")
            say("Spark m-a conceput special sa va ajut sa deveniti")
            say("razboinici adevarati. Asadar, de aceasta data vrei")
            say("skillurile P?")
            local yes=select("Da", "Nu")
            if 1==yes then
               say("Ce rasă esti?")
               local rasa=select("Razboinic", "Ninja", "Sura", "Saman", "Am deja skillurile P")
               if 1==rasa then
                  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.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)
                  say("Ai primit skillurile pentru razboinic.")
               elseif 2==rasa then
                  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 (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)
                  say("Ai primit skillurile pentru ninja.")
               elseif 3==rasa then
                  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.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)
                  say("Ai primit skillurile pentru sura.")
               elseif 4==rasa then
                  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.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)
                  say("Ai primit skillurile pentru saman.")
               elseif 5==rasa then
                  say("Vad ca ai fost mai rapid. Foarte bine!")
                  return
               end
            elseif 2==yes then
               say("Ok, este alegerea ta tinere flacau!")
               return
            end
         elseif 5==inel then
            say("Asta este. Poti revenei oricand!")
            return
         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.

    View in topic
  2. #402
  3. #403
  4. #404
  5. #405
  6. #406
  7. #407
  8. #408
  9. #409
  10. #410
  11. #411
  12. #412
    [Resursă] Quest V2
    Reply in Gaming
    
----------------------------------------------------
-----    Server: Metin2                   -----
-----    Author:               -----
----------------------------------------------------

quest check_trans_ticket begin
   state start begin
      when login or levelup with pc.level >35 begin
         set_state(zone_enter)
      end
   end
      
   state zone_enter begin
      when 20088.chat."Înspre Caverna II (Lv.35)" begin
         say_title("Chuk-Sal:")
         say("")
         say("Oh, vãd foarte rar oameni care îndrãznesc sã ")
         say("exploreze aceste peºteri. Eu sunt protectorul")
         say("sigiliului magic, aºa cã, creaturi rele")
         say("nu poate trece sã ne ameninþe.")
         say("")
         say("În primul rând, lasã-mã sã vãd calificarea ta.")
         say("")
         
         wait()
         
         if pc.count_item(71095)>0 then
            setdelay(20)
            say_title("Chuk-Sal:")
            say("")
            say("Bun! Calificarea ta este validã.")
            say("În care dintre aceste camere vrei sã mergi?")
            say("")
            local s = select("V2 (a)","V2 (b)","V2 (c)","Închide")
            if s == 1 then
               pc.warp(704100, 464100)
            elseif s == 2 then
               pc.warp(704100, 464100)
            elseif s == 3 then
               pc.warp(704100, 464100)
            end   
            pc.remove_item(71095)      
         else
            say_title("Chuk-Sal:")
            say("")
            say("Ai nevoie de un bilet de trecere.")
            say("Nu te pot lãsa în cazul în care nu aveþi.")
            say("permisul de trecere.")
            say_item("Permis",71095,"")
            return
         end
      end
      
   end
end

    Tutorial instalare quest:

    • Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest

    • Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).

    • Îl puneţi acolo (să fie .quest sau .lua).

    • Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/questapoi ./qc nume_quest.quest

    • Intraţi pe server şi scrieţi /reload q

    View in topic
  13. #413
    [Resursă] Quest Limbi Între Regate
    Reply in Gaming
    
--------------------------
--Vizitati just4metin.ro--
--------------------------
quest limba begin
	state start begin 
		when login begin
			pc.set_skill_level (126,59)
			pc.set_skill_level (127,59)
			pc.set_skill_level (128,59)
		end
	end  
	state __complete begin
	end
end

    Tutorial instalare quest:

    • Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest

    • Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).

    • Îl puneţi acolo (să fie .quest sau .lua).

    • Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/questapoi ./qc nume_quest.quest

    • Intraţi pe server şi scrieţi /reload q

    View in topic
  14. #414
    [Resursă] Quest Transformare Mingi Fotbal În Balon De Aur Automat
    Reply in Gaming
    
quest haur begin
    state start begin
      when kill or login or logout or levelup begin
         if pc.count_item(50096) >= 30 then
            pc.remove_item(50096, 30)
            pc.give_item2(50265)
            end
         end
      end
   end

    
quest footbal begin 
    state start begin 
        when 50096.use begin  
         syschat("Ai nevoie de 30 de Fotball")
         syschat("Cand ajungi la 30 de mingi acestea se vor transforma automat")
         syschat("in Balon de aur!")
      end 
    end 
end

    Tutorial instalare quest:

    • Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu nume_quest.quest

    • Vă conectaţi la filezilla / winscp şi întrati în /usr/home/game/share/locale/germany/quest (depinde ce server aveţi).

    • Îl puneţi acolo (să fie .quest sau .lua).

    • Te loghezi în FreeBSD / putty şi scrii în felul următor: cd /usr/home/game/share/locale/germany/questapoi ./qc nume_quest.quest

    • Intraţi pe server şi scrieţi /reload q

    View in topic
  15. #415
    [Resursă] Quest Schimb De Iteme
    Reply in Gaming
    
quest schimb begin
    state start begin
        when NPC_VNUM.chat."Gheara Dragonului" begin --- NPC_VNUM inlocuiesti cu VNUM-ul NPC-ului dorit
         say("Pentru a putea face schimbul ai nevoie de xyz!") --- xyz inlocuiesti cu numele Itemului cerut
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then --- ITEM_VNUM trebui inlocuit cu Itemul de care este nevoie
                    pc.remove_item(ITEM_VNUM, 1) --- Numarul dupa virgula il inlocuiesti cu cate Iteme sa ceara. Daca pui altceva, trebuie sa pui si inloc de > 0 numarul de Iteme cerute - 1
                    pc.give_item2(71129, 1)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
      
        when NPC_VNUM.chat."Balanta Dragonului" begin
         say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
                    pc.give_item2(71123, 1)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end

        when NPC_VNUM.chat."Perle Albe" begin
      say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
                    pc.give_item2(27992, 5)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
      
        when NPC_VNUM.chat."Perle Albastre" begin
      say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
                    pc.give_item2(27993, 5)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end

        when NPC_VNUM.chat."Perle Rosii" begin
      say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
                    pc.give_item2(27993, 5)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
      
        when NPC_VNUM.chat."Sihastru (M)" begin
      say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
                    pc.give_item2(41003)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
      
        when NPC_VNUM.chat."Sihastru (F)" begin
      say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
                    pc.give_item2(41004)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
      
        when NPC_VNUM.chat."100kk Yang" begin
      say("Pentru a putea face schimbul ai nevoie de xyz!")
            local s = select("Vreau!","Nu vreau!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
               pc . change_money ( 100000000 )
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
      
        when NPC_VNUM.chat."2k EXP" begin
            local s = select("Vreau!","Nu vreau!")
         say("Pentru a putea face schimbul ai nevoie de xyz!")
            if s == 1 then
                if pc.count_item(ITEM_VNUM) > 0 then
                    pc.remove_item(ITEM_VNUM, 1)
               pc.get_exp(2000)
                else
                    syschat("Nu ai destule Iteme pentru schimb!")
                end
            else
                return
            end
        end
    end
end

    Informatii Suplimentare:

    NPC_VNUM inlocuiesti cu VNUM-ul NPC-ului dorit

    xyz inlocuiesti cu numele Itemului cerut

    ITEM_VNUM trebui inlocuit cu Itemul de care este nevoie

    Dacă apar probleme contactează-mă la adresa de Skype: dey.dey34

    Tutorial instalare quest:

    1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu q1.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 q1.quest

    5. Intraţi pe server şi scrieţi /reload q .

    6. Testaţi quest-ul .

    View in topic
  16. #416
    [Resursă] Quest Omori Şi Primeşti Item
    Reply in Gaming
    
Facut de : 
Timp de lucru: 2-3 minute
Server: METIN2
---------------------------------------
quest omoara_si_dropeaza begin
	state start begin
		when kill with npc.is_pc() begin
			syschat("[METIN2]:Ai omorat un jucator si ai primit NUME ITEM.")
			pc.give_item2(COD ITEM, 1)
		end
	end
end

     

     

    Unde scrie NUME ITEM- Puneti numele la item 

    Unde scrie COD ITEM- Puneti cod la item

     

    View in topic
  17. #417
    [Resursă] Quest Anti-Modate [Gm]
    Reply in Gaming
    
quest status begin
   state start begin
      when letter with pc.is_gm() begin
         send_letter("STATUS GM")
      end
      when button or info begin
        say_title("Activeaza-ti statusul")
            say("Pentru ca esti GM")
            say("nu vei avea nevoie de iteme speciale")
            say("Asadar, daca doresti status cerei parola lui")
         say_portocaliu("Valentin")
         say_reward("Adauga parola:")
         local sname = input()
            if sname == "Parola ta" then 
             affect.remove_collect()
             affect.add_collect(apply.MAX_HP,99000,439200)
             affect.add_collect(apply.MAX_SP,99000,439200)
             affect.add_collect(apply.ATT_SPEED,99000,439200)
             affect.add_collect(apply.CAST_SPEED,99000,439200)
             affect.add_collect(apply.STUN_PCT,99000,439200)
             affect.add_collect(apply.CRITICAL_PCT,99000,439200)
             affect.add_collect(apply.PENETRATE_PCT,99000,439200)
             affect.add_collect(apply.BLOCK,99000,439200)
             affect.add_collect(apply.ATT_GRADE_BONUS,99000,439200)
             affect.add_collect(apply.MAGIC_ATT_GRADE,99000,439200)
             affect.add_collect(apply.MAGIC_DEF_GRADE,99000,439200)
             affect.add_collect(apply.RESIST_SWORD,99000,439200)
             affect.add_collect(apply.RESIST_TWOHAND,99000,439200)
             affect.add_collect(apply.RESIST_DAGGER,99000,439200)
             affect.add_collect(apply.RESIST_MAGIC,99000,439200)
             affect.add_collect(apply.POISON_REDUCE,99000,439200)
             affect.add_collect(apply.INT,99000,439200)
             affect.add_collect(apply.STR,99000,439200)
             affect.add_collect(apply.DEX,99000,439200)
         return
         end
      end
   end
   
end

    Tutorial instalare quest:

    1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu rasplata.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 rasplata.quest

    5. Intraţi pe server şi scrieţi /reload q .

    View in topic
  18. #418
    [Resursă] Quest Inel Teleport Camera De Cristal
    Reply in Gaming
    
quest teleporters begin
   state start begin
      when 70007.use begin
         local x
         local y
         local t
         local e = pc.get_empire()
         say_title("Teleporter:")
         say("Incotro vrei sa mergi straine?")
         local s = select("Map1", "Map2", "Valea Orcilor", "Desert", "Sohan", "Tara de foc", "Urmatoarele", "Inchide")
         if s==7 then
            say_title("Teleporter:")
            say("Incotro vrei sa mergi straine?")
            local p = select("Turnul Demonilor", "V2", "Padurea Fantomelor", "Padurea Rosie", "Tara Gigantilor", "Grota Exilului(V4)", "Camera De Cristal", "Inchide")
            if p==1 then
               x="590400"
               y="110500"
            elseif p==2 then
               x="665600"
               y="435200"
            elseif p==3 then
               x="289000"
               y="5800"
            elseif p==4 then
               say_title("Teleporter")
               say("Incotro vrei sa mergi straine?")
               t = select("Inceput", "Sfarsit", "Inchide")
               if t==1 then
                  x="1119900"
                  y="70800"
               elseif t==2 then
                  x="1119200"
                  y="7000"
               end
            elseif p==5 then
               x="828100"
               y="763400"
            elseif p==6 and pc.level >=75 then
               x="241700"
               y="1274900"
         elseif p==6 and pc.level <75 then
         say_title("Teleporter")
         say("Nu te pot teleporta decat atunci cand vei ajunge la Nivelul 75")
         r = select("Inchide")
         elseif p==7 and pc.level >=75 then
            x="181200"
            y="1220700"
         elseif p==7 and pc.level <75 then
         say_title("Teleporter")
         say("Nu te pot teleporta decat atunci cand vei ajunge la Nivelul 75")
         r = select("Inchide")
            end
         elseif s==1 then
            say_title("Teleporter")
            say("Incotro vrei sa mergi straine?")
            t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru","Inchide")
            if t==1 then
               x="473900"
               y="954600"
            elseif t==2 then
               x="63200"
               y="166700"
            elseif t==3 then
               x="959600"
               y="269700"
            end
         elseif s==2 then
            say_title("Teleporter:")
            say("Incotro vrei sa mergi straine?")
            t = select("Regatul Rosu", "Regatul Galben", "Regatul Albastru", "Inchide")
            if t==1 then
               x="352300"
               y="882700"
            elseif t==2 then
               x="145700"
               y="239800"
            elseif t==3 then
               x="863800"
               y="246000"
            end
         elseif s==3 then
            say_title("Teleporter:")
            say("Incotro vrei sa mergi straine?")
            t = select("Inceput", "Centru", "Arahani", "Inchide")
            if t==1 then
               if e==1 then
                  x="402100"
                  y="673900"                  
               elseif e==2 then
                  x="270400"
                  y="739900"
               elseif e==3 then
                  x="321300"
                  y="808000"
               end
            elseif t==2 then
               x="332700"
               y="745600"
            elseif t==3 then
               x="282800"
               y="792800"
            end
         elseif s==4 then
            say_title("Teleporter:")
            say("Incotro vrei sa mergi straine?")
            t = select("Inceput", "Sfarsit", "Inchide")
            if t==1 then
               if e==1 then
                  x="217800"
                  y="627200"                  
               elseif e==2 then
                  x="221900"
                  y="502700"
               elseif e==3 then
                  x="344000"
                  y="502500"
               end
            elseif t==2 then
               x="296300"
               y="547500"
            end
         elseif s==5 then
            say_title("Teleporter")
            say("Incotro vrei sa mergi straine?")
            t = select("Inceput", "Mijloc", "Inchide")
            if t==1 then
               if e==1 then
                  x="434200"
                  y="290600"                  
               elseif e==2 then
                  x="375200"
                  y="174900"
               elseif e==3 then
                  x="491800"
                  y="173600"
               end
            elseif t==2 then
               x="436200"
               y="215300"
            end         
         elseif s==6 then
            say_title("Teleporter:")
            say("Incotro vrei sa mergi straine?")
            t = select("Inceput", "Inchide")
            if t==1 then
               if e==1 then
                  x="599400"
                  y="756300"                  
               elseif e==2 then
                  x="597800"
                  y="622200"
               elseif e==3 then
                  x="730700"
                  y="689800"
               end
            elseif t==2 then
               return
            end
         end         
         if s!=8 or p!=8 then
            pc.warp(x, y)
         end
      end
   end
end

    Tutorial instalare quest:

    1. Salvaţi conţinutul quest-ului într-un fişier text numit de exemplu teleporter.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 teleporter.quest

    5. Intraţi pe server şi scrieţi /reload q.

    View in topic
  19. #419
  20. #420

Online members

No members currently online
0
Online
70
Today
14274
Total

Community Roles

Administrators
Super-Moderators
Moderators
diamondPremium
Server Manager
visibilityOverwatch
E-Cup Manager
E-Cup Admin
Member
Banned