Posts by Piciul- [Legacy 3554]

quest skill_group_level_5 begin
    state start begin
        when login or levelup with pc.level >= 5 begin
            if pc.get_skill_group() == 0 then
                say_title("Alegerea competenþelor:")
                say("Este timpul sã-þi alegi competenþele!")
                say_reward("Misiune -> Alege-þi competenþele.")
                set_state(run)
            end
        end
    end
    state run begin
        when letter begin
            send_letter("+Alege-þi competenþele")
        end
        when button or info begin
            local all = {
                    [0] = {"Body", "Mental"},
                    [1] = {"Dagger", "Archer"},
                    [2] = {"WP", "BM"},
                    [3] = {"Buff", "Cure"},
                    }
                        --------------------------------------------          
                        local skill = {
                                [0]={
                                        [1]={1, 2, 3, 4, 5},
                                        [2]={16, 17, 18, 19, 20},
                                },
                                [1]={
                                        [1]={31, 32, 33, 34, 35},
                                        [2]={46, 47, 48, 49, 50},
                                },
                                [2]={
                                        [1]={61, 62, 63, 64, 65, 66},
                                        [2]={76, 77, 78, 79, 80, 81},
                                },
                                [3]={
                                        [1]={91, 92, 93, 94, 95, 96},
                                        [2]={106, 107, 108, 109, 110, 111}
                                },
                        }
                        ---------------------------------------------
            say_title("Alegerea competenþelor:")
            say("Alege-þi competenþele pe care vrei sã le foloseºti.")
            local a = select(all[pc.get_job()][1], all[pc.get_job()][2], "Voi alege mai târziu")
            if a == 1 or a == 2 then
                say_title("Alegerea competenþelor:")
                say("Felicitãri, þi-ai ales competenþele!")
                pc.set_skill_group(tonumber(a))
                                pc.clear_skill()
                clear_letter()
                                for i = 1, table.getn(skill[pc.get_job()][pc.get_skill_group()]) do
                                        pc.set_skill_level (skill[pc.get_job()][pc.get_skill_group()], 40)
                                end
                set_state(kurwa)
            elseif a == 3 then
                return
            end
        end
    end
    state kurwa 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

quest biologul_chaegirab begin
    -- Functiile necesare questului
    state functions begin
        function Data()
            local data
            data = {
                {
                    "Dintii de orc",
                    30006,
                    10,
                    "Valea orcilor",
                    {635, 636, 637}
                },
               
                {
                    "Cartile blestemate",
                    30047,
                    15,
                    "Valea orcilor",
                    {703, 704, 705, 707, 706}
                },
               
                {
                    "Amintirile de demon",
                    30015,
                    20,
                    "Turnul Demonilor",
                    {1001, 1002, 1003, 1004}
                },
               
                {
                    "Globurile de gheata",
                    30050,
                    20,
                    "Muntele Sohan",
                    {1102, 1103, 1104, 1107, 1106}
                },
               
                {
                    "Ramurile Zelkova",
                    30165,
                    20,
                    "Padurea Rosie",
                    {2301, 2302, 2303, 2304, 2305, 2311, 2312, 2313, 2314, 2315}
                },
               
                {
                    "Table sacre",
                    30166,
                    30,
                    "Campul cu serpi",
                    {1401, 1402, 1403, 1601, 1602, 1603}
                },
               
                {
                    "Crengile rosii",
                    30167,
                    30,
                    "Padurea Rosie",
                    {2311, 2312, 2313, 2314, 2315, 7024}
                },
               
                {
                    "Vestile despre Rege",
                    30168,
                    20,
                    "Atlantida",
                    {2401, 2402, 2403, 2404, 2411, 2412, 2413, 2414}
                }
            }
            return data
        end
        function getLevel(bquest_level)
            local levels
            local bquest_level = pc.getqf("blevel")
            levels = {30, 40, 50, 60, 70, 80, 90, 94, 100}
            return levels[bquest_level]
        end
        function getBonusName()
            local names
            local blevel = pc.getqf("blevel")
            names = {
                "Bonus +10 Viteză de mişcare (permanent)",
                "Bonus +5 valoare atac (permanent)",
                "Bonus +60 apărare (permanent)",
                "Bonus +50 atac (permanent)",
                "Bonus +11 viteză de mişcare (permanent)[ENTER]Bonus +10 rezistenţă la monştri (permanent)",
                "Bonus +10 forţă de atac (permanent)[ENTER]Bonus +6 viteză de atac (permanent)",
                "Bonus +10% contra semi-oamenilor (permanent)",
                "Bonus +10% critică (permanent)[ENTER]Bonus +10% pătrunzătoare (permanent)[ENTER]Bonus +3000 HP (permanent)"
            }
            return names[blevel]
        end
        function applyBonus()
            local blevel = pc.getqf("blevel")
            if blevel == 1 then
                affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60)
            elseif blevel == 2 then
                affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60) 
            elseif blevel == 3 then
                affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60)
            elseif blevel == 4 then
                affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
            elseif blevel == 5 then
                affect.add_collect(apply.MOV_SPEED,11,60*60*24*365*60)   
                affect.add_collect_point(POINT_DEF_BONUS,10,60*60*24*365*60)
            elseif blevel == 6 then
                affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60)        
                affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60)
            elseif blevel == 7 then
                affect.add_collect(apply.ATTBONUS_HUMAN,10,60*60*24*365*60)
            elseif blevel == 8 then
                affect.add_collect(apply.CRITICAL_PCT,10,60*60*24*365*60)
                affect.add_collect(apply.PENETRATE_PCT,10,60*60*24*365*60)
                affect.add_collect(apply.MAX_HP,3000,60*60*24*365*60) 
            end
        end
    end
    state start begin
        when login or levelup with pc.get_level() >= 30 and not pc.is_gm() begin
            local v = find_npc_by_vnum(20084)
            if v != 0 then
                target.vid("__TARGET__", v, "Chaegirab")
            end
            send_letter("Cauta-l pe Biolog")
        end
        when button or info begin
            say_title("Cauta-l pe Biolog!")
            say("Biologul are nevoie de ajutorul")
            say("tau pentru studiile sale.")
            say("Cauta-l si intreaba-l cu ce il poti")
            say("ajuta. Ajutorul tau nu o sa ramana")
            say("nerasplatit.")
            say("")
        end
        when __TARGET__.target.click or 20084.chat."Caut ajutor" begin
            target.delete("__TARGET__")
            say_title("Caut ajutor")
            say("Salut tinere razboinic,")
            say("Am nevoie de ajutorul tau pentru")
            say("a-mi termina studiile despre monstrii")
            say("ce ne cutreiera lumea noastra.")
            say("")
            say_reward("Citeste cu atentie informatiile urmatoare!")
            say("")
            wait()
            say_title("Cercetari")
            say("Cercetarile mele se bazeaza pe")
            say("anumite obiecte care se afla la")
            say("monstrii de pe continent.")
            say("Adu-mi toate materialele de care")
            say("am nevoie si te voi rasplati cu")
            say("o gramada de lucruri.")
            say("")
            wait()
            set_state(mission_start)
            clear_letter()
            pc.setqf("blevel", 1)
        end
    end
    state mission_start begin
        when letter or login or levelup begin
            local data = biologul_chaegirab.Data()
            local blevel = pc.getqf("blevel")
            if pc.get_level() >= biologul_chaegirab.getLevel() then
                send_letter("BIOLOG ~ "..data[blevel][1])
            end
            if pc.count_item(data[blevel][2]) > 0 then
                local v = find_npc_by_vnum(20084)
                if v != 0 then
                    target.vid("__TARGET__", v, "Chaegirab")
                end
            end
        end
        when button or info begin
            local data = biologul_chaegirab.Data()
            local blevel = pc.getqf("blevel")
            say_title("Dintii de orc")
            say("Salut tinere razboinic,")
            say("Biologul are nevoie sa ii aduci")
            say(""..data[blevel][3].."x "..item_name(data[blevel][2]).."")
            say("Se gasesc in "..data[blevel][4].."!")
            say("Poti aduce o bucata odata la 3 ore.")
            say("")
            wait()
        end
        when __TARGET__.target.click or 20084.click begin
            target.delete("__TARGET__")
            local data = biologul_chaegirab.Data()
            local blevel = pc.getqf("blevel")
            if pc.get_level() >= biologul_chaegirab.getLevel() then
                say_title(data[blevel][1])
                say("Salut "..pc.get_name().."!")
                say("Ai venit sa imi aduci niste obiecte?")
                say("Tine minte! Poti sa imi aduci odata la")
                say("3 ore pentru a avea timp sa le studiez!")
                say("")
                wait()
                say_title(data[blevel][1])
                say("Ai venit sa imi aduci "..item_name(data[blevel][2]).."?")
                if pc.is_gm() then
                    pc.setqf("duration", get_time()+0)
                end
                if pc.count_item(data[blevel][2]) == 0 then
                    say("")
                    say_reward("Se pare ca inca nu ai facut rost de nici un obiect!")
                    say_reward("Revino cand ai obiectele cerute.")
                    return
                end
                if get_time() < pc.getqf("duration") then 
                    say("")
                    say_reward("Inca nu au trecut cele 3 ore.")
                    say_reward("Revino mai tarziu.")
                    return
                end
                local bcount = pc.getqf("bcount")+1
                if bcount == data[blevel][3] then
                    say("Felicitari!")
                    say("Mi-ai adus toate obiectele necesare")
                    say("pentru a-mi termina studiul.")
                    say("")
                    say_reward("Rasplata : ")
                    say_reward(biologul_chaegirab.getBonusName())
                    wait()
                    biologul_chaegirab.applyBonus()
                    pc.setqf("blevel", pc.getqf("blevel")+1)
                    pc.setqf("bcount", 0)
                    pc.setqf("duration", get_time())
                    set_state(mission_next)
                else
                    say("Ooh...ai gasit "..item_name(data[blevel][2]).."?")
                    say("Lasa-ma sa studiez...")
                    say("...")
                    say("Se pare ca este bun.")
                    say("Mai ai de adus "..(data[blevel][3] - pc.getqf("bcount") - 1).."!")
                    say("")
                    pc.remove_item(data[blevel][2], 1)
                    pc.setqf("duration", get_time()+60*60*3)
                    pc.setqf("bcount", bcount)
                end
            else
                say_title("Biolog")
                say("Eu ma ocup de toate studiile")
                say("din acest regat de aceea sunt")
                say("foarte ocupat momentan.")
                say("")
            end
        end
        when 30130.use begin
            if get_time() < pc.getqf("duration")-5 then
                pc.setqf("duration", get_time()+5)
                chat("Timpul a fost redus la 5 secunde!")
                pc.remove_item(30130, 1)
            else
                chat("Timpul este deja scazut!")
            end
        end
        when kill begin
            local data = biologul_chaegirab.Data()
            local blevel = pc.getqf("blevel")
            for k,r in pairs(data[blevel][5]) do 
                if npc.get_race() == r and pc.count_item(data[blevel][2]) < data[blevel][3] then
                    local c = math.random(0, 30)
                    if c == 1 then
                        pc.give_item2(data[blevel][2], 1)
                    end
                end
            end
        end
    end
    state mission_next begin
        when login or levelup or letter begin
            local data = biologul_chaegirab.Data()
            local blevel = pc.getqf("blevel")
            if pc.get_level() >= biologul_chaegirab.getLevel() then
                set_state(mission_start)
            end
        end
    end
    state __END__ begin
    end
end

Parametrii generali :

{
    "Dintii de orc", -- nume misiune
    30006, -- cod obiecte
    10, -- cantitatea de obiecte
    "Valea orcilor", -- numele locatiei unde se gasesc
    {635, 636, 637} -- monstrii la care pica itemele
},

 

 

30130 va reduce timpul de asteptare la 5 secunde.

Nivele misiuni :

function getLevel(bquest_level)
local levels
local bquest_level = pc.getqf("blevel")
levels = {30, 40, 50, 60, 70, 80, 90, 94, 100} -- aici vin nivelele misiunilor
return levels[bquest_level]
end
Ultimul trebuie sa fie level maxim+1. Adica daca aveti level maxim 99 puneti 100.

Bonusuri :

function getBonusName()
    local names
    local blevel = pc.getqf("blevel")
    names = {
        "Bonus +10 Viteză de mişcare (permanent)",
        "Bonus +5 valoare atac (permanent)",
        "Bonus +60 apărare (permanent)",
        "Bonus +50 atac (permanent)",
        "Bonus +11 viteză de mişcare (permanent)[ENTER]Bonus +10 rezistenţă la monştri (permanent)",
        "Bonus +10 forţă de atac (permanent)[ENTER]Bonus +6 viteză de atac (permanent)",
        "Bonus +10% contra semi-oamenilor (permanent)",
        "Bonus +10% critică (permanent)[ENTER]Bonus +10% pătrunzătoare (permanent)[ENTER]Bonus +3000 HP (permanent)"
    }
    return names[blevel]
end

Numele si valorile bonusurilor ce le vor primii sunt in ordinea misiunilor.

function applyBonus()
    local blevel = pc.getqf("blevel")
    if blevel == 1 then
        affect.add_collect(apply.MOV_SPEED, 10, 60*60*24*365*60)
    elseif blevel == 2 then
        affect.add_collect(apply.ATT_SPEED,5,60*60*24*365*60)
    elseif blevel == 3 then
        affect.add_collect(apply.DEF_GRADE_BONUS,60,60*60*24*365*60)
    elseif blevel == 4 then
        affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*60)
    elseif blevel == 5 then
        affect.add_collect(apply.MOV_SPEED,11,60*60*24*365*60)  
        affect.add_collect_point(POINT_DEF_BONUS,10,60*60*24*365*60)
    elseif blevel == 6 then
        affect.add_collect(apply.ATT_SPEED,6,60*60*24*365*60)       
        affect.add_collect_point(POINT_ATT_BONUS,10,60*60*24*365*60)
    elseif blevel == 7 then
        affect.add_collect(apply.ATTBONUS_HUMAN,10,60*60*24*365*60)
    elseif blevel == 8 then
        affect.add_collect(apply.CRITICAL_PCT,10,60*60*24*365*60)
        affect.add_collect(apply.PENETRATE_PCT,10,60*60*24*365*60)
        affect.add_collect(apply.MAX_HP,3000,60*60*24*365*60)
    end
end
Bonusurile in functie de misiuni.

Modificare rasă :

local c = math.random(0, 30)
Pentru a micsora sansa mariti al doilea numar, iar pentru a o mari scadeti-l.

Modificare timp aşteptare :

pc.setqf("duration", get_time()+60*60*3)
Timpul este setat la 3 ore.

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 .

quest item_skill_p begin
   state start begin
      
      -- DEFAULT --
      when 50512.use with pc.get_skill_group() == 0 begin
         say("Nu ai nicio competenta aleaasa!")
         say("")
      end
      
      
      -- WARRIOR --
      when 50512.use with pc.get_job() == 0 and pc.get_skill_group() == 1 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Incizia Tripa","Vartejul Sabiei","Iures","Aura Sabiei","Izbitura","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(1) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(1, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(2) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(2, 59)
               pc.remove_item(50512, 1)
            end   
         end            
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(3) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(3, 59)
               pc.remove_item(50512, 1)
            end   
         end            
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(4) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(4, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(5) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(5, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      when 50512.use with pc.get_job() == 0 and pc.get_skill_group() == 2 begin
         say_title("Alege o competenta:")
         say("")

         local mandi = select("Atacul Spiritului","Zdrobire","Zdruncinare","Corp Rezistent","Atacul Sabiei","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(16) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(16, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(17) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(17, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(18) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(18, 59)
               pc.remove_item(50512, 1)
            end
         end            
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(19) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(19, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(20) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(20, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      
      
      -- ASSASSIN --
      when 50512.use with pc.get_job() == 1 and pc.get_skill_group() == 1 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Ambuscada","Atac Mortal","Rulant","Camuflaj","Norul","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(31) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(31, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(32) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(32, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(33) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(33, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(34) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(34, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(35) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(35, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      when 50512.use with pc.get_job() == 1 and pc.get_skill_group() == 2 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Foc repetat","Ploaie de Sageti","Sageata de Foc","Mers de Fulg","Sageata Otravita","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(46) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(46, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(47) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(47, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(48) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(48, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(49) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(49, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(50) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(50, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      
      
      -- SURA --
      when 50512.use with pc.get_job() == 2 and pc.get_skill_group() == 1 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Lovitura Degetului","Vartejul Dragonului","Tais Vrajit","Teama","Armura Vrajita","Risipirea Magiei","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(61) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(61, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(62) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(62, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(63) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(63, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(64) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(64, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(65) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(65, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 6 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(66) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(66, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      when 50512.use with pc.get_job() == 2 and pc.get_skill_group() == 2 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Lovitura Intunecata","Lovitura Focului","Spiritul Flacarii","Protectia Intunecata","Lovitura Spiritului","Sfera Intunecata","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(76) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(76, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(1) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(77, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(78) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(78, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(79) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(79, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(80) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(80, 59)
               pc.remove_item(50512, 1)
            end
         end
            if mandi == 6 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(81) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(81, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      
      
      -- SHAMAN --
      when 50512.use with pc.get_job() == 3 and pc.get_skill_group() == 1 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Talismant Zburator","Aruncarea Dragonului","Ragetul Dragonului","Binecuvantare","Reflexie","Forta Dragonului","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(91) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(91, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(92) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(92, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(93) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(93, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(94) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(94, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(95) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(95, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 6 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(96) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(96, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
      when 50512.use with pc.get_job() == 3 and pc.get_skill_group() == 2 begin
         say_title("Alege o competenta:")
         say("")
         local mandi = select("Aruncarea Fulgerului","Chemarea Fulgerului","Gheara Fulgerului","Leac","Accelerare","Atac Fortat","Inchide")
         if mandi == 1 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(106) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(106, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 2 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(107) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(107, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 3 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(108) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(108, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 4 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(109) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(109, 59)
               pc.remove_item(50512, 1)
            end
         end         
         if mandi == 5 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(110) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(110, 59)
               pc.remove_item(50512, 1)
            end
         end
         if mandi == 6 and pc.count_item(50512) >= 1 then
            if pc.get_skill_level(111) >= 40 then
               syschat("Ai deja acesta competenta Perfecta!")
            else
               pc.set_skill_level(111, 59)
               pc.remove_item(50512, 1)
            end
         end
      end
   end
end
         

Uite că mă simt nevoit să mai las un reply. Nu e vorba de down,nu îmi pasă chiar deloc ,dar problema e că mai sunt și alți moderatori și dacă ai adus vorba de " activitate " , ce activitate nepot înafara de spamat nimic nou să nu zicem și de activitatea moderativă care îți este egală cu 0 . Nu suport să fim acuzați pentru inactivitate din cauza inactivității voastre de înainte de up. Voi doar spamați dar de închis etc 0 . Și da,downu nu a fost pentru inactivitate,dormi și dai din gură degeaba, a fost ordin administrativ .

Numele tău: Piciul-

•Numele membrului din staff: Thunder și WinKode

•Greșeală: Urcarea în grad a 1moderator intr-un timp atât de scurt ( diferență de maxim 10 zile dintre Moderator și Super Moderator .

•Dovadă:

1) Data primirii moderatorului la zEEko --> Posted 15 July 2017 - 04:42 PM

Din câte sau spus a fost acordat pe activitate ( eu zic puțină favorizare ) . Din toți moderatori a primit el up,cercetașu fără breaslă și noi am dormit în bocanci și am frecat menta ,cum vine asta ?

II) De exemplu azi,fix pe noi moderatori s-a dat vina că uite noi super moderatori şi actuali nu şi-au făcut atribuţiile cele vechi ( lock la ficare topic per categorie ) şi am căzut noi de proşti că nu ne facem treaba. Cum vine asta ? Noi le facem vechiile atribuţii şi ei stau cu mâna`n gură că nu e de făcut nimic ? când eram eu super moderator spam la statusuri şi topicuri fără număr şi acum sunt dar se feresc de ele ca pisica de apă.

•Ce sancțiuni doriți să i se aplice:

•Alte precizări. :

quest channel_id begin
	state start begin
		when login begin
		syschat("Acum esti conectat la canalul "..pc.get_channel_id()..".")
		end
	end
end

quest teamwarp begin
    state start begin
      when xxx.use begin
         if party.is_party() then
            if party.is_leader() then
               say_title("Membrii grupului")
               say("Vrei sa stii unde se afla?")
               local ss = select("Da","Nu")
                  if ss == 1 then
                     item.remove()
                     party.setf ( "x", pc.get_x() )
                     party.setf ( "y", pc.get_y() )
                     party.chat("======== Liderul te asteapta! ========")
                     party.chat("======= Te poti teleporta acum! =======")
                  else
                     say("La revedereeee!")
                  end
            else
               say("Teleport lider!")
               say("Vrei sa te teleportezi singur?")
               local ss = select("Da","Nu")
               if ss == 1 then
                  if party.getf("x") == 0 or party.getf("y") == 0 then
                     say("Liderul nu este pregatit.")
                  else
                     item.remove(1, xxx)
                     pc.warp(party.getf("x").."00",party.getf("y").."00")
                  end
               end
            end
         else
            say("Trebuie sa ai o grupa.")
         end
      end
    end
end

 

In loc de xxx puneti codul itemului care vreti sa faca acest lucru.

Tutorial instalare quest:

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

• 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/quest(depinde ce server aveţi) apoi ./qc nume_quest.quest/.lua

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

quest change_empire_item begin
   state start begin
      when login with pc.getqf("special_func") == 0 begin
         if pc.get_empire() == 1 then
            affect.add_collect(apply.GOLD_DOUBLE_BONUS,10,60*60*24*365*4)
            affect.add_collect(apply.ITEM_DROP_BONUS,10,60*60*24*365*4)
            affect.add_collect(apply.ATT_BONUS_TO_MONSTER,10,60*60*24*365*4)
            pc.setqf("special_func", 1)
         elseif pc.get_empire() == 2 then
            affect.add_collect(apply.ATT_GRADE_BONUS,50,60*60*24*365*4)
            affect.add_collect(apply.MAX_HP,1000,60*60*24*365*4)
            affect.add_collect(apply.EXP_DOUBLE_BONUS,10,60*60*24*365*4)
            pc.setqf("special_func", 2)
         elseif pc.get_empire() == 3 then
            affect.add_collect(apply.STR,10,60*60*24*365*4)
            affect.add_collect(apply.CON,10,60*60*24*365*4)
            affect.add_collect(apply.INT,10,60*60*24*365*4)
            affect.add_collect(apply.DEX,10,60*60*24*365*4)
            affect.add_collect(apply.GOLD_DOUBLE_BONUS,10,60*60*24*365*4)
            pc.setqf("special_func", 3)
         end         
      end      
      when 71054.use begin
         say_title("Tinctura Regatului")
         say("Cu aceasta tinctura poti sa")
         say("Iti schimbi regatul cu unul nou")
         say("Pe care tu il doresti.")
         say("")
         if get_time() < pc.getqf("next_use_time") then
            say_reward("Nu aveti posibilitatea de a va schimbati regatul.")
            if pc.get_name() == "Tester" then
               pc.setqf("next_use_time", 0)
            end
            return
         end
         if change_empire_item.move_pc() == true then
            if pc.getqf("special_func")==1 then
               affect.remove_collect(apply.GOLD_DOUBLE_BONUS,10)
               affect.remove_collect(apply.ITEM_DROP_BONUS,10)
               affect.remove_collect(apply.ATT_BONUS_TO_MONSTER,10)
            elseif pc.getqf("special_func")==2 then
               affect.remove_collect(apply.ATT_GRADE_BONUS)
               affect.remove_collect(apply.MAX_HP,1000)
               affect.remove_collect(apply.EXP_DOUBLE_BONUS,10)
            elseif pc.getqf("special_func")==3 then   
               affect.remove_collect(apply.STR,10)
               affect.remove_collect(apply.CON,10)
               affect.remove_collect(apply.INT,10)
               affect.remove_collect(apply.DEX,10)
               affect.remove_collect(apply.GOLD_DOUBLE_BONUS,10)
            end
            pc.setqf("special_func", 0)
            pc.setqf("next_use_time", get_time() + time_hour_to_sec(24*7))
         end
      end
      function move_pc()
         if pc.is_engaged() then
            say_reward("Suneti casatorit/casatorita.")
            say_reward("Nu puteti schimba regatul.")
            return false
         end
         if pc.is_married() then
            say_reward("Suneti casatorit/casatorita.")
            say_reward("Nu puteti schimba regatul.")
            return false
         end
         if pc.is_polymorphed() then
            say_reward("Suneti transformat.")
            say_reward("Nu poti schimba regatul.")
            return false
         end
         if pc.has_guild() then
            say_reward("Aparineti unei bresla.")
            say_reward("Nu puteti schimba regatul.")
            return false
         end
         if pc.money < 500000 then
            say_reward("Nu aveti suficienti Yang.")
            say_reward("Pentru a schimba regatul ai nevoie de 500 000 Yang.")
            return false
         end
         say_reward("In ce regat vrei sa te muti?")
         local s = select("Rosu", "Albastru", "Nu mai vreau")
         if 4==s then
            return false 
         end
         say_title("Tinctura Regatelor")
         say("Vrei sa parasesti acest regat?")
         say("Sa stii ca pentru tradare nu exista scuze!")
         local a = select("Schimb Regatul", "Nu mai vreau")
         if 2 == a then
            return false
         end
       if s == 2 then
         local ret = pc.change_empire(3)
       else
         local ret = pc.change_empire(s)
       end
         local oldempire = pc.get_empire()
         if ret == 999 then
            say_title("Tinctura Regatelor")
            say("Ai schimbat regatul cu succes.")
            say("Daca vei dori sa schimbi din nou regatul")
            say("va trebui sa astepti o saptamana.")
            say("Va rugam sa dati va reconectati.")
            pc.change_gold(-500000)         
            pc.remove_item(71054)         
            return  true
         elseif ret == 1 then
            say("Apartineti deja in acest regat.")
            say("Te rog sa selectez alt regat.")
         elseif ret == 3 then
            say("Nu poti schimba regatul.")
            say("Nu poti schimba regatul,")
            say("deoarece ati fost casatorit recent.")
         end
         return false
      end
   end
end

 

 

Schimbare regat( REGAT ALBASTRU SI ROSU )

Quest 

 

 

quest cartemobi begin
    state start begin
        when 40008.use begin
            say_title("Cartea Mobilor:")
            say("Salut sefule, sunt manualul tau cu comenzi")
            say("eu iti spun toate codurile, la toti mobii existenti pe server.")
            say("Ce mai faci? Cum la tine?")
            say("Doresti sa afli niste coduri?")
            if select("Da,prietene","Nu Mersi.") == 1 then
                ---
                local vnums = mysql_query("select * from player.mob_proto")
                local vnums_table = {}
                j=0
                a=0
                for i = 1,table.getn(vnums)/10,1 do
                    j=j+1
                end
                say("Sunt "..j.." pagini cu monstri")
                say("Cu care vrei sa incepi?")
                local pgs = input()
                if pgs == "" or tostring(pgs)==nill then
                    say("Te rog sa introduci un cod corect.")
                elseif tostring(pgs)==1 then
                    for i = 11,table.getn(vnums),10 do
                        if a!=2 then
                            say(""..vnums.vnum[i-10]..":"..vnums.locale_name[i-10].."")   
                            say(""..vnums.vnum[i-9]..":"..vnums.locale_name[i-9].."")
                            say(""..vnums.vnum[i-8]..":"..vnums.locale_name[i-8].."")
                            say(""..vnums.vnum[i-7]..":"..vnums.locale_name[i-7].."")
                            say(""..vnums.vnum[i-6]..":"..vnums.locale_name[i-6].."")
                            say(""..vnums.vnum[i-5]..":"..vnums.locale_name[i-5].."")
                            say(""..vnums.vnum[i-4]..":"..vnums.locale_name[i-4].."")
                            say(""..vnums.vnum[i-3]..":"..vnums.locale_name[i-3].."")
                            say(""..vnums.vnum[i-2]..":"..vnums.locale_name[i-2].."")
                            say(""..vnums.vnum[i-1]..":"..vnums.locale_name[i-1].."")
                            say("Doresti sa continui?")
                            if select("Da","Nu") ==2 then
                            a=2
                            end
                        end
                    end
                else
                    for i = tostring(pgs),table.getn(vnums),10 do
                        if a!=2 then
                            say(""..vnums.vnum[i*10+10].."    :"..vnums.locale_name[i*10+10].."")
                            say(""..vnums.vnum[i*10+9].."    :"..vnums.locale_name[i*10+9].."")
                            say(""..vnums.vnum[i*10+8].."    :"..vnums.locale_name[i*10+8].."")
                            say(""..vnums.vnum[i*10+7].."    :"..vnums.locale_name[i*10+7].."")
                            say(""..vnums.vnum[i*10+6].."    :"..vnums.locale_name[i*10+6].."")
                            say(""..vnums.vnum[i*10+5].."    :"..vnums.locale_name[i*10+5].."")
                            say(""..vnums.vnum[i*10+4].."    :"..vnums.locale_name[i*10+4].."")
                            say(""..vnums.vnum[i*10+3].."    :"..vnums.locale_name[i*10+3].."")
                            say(""..vnums.vnum[i*10+2].."    :"..vnums.locale_name[i*10+2].."")
                            say(""..vnums.vnum[i*10+1].."    :"..vnums.locale_name[i*10+1].."")
                            say("Doresti sa continui?")
                            if select("Da","Nu") ==2 then
                            a=2
                            end
                        end
                    end
                end
            else
                say_title("Cartea Mobilor:")
                say("Cruel vede tot, o sa te pedepseasca. :((")
                say("RAULE!")
            end
        end
    end
end

Client

Item_Proto

 

 

<Item vnum="40008" hashName="Cartea Mobilor by Cruel" name="Cartea Mobilor" type="0" subtype="0" weight="0" size="1" antiflag="0" flag="0" wearflag="0" immuneflag="0" gold="0" buy_price="0" limittype0="0" limitvalue0="0" limittype1="0" limitvalue1="0" applytype0="0" applyvalue0="0" applytype1="0" applyvalue1="0" applytype2="0" applyvalue2="0" value0="0" value1="0" value2="0" value3="0" value4="0" value5="0" socket0="0" socket1="0" socket2="0" socket3="0" socket4="0" socket5="0" refine_vnum="0" refine_set="0" magic_pct="0" specular="0" socket_pct="0" />

Query

 

 

INSERT INTO `item_proto` VALUES (40008, 'Cartea Mobilor By Cruel', 'Cartea Mobilor', 18, 0, 0, 1, 0, 0, 0, '', 0, 10000, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, -1, -1, -1, -1, 0, 0, 0);

Item_list

 

 

40008    ETC    icon/item/cruel.tga

Item_desc

 

 

40008    Cartea monstrilor, in ea gasesti informatii despre codurile la toti mobii existenti pe serverul dat.

Tutorial instalare quest:

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

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

6. Testaţi quest-ul .

Frizură

quest frizura_jos begin
state start begin
when login begin
send_letter("Dezechipeaza Frizura")
end

when button or info begin
if pc.getf("costume_rofl", "use_costume_hair") == 1 then
local vnum = pc.getf("costume_rofl", "hair_use_vnum")
pc.give_item2(vnum,1)
cmdchat("costume_hair "..vnum)
pc.setf("costume_rofl", "use_costume_hair", 0)
pc.setf("costume_rofl", "hair_use_vnum", 0)
local old_hair = pc.getf("costume_rofl", "old_hair_costume")
pc.set_part(PART_HAIR, old_hair)
pc.setf("costume_rofl", "old_hair_costume", 0)
end
end
end
end

Costum

quest costum_jos begin
state start begin
when login begin
send_letter("Dezechipeaza Costum")
end

when button or info begin
if pc.getf("costume_rofl", "use_costume") == 1 then
local vnum = pc.getf("costume_rofl", "costume_body")
pc.give_item2(vnum,1)
cmdchat("costume_icon "..vnum)
pc.setf("costume_rofl", "use_costume", 0)
pc.setf("costume_rofl", "costume_body", 0)
local old = pc.getf("costume_rofl", "costume_part_old")
local rüssi = pc.get_armor()
if rüssi == old then
pc.set_part(PART_MAIN, old)
else
pc.set_part(PART_MAIN, rüssi)
end
end
end
end
end

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 .

quest amuleta begin

    when 30180.use begin
                
                say_title("Amuleta zeu dragon.")
                say("Acest inscriptii vechi,si murdare creeaza")
                say("un sentiment ne-placut.Nu poti citii")
                say("inscriptiile de pe amuleta fara sa tremuri")                
                say("Insusi Beran-Setao a creat-o printr-o lacrima")
                say("amaruie.V4 este centrul unde si-a varsat amarul")
                say("O data ce vei incanta cuvintele,veii dus de graba")
                say("catre Caverna Dragonului")
                say_verde("Atentie!Poti folosii amuleta o singura data!")
                say_reward("Vei incanta cuvintele magice?")
                local abcd = select("Foloseste amuleta", "Inapoi")
        if abcd == 1 then
                say_title("Amuleta zeu dragon.")
                say("Esti absolut sigur ca vrei sa")
                say("folosesti amuleta?")
                local abcde = select("Da", "Nu")
            if abcde == 1 then                
                pc.warp(1536, 12032)
                item_remove(30180, 1)
                end
                   
            elseif abcde == 2 then 
            return            
        elseif abcd == 2 then
                return
                end 
            end
        end
    end
end

Tutorial instalare quest:

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

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

quest loginexit begin
   state start begin
      when login with pc.get_map_index() == 198 begin
         notice("Daca ai avut scrolluri in inventar, au fost sterse toate !")
         notice("Asa nu vei putea memora camera si vei juca cinstit.")
         pc.removeitem( 22000, 1 )
         pc.removeitem( 22000, 2 )
         pc.removeitem( 22000, 3 )
         pc.removeitem( 22000, 4 )
         pc.removeitem( 22000, 5 )
         pc.removeitem( 22000, 6 )
         pc.removeitem( 22000, 7 )
         pc.removeitem( 22000, 8 )
         pc.removeitem( 22000, 9 )
         pc.removeitem( 22000, 10 )
         pc.removeitem( 22000, 11 )
         pc.removeitem( 22000, 12 )
         pc.removeitem( 22000, 13 )
         pc.removeitem( 22000, 14 )
         pc.removeitem( 22000, 15 )
         pc.removeitem( 22000, 16 )
         pc.removeitem( 22000, 17 )
         pc.removeitem( 22000, 18 )
         pc.removeitem( 22000, 19 )
         pc.removeitem( 22000, 20 )
         pc.removeitem( 22000, 21 )
         pc.removeitem( 22000, 22 )
         pc.removeitem( 22000, 23 )
         pc.removeitem( 22000, 24 )
         pc.removeitem( 22000, 25 )
         pc.removeitem( 22000, 26 )
         pc.removeitem( 22000, 27 )
         pc.removeitem( 22000, 28 )
         pc.removeitem( 22000, 29 )
         pc.removeitem( 22000, 30 )
         pc.removeitem( 22000, 31 )
         pc.removeitem( 22000, 32 )
         pc.removeitem( 22000, 33 )
         pc.removeitem( 22000, 34 )
         pc.removeitem( 22000, 35 )
         pc.removeitem( 22000, 36 )
         pc.removeitem( 22000, 37 )
         pc.removeitem( 22000, 38 )
         pc.removeitem( 22000, 39 )
         pc.removeitem( 22000, 40 )
         pc.removeitem( 22000, 41 )
         pc.removeitem( 22000, 42 )
         pc.removeitem( 22000, 43 )
         pc.removeitem( 22000, 44 )
         pc.removeitem( 22000, 45 )
         pc.removeitem( 22000, 46 )
         pc.removeitem( 22000, 47 )
         pc.removeitem( 22000, 48 )
         pc.removeitem( 22000, 49 )
         pc.removeitem( 22000, 50 )
         pc.removeitem( 22000, 51 )
         pc.removeitem( 22000, 52 )
         pc.removeitem( 22000, 53 )
         pc.removeitem( 22000, 54 )
         pc.removeitem( 22000, 55 )
         pc.removeitem( 22000, 56 )
         pc.removeitem( 22000, 57 )
         pc.removeitem( 22000, 58 )
         pc.removeitem( 22000, 59 )
         pc.removeitem( 22000, 60 )
         pc.removeitem( 22000, 61 )
         pc.removeitem( 22000, 62 )
         pc.removeitem( 22000, 63 )
         pc.removeitem( 22000, 64 )
         pc.removeitem( 22000, 65 )
         pc.removeitem( 22000, 66 )
         pc.removeitem( 22000, 67 )
         pc.removeitem( 22000, 68 )
         pc.removeitem( 22000, 69 )
         pc.removeitem( 22000, 70 )
         pc.removeitem( 22000, 71 )
         pc.removeitem( 22000, 72 )
         pc.removeitem( 22000, 73 )
         pc.removeitem( 22000, 74 )
         pc.removeitem( 22000, 75 )
         pc.removeitem( 22000, 76 )
         pc.removeitem( 22000, 77 )
         pc.removeitem( 22000, 78 )
         pc.removeitem( 22000, 79 )
         pc.removeitem( 22000, 80 )
         pc.removeitem( 22000, 81 )
         pc.removeitem( 22000, 82 )
         pc.removeitem( 22000, 83 )
         pc.removeitem( 22000, 84 )
         pc.removeitem( 22000, 85 )
         pc.removeitem( 22000, 86 )
         pc.removeitem( 22000, 87 )
         pc.removeitem( 22000, 88 )
         pc.removeitem( 22000, 89 )
         pc.removeitem( 22000, 90 )
         pc.removeitem( 22000, 91 )
         pc.removeitem( 22000, 92 )
         pc.removeitem( 22000, 93 )
         pc.removeitem( 22000, 94 )
         pc.removeitem( 22000, 95 )
         pc.removeitem( 22000, 96 )
         pc.removeitem( 22000, 97 )
         pc.removeitem( 22000, 98 )
         pc.removeitem( 22000, 99 )
         pc.removeitem( 22000, 100 )
         pc.removeitem( 22000, 101 )
         pc.removeitem( 22000, 102 )
         pc.removeitem( 22000, 103 )
         pc.removeitem( 22000, 104 )
         pc.removeitem( 22000, 105 )
         pc.removeitem( 22000, 106 )
         pc.removeitem( 22000, 107 )
         pc.removeitem( 22000, 108 )
         pc.removeitem( 22000, 109 )
         pc.removeitem( 22000, 110 )
         pc.removeitem( 22000, 111 )
         pc.removeitem( 22000, 112 )
         pc.removeitem( 22000, 113 )
         pc.removeitem( 22000, 114 )
         pc.removeitem( 22000, 115 )
         pc.removeitem( 22000, 116 )
         pc.removeitem( 22000, 117 )
         pc.removeitem( 22000, 118 )
         pc.removeitem( 22000, 119 )
         pc.removeitem( 22000, 120 )
         pc.removeitem( 22000, 121 )
         pc.removeitem( 22000, 122 )
         pc.removeitem( 22000, 123 )
         pc.removeitem( 22000, 124 )
         pc.removeitem( 22000, 125 )
         pc.removeitem( 22000, 126 )
         pc.removeitem( 22000, 127 )
         pc.removeitem( 22000, 128 )
         pc.removeitem( 22000, 129 )
         pc.removeitem( 22000, 130 )
         pc.removeitem( 22000, 131 )
         pc.removeitem( 22000, 132 )
         pc.removeitem( 22000, 133 )
         pc.removeitem( 22000, 134 )
         pc.removeitem( 22000, 135 )
         pc.removeitem( 22000, 136 )
         pc.removeitem( 22000, 137 )
         pc.removeitem( 22000, 138 )
         pc.removeitem( 22000, 139 )
         pc.removeitem( 22000, 140 )
         pc.removeitem( 22000, 141 )
         pc.removeitem( 22000, 142 )
         pc.removeitem( 22000, 143 )
         pc.removeitem( 22000, 144 )
         pc.removeitem( 22000, 145 )
         pc.removeitem( 22000, 146 )
         pc.removeitem( 22000, 147 )
         pc.removeitem( 22000, 148 )
         pc.removeitem( 22000, 149 )
         pc.removeitem( 22000, 150 )
         pc.removeitem( 22000, 151 )
         pc.removeitem( 22000, 152 )
         pc.removeitem( 22000, 153 )
         pc.removeitem( 22000, 154 )
         pc.removeitem( 22000, 155 )
         pc.removeitem( 22000, 156 )
         pc.removeitem( 22000, 157 )
         pc.removeitem( 22000, 158 )
         pc.removeitem( 22000, 159 )
         pc.removeitem( 22000, 160 )
         pc.removeitem( 22000, 161 )
         pc.removeitem( 22000, 162 )
         pc.removeitem( 22000, 163 )
         pc.removeitem( 22000, 164 )
         pc.removeitem( 22000, 165 )
         pc.removeitem( 22000, 166 )
         pc.removeitem( 22000, 167 )
         pc.removeitem( 22000, 168 )
         pc.removeitem( 22000, 169 )
         pc.removeitem( 22000, 170 )
         pc.removeitem( 22000, 171 )
         pc.removeitem( 22000, 172 )
         pc.removeitem( 22000, 173 )
         pc.removeitem( 22000, 174 )
         pc.removeitem( 22000, 175 )
         pc.removeitem( 22000, 176 )
         pc.removeitem( 22000, 177 )
         pc.removeitem( 22000, 178 )
         pc.removeitem( 22000, 179 )
         pc.removeitem( 22000, 180 )
         pc.removeitem( 22000, 181 )
         pc.removeitem( 22000, 182 )
         pc.removeitem( 22000, 183 )
         pc.removeitem( 22000, 184 )
         pc.removeitem( 22000, 185 )
         pc.removeitem( 22000, 186 )
         pc.removeitem( 22000, 187 )
         pc.removeitem( 22000, 188 )
         pc.removeitem( 22000, 189 )
         pc.removeitem( 22000, 190 )
         pc.removeitem( 22000, 191 )
         pc.removeitem( 22000, 192 )
         pc.removeitem( 22000, 193 )
         pc.removeitem( 22000, 194 )
         pc.removeitem( 22000, 195 )
         pc.removeitem( 22000, 196 )
         pc.removeitem( 22000, 197 )
         pc.removeitem( 22000, 198 )
         pc.removeitem( 22000, 199 )
         pc.removeitem( 22000, 200 )
         pc.removeitem( 22010, 1 )
         pc.removeitem( 22010, 2 )
         pc.removeitem( 22010, 3 )
         pc.removeitem( 22010, 4 )
         pc.removeitem( 22010, 5 )
         pc.removeitem( 22010, 6 )
         pc.removeitem( 22010, 7 )
         pc.removeitem( 22010, 8 )
         pc.removeitem( 22010, 9 )
         pc.removeitem( 22010, 10 )
         pc.removeitem( 22010, 11 )
         pc.removeitem( 22010, 12 )
         pc.removeitem( 22010, 13 )
         pc.removeitem( 22010, 14 )
         pc.removeitem( 22010, 15 )
         pc.removeitem( 22010, 16 )
         pc.removeitem( 22010, 17 )
         pc.removeitem( 22010, 18 )
         pc.removeitem( 22010, 19 )
         pc.removeitem( 22010, 20 )
         pc.removeitem( 22010, 21 )
         pc.removeitem( 22010, 22 )
         pc.removeitem( 22010, 23 )
         pc.removeitem( 22010, 24 )
         pc.removeitem( 22010, 25 )
         pc.removeitem( 22010, 26 )
         pc.removeitem( 22010, 27 )
         pc.removeitem( 22010, 28 )
         pc.removeitem( 22010, 29 )
         pc.removeitem( 22010, 30 )
         pc.removeitem( 22010, 31 )
         pc.removeitem( 22010, 32 )
         pc.removeitem( 22010, 33 )
         pc.removeitem( 22010, 34 )
         pc.removeitem( 22010, 35 )
         pc.removeitem( 22010, 36 )
         pc.removeitem( 22010, 37 )
         pc.removeitem( 22010, 38 )
         pc.removeitem( 22010, 39 )
         pc.removeitem( 22010, 40 )
         pc.removeitem( 22010, 41 )
         pc.removeitem( 22010, 42 )
         pc.removeitem( 22010, 43 )
         pc.removeitem( 22010, 44 )
         pc.removeitem( 22010, 45 )
         pc.removeitem( 22010, 46 )
         pc.removeitem( 22010, 47 )
         pc.removeitem( 22010, 48 )
         pc.removeitem( 22010, 49 )
         pc.removeitem( 22010, 50 )
         pc.removeitem( 22010, 51 )
         pc.removeitem( 22010, 52 )
         pc.removeitem( 22010, 53 )
         pc.removeitem( 22010, 54 )
         pc.removeitem( 22010, 55 )
         pc.removeitem( 22010, 56 )
         pc.removeitem( 22010, 57 )
         pc.removeitem( 22010, 58 )
         pc.removeitem( 22010, 59 )
         pc.removeitem( 22010, 60 )
         pc.removeitem( 22010, 61 )
         pc.removeitem( 22010, 62 )
         pc.removeitem( 22010, 63 )
         pc.removeitem( 22010, 64 )
         pc.removeitem( 22010, 65 )
         pc.removeitem( 22010, 66 )
         pc.removeitem( 22010, 67 )
         pc.removeitem( 22010, 68 )
         pc.removeitem( 22010, 69 )
         pc.removeitem( 22010, 70 )
         pc.removeitem( 22010, 71 )
         pc.removeitem( 22010, 72 )
         pc.removeitem( 22010, 73 )
         pc.removeitem( 22010, 74 )
         pc.removeitem( 22010, 75 )
         pc.removeitem( 22010, 76 )
         pc.removeitem( 22010, 77 )
         pc.removeitem( 22010, 78 )
         pc.removeitem( 22010, 79 )
         pc.removeitem( 22010, 80 )
         pc.removeitem( 22010, 81 )
         pc.removeitem( 22010, 82 )
         pc.removeitem( 22010, 83 )
         pc.removeitem( 22010, 84 )
         pc.removeitem( 22010, 85 )
         pc.removeitem( 22010, 86 )
         pc.removeitem( 22010, 87 )
         pc.removeitem( 22010, 88 )
         pc.removeitem( 22010, 89 )
         pc.removeitem( 22010, 90 )
         pc.removeitem( 22010, 91 )
         pc.removeitem( 22010, 92 )
         pc.removeitem( 22010, 93 )
         pc.removeitem( 22010, 94 )
         pc.removeitem( 22010, 95 )
         pc.removeitem( 22010, 96 )
         pc.removeitem( 22010, 97 )
         pc.removeitem( 22010, 98 )
         pc.removeitem( 22010, 99 )
         pc.removeitem( 22010, 100 )
         pc.removeitem( 22010, 101 )
         pc.removeitem( 22010, 102 )
         pc.removeitem( 22010, 103 )
         pc.removeitem( 22010, 104 )
         pc.removeitem( 22010, 105 )
         pc.removeitem( 22010, 106 )
         pc.removeitem( 22010, 107 )
         pc.removeitem( 22010, 108 )
         pc.removeitem( 22010, 109 )
         pc.removeitem( 22010, 110 )
         pc.removeitem( 22010, 111 )
         pc.removeitem( 22010, 112 )
         pc.removeitem( 22010, 113 )
         pc.removeitem( 22010, 114 )
         pc.removeitem( 22010, 115 )
         pc.removeitem( 22010, 116 )
         pc.removeitem( 22010, 117 )
         pc.removeitem( 22010, 118 )
         pc.removeitem( 22010, 119 )
         pc.removeitem( 22010, 120 )
         pc.removeitem( 22010, 121 )
         pc.removeitem( 22010, 122 )
         pc.removeitem( 22010, 123 )
         pc.removeitem( 22010, 124 )
         pc.removeitem( 22010, 125 )
         pc.removeitem( 22010, 126 )
         pc.removeitem( 22010, 127 )
         pc.removeitem( 22010, 128 )
         pc.removeitem( 22010, 129 )
         pc.removeitem( 22010, 130 )
         pc.removeitem( 22010, 131 )
         pc.removeitem( 22010, 132 )
         pc.removeitem( 22010, 133 )
         pc.removeitem( 22010, 134 )
         pc.removeitem( 22010, 135 )
         pc.removeitem( 22010, 136 )
         pc.removeitem( 22010, 137 )
         pc.removeitem( 22010, 138 )
         pc.removeitem( 22010, 139 )
         pc.removeitem( 22010, 140 )
         pc.removeitem( 22010, 141 )
         pc.removeitem( 22010, 142 )
         pc.removeitem( 22010, 143 )
         pc.removeitem( 22010, 144 )
         pc.removeitem( 22010, 145 )
         pc.removeitem( 22010, 146 )
         pc.removeitem( 22010, 147 )
         pc.removeitem( 22010, 148 )
         pc.removeitem( 22010, 149 )
         pc.removeitem( 22010, 150 )
         pc.removeitem( 22010, 151 )
         pc.removeitem( 22010, 152 )
         pc.removeitem( 22010, 153 )
         pc.removeitem( 22010, 154 )
         pc.removeitem( 22010, 155 )
         pc.removeitem( 22010, 156 )
         pc.removeitem( 22010, 157 )
         pc.removeitem( 22010, 158 )
         pc.removeitem( 22010, 159 )
         pc.removeitem( 22010, 160 )
         pc.removeitem( 22010, 161 )
         pc.removeitem( 22010, 162 )
         pc.removeitem( 22010, 163 )
         pc.removeitem( 22010, 164 )
         pc.removeitem( 22010, 165 )
         pc.removeitem( 22010, 166 )
         pc.removeitem( 22010, 167 )
         pc.removeitem( 22010, 168 )
         pc.removeitem( 22010, 169 )
         pc.removeitem( 22010, 170 )
         pc.removeitem( 22010, 171 )
         pc.removeitem( 22010, 172 )
         pc.removeitem( 22010, 173 )
         pc.removeitem( 22010, 174 )
         pc.removeitem( 22010, 175 )
         pc.removeitem( 22010, 176 )
         pc.removeitem( 22010, 177 )
         pc.removeitem( 22010, 178 )
         pc.removeitem( 22010, 179 )
         pc.removeitem( 22010, 180 )
         pc.removeitem( 22010, 181 )
         pc.removeitem( 22010, 182 )
         pc.removeitem( 22010, 183 )
         pc.removeitem( 22010, 184 )
         pc.removeitem( 22010, 185 )
         pc.removeitem( 22010, 186 )
         pc.removeitem( 22010, 187 )
         pc.removeitem( 22010, 188 )
         pc.removeitem( 22010, 189 )
         pc.removeitem( 22010, 190 )
         pc.removeitem( 22010, 191 )
         pc.removeitem( 22010, 192 )
         pc.removeitem( 22010, 193 )
         pc.removeitem( 22010, 194 )
         pc.removeitem( 22010, 195 )
         pc.removeitem( 22010, 196 )
         pc.removeitem( 22010, 197 )
         pc.removeitem( 22010, 198 )
         pc.removeitem( 22010, 199 )
         pc.removeitem( 22010, 200 )
      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 .