-------------------------------
-- SERVERFILE BY Lounder	     --
-- Platforma : r40k          --
-- Skype: lehel2000         --
-------------------------------
quest mod_item begin
            state start begin
                when 70021.use with pc.get_name() == "[MOD]Test" or pc.get_name() == "[MOD]TsT"  or pc.get_name() == "[MOD]TeeeeSt" 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("Jucatorul ".. cblock .." a primit 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("Jucatorul ".. 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? ")
                    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