plugins/basefuncommands.sp
author David Anderson <dvander@alliedmods.net>
Wed Dec 12 22:45:23 2007 +0000 (2007-12-12)
changeset 1788 6b5331ae47c4
parent 1785 21fb423ab195
child 1791 38e83ea09a24
permissions -rw-r--r--
fixed for amb1279 from ferret
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"
ferret99gt@1785
    57
#include "basefuncommands/beacon.sp"
pred@1536
    58
ferret99gt@1194
    59
public OnPluginStart()
ferret99gt@1194
    60
{
ferret99gt@1194
    61
	LoadTranslations("common.phrases");
dvander@1624
    62
	LoadTranslations("basefuncommands.phrases");
ferret99gt@1194
    63
ferret99gt@1194
    64
	RegAdminCmd("sm_burn", Command_Burn, ADMFLAG_SLAY, "sm_burn <#userid|name> [time]");
ferret99gt@1194
    65
	RegAdminCmd("sm_slap", Command_Slap, ADMFLAG_SLAY, "sm_slap <#userid|name> [damage]");
ferret99gt@1194
    66
	RegAdminCmd("sm_slay", Command_Slay, ADMFLAG_SLAY, "sm_slay <#userid|name>");
ferret99gt@1785
    67
	RegAdminCmd("sm_beacon", Command_Beacon, ADMFLAG_SLAY, "sm_beacon <#userid|name>");
teame06@1214
    68
	RegAdminCmd("sm_play", Command_Play, ADMFLAG_GENERIC, "sm_play <#userid|name> <filename>");
pred@1536
    69
	
pred@1536
    70
	/* Account for late loading */
pred@1536
    71
	new Handle:topmenu;
pred@1536
    72
	if (LibraryExists("adminmenu") && ((topmenu = GetAdminTopMenu()) != INVALID_HANDLE))
pred@1536
    73
	{
pred@1536
    74
		OnAdminMenuReady(topmenu);
pred@1536
    75
	}
pred@1536
    76
}
pred@1536
    77
dvander@1788
    78
public OnMapStart()
dvander@1788
    79
{
dvander@1788
    80
	SetupBeacon();	
dvander@1788
    81
}
dvander@1788
    82
ferret99gt@1785
    83
public OnMapEnd()
ferret99gt@1785
    84
{
ferret99gt@1785
    85
	KillAllBeacons();
ferret99gt@1785
    86
}
ferret99gt@1785
    87
pred@1536
    88
public OnAdminMenuReady(Handle:topmenu)
pred@1536
    89
{
pred@1536
    90
	/* Block us from being called twice */
pred@1536
    91
	if (topmenu == hTopMenu)
pred@1536
    92
	{
pred@1536
    93
		return;
pred@1536
    94
	}
pred@1536
    95
	
pred@1536
    96
	/* Save the Handle */
pred@1536
    97
	hTopMenu = topmenu;
pred@1536
    98
	
pred@1536
    99
	/* Find the "Player Commands" category */
pred@1536
   100
	new TopMenuObject:player_commands = FindTopMenuCategory(hTopMenu, ADMINMENU_PLAYERCOMMANDS);
pred@1536
   101
pred@1536
   102
	if (player_commands != INVALID_TOPMENUOBJECT)
pred@1536
   103
	{
pred@1536
   104
		AddToTopMenu(hTopMenu,
dvander@1600
   105
			"sm_slay",
pred@1536
   106
			TopMenuObject_Item,
pred@1536
   107
			AdminMenu_Slay,
pred@1536
   108
			player_commands,
pred@1536
   109
			"sm_slay",
pred@1536
   110
			ADMFLAG_SLAY);
pred@1536
   111
			
pred@1536
   112
		AddToTopMenu(hTopMenu,
dvander@1600
   113
			"sm_burn",
pred@1536
   114
			TopMenuObject_Item,
pred@1536
   115
			AdminMenu_Burn,
pred@1536
   116
			player_commands,
pred@1536
   117
			"sm_burn",
pred@1536
   118
			ADMFLAG_SLAY);
pred@1536
   119
			
pred@1536
   120
		AddToTopMenu(hTopMenu,
dvander@1600
   121
			"sm_slap",
pred@1536
   122
			TopMenuObject_Item,
pred@1536
   123
			AdminMenu_Slap,
pred@1536
   124
			player_commands,
pred@1536
   125
			"sm_slap",
pred@1536
   126
			ADMFLAG_SLAY);	
ferret99gt@1785
   127
			
ferret99gt@1785
   128
		AddToTopMenu(hTopMenu,
ferret99gt@1785
   129
			"sm_beacon",
ferret99gt@1785
   130
			TopMenuObject_Item,
ferret99gt@1785
   131
			AdminMenu_Beacon,
ferret99gt@1785
   132
			player_commands,
ferret99gt@1785
   133
			"sm_beacon",
ferret99gt@1785
   134
			ADMFLAG_SLAY);			
pred@1536
   135
	}
teame06@1212
   136
}
teame06@1212
   137
teame06@1212
   138
public Action:Command_Play(client, args)
teame06@1212
   139
{
teame06@1241
   140
	if (args < 2)
teame06@1212
   141
	{
teame06@1214
   142
		ReplyToCommand(client, "[SM] Usage: sm_play <#userid|name> <filename>");
teame06@1212
   143
	}
teame06@1212
   144
teame06@1214
   145
	new String:Arguments[PLATFORM_MAX_PATH + 65];
teame06@1214
   146
	GetCmdArgString(Arguments, sizeof(Arguments));
teame06@1214
   147
teame06@1214
   148
 	decl String:Arg[65];
teame06@1214
   149
	new len = BreakString(Arguments, Arg, sizeof(Arg));
teame06@1212
   150
teame06@1214
   151
	/* Make sure it does not go out of bound by doing "sm_play user  "*/
teame06@1241
   152
	if (len == -1)
teame06@1214
   153
	{
teame06@1214
   154
		ReplyToCommand(client, "[SM] Usage: sm_play <#userid|name> <filename>");
teame06@1214
   155
		return Plugin_Handled;
teame06@1214
   156
	}
teame06@1212
   157
teame06@1214
   158
	/* Incase they put quotes and white spaces after the quotes */
teame06@1241
   159
	if (Arguments[len] == '"')
teame06@1214
   160
	{
teame06@1214
   161
		len++;
teame06@1214
   162
		new FileLen = TrimString(Arguments[len]) + len;
teame06@1214
   163
teame06@1241
   164
		if (Arguments[FileLen - 1] == '"')
teame06@1214
   165
		{
teame06@1214
   166
			Arguments[FileLen - 1] = '\0';
teame06@1214
   167
		}
teame06@1214
   168
	}
dvander@1624
   169
	
dvander@1624
   170
	decl String:target_name[MAX_TARGET_LENGTH];
dvander@1624
   171
	decl target_list[MAXPLAYERS], target_count, bool:tn_is_ml;
dvander@1624
   172
	
dvander@1624
   173
	if ((target_count = ProcessTargetString(
dvander@1624
   174
			Arg,
dvander@1624
   175
			client,
dvander@1624
   176
			target_list,
dvander@1624
   177
			MAXPLAYERS,
dvander@1624
   178
			COMMAND_FILTER_NO_BOTS,
dvander@1624
   179
			target_name,
dvander@1624
   180
			sizeof(target_name),
dvander@1624
   181
			tn_is_ml)) <= 0)
dvander@1624
   182
	{
dvander@1624
   183
		ReplyToTargetError(client, target_count);
dvander@1624
   184
		return Plugin_Handled;
dvander@1624
   185
	}
dvander@1624
   186
	
dvander@1624
   187
	for (new i = 0; i < target_count; i++)
dvander@1624
   188
	{
dvander@1624
   189
		ClientCommand(target_list[i], "playgamesound \"%s\"", Arguments[len]);
dvander@1624
   190
		LogAction(client, target_list[i], "\"%L\" played sound on \"%L\" (file \"%s\")", client, target_list[i], Arguments[len]);	
dvander@1624
   191
	}
dvander@1624
   192
	
dvander@1624
   193
	if (tn_is_ml)
dvander@1624
   194
	{
dvander@1624
   195
		ShowActivity2(client, "[SM] ", "%t", "Played sound to target", target_name);
dvander@1624
   196
	}
dvander@1624
   197
	else
dvander@1624
   198
	{
dvander@1624
   199
		ShowActivity2(client, "[SM] ", "%t", "Played sound to target", "_s", target_name);
dvander@1624
   200
	}
teame06@1212
   201
teame06@1212
   202
	return Plugin_Handled;
ferret99gt@1194
   203
}