Sistema de Famílias

/*
    Sistema de Família - RPG by hannzika
*/

#include a_samp
#include ZCMD
#include DOF2


#define corChat            (0x3EBECFFF)
#define corCinza           (0xA0A0A0FF)


forward checkNick(str1, str2[]);

enum pInfo {
    pAdmin,
    pPermissaoChat
};

new PlayerInfo[MAX_PLAYERS][pInfo];


public checkNick(str1, str2[]) {
    for (new x; x < strlen(str2); x++) {
        if (str1 == str2[x])
            return x;
    }
    return -1;
}

stock getNome(playerid) {
    new NAME[21];
    GetPlayerName(playerid, NAME, MAX_PLAYER_NAME);
    return NAME;
}

public OnFilterScriptInit() {
    print("\n--------------------------------------");
    print(" Sistema de Família - RPG by hannzika");
    print("--------------------------------------\n");
    return true;
}

public OnFilterScriptExit() {
    DOF2::Exit();
    return true;
}

COMMAND:getadmin(playerid)
    return PlayerInfo[playerid][pAdmin] = 1;


COMMAND:criarfamilia(playerid, params[]) {
    if(PlayerInfo[playerid][pAdmin] < 1)
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Você não tem autorização para usar este comando!");

    if(isnull(params))
        return SendClientMessage(playerid, corCinza, "[ USE ]: /criarfamilia [Nome]");

    new str[64];
    format(str, 64, "Familias/%s.ini", params);
    if(DOF2::FileExists(str))
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Já existe uma família com este nome!");

    new msg[40];
    format(msg, 40, "Você criou a família %s", params);
    SendClientMessage(playerid, corChat, msg);
    DOF2::CreateFile(str);
    DOF2::SaveFile();
    return true;
}


COMMAND:fpermissao(playerid, params[]) {
    if(isnull(params))
        return SendClientMessage(playerid, corCinza, "[ USE ]: /fpermissao [ID]");

    if(PlayerInfo[playerid][pPermissaoChat] == 0 || PlayerInfo[playerid][pAdmin] < 1)
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Você não tem permissão para usar este comando!");

    if(PlayerInfo[strval(params)][pPermissaoChat] != 0)
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Este id já possuí permissão!");

    new file[64], family[21], index = checkNick('_', getNome(playerid));
    strmid(family, getNome(playerid), index + 1, MAX_PLAYER_NAME);

    format(file, 64, "Familias/%s.ini", family);
    if(!DOF2::FileExists(file))
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Você não tem família ou ela não existe no servidor!");

    new _family[18];
    new _index = checkNick('_', getNome(strval(params)));
    strmid(_family, getNome(strval(params)), _index + 1, MAX_PLAYER_NAME);

    if (strcmp(_family, family))
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Este player não tem o sobrenome igual a você!");


    new msg[128];
    format(msg, 100, "Você autorizou %s a usar o nick da família %s", getNome(strval(params)), family);
    SendClientMessage(playerid, corChat, msg);

    format(msg, 100, "%s autorizou você a usar o nick da família %s", getNome(playerid), family);
    SendClientMessage(playerid, corChat, msg);
    PlayerInfo[strval(params)][pPermissaoChat] = 1;
    return true;
}


COMMAND:fon(playerid) {
    new str[128], file[64], family[21], index = checkNick('_', getNome(playerid));
    strmid(family, getNome(playerid), index + 1, MAX_PLAYER_NAME);

    format(file, 64, "Familias/%s.ini", family);
    if(!DOF2::FileExists(file))
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Você não tem família ou ela não existe no servidor!");

    format(str, 128, "Membros Online da %s", family);
    SendClientMessage(playerid, corCinza, str);
    for(new x = 0; x < GetPlayerPoolSize(); x++) {
        format(str, 128, "%s (%i)", getNome(x), x);
        new _family[18];
        new _index = checkNick('_', getNome(x));
        strmid(_family, getNome(x), _index + 1, MAX_PLAYER_NAME);
        if (!strcmp(_family, family)) {
            SendClientMessage(playerid, corChat, str);
        }
    }
    return true;
}


COMMAND:ajudafamilia(playerid) {
    new file[64], family[21], index = checkNick('_', getNome(playerid));
    strmid(family, getNome(playerid), index + 1, MAX_PLAYER_NAME);

    format(file, 64, "Familias/%s.ini", family);
    if(!DOF2::FileExists(file))
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Você não possuí família ativa no servidor!");

    SendClientMessage(playerid, corCinza, "{F43636}/f - {FFFFFF}Use para utilizar o chat privado da família.");
    SendClientMessage(playerid, corCinza, "{F43636}/fon - {FFFFFF}Use este comando para ver os players da família online.");
    SendClientMessage(playerid, corCinza, "{F43636}/fpermissao - {FFFFFF}Use este comando para permitir um player utilizar o sistema da família.");
    return true;
}


COMMAND:f(playerid, params[]) {
    if(PlayerInfo[playerid][pPermissaoChat] == 0)
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Você não tem permissão para usar este chat!");

    if(isnull(params))
        return SendClientMessage(playerid, corCinza, "[ USE ]: /f [Texto]");

    new str[128], file[64], family[21], index = checkNick('_', getNome(playerid));
    strmid(family, getNome(playerid), index + 1, MAX_PLAYER_NAME);

    format(file, 64, "Familias/%s.ini", family);
    if(!DOF2::FileExists(file))
        return SendClientMessage(playerid, corCinza, "[ ERRO ]: Esta família não existe!");

    format(str, 128, "( Chat %s ) %s: %s", family, getNome(playerid), params);
    for(new i = 0; i < GetPlayerPoolSize(); i++) {
        new _family[18];
        new _index = checkNick('_', getNome(i));
        strmid(_family, getNome(i), _index + 1, MAX_PLAYER_NAME);
        if (!strcmp(_family, family)) {
            SendClientMessage(i, corChat, str);
        }
    }
    return true;
}


COMMAND:mudarnick(playerid, params[]) {
    if(isnull(params))
        return SendClientMessage(playerid, corCinza, "[ USE ]: /mudarnick [Nome]");

    new str[60];
    format(str, 60, "Você mudou seu nick para %s", params);
    SendClientMessage(playerid, corChat, str);
    SetPlayerName(playerid, params);
    return true;
}