[Quest]Panou GM

Închis
Avatar utilizator
C.Mihai
Nivel 9

Nivel 9
Mesaje: 1875
Membru din: 26 Mai 2014, 13:57
Server: xGamer
Regat: Chunjo
Aprecieri: 24  
Mulţumiri: 7  
 Contact:
Medalii

Salutare dragă comunitate !
M-am gândit că ar fi nevoie la un server un mic GameMaster Pannel :) Ce face ? : Dă Ban și MUTE !

Cod: Selectaţi tot

   quest ingamebann begin 
    state start begin 
        when ITEM_ID.use with pc.is_gm() begin 
            say("Ce doresti sa faci?") 
            local s = select('Baneaza','Debaneaza',"Nimic") 
            if s == 3 then return end 
            local ban,bantxt,bantxt2 = "BLOCK","baneaza","banat" 
            if s == 2 then 
                ban,bantxt,bantxt2 = "OK","debaneaza","debanat" 
            end 
            say(col.blue('Jucator '..bantxt)); say('[ENTER]Introdu numele jucatorului[ENTER](chiar si o parte din nume este de ajuns)') 
            local inp = input(); inp = mysql_escape(inp) 
            if inp == "" or inp == pc.get_name() then 
                say(col.red('Numele nu exista.[ENTER]Inchide!')) 
                return 
            end 
            local q = mysql_query('select * from player.player WHERE name LIKE \\"%'..inp..'%\\" AND name NOT like \\"%[%\\"') 
            if q == "ERROR" then 
                say(col.red('Tabelul player nu poate fi citit sau numele nu exista.')) 
                return 
            end 
            say('Alege numele jucatorului care, sa fie '..bantxt2..' :') 
            local wahl = q.name; table.insert(wahl,"-Inapoi-") 
            table.insert(wahl,1,6)      -- 6 limita jucatorilor pe o pagina ^-^
            local auswahl = select2(wahl) 
            if wahl[auswahl] == "-Inapoi-" then return end 
            say('Esti sigur ca jucatorul  \\"'..q.name[auswahl]..'\\" sa fie '..bantxt..'?') 
            if select("Da","Nu") == 2 then return end 
			mysql_query('UPDATE account.account SET status = \\"'..ban..'\\" WHERE id = '..q.account_id[auswahl]..' LIMIT 1') 
            say('Operatiune absolvita cu succes.') 
        end 
    end 
end

quest mut begin 
    state start begin 
        when ITEM_ID.use with pc.is_gm() begin
			say_title("Mut")
				say("De aici poti da mute unui jucator sa i-l poti ridica!")
				say("")
			local a = select ( "Da mut" , "Ridica mut" ,  "Inapoi" )                
            if a == 1 then
				say("Introdu numele jucatorului care sa primeasca mute")
				say("Asigurate ca numele este corect!")
			local cblock = input()
				say("Este acesta numele corect?")
				say(" Nume : ".. cblock .." ")
            local m = select ( "Da", "Nu")
            if m == 1 then
				say("Timp in secunde!")
				say("Exemplu :")
				say("5 Min = 300")
				say("10 Min = 600")
				say("1 ora = 3600")
				say("Introdu cate secunde doresti:")
			local cbtime = input()
			command("block_chat ".. cblock .." ".. cbtime .."")
				notice_all("Jucatorul ".. cblock .." are mut pentru ".. cbtime .." secunde!")
			end
            if m == 2 then
            return
            end
		end
			if a == 2 then
				say("Introdu numele jucatorului carui sa ii fie ridicat mute.")
				say("Poti vedea lista jucatorilor cu mut folosind comanda")
				say("asta block_chat_list ")
			local cublock = input()
			command("block_chat ".. cublock .." 0")
			notice_all("Jucatorul ".. cublock .." Poate vorbi din nou")
			end
		end
	end
end   
P.S ! Nu este TESTAT !
Nu iti poti trai viata pentru altii. Trebuie sa faci ceea ce e bine pentru tine, chiar daca astfel ii ranesti pe cei pe care ii iubesti. – Nicholas Sparks
Imagine
Cea mai bună firmă de HOSTING !
Afișează semnătura
Avatar utilizator
Hasurat GaminG
Nivel 3

Nivel 3
Mesaje: 452
Membru din: 05 Mai 2015, 16:11
Server: metin2niagara.tk
Regat: Jinno
Aprecieri: 0
Mulţumiri: 7  
Medalii

Mai e postat odata. Da un search inainte sa postezi ;)
Imagine
De ce te uiti???
Afișează semnătura
Avatar utilizator
cata2121
Nou Venit

Nou Venit
Mesaje: 9
Membru din: 24 Dec 2013, 10:46
Server: Mt2 Ro
Regat: Jinno
Aprecieri: 0
Mulţumiri: 0
Medalii

Nu merge.
Avatar utilizator
C.Mihai
Nivel 9

Nivel 9
Mesaje: 1875
Membru din: 26 Mai 2014, 13:57
Server: xGamer
Regat: Chunjo
Aprecieri: 24  
Mulţumiri: 7  
 Contact:
Medalii

rockstargames scrie:Mai e postat odata. Da un search inainte sa postezi ;)
să văd topic :)
Nu iti poti trai viata pentru altii. Trebuie sa faci ceea ce e bine pentru tine, chiar daca astfel ii ranesti pe cei pe care ii iubesti. – Nicholas Sparks
Imagine
Cea mai bună firmă de HOSTING !
Afișează semnătura
Avatar utilizator
dragoialex2014
Nivel 4

Nivel 4
Mesaje: 629
Membru din: 09 Oct 2014, 14:49
Server: Metin2Assasin
Regat: Jinno
Aprecieri: 1  
Mulţumiri: 4  
 Contact:
Medalii

Athos G scrie:
rockstargames scrie:Mai e postat odata. Da un search inainte sa postezi ;)
să văd topic :)
Poftim http://just4metin.ro/quest-uri/baneaza- ... 34427.html
Imagine
Afișează semnătura
Avatar utilizator
ionel17
Nivel 1

Nivel 1
Mesaje: 105
Membru din: 28 Dec 2013, 12:13
Server: Lucrez la el [JUP-M]
Regat: Jinno
Aprecieri: 0
Mulţumiri: 26  
Medalii

nu este bun questul facut
[*][**][*][Imagine][*] [**] [*] [/color]

******************************************************************

Imagine
Afișează semnătura
Avatar utilizator
Wyzz.
Nivel 1

Nivel 1
Mesaje: 83
Membru din: 22 Feb 2015, 15:34
Server: www.nu'i-deschis.ro
Regat: Jinno
Aprecieri: 8  
Mulţumiri: 1  
 Contact:
Medalii

bun ms
Respecta, pentru a primi respect la randul tau!
Odata si pentru totdeauna [Owner] la Va urma!
Afișează semnătura
Avatar utilizator
Ankhed
Fost Super Ad Moderator

Fost Super Ad Moderator
Mesaje: 2130
Membru din: 22 Noi 2015, 13:00
Aprecieri: 42  
Mulţumiri: 45  
 Contact:
Medalii

Mai este postat, cos

[ Postat de pe iPhone ] Imagine
Imagine
Afișează semnătura
Închis
Răspunsuri
9
Vizualizări
4683
Răspunsuri
2
Vizualizări
1346
Răspunsuri
0
Vizualizări
855
Răspunsuri
2
Vizualizări
3389

Înapoi la “Arhivă”

  • Informaţie
  • Cine este conectat

    Utilizatori ce ce navighează pe acest forum: Niciun utilizator înregistrat și 9 vizitatori