plugins/basefuncommands.sp
author Matt Woodrow <pred@alliedmods.net>
Mon Nov 12 21:51:54 2007 +0000 (2007-11-12)
changeset 1676 df6b4e53cca0
parent 1624 709b1f973c05
child 1785 21fb423ab195
permissions -rw-r--r--
Fixed amb1154 and another kick bug with sm_reserve_type 1
ferret99gt@1194
     1
/**
ds@1330
     2
 * vim: set ts=4 :
ds@1330
     3
 * =============================================================================
ds@1330
     4
 * SourceMod Basic Fun Commands Plugin
ferret99gt@1194
     5
 * Implements basic punishment commands.
ds@1330
     6
 *
ds@1330
     7
 * SourceMod (C)2004-2007 AlliedModders LLC.  All rights reserved.
ds@1330
     8
 * =============================================================================
ferret99gt@1194
     9
 *
ds@1330
    10
 * This program is free software; you can redistribute it and/or modify it under
ds@1330
    11
 * the terms of the GNU General Public License, version 3.0, as published by the
ds@1330
    12
 * Free Software Foundation.
ds@1330
    13
 * 
ds@1330
    14
 * This program is distributed in the hope that it will be useful, but WITHOUT
ds@1330
    15
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ds@1330
    16
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
ds@1330
    17
 * details.
ferret99gt@1194
    18
 *
ds@1330
    19
 * You should have received a copy of the GNU General Public License along with
ds@1330
    20
 * this program.  If not, see <http://www.gnu.org/licenses/>.
teame06@1212
    21
 *
ds@1330
    22
 * As a special exception, AlliedModders LLC gives you permission to link the
ds@1330
    23
 * code of this program (as well as its derivative works) to "Half-Life 2," the
ds@1330
    24
 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ds@1330
    25
 * by the Valve Corporation.  You must obey the GNU General Public License in
ds@1330
    26
 * all respects for all other code used.  Additionally, AlliedModders LLC grants
ds@1330
    27
 * this exception to all derivative works.  AlliedModders LLC defines further
ds@1330
    28
 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ds@1330
    29
 * or <http://www.sourcemod.net/license.php>.
ferret99gt@1194
    30
 *
ferret99gt@1194
    31
 * Version: $Id$
ferret99gt@1194
    32
 */
ferret99gt@1194
    33
ferret99gt@1194
    34
#pragma semicolon 1
ferret99gt@1194
    35
ferret99gt@1194
    36
#include <sourcemod>
ferret99gt@1194
    37
#include <sdktools>
pred@1536
    38
#undef REQUIRE_PLUGIN
pred@1536
    39
#include <adminmenu>
ferret99gt@1194
    40
teame06@1212
    41
public Plugin:myinfo =
ferret99gt@1194
    42
{
ferret99gt@1194
    43
	name = "Basic Fun Commands",
ferret99gt@1194
    44
	author = "AlliedModders LLC",
ferret99gt@1194
    45
	description = "Basic Fun Commands",
ferret99gt@1194
    46
	version = SOURCEMOD_VERSION,
ferret99gt@1194
    47
	url = "http://www.sourcemod.net/"
ferret99gt@1194
    48
};
ferret99gt@1194
    49
pred@1536
    50
new Handle:hTopMenu = INVALID_HANDLE;
pred@1536
    51
pred@1536
    52
new g_SlapDamage[MAXPLAYERS+1];
pred@1536
    53
pred@1536
    54
#include "basefuncommands/slay.sp"
pred@1536
    55
#include "basefuncommands/burn.sp"
pred@1536
    56
#include "basefuncommands/slap.sp"
pred@1536
    57
ferret99gt@1194
    58
public OnPluginStart()
ferret99gt@1194
    59
{
ferret99gt@1194
    60
	LoadTranslations("common.phrases");
dvander@1624
    61
	LoadTranslations("basefuncommands.phrases");
ferret99gt@1194
    62
ferret99gt@1194
    63
	RegAdminCmd("sm_burn", Command_Burn, ADMFLAG_SLAY, "sm_burn <#userid|name> [time]");
ferret99gt@1194
    64
	RegAdminCmd("sm_slap", Command_Slap, ADMFLAG_SLAY, "sm_slap <#userid|name> [damage]");
ferret99gt@1194
    65
	RegAdminCmd("sm_slay", Command_Slay, ADMFLAG_SLAY, "sm_slay <#userid|name>");
teame06@1214
    66
	RegAdminCmd("sm_play", Command_Play, ADMFLAG_GENERIC, "sm_play <#userid|name> <filename>");
pred@1536
    67
	
pred@1536
    68
	/* Account for late loading */
pred@1536
    69
	new Handle:topmenu;
pred@1536
    70
	if (LibraryExists("adminmenu") && ((topmenu = GetAdminTopMenu()) != INVALID_HANDLE))
pred@1536
    71
	{
pred@1536
    72
		OnAdminMenuReady(topmenu);
pred@1536
    73
	}
pred@1536
    74
}
pred@1536
    75
pred@1536
    76
public OnAdminMenuReady(Handle:topmenu)
pred@1536
    77
{
pred@1536
    78
	/* Block us from being called twice */
pred@1536
    79
	if (topmenu == hTopMenu)
pred@1536
    80
	{
pred@1536
    81
		return;
pred@1536
    82
	}
pred@1536
    83
	
pred@1536
    84
	/* Save the Handle */
pred@1536
    85
	hTopMenu = topmenu;
pred@1536
    86
	
pred@1536
    87
	/* Find the "Player Commands" category */
pred@1536
    88
	new TopMenuObject:player_commands = FindTopMenuCategory(hTopMenu, ADMINMENU_PLAYERCOMMANDS);
pred@1536
    89
pred@1536
    90
	if (player_commands != INVALID_TOPMENUOBJECT)
pred@1536
    91
	{
pred@1536
    92
		AddToTopMenu(hTopMenu,
dvander@1600
    93
			"sm_slay",
pred@1536
    94
			TopMenuObject_Item,
pred@1536
    95
			AdminMenu_Slay,
pred@1536
    96
			player_commands,
pred@1536
    97
			"sm_slay",
pred@1536
    98
			ADMFLAG_SLAY);
pred@1536
    99
			
pred@1536
   100
		AddToTopMenu(hTopMenu,
dvander@1600
   101
			"sm_burn",
pred@1536
   102
			TopMenuObject_Item,
pred@1536
   103
			AdminMenu_Burn,
pred@1536
   104
			player_commands,
pred@1536
   105
			"sm_burn",
pred@1536
   106
			ADMFLAG_SLAY);
pred@1536
   107
			
pred@1536
   108
		AddToTopMenu(hTopMenu,
dvander@1600
   109
			"sm_slap",
pred@1536
   110
			TopMenuObject_Item,
pred@1536
   111
			AdminMenu_Slap,
pred@1536
   112
			player_commands,
pred@1536
   113
			"sm_slap",
pred@1536
   114
			ADMFLAG_SLAY);	
pred@1536
   115
	}
teame06@1212
   116
}
teame06@1212
   117
teame06@1212
   118
public Action:Command_Play(client, args)
teame06@1212
   119
{
teame06@1241
   120
	if (args < 2)
teame06@1212
   121
	{
teame06@1214
   122
		ReplyToCommand(client, "[SM] Usage: sm_play <#userid|name> <filename>");
teame06@1212
   123
	}
teame06@1212
   124
teame06@1214
   125
	new String:Arguments[PLATFORM_MAX_PATH + 65];
teame06@1214
   126
	GetCmdArgString(Arguments, sizeof(Arguments));
teame06@1214
   127
teame06@1214
   128
 	decl String:Arg[65];
teame06@1214
   129
	new len = BreakString(Arguments, Arg, sizeof(Arg));
teame06@1212
   130
teame06@1214
   131
	/* Make sure it does not go out of bound by doing "sm_play user  "*/
teame06@1241
   132
	if (len == -1)
teame06@1214
   133
	{
teame06@1214
   134
		ReplyToCommand(client, "[SM] Usage: sm_play <#userid|name> <filename>");
teame06@1214
   135
		return Plugin_Handled;
teame06@1214
   136
	}
teame06@1212
   137
teame06@1214
   138
	/* Incase they put quotes and white spaces after the quotes */
teame06@1241
   139
	if (Arguments[len] == '"')
teame06@1214
   140
	{
teame06@1214
   141
		len++;
teame06@1214
   142
		new FileLen = TrimString(Arguments[len]) + len;
teame06@1214
   143
teame06@1241
   144
		if (Arguments[FileLen - 1] == '"')
teame06@1214
   145
		{
teame06@1214
   146
			Arguments[FileLen - 1] = '\0';
teame06@1214
   147
		}
teame06@1214
   148
	}
dvander@1624
   149
	
dvander@1624
   150
	decl String:target_name[MAX_TARGET_LENGTH];
dvander@1624
   151
	decl target_list[MAXPLAYERS], target_count, bool:tn_is_ml;
dvander@1624
   152
	
dvander@1624
   153
	if ((target_count = ProcessTargetString(
dvander@1624
   154
			Arg,
dvander@1624
   155
			client,
dvander@1624
   156
			target_list,
dvander@1624
   157
			MAXPLAYERS,
dvander@1624
   158
			COMMAND_FILTER_NO_BOTS,
dvander@1624
   159
			target_name,
dvander@1624
   160
			sizeof(target_name),
dvander@1624
   161
			tn_is_ml)) <= 0)
dvander@1624
   162
	{
dvander@1624
   163
		ReplyToTargetError(client, target_count);
dvander@1624
   164
		return Plugin_Handled;
dvander@1624
   165
	}
dvander@1624
   166
	
dvander@1624
   167
	for (new i = 0; i < target_count; i++)
dvander@1624
   168
	{
dvander@1624
   169
		ClientCommand(target_list[i], "playgamesound \"%s\"", Arguments[len]);
dvander@1624
   170
		LogAction(client, target_list[i], "\"%L\" played sound on \"%L\" (file \"%s\")", client, target_list[i], Arguments[len]);	
dvander@1624
   171
	}
dvander@1624
   172
	
dvander@1624
   173
	if (tn_is_ml)
dvander@1624
   174
	{
dvander@1624
   175
		ShowActivity2(client, "[SM] ", "%t", "Played sound to target", target_name);
dvander@1624
   176
	}
dvander@1624
   177
	else
dvander@1624
   178
	{
dvander@1624
   179
		ShowActivity2(client, "[SM] ", "%t", "Played sound to target", "_s", target_name);
dvander@1624
   180
	}
teame06@1212
   181
teame06@1212
   182
	return Plugin_Handled;
ferret99gt@1194
   183
}