plugins/basefuncommands/burn.sp
author Matt Woodrow <pred@alliedmods.net>
Mon Oct 22 02:05:51 2007 +0000 (2007-10-22)
changeset 1626 8775cc33c01e
parent 1625 8e4a6a8c3256
child 1682 a7478db7aa6b
permissions -rw-r--r--
Added alive checks before adding certain player lists to the admin menu
pred@1536
     1
PerformBurn(client, target, Float:seconds)
pred@1536
     2
{
pred@1536
     3
	LogAction(client, target, "\"%L\" ignited \"%L\" (seconds \"%f\")", client, target, seconds);
pred@1536
     4
	IgniteEntity(target, seconds);
pred@1536
     5
}
pred@1536
     6
pred@1536
     7
DisplayBurnMenu(client)
pred@1536
     8
{
pred@1536
     9
	new Handle:menu = CreateMenu(MenuHandler_Burn);
pred@1536
    10
	
pred@1536
    11
	decl String:title[100];
dvander@1592
    12
	Format(title, sizeof(title), "%T:", "Burn player", client);
pred@1536
    13
	SetMenuTitle(menu, title);
pred@1536
    14
	SetMenuExitBackButton(menu, true);
pred@1536
    15
	
pred@1626
    16
	AddTargetsToMenu(menu, client, false, true);
pred@1536
    17
	
pred@1536
    18
	DisplayMenu(menu, client, MENU_TIME_FOREVER);
pred@1536
    19
}
pred@1536
    20
pred@1536
    21
public AdminMenu_Burn(Handle:topmenu, 
pred@1536
    22
					  TopMenuAction:action,
pred@1536
    23
					  TopMenuObject:object_id,
pred@1536
    24
					  param,
pred@1536
    25
					  String:buffer[],
pred@1536
    26
					  maxlength)
pred@1536
    27
{
pred@1536
    28
	if (action == TopMenuAction_DisplayOption)
pred@1536
    29
	{
dvander@1592
    30
		Format(buffer, maxlength, "%T", "Burn player", param);
pred@1536
    31
	}
pred@1536
    32
	else if (action == TopMenuAction_SelectOption)
pred@1536
    33
	{
pred@1536
    34
		DisplayBurnMenu(param);
pred@1536
    35
	}
pred@1536
    36
}
pred@1536
    37
pred@1536
    38
public MenuHandler_Burn(Handle:menu, MenuAction:action, param1, param2)
pred@1536
    39
{
pred@1536
    40
	if (action == MenuAction_End)
pred@1536
    41
	{
pred@1536
    42
		CloseHandle(menu);
pred@1536
    43
	}
pred@1536
    44
	else if (action == MenuAction_Cancel)
pred@1536
    45
	{
pred@1536
    46
		if (param2 == MenuCancel_ExitBack && hTopMenu != INVALID_HANDLE)
pred@1536
    47
		{
pred@1536
    48
			DisplayTopMenu(hTopMenu, param1, TopMenuPosition_LastCategory);
pred@1536
    49
		}
pred@1536
    50
	}
pred@1536
    51
	else if (action == MenuAction_Select)
pred@1536
    52
	{
pred@1536
    53
		decl String:info[32];
pred@1536
    54
		new userid, target;
pred@1536
    55
		
pred@1536
    56
		GetMenuItem(menu, param2, info, sizeof(info));
pred@1536
    57
		userid = StringToInt(info);
pred@1536
    58
pred@1536
    59
		if ((target = GetClientOfUserId(userid)) == 0)
pred@1536
    60
		{
pred@1536
    61
			PrintToChat(param1, "[SM] %t", "Player no longer available");
pred@1536
    62
		}
pred@1536
    63
		else if (!CanUserTarget(param1, target))
pred@1536
    64
		{
pred@1536
    65
			PrintToChat(param1, "[SM] %t", "Unable to target");
pred@1536
    66
		}
pred@1536
    67
		else
pred@1536
    68
		{
dvander@1624
    69
			new String:name[32];
dvander@1624
    70
			GetClientName(target, name, sizeof(name));
pred@1536
    71
			PerformBurn(param1, target, 20.0);
dvander@1624
    72
			ShowActivity2(param1, "[SM] ", "%t", "Set target on fire", "_s", name);
pred@1536
    73
		}
pred@1536
    74
		
pred@1536
    75
		/* Re-draw the menu if they're still valid */
pred@1536
    76
		if (IsClientInGame(param1) && !IsClientInKickQueue(param1))
pred@1536
    77
		{
pred@1536
    78
			DisplaySlayMenu(param1);
pred@1536
    79
		}
pred@1536
    80
	}
pred@1536
    81
}
pred@1536
    82
pred@1536
    83
public Action:Command_Burn(client, args)
pred@1536
    84
{
pred@1536
    85
	if (args < 1)
pred@1536
    86
	{
pred@1536
    87
		ReplyToCommand(client, "[SM] Usage: sm_burn <#userid|name> [time]");
pred@1536
    88
		return Plugin_Handled;
pred@1536
    89
	}
pred@1536
    90
pred@1536
    91
	decl String:arg[65];
pred@1536
    92
	GetCmdArg(1, arg, sizeof(arg));
pred@1536
    93
pred@1536
    94
	new Float:seconds = 20.0;
pred@1536
    95
	
pred@1536
    96
	if (args > 1)
pred@1536
    97
	{
pred@1536
    98
		decl String:time[20];
pred@1536
    99
		GetCmdArg(2, time, sizeof(time));
pred@1536
   100
		if (StringToFloatEx(time, seconds) == 0)
pred@1536
   101
		{
pred@1536
   102
			ReplyToCommand(client, "[SM] %t", "Invalid Amount");
pred@1536
   103
			return Plugin_Handled;
pred@1536
   104
		}
pred@1536
   105
	}
pred@1536
   106
	
dvander@1624
   107
	decl String:target_name[MAX_TARGET_LENGTH];
dvander@1624
   108
	decl target_list[MAXPLAYERS], target_count, bool:tn_is_ml;
dvander@1624
   109
	
dvander@1624
   110
	if ((target_count = ProcessTargetString(
dvander@1624
   111
			arg,
dvander@1624
   112
			client,
dvander@1624
   113
			target_list,
dvander@1624
   114
			MAXPLAYERS,
dvander@1625
   115
			COMMAND_FILTER_ALIVE,
dvander@1624
   116
			target_name,
dvander@1624
   117
			sizeof(target_name),
dvander@1624
   118
			tn_is_ml)) <= 0)
dvander@1624
   119
	{
dvander@1624
   120
		ReplyToTargetError(client, target_count);
dvander@1624
   121
		return Plugin_Handled;
dvander@1624
   122
	}
dvander@1624
   123
	
dvander@1624
   124
	for (new i = 0; i < target_count; i++)
dvander@1624
   125
	{
dvander@1624
   126
		PerformBurn(client, target_list[i], seconds);
dvander@1624
   127
	}
dvander@1624
   128
	
dvander@1624
   129
	if (tn_is_ml)
dvander@1624
   130
	{
dvander@1624
   131
		ShowActivity2(client, "[SM] ", "%t", "Set target on fire", target_name);
dvander@1624
   132
	}
dvander@1624
   133
	else
dvander@1624
   134
	{
dvander@1624
   135
		ShowActivity2(client, "[SM] ", "%t", "Set target on fire", "_s", target_name);
dvander@1624
   136
	}
pred@1536
   137
pred@1536
   138
	return Plugin_Handled;
dvander@1624
   139
}