plugins/playercommands/slap.sp
author Nicholas Hastings <skamonkey@gmail.com>
Wed Aug 01 22:23:03 2012 -0400 (2012-08-01)
changeset 3591 ffbb8efd0b81
parent 2640 fdc0583f4615
permissions -rw-r--r--
Updated Dino D-Day gamedata (bug 5410).
ferret99gt@1801
     1
/**
ferret99gt@1801
     2
 * vim: set ts=4 :
ferret99gt@1801
     3
 * =============================================================================
ferret99gt@1801
     4
 * SourceMod Basefuncommands Plugin
ferret99gt@1801
     5
 * Provides slap functionality
ferret99gt@1801
     6
 *
ds@1947
     7
 * SourceMod (C)2004-2008 AlliedModders LLC.  All rights reserved.
ferret99gt@1801
     8
 * =============================================================================
ferret99gt@1801
     9
 *
ferret99gt@1801
    10
 * This program is free software; you can redistribute it and/or modify it under
ferret99gt@1801
    11
 * the terms of the GNU General Public License, version 3.0, as published by the
ferret99gt@1801
    12
 * Free Software Foundation.
ferret99gt@1801
    13
 * 
ferret99gt@1801
    14
 * This program is distributed in the hope that it will be useful, but WITHOUT
ferret99gt@1801
    15
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ferret99gt@1801
    16
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
ferret99gt@1801
    17
 * details.
ferret99gt@1801
    18
 *
ferret99gt@1801
    19
 * You should have received a copy of the GNU General Public License along with
ferret99gt@1801
    20
 * this program.  If not, see <http://www.gnu.org/licenses/>.
ferret99gt@1801
    21
 *
ferret99gt@1801
    22
 * As a special exception, AlliedModders LLC gives you permission to link the
ferret99gt@1801
    23
 * code of this program (as well as its derivative works) to "Half-Life 2," the
ferret99gt@1801
    24
 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ferret99gt@1801
    25
 * by the Valve Corporation.  You must obey the GNU General Public License in
ferret99gt@1801
    26
 * all respects for all other code used.  Additionally, AlliedModders LLC grants
ferret99gt@1801
    27
 * this exception to all derivative works.  AlliedModders LLC defines further
ferret99gt@1801
    28
 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ferret99gt@1801
    29
 * or <http://www.sourcemod.net/license.php>.
ferret99gt@1801
    30
 *
ferret99gt@1801
    31
 * Version: $Id$
ferret99gt@1801
    32
 */
ferret99gt@1801
    33
 
ferret99gt@1801
    34
new g_SlapDamage[MAXPLAYERS+1];
ferret99gt@1801
    35
ferret99gt@1801
    36
PerformSlap(client, target, damage)
ferret99gt@1801
    37
{
ferret99gt@1801
    38
	LogAction(client, target, "\"%L\" slapped \"%L\" (damage \"%d\")", client, target, damage);
ferret99gt@1801
    39
	SlapPlayer(target, damage, true);
ferret99gt@1801
    40
}
ferret99gt@1801
    41
ferret99gt@1801
    42
DisplaySlapDamageMenu(client)
ferret99gt@1801
    43
{
ferret99gt@1801
    44
	new Handle:menu = CreateMenu(MenuHandler_SlapDamage);
ferret99gt@1801
    45
	
ferret99gt@1801
    46
	decl String:title[100];
ferret99gt@1801
    47
	Format(title, sizeof(title), "%T:", "Slap damage", client);
ferret99gt@1801
    48
	SetMenuTitle(menu, title);
ferret99gt@1801
    49
	SetMenuExitBackButton(menu, true);
ferret99gt@1801
    50
	
ferret99gt@1801
    51
	AddMenuItem(menu, "0", "0");
ferret99gt@1801
    52
	AddMenuItem(menu, "1", "1");
ferret99gt@1801
    53
	AddMenuItem(menu, "5", "5");
ferret99gt@1801
    54
	AddMenuItem(menu, "10", "10");
ferret99gt@1801
    55
	AddMenuItem(menu, "20", "20");
ferret99gt@1801
    56
	AddMenuItem(menu, "50", "50");
ferret99gt@1801
    57
	AddMenuItem(menu, "99", "99");
ferret99gt@1801
    58
	
ferret99gt@1801
    59
	DisplayMenu(menu, client, MENU_TIME_FOREVER);
ferret99gt@1801
    60
}
ferret99gt@1801
    61
ferret99gt@1801
    62
DisplaySlapTargetMenu(client)
ferret99gt@1801
    63
{
ferret99gt@1801
    64
	new Handle:menu = CreateMenu(MenuHandler_Slap);
ferret99gt@1801
    65
	
ferret99gt@1801
    66
	decl String:title[100];
fyrenmoo@2640
    67
	Format(title, sizeof(title), "%T: %d damage", "Slap player", client, g_SlapDamage[client]);
ferret99gt@1801
    68
	SetMenuTitle(menu, title);
ferret99gt@1801
    69
	SetMenuExitBackButton(menu, true);
ferret99gt@1801
    70
	
ferret99gt@1801
    71
	AddTargetsToMenu(menu, client, true, true);
ferret99gt@1801
    72
	
ferret99gt@1801
    73
	DisplayMenu(menu, client, MENU_TIME_FOREVER);
ferret99gt@1801
    74
}
ferret99gt@1801
    75
ferret99gt@1801
    76
public AdminMenu_Slap(Handle:topmenu, 
ferret99gt@1801
    77
					  TopMenuAction:action,
ferret99gt@1801
    78
					  TopMenuObject:object_id,
ferret99gt@1801
    79
					  param,
ferret99gt@1801
    80
					  String:buffer[],
ferret99gt@1801
    81
					  maxlength)
ferret99gt@1801
    82
{
ferret99gt@1801
    83
	if (action == TopMenuAction_DisplayOption)
ferret99gt@1801
    84
	{
ferret99gt@1801
    85
		Format(buffer, maxlength, "%T", "Slap player", param);
ferret99gt@1801
    86
	}
ferret99gt@1801
    87
	else if (action == TopMenuAction_SelectOption)
ferret99gt@1801
    88
	{
ferret99gt@1801
    89
		DisplaySlapDamageMenu(param);
ferret99gt@1801
    90
	}
ferret99gt@1801
    91
}
ferret99gt@1801
    92
ferret99gt@1801
    93
public MenuHandler_SlapDamage(Handle:menu, MenuAction:action, param1, param2)
ferret99gt@1801
    94
{
ferret99gt@1801
    95
	if (action == MenuAction_End)
ferret99gt@1801
    96
	{
ferret99gt@1801
    97
		CloseHandle(menu);
ferret99gt@1801
    98
	}
ferret99gt@1801
    99
	else if (action == MenuAction_Cancel)
ferret99gt@1801
   100
	{
ferret99gt@1801
   101
		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
ferret99gt@1801
   102
		{
ferret99gt@1801
   103
			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
ferret99gt@1801
   104
		}
ferret99gt@1801
   105
	}
ferret99gt@1801
   106
	else if (action == MenuAction_Select)
ferret99gt@1801
   107
	{
ferret99gt@1801
   108
		decl String:info[32];
ferret99gt@1801
   109
		
ferret99gt@1801
   110
		GetMenuItem(menu, param2, info, sizeof(info));
ferret99gt@1801
   111
		g_SlapDamage[param1] = StringToInt(info);
ferret99gt@1801
   112
		
ferret99gt@1801
   113
		DisplaySlapTargetMenu(param1);
ferret99gt@1801
   114
	}
ferret99gt@1801
   115
}
ferret99gt@1801
   116
ferret99gt@1801
   117
public MenuHandler_Slap(Handle:menu, MenuAction:action, param1, param2)
ferret99gt@1801
   118
{
ferret99gt@1801
   119
	if (action == MenuAction_End)
ferret99gt@1801
   120
	{
ferret99gt@1801
   121
		CloseHandle(menu);
ferret99gt@1801
   122
	}
ferret99gt@1801
   123
	else if (action == MenuAction_Cancel)
ferret99gt@1801
   124
	{
ferret99gt@1801
   125
		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
ferret99gt@1801
   126
		{
ferret99gt@1801
   127
			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
ferret99gt@1801
   128
		}
ferret99gt@1801
   129
	}
ferret99gt@1801
   130
	else if (action == MenuAction_Select)
ferret99gt@1801
   131
	{
ferret99gt@1801
   132
		decl String:info[32];
ferret99gt@1801
   133
		new userid, target;
ferret99gt@1801
   134
		
ferret99gt@1801
   135
		GetMenuItem(menu, param2, info, sizeof(info));
ferret99gt@1801
   136
		userid = StringToInt(info);
ferret99gt@1801
   137
ferret99gt@1801
   138
		if ((target = GetClientOfUserId(userid)) == 0)
ferret99gt@1801
   139
		{
ferret99gt@1801
   140
			PrintToChat(param1, "[SM] %t", "Player no longer available");
ferret99gt@1801
   141
		}
ferret99gt@1801
   142
		else if (!CanUserTarget(param1, target))
ferret99gt@1801
   143
		{
ferret99gt@1801
   144
			PrintToChat(param1, "[SM] %t", "Unable to target");
ferret99gt@1801
   145
		}
ferret99gt@1801
   146
		else if (!IsPlayerAlive(target))
ferret99gt@1801
   147
		{
ferret99gt@1801
   148
			ReplyToCommand(param1, "[SM] %t", "Player has since died");
ferret99gt@1801
   149
		}	
ferret99gt@1801
   150
		else
ferret99gt@1801
   151
		{
ferret99gt@1801
   152
			decl String:name[32];
ferret99gt@1801
   153
			GetClientName(target, name, sizeof(name));
ferret99gt@1801
   154
			PerformSlap(param1, target, g_SlapDamage[param1]);
ferret99gt@1801
   155
			ShowActivity2(param1, "[SM] ", "%t", "Slapped target", "_s", name);
ferret99gt@1801
   156
		}
ferret99gt@1801
   157
		
ferret99gt@1801
   158
		DisplaySlapTargetMenu(param1);
ferret99gt@1801
   159
	}
ferret99gt@1801
   160
}
ferret99gt@1801
   161
ferret99gt@1801
   162
public Action:Command_Slap(client, args)
ferret99gt@1801
   163
{
ferret99gt@1801
   164
	if (args < 1)
ferret99gt@1801
   165
	{
ferret99gt@1801
   166
		ReplyToCommand(client, "[SM] Usage: sm_slap <#userid|name> [damage]");
ferret99gt@1801
   167
		return Plugin_Handled;
ferret99gt@1801
   168
	}
ferret99gt@1801
   169
ferret99gt@1801
   170
	decl String:arg[65];
ferret99gt@1801
   171
	GetCmdArg(1, arg, sizeof(arg));
ferret99gt@1801
   172
ferret99gt@1801
   173
	new damage = 0;
ferret99gt@1801
   174
	if (args > 1)
ferret99gt@1801
   175
	{
ferret99gt@1801
   176
		decl String:arg2[20];
ferret99gt@1801
   177
		GetCmdArg(2, arg2, sizeof(arg2));
dvander@1899
   178
		if (StringToIntEx(arg2, damage) == 0 || damage < 0)
ferret99gt@1801
   179
		{
ferret99gt@1801
   180
			ReplyToCommand(client, "[SM] %t", "Invalid Amount");
ferret99gt@1801
   181
			return Plugin_Handled;
ferret99gt@1801
   182
		}
ferret99gt@1801
   183
	}
ferret99gt@1801
   184
	
ferret99gt@1801
   185
	decl String:target_name[MAX_TARGET_LENGTH];
ferret99gt@1801
   186
	decl target_list[MAXPLAYERS], target_count, bool:tn_is_ml;
ferret99gt@1801
   187
	
ferret99gt@1801
   188
	if ((target_count = ProcessTargetString(
ferret99gt@1801
   189
			arg,
ferret99gt@1801
   190
			client,
ferret99gt@1801
   191
			target_list,
ferret99gt@1801
   192
			MAXPLAYERS,
ferret99gt@1801
   193
			COMMAND_FILTER_ALIVE,
ferret99gt@1801
   194
			target_name,
ferret99gt@1801
   195
			sizeof(target_name),
ferret99gt@1801
   196
			tn_is_ml)) <= 0)
ferret99gt@1801
   197
	{
ferret99gt@1801
   198
		ReplyToTargetError(client, target_count);
ferret99gt@1801
   199
		return Plugin_Handled;
ferret99gt@1801
   200
	}
ferret99gt@1801
   201
	
ferret99gt@1801
   202
	for (new i = 0; i < target_count; i++)
ferret99gt@1801
   203
	{
ferret99gt@1801
   204
		PerformSlap(client, target_list[i], damage);
ferret99gt@1801
   205
	}
ferret99gt@1801
   206
ferret99gt@1801
   207
	if (tn_is_ml)
ferret99gt@1801
   208
	{
ferret99gt@1801
   209
		ShowActivity2(client, "[SM] ", "%t", "Slapped target", target_name);
ferret99gt@1801
   210
	}
ferret99gt@1801
   211
	else
ferret99gt@1801
   212
	{
ferret99gt@1801
   213
		ShowActivity2(client, "[SM] ", "%t", "Slapped target", "_s", target_name);
ferret99gt@1801
   214
	}
ferret99gt@1801
   215
ferret99gt@1801
   216
	return Plugin_Handled;
ferret99gt@1801
   217
}