Retardo(playerid);

if (strcmp("/comando", cmdtext, true, 10) == 0)
    {
        SetPlayerPos(playerid,312.121948,220.038497,882.79730);
        Retardo(playerid);
        return 1;
    }
/*-------------------------*/
    else if(PRESSED(KEY_WALK) && IsPlayerInRangeOfPoint(playerid, 5.0, 1772.2819,-1548.3059,9.9063))//Gente fuera dentro
    {
        SetPlayerPos(playerid,416.2079,158.9610,895.9077);
        SetPlayerInterior(playerid, 1);
        Retardo(playerid);
    }

forward Retardo2(playerid);
stock Retardo(playerid)
{
    TogglePlayerControllable(playerid,0); //Congelamos jugador
    SetTimerEx("Retardo2",4000,false,"d",playerid); //Ponemos la espera
    GameTextForPlayer(playerid, "~y~Espera mientras      ~r~ se cargan los objetos", 2000, 6); //Avisamos
    return 1;
}
public Retardo2(playerid) //Se acaba la espera
{
    TogglePlayerControllable(playerid,1); //Descongelamos
    SendClientMessage(playerid, 0xFFFFFFFF, " Objetos cargados correctamente."); //Avisamos
    return 1;
}

stock Lag()
{
    new v;
    do
    {
        if (v > 1) { v --; }
        else if (v < 0) { v ++; }
    }
    while(v != 3);
    return true;
}

new Advertido[MAX_PLAYERS];
public OnPlayerDisconnect(playerid, reason)
{
    Advertido[playerid] = 0; //Seteamos la variable a 0
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
        if(!strcmp(cmd, "/ad", true)){
        tmp[0] = strtok(cmdtext, idx);
        tmp[1] = strtok(cmdtext, idx);
        if(!strlen(tmp[0]) || !strlen(tmp[1]))return SendClientMessage(playerid, COLOR_ROJO, "Usa: /ad [ID] [Razon].");
        new id;
        new str[128];
        id = strval(tmp[0]);
        if(IsPlayerConnected(id)){
        new name[2][MAX_PLAYER_NAME];
        GetPlayerName(playerid, name[0], MAX_PLAYER_NAME);
        GetPlayerName(id, name[1], MAX_PLAYER_NAME);
        Advertido[id]++;
        format(str, 128, "%s ha sido advertido (Razon: %s)(%i/3)", name[1], cmdtext[5+strlen(tmp[0])], Advertido[id]);
        SendClientMessage(playerid, COLOR_AZUL, str);
        format(str, 128, "Has sido advertido por %s. (Razon: %s.)(%i/3)", name[0], cmdtext[5+strlen(tmp[0])], Advertido[id]);
        SendClientMessage(id, COLOR_VERDE_CLARO, str);
        format(str, 128, "%s ha sido advertido por %s. (Razon: %s.) (%i/3)", name[1], name[0], cmdtext[5+strlen(tmp[0])], Advertido[id]);
        SendClientMessageToAll(COLOR_NARANJA, str);
        PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
        PlayerPlaySound(id, 1057, 0.0, 0.0, 0.0);
        if(Advertido[id] >= 3)Kick(id);
        return 1;
        }
        return SendClientMessage(playerid, COLOR_ROJO, "El jugador no se encuentra conectado.");
}

//la definiciуn de Strtok
strtok(const string[], &index)
{
    new length = strlen(string);
    while ((index < length) && (string[index] <= ' '))
    {
        index++;
    }

    new offset = index;
    new result[20];
    while ((index < length) && (string[index] > ' ') && ((index - offset) < (sizeof(result) - 1)))
    {
        result[index - offset] = string[index];
        index++;
    }
    result[index - offset] = EOS;
    return result;
}

stock NombreValido(const name[])
{
	if(!name[0] || strfind(name, "_") == -1)
		return 0;
	else for(new i = 0, len = strlen(name); i != len; i ++)
	{
	    if((i == 0) && (name[i] < 'A' || name[i] > 'Z'))
			return 0;
		else if((i != 0 && i < len  && name[i] == '_') && (name[i + 1] < 'A' || name[i + 1] > 'Z'))
			return 0;
		else if ((name[i] < 'A' || name[i] > 'Z') && (name[i] < 'a' || name[i] > 'z') && name[i] != '_' && name[i] != '.')
			return 0;
	}
	return 1;
}

// ** INCLUDES

#include <a_samp>

// ** DEFINES

// *** ROLEPLAY NAME TYPES

#define ROLEPLAY_NAME_FALSE 0
#define ROLEPLAY_NAME_TRUE 1
#define ROLEPLAY_NAME_UNCAPPED 2
#define ROLEPLAY_NAME_CONTAINS_NUMBERS 3

// ** MAIN

main()
{
	print("Loaded \"rp_name_detector.amx\".");

	switch(IsRoleplayName("Test_Test"))
	{
		case ROLEPLAY_NAME_FALSE:
		{
			print("Name is not a roleplay name.");
		}
		case ROLEPLAY_NAME_TRUE:
		{
			print("Name is a roleplay name.");
		}
		case ROLEPLAY_NAME_UNCAPPED:
		{
			print("Name is uncapped.");
		}
		case ROLEPLAY_NAME_CONTAINS_NUMBERS:
		{
			print("Name can't contain numbers.");
		}
	}
}

// ** CALLBACKS

public OnGameModeInit()
{	
	return 1;
}

public OnGameModeExit()
{
	return 1;
}

// ** FUNCTIONS

stock IsRoleplayName(player_name[])
{
	for(new i = 0, j = strlen(player_name); i < j; i ++)
	{
		switch(player_name[i])
		{
			case '0'..'9':
			{
				return ROLEPLAY_NAME_CONTAINS_NUMBERS;
			}
		}
	}

	if(65 <= player_name[0] <= 90)
	{
		new underscore_1 = strfind(player_name, "_");
		if(underscore_1 >= 3)
		{
			if(65 <= player_name[underscore_1 + 1] <= 90)
			{
				if(strfind(player_name, "_", false, (underscore_1 + 1)) == -1)
				{
					if(((strlen(player_name) - underscore_1) - 1) >= 3)
					{
						return ROLEPLAY_NAME_TRUE;
					}
				}
			}
			else
			{
				if(((strlen(player_name) - underscore_1) - 1) <= 2)
				{
					return ROLEPLAY_NAME_FALSE;
				}
				else
				{
					return ROLEPLAY_NAME_UNCAPPED;
				}
			}
		}
	}
	else
	{
		if(strfind(player_name, "_") <= 3)
		{
			return ROLEPLAY_NAME_FALSE;
		}
		else
		{
			return ROLEPLAY_NAME_UNCAPPED;
		}
	}
	return ROLEPLAY_NAME_FALSE;
}

stock IsFreePath(Float:fX, Float:fY, Float:fZ, const Float:angle, const Float:max_dist, const Float:z_dif = 1.5)
{
    new Float:i, Float:Z, Float:sin = floatsin(-angle, degrees), Float:cos = floatcos(-angle, degrees);
    for(i = 0.0; i < max_dist; i += 0.25)
    {
        MapAndreas_FindZ_For2DCoord(fX + (i * sin), fY + (i * cos), Z);
        if(Z - fZ < z_dif) continue;
        return 0;
    }
    return 1;
}

stock GetFreePath(Float:fX, Float:fY, Float:fZ, Float:angle, const Float:z_dif = 2.0)
{
    new Float:i, Float:Z;
    for(i = angle; i < 360.0; i += 30.0)
    {
        MapAndreas_FindZ_For2DCoord(fX + (5.0 * floatsin(-i, degrees)), fY + (5.0 * floatcos(-i, degrees)), Z);

        if(Z - fZ < z_dif)
        {
            fX += 5.0 * floatsin(-i, degrees);
            fY += 5.0 * floatcos(-i, degrees);
            fZ = Z + 0.9;
            return 1;
        }
    }

    for(new Float:i = 0.0; i < angle; i += 30.0)
    {
        MapAndreas_FindZ_For2DCoord(fX + (5.0 * floatsin(-i, degrees)), fY + (5.0 * floatcos(-i, degrees)), Z);

        if(Z - fZ < z_dif)
        {
            fX += 5.0 * floatsin(-i, degrees);
            fY += 5.0 * floatcos(-i, degrees);
            fZ = Z + 0.9;
            return 1;
        }
    }
    return 0;
}