ferret99gt@1174: /**
ds@1330: * vim: set ts=4 :
ds@1330: * =============================================================================
ds@1330: * SourceMod Basic Chat Plugin
ds@1330: * Implements basic communication commands.
ds@1330: *
ds@1947: * SourceMod (C)2004-2008 AlliedModders LLC. All rights reserved.
ds@1330: * =============================================================================
ferret99gt@1174: *
ds@1330: * This program is free software; you can redistribute it and/or modify it under
ds@1330: * the terms of the GNU General Public License, version 3.0, as published by the
ds@1330: * Free Software Foundation.
ds@1330: *
ds@1330: * This program is distributed in the hope that it will be useful, but WITHOUT
ds@1330: * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ds@1330: * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
ds@1330: * details.
ferret99gt@1174: *
ds@1330: * You should have received a copy of the GNU General Public License along with
ds@1330: * this program. If not, see .
ds@1330: *
ds@1330: * As a special exception, AlliedModders LLC gives you permission to link the
ds@1330: * code of this program (as well as its derivative works) to "Half-Life 2," the
ds@1330: * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ds@1330: * by the Valve Corporation. You must obey the GNU General Public License in
ds@1330: * all respects for all other code used. Additionally, AlliedModders LLC grants
ds@1330: * this exception to all derivative works. AlliedModders LLC defines further
ds@1330: * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ds@1330: * or .
ferret99gt@1174: *
ferret99gt@1174: * Version: $Id$
ferret99gt@1174: */
ferret99gt@1174:
ds@1330: #pragma semicolon 1
ferret99gt@1174:
ds@1330: #include
ferret99gt@1174:
ferret99gt@1174: public Plugin:myinfo =
ferret99gt@1174: {
ferret99gt@1174: name = "Basic Chat",
ferret99gt@1174: author = "AlliedModders LLC",
ferret99gt@1174: description = "Basic Communication Commands",
ferret99gt@1174: version = SOURCEMOD_VERSION,
ferret99gt@1174: url = "http://www.sourcemod.net/"
ferret99gt@1174: };
ferret99gt@1174:
ferret99gt@1516: #define CHAT_SYMBOL '@'
ferret99gt@1516:
ferret99gt@1179: new String:g_ColorNames[13][10] = {"White", "Red", "Green", "Blue", "Yellow", "Purple", "Cyan", "Orange", "Pink", "Olive", "Lime", "Violet", "Lightblue"};
ferret99gt@1174: new g_Colors[13][3] = {{255,255,255},{255,0,0},{0,255,0},{0,0,255},{255,255,0},{255,0,255},{0,255,255},{255,128,0},{255,0,128},{128,255,0},{0,255,128},{128,0,255},{0,128,255}};
ferret99gt@1174:
ferret99gt@1174: new Handle:g_Cvar_Chatmode = INVALID_HANDLE;
ferret99gt@1174:
skamonkey@3961: new EngineVersion:g_GameEngine = Engine_Unknown;
ds@2583:
ferret99gt@1174: public OnPluginStart()
ferret99gt@1174: {
ferret99gt@1174: LoadTranslations("common.phrases");
ds@2583:
skamonkey@3961: g_GameEngine = GetEngineVersion();
ferret99gt@1174:
ferret99gt@1174: g_Cvar_Chatmode = CreateConVar("sm_chat_mode", "1", "Allows player's to send messages to admin chat.", 0, true, 0.0, true, 1.0);
ferret99gt@1174:
ferret99gt@1174: RegConsoleCmd("say", Command_SayChat);
ferret99gt@1174: RegConsoleCmd("say_team", Command_SayAdmin);
ferret99gt@1174: RegAdminCmd("sm_say", Command_SmSay, ADMFLAG_CHAT, "sm_say - sends message to all players");
ferret99gt@1174: RegAdminCmd("sm_csay", Command_SmCsay, ADMFLAG_CHAT, "sm_csay - sends centered message to all players");
ds@2583:
ds@2583: /* HintText does not work on Dark Messiah */
skamonkey@3961: if (g_GameEngine != Engine_DarkMessiah)
ds@2583: {
ds@2583: RegAdminCmd("sm_hsay", Command_SmHsay, ADMFLAG_CHAT, "sm_hsay - sends hint message to all players");
ds@2583: }
ds@2583:
ferret99gt@1174: RegAdminCmd("sm_tsay", Command_SmTsay, ADMFLAG_CHAT, "sm_tsay [color] - sends top-left message to all players");
ferret99gt@1174: RegAdminCmd("sm_chat", Command_SmChat, ADMFLAG_CHAT, "sm_chat - sends message to admins");
ferret99gt@1174: RegAdminCmd("sm_psay", Command_SmPsay, ADMFLAG_CHAT, "sm_psay - sends private message");
ferret99gt@1174: RegAdminCmd("sm_msay", Command_SmMsay, ADMFLAG_CHAT, "sm_msay - sends message as a menu panel");
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SayChat(client, args)
ferret99gt@1174: {
ferret99gt@1174: decl String:text[192];
dvander@1469: if (IsChatTrigger() || GetCmdArgString(text, sizeof(text)) < 1)
dvander@1422: {
dvander@1422: return Plugin_Continue;
dvander@1422: }
ferret99gt@1174:
ferret99gt@1174: new startidx;
ferret99gt@1174: if (text[strlen(text)-1] == '"')
ferret99gt@1174: {
ferret99gt@1174: text[strlen(text)-1] = '\0';
ferret99gt@1174: startidx = 1;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1516: if (text[startidx] != CHAT_SYMBOL)
ferret99gt@1174: return Plugin_Continue;
ferret99gt@1174:
ferret99gt@1174: new msgStart = 1;
ferret99gt@1174:
ferret99gt@1516: if (text[startidx+1] == CHAT_SYMBOL)
ferret99gt@1174: {
ferret99gt@1174: msgStart = 2;
ferret99gt@1174:
ferret99gt@1516: if (text[startidx+2] == CHAT_SYMBOL)
ferret99gt@1174: msgStart = 3;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: decl String:message[192];
ferret99gt@1174: strcopy(message, 192, text[startidx+msgStart]);
ferret99gt@1174:
ferret99gt@1706: if (msgStart == 1 && CheckCommandAccess(client, "sm_say", ADMFLAG_CHAT)) // sm_say alias
ferret99gt@1174: {
dvander@2318: SendChatToAll(client, message);
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_say (text %s)", client, message);
ferret99gt@1174: }
ferret99gt@1706: else if (msgStart == 3 && CheckCommandAccess(client, "sm_csay", ADMFLAG_CHAT)) // sm_csay alias
ferret99gt@1174: {
dvander@2318: DisplayCenterTextToAll(client, message);
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_csay (text %s)", client, text);
ferret99gt@1174: }
ferret99gt@1706: else if (msgStart == 2 && CheckCommandAccess(client, "sm_psay", ADMFLAG_CHAT)) // sm_psay alias
ferret99gt@1174: {
ferret99gt@1178: decl String:arg[64];
ferret99gt@1174:
ferret99gt@1179: new len = BreakString(message, arg, sizeof(arg));
ferret99gt@1178: new target = FindTarget(client, arg, true, false);
ferret99gt@1174:
pred@2218: if (target == -1 || len == -1)
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174:
skamonkey@2899: PrintToChat(client, "\x04(Private to %N) %N: \x01%s", target, client, message[len]);
skamonkey@2899: PrintToChat(target, "\x04(Private to %N) %N: \x01%s", target, client, message[len]);
ferret99gt@1174:
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_psay to \"%L\" (text %s)", client, target, message);
ferret99gt@1174: }
ferret99gt@1174: else
ferret99gt@1174: return Plugin_Continue;
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SayAdmin(client, args)
ferret99gt@1174: {
ferret99gt@1706: if (!CheckCommandAccess(client, "sm_chat", ADMFLAG_CHAT) && !GetConVarBool(g_Cvar_Chatmode))
dvander@1434: {
ferret99gt@1174: return Plugin_Continue;
dvander@1434: }
ferret99gt@1174:
ferret99gt@1174: decl String:text[192];
ferret99gt@1516: if (IsChatTrigger() || GetCmdArgString(text, sizeof(text)) < 1)
dvander@1434: {
dvander@1434: return Plugin_Continue;
dvander@1434: }
ferret99gt@1174:
ferret99gt@1174: new startidx;
ferret99gt@1174: if (text[strlen(text)-1] == '"')
ferret99gt@1174: {
ferret99gt@1174: text[strlen(text)-1] = '\0';
ferret99gt@1174: startidx = 1;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1516: if (text[startidx] != CHAT_SYMBOL)
ferret99gt@1174: return Plugin_Continue;
ferret99gt@1174:
ferret99gt@1174: decl String:message[192];
ferret99gt@1174: strcopy(message, 192, text[startidx+1]);
ferret99gt@1174:
fyrenmoo@2759: SendChatToAdmins(client, message);
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_chat (text %s)", client, message);
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmSay(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 1)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_say ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: decl String:text[192];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
dvander@2318: SendChatToAll(client, text);
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_say (text %s)", client, text);
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmCsay(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 1)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_csay ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: decl String:text[192];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
dvander@2318: DisplayCenterTextToAll(client, text);
dvander@2318:
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_csay (text %s)", client, text);
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmHsay(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 1)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_hsay ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
dvander@2318:
ferret99gt@1174: decl String:text[192];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
dvander@2318: decl String:nameBuf[MAX_NAME_LENGTH];
dvander@2318:
dvander@2342: for (new i = 1; i <= MaxClients; i++)
dvander@2318: {
bl4nkeh@2434: if (!IsClientInGame(i) || IsFakeClient(i))
dvander@2318: {
dvander@2318: continue;
dvander@2318: }
dvander@2318: FormatActivitySource(client, i, nameBuf, sizeof(nameBuf));
dvander@2318: PrintHintText(i, "%s: %s", nameBuf, text);
dvander@2318: }
dvander@2318:
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_hsay (text %s)", client, text);
dvander@2318:
dvander@2318: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmTsay(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 1)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_tsay ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
dvander@2318:
ferret99gt@1174: decl String:text[192], String:colorStr[16];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
ferret99gt@1174: new len = BreakString(text, colorStr, 16);
ferret99gt@1174:
ferret99gt@1174: new color = FindColor(colorStr);
dvander@2318: new String:nameBuf[MAX_NAME_LENGTH];
dvander@2318:
dvander@2318: if (color == -1)
dvander@2318: {
dvander@2318: color = 0;
dvander@2318: len = 0;
dvander@2318: }
dvander@2318:
dvander@2342: for (new i = 1; i <= MaxClients; i++)
dvander@2318: {
bl4nkeh@2434: if (!IsClientInGame(i) || IsFakeClient(i))
dvander@2318: {
dvander@2318: continue;
dvander@2318: }
dvander@2318: FormatActivitySource(client, i, nameBuf, sizeof(nameBuf));
dvander@2318: SendDialogToOne(i, color, "%s: %s", nameBuf, text[len]);
dvander@2318: }
ferret99gt@1174:
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_tsay (text %s)", client, text);
dvander@2318:
dvander@2318: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmChat(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 1)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_chat ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: decl String:text[192];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
fyrenmoo@2759: SendChatToAdmins(client, text);
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_chat (text %s)", client, text);
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmPsay(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 2)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_psay ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1178: decl String:text[192], String:arg[64], String:message[192];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
ferret99gt@1178: new len = BreakString(text, arg, sizeof(arg));
ferret99gt@1174: BreakString(text[len], message, sizeof(message));
ferret99gt@1174:
ferret99gt@1178: new target = FindTarget(client, arg, true, false);
ferret99gt@1178:
ferret99gt@1178: if (target == -1)
ferret99gt@1178: return Plugin_Handled;
ferret99gt@1178:
skamonkey@2899: decl String:name[64];
dvander@1748:
dvander@1748: if (client == 0)
dvander@1748: {
dvander@1748: name = "Console";
dvander@1748: }
dvander@1748: else
dvander@1748: {
dvander@1748: GetClientName(client, name, sizeof(name));
dvander@1748: }
dvander@1748:
dvander@1748: if (client == 0)
dvander@1748: {
skamonkey@2899: PrintToServer("(Private: %N) %s: %s", target, name, message);
dvander@1748: }
januk@3849: else if (target != client)
dvander@1748: {
skamonkey@2899: PrintToChat(client, "\x04(Private: %N) %s: \x01%s", target, name, message);
dvander@1748: }
dvander@1748:
skamonkey@2899: PrintToChat(target, "\x04(Private: %N) %s: \x01%s", target, name, message);
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_psay to \"%L\" (text %s)", client, target, message);
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Action:Command_SmMsay(client, args)
ferret99gt@1174: {
ferret99gt@1174: if (args < 1)
ferret99gt@1174: {
ferret99gt@1174: ReplyToCommand(client, "[SM] Usage: sm_msay ");
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: decl String:text[192];
ferret99gt@1174: GetCmdArgString(text, sizeof(text));
ferret99gt@1174:
skamonkey@2899: SendPanelToAll(client, text);
ferret99gt@1174:
skamonkey@2897: LogAction(client, -1, "\"%L\" triggered sm_msay (text %s)", client, text);
ferret99gt@1174:
ferret99gt@1174: return Plugin_Handled;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: FindColor(String:color[])
ferret99gt@1174: {
ferret99gt@1174: for (new i = 0; i < 13; i++)
ferret99gt@1174: {
ferret99gt@1174: if (strcmp(color, g_ColorNames[i], false) == 0)
ferret99gt@1174: return i;
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: return -1;
ferret99gt@1174: }
ferret99gt@1174:
dvander@2318: SendChatToAll(client, String:message[])
ferret99gt@1174: {
dvander@2318: new String:nameBuf[MAX_NAME_LENGTH];
dvander@2318:
dvander@2342: for (new i = 1; i <= MaxClients; i++)
ferret99gt@1174: {
pred@2355: if (!IsClientInGame(i) || IsFakeClient(i))
dvander@2318: {
dvander@2318: continue;
dvander@2318: }
dvander@2318: FormatActivitySource(client, i, nameBuf, sizeof(nameBuf));
dvander@2318:
skamonkey@2898: PrintToChat(i, "\x04(ALL) %s: \x01%s", nameBuf, message);
ferret99gt@1174: }
dvander@2318: }
dvander@2318:
dvander@2318: DisplayCenterTextToAll(client, String:message[])
dvander@2318: {
dvander@2318: new String:nameBuf[MAX_NAME_LENGTH];
dvander@2318:
tsunami@2810: for (new i = 1; i <= MaxClients; i++)
ferret99gt@1174: {
dvander@2382: if (!IsClientInGame(i) || IsFakeClient(i))
dvander@2318: {
dvander@2318: continue;
dvander@2318: }
dvander@2318: FormatActivitySource(client, i, nameBuf, sizeof(nameBuf));
dvander@2318: PrintCenterText(i, "%s: %s", nameBuf, message);
ferret99gt@1174: }
ferret99gt@1174: }
ferret99gt@1174:
fyrenmoo@2759: SendChatToAdmins(from, String:message[])
ferret99gt@1174: {
fyrenmoo@2759: new fromAdmin = CheckCommandAccess(from, "sm_chat", ADMFLAG_CHAT);
dvander@2342: for (new i = 1; i <= MaxClients; i++)
ferret99gt@1174: {
fyrenmoo@2759: if (IsClientInGame(i) && (from == i || CheckCommandAccess(i, "sm_chat", ADMFLAG_CHAT)))
ferret99gt@1174: {
skamonkey@2898: PrintToChat(i, "\x04(%sADMINS) %N: \x01%s", fromAdmin ? "" : "TO ", from, message);
ferret99gt@1174: }
ferret99gt@1174: }
ferret99gt@1174: }
ferret99gt@1174:
dvander@2318: SendDialogToOne(client, color, String:text[], any:...)
ferret99gt@1174: {
ferret99gt@1174: new String:message[100];
dvander@2318: VFormat(message, sizeof(message), text, 4);
ferret99gt@1174:
dvander@2318: new Handle:kv = CreateKeyValues("Stuff", "title", message);
dvander@2318: KvSetColor(kv, "color", g_Colors[color][0], g_Colors[color][1], g_Colors[color][2], 255);
dvander@2318: KvSetNum(kv, "level", 1);
dvander@2318: KvSetNum(kv, "time", 10);
dvander@2318:
dvander@2318: CreateDialog(client, kv, DialogType_Msg);
dvander@2318:
dvander@2318: CloseHandle(kv);
ferret99gt@1174: }
ferret99gt@1174:
skamonkey@2899: SendPanelToAll(from, String:message[])
ferret99gt@1174: {
ferret99gt@1174: decl String:title[100];
skamonkey@2899: Format(title, 64, "%N:", from);
ferret99gt@1174:
ferret99gt@1174: ReplaceString(message, 192, "\\n", "\n");
ferret99gt@1174:
ferret99gt@1174: new Handle:mSayPanel = CreatePanel();
ferret99gt@1174: SetPanelTitle(mSayPanel, title);
ferret99gt@1174: DrawPanelItem(mSayPanel, "", ITEMDRAW_SPACER);
ferret99gt@1174: DrawPanelText(mSayPanel, message);
ferret99gt@1174: DrawPanelItem(mSayPanel, "", ITEMDRAW_SPACER);
ferret99gt@1174:
ferret99gt@1174: SetPanelCurrentKey(mSayPanel, 10);
ferret99gt@1174: DrawPanelItem(mSayPanel, "Exit", ITEMDRAW_CONTROL);
ferret99gt@1174:
dvander@2342: for(new i = 1; i <= MaxClients; i++)
ferret99gt@1174: {
ferret99gt@1174: if(IsClientInGame(i) && !IsFakeClient(i))
ferret99gt@1174: {
ferret99gt@1174: SendPanelToClient(mSayPanel, i, Handler_DoNothing, 10);
ferret99gt@1174: }
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: CloseHandle(mSayPanel);
ferret99gt@1174: }
ferret99gt@1174:
ferret99gt@1174: public Handler_DoNothing(Handle:menu, MenuAction:action, param1, param2)
ferret99gt@1174: {
ferret99gt@1174: /* Do nothing */
ds@1268: }