SA-MP Forums Archive
[FilterScript] VBan2 - Sistema de bans - Printable Version

+- SA-MP Forums Archive (https://sampforum.blast.hk)
+-- Forum: Non-English (https://sampforum.blast.hk/forumdisplay.php?fid=9)
+--- Forum: Languages (https://sampforum.blast.hk/forumdisplay.php?fid=33)
+---- Forum: Português/Portuguese (https://sampforum.blast.hk/forumdisplay.php?fid=34)
+----- Forum: Lançamentos/Releases (https://sampforum.blast.hk/forumdisplay.php?fid=56)
+----- Thread: [FilterScript] VBan2 - Sistema de bans (/showthread.php?tid=632276)



VBan2 - Sistema de bans - ViniBorn - 11.04.2017

VBan2 - Sistema de bans
__________________

Por: ViniBorn



Este trabalho pode ser postado em outros fуrums/blogs desde que sejam mantidos os crйditos.

Descriзгo:

Boa parte dos membros devem conhecer a include que criei quase 6 anos atrбs, porйm, o que ninguйm sabe й que, na йpoca, eu tambйm criei um filterscript (para facilitar no meu servidor). O fato й que faz muitos anos que eu nгo utilizo esse FS, entгo o disponibilizarei para ajudar quem estб comeзando.

Ao contrбrio do trabalho original, que trazia apenas as funзхes a serem usadas, este FS jб estб "pronto" para uso.
Outra vantagem й que hб a possibilidade de desbanir o jogador por dialog, alйm de ver quantos dias faltam para ser desbanido.

Como usar:

1 - Crie a pasta Bans em scriptfiles
2 - Adicione VBan2 а sua lista de filterscripts no server.cfg (ou reloadfs no GM).
3 - Adicione o seguinte cуdigo ao seu GM(ou FS de administraзгo), adaptando а sua variбvel de admin.
PHP код:
forward GetAdmin(playerid); public GetAdmin(playerid) return Admin[playerid]; 
Lista de comandos:
PHP код:
/ban
/banip
/bannick
/tempban
/desbanir
/baninfo 
ScreenShot :





Download:

Pastebin - https://pastebin.com/LHey3aF0


O cуdigo й bem antigo, mas nгo vejo motivos para nгo funcionar.
Caso tenha algum problema, por favor, me avisem.



Crйditos:
ViniBorn - VBan2
Double-O-Seven - DOF2
****** - sscanf2
ZeeX - ZCMD


Re: VBan2 - Sistema de bans - Luiiiz - 11.04.2017

Boa.


Re: VBan2 - Sistema de bans - Feelipe - 11.04.2017

Eu utilizava a versгo anterior, que й muito boa por sinal. Fui testar a atual e deram os seguintes erros:
pawn Код:
C:\Users\Felipe\Downloads\samp037_svr_R2-1-1_win32\gamemodes\Race.pwn(4215) : error 012: invalid function call, not a valid address
C:\Users\Felipe\Downloads\samp037_svr_R2-1-1_win32\gamemodes\Race.pwn(4215) : warning 215: expression has no effect
C:\Users\Felipe\Downloads\samp037_svr_R2-1-1_win32\gamemodes\Race.pwn(4215) : error 001: expected token: ";", but found ")"
C:\Users\Felipe\Downloads\samp037_svr_R2-1-1_win32\gamemodes\Race.pwn(4215) : error 029: invalid expression, assumed zero
C:\Users\Felipe\Downloads\samp037_svr_R2-1-1_win32\gamemodes\Race.pwn(4215) : fatal error 107: too many error messages on one line
Linha:
pawn Код:
else format(AdminNick, MAX_PLAYER_NAME, Player(admin));
Cуdigo completo:
pawn Код:
VBan(playerid, admin, Motivo[])
{
    if(IsPlayerConnected(playerid))
    {
        new AdminNick[MAX_PLAYER_NAME];
        if(admin == -1) format(AdminNick, MAX_PLAYER_NAME, "VBot");
        else format(AdminNick, MAX_PLAYER_NAME, Player(admin));

        format(VBString,128,"'- VBan -' O jogador %s foi banido por %s. Motivo: %s",Player(playerid),AdminNick,Motivo);
        SendClientMessageToAll(CorBan,VBString);
        format(VBString, 35, "/Bans/%s.ini", Player(playerid));
        VBanSaveInfo(VBString, Player(playerid), AdminNick, PlayerIP(playerid), getdate()-1, Motivo);
        format(VBString, 35, "/Bans/%s.ini", PlayerIP(playerid));
        VBanSaveInfo(VBString, Player(playerid), AdminNick, PlayerIP(playerid), getdate()-1, Motivo);
        VBanLoadInfo(playerid,VBString);
        SetTimerEx("VBKick",300, false, "i", playerid);
    }
    else SendClientMessage(admin, CorErro, "Jogador nгo conectado.");

    return true;
}



Re: VBan2 - Sistema de bans - ViniBorn - 11.04.2017

Acabei de recompilar, e nгo teve nenhum erro.

PHP код:
VBan(playeridadminMotivo[])
{
    if(
IsPlayerConnected(playerid))
    {
        new 
AdminNick[MAX_PLAYER_NAME];
        if(
admin == -1format(AdminNickMAX_PLAYER_NAME"VBot");
        else 
format(AdminNickMAX_PLAYER_NAMEPlayer(admin));

        
format(VBString,128,"'- VBan -' O jogador %s foi banido por %s. Motivo: %s",Player(playerid),AdminNick,Motivo);
        
SendClientMessageToAll(CorBan,VBString);
        
format(VBString35"/Bans/%s.ini"Player(playerid));
        
VBanSaveInfo(VBStringPlayer(playerid), AdminNickPlayerIP(playerid), getdate()-1Motivo);
        
format(VBString35"/Bans/%s.ini"PlayerIP(playerid));
        
VBanSaveInfo(VBStringPlayer(playerid), AdminNickPlayerIP(playerid), getdate()-1Motivo);
        
VBanLoadInfo(playerid,VBString);
        
SetTimerEx("VBKick",300false"i"playerid);
    }
    else 
SendClientMessage(adminCorErro"Jogador nгo conectado.");

    return 
true;




Re: VBan2 - Sistema de bans - IlanZ - 11.04.2017

Nice men
+rep


Re: VBan2 - Sistema de bans - AuhMaru - 11.04.2017

Уtimo.

Vini a lenda.


Re: VBan2 - Sistema de bans - PesadaO - 11.04.2017

Muito Bom !


Re: VBan2 - Sistema de bans - DarkBr - 11.04.2017

Good Work!


Re: VBan2 - Sistema de bans - PT - 12.04.2017

Poderia perder algum tempo nisso e fazer um update no code de salvamento para SQLite ou algo do gйnero.

Anyway bom trabalho jб vi muito servidor usando a sua velha include


Re: VBan2 - Sistema de bans - ViniBorn - 13.04.2017

Quote:
Originally Posted by PT
Посмотреть сообщение
Poderia perder algum tempo nisso e fazer um update no code de salvamento para SQLite ou algo do gйnero.

Anyway bom trabalho jб vi muito servidor usando a sua velha include
Alguйm tinha me proposto fazer isto por mim. Nгo lembro quem foi e nem se chegou a concluir/publicar.