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