[Include] TBan - Simples mas eu acho que ъtil ;)

[Include] TBan - Simples mas eu acho que ъtil ;) - 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: [Include] TBan - Simples mas eu acho que ъtil ;) (/showthread.php?tid=380803)

TBan - Simples mas eu acho que ъtil ;) - tonisantolia - 27.09.2012

Primeiramente, eu peзo desculpas a todos do fуrum se esta include for um codigo ъtil e nem seja uma include..
Mas ela funciona perfeitamente. Agora vamos ao o que interessa

•Funзгo

Esta include tem duas funзхes:
→BanIP(id)
→BanNick(id)
Como o prуprio nome das funзхes jб diz, ela serve para banir tanto por IP como por Nick.

•Modo de usar

O uso dela й muito simples e fбcil.
1Є- Crie uma pasta na sua scriptfiles chamada TBan e duas sub-pastas IP e Nick.
2Є- Veja um script de exemplo do modo de uso:

pawn Код:

#include <a_samp>
#include <zcmd>
#include <sscanf>
#include <TBan>

main(){}

public OnPlayerConnect(playerid){
    CheckBan(playerid);
    return 1;
}

CMD:banip(playerid,params[])
{
    new id;
    if(sscanf(params,"u",id)) return SendClientMessage(playerid, -1, "Use: /banip (id)");
    BanIP(id);
    return 1;
}

CMD:bannick(playerid,params[])
{
    new id;
    if(sscanf(params,"u",id)) return SendClientMessage(playerid, -1, "Use: /bannick (id)");
    BanNick(id);
    return 1;
}

•Bugs

Se alguma funзгo nгo funcionar por favor me contactar via PM para eu corrigir imediatamente.

•Download

4Shared - http://www.4shared.com/file/SC0ADk6j/TBan.html?
Forum SA-MP:

Код:

#include <a_samp>
#include <dof2>

stock CheckBan(playerid){
	new file[70],file2[70],snd[MAX_PLAYER_NAME],up[70];
	GetPlayerIp(playerid,up,sizeof(up));
	GetPlayerName(playerid,snd,sizeof(snd));
	format(file,sizeof(file),"TBanidos/IP/%s.cfg",up);
	format(file2,sizeof(file2),"TBanidos/Nick/%s.cfg",snd);
	if(DOF2_FileExists(file) || DOF2_FileExists(file2)){ Kick(playerid); }
	return 1;
}

stock BanIP(id){
	new up[70],file[70];
	GetPlayerIp(id,up,sizeof(up));
	format(file,sizeof(file),"TBanidos/IP/%s.cfg",up);
	DOF2_CreateFile(file);
	return 1;
}

stock BanNick(id){
	new snd[MAX_PLAYER_NAME],file[70];
	GetPlayerName(id,snd,sizeof(snd));
	format(file,sizeof(file),"TBanidos/Nick/%s.cfg",snd);
	DOF2_CreateFile(file);
	return 1;
}

•Observaзгo

Por favor, nгo xingar, trollar ou fazer do tуpico um chat pois minha intenзгo foi das melhores, peзo novamente desculpas se for um cуdigo ъtil.

Re: TBan - Simples mas eu acho que ъtil ;) - Rhayziin - 27.09.2012

Legal cara ^^

Re: TBan - Simples mas eu acho que ъtil ;) - tonisantolia - 27.09.2012

Quote:

Originally Posted by Rhayziin

Legal cara ^^

Vlw^^

Re: TBan - Simples mas eu acho que ъtil ;) - Delete_ - 27.09.2012

Bem legal, na proxima versгo poe pra verificar se o player estб com o nick banido ao conectar.

Re: TBan - Simples mas eu acho que ъtil ;) - jpeg - 27.09.2012

sim, pd ser util, bom!

Re: TBan - Simples mas eu acho que ъtil ;) - Crueliz0n - 27.09.2012

muito bom, mas qualquer um sabe que reiniciando o modem o ip muda quebrando o IP ban

Re: TBan - Simples mas eu acho que ъtil ;) - rjjj - 27.09.2012

Dб-lo-ei algumas dicas

.

Para que seu cуdigo nгo requeira a include DOF2, pode-se usar a funзгo padrгo fexist no lugar de DOF2_FileExists.

O DOF2_CreateFile pode ser substituнdo atravйs deste algoritmo

pawn Код:

fclose(fopen("Novo.txt", io_write));

Isso geraria um arquivo de nome Novo.txt na pasta scriptfiles.

Espero ter ajudado

Re: TBan - Simples mas eu acho que ъtil ;) - tonisantolia - 27.09.2012

Quote:

Originally Posted by rjjj

Dб-lo-ei algumas dicas

.

Para que seu cуdigo nгo requeira a include DOF2, pode-se usar a funзгo padrгo fexist no lugar de DOF2_FileExists.

O DOF2_CreateFile pode ser substituнdo atravйs deste algoritmo

pawn Код:

fclose(fopen("Novo.txt", io_write));

Isso geraria um arquivo de nome Novo.txt na pasta scriptfiles.

Espero ter ajudado

Na proxima versгo irei colocar como um arquivo unico

Re: TBan - Simples mas eu acho que ъtil ;) - @FatalFormat - 27.09.2012

Simples, mas ъtil.

Parabйns!

Re: TBan - Simples mas eu acho que ъtil ;) - tonisantolia - 27.09.2012

Quote:

Originally Posted by @FatalFormat

Simples, mas ъtil.

Parabйns!

Obrigado parceiro