Utility Mill

block load { es_xkeygroupload weapons |recoilmod es_xsetinfo _weapon 0

    es_xsetinfo x 0
es_xsetinfo y 0
es_xsetinfo z 0

es_xset fmove 0
es_xset smove 0
es_xset umove 0

es_xsetinfo vt 0    
es_xsetinfo fA 0
es_xsetinfo fB 0
es_xsetinfo fC 0
es_xset recoilmod "1.1"
es_xmakepublic recoilmod    
es_xdoblock corelib/noisy_on

}

block unload { es_xkeygroupdelete weapons es_xdoblock corelib/noisy_off }

event bullet_impact { [HTML_REMOVED] es_createvectorstring fA event_var(x) event_var(y) event_var(z) es_getplayerprop fB event_var(userid) "CBaseEntity.m_vecOrigin"

es_createvectorfrompoints fC server_var(fA) server_var(fB)  
es_splitvectorstring x y z server_var(fC)       

es_xcreateplayerlist userweapon
es_keygetvalue _weapon userweapon event_var(userid) weapon
es_xstring _weapon replace weapon_
es_xkeygroupdelete userweapon

es_keygetvalue _weapon weapons knockback server_var(_weapon)            

es_xset iscrouched 0 
es_getplayerprop iscrouched event_var(userid) "CBasePlayer.localdata.m_Local.m_bDucked" 
ifx true(iscrouched) do
{
  es_xmathparse _weapon "_weapon/2"
}

es_getplayermovement fmove smove umove event_var(userid)    
ifx parse("fmove <= 0") do
{
  ifx true(iscrouched) do
  {
    es_xmathparse _weapon "_weapon/2"
  }
  else do
  {
    es_xmathparse _weapon "_weapon/4"
  }   
}
es_xmathparse vt "sqrt(x^2+y^2+z^2)"        
es_xmathparse x "_weapon*(x/vt)"
es_xmathparse y "_weapon*(y/vt)"
es_xmathparse z "z/vt"  
es_createvectorstring fB server_var(x) server_var(y) server_var(z)
es_setplayerprop event_var(userid) "CCSPlayer.baseclass.localdata.m_vecBaseVelocity" server_var(fB)

}