251cced1f8
Various minor things done to project files Updated sample extension project file and updated makefile to the new unified version (more changes likely on the way) Updated regex project file and makefile --HG-- extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%401971
480 lines
12 KiB
SourcePawn
480 lines
12 KiB
SourcePawn
/**
|
|
* vim: set ts=4 :
|
|
* =============================================================================
|
|
* SourceMod Basic Chat Plugin
|
|
* Implements basic communication commands.
|
|
*
|
|
* SourceMod (C)2004-2008 AlliedModders LLC. All rights reserved.
|
|
* =============================================================================
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify it under
|
|
* the terms of the GNU General Public License, version 3.0, as published by the
|
|
* Free Software Foundation.
|
|
*
|
|
* This program is distributed in the hope that it will be useful, but WITHOUT
|
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
|
* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
|
|
* details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License along with
|
|
* this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
* As a special exception, AlliedModders LLC gives you permission to link the
|
|
* code of this program (as well as its derivative works) to "Half-Life 2," the
|
|
* "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
|
|
* by the Valve Corporation. You must obey the GNU General Public License in
|
|
* all respects for all other code used. Additionally, AlliedModders LLC grants
|
|
* this exception to all derivative works. AlliedModders LLC defines further
|
|
* exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
|
|
* or <http://www.sourcemod.net/license.php>.
|
|
*
|
|
* Version: $Id$
|
|
*/
|
|
|
|
#pragma semicolon 1
|
|
|
|
#include <sourcemod>
|
|
|
|
public Plugin:myinfo =
|
|
{
|
|
name = "Basic Chat",
|
|
author = "AlliedModders LLC",
|
|
description = "Basic Communication Commands",
|
|
version = SOURCEMOD_VERSION,
|
|
url = "http://www.sourcemod.net/"
|
|
};
|
|
|
|
#define CHAT_SYMBOL '@'
|
|
|
|
new String:g_ColorNames[13][10] = {"White", "Red", "Green", "Blue", "Yellow", "Purple", "Cyan", "Orange", "Pink", "Olive", "Lime", "Violet", "Lightblue"};
|
|
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}};
|
|
|
|
new Handle:g_Cvar_Chatmode = INVALID_HANDLE;
|
|
|
|
new bool:g_DoColor = true;
|
|
|
|
public OnPluginStart()
|
|
{
|
|
LoadTranslations("common.phrases");
|
|
|
|
g_Cvar_Chatmode = CreateConVar("sm_chat_mode", "1", "Allows player's to send messages to admin chat.", 0, true, 0.0, true, 1.0);
|
|
|
|
RegConsoleCmd("say", Command_SayChat);
|
|
RegConsoleCmd("say_team", Command_SayAdmin);
|
|
RegAdminCmd("sm_say", Command_SmSay, ADMFLAG_CHAT, "sm_say <message> - sends message to all players");
|
|
RegAdminCmd("sm_csay", Command_SmCsay, ADMFLAG_CHAT, "sm_csay <message> - sends centered message to all players");
|
|
RegAdminCmd("sm_hsay", Command_SmHsay, ADMFLAG_CHAT, "sm_hsay <message> - sends hint message to all players");
|
|
RegAdminCmd("sm_tsay", Command_SmTsay, ADMFLAG_CHAT, "sm_tsay [color] <message> - sends top-left message to all players");
|
|
RegAdminCmd("sm_chat", Command_SmChat, ADMFLAG_CHAT, "sm_chat <message> - sends message to admins");
|
|
RegAdminCmd("sm_psay", Command_SmPsay, ADMFLAG_CHAT, "sm_psay <name or #userid> <message> - sends private message");
|
|
RegAdminCmd("sm_msay", Command_SmMsay, ADMFLAG_CHAT, "sm_msay <message> - sends message as a menu panel");
|
|
|
|
decl String:modname[64];
|
|
GetGameFolderName(modname, sizeof(modname));
|
|
|
|
if (strcmp(modname, "hl2mp") == 0)
|
|
{
|
|
g_DoColor = false;
|
|
}
|
|
}
|
|
|
|
public Action:Command_SayChat(client, args)
|
|
{
|
|
decl String:text[192];
|
|
if (IsChatTrigger() || GetCmdArgString(text, sizeof(text)) < 1)
|
|
{
|
|
return Plugin_Continue;
|
|
}
|
|
|
|
new startidx;
|
|
if (text[strlen(text)-1] == '"')
|
|
{
|
|
text[strlen(text)-1] = '\0';
|
|
startidx = 1;
|
|
}
|
|
|
|
if (text[startidx] != CHAT_SYMBOL)
|
|
return Plugin_Continue;
|
|
|
|
new msgStart = 1;
|
|
|
|
if (text[startidx+1] == CHAT_SYMBOL)
|
|
{
|
|
msgStart = 2;
|
|
|
|
if (text[startidx+2] == CHAT_SYMBOL)
|
|
msgStart = 3;
|
|
}
|
|
|
|
decl String:message[192];
|
|
strcopy(message, 192, text[startidx+msgStart]);
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
if (msgStart == 1 && CheckCommandAccess(client, "sm_say", ADMFLAG_CHAT)) // sm_say alias
|
|
{
|
|
SendChatToAll(name, message);
|
|
LogAction(client, -1, "%L triggered sm_say (text %s)", client, message);
|
|
}
|
|
else if (msgStart == 3 && CheckCommandAccess(client, "sm_csay", ADMFLAG_CHAT)) // sm_csay alias
|
|
{
|
|
PrintCenterTextAll("%s: %s", name, message);
|
|
LogAction(client, -1, "%L triggered sm_csay (text %s)", client, text);
|
|
}
|
|
else if (msgStart == 2 && CheckCommandAccess(client, "sm_psay", ADMFLAG_CHAT)) // sm_psay alias
|
|
{
|
|
decl String:arg[64];
|
|
|
|
new len = BreakString(message, arg, sizeof(arg));
|
|
new target = FindTarget(client, arg, true, false);
|
|
|
|
if (target == -1)
|
|
return Plugin_Handled;
|
|
|
|
decl String:name2[64];
|
|
GetClientName(target, name2, sizeof(name2));
|
|
|
|
if (g_DoColor)
|
|
{
|
|
PrintToChat(client, "\x04(Private to %s) %s: \x01%s", name2, name, message[len]);
|
|
PrintToChat(target, "\x04(Private to %s) %s: \x01%s", name2, name, message[len]);
|
|
}
|
|
else
|
|
{
|
|
PrintToChat(client, "(Private to %s) %s: %s", name2, name, message[len]);
|
|
PrintToChat(target, "(Private to %s) %s: %s", name2, name, message[len]);
|
|
}
|
|
|
|
LogAction(client, -1, "%L triggered sm_psay to %L (text %s)", client, target, message);
|
|
}
|
|
else
|
|
return Plugin_Continue;
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SayAdmin(client, args)
|
|
{
|
|
if (!CheckCommandAccess(client, "sm_chat", ADMFLAG_CHAT) && !GetConVarBool(g_Cvar_Chatmode))
|
|
{
|
|
return Plugin_Continue;
|
|
}
|
|
|
|
decl String:text[192];
|
|
if (IsChatTrigger() || GetCmdArgString(text, sizeof(text)) < 1)
|
|
{
|
|
return Plugin_Continue;
|
|
}
|
|
|
|
new startidx;
|
|
if (text[strlen(text)-1] == '"')
|
|
{
|
|
text[strlen(text)-1] = '\0';
|
|
startidx = 1;
|
|
}
|
|
|
|
if (text[startidx] != CHAT_SYMBOL)
|
|
return Plugin_Continue;
|
|
|
|
decl String:message[192];
|
|
strcopy(message, 192, text[startidx+1]);
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
SendChatToAdmins(name, message);
|
|
LogAction(client, -1, "%L triggered sm_chat (text %s)", client, message);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmSay(client, args)
|
|
{
|
|
if (args < 1)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_say <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
SendChatToAll(name, text);
|
|
LogAction(client, -1, "%L triggered sm_say (text %s)", client, text);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmCsay(client, args)
|
|
{
|
|
if (args < 1)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_csay <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
new String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
PrintCenterTextAll("%s: %s", name, text);
|
|
LogAction(client, -1, "%L triggered sm_csay (text %s)", client, text);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmHsay(client, args)
|
|
{
|
|
if (args < 1)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_hsay <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
PrintHintTextToAll("%s: %s", name, text);
|
|
LogAction(client, -1, "%L triggered sm_hsay (text %s)", client, text);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmTsay(client, args)
|
|
{
|
|
if (args < 1)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_tsay <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192], String:colorStr[16];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
new len = BreakString(text, colorStr, 16);
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
new color = FindColor(colorStr);
|
|
|
|
if (color == -1)
|
|
SendDialogToAll(_, "%s: %s", name, text);
|
|
else
|
|
SendDialogToAll(color, "%s: %s", name, text[len]);
|
|
|
|
LogAction(client, -1, "%L triggered sm_tsay (text %s)", client, text);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmChat(client, args)
|
|
{
|
|
if (args < 1)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_chat <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
SendChatToAdmins(name, text);
|
|
LogAction(client, -1, "%L triggered sm_chat (text %s)", client, text);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmPsay(client, args)
|
|
{
|
|
if (args < 2)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_psay <name or #userid> <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192], String:arg[64], String:message[192];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
new len = BreakString(text, arg, sizeof(arg));
|
|
BreakString(text[len], message, sizeof(message));
|
|
|
|
new target = FindTarget(client, arg, true, false);
|
|
|
|
if (target == -1)
|
|
return Plugin_Handled;
|
|
|
|
decl String:name[64], String:name2[64];
|
|
|
|
if (client == 0)
|
|
{
|
|
name = "Console";
|
|
}
|
|
else
|
|
{
|
|
GetClientName(client, name, sizeof(name));
|
|
}
|
|
|
|
GetClientName(target, name2, sizeof(name2));
|
|
|
|
if (client == 0)
|
|
{
|
|
PrintToServer("(Private: %s) %s: %s", name2, name, message);
|
|
}
|
|
else if (g_DoColor)
|
|
{
|
|
PrintToChat(client, "\x04(Private: %s) %s: \x01%s", name2, name, message);
|
|
}
|
|
else
|
|
{
|
|
PrintToChat(client, "(Private: %s) %s: %s", name2, name, message);
|
|
}
|
|
|
|
if (g_DoColor)
|
|
{
|
|
PrintToChat(target, "\x04(Private: %s) %s: \x01%s", name2, name, message);
|
|
}
|
|
else
|
|
{
|
|
PrintToChat(target, "(Private: %s) %s: %s", name2, name, message);
|
|
}
|
|
|
|
LogAction(client, -1, "%L triggered sm_psay to %L (text %s)", client, target, message);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
public Action:Command_SmMsay(client, args)
|
|
{
|
|
if (args < 1)
|
|
{
|
|
ReplyToCommand(client, "[SM] Usage: sm_msay <message>");
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
decl String:text[192];
|
|
GetCmdArgString(text, sizeof(text));
|
|
|
|
decl String:name[64];
|
|
GetClientName(client, name, sizeof(name));
|
|
|
|
SendPanelToAll(name, text);
|
|
|
|
LogAction(client, -1, "%L triggered sm_msay (text %s)", client, text);
|
|
|
|
return Plugin_Handled;
|
|
}
|
|
|
|
FindColor(String:color[])
|
|
{
|
|
for (new i = 0; i < 13; i++)
|
|
{
|
|
if (strcmp(color, g_ColorNames[i], false) == 0)
|
|
return i;
|
|
}
|
|
|
|
return -1;
|
|
}
|
|
|
|
SendChatToAll(String:name[], String:message[])
|
|
{
|
|
if (g_DoColor)
|
|
{
|
|
PrintToChatAll("\x04(ALL) %s: \x01%s", name, message);
|
|
}
|
|
else
|
|
{
|
|
PrintToChatAll("(ALL) %s: %s", name, message);
|
|
}
|
|
}
|
|
|
|
SendChatToAdmins(String:name[], String:message[])
|
|
{
|
|
new iMaxClients = GetMaxClients();
|
|
|
|
for (new i = 1; i <= iMaxClients; i++)
|
|
{
|
|
if (IsClientInGame(i))
|
|
{
|
|
if (CheckCommandAccess(i, "sm_chat", ADMFLAG_CHAT))
|
|
{
|
|
if (g_DoColor)
|
|
{
|
|
PrintToChat(i, "\x04(ADMINS) %s: \x01%s", name, message);
|
|
}
|
|
else
|
|
{
|
|
PrintToChat(i, "(ADMINS) %s: %s", name, message);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
SendDialogToAll(color = 0, String:text[], any:...)
|
|
{
|
|
new String:message[100];
|
|
VFormat(message, sizeof(message), text, 3);
|
|
|
|
new MaxClients = GetMaxClients();
|
|
for(new i = 1; i < MaxClients; i++)
|
|
{
|
|
if(IsClientInGame(i))
|
|
{
|
|
new Handle:kv = CreateKeyValues("Stuff", "title", message);
|
|
KvSetColor(kv, "color", g_Colors[color][0], g_Colors[color][1], g_Colors[color][2], 255);
|
|
KvSetNum(kv, "level", 1);
|
|
KvSetNum(kv, "time", 10);
|
|
|
|
CreateDialog(i, kv, DialogType_Msg);
|
|
|
|
CloseHandle(kv);
|
|
}
|
|
}
|
|
}
|
|
|
|
SendPanelToAll(String:name[], String:message[])
|
|
{
|
|
decl String:title[100];
|
|
Format(title, 64, "%s:", name);
|
|
|
|
ReplaceString(message, 192, "\\n", "\n");
|
|
|
|
new Handle:mSayPanel = CreatePanel();
|
|
SetPanelTitle(mSayPanel, title);
|
|
DrawPanelItem(mSayPanel, "", ITEMDRAW_SPACER);
|
|
DrawPanelText(mSayPanel, message);
|
|
DrawPanelItem(mSayPanel, "", ITEMDRAW_SPACER);
|
|
|
|
SetPanelCurrentKey(mSayPanel, 10);
|
|
DrawPanelItem(mSayPanel, "Exit", ITEMDRAW_CONTROL);
|
|
|
|
new MaxClients = GetMaxClients();
|
|
for(new i = 1; i < MaxClients; i++)
|
|
{
|
|
if(IsClientInGame(i) && !IsFakeClient(i))
|
|
{
|
|
SendPanelToClient(mSayPanel, i, Handler_DoNothing, 10);
|
|
}
|
|
}
|
|
|
|
CloseHandle(mSayPanel);
|
|
}
|
|
|
|
public Handler_DoNothing(Handle:menu, MenuAction:action, param1, param2)
|
|
{
|
|
/* Do nothing */
|
|
}
|