From 1cfbd3c4a3b2c98178c1ade9a3382692b28fa9e9 Mon Sep 17 00:00:00 2001 From: Michael McKoy Date: Thu, 26 Jul 2007 21:37:13 +0000 Subject: [PATCH] Import --HG-- extra : convert_revision : svn%3A39bc706e-5318-0410-9160-8a85361fbb7c/trunk%401180 --- plugins/basechat.sp | 551 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 551 insertions(+) create mode 100644 plugins/basechat.sp diff --git a/plugins/basechat.sp b/plugins/basechat.sp new file mode 100644 index 00000000..42fceff3 --- /dev/null +++ b/plugins/basechat.sp @@ -0,0 +1,551 @@ +/** + * basechat.sp + * Implements basic communication commands + * This file is part of SourceMod, Copyright (C) 2004-2007 AlliedModders LLC + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * 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, write to the Free Software + * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + * + * Version: $Id$ + */ + +#include + +#pragma semicolon 1 + +public Plugin:myinfo = +{ + name = "Basic Chat", + author = "AlliedModders LLC", + description = "Basic Communication Commands", + version = SOURCEMOD_VERSION, + url = "http://www.sourcemod.net/" +}; + +decl 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 Handle:g_Cvar_Psaymode = INVALID_HANDLE; + +new bool:g_DoColor = false; + +#if 0 +new g_INS = false; +#endif + +public OnPluginStart() +{ + LoadTranslations("common.phrases"); + LoadTranslations("plugin.basecommands"); + + g_Cvar_Chatmode = CreateConVar("sm_chat_mode", "1", "Allows player's to send messages to admin chat.", 0, true, 0.0, true, 1.0); + g_Cvar_Psaymode = CreateConVar("sm_psay_mode", "0", "Allows player's to use psay 'say @@' alias.", 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 - sends message to all players"); + RegAdminCmd("sm_csay", Command_SmCsay, ADMFLAG_CHAT, "sm_csay - sends centered message to all players"); + //RegAdminCmd("sm_hsay", Command_SmHsay, ADMFLAG_CHAT, "sm_hsay - sends hint message to all players"); + RegAdminCmd("sm_tsay", Command_SmTsay, ADMFLAG_CHAT, "sm_tsay [color] - sends top-left message to all players"); + RegAdminCmd("sm_chat", Command_SmChat, ADMFLAG_CHAT, "sm_chat - sends message to admins"); + RegAdminCmd("sm_psay", Command_SmPsay, ADMFLAG_CHAT, "sm_psay - sends private message"); + RegAdminCmd("sm_msay", Command_SmMsay, ADMFLAG_CHAT, "sm_msay - sends message as a menu panel"); + + decl String:modname[64]; + GetGameFolderName(modname, sizeof(modname)); + + if (strcmp(modname, "cstrike") == 0) + { + g_DoColor = true; + RegAdminCmd("sm_hsay", Command_SmHsay, ADMFLAG_CHAT, "sm_hsay - sends hint message to all players"); + } + + #if 0 + if (strcmp(modname, "ins") == 0) + { + RegConsoleCmd("say2", Command_SayChat); + g_INS = true; + } + #endif +} + +public Action:Command_SayChat(client, args) +{ + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + new startidx; + if (text[strlen(text)-1] == '"') + { + text[strlen(text)-1] = '\0'; + startidx = 1; + } + + #if 0 + if (g_INS) + { + startidx += 4; + } + #endif + + if (text[startidx] != '@') + return Plugin_Continue; + + new msgStart = 1; + + if (text[startidx+1] == '@') + { + msgStart = 2; + + if (text[startidx+2] == '@') + msgStart = 3; + } + + decl String:message[192]; + strcopy(message, 192, text[startidx+msgStart]); + + decl String:name[64]; + GetClientName(client, name, sizeof(name)); + + if (msgStart == 1 && CheckAdminForChat(client)) // sm_say alias + { + SendChatToAll(name, message); + LogMessage("%L triggered sm_say (text %s)", client, message); + } + else if (msgStart == 3 && CheckAdminForChat(client)) // sm_csay alias + { + PrintCenterTextAll("%s: %s", name, message); + LogMessage("%L triggered sm_csay (text %s)", client, text); + } + else if (msgStart == 2 && (CheckAdminForChat(client) || GetConVarBool(g_Cvar_Psaymode))) // sm_psay alias + { + decl String:target[64]; + + new len = BreakString(message, target, sizeof(target)); + + new clients[2]; + new numClients = SearchForClients(target, clients, 2); + + if (numClients == 0) + { + PrintToChat(client, "[SM] %t", "No matching client"); + return Plugin_Handled; + } + else if (numClients > 1) + { + PrintToChat(client, "[SM] %t", "More than one client matches", target); + return Plugin_Handled; + } + + decl String:name2[64]; + GetClientName(clients[0], name2, sizeof(name2)); + + if (g_DoColor) + { + PrintToChat(client, "\x04(Private to %s) %s: \x01%s", name2, name, message[len]); + PrintToChat(clients[0], "\x04(Private to %s) %s: \x01%s", name2, name, message[len]); + } + else + { + PrintToChat(client, "(Private to %s) %s: %s", name2, name, message[len]); + PrintToChat(clients[0], "(Private to %s) %s: %s", name2, name, message[len]); + } + + LogMessage("%L triggered sm_psay to %L (text %s)", client, clients[0], message); + } + else + return Plugin_Continue; + + return Plugin_Handled; +} + +public Action:Command_SayAdmin(client, args) +{ + if (!CheckAdminForChat(client) && !GetConVarBool(g_Cvar_Chatmode)) + return Plugin_Continue; + + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + new startidx; + if (text[strlen(text)-1] == '"') + { + text[strlen(text)-1] = '\0'; + startidx = 1; + } + + #if 0 + if (g_INS) + { + startidx += 4; + } + #endif + + if (text[startidx] != '@') + 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); + LogMessage("%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 "); + return Plugin_Handled; + } + + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + decl String:name[64]; + GetClientName(client, name, sizeof(name)); + + SendChatToAll(name, text); + LogMessage("%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 "); + 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); + LogMessage("%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 "); + return Plugin_Handled; + } + + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + decl String:name[64]; + GetClientName(client, name, sizeof(name)); + + SendHintToAll("%s: %s", name, text); + LogMessage("%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 "); + 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]); + + LogMessage("%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 "); + return Plugin_Handled; + } + + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + decl String:name[64]; + GetClientName(client, name, sizeof(name)); + + SendChatToAdmins(name, text); + LogMessage("%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 "); + return Plugin_Handled; + } + + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + decl String:target[64], String:message[192]; + + new len = BreakString(text, target, sizeof(target)); + BreakString(text[len], message, sizeof(message)); + + new clients[2]; + new numClients = SearchForClients(target, clients, 2); + + if (numClients == 0) + { + ReplyToCommand(client, "[SM] %t", "No matching client"); + return Plugin_Handled; + } + else if (numClients > 1) + { + ReplyToCommand(client, "[SM] %t", "More than one client matches", target); + return Plugin_Handled; + } + else if (!CanUserTarget(client, clients[0])) + { + ReplyToCommand(client, "[SM] %t", "Unable to target"); + return Plugin_Handled; + } + + decl String:name[64], String:name2[64]; + GetClientName(client, name, sizeof(name)); + GetClientName(clients[0], name2, sizeof(name2)); + + if (g_DoColor) + { + PrintToChat(client, "\x04(Private: %s) %s: \x01%s", name2, name, message); + PrintToChat(clients[0], "\x04(Private: %s) %s: \x01%s", name2, name, message); + } + else + { + PrintToChat(client, "(Private: %s) %s: %s", name2, name, message); + PrintToChat(clients[0], "(Private: %s) %s: %s", name2, name, message); + } + + LogMessage("%L triggered sm_psay to %L (text %s)", client, clients[0], message); + + return Plugin_Handled; +} + +public Action:Command_SmMsay(client, args) +{ + if (args < 1) + { + ReplyToCommand(client, "[SM] Usage: sm_msay "); + return Plugin_Handled; + } + + decl String:text[192]; + GetCmdArgString(text, sizeof(text)); + + decl String:name[64]; + GetClientName(client, name, sizeof(name)); + + SendPanelToAll(name, text); + + LogMessage("%L triggered sm_msay (text %s)", client, text); + + return Plugin_Handled; +} + +bool:CheckAdminForChat(client) +{ + new AdminId:aid = GetUserAdmin(client); + + if (aid == INVALID_ADMIN_ID) + { + return false; + } + + return GetAdminFlag(aid, Admin_Chat, Access_Effective); +} + +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 (CheckAdminForChat(i)) + { + if (g_DoColor) + { + PrintToChat(i, "\x04(ADMINS) %s: \x01%s", name, message); + } + else + { + PrintToChat(i, "(ADMINS) %s: %s", name, message); + } + } + } + } +} + +SendHintToAll(String:text[], any:...) +{ + new String:message[192]; + VFormat(message, 191, text, 2); + + new iLen = strlen(message); + + if (iLen > 30) + { + new iLastAdded = 0; + + for (new i = 0; i < iLen; i++) + { + if((message[i] == ' ' && iLastAdded > 30 && (iLen - i) > 10) || ((GetNextSpaceCount(text, i + 1) + iLastAdded) > 34)) + { + message[i] = '\n'; + iLastAdded = 0; + } + else + iLastAdded++; + } + } + + new Handle:hHintMessage = StartMessageAll("HintText"); + BfWriteByte(hHintMessage, -1); + BfWriteString(hHintMessage, message); + EndMessage(); +} + +GetNextSpaceCount(String:text[], iCurIndex) +{ + new iCount = 0; + new iLen = strlen(text); + + for (new i = iCurIndex; i < iLen; i++) + { + if (text[i] == ' ') + return iCount; + else + iCount++; + } + + return iCount; +} + +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 */ +} \ No newline at end of file