[WotusPower]

pawn Код:

#include <a_samp>

#if defined FILTERSCRIPT
#endif
public OnFilterScriptInit()
{
    print("\n--------------------------------------");
    print(" Blank Filterscript by your name here");
    print("--------------------------------------\n");
    return 1;
}
#define MAX_CLANS 100

#define PASTA_CLANS         "/Clans/%s.ini"

dini_IntSet(file,"TClan",0);
dini_IntSet(file,"Clan", 0);

new memb[MAX_CLANS];

if(strcmp(cmd,"/criarclan",true)==0){
new aname[MAX_PLAYER_NAME];
GetPlayerName(playerid, aname, MAX_PLAYER_NAME);
format(file, sizeof(file), PASTA_CONTAS, aname);
new tmp[256];
strmid(tmp,cmdtext,11,strlen(cmdtext));
if(!strlen(tmp)) {
SendClientMessage(playerid,COLOR_RED,"|INFO| Use: /criarclan [nome]");
return 1;
}
if(dini_Int(file, "TClan") == 1){
SendClientMessage(playerid,Vermelho,"|ERRO| Vocк ja faz parte de um clan.");
return 1;
}
if(GetPlayerGrana(playerid) <= 100000){
SendClientMessage(playerid,Vermelho,"|ERRO| Vocк nгo tem R$100.000.");
return 1;
}
if(strlen(tmp) < 3 || strlen(tmp) > 10){
SendClientMessage(playerid,Vermelho,"|ERRO| Nome do clan deve ter 3 a 10 letras.");
return 1;
}
for(new a=0;a<MAX_CLANS;a++){
format(string, sizeof(string), "/Clans/clan%d.ini", a);
if(dini_Exists(string)){
if(strcmp(tmp, dini_Get(string, "Nome"),true) == 0 && dini_Int(string, "Existe") == 1){
SendClientMessage(playerid,Vermelho,"|ERRO| O nome do clan ja existe.");
return 1;
}
}
}
for(new a=0;a<MAX_CLANS;a++){
format(string, sizeof(string), "/Clans/clan%d.ini", a);
if(!dini_Exists(string) || dini_Int(string, "Existe") == 0){
if(!dini_Exists(string)){
dini_Create(string);
}
GivePlayerGrana(playerid, -100000);
dini_IntSet(file, "TClan", 1);
dini_IntSet(file, "Clan", a);
dini_IntSet(string, "Existe", 1);
dini_Set(string, "Nome", tmp);
dini_IntSet(string, "TMembro1", 1);
dini_Set(string, "Membro1", aname);
dini_IntSet(string, "TMembro2", 0);
dini_Set(string, "Membro2", "Convidar");
dini_IntSet(string, "TMembro3", 0);
dini_Set(string, "Membro3", "Convidar");
dini_IntSet(string, "TMembro4", 0);
dini_Set(string, "Membro4", "Convidar");
dini_IntSet(string, "TMembro5", 0);
dini_Set(string, "Membro5", "Convidar");
dini_IntSet(string, "TMembro6", 0);
dini_Set(string, "Membro6", "Convidar");
dini_IntSet(string, "TMembro7", 0);
dini_Set(string, "Membro7", "Convidar");
dini_IntSet(string, "TMembro8", 0);
dini_Set(string, "Membro8", "Convidar");
dini_IntSet(string, "TMembro9", 0);
dini_Set(string, "Membro9", "Convidar");
dini_IntSet(string, "TMembro10", 0);
dini_Set(string, "Membro10", "Convidar");
SendClientMessage(playerid,Verde,"|INFO| Vocк criou um clan!");
return 1;
}
}
return 1;
}

if(strcmp(cmdtext, "/meuclan", true) == 0) {
new pname[MAX_PLAYER_NAME];
GetPlayerName(playerid, pname, MAX_PLAYER_NAME);
format(file, sizeof(file), PASTA_CONTAS, pname);
format(string, sizeof(string), "/Clans/clan%d.ini", dini_Int(file, "Clan"));
new string2[256];
if(dini_Int(file, "TClan") == 1){
format(string2, sizeof(string2), "Meu Clan");
if(strcmp(dini_Get(string, "Membro1"), pname, true) == 0){
ShowPlayerDialog(playerid, 6741, DIALOG_STYLE_LIST, string2, "Convidar ou Expulsar membro\nDesfazer clan", "OK", "Cancelar");
} else {
ShowPlayerDialog(playerid, 6742, DIALOG_STYLE_LIST, string2, "Sair do clan\nVer membros", "OK", "Cancelar");
}
} else  SendClientMessage(playerid, 0xFF0000FF, "** Vocк nгo faz parte de um clan.");
return 1;
}

tenta ae