4metin2ro.MyForum.ro :: Panou `Ban in Joc`.

4metin2ro.MyForum.ro
Fa-ti si tu propriul forum, pe www.myforum.ro!

FAQ

Cautare

Membri

Grupuri

Inregistrare

Profil

Mesaje private

Autentificare

Panou `Ban in Joc`.

Pagina de start a forumului 4metin2ro.MyForum.ro -> Tutoriale metin2

Subiectul anterior :: Subiectul urmator

Autor

Mesaj

shobo12
Administrator

Data inscrierii: 01/Dec/2012
Mesaje: 4

Trimis: 01/12/2012 08:56 Titlul subiectului: Panou `Ban in Joc`.

Salut, vreau sa va arat o noua modalitate de-a bloca contul unui utilizator, din joc.
Tot ce trebuie sa faceti, e sa implementati acest quest :

Cod:

quest neoban begin
-- Necesita ce-a mai noua varianta de quest lib.
state start begin
when (aici punet codul itemului).use with pc.is_gm() begin
say("Ce vrei sa faci?")
local s = select('Blocheaza.','Deblocheaza.',"Nimic.")
if s == 3 then return end
local ban,bantxt,bantxt2 = "BLOCK","bannen","gebannt"
if s == 2 then
ban,bantxt,bantxt2 = "OK","entbannen","entbannt"
end
say(col.blue('Jucator. '..bantxt)); say('[ENTER]Introduceti numele jucatorului.[ENTER](Sau doar o parte.)')
local inp = input(); inp = mysql_escape(inp)
if inp == "" or inp == pc.get_name() then
say(col.red('Intrare invalida.[ENTER]intoarcere!'))
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('Eroare la introducerea datelor, sau nu exista jucatori cu acest nume.'))
return
end
say('Selectati utilizatorul care '..bantxt2..' este :')
local wahl = q.name; table.insert(wahl,"-intoarcere-")
table.insert(wahl,1,6) -- 6 este nr mare de utilizatori pe o pagina.
local auswahl = select2(wahl)
if wahl[auswahl] == "-intoarcere-" then return end
say('Jucatorul \\"'..q.name[auswahl]..'\\" intr-adevar '..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('Jucatorul a fost banat.')
end
end
end

Sus

Afiseaza mesajele pentru a le previzualiza:

	Pagina de start a forumului 4metin2ro.MyForum.ro -> Tutoriale metin2	Ora este GMT + 2 ore
Pagina 1 din 1

Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum