YGGverse
/
hlsdk-portable
mirror of https://github.com/YGGverse/hlsdk-portable.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
Portable Half-Life SDK. GoldSource and Xash3D. Crossplatform.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
112 Commits
61 Branches
7 Tags
22 MiB
Tree: f7034c43ff
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'f7034c43ff'
${ noResults }
hlsdk-portable/dlls/coldice/fragsforweapons_arena.cpp

1781 lines
48 KiB
Raw Normal View History Unescape

Merge original "Cold Ice" source code.
8 years ago
/*
Copyright (c) 1999, Cold Ice Modification.
This code has been written by SlimShady ( darcuri@optonline.net )
Use, distribution, and modification of this source code and/or resulting
object code is restricted to non-commercial enhancements to products from
Valve LLC. All other use, distribution, or modification is prohibited
without written permission from Valve LLC and from the Cold Ice team.
Please if you use this code in any public form, please give us credit.
*/
#include "extdll.h"
#include "util.h"
#include "cbase.h"
#include "player.h"
#include "weapons.h"
#include "gamerules.h"
#include "skill.h"
#include "game.h"
#include "items.h"
extern DLL_GLOBAL CGameRules *g_pGameRules;
extern DLL_GLOBAL BOOL g_fGameOver;
extern int gmsgDeathMsg; // client dll messages
extern int gmsgScoreInfo;
extern int gmsgMOTD;
#define ITEM_RESPAWN_TIME 30
#define WEAPON_RESPAWN_TIME 20
#define AMMO_RESPAWN_TIME 20
//*********************************************************
// Rules for Cold Ice Frags for Weapons Arena
//*********************************************************
CFWArena :: CFWArena()
{
RefreshSkillData();
m_flIntermissionEndTime = 0;
if ( IS_DEDICATED_SERVER() )
{
// dedicated server
char *servercfgfile = (char *)CVAR_GET_STRING( "servercfgfile" );
if ( servercfgfile && servercfgfile[0] )
{
char szCommand[256];
ALERT( at_console, "Executing dedicated server config file\n" );
sprintf( szCommand, "exec %s\n", servercfgfile );
SERVER_COMMAND( szCommand );
}
}
else
{
// listen server
char *lservercfgfile = (char *)CVAR_GET_STRING( "lservercfgfile" );
if ( lservercfgfile && lservercfgfile[0] )
{
char szCommand[256];
ALERT( at_console, "Executing listen server config file\n" );
sprintf( szCommand, "exec %s\n", lservercfgfile );
SERVER_COMMAND( szCommand );
}
}
}
//=========================================================
//=========================================================
void CFWArena::RefreshSkillData( void )
{
CGameRules::RefreshSkillData();
// override some values for multiplay.
// suitcharger
gSkillData.suitchargerCapacity = 30;
// Crowbar whack
gSkillData.plrDmgCrowbar = 25;
// Knife whack
gSkillData.plrDmgKnife = 28;
// Sword whack
gSkillData.plrDmgSword = 32;
// Glock Round
gSkillData.plrDmg9MM = 12;
// MP5 Round
gSkillData.plrDmgMP5 = 12;
// 765mm Round
gSkillData.plrDmgRifle = 200;
// Bolt
gSkillData.plrDmgBoltgun = 15;
// Contact grenade
gSkillData.plrDmgContact = 120;
// Cluster grenade
gSkillData.plrDmgClusterGrenade = 50;
// Rocket
gSkillData.plrDmgRocket = 145;
// Railgun Slug
gSkillData.plrDmgRailgun = 100;
// IRF Tripmine
gSkillData.plrDmgTripmine = 130;
// Buckshot
gSkillData.plrDmgBuckshot = 8;
}
// longest the intermission can last, in seconds
#define MAX_INTERMISSION_TIME 120
//=========================================================
//=========================================================
void CFWArena :: Think ( void )
{
///// Check game rules /////
if ( g_fGameOver ) // someone else quit the game already
{
if ( m_flIntermissionEndTime < gpGlobals->time )
{
if ( m_iEndIntermissionButtonHit // check that someone has pressed a key, or the max intermission time is over
|| ((m_flIntermissionEndTime + MAX_INTERMISSION_TIME) < gpGlobals->time) )
ChangeLevel(); // intermission is over
}
return;
}
float flTimeLimit = timelimit.value * 60;
float flFragLimit = fraglimit.value;
if ( flTimeLimit != 0 && gpGlobals->time >= flTimeLimit )
{
GoToIntermission();
return;
}
if ( flFragLimit )
{
// check if any player is over the frag limit
for ( int i = 1; i <= gpGlobals->maxClients; i++ )
{
CBaseEntity *pPlayer = UTIL_PlayerByIndex( i );
if ( pPlayer && pPlayer->pev->frags >= flFragLimit )
{
GoToIntermission();
return;
}
}
}
}
//=========================================================
//=========================================================
BOOL CFWArena::IsMultiplayer( void )
{
return TRUE;
}
//=========================================================
//=========================================================
BOOL CFWArena::IsDeathmatch( void )
{
return TRUE;
}
//=========================================================
//=========================================================
BOOL CFWArena::IsFWArena( void )
{
return TRUE;
}
//=========================================================
//=========================================================
BOOL CFWArena::IsCoOp( void )
{
return gpGlobals->coop;
}
//=========================================================
//=========================================================
BOOL CFWArena::FShouldSwitchWeapon( CBasePlayer *pPlayer, CBasePlayerItem *pWeapon )
{
if ( !pWeapon->CanDeploy() )
{
// that weapon can't deploy anyway.
return FALSE;
}
if ( !pPlayer->m_pActiveItem )
{
// player doesn't have an active item!
return TRUE;
}
if ( !pPlayer->m_pActiveItem->CanHolster() )
{
// can't put away the active item.
return FALSE;
}
if ( pWeapon->iWeight() > pPlayer->m_pActiveItem->iWeight() )
{
return TRUE;
}
return FALSE;
}
BOOL CFWArena :: GetNextBestWeapon( CBasePlayer *pPlayer, CBasePlayerItem *pCurrentWeapon )
{
CBasePlayerItem *pCheck;
CBasePlayerItem *pBest;// this will be used in the event that we don't find a weapon in the same category.
int iBestWeight;
int i;
iBestWeight = -1;// no weapon lower than -1 can be autoswitched to
pBest = NULL;
if ( !pCurrentWeapon->CanHolster() )
{
// can't put this gun away right now, so can't switch.
return FALSE;
}
for ( i = 0 ; i < MAX_ITEM_TYPES ; i++ )
{
pCheck = pPlayer->m_rgpPlayerItems[ i ];
while ( pCheck )
{
if ( pCheck->iWeight() > -1 && pCheck->iWeight() == pCurrentWeapon->iWeight() && pCheck != pCurrentWeapon )
{
// this weapon is from the same category.
if ( pCheck->CanDeploy() )
{
if ( pPlayer->SwitchWeapon( pCheck ) )
{
return TRUE;
}
}
}
else if ( pCheck->iWeight() > iBestWeight && pCheck != pCurrentWeapon )// don't reselect the weapon we're trying to get rid of
{
//ALERT ( at_console, "Considering %s\n", STRING( pCheck->pev->classname ) );
// we keep updating the 'best' weapon just in case we can't find a weapon of the same weight
// that the player was using. This will end up leaving the player with his heaviest-weighted
// weapon.
if ( pCheck->CanDeploy() )
{
// if this weapon is useable, flag it as the best
iBestWeight = pCheck->iWeight();
pBest = pCheck;
}
}
pCheck = pCheck->m_pNext;
}
}
// if we make it here, we've checked all the weapons and found no useable
// weapon in the same catagory as the current weapon.
// if pBest is null, we didn't find ANYTHING. Shouldn't be possible- should always
// at least get the crowbar, but ya never know.
if ( !pBest )
{
return FALSE;
}
pPlayer->SwitchWeapon( pBest );
return TRUE;
}
//=========================================================
//=========================================================
BOOL CFWArena :: ClientConnected( edict_t *pEntity, const char *pszName, const char *pszAddress, char szRejectReason[ 128 ] )
{
return TRUE;
}
extern int gmsgSayText;
extern int gmsgGameMode;
void CFWArena :: UpdateGameMode( CBasePlayer *pPlayer )
{
MESSAGE_BEGIN( MSG_ONE, gmsgGameMode, NULL, pPlayer->edict() );
WRITE_BYTE( 0 ); // game mode none
MESSAGE_END();
}
void CFWArena :: InitHUD( CBasePlayer *pl )
{
// notify other clients of player joining the game
UTIL_ClientPrintAll( HUD_PRINTNOTIFY, UTIL_VarArgs( "%s has joined the game\n",
( pl->pev->netname && STRING(pl->pev->netname)[0] != 0 ) ? STRING(pl->pev->netname) : "unconnected" ) );
UTIL_LogPrintf( "\"%s<%i>\" has entered the game\n", STRING( pl->pev->netname ), GETPLAYERUSERID( pl->edict() ) );
UpdateGameMode( pl );
// sending just one score makes the hud scoreboard active; otherwise
// it is just disabled for single play
MESSAGE_BEGIN( MSG_ONE, gmsgScoreInfo, NULL, pl->edict() );
WRITE_BYTE( ENTINDEX(pl->edict()) );
WRITE_SHORT( 0 );
WRITE_SHORT( 0 );
MESSAGE_END();
SendMOTDToClient( pl->edict() );
// loop through all active players and send their score info to the new client
for ( int i = 1; i <= gpGlobals->maxClients; i++ )
{
// FIXME: Probably don't need to cast this just to read m_iDeaths
CBasePlayer *plr = (CBasePlayer *)UTIL_PlayerByIndex( i );
if ( plr )
{
MESSAGE_BEGIN( MSG_ONE, gmsgScoreInfo, NULL, pl->edict() );
WRITE_BYTE( i ); // client number
WRITE_SHORT( plr->pev->frags );
WRITE_SHORT( plr->m_iDeaths );
MESSAGE_END();
}
}
if ( g_fGameOver )
{
MESSAGE_BEGIN( MSG_ONE, SVC_INTERMISSION, NULL, pl->edict() );
MESSAGE_END();
}
pl->StartSpectator();
pl->m_nMenu = Menu_Wep;
ShowMenu(pl, 0x7, 0, 0,"Welcome to Cold Ice Beta1 2x\n\nCold-Ice Frags for Weapons Mode\n\nPlease choose a weapon.\n1. Knife\n2. Crowbar\n3. Sword");
}
//=========================================================
//=========================================================
void CFWArena :: ClientDisconnected( edict_t *pClient )
{
if ( pClient )
{
CBasePlayer *pPlayer = (CBasePlayer *)CBaseEntity::Instance( pClient );
if ( pPlayer )
{
FireTargets( "game_playerleave", pPlayer, pPlayer, USE_TOGGLE, 0 );
UTIL_LogPrintf( "\"%s<%i>\" left from FW Arena\n", STRING( pPlayer->pev->netname ), GETPLAYERUSERID( pPlayer->edict() ) );
pPlayer->RemoveAllItems( TRUE );// destroy all of the players weapons and items
}
}
}
//=========================================================
//=========================================================
float CFWArena :: FlPlayerFallDamage( CBasePlayer *pPlayer )
{
int iFallDamage = (int)CVAR_GET_FLOAT("mp_falldamage");
switch ( iFallDamage )
{
case 1://progressive
pPlayer->m_flFallVelocity -= PLAYER_MAX_SAFE_FALL_SPEED;
return pPlayer->m_flFallVelocity * DAMAGE_FOR_FALL_SPEED;
break;
default:
case 0:// fixed
return 10;
break;
}
}
//=========================================================
//=========================================================
BOOL CFWArena::FPlayerCanTakeDamage( CBasePlayer *pPlayer, CBaseEntity *pAttacker )
{
return TRUE;
}
//=========================================================
//=========================================================
void CFWArena :: PlayerThink( CBasePlayer *pPlayer )
{
if ( g_fGameOver )
{
// check for button presses
if ( pPlayer->m_afButtonPressed & ( IN_DUCK | IN_ATTACK | IN_ATTACK2 | IN_USE | IN_JUMP ) )
m_iEndIntermissionButtonHit = TRUE;
// clear attack/use commands from player
pPlayer->m_afButtonPressed = 0;
pPlayer->pev->button = 0;
pPlayer->m_afButtonReleased = 0;
}
}
//=========================================================
//=========================================================
BOOL CFWArena :: ClientCommand( CBasePlayer *pPlayer, const char *pcmd )
{
if ( FStrEq( pcmd, "menuselect" ) )
{
int slot = atoi( CMD_ARGV(1) );
//=============================================================
//=============================================================
switch(pPlayer->m_nMenu)
{
case Menu_Spec:
if(slot == 1)
pPlayer->StopSpectator();
else if (slot == 2)
{
pPlayer->StartSpectator();
ShowMenu (pPlayer, 0x1, 0, 0, "Currently In Spectator Mode:\n\nHit Key 1 to exit and join the game. " );
}
break;
//=============================================================
//=============================================================
case Menu_Wep:
if(slot == 1)
pPlayer->m_cWeapon1 = "weapon_knife";
else if (slot == 2)
pPlayer->m_cWeapon1 = "weapon_fwcrowbar";
else if (slot == 3)
pPlayer->m_cWeapon1 = "weapon_sword";
pPlayer->m_nMenu = Menu_Spec;
ShowMenu(pPlayer, 0x3, 0, 0,"Choose a play option:\n\n1. Join Game\n2. Observe Game");
break;
//=============================================================
//=============================================================
case Menu_Change:
if(slot == 1)
pPlayer->m_cWeapon1 = "weapon_knife";
else if (slot == 2)
pPlayer->m_cWeapon1 = "weapon_crowbar";
else if (slot == 3)
pPlayer->m_cWeapon1 = "weapon_sword";
ShowMenu(pPlayer, 0x7, 3, 0,"Your manual weapon choice will be changed on\nthe next respawn");
break;
//=============================================================
//=============================================================
case Menu_WepSel:
if(slot == 1)
{
ShowMenu(pPlayer, 0x7, 0, 0,"1. Knife ( 1 frag )\n2. Crowbar ( 1 frag )\n3. Sword ( 1 frag )");
pPlayer->m_nMenu = Menu_WepMan;
}
if(slot == 2)
{
ShowMenu(pPlayer, 0x3, 0, 0,"1. PPK ( 2 frags )\n2. Mag 60 ( 2 frags )");
pPlayer->m_nMenu = Menu_WepHand;
}
if(slot == 3)
{
ShowMenu(pPlayer, 0x3F, 0, 0,"1. M-16 Assault Rifle ( 3 frags )\n2. 9mm Uzi ( 3 frags )\n3. Double Uzis ( 4 frags )\n4. Boltgun ( 4 frags )\n5. Chaingun ( 5 frags )\n6. Sniper Rifle ( 4 frags )");
pPlayer->m_nMenu = Menu_WepAss;
}
if(slot == 4)
{
ShowMenu(pPlayer, 0x3, 0, 0,"1. 12 Gauge Shotgun ( 4 frags )\n2. Assault Shotgun ( 5 frags )");
pPlayer->m_nMenu = Menu_WepShot;
}
if(slot == 5)
{
ShowMenu(pPlayer, 0xF, 0, 0,"1. Grenade Launcher ( 6 frags )\n2. Rocket Launcher ( 6 frags )\n3. IFR Tripmine ( 2 frags )\n4. Dynamite vest ( 4 frags )");
pPlayer->m_nMenu = Menu_WepExp;
}
if(slot == 6)
{
ShowMenu(pPlayer, 0x7, 0, 0,"1. Chumtoad ( 4 frags )\n2. Railgun ( 7 frags )\n3. Nuke Launcher ( 10 frags )");
pPlayer->m_nMenu = Menu_WepEper;
}
break;
//=============================================================
//=============================================================
case Menu_AmmoSel:
if(slot == 1)
{
ShowMenu(pPlayer, 0x7F, 0, 0,"1. .32 ACP ( 1 frag )\n2. .38 ACP ( 1 frag )\n3. 9mm ( 1 frag )\n4. 9mm Chain ( 1 frags )\n5. 5.56mm ( 1 frags )\n6. 7.65mm ( 1 frags )\n7. Buckshot ( 1 frags )");
pPlayer->m_nMenu = Menu_AmmoBul;
}
if(slot == 2)
{
ShowMenu(pPlayer, 0xF, 0, 0,"1. Contact Grenades ( 2 frags )\n2. Timed Grenade ( 2 frags )\n3. Rockets ( 2 frags )\n4. Nuke ( 3 frags )");
pPlayer->m_nMenu = Menu_AmmoExp;
}
if(slot == 3)
{
ShowMenu(pPlayer, 0x7, 0, 0,"1. Rail Slugs ( 1 frags )\n2. Bolts ( 1 frags )");
pPlayer->m_nMenu = Menu_AmmoMisc;
}
break;
//=============================================================
//=============================================================
case Menu_WepMan:
if(slot == 1)
{
if ( pPlayer->pev->frags > 0 )
{
pPlayer->GiveNamedItem( "weapon_knife" );
pPlayer->pev->frags --;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "weapon_crowbar" );
pPlayer->pev->frags --;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 3)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "weapon_sword" );
pPlayer->pev->frags --;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_WepHand:
if(slot == 1)
{
if ( pPlayer->pev->frags > 1)
{
pPlayer->GiveNamedItem( "weapon_ppk" );
pPlayer->pev->frags -= 2;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 1)
{
pPlayer->GiveNamedItem( "weapon_mag60" );
pPlayer->pev->frags -= 2;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_WepAss:
if(slot == 1)
{
if ( pPlayer->pev->frags > 2)
{
pPlayer->GiveNamedItem( "weapon_m16" );
pPlayer->pev->frags -= 3;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 2)
{
pPlayer->GiveNamedItem( "weapon_uzi" );
pPlayer->pev->frags -= 3;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 3)
{
if ( pPlayer->pev->frags > 3)
{
pPlayer->GiveNamedItem( "weapon_doubleuzi" );
pPlayer->pev->frags -= 4;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 4)
{
if ( pPlayer->pev->frags > 3)
{
pPlayer->GiveNamedItem( "weapon_boltgun" );
pPlayer->pev->frags -= 4;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 5)
{
if ( pPlayer->pev->frags > 4)
{
pPlayer->GiveNamedItem( "weapon_chaingun" );
pPlayer->pev->frags -= 5;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 6)
{
if ( pPlayer->pev->frags > 3)
{
pPlayer->GiveNamedItem( "weapon_rifle" );
pPlayer->pev->frags -= 4;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_WepShot:
if(slot == 1)
{
if ( pPlayer->pev->frags > 3)
{
pPlayer->GiveNamedItem( "weapon_sshotgun" );
pPlayer->pev->frags -= 4;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 4)
{
pPlayer->GiveNamedItem( "weapon_ashotgun" );
pPlayer->pev->frags -= 5;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_WepExp:
if(slot == 1)
{
if ( pPlayer->pev->frags > 5)
{
pPlayer->GiveNamedItem( "weapon_grenadel" );
pPlayer->pev->frags -= 6;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 5)
{
pPlayer->GiveNamedItem( "weapon_rocketl" );
pPlayer->pev->frags -= 6;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 3)
{
if ( pPlayer->pev->frags > 1)
{
pPlayer->GiveNamedItem( "weapon_ifrtripmine" );
pPlayer->pev->frags -= 2;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 4)
{
if ( pPlayer->pev->frags > 3)
{
pPlayer->GiveNamedItem( "weapon_tnt" );
pPlayer->pev->frags -= 4;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_WepEper:
if(slot == 1)
{
if ( pPlayer->pev->frags > 3 )
{
pPlayer->GiveNamedItem( "weapon_chumtoad" );
pPlayer->pev->frags -= 4;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 6)
{
pPlayer->GiveNamedItem( "weapon_railgun" );
pPlayer->pev->frags -= 7;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 3)
{
if ( pPlayer->pev->frags > 9)
{
pPlayer->GiveNamedItem( "weapon_nuke" );
pPlayer->pev->frags -= 10;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_AmmoBul:
if(slot == 1)
{
if ( pPlayer->pev->frags > 0 )
{
pPlayer->GiveNamedItem( "ammo_ppkclip" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_magclip" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 3)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_uziclip" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 4)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_chaingunbox" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 5)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_m16clip" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 6)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_rifleclip" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 7)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_buckshotbox" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
break;
//=============================================================
//=============================================================
case Menu_AmmoExp:
if(slot == 1)
{
if ( pPlayer->pev->frags > 1 )
{
pPlayer->GiveNamedItem( "ammo_contact" );
pPlayer->pev->frags -= 2;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 1 )
{
pPlayer->GiveNamedItem( "ammo_timed" );
pPlayer->pev->frags -= 2;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 3)
{
if ( pPlayer->pev->frags > 1)
{
pPlayer->GiveNamedItem( "ammo_rocket" );
pPlayer->pev->frags -= 2;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 4)
{
if ( pPlayer->pev->frags > 2 )
{
pPlayer->GiveNamedItem( "ammo_nukeclip" );
pPlayer->pev->frags -= 3;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
//=============================================================
//=============================================================
case Menu_AmmoMisc:
if(slot == 1)
{
if ( pPlayer->pev->frags > 0 )
{
pPlayer->GiveNamedItem( "ammo_railslug" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
if(slot == 2)
{
if ( pPlayer->pev->frags > 0)
{
pPlayer->GiveNamedItem( "ammo_boltgun" );
pPlayer->pev->frags--;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pPlayer->edict()) );
WRITE_SHORT( pPlayer->pev->frags );
WRITE_SHORT( pPlayer->m_iDeaths );
MESSAGE_END();
}
else
{
ShowMenu(pPlayer, 0x1, 2, 0,"You do not have enough frags.");
}
}
}
return TRUE;
}
//=============================================================
//=============================================================
if (FStrEq(pcmd, "rune_status" ))
{
if ( pPlayer->m_iPlayerRune == RUNE_SPEED )
ShowMenu (pPlayer, 0x1, 5, 0, "You Have Rune: Speed" );
else if ( pPlayer->m_iPlayerRune == RUNE_RESIST )
ShowMenu (pPlayer, 0x1, 5, 0, "You Have Rune: Resist" );
else if ( pPlayer->m_iPlayerRune == RUNE_STRENGTH )
ShowMenu (pPlayer, 0x1, 5, 0, "You Have Rune: Strength" );
else if ( pPlayer->m_iPlayerRune == RUNE_HEALTH )
ShowMenu (pPlayer, 0x1, 5, 0, "You Have Rune: Regeneration" );
else if ( pPlayer->m_iPlayerRune == RUNE_ROCKETARENA )
ShowMenu (pPlayer, 0x1, 5, 0, "You Have Rune: Rocket Arena Special" );
else
ShowMenu (pPlayer, 0x1, 5, 0, "You Have No Runes." );
return TRUE;
}
//=============================================================
//=============================================================
if (FStrEq(pcmd, "changeweapons" ))
{
pPlayer->m_nMenu = Menu_Change;
ShowMenu(pPlayer, 0x7, 0, 0,"Weapons Change:\n\nPlease choose a weapon.\n1. Knife\n2. Crowbar\n3. Sword");
return TRUE;
}
//=============================================================
//=============================================================
// Weapons and ammo
if (FStrEq(pcmd, "weaponmenu" ))
{
if ( pPlayer->IsAlive() )
{
pPlayer->m_nMenu = Menu_WepSel;
ShowMenu(pPlayer, 0x7F, 0, 0,"Choose a weapon class to buy:\n1. Manual\n2. Handguns\n3. Assault/Machineguns\n4. Shotguns\n5. High Explosive\n6. Experimental");
}
else
{
ShowMenu(pPlayer, 0x1, 1, 0,"Cant buy weapons while dead.");
}
return TRUE;
}
//=============================================================
//=============================================================
else if (FStrEq(pcmd, "ammomenu" ))
{
if ( pPlayer->IsAlive() )
{
pPlayer->m_nMenu = Menu_AmmoSel;
ShowMenu(pPlayer, 0x7, 0, 0,"Choose a ammo class to buy:\n1. Bullet Type\n2. High Explosive\n3. Misc");
}
else
{
ShowMenu(pPlayer, 0x1, 1, 0,"Cant buy weapons while dead.");
}
return TRUE;
}
//=============================================================
//=============================================================
else if ( FStrEq( pcmd, "stopobserv" ) )
{
pPlayer->StopSpectator();
return TRUE;
}
//=============================================================
//=============================================================
return FALSE;
}
//=========================================================
//=========================================================
void CFWArena :: PlayerSpawn( CBasePlayer *pPlayer )
{
BOOL addDefault;
CBaseEntity *pWeaponEntity = NULL;
pPlayer->pev->weapons |= (1<<WEAPON_SUIT);
addDefault = TRUE;
while ( pWeaponEntity = UTIL_FindEntityByClassname( pWeaponEntity, "game_player_equip" ))
{
pWeaponEntity->Touch( pPlayer );
addDefault = FALSE;
}
if ( addDefault )
{
pPlayer->GiveNamedItem( pPlayer->m_cWeapon1 );
}
}
//=========================================================
//=========================================================
BOOL CFWArena :: FPlayerCanRespawn( CBasePlayer *pPlayer )
{
return pPlayer->m_fWantRespawn;
}
//=========================================================
//=========================================================
float CFWArena :: FlPlayerSpawnTime( CBasePlayer *pPlayer )
{
return gpGlobals->time;//now!
}
BOOL CFWArena :: AllowAutoTargetCrosshair( void )
{
return ( CVAR_GET_FLOAT( "mp_autocrosshair" ) != 0 );
}
//=========================================================
// IPointsForKill - how many points awarded to anyone
// that kills this player?
//=========================================================
int CFWArena :: IPointsForKill( CBasePlayer *pAttacker, CBasePlayer *pKilled )
{
return 1;
}
//=========================================================
// PlayerKilled - someone/something killed this player
//=========================================================
void CFWArena :: PlayerKilled( CBasePlayer *pVictim, entvars_t *pKiller, entvars_t *pInflictor )
{
DeathNotice( pVictim, pKiller, pInflictor );
pVictim->m_iDeaths += 1;
FireTargets( "game_playerdie", pVictim, pVictim, USE_TOGGLE, 0 );
CBasePlayer *peKiller = NULL;
CBaseEntity *ktmp = CBaseEntity::Instance( pKiller );
if ( ktmp && (ktmp->Classify() == CLASS_PLAYER) )
peKiller = (CBasePlayer*)ktmp;
if ( pVictim->pev == pKiller )
{ // killed self
pKiller->frags -= 1;
}
else if ( ktmp && ktmp->IsPlayer() )
{
// if a player dies in a deathmatch game and the killer is a client, award the killer some points
pKiller->frags += IPointsForKill( peKiller, pVictim );
FireTargets( "game_playerkill", ktmp, ktmp, USE_TOGGLE, 0 );
}
else
{ // killed by the world
pKiller->frags -= 1;
}
// update the scores
// killed scores
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(pVictim->edict()) );
WRITE_SHORT( pVictim->pev->frags );
WRITE_SHORT( pVictim->m_iDeaths );
MESSAGE_END();
// killers score, if it's a player
CBaseEntity *ep = CBaseEntity::Instance( pKiller );
if ( ep && ep->Classify() == CLASS_PLAYER )
{
CBasePlayer *PK = (CBasePlayer*)ep;
MESSAGE_BEGIN( MSG_ALL, gmsgScoreInfo );
WRITE_BYTE( ENTINDEX(PK->edict()) );
WRITE_SHORT( PK->pev->frags );
WRITE_SHORT( PK->m_iDeaths );
MESSAGE_END();
// let the killer paint another decal as soon as he'd like.
PK->m_flNextDecalTime = gpGlobals->time;
}
}
//=========================================================
// Deathnotice.
//=========================================================
void CFWArena::DeathNotice( CBasePlayer *pVictim, entvars_t *pKiller, entvars_t *pevInflictor )
{
// Work out what killed the player, and send a message to all clients about it
CBaseEntity *Killer = CBaseEntity::Instance( pKiller );
const char *killer_weapon_name = "world"; // by default, the player is killed by the world
int killer_index = 0;
if ( pKiller->flags & FL_CLIENT )
{
killer_index = ENTINDEX(ENT(pKiller));
if ( pevInflictor )
{
if ( pevInflictor == pKiller )
{
// If the inflictor is the killer, then it must be their current weapon doing the damage
CBasePlayer *pPlayer = (CBasePlayer*)CBaseEntity::Instance( pKiller );
if ( pPlayer->m_pActiveItem )
{
killer_weapon_name = pPlayer->m_pActiveItem->pszName();
}
}
else
{
killer_weapon_name = STRING( pevInflictor->classname ); // it's just that easy
}
}
}
else
{
killer_weapon_name = STRING( pevInflictor->classname );
}
// strip the monster_* or weapon_* from the inflictor's classname
if ( strncmp( killer_weapon_name, "weapon_", 7 ) == 0 )
killer_weapon_name += 7;
else if ( strncmp( killer_weapon_name, "monster_", 8 ) == 0 )
killer_weapon_name += 8;
else if ( strncmp( killer_weapon_name, "func_", 5 ) == 0 )
killer_weapon_name += 5;
MESSAGE_BEGIN( MSG_ALL, gmsgDeathMsg );
WRITE_BYTE( killer_index ); // the killer
WRITE_BYTE( ENTINDEX(pVictim->edict()) ); // the victim
WRITE_STRING( killer_weapon_name ); // what they were killed by (should this be a string?)
MESSAGE_END();
if ( pVictim->pev == pKiller )
{ // killed self
UTIL_LogPrintf( "\"%s<%i>\" killed self with %s\n", STRING( pVictim->pev->netname ), GETPLAYERUSERID( pVictim->edict() ), killer_weapon_name );
}
else if ( pKiller->flags & FL_CLIENT )
{
UTIL_LogPrintf( "\"%s<%i>\" killed \"%s<%i>\" with %s\n", STRING( pKiller->netname ),
GETPLAYERUSERID( ENT(pKiller) ),
STRING( pVictim->pev->netname ),
GETPLAYERUSERID( pVictim->edict() ),
killer_weapon_name );
}
else
{ // killed by the world
UTIL_LogPrintf( "\"%s<%i>\" killed by world with %s\n", STRING( pVictim->pev->netname ), GETPLAYERUSERID( pVictim->edict() ), killer_weapon_name );
}
return;
}
//=========================================================
// PlayerGotWeapon - player has grabbed a weapon that was
// sitting in the world
//=========================================================
void CFWArena :: PlayerGotWeapon( CBasePlayer *pPlayer, CBasePlayerItem *pWeapon )
{
}
//=========================================================
// FlWeaponRespawnTime - what is the time in the future
// at which this weapon may spawn?
//=========================================================
float CFWArena :: FlWeaponRespawnTime( CBasePlayerItem *pWeapon )
{
return FALSE;
}
// when we are within this close to running out of entities, items
// marked with the ITEM_FLAG_LIMITINWORLD will delay their respawn
#define ENTITY_INTOLERANCE 100
//=========================================================
// FlWeaponRespawnTime - Returns 0 if the weapon can respawn
// now, otherwise it returns the time at which it can try
// to spawn again.
//=========================================================
float CFWArena :: FlWeaponTryRespawn( CBasePlayerItem *pWeapon )
{
if ( pWeapon && pWeapon->m_iId )
{
return 0;
}
return 0;
}
//=========================================================
// VecWeaponRespawnSpot - where should this weapon spawn?
// Some game variations may choose to randomize spawn locations
//=========================================================
Vector CFWArena :: VecWeaponRespawnSpot( CBasePlayerItem *pWeapon )
{
return pWeapon->pev->origin;
}
//=========================================================
// WeaponShouldRespawn - any conditions inhibiting the
// respawning of this weapon?
//=========================================================
int CFWArena :: WeaponShouldRespawn( CBasePlayerItem *pWeapon )
{
return GR_WEAPON_RESPAWN_NO;
}
//=========================================================
// CanHaveWeapon - returns FALSE if the player is not allowed
// to pick up this weapon
//=========================================================
BOOL CFWArena::CanHavePlayerItem( CBasePlayer *pPlayer, CBasePlayerItem *pItem )
{
if ( CVAR_GET_FLOAT("mp_weaponstay") > 0 )
{
if ( pItem->iFlags() & ITEM_FLAG_LIMITINWORLD )
return CGameRules::CanHavePlayerItem( pPlayer, pItem );
// check if the player already has this weapon
for ( int i = 0 ; i < MAX_ITEM_TYPES ; i++ )
{
CBasePlayerItem *it = pPlayer->m_rgpPlayerItems[i];
while ( it != NULL )
{
if ( it->m_iId == pItem->m_iId )
{
return FALSE;
}
it = it->m_pNext;
}
}
}
return CGameRules::CanHavePlayerItem( pPlayer, pItem );
}
//=========================================================
//=========================================================
BOOL CFWArena::CanHaveItem( CBasePlayer *pPlayer, CItem *pItem )
{
return TRUE;
}
//=========================================================
//=========================================================
void CFWArena::PlayerGotItem( CBasePlayer *pPlayer, CItem *pItem )
{
}
//=========================================================
//=========================================================
int CFWArena::ItemShouldRespawn( CItem *pItem )
{
return GR_ITEM_RESPAWN_NO;
}
//=========================================================
// At what time in the future may this Item respawn?
//=========================================================
float CFWArena::FlItemRespawnTime( CItem *pItem )
{
return gpGlobals->time + ITEM_RESPAWN_TIME;
}
//=========================================================
// Where should this item respawn?
// Some game variations may choose to randomize spawn locations
//=========================================================
Vector CFWArena::VecItemRespawnSpot( CItem *pItem )
{
return pItem->pev->origin;
}
//=========================================================
//=========================================================
void CFWArena::PlayerGotAmmo( CBasePlayer *pPlayer, char *szName, int iCount )
{
}
//=========================================================
//=========================================================
BOOL CFWArena::IsAllowedToSpawn( CBaseEntity *pEntity )
{
if ( pEntity->pev->flags & FL_MONSTER )
return FALSE;
return TRUE;
}
//=========================================================
//=========================================================
int CFWArena::AmmoShouldRespawn( CBasePlayerAmmo *pAmmo )
{
return GR_AMMO_RESPAWN_NO;
}
//=========================================================
//=========================================================
float CFWArena::FlAmmoRespawnTime( CBasePlayerAmmo *pAmmo )
{
return gpGlobals->time + AMMO_RESPAWN_TIME;
}
//=========================================================
//=========================================================
Vector CFWArena::VecAmmoRespawnSpot( CBasePlayerAmmo *pAmmo )
{
return pAmmo->pev->origin;
}
//=========================================================
//=========================================================
float CFWArena::FlHealthChargerRechargeTime( void )
{
return 60;
}
float CFWArena::FlHEVChargerRechargeTime( void )
{
return 30;
}
//=========================================================
//=========================================================
int CFWArena::DeadPlayerWeapons( CBasePlayer *pPlayer )
{
return GR_PLR_DROP_GUN_ACTIVE;
}
//=========================================================
//=========================================================
int CFWArena::DeadPlayerAmmo( CBasePlayer *pPlayer )
{
return GR_PLR_DROP_AMMO_ACTIVE;
}
edict_t *CFWArena::GetPlayerSpawnSpot( CBasePlayer *pPlayer )
{
edict_t *pentSpawnSpot = CGameRules::GetPlayerSpawnSpot( pPlayer );
if ( IsMultiplayer() && pentSpawnSpot->v.target )
{
FireTargets( STRING(pentSpawnSpot->v.target), pPlayer, pPlayer, USE_TOGGLE, 0 );
}
return pentSpawnSpot;
}
//=========================================================
//=========================================================
int CFWArena::PlayerRelationship( CBaseEntity *pPlayer, CBaseEntity *pTarget )
{
// half life deathmatch has only enemies
return GR_NOTTEAMMATE;
}
//=========================================================
//=========================================================
BOOL CFWArena :: PlayFootstepSounds( CBasePlayer *pl, float fvol )
{
if ( CVAR_GET_FLOAT( "mp_footsteps" ) == 0 )
return FALSE;
if ( pl->IsOnLadder() || pl->pev->velocity.Length2D() > 220 )
return TRUE; // only make step sounds in multiplayer if the player is moving fast enough
return FALSE;
}
//=========================================================
//========================================================
BOOL CFWArena :: FAllowFlashlight( void )
{
return CVAR_GET_FLOAT( "mp_flashlight" ) != 0;
}
//=========================================================
//=========================================================
BOOL CFWArena :: FAllowMonsters( void )
{
return ( CVAR_GET_FLOAT( "mp_allowmonsters" ) != 0 );
}
//=========================================================
//======== CFWArena private functions ===========
#define INTERMISSION_TIME 6
void CFWArena :: GoToIntermission( void )
{
if ( g_fGameOver )
return; // intermission has already been triggered, so ignore.
MESSAGE_BEGIN(MSG_ALL, SVC_INTERMISSION);
MESSAGE_END();
m_flIntermissionEndTime = gpGlobals->time + INTERMISSION_TIME;
g_fGameOver = TRUE;
m_iEndIntermissionButtonHit = FALSE;
}
void CFWArena :: ChangeLevel( void )
{
char szNextMap[32];
char szFirstMapInList[32];
strcpy( szFirstMapInList, "hldm1" ); // the absolute default level is hldm1
// find the map to change to
char *mapcfile = (char*)CVAR_GET_STRING( "mapcyclefile" );
ASSERT( mapcfile != NULL );
strcpy( szNextMap, STRING(gpGlobals->mapname) );
strcpy( szFirstMapInList, STRING(gpGlobals->mapname) );
int length;
char *pFileList;
char *aFileList = pFileList = (char*)LOAD_FILE_FOR_ME( mapcfile, &length );
if ( pFileList && length )
{
// the first map name in the file becomes the default
sscanf( pFileList, " %32s", szNextMap );
if ( IS_MAP_VALID( szNextMap ) )
strcpy( szFirstMapInList, szNextMap );
// keep pulling mapnames out of the list until the current mapname
// if the current mapname isn't found, load the first map in the list
BOOL next_map_is_it = FALSE;
while ( 1 )
{
while ( *pFileList && isspace( *pFileList ) ) pFileList++; // skip over any whitespace
if ( !(*pFileList) )
break;
char cBuf[32];
int ret = sscanf( pFileList, " %32s", cBuf );
// Check the map name is valid
if ( ret != 1 || *cBuf < 13 )
break;
if ( next_map_is_it )
{
// check that it is a valid map file
if ( IS_MAP_VALID( cBuf ) )
{
strcpy( szNextMap, cBuf );
break;
}
}
if ( FStrEq( cBuf, STRING(gpGlobals->mapname) ) )
{ // we've found our map; next map is the one to change to
next_map_is_it = TRUE;
}
pFileList += strlen( cBuf );
}
FREE_FILE( aFileList );
}
if ( !IS_MAP_VALID(szNextMap) )
strcpy( szNextMap, szFirstMapInList );
g_fGameOver = TRUE;
ALERT( at_console, "CHANGE LEVEL: %s\n", szNextMap );
CHANGE_LEVEL( szNextMap, NULL );
}
#define MAX_MOTD_CHUNK 60
#define MAX_MOTD_LENGTH (MAX_MOTD_CHUNK * 4)
void CFWArena :: SendMOTDToClient( edict_t *client )
{
// read from the MOTD.txt file
int length, char_count = 0;
char *pFileList;
char *aFileList = pFileList = (char*)LOAD_FILE_FOR_ME( "fw_arena_motd.txt", &length );
// Send the message of the day
// read it chunk-by-chunk, and send it in parts
while ( pFileList && *pFileList && char_count < MAX_MOTD_LENGTH )
{
char chunk[MAX_MOTD_CHUNK+1];
if ( strlen( pFileList ) < MAX_MOTD_CHUNK )
{
strcpy( chunk, pFileList );
}
else
{
strncpy( chunk, pFileList, MAX_MOTD_CHUNK );
chunk[MAX_MOTD_CHUNK] = 0; // strncpy doesn't always append the null terminator
}
char_count += strlen( chunk );
if ( char_count < MAX_MOTD_LENGTH )
pFileList = aFileList + char_count;
else
*pFileList = 0;
MESSAGE_BEGIN( MSG_ONE, gmsgMOTD, NULL, client );
WRITE_BYTE( *pFileList ? FALSE : TRUE ); // FALSE means there is still more message to come
WRITE_STRING( chunk );
MESSAGE_END();
}
FREE_FILE( aFileList );
}