// Created by Neal Anthony.
#define FILTERSCRIPT

#include <a_samp>
#include <a_npc>
#include <zcmd>
#include <sscanf2>

#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xAA3333AA
#define COLOR_YELLOW 0xFFFF00AA


new pAccent[MAX_PLAYERS][26];

#if defined FILTERSCRIPT

forward NearbyMessageForPlayers( playerid, stringcolour, text[]);

public OnFilterScriptInit()
{
    print(" Accent System by Neal Anthony (Maramizo) Loaded ");
    return 1;
}

public OnFilterScriptExit()
{
    print(" Accent System by Neal Anthony (Maramizo) Unloaded ");
    return 1;
}

stock strtok(const string[], &index,seperator=' ')
{
    new length = strlen(string);
    new offset = index;
    new result[128];
    while ((index < length) && (string[index] != seperator) && ((index - offset) < (sizeof(result) - 1)))
    {
        result[index - offset] = string[index];
        index++;
    }

    result[index - offset] = EOS;
    if ((index < length) && (string[index] == seperator))
    {
        index++;
    }
    return result;
}
public OnPlayerConnect(playerid)
{
    SetPVarString(playerid,"Accent","Unknown"); // Sets the accent to 'unknown' untill the player chooses his players accent
    SendClientMessage(playerid, 0xFFFFFFAA, "Type /accent to set your players accent"); // Idea by PlayBox... Thank you!
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    new string[] = " ";
    strmid(pAccent[playerid],string,0,sizeof string ,255);
    return 1;
}

public OnPlayerText(playerid, text[])
{
    new name[MAX_PLAYER_NAME];
    new string[128];
    GetPlayerName(playerid,name,sizeof(name));
    GetPVarString(playerid, "Accent", string, 128);
    format(string, sizeof(string), "[%s accent] %s: %s", string, name, text);
    NearbyMessageForPlayers(playerid, 0xFFFFFFAA, string);
    return 0;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    return 0;
}
CMD:accent(playerid, params[])
{
    new string[128];
    new giveaccent;
    if(!sscanf(params,"s[128]",giveaccent))
    {
        if (giveaccent < 9 || giveaccent > 20)
        {
            new string2[128];
            format(string2,sizeof(string2),"Accent: You have changed your accent to %s.",string);
            SetPVarString(playerid,"Accent",string);
            SendClientMessage(playerid,0xFFFFFFAA,string);
            strmid(pAccent[playerid],string,0,sizeof(string),255);
            return 1;
        }
        else
        {
            SendClientMessage(playerid, COLOR_RED, "Accent must be between 9 and 20 Characters.");
            return 1;
        }
    }
    else
    {
    SendClientMessage (playerid, COLOR_RED, "USAGE:/accent [Accent Here]");
    return 1;
    }
}

public NearbyMessageForPlayers(playerid, stringcolour, text[]) // Credits to whoever made this, it saves me alot of time.
{
    new Float:PosX, Float:PosY, Float:PosZ;
    for(new p = 0; p < MAX_PLAYERS; p++)
    {
        if(IsPlayerConnected( p ))
        {
            GetPlayerPos( playerid, PosX, PosY, PosZ );
            if(IsPlayerInRangeOfPoint(p, 12, PosX, PosY, PosZ) )
            {
                if(GetPlayerInterior( playerid ) == GetPlayerInterior( p ) && GetPlayerVirtualWorld( playerid ) == GetPlayerVirtualWorld( p ) )
                {
                    SendClientMessage(p, stringcolour, text);
                }
            }
        }
    }
    return 1;
}
#endif