This graph shows which files directly or indirectly include this file:

Functions
vector	damage_explosion_calcpush (vector explosion_f, vector target_v, float speedfactor)
float	explosion_calcpush_getmultiplier (vector explosion_v, vector target_v)
vector	W_CalculateSpread (vector dir, float spread, int spread_style, bool must_normalize)
vector	W_CalculateSpreadPattern (int pattern, float bias, int counter, int total)
int	W_GunAlign (entity this, int preferred_align)

Variables
float	autocvar_g_weaponspreadfactor
const float	W_SPREAD_GAUSS_MAX_STDEV = 4

Function Documentation

◆ damage_explosion_calcpush()

vector damage_explosion_calcpush	(	vector	explosion_f,
		vector	target_v,
		float	speedfactor )

Definition at line 39 of file calculations.qc.

{
    // if below 1, the formulas make no sense (and would cause superjumps)
    if (speedfactor < 1)
        return explosion_f;
 
#if 0
    float m;
    // find m so that
    //   speedfactor * (1 + e) * m / (1 + m) == 1
    m = 1 / ((1 + 0) * speedfactor - 1);
    vector v = explosion_calcpush(explosion_f * speedfactor, m, target_v, 1, 0);
    // the factor we then get is:
    //   1
    LOG_INFOF("MASS: %f\nv: %v -> %v\nENERGY BEFORE == %f + %f = %f\nENERGY AFTER >= %f",
        m,
        target_v, target_v + v,
        target_v * target_v, m * explosion_f * speedfactor * explosion_f * speedfactor, target_v * target_v + m * explosion_f * speedfactor * explosion_f * speedfactor,
        (target_v + v) * (target_v + v));
    return v;
#endif
    return explosion_f * explosion_calcpush_getmultiplier(explosion_f * speedfactor, target_v);
}

References explosion_calcpush_getmultiplier(), LOG_INFOF, and vector.

Referenced by Damage(), MUTATOR_HOOKFUNCTION(), and NET_HANDLE().

◆ explosion_calcpush_getmultiplier()

float explosion_calcpush_getmultiplier	(	vector	explosion_v,
		vector	target_v )

Definition at line 7 of file calculations.qc.

{
    float a = explosion_v * (explosion_v - target_v);
 
    if (a <= 0)
        // target is too fast to be hittable by this
        return 0;
 
    a /= explosion_v * explosion_v;
        // we know we can divide by this, or above a would be == 0
    return a;
}

References vector.

Referenced by damage_explosion_calcpush().

◆ W_CalculateSpread()

vector W_CalculateSpread	(	vector	dir,
		float	spread,
		int	spread_style,
		bool	must_normalize )

Definition at line 226 of file calculations.qc.

{
    spread *= autocvar_g_weaponspreadfactor;
    if (spread <= 0)
        return (must_normalize ? normalize(dir) : dir);
 
    vector v1 = '0 0 0', v2;
    float sigma;
    float dx, dy, r;
    switch (spread_style)
    {
        case 0:
            // this is the baseline for the spread value!
            // standard deviation: sqrt(2/5)
            // density function: sqrt(1-r^2)
            v1 = dir + randomvec() * spread;
            return (must_normalize ? normalize(v1) : v1);
        case 1:
            // same thing, basically
            return normalize(dir + cliptoplane(randomvec() * spread, dir));
        case 2:
            // circle spread... has at sigma=1 a standard deviation of sqrt(1/2)
            sigma = spread * 0.89442719099991587855; // match baseline stddev
            v1 = findperpendicular(dir);
            v2 = cross(dir, v1);
            // random point on unit circle
            dx = random() * 2 * M_PI;
            dy = sin(dx);
            dx = cos(dx);
            // radius in our dist function
            r = random();
            r = sqrt(r);
            return normalize(dir + (v1 * dx + v2 * dy) * r * sigma);
        case 3: // gauss 3d
            sigma = spread * 0.44721359549996; // match baseline stddev
            // note: 2D gaussian has sqrt(2) times the stddev of 1D, so this factor is right
            v1.x = gsl_ran_ugaussian() * sigma;
            v1.y = gsl_ran_ugaussian() * sigma;
            v1.z = gsl_ran_ugaussian() * sigma;
            if (vlen2(v1) > W_SPREAD_GAUSS_MAX_STDEV ** 2)
                v1 = normalize(v1) * W_SPREAD_GAUSS_MAX_STDEV;
            v2 = dir + v1;
            return (must_normalize ? normalize(v2) : v2);
        case 4: // gauss 2d
            sigma = spread * 0.44721359549996; // match baseline stddev
            // note: 2D gaussian has sqrt(2) times the stddev of 1D, so this factor is right
            v1.x = gsl_ran_ugaussian() * sigma;
            v1.y = gsl_ran_ugaussian() * sigma;
            v1.z = gsl_ran_ugaussian() * sigma;
            if (vlen2(v1) > W_SPREAD_GAUSS_MAX_STDEV ** 2)
                v1 = normalize(v1) * W_SPREAD_GAUSS_MAX_STDEV;
            return normalize(dir + cliptoplane(v1, dir));
        case 5: // 1-r
            sigma = spread * 1.154700538379252; // match baseline stddev
            v1 = findperpendicular(dir);
            v2 = cross(dir, v1);
            // random point on unit circle
            dx = random() * 2 * M_PI;
            dy = sin(dx);
            dx = cos(dx);
            // radius in our dist function
            r = random();
            r = solve_cubic_abcd(-2, 3, 0, -r) * '0 1 0';
            return normalize(dir + (v1 * dx + v2 * dy) * r * sigma);
        case 6: // 1-r^2
            sigma = spread * 1.095445115010332; // match baseline stddev
            v1 = findperpendicular(dir);
            v2 = cross(dir, v1);
            // random point on unit circle
            dx = random() * 2 * M_PI;
            dy = sin(dx);
            dx = cos(dx);
            // radius in our dist function
            r = random();
            r = sqrt(1 - r);
            r = sqrt(1 - r);
            return normalize(dir + (v1 * dx + v2 * dy) * r * sigma);
        case 7: // (1-r) (2-r)
            sigma = spread * 1.224744871391589; // match baseline stddev
            v1 = findperpendicular(dir);
            v2 = cross(dir, v1);
            // random point on unit circle
            dx = random() * 2 * M_PI;
            dy = sin(dx);
            dx = cos(dx);
            // radius in our dist function
            r = random();
            r = 1 - sqrt(r);
            r = 1 - sqrt(r);
            return normalize(dir + (v1 * dx + v2 * dy) * r * sigma);
        default:
            error("g_projectiles_spread_style must be 0 (sphere), 1 (flattened sphere), 2 (circle), 3 (gauss 3D), 4 (gauss plane), 5 (linear falloff), 6 (quadratic falloff), 7 (stronger falloff)!");
    }
 
    return '0 0 0';
    /*
     * how to derive falloff functions: Maxima:
     * rho(r) := (2-r) * (1-r);
     * a : 0;
     * b : 1;
     * rhor(r) := r * rho(r);
     * cr(t) := integrate(rhor(r), r, a, t);
     * scr(t) := integrate(rhor(r) * r^2, r, a, t);
     * variance : scr(b) / cr(b);
     * solve(cr(r) = rand * cr(b), r), programmmode:false;
     * sqrt(0.4 / variance), numer;
     */
}

References autocvar_g_weaponspreadfactor, cliptoplane(), cos(), cross, dir, error, findperpendicular(), gsl_ran_ugaussian(), M_PI, normalize(), random(), randomvec(), sin(), solve_cubic_abcd(), sqrt(), vector, vlen2, and W_SPREAD_GAUSS_MAX_STDEV.

Referenced by fireBullet_falloff(), nades_CheckThrow(), and W_SetupProjVelocity_Explicit().

◆ W_CalculateSpreadPattern()

vector W_CalculateSpreadPattern	(	int	pattern,
		float	bias,
		int	counter,
		int	total )

Definition at line 180 of file calculations.qc.

{
    vector s = '0 0 0';
 
    switch (pattern)
    {
        default:
        case 1:
            // first is always centered
            if (counter == 0)
                return '0 0 0';
 
            makevectors('0 360 0' * (0.75 + (counter - 0.5) / (total - 1)));
            s.y = v_forward.x;
            s.z = v_forward.y;
            // move outer projectiles randomly towards the center by max <bias> percent radius
            if (bias)
                s *= (1 - bias) + random() * bias;
            return s;
 
        case 2:
            // first is always centered
            if (counter == 0)
                return '0 0 0';
 
            // points form a round circle with even distribution
            // this could be simplified to '0 360 0' * (counter / total)
            // but it would lose ALL the specific placements
            // for example with this 2 pellets is center + directly up
            // while 3 pellets is a horizontal sweep and and 4 is an upside
            // down Y shape, 5 is a star instead of a pentagram,
            // 9 is a 3x3 grid and 13 is a circle with center + 3 per quadrant
            makevectors('0 360 0' * ((0.25 * ((total + 1) % 2)) + (counter / (total - 1))));
 
            // return transform vector
            s.y = v_forward.x;
            s.z = v_forward.y;
            if (bias)
                s *= (1 - bias) + random() * bias;
 
            //else // return original result normal vector
            //s = v_forward;
            return s;
    }
}

References makevectors, random(), v_forward, and vector.

Referenced by W_Crylink_Attack(), W_Crylink_Attack2(), W_Hagar_Attack2_Load_Release(), and W_Shotgun_Attack().

◆ W_GunAlign()

int W_GunAlign	(	entity	this,
		int	preferred_align )

Definition at line 131 of file calculations.qc.

{
    if (this.m_gunalign)
        return this.m_gunalign; // no adjustment needed
 
    entity own = this.owner;
 
    if (preferred_align < 1 || preferred_align > 4)
        preferred_align = 3; // default
 
    for (int j = 4; j > 1; --j) // > 1 as 1 is just center again
    {
        int taken = 0;
        for (int slot = 0; slot < MAX_WEAPONSLOTS; ++slot)
        {
            .entity weaponentity = weaponentities[slot];
            if (own.(weaponentity).m_gunalign == j) // we know it can't be ours thanks to the above check
                taken |= BIT(j);
            if (own.(weaponentity).m_gunalign == preferred_align)
                taken |= BIT(preferred_align);
        }
 
        if (!(taken & BIT(preferred_align)))
            return preferred_align; // prefer the recommended
        if (!(taken & BIT(j)))
            return j; // or fall back if it's not available
    }
 
    return preferred_align; // return it anyway
}