******************************************/

#include "extdll.h"

#include "util.h"

#include "cbase.h"

#include "monsters.h"

#include "weapons.h"

#include "nodes.h"

#include "player.h"

#include "soundent.h"

#include "gamerules.h"

LINK_ENTITY_TO_CLASS( weapon_ak47, Cak47 );

enum ak47_e

{

  ak47_IDLE = 0,

  ak47_FIRE1,

  ak47_FIRE2,

  ak47_FIRE3,

  ak47_RELOAD,

  ak47_DEPLOY,

};

void Cak47::Spawn( )

{

  pev->classname = MAKE_STRING("weapon_ak47");

  Precache( );

  SET_MODEL(ENT(pev), "models/w_ak47.mdl");

  m_iId = 17;

  m_iDefaultAmmo = 30;

  FallInit();

}

void Cak47::Precache( void )

{

  PRECACHE_MODEL("models/v_ak47.mdl");

  PRECACHE_MODEL("models/p_ak47.mdl");

  PRECACHE_MODEL("models/w_ak47.mdl");

  PRECACHE_MODEL("models/w_ammo762.mdl");

  m_iShell = PRECACHE_MODEL ("models/shell.mdl");

  PRECACHE_SOUND ("weapons/ak47-1.wav");

  PRECACHE_SOUND ("weapons/ak47-2.wav");

  m_event = PRECACHE_EVENT( 1, "events/ak47.sc" );

}

int Cak47::GetItemInfo(ItemInfo *p)

{

  p->pszName = STRING(pev->classname);

  p->pszAmmo1 = "ammo_ak47"; // The type of ammo it uses

  p->iMaxAmmo1 = 90; // Max ammo the player can carry

  p->pszAmmo2 = NULL; // No secondary ammo

  p->iMaxAmmo2 = -1;

  p->iMaxClip = 30; // The clip size

  p->iSlot = 2; // The number in the HUD

  p->iPosition = 2; // The position in a HUD slot

  p->iFlags = 0;

  p->iId = m_iId = 17; // The weapon id

  p->iWeight = 15; // for autoswitching

  return 1;

}

int Cak47::AddToPlayer( CBasePlayer *pPlayer )

{

  if ( CBasePlayerWeapon::AddToPlayer( pPlayer ) )

  {

    MESSAGE_BEGIN( MSG_ONE, gmsgWeapPickup, NULL, pPlayer->pev );

    WRITE_BYTE( m_iId );

    MESSAGE_END();

    return TRUE;

  }

  return FALSE;

}

BOOL Cak47::Deploy( )

{

  g_engfuncs.pfnSetClientMaxspeed(m_pPlayer->edict(), 200 );

  return DefaultDeploy("models/v_ak47.mdl", "models/p_ak47.mdl",

  ak47_DEPLOY,"mp5");

}

void Cak47::PrimaryAttack()

{

  // don't fire if empty

  if (m_iClip <= 0)

  {

    PlayEmptySound();

    m_flNextPrimaryAttack = 0.15;

    return;

  }

  // Weapon sound

  m_pPlayer->m_iWeaponVolume = NORMAL_GUN_VOLUME;

  m_pPlayer->m_iWeaponFlash = NORMAL_GUN_FLASH;

  // one less round in the clip

  m_iClip--;

  // add a muzzle flash

  m_pPlayer->pev->effects = (int)(m_pPlayer->pev->effects) | EF_MUZZLEFLASH;

  // player "shoot" animation

  m_pPlayer->SetAnimation( PLAYER_ATTACK1 );

  Vector vecSrc(m_pPlayer->GetGunPosition());

  Vector vecAim(m_pPlayer->GetAutoaimVector(AUTOAIM_2DEGREES));

  Vector vecAcc(VECTOR_CONE_2DEGREES);

  Vector vecDir(m_pPlayer->FireBulletsPlayer( 1, vecSrc, vecAim, vecAcc, 8192,BULLET_PLAYER_MP5, 0, 0, m_pPlayer->pev, m_pPlayer->random_seed ));

  PLAYBACK_EVENT_FULL( FEV_NOTHOST, m_pPlayer->edict(), m_event, 0.0,

  (float *)&g_vecZero, (float *)&g_vecZero,

  vecDir.x, vecDir.y, 0, 0, (m_iClip ? 0 : 1), 0 );

  m_flNextPrimaryAttack = UTIL_WeaponTimeBase() + 0.1;

  m_flTimeWeaponIdle = UTIL_WeaponTimeBase() + UTIL_SharedRandomFloat(m_pPlayer->random_seed, 1.085,2.085);

}

void Cak47::Reload( void )

{

  DefaultReload( 30, ak47_RELOAD, 2.7 );

}

void Cak47::WeaponIdle( void )

{

  ResetEmptySound( );

  m_pPlayer->GetAutoaimVector( AUTOAIM_5DEGREES );

  if (m_flTimeWeaponIdle > UTIL_WeaponTimeBase())

    return;

  SendWeaponAnim( ak47_IDLE );

  m_flTimeWeaponIdle = UTIL_SharedRandomFloat(m_pPlayer->random_seed, 10, 15);

}

//Ammo clip

class Cak47AmmoClip : public CBasePlayerAmmo

{

  virtual void Spawn( void );

  virtual void Precache( void );

  virtual BOOL AddAmmo( CBaseEntity *pOther );

};

void Cak47AmmoClip::Spawn( void )

{

  Precache( );

  SET_MODEL(ENT(pev), "models/w_ammo762.mdl");

  CBasePlayerAmmo::Spawn( );

}

void Cak47AmmoClip::Precache( void )

{

  PRECACHE_MODEL ("models/w_ammo762.mdl");

  PRECACHE_SOUND("items/9mmclip1.wav");

}

BOOL Cak47AmmoClip::AddAmmo( CBaseEntity *pOther )

{

  int bResult = (pOther->GiveAmmo(30, "ammo_ak47",90) != -1);

  if (bResult)

  {

    EMIT_SOUND(ENT(pev), CHAN_ITEM, "items/9mmclip1.wav", 1, ATTN_NORM);

  }

  return bResult;

}

void EV_HLDM_SmokePuff( pmtrace_t *pTrace, float *vecSrc, float *vecEnd )

{

  physent_t *pe;

  pe = gEngfuncs.pEventAPI->EV_GetPhysent( pTrace->ent );

  if ( pe && pe->solid == SOLID_BSP )

  {    // if it's a solid wall / entity

    char chTextureType = CHAR_TEX_CONCRETE;

  char *pTextureName;

  char texname[ 64 ];

  char szbuffer[ 64 ];

  pTextureName = (char *)gEngfuncs.pEventAPI->EV_TraceTexture( pTrace->ent, vecSrc, vecEnd );

  if ( pTextureName )

  {

    strcpy( texname, pTextureName );

    pTextureName = texname;

    // strip leading '-0' or '+0~' or '{' or '!'

    if (*pTextureName == '-' || *pTextureName == '+')

    {

      pTextureName += 2;

    }

    if (*pTextureName == '{' || *pTextureName == '!' || *pTextureName == '~' || *pTextureName == ' ')

    {

      pTextureName++;

    }

    // '}}'

    strcpy( szbuffer, pTextureName );

    szbuffer[ CBTEXTURENAMEMAX - 1 ] = 0;

    // get texture type

    chTextureType = PM_FindTextureType( szbuffer );

  }

  bool fDoPuffs = false;

  bool fDoSparks = false;

  int a,r,g,b;

  switch (chTextureType)

  {

    // do smoke puff and eventually add sparks

    case CHAR_TEX_TILE:

      case CHAR_TEX_CONCRETE:

          fDoSparks = (gEngfuncs.pfnRandomLong(1, 4) == 1);

        fDoPuffs = true;

        a = 128;

        r = 200;

        g = 200;

        b = 200;

        break;

  case CHAR_TEX_VENT:

    case CHAR_TEX_GRATE:

      case CHAR_TEX_METAL:

          fDoSparks = (gEngfuncs.pfnRandomLong(1, 2) == 1);

        break;

  case CHAR_TEX_DIRT:

    case CHAR_TEX_WOOD:

        fDoPuffs = true;

      a = 250;

      r = 97;

      g = 86;

      b = 53;

      break;

  default:

    case CHAR_TEX_GLASS:

      case CHAR_TEX_COMPUTER:

        case CHAR_TEX_SLOSH:

            break;

        }

  if( fDoPuffs )

  {

    vec3_t angles, forward, right, up;

    VectorAngles( pTrace->plane.normal, angles );

    AngleVectors( angles, forward, up, right );

    forward.z = -forward.z;

    int  iWallsmoke = gEngfuncs.pEventAPI->EV_FindModelIndex ("sprites/smokepuff.spr");

    TEMPENTITY *pTemp = gEngfuncs.pEfxAPI->R_TempSprite(

    pTrace->endpos,

    forward * gEngfuncs.pfnRandomFloat(10, 30) + right * gEngfuncs.pfnRandomFloat(-6, 6) + up * gEngfuncs.pfnRandomFloat(0, 6),

    0.4,

    iWallsmoke,

    kRenderTransAlpha,

    kRenderFxNone,

    1.0,

    0.3,

    FTENT_SPRANIMATE | FTENT_FADEOUT

    );

    if(pTemp)

    {    // sprite created successfully, adjust some things

    pTemp->fadeSpeed = 2.0;

    pTemp->entity.curstate.framerate = 20.0;

    pTemp->entity.curstate.renderamt = a;

    pTemp->entity.curstate.rendercolor.r = r;

    pTemp->entity.curstate.rendercolor.g = g;

    pTemp->entity.curstate.rendercolor.b = b;

  }

}

if( fDoSparks )

{

  // spawn some sparks

  gEngfuncs.pEfxAPI->R_SparkShower( pTrace->endpos );

}

}

}