quest mod_item begin
        state start begin
            when 70021.use with pc.is_gm() or pc.get_gm_level() >= 2 begin
                   
                say_title ("Buna, ".. pc.get_name() ..".")
                say("")
                            say("Itemul Moderatorului poate : sa dea mute, ")
                            say("- Sa dea mute, ")
                            say("- Sa scoata mute-ul")
                            say("- Sa te teleporteze pe tine sau un player la tine. ")
                say("")
                            local a = select ( "Da Mute la un player" , "Scoate mute-ul la un player" , "Teleporteaza-te", "Transfera un Player", "Iesire" )
                           
                if a == 1 then
                            say("Te rog sa scrii numele celui caruia vrei sa ii dai mute.")
                            say("")
                            say("Atentie! Daca abuezi de acest item ,poti fi scos din functie!")
                say("Fi sigur ca scrii numele jucatorului corect!")
                            local cblock = input()
                say("Acesta e numele playerului caruia doresti sa ii dai mute???")
                say_title(" Name : ".. cblock .." ")
                local m = select ( "Da", "Nu")
                if m == 1 then
                            say("Timp in secunde!")
                            say("Exemple :")
                            say("5 Min. = 300s")
                            say("10 Min. = 600s")
                            say("1 Ora = 3600s")
                        say("Scrie numarul de secunde dorite!")
                        local cbtime = input()
                        command("block_chat ".. cblock .." ".. cbtime .."")
                            notice_all("Player-ul ".. cblock .." i s-a dat mute pentru ".. cbtime .." secunde!")
                           notice_all("Aveti grija la limbaj si la comportament!")
                end
                if m == 2 then
                return
                end
                            end
                           
                        if a == 2 then
                           say("Scrie numele playerului caruia doresti sa ii scoti mute-ul.")
                   say("Poti sa il verifici in lista celor ce au mute.")
                   say("cu aceasta comanda : block_chat_list ")
                           local cublock = input()
                           command("block_chat ".. cublock .." 0")
                           notice_all("Playerul ".. cublock .." poate iarasi sa vorbeasca!")
                 notice_all("Mute-ul i-a fost scos!")
                 notice_all("Sa nu se mai repete greseala facuta!")
                           end
                           
                   if a == 3 then
                   say("Te poti teleporta langa playerii care doresti tu.")
                   say("Scrie numele player-ului langa care doresti sa te teleportezi.")
                   say("Atentie! Cateodata, poti fi teleportat putin mai departe de acesta.")
              say("Asa ca te rog sa mai folosesti odata aceasta optiune daca intampini erori")
                local t = select ("Teleporteaza-ma!", "Nu, merci!")
                if t == 1 then
                say("Scrie numele playerului :")
                local wtp = input()
                command("warp ".. wtp .."")
                end
                if t == 2 then
                return
                    end   
                   end
           
                   if a == 4 then
                   say("Poti sa transferi playerii langa tine acum.")
                   say("Trebuie doar sa introduci numele playerului aici :)")
                   say("Vrei sa aduci un player langa tine? :D")
                local r = select ("Transfera!", "Nu, merci!")
                if r == 1 then
                say("Scrie numele playerului aici :")
                local ttp = input()
                command("transfer ".. ttp .." ")
                end
                if r == 2 then
                return
                end               
                    end

                   if a == 5 then
                   return
                   end

    end
    end
    end

COD PANOU 70021

 

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 .