plugins/basefuncommands.sp
author Michael McKoy <ferret99gt@gmail.com>
Sat Jan 12 19:45:36 2008 +0000 (2008-01-12)
changeset 1845 a2e4c1cbf800
parent 1821 214e212a8c04
child 1853 b046cf080755
permissions -rw-r--r--
New stock to get m_fFlags, and #defines for its bits.
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
ferret99gt@1821
    50
// -------------------------------------------------------------------------------
ferret99gt@1821
    51
// Set any of these to 0 and recompile to completely disable those commands
ferret99gt@1821
    52
// -------------------------------------------------------------------------------
ferret99gt@1821
    53
#define BEACON		1
ferret99gt@1821
    54
#define TIMEBOMB	1
ferret99gt@1821
    55
#define FIRE		1
ferret99gt@1821
    56
#define ICE			1
ferret99gt@1821
    57
#define GRAVITY		1
ferret99gt@1821
    58
#define BLIND		1
ferret99gt@1821
    59
#define NOCLIP		1
ferret99gt@1821
    60
#define DRUG		1
ferret99gt@1821
    61
#define TELEPORT	1
ferret99gt@1821
    62
#define HEALTH		1
ferret99gt@1821
    63
#define COLORS		1
ferret99gt@1821
    64
#define CASH		1
ferret99gt@1821
    65
// -------------------------------------------------------------------------------
ferret99gt@1821
    66
pred@1536
    67
new Handle:hTopMenu = INVALID_HANDLE;
pred@1536
    68
ferret99gt@1801
    69
// Sounds
ferret99gt@1801
    70
#define SOUND_BLIP		"buttons/blip1.wav"
ferret99gt@1801
    71
#define SOUND_BEEP		"buttons/button17.wav"
ferret99gt@1801
    72
#define SOUND_FINAL		"weapons/cguard/charging.wav"
ferret99gt@1801
    73
#define SOUND_BOOM		"weapons/explode3.wav"
ferret99gt@1801
    74
#define SOUND_FREEZE		"physics/glass/glass_impact_bullet4.wav"
ferret99gt@1801
    75
ferret99gt@1801
    76
// Following are model indexes for temp entities
ferret99gt@1801
    77
new g_BeamSprite;
ferret99gt@1801
    78
new g_BeamSprite2;
ferret99gt@1801
    79
new g_HaloSprite;
ferret99gt@1801
    80
new g_GlowSprite;
ferret99gt@1801
    81
new g_ExplosionSprite;
pred@1536
    82
ferret99gt@1801
    83
// Basic color arrays for temp entities
ferret99gt@1801
    84
new redColor[4] = {255, 75, 75, 255};
ferret99gt@1801
    85
new orangeColor[4] = {255, 128, 0, 255};
ferret99gt@1801
    86
new greenColor[4] = {75, 255, 75, 255};
ferret99gt@1801
    87
new blueColor[4] = {75, 75, 255, 255};
ferret99gt@1801
    88
new whiteColor[4] = {255, 255, 255, 255};
ferret99gt@1801
    89
new greyColor[4] = {128, 128, 128, 255};
ferret99gt@1801
    90
ferret99gt@1821
    91
// UserMessageId for Fade.
ferret99gt@1821
    92
new UserMsg:g_FadeUserMsgId;
ferret99gt@1801
    93
ferret99gt@1801
    94
// Include various commands and supporting functions
ferret99gt@1821
    95
#if BEACON
ferret99gt@1785
    96
#include "basefuncommands/beacon.sp"
ferret99gt@1821
    97
#endif
ferret99gt@1821
    98
#if TIMEBOMB
ferret99gt@1801
    99
#include "basefuncommands/timebomb.sp"
ferret99gt@1821
   100
#endif
ferret99gt@1821
   101
#if FIRE
ferret99gt@1801
   102
#include "basefuncommands/fire.sp"
ferret99gt@1821
   103
#endif
ferret99gt@1821
   104
#if ICE
ferret99gt@1801
   105
#include "basefuncommands/ice.sp"
ferret99gt@1821
   106
#endif
ferret99gt@1821
   107
#if GRAVITY
ferret99gt@1821
   108
#include "basefuncommands/gravity.sp"
ferret99gt@1821
   109
#endif
ferret99gt@1821
   110
#if BLIND
ferret99gt@1821
   111
#include "basefuncommands/blind.sp"
ferret99gt@1821
   112
#endif
ferret99gt@1821
   113
#if NOCLIP
ferret99gt@1821
   114
#include "basefuncommands/noclip.sp"
ferret99gt@1821
   115
#endif
ferret99gt@1821
   116
#if DRUG
ferret99gt@1821
   117
#include "basefuncommands/drug.sp"
ferret99gt@1821
   118
#endif
pred@1536
   119
ferret99gt@1194
   120
public OnPluginStart()
ferret99gt@1194
   121
{
ferret99gt@1194
   122
	LoadTranslations("common.phrases");
dvander@1624
   123
	LoadTranslations("basefuncommands.phrases");
ferret99gt@1194
   124
ferret99gt@1821
   125
	g_FadeUserMsgId = GetUserMessageId("Fade");
ferret99gt@1821
   126
	
teame06@1214
   127
	RegAdminCmd("sm_play", Command_Play, ADMFLAG_GENERIC, "sm_play <#userid|name> <filename>");
ferret99gt@1801
   128
ferret99gt@1801
   129
	HookEvent("round_end", Event_RoundEnd, EventHookMode_PostNoCopy);	
ferret99gt@1801
   130
ferret99gt@1821
   131
	#if BEACON
ferret99gt@1801
   132
	SetupBeacon();		// sm_beacon
ferret99gt@1821
   133
	#endif
ferret99gt@1821
   134
	
ferret99gt@1821
   135
	#if TIMEBOMB
ferret99gt@1801
   136
	SetupTimeBomb();	// sm_timebomb
ferret99gt@1821
   137
	#endif
ferret99gt@1821
   138
	
ferret99gt@1821
   139
	#if FIRE
ferret99gt@1801
   140
	SetupFire();		// sm_burn and sm_firebomb
ferret99gt@1821
   141
	#endif
ferret99gt@1821
   142
	
ferret99gt@1821
   143
	#if ICE
ferret99gt@1801
   144
	SetupIce();			// sm_freeze and sm_freezebomb
ferret99gt@1821
   145
	#endif
ferret99gt@1821
   146
	
ferret99gt@1821
   147
	#if GRAVITY
ferret99gt@1821
   148
	SetupGravity();		// sm_gravity
ferret99gt@1821
   149
	#endif
ferret99gt@1821
   150
	
ferret99gt@1821
   151
	#if BLIND
ferret99gt@1821
   152
	SetupBlind();		// sm_blind
ferret99gt@1821
   153
	#endif
ferret99gt@1821
   154
	
ferret99gt@1821
   155
	#if NOCLIP
ferret99gt@1821
   156
	SetupNoClip();		// sm_noclip
ferret99gt@1821
   157
	#endif
ferret99gt@1821
   158
	
ferret99gt@1821
   159
	#if DRUG
ferret99gt@1821
   160
	SetupDrugs();		// sm_drug
ferret99gt@1821
   161
	#endif
ferret99gt@1801
   162
	
ferret99gt@1801
   163
	AutoExecConfig(true, "funcommands");
pred@1536
   164
	
pred@1536
   165
	/* Account for late loading */
pred@1536
   166
	new Handle:topmenu;
pred@1536
   167
	if (LibraryExists("adminmenu") && ((topmenu = GetAdminTopMenu()) != INVALID_HANDLE))
pred@1536
   168
	{
pred@1536
   169
		OnAdminMenuReady(topmenu);
pred@1536
   170
	}
pred@1536
   171
}
pred@1536
   172
dvander@1788
   173
public OnMapStart()
dvander@1788
   174
{
ferret99gt@1801
   175
	PrecacheSound(SOUND_BLIP, true);
ferret99gt@1801
   176
	PrecacheSound(SOUND_BEEP, true);
ferret99gt@1801
   177
	PrecacheSound(SOUND_FINAL, true);
ferret99gt@1801
   178
	PrecacheSound(SOUND_BOOM, true);
ferret99gt@1801
   179
	PrecacheSound(SOUND_FREEZE, true);
ferret99gt@1801
   180
ferret99gt@1801
   181
	g_BeamSprite = PrecacheModel("materials/sprites/laser.vmt");
ferret99gt@1801
   182
	g_BeamSprite2 = PrecacheModel("sprites/bluelight1.vmt");
ferret99gt@1801
   183
	g_HaloSprite = PrecacheModel("materials/sprites/halo01.vmt");	
ferret99gt@1801
   184
	g_GlowSprite = PrecacheModel("sprites/blueglow2.vmt");
ferret99gt@1801
   185
	g_ExplosionSprite = PrecacheModel("sprites/sprite_fire01.vmt");
dvander@1788
   186
}
dvander@1788
   187
ferret99gt@1785
   188
public OnMapEnd()
ferret99gt@1785
   189
{
ferret99gt@1821
   190
	#if BEACON
ferret99gt@1785
   191
	KillAllBeacons();
ferret99gt@1821
   192
	#endif
ferret99gt@1821
   193
	#if TIMEBOMB
ferret99gt@1801
   194
	KillAllTimeBombs();
ferret99gt@1821
   195
	#endif
ferret99gt@1821
   196
	#if FIRE
ferret99gt@1801
   197
	KillAllFireBombs();
ferret99gt@1821
   198
	#endif
ferret99gt@1821
   199
	#if ICE
ferret99gt@1801
   200
	KillAllFreezes();
ferret99gt@1821
   201
	#endif
ferret99gt@1821
   202
	#if DRUG
ferret99gt@1821
   203
	KillAllDrugs();
ferret99gt@1821
   204
	#endif
ferret99gt@1801
   205
}
ferret99gt@1801
   206
ferret99gt@1801
   207
public Action:Event_RoundEnd(Handle:event,const String:name[],bool:dontBroadcast)
ferret99gt@1801
   208
{
ferret99gt@1821
   209
	#if BEACON
ferret99gt@1801
   210
	KillAllBeacons();
ferret99gt@1821
   211
	#endif
ferret99gt@1821
   212
	#if TIMEBOMB
ferret99gt@1801
   213
	KillAllTimeBombs();
ferret99gt@1821
   214
	#endif
ferret99gt@1821
   215
	#if FIRE
ferret99gt@1801
   216
	KillAllFireBombs();
ferret99gt@1821
   217
	#endif
ferret99gt@1821
   218
	#if ICE
ferret99gt@1801
   219
	KillAllFreezes();
ferret99gt@1821
   220
	#endif
ferret99gt@1821
   221
	#if DRUG
ferret99gt@1821
   222
	KillAllDrugs();
ferret99gt@1821
   223
	#endif
ferret99gt@1801
   224
	
ferret99gt@1801
   225
	return Plugin_Handled;
ferret99gt@1785
   226
}
ferret99gt@1785
   227
pred@1536
   228
public OnAdminMenuReady(Handle:topmenu)
pred@1536
   229
{
pred@1536
   230
	/* Block us from being called twice */
pred@1536
   231
	if (topmenu == hTopMenu)
pred@1536
   232
	{
pred@1536
   233
		return;
pred@1536
   234
	}
pred@1536
   235
	
pred@1536
   236
	/* Save the Handle */
pred@1536
   237
	hTopMenu = topmenu;
pred@1536
   238
	
pred@1536
   239
	/* Find the "Player Commands" category */
pred@1536
   240
	new TopMenuObject:player_commands = FindTopMenuCategory(hTopMenu, ADMINMENU_PLAYERCOMMANDS);
pred@1536
   241
pred@1536
   242
	if (player_commands != INVALID_TOPMENUOBJECT)
pred@1536
   243
	{
ferret99gt@1821
   244
		#if BEACON
pred@1536
   245
		AddToTopMenu(hTopMenu,
ferret99gt@1801
   246
			"sm_beacon",
pred@1536
   247
			TopMenuObject_Item,
ferret99gt@1801
   248
			AdminMenu_Beacon,
pred@1536
   249
			player_commands,
ferret99gt@1801
   250
			"sm_beacon",
pred@1536
   251
			ADMFLAG_SLAY);
ferret99gt@1821
   252
		#endif
ferret99gt@1801
   253
		
ferret99gt@1821
   254
		#if TIMEBOMB
ferret99gt@1821
   255
		AddToTopMenu(hTopMenu,
ferret99gt@1821
   256
			"sm_timebomb",
ferret99gt@1821
   257
			TopMenuObject_Item,
ferret99gt@1821
   258
			AdminMenu_TimeBomb,
ferret99gt@1821
   259
			player_commands,
ferret99gt@1821
   260
			"sm_timebomb",
ferret99gt@1821
   261
			ADMFLAG_SLAY);
ferret99gt@1821
   262
		#endif
ferret99gt@1821
   263
		
ferret99gt@1821
   264
		#if FIRE
pred@1536
   265
		AddToTopMenu(hTopMenu,
dvander@1600
   266
			"sm_burn",
pred@1536
   267
			TopMenuObject_Item,
pred@1536
   268
			AdminMenu_Burn,
pred@1536
   269
			player_commands,
pred@1536
   270
			"sm_burn",
pred@1536
   271
			ADMFLAG_SLAY);
pred@1536
   272
			
pred@1536
   273
		AddToTopMenu(hTopMenu,
ferret99gt@1821
   274
			"sm_firebomb",
ferret99gt@1821
   275
			TopMenuObject_Item,
ferret99gt@1821
   276
			AdminMenu_FireBomb,
ferret99gt@1821
   277
			player_commands,
ferret99gt@1821
   278
			"sm_firebomb",
ferret99gt@1821
   279
			ADMFLAG_SLAY);
ferret99gt@1821
   280
		#endif
ferret99gt@1821
   281
		
ferret99gt@1821
   282
		#if ICE
ferret99gt@1821
   283
		AddToTopMenu(hTopMenu,
ferret99gt@1801
   284
			"sm_freeze",
pred@1536
   285
			TopMenuObject_Item,
ferret99gt@1801
   286
			AdminMenu_Freeze,
pred@1536
   287
			player_commands,
ferret99gt@1801
   288
			"sm_freeze",
ferret99gt@1801
   289
			ADMFLAG_SLAY);
ferret99gt@1801
   290
			
ferret99gt@1801
   291
		AddToTopMenu(hTopMenu,
ferret99gt@1801
   292
			"sm_freezebomb",
ferret99gt@1801
   293
			TopMenuObject_Item,
ferret99gt@1801
   294
			AdminMenu_FreezeBomb,
ferret99gt@1801
   295
			player_commands,
ferret99gt@1801
   296
			"sm_freezebomb",
ferret99gt@1801
   297
			ADMFLAG_SLAY);
ferret99gt@1821
   298
		#endif
ferret99gt@1821
   299
			
ferret99gt@1821
   300
		#if GRAVITY
ferret99gt@1821
   301
		AddToTopMenu(hTopMenu,
ferret99gt@1821
   302
			"sm_gravity",
ferret99gt@1821
   303
			TopMenuObject_Item,
ferret99gt@1821
   304
			AdminMenu_Gravity,
ferret99gt@1821
   305
			player_commands,
ferret99gt@1821
   306
			"sm_gravity",
ferret99gt@1821
   307
			ADMFLAG_SLAY);
ferret99gt@1821
   308
		#endif
ferret99gt@1821
   309
			
ferret99gt@1821
   310
		#if BLIND
ferret99gt@1821
   311
		AddToTopMenu(hTopMenu,
ferret99gt@1821
   312
			"sm_blind",
ferret99gt@1821
   313
			TopMenuObject_Item,
ferret99gt@1821
   314
			AdminMenu_Blind,
ferret99gt@1821
   315
			player_commands,
ferret99gt@1821
   316
			"sm_blind",
ferret99gt@1821
   317
			ADMFLAG_SLAY);
ferret99gt@1821
   318
		#endif
ferret99gt@1821
   319
		
ferret99gt@1821
   320
		#if NOCLIP
ferret99gt@1821
   321
		AddToTopMenu(hTopMenu,
ferret99gt@1821
   322
			"sm_noclip",
ferret99gt@1821
   323
			TopMenuObject_Item,
ferret99gt@1821
   324
			AdminMenu_NoClip,
ferret99gt@1821
   325
			player_commands,
ferret99gt@1821
   326
			"sm_noclip",
ferret99gt@1821
   327
			ADMFLAG_SLAY);
ferret99gt@1821
   328
		#endif
ferret99gt@1821
   329
		
ferret99gt@1821
   330
		#if DRUG
ferret99gt@1821
   331
		AddToTopMenu(hTopMenu,
ferret99gt@1821
   332
			"sm_drug",
ferret99gt@1821
   333
			TopMenuObject_Item,
ferret99gt@1821
   334
			AdminMenu_Drug,
ferret99gt@1821
   335
			player_commands,
ferret99gt@1821
   336
			"sm_drug",
ferret99gt@1821
   337
			ADMFLAG_SLAY);
ferret99gt@1821
   338
		#endif		
pred@1536
   339
	}
teame06@1212
   340
}
teame06@1212
   341
teame06@1212
   342
public Action:Command_Play(client, args)
teame06@1212
   343
{
teame06@1241
   344
	if (args < 2)
teame06@1212
   345
	{
teame06@1214
   346
		ReplyToCommand(client, "[SM] Usage: sm_play <#userid|name> <filename>");
teame06@1212
   347
	}
teame06@1212
   348
teame06@1214
   349
	new String:Arguments[PLATFORM_MAX_PATH + 65];
teame06@1214
   350
	GetCmdArgString(Arguments, sizeof(Arguments));
teame06@1214
   351
teame06@1214
   352
 	decl String:Arg[65];
teame06@1214
   353
	new len = BreakString(Arguments, Arg, sizeof(Arg));
teame06@1212
   354
teame06@1214
   355
	/* Make sure it does not go out of bound by doing "sm_play user  "*/
teame06@1241
   356
	if (len == -1)
teame06@1214
   357
	{
teame06@1214
   358
		ReplyToCommand(client, "[SM] Usage: sm_play <#userid|name> <filename>");
teame06@1214
   359
		return Plugin_Handled;
teame06@1214
   360
	}
teame06@1212
   361
teame06@1214
   362
	/* Incase they put quotes and white spaces after the quotes */
teame06@1241
   363
	if (Arguments[len] == '"')
teame06@1214
   364
	{
teame06@1214
   365
		len++;
teame06@1214
   366
		new FileLen = TrimString(Arguments[len]) + len;
teame06@1214
   367
teame06@1241
   368
		if (Arguments[FileLen - 1] == '"')
teame06@1214
   369
		{
teame06@1214
   370
			Arguments[FileLen - 1] = '\0';
teame06@1214
   371
		}
teame06@1214
   372
	}
dvander@1624
   373
	
dvander@1624
   374
	decl String:target_name[MAX_TARGET_LENGTH];
dvander@1624
   375
	decl target_list[MAXPLAYERS], target_count, bool:tn_is_ml;
dvander@1624
   376
	
dvander@1624
   377
	if ((target_count = ProcessTargetString(
dvander@1624
   378
			Arg,
dvander@1624
   379
			client,
dvander@1624
   380
			target_list,
dvander@1624
   381
			MAXPLAYERS,
dvander@1624
   382
			COMMAND_FILTER_NO_BOTS,
dvander@1624
   383
			target_name,
dvander@1624
   384
			sizeof(target_name),
dvander@1624
   385
			tn_is_ml)) <= 0)
dvander@1624
   386
	{
dvander@1624
   387
		ReplyToTargetError(client, target_count);
dvander@1624
   388
		return Plugin_Handled;
dvander@1624
   389
	}
dvander@1624
   390
	
dvander@1624
   391
	for (new i = 0; i < target_count; i++)
dvander@1624
   392
	{
dvander@1624
   393
		ClientCommand(target_list[i], "playgamesound \"%s\"", Arguments[len]);
ferret99gt@1801
   394
		LogAction(client, target_list[i], "\"%L\" played sound on \"%L\" (file \"%s\")", client, target_list[i], Arguments[len]);
dvander@1624
   395
	}
dvander@1624
   396
	
dvander@1624
   397
	if (tn_is_ml)
dvander@1624
   398
	{
dvander@1624
   399
		ShowActivity2(client, "[SM] ", "%t", "Played sound to target", target_name);
dvander@1624
   400
	}
dvander@1624
   401
	else
dvander@1624
   402
	{
dvander@1624
   403
		ShowActivity2(client, "[SM] ", "%t", "Played sound to target", "_s", target_name);
dvander@1624
   404
	}
teame06@1212
   405
teame06@1212
   406
	return Plugin_Handled;
ferret99gt@1194
   407
}