infoban

[SkyFrost]

Здравствуйте уважаемые пользователи Pawno-Info, решил для Вас слить команду /infoban, как на (Advance Не реклама.)

Командный процессор DCMD.

MYSQL R-42-2

CMD:infoban(playerid, params[])
{
    if(pInfo[playerid][pAdmin] < 4) return 1;
    
	new name[MAX_PLAYER_NAME],
	    string_1[100];

    if(sscanf(params, "s", name))
		return SendClientMessage(playerid, COLOR_GREY, !"Используйте: /infoban [ник игрока]");

	format(string_1, sizeof(string_1), "SELECT * FROM `bans` WHERE `name` = '%s'", name);
	mysql_tquery(mysql_connect_ID, string_1, "BanInfo", "d", playerid);
	return 1;
}

forward BanInfo(playerid);
public BanInfo(playerid)
{
	new rows,
	unbandate[12];

	cache_get_row_count(rows);
	if(rows)
	{
		new unban,
			string[284],
			name[24],
			whobanned[24],
			reason[27],
			bandate[13],
			string_1[100];

		cache_get_value_name(0, "unbandate", unbandate), unban = strval(unbandate);
	    cache_get_value_name(0, "name", string_1); strmid(name, string_1, 0, strlen(string_1), MAX_PLAYER_NAME);
        cache_get_value_name(0, "whobanned", string_1); strmid(whobanned, string_1, 0, strlen(string_1), MAX_PLAYER_NAME);
        cache_get_value_name(0, "reason", string_1); strmid(reason, string_1, 0, strlen(string_1), 27);
        cache_get_value_name(0, "bandate", string_1); strmid(bandate, string_1, 0, strlen(string_1), 13);
  		new how = unban - gettime();
		how = how/86400;
		format(string, sizeof(string), "{74d418}Ник забаненного:\t{ffffff}%s\n\
		{74d418}Ник модератора:\t{ffffff}%s\n\
		{74d418}Причина бана:\t{ffffff}%s\n\
		{74d418}Дата бана:\t\t{ffffff}%s\n\
		{74d418}Дней до разбана:\t{ffffff}%d", name, whobanned, reason, bandate, how+1);
        ShowPlayerDialog(playerid, 0, DIALOG_STYLE_MSGBOX, name, string, "Закрыть", "");
	}
	else
	{
	    SendClientMessage(playerid, COLOR_GREY, !"Данный аккаунт не заблокирован.");
	}
	return 1;
}

Я думаю в остальном сами разберётесь. Не судите строго.