CMD:clan(playerid, params[])
{
	new ClanCMD[15];
	if(sscanf(params, "s[15]", ClanCMD)) return SendClientMessage(playerid, -1, "ss");
	if(!strcmp(ClanCMD, "Create", true))
	{
	    new CCreate[8];
	    if(pInfo[playerid][pLevel] < 3) return SendClientMessage(playerid,-1,".éöéøú ÷ìàï ðéúðú ø÷ îøîä 3");
	    if(pInfo[playerid][pClanID] != 0) return SendClientMessage(playerid,-1,". /Clan Leave - àéðê éëåì ìéöåø ÷ìàï îëéååï ùàúä ðîöà á÷ìàï, ìéöéàä ä÷ù");
		if(GetPlayerMoney(playerid) < 800000) return SendClientMessage(playerid,-1,".800,000$ - àéï ìê àú äñëåí äãøåù");
		if(sscanf(params, "s[15]s[8]", ClanCMD, CCreate)) return SendClientMessage(playerid, -1, "/clan create <clan name>");
		for ( new i = 1; i < MAX_CLANS; i ++ )
    	{
	        if ( fexist(clanFile(i)) ) continue;
	        if ( !fexist(clanFile(i)) )
	        {
	            if ( i >= MAX_CLANS ) return SendFormatMessage ( playerid, 0xb01111FF, "."#MAX_CLANS" ëîåú ä÷ìàðéí äî÷ñéîìéú äéà" );
				new INI:File = INI_Open(clanFile ( i ));
		        INI_WriteInt(File, "ClanID", i );
	        	INI_WriteString(File, "ClanName", CCreate );
	        	INI_WriteInt(File, "HQ", 0 );
	        	INI_WriteString(File, "Founder", GetName(playerid) );
	        	INI_WriteFloat(File, "PosX", 0.0 );
	        	INI_WriteFloat(File, "PosY", 0.0 );
	        	INI_WriteFloat(File, "PosZ", 0.0 );
	        	INI_WriteInt(File, "Players", 1 );
	        	INI_WriteInt(File, "R", random(255) );
	        	INI_WriteInt(File, "G", random(255) );
	        	INI_WriteInt(File, "B", random(255) );
	        	INI_WriteInt(File, "CanChange", 1 );
				INI_Close(File);
				inline LoadClans(string:name[], string:value[])
	  			{
					INI_Int( "ClanID", clanInfo [ i ] [ ID ] );
					INI_String( "ClanName", clanInfo [ i ] [ Clan ], 8 );
					INI_String( "Founder", clanInfo [ i ] [ Founder ], 25 );
					INI_Int( "HQ", clanInfo [ i ] [ HQ ] );
					INI_Float( "PosX", clanInfo [ i ] [ hqPos ] [ 0 ] );
					INI_Float( "PosY", clanInfo [ i ] [ hqPos ] [ 1 ] );
					INI_Float( "PosZ", clanInfo [ i ] [ hqPos ] [ 2 ] );
					INI_Int( "Players", clanInfo [ i ] [ Players ] );
					INI_Int( "R", clanInfo [ i ] [ Color ] [ 0 ] );
					INI_Int( "G", clanInfo [ i ] [ Color ] [ 1 ] );
					INI_Int( "B", clanInfo [ i ] [ Color ] [ 2 ] );
					INI_Int( "CanChange", clanInfo [ i ] [ CanChange ] );
				}
				INI_ParseFile(clanFile(i), using inline "LoadClans");
				GivePlayerMoney(playerid, -800000);
				pInfo[playerid][pClanID] = i;
				pInfo[playerid][pClanLevel] = 5;
				SetPlayerColor(playerid, rgba2hex(clanInfo [ i ] [ Color ] [ 0 ], clanInfo [ i ] [ Color ] [ 1 ], clanInfo [ i ] [ Color ] [ 2 ], 100));
				SendFormatMessage ( -1, 0xFF9900FF, ".{%s}%s {FF9900}éöø àú ä÷ìàï %s äùç÷ï", DRGB2HEX(clanInfo [ i ] [ Color ] [ 0 ], clanInfo [ i ] [ Color ] [ 1 ], clanInfo [ i ] [ Color ] [ 2 ], 100), CCreate, GetName(playerid));
			}
	    	break;
		}
	}
	else if(!strcmp(ClanCMD, "Invite", true))
	{
	    new CInvite;
	    if(pInfo[playerid][pClanLevel] < 3) return SendClientMessage(playerid, 0xEEEE00FF, ".òìéê ìäéåú øîä 3 á÷ìàï áëãé ìáöò ô÷åãä æå");
	    if(sscanf(params, "s[15]d", ClanCMD, CInvite)) return SendClientMessage(playerid, -1, "/clan invite <id>");
		if(!IsPlayerConnected(CInvite)) return SendClientMessage(playerid, 0xFF0000FF, ".ùç÷ï æä àéðå îçåáø");
		if(pInfo[CInvite][pClanID] != 0) return SendFormatMessage ( playerid, -1, "(%s) ùç÷ï æä ðîöà á÷ìàï àçø", clanInfo[pInfo[CInvite][pClanID]][Clan]);
		SendFormatMessage(playerid, -1, ".%s ì÷ìàï ùìê %s äæîðú àú äùç÷ï", clanInfo[pInfo[playerid][pClanID]][Clan], GetName(CInvite));
		SendFormatMessage(CInvite, -1, ".%s äæîéï àåúê ì÷ìàï ùìå %s äùç÷ï", clanInfo[pInfo[playerid][pClanID]][Clan], GetName(playerid));
		ClanInvited[CInvite] = 1;
		ClanInviter[CInvite] = playerid;
	}
	else if(!strcmp(ClanCMD, "Join", true))
	{
		if(ClanInvited[playerid] == 0) return SendClientMessage(playerid, 0xFF0000FF, ".ìà äåæîðú ìùåí ÷ìàï");
		pInfo[playerid][pClanID] = pInfo[ClanInviter[playerid]][pClanID];
		pInfo[playerid][pClanLevel] = 1;
		clanInfo[pInfo[playerid][pClanID]][Players] =clanInfo[pInfo[playerid][pClanID]][Players]++;
		SetPlayerColor(playerid, rgba2hex(clanInfo [ pInfo[playerid][pClanID] ] [ Color ] [ 0 ], clanInfo [ pInfo[playerid][pClanID] ] [ Color ] [ 1 ], clanInfo [ pInfo[playerid][pClanID] ] [ Color ] [ 2 ], 100));
		foreach(new i:Player)
		{
		    if(pInfo[i][pClanID] == pInfo[playerid][pClanID]) SendFormatMessage(i, -1, ".äöèøó ì÷ìàï %s äùç÷ï", GetName(playerid));
		}
		ClanInvited[playerid] = 0;
		ClanInviter[playerid] = 0;
	}
	return 1;
}