quakeforge/libs/client/cl_particles.c
Bill Currie db01650dac Update vec3_t/vec4f_t hacks to work with clang
Still work with gcc, of course, and I still need to fix them properly,
but now they're actually slightly easier to find as they all have vec_t
and FIXME on the same line.
2022-03-31 00:08:26 +09:00

1291 lines
30 KiB
C

/*
cl_particles.c
OpenGL particle system.
Copyright (C) 1996-1997 Id Software, Inc.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to:
Free Software Foundation, Inc.
59 Temple Place - Suite 330
Boston, MA 02111-1307, USA
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#include <stdlib.h>
#include "QF/cmd.h"
#include "QF/cvar.h"
#include "QF/mersenne.h"
#include "QF/qargs.h"
#include "QF/quakefs.h"
#include "QF/render.h"
#include "QF/sys.h"
#include "QF/va.h"
#include "QF/plugin/vid_render.h" //FIXME
#include "QF/scene/entity.h"
#include "compat.h"
#include "client/particles.h"
float cl_frametime;
float cl_realtime;
cl_particle_funcs_t *clp_funcs;
static mtstate_t mt; // private PRNG state
static psystem_t *cl_psystem;
static cvar_t *easter_eggs;
static cvar_t *particles_style;
static int ramp[] = {
/*ramp1*/ 0x6f, 0x6d, 0x6b, 0x69, 0x67, 0x65, 0x63, 0x61,
/*ramp2*/ 0x6f, 0x6e, 0x6d, 0x6c, 0x6b, 0x6a, 0x68, 0x66,
/*ramp3*/ 0x6d, 0x6b, 0x06, 0x05, 0x04, 0x03, 0x02, 0x01,
};
static partparm_t part_params[] = {
[pt_static] = {{0, 0, 0, 0}, 0, 1, 0, 0},
[pt_grav] = {{0, 0, 0, 0.05}, 0, 1, 0, 0},
[pt_slowgrav] = {{0, 0, 0, 0.05}, 0, 1, 0, 0},
[pt_fire] = {{0, 0, 0, 0.05}, 5, 6, 0, 5./6},
[pt_explode] = {{4, 4, 4, 0.05}, 10, 8, 0, 0},
[pt_explode2] = {{1, 1, 1, 0.05}, 15, 8, 0, 0},
[pt_blob] = {{4, 4, 4, 0.05}, 0, 1, 0, 0},
[pt_blob2] = {{4, 4, 0, 0.05}, 0, 1, 0, 0},
[pt_smoke] = {{0, 0, 0, 0}, 0, 1, 4, 0.4},
[pt_smokecloud] = {{0, 0, 0, 0.0375}, 0, 1, 50, 0.55},
[pt_bloodcloud] = {{0, 0, 0, 0.05}, 0, 1, 4, 0.25},
[pt_fadespark] = {{0, 0, 0, 0}, 0, 1, 0, 0},
[pt_fadespark2] = {{0, 0, 0, 0}, 0, 1, 0, 0},
[pt_fallfade] = {{0, 0, 0, 1}, 0, 1, 0, 1},
[pt_fallfadespark] = {{0, 0, 0, 1}, 15, 8, 0, 1},
[pt_flame] = {{0, 0, 0, 0}, 0, 1, -2, 0.125},
};
static const int *part_ramps[] = {
[pt_fire] = ramp + 2 * 8, // ramp3
[pt_explode] = ramp + 0 * 8, // ramp1
[pt_explode2] = ramp + 1 * 8, // ramp2
[pt_fallfadespark] = ramp + 0 * 8, // ramp1
[pt_flame] = 0,
};
static partparm_t __attribute__((pure))
particle_params (ptype_t type)
{
if (type > pt_flame) {
Sys_Error ("particle_params: invalid particle type");
}
return part_params[type];
}
static const int * __attribute__((pure))
particle_ramp (ptype_t type)
{
if (type > pt_flame) {
Sys_Error ("particle_ramp: invalid particle type");
}
return part_ramps[type];
}
inline static int
particle_new (ptype_t type, int texnum, vec4f_t pos, float scale,
vec4f_t vel, float live, int color, float alpha, float ramp)
{
if (cl_psystem->numparticles >= cl_psystem->maxparticles) {
return 0;
}
__auto_type ps = cl_psystem;
particle_t *p = &ps->particles[ps->numparticles];
partparm_t *parm = &ps->partparams[ps->numparticles];
const int **rampptr = &ps->partramps[ps->numparticles];
ps->numparticles += 1;
p->pos = pos;
p->vel = vel;
p->icolor = color;
p->alpha = alpha;
p->tex = texnum;
p->ramp = ramp;
p->scale = scale;
p->live = live;
*parm = particle_params (type);
*rampptr = particle_ramp (type);
if (*rampptr) {
p->icolor = (*rampptr) [(int) p->ramp];
}
return 1;
}
/*
particle_new_random
note that org_fuzz & vel_fuzz should be ints greater than 0 if you are
going to bother using this function.
*/
inline static int
particle_new_random (ptype_t type, int texnum, vec4f_t org, int org_fuzz,
float scale, int vel_fuzz, float live, int color,
float alpha, float ramp)
{
float o_fuzz = org_fuzz, v_fuzz = vel_fuzz;
int rnd;
vec4f_t porg, pvel;
rnd = mtwist_rand (&mt);
porg[0] = o_fuzz * ((rnd & 63) - 31.5) / 63.0 + org[0];
porg[1] = o_fuzz * (((rnd >> 6) & 63) - 31.5) / 63.0 + org[1];
porg[2] = o_fuzz * (((rnd >> 10) & 63) - 31.5) / 63.0 + org[2];
porg[3] = 1;
rnd = mtwist_rand (&mt);
pvel[0] = v_fuzz * ((rnd & 63) - 31.5) / 63.0;
pvel[1] = v_fuzz * (((rnd >> 6) & 63) - 31.5) / 63.0;
pvel[2] = v_fuzz * (((rnd >> 10) & 63) - 31.5) / 63.0;
pvel[3] = 0;
return particle_new (type, texnum, porg, scale, pvel, live, color, alpha,
ramp);
}
/*
inline static void
particle_new_veryrandom (ptype_t type, int texnum, vec4f_t org,
int org_fuzz, float scale, int vel_fuzz, float live,
int color, float alpha, float ramp)
{
vec3_t porg, pvel;
porg[0] = qfrandom (org_fuzz * 2) - org_fuzz + org[0];
porg[1] = qfrandom (org_fuzz * 2) - org_fuzz + org[1];
porg[2] = qfrandom (org_fuzz * 2) - org_fuzz + org[2];
pvel[0] = qfrandom (vel_fuzz * 2) - vel_fuzz;
pvel[1] = qfrandom (vel_fuzz * 2) - vel_fuzz;
pvel[2] = qfrandom (vel_fuzz * 2) - vel_fuzz;
particle_new (type, texnum, porg, scale, pvel, live, color, alpha, ramp);
}
*/
static vec4f_t
roffs (int mod)
{
vec4f_t offs = {
(mtwist_rand (&mt) % mod) - 0.5 * (mod - 1),
(mtwist_rand (&mt) % mod) - 0.5 * (mod - 1),
(mtwist_rand (&mt) % mod) - 0.5 * (mod - 1),
0
};
return offs;
}
static vec4f_t
tracer_vel (int tracercount, vec4f_t vec)
{
if (tracercount & 1) {
return (vec4f_t) { vec[1], -vec[0], 0, 0 };
} else {
return (vec4f_t) { -vec[1], vec[0], 0, 0 };
}
}
static void
add_particle (ptype_t type, vec4f_t pos, vec4f_t vel, float live, int color,
float ramp)
{
particle_new (type, part_tex_dot, pos, 1, vel, live, color, 1, ramp);
}
void
CL_LoadPointFile (const model_t *model)
{
const char *name;
char *mapname;
int c;
QFile *f;
mapname = strdup (model->path);
if (!mapname)
Sys_Error ("Can't duplicate mapname!");
QFS_StripExtension (mapname, mapname);
name = va (0, "%s.pts", mapname);
free (mapname);
f = QFS_FOpenFile (name);
if (!f) {
Sys_Printf ("couldn't open %s\n", name);
return;
}
Sys_MaskPrintf (SYS_dev, "Reading %s...\n", name);
c = 0;
vec4f_t zero = {};
for (;;) {
char buf[64];
union {
vec4f_t org;
vec3_t org3;
} o = { .org = { 0, 0, 0, 1 }};
Qgets (f, buf, sizeof (buf));
int r = sscanf (buf, "%f %f %f\n",
&o.org3[0], &o.org3[1], &o.org3[2]);
if (r != 3)
break;
c++;
if (!particle_new (pt_static, part_tex_dot, o.org, 1.5, zero,
99999, (-c) & 15, 1.0, 0.0)) {
Sys_MaskPrintf (SYS_dev, "Not enough free particles\n");
break;
}
}
Qclose (f);
Sys_MaskPrintf (SYS_dev, "%i points read\n", c);
}
static void
CL_ParticleExplosion_QF (vec4f_t org)
{
// CL_NewExplosion (org);
particle_new_random (pt_smokecloud, part_tex_smoke, org, 4, 30, 8,
5.0, (mtwist_rand (&mt) & 7) + 8,
0.5 + qfrandom (0.25), 0.0);
}
static void
CL_ParticleExplosion2_QF (vec4f_t org, int colorStart, int colorLength)
{
unsigned int i, j = 512;
for (i = 0; i < j; i++) {
particle_new_random (pt_blob, part_tex_dot, org, 16, 2, 256,
0.3,
colorStart + (i % colorLength), 1.0, 0.0);
}
}
static void
CL_BlobExplosion_QF (vec4f_t org)
{
unsigned int i;
unsigned int j = 1024;
for (i = 0; i < j >> 1; i++) {
particle_new_random (pt_blob, part_tex_dot, org, 12, 2, 256,
1.0 + (mtwist_rand (&mt) & 7) * 0.05,
66 + i % 6, 1.0, 0.0);
}
for (i = 0; i < j / 2; i++) {
particle_new_random (pt_blob2, part_tex_dot, org, 12, 2, 256,
1.0 + (mtwist_rand (&mt) & 7) * 0.05,
150 + i % 6, 1.0, 0.0);
}
}
static inline void
CL_RunSparkEffect_QF (vec4f_t org, int count, int ofuzz)
{
vec4f_t zero = {};
particle_new (pt_smokecloud, part_tex_smoke, org, ofuzz * 0.08,
zero, 9, 12 + (mtwist_rand (&mt) & 3),
0.25 + qfrandom (0.125), 0.0);
if (count > 0) {
int orgfuzz = ofuzz * 3 / 4;
if (orgfuzz < 1)
orgfuzz = 1;
while (count--) {
int color = mtwist_rand (&mt) & 7;
particle_new_random (pt_fallfadespark, part_tex_dot, org, orgfuzz,
0.7, 96, 5.0, 0, 1.0, color);
}
}
}
static inline void
CL_BloodPuff_QF (vec4f_t org, int count)
{
vec4f_t zero = {};
particle_new (pt_bloodcloud, part_tex_smoke, org, count / 5, zero,
99.0, 70 + (mtwist_rand (&mt) & 3), 0.5, 0.0);
}
static void
CL_BloodPuffEffect_QF (vec4f_t org, int count)
{
CL_BloodPuff_QF (org, count);
}
static void
CL_GunshotEffect_QF (vec4f_t org, int count)
{
int scale = 16;
scale += count / 15;
CL_RunSparkEffect_QF (org, count >> 1, scale);
}
static void
CL_LightningBloodEffect_QF (vec4f_t org)
{
CL_BloodPuff_QF (org, 50);
vec4f_t zero = {};
particle_new (pt_smokecloud, part_tex_smoke, org, 3.0, zero,
9.0, 12 + (mtwist_rand (&mt) & 3),
0.25 + qfrandom (0.125), 0.0);
for (int count = 7; count-- > 0; ) {
particle_new_random (pt_fallfade, part_tex_spark, org, 12, 2.0, 128,
5.0, 244 + (count % 3), 1.0, 0.0);
}
}
static void
CL_RunParticleEffect_QF (vec4f_t org, vec4f_t dir, int color, int count)
{
float scale = pow (count, 0.23);
for (int i = 0; i < count; i++) {
int rnd = mtwist_rand (&mt);
// Note that ParseParticleEffect handles (dir * 15)
particle_new (pt_grav, part_tex_dot, org + scale * roffs (16), 1.5,
dir, 0.1 * (i % 5),
(color & ~7) + (rnd & 7), 1.0, 0.0);
}
}
static void
CL_SpikeEffect_QF (vec4f_t org)
{
CL_RunSparkEffect_QF (org, 5, 8);
}
static void
CL_SuperSpikeEffect_QF (vec4f_t org)
{
CL_RunSparkEffect_QF (org, 10, 8);
}
static void
CL_KnightSpikeEffect_QF (vec4f_t org)
{
vec4f_t zero = {};
particle_new (pt_smokecloud, part_tex_smoke, org, 1.0, zero,
9.0, 234, 0.25 + qfrandom (0.125), 0.0);
for (int count = 10; count-- > 0; ) {
particle_new_random (pt_fallfade, part_tex_dot, org, 6, 0.7, 96,
5.0, 234, 1.0, 0.0);
}
}
static void
CL_WizSpikeEffect_QF (vec4f_t org)
{
vec4f_t zero = {};
particle_new (pt_smokecloud, part_tex_smoke, org, 2.0, zero,
9.0, 63, 0.25 + qfrandom (0.125), 0.0);
for (int count = 15; count-- > 0; ) {
particle_new_random (pt_fallfade, part_tex_dot, org, 12, 0.7, 96,
5.0, 63, 1.0, 0.0);
}
}
static void
CL_LavaSplash_QF (vec4f_t org)
{
for (int i = -16; i < 16; i++) {
for (int j = -16; j < 16; j++) {
uint32_t rnd = mtwist_rand (&mt);
float vel = 50.0 + 0.5 * (mtwist_rand (&mt) & 127);
vec4f_t dir = {
j * 8 + (rnd & 7),
i * 8 + ((rnd >> 6) & 7),
256,
0
};
vec4f_t offs = { dir[0], dir[1], ((rnd >> 9) & 63), 0 };
dir = normalf (dir);
particle_new (pt_grav, part_tex_dot, org + offs, 3, vel * dir,
2.0 + ((rnd >> 7) & 31) * 0.02,
224 + ((rnd >> 12) & 7), 0.75, 0.0);
}
}
}
static void
CL_TeleportSplash_QF (vec4f_t org)
{
for (int k = -24; k < 32; k += 4) {
for (int i = -16; i < 16; i += 4) {
for (int j = -16; j < 16; j += 4) {
uint32_t rnd = mtwist_rand (&mt);
float vel = 50 + ((rnd >> 6) & 63);
vec4f_t dir = normalf ((vec4f_t) { j, i, k, 0 } * 8);
vec4f_t offs = {
i + (rnd & 3),
j + ((rnd >> 2) & 3),
k + ((rnd >> 4) & 3),
0
};
particle_new (pt_grav, part_tex_spark, org + offs, 0.6,
vel * dir,
(0.2 + (mtwist_rand (&mt) & 15) * 0.01),
(7 + ((rnd >> 12) & 7)), 1.0, 0.0);
}
}
}
}
static void
CL_RocketTrail_QF (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - 3) * vec;
float len = 0;
vec4f_t zero = {};
vec4f_t pos = start;
float pscale = 1.5 + qfrandom (1.5);
while (len < maxlen) {
float pscalenext = 1.5 + qfrandom (1.5);
float dist = (pscale + pscalenext) * 3.0;
float percent = len * origlen;
particle_new (pt_smoke, part_tex_smoke, pos,
pscale + percent * 4.0, zero,
2.0 - percent * 2.0,
12 + (mtwist_rand (&mt) & 3),
0.5 + qfrandom (0.125) - percent * 0.40, 0.0);
len += dist;
pos += step;
pscale = pscalenext;
}
}
static void
CL_GrenadeTrail_QF (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - 3) * vec;
float len = 0;
vec4f_t zero = {};
vec4f_t pos = start;
float pscale = 6.0 + qfrandom (7.0);
while (len < maxlen) {
float pscalenext = 6.0 + qfrandom (7.0);
float dist = (pscale + pscalenext) * 2.0;
float percent = len * origlen;
particle_new (pt_smoke, part_tex_smoke, pos,
pscale + percent * 4.0, zero,
2.0 - percent * 2.0,
1 + (mtwist_rand (&mt) & 3),
0.625 + qfrandom (0.125) - percent * 0.40, 0.0);
len += dist;
pos += step;
pscale = pscalenext;
}
}
static void
CL_BloodTrail_QF (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - 3) * vec;
float len = 0;
vec4f_t pos = start;
float pscale = 5.0 + qfrandom (10.0);
while (len < maxlen) {
float pscalenext = 5.0 + qfrandom (10.0);
float dist = (pscale + pscalenext) * 1.5;
float percent = len * origlen;
vec4f_t vel = roffs (24);
vel[2] -= percent * 40;
particle_new (pt_grav, part_tex_smoke, pos + roffs (4), pscale, vel,
2.0 - percent * 2.0,
68 + (mtwist_rand (&mt) & 3), 1.0, 0.0);
len += dist;
pos += step;
pscale = pscalenext;
}
}
static void
CL_SlightBloodTrail_QF (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - 3) * vec;
float len = 0;
vec4f_t pos = start;
float pscale = 1.5 + qfrandom (7.5);
while (len < maxlen) {
float pscalenext = 1.5 + qfrandom (7.5);
float dist = (pscale + pscalenext) * 1.5;
float percent = len * origlen;
vec4f_t vel = roffs (12);
vel[2] -= percent * 40;
particle_new (pt_grav, part_tex_smoke, pos + roffs (4), pscale, vel,
1.5 - percent * 1.5,
68 + (mtwist_rand (&mt) & 3), 0.75, 0.0);
len += dist;
pos += step;
pscale = pscalenext;
}
}
static void
CL_WizTrail_QF (vec4f_t start, vec4f_t end)
{
float dist = 3.0;
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - dist) * vec;
float len = 0;
vec4f_t pos = start;
while (len < maxlen) {
static int tracercount;
float percent = len * origlen;
particle_new (pt_flame, part_tex_smoke, pos,
2.0 + qfrandom (1.0) - percent * 2.0,
30 * tracer_vel (tracercount++, vec),
0.5 - percent * 0.5,
52 + (mtwist_rand (&mt) & 4), 1.0 - percent * 0.125, 0.0);
len += dist;
pos += step;
}
}
static void
CL_FlameTrail_QF (vec4f_t start, vec4f_t end)
{
float dist = 3.0;
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - dist) * vec;
float len = 0;
vec4f_t pos = start;
while (len < maxlen) {
static int tracercount;
float percent = len * origlen;
particle_new (pt_flame, part_tex_smoke, pos,
2.0 + qfrandom (1.0) - percent * 2.0,
30 * tracer_vel (tracercount++, vec),
0.5 - percent * 0.5, 234,
1.0 - percent * 0.125, 0.0);
len += dist;
pos += step;
}
}
static void
CL_VoorTrail_QF (vec4f_t start, vec4f_t end)
{
float dist = 3.0;
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - dist) * vec;
float len = 0;
vec4f_t zero = {};
vec4f_t pos = start;
while (len < maxlen) {
float percent = len * origlen;
particle_new (pt_static, part_tex_dot, pos + roffs (16),
1.0 + qfrandom (1.0),
zero, 0.3 - percent * 0.3,
9 * 16 + 8 + (mtwist_rand (&mt) & 3), 1.0, 0.0);
len += dist;
pos += step;
}
}
static void
CL_GlowTrail_QF (vec4f_t start, vec4f_t end, int glow_color)
{
float dist = 3.0;
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
vec4f_t step = (maxlen - dist) * vec;
float len = 0;
vec4f_t zero = {};
vec4f_t pos = start;
while (len < maxlen) {
float percent = len * origlen;
particle_new (pt_smoke, part_tex_dot, pos + roffs (5), 1.0, zero,
2.0 - percent * 0.2, glow_color, 1.0, 0.0);
len += dist;
pos += step;
}
}
static void
CL_ParticleExplosion_EE (vec4f_t org)
{
/*
CL_NewExplosion (org);
*/
particle_new_random (pt_smokecloud, part_tex_smoke, org, 4, 30, 8,
5.0, mtwist_rand (&mt) & 255,
0.5 + qfrandom (0.25), 0.0);
}
static void
CL_TeleportSplash_EE (vec4f_t org)
{
for (int k = -24; k < 32; k += 4) {
for (int i = -16; i < 16; i += 4) {
for (int j = -16; j < 16; j += 4) {
uint32_t rnd = mtwist_rand (&mt);
float vel = 50 + ((rnd >> 6) & 63);
vec4f_t dir = normalf ((vec4f_t) { j, i, k, 0 } * 8);
vec4f_t offs = {
i + (rnd & 3),
j + ((rnd >> 2) & 3),
k + ((rnd >> 4) & 3),
0
};
particle_new (pt_grav, part_tex_spark, org + offs, 0.6,
vel * dir,
(0.2 + (mtwist_rand (&mt) & 15) * 0.01),
qfrandom (1.0), 1.0, 0.0);
}
}
}
}
static void
CL_RocketTrail_EE (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
float pscale = 1.5 + qfrandom (1.5);
float len = 0;
vec4f_t zero = {};
vec4f_t pos = start;
while (len < maxlen) {
float pscalenext = 1.5 + qfrandom (1.5);
float dist = (pscale + pscalenext) * 3.0;
float percent = len * origlen;
particle_new (pt_smoke, part_tex_smoke, pos,
pscale + percent * 4.0, zero,
2.0 - percent * 2.0,
mtwist_rand (&mt) & 255,
0.5 + qfrandom (0.125) - percent * 0.40, 0.0);
len += dist;
pos += len * vec;
pscale = pscalenext;
}
}
static void
CL_GrenadeTrail_EE (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float maxlen = magnitudef (vec)[0];
vec = normalf (vec);
float origlen = cl_frametime / maxlen;
float pscale = 6.0 + qfrandom (7.0);
float len = 0;
vec4f_t zero = {};
vec4f_t pos = start;
while (len < maxlen) {
float pscalenext = 6.0 + qfrandom (7.0);
float dist = (pscale + pscalenext) * 2.0;
float percent = len * origlen;
particle_new (pt_smoke, part_tex_smoke, pos,
pscale + percent * 4.0, zero,
2.0 - percent * 2.0,
mtwist_rand (&mt) & 255,
0.625 + qfrandom (0.125) - percent * 0.40, 0.0);
len += dist;
pos += len * vec;
pscale = pscalenext;
}
}
static void
CL_ParticleExplosion_ID (vec4f_t org)
{
for (int i = 0; i < 1024; i++) {
ptype_t type = i & 1 ? pt_explode2 : pt_explode;
add_particle (type, org + roffs (32), roffs (512), 5,
0, mtwist_rand (&mt) & 3);
}
}
static void
CL_BlobExplosion_ID (vec4f_t org)
{
for (int i = 0; i < 1024; i++) {
ptype_t type = i & 1 ? pt_blob : pt_blob2;
int color = i & 1 ? 66 : 150;
add_particle (type, org + roffs (32), roffs (512),
color + mtwist_rand (&mt) % 6,
(color & ~7) + (mtwist_rand (&mt) & 7), 0);
}
}
static inline void // FIXME: inline?
CL_RunParticleEffect_ID (vec4f_t org, vec4f_t dir, int color, int count)
{
for (int i = 0; i < count; i++) {
add_particle (pt_slowgrav, org + roffs (16),
dir/* + roffs (300)*/,
0.1 * (mtwist_rand (&mt) % 5),
(color & ~7) + (mtwist_rand (&mt) & 7), 0);
}
}
static void
CL_BloodPuffEffect_ID (vec4f_t org, int count)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 73, count);
}
static void
CL_GunshotEffect_ID (vec4f_t org, int count)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 0, count);
}
static void
CL_LightningBloodEffect_ID (vec4f_t org)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 225, 50);
}
static void
CL_SpikeEffect_ID (vec4f_t org)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 0, 10);
}
static void
CL_SuperSpikeEffect_ID (vec4f_t org)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 0, 20);
}
static void
CL_KnightSpikeEffect_ID (vec4f_t org)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 226, 20);
}
static void
CL_WizSpikeEffect_ID (vec4f_t org)
{
vec4f_t zero = {};
CL_RunParticleEffect_ID (org, zero, 20, 30);
}
static void
CL_LavaSplash_ID (vec4f_t org)
{
for (int i = -16; i < 16; i++) {
for (int j = -16; j < 16; j++) {
for (int k = 0; k < 1; k++) {
float vel = 50 + (mtwist_rand (&mt) & 63);
vec4f_t dir = {
j * 8 + (mtwist_rand (&mt) & 7),
i * 8 + (mtwist_rand (&mt) & 7),
256,
0
};
vec4f_t offs = {
dir[0],
dir[1],
(mtwist_rand (&mt) & 63),
0
};
dir = normalf (dir);
add_particle (pt_grav, org + offs, vel * dir,
2 + (mtwist_rand (&mt) & 31) * 0.02,
224 + (mtwist_rand (&mt) & 7), 0);
}
}
}
}
static void
CL_TeleportSplash_ID (vec4f_t org)
{
for (int i = -16; i < 16; i += 4) {
for (int j = -16; j < 16; j += 4) {
for (int k = -24; k < 32; k += 4) {
float vel = 50 + (mtwist_rand (&mt) & 63);
vec4f_t dir = normalf ((vec4f_t) { j, i, k, 0 } * 8);
vec4f_t offs = {
i + (mtwist_rand (&mt) & 3),
j + (mtwist_rand (&mt) & 3),
k + (mtwist_rand (&mt) & 3),
0
};
add_particle (pt_grav, org + offs, vel * dir,
0.2 + (mtwist_rand (&mt) & 7) * 0.02,
7 + (mtwist_rand (&mt) & 7), 0);
}
}
}
}
static void
CL_DarkFieldParticles_ID (vec4f_t org)
{
for (int i = -16; i < 16; i += 8) {
for (int j = -16; j < 16; j += 8) {
for (int k = 0; k < 32; k += 8) {
uint32_t rnd = mtwist_rand (&mt);
float vel = 50 + ((rnd >> 9) & 63);
vec4f_t dir = normalf ((vec4f_t) { j, i, k, 0 } * 8);
vec4f_t offs = {
i + ((rnd >> 3) & 3),
j + ((rnd >> 5) & 3),
k + ((rnd >> 7) & 3),
0
};
add_particle (pt_slowgrav, org + offs, vel * dir,
0.2 + (rnd & 7) * 0.02,
150 + mtwist_rand (&mt) % 6, 0);
}
}
}
}
#define num_normals (int)(sizeof (normals) / sizeof (normals[0]))
static vec4f_t normals[] = {
#include "anorms.h"
};
static vec4f_t velocities[num_normals];
static void
CL_EntityParticles_ID (vec4f_t org)
{
float angle, sp, sy, cp, cy; // cr, sr
float beamlength = 16.0, dist = 64.0;
for (int i = 0; i < num_normals; i++) {
int k;
for (k = 0; k < 3; k++) {
velocities[i][k] = (mtwist_rand (&mt) & 255) * 0.01;
}
}
vec4f_t zero = {};
for (int i = 0; i < num_normals; i++) {
angle = cl_realtime * velocities[i][0];
cy = cos (angle);
sy = sin (angle);
angle = cl_realtime * velocities[i][1];
cp = cos (angle);
sp = sin (angle);
// Next 3 lines results aren't currently used, may be in future. --Despair
// angle = cl_realtime * avelocities[i][2];
// sr = sin (angle);
// cr = cos (angle);
vec4f_t forward = { cp * cy, cp * sy, -sp, 0 };
vec4f_t pos = org + normals[i] * dist + forward * beamlength;
//FIXME 0 velocity?
add_particle (pt_explode, pos, zero, 0.01, 0x6f, 0);
}
}
static void
CL_RocketTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t zero = {};
vec4f_t pos = start;
while (len > 0) {
len -= 3;
add_particle (pt_fire, pos + roffs (6), zero, 2,
0, (mtwist_rand (&mt) & 3));
pos += vec;
}
}
static void
CL_GrenadeTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t zero = {};
vec4f_t pos = start;
while (len > 0) {
len -= 3;
add_particle (pt_fire, pos + roffs (6), zero, 2,
0, (mtwist_rand (&mt) & 3) + 2);
pos += vec;
}
}
static void
CL_BloodTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t zero = {};
vec4f_t pos = start;
while (len > 0) {
len -= 3;
add_particle (pt_slowgrav, pos + roffs (6), zero, 2,
67 + (mtwist_rand (&mt) & 3), 0);
pos += vec;
}
}
static void
CL_SlightBloodTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t zero = {};
vec4f_t pos = start;
while (len > 0) {
len -= 6;
add_particle (pt_slowgrav, pos + roffs (6), zero, 2,
67 + (mtwist_rand (&mt) & 3), 0);
pos += vec;
}
}
static void
CL_WizTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t pos = start;
while (len > 0) {
static int tracercount;
len -= 3;
add_particle (pt_static, pos, 30 * tracer_vel (tracercount, vec), 0.5,
52 + ((tracercount & 4) << 1), 0);
tracercount++;
pos += vec;
}
}
static void
CL_FlameTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t pos = start;
while (len > 0) {
static int tracercount;
len -= 3;
add_particle (pt_static, pos, 30 * tracer_vel (tracercount, vec), 0.5,
230 + ((tracercount & 4) << 1), 0);
tracercount++;
pos += vec;
}
}
static void
CL_VoorTrail_ID (vec4f_t start, vec4f_t end)
{
vec4f_t vec = end - start;
float len = magnitudef (vec)[0];
vec = normalf (vec);
vec4f_t zero = {};
vec4f_t pos = start;
while (len > 0) {
len -= 3;
add_particle (pt_static, pos + roffs (16), zero, 0.3,
9 * 16 + 8 + (mtwist_rand (&mt) & 3), 0);
pos += vec;
}
}
static void
CL_Particle_New (ptype_t type, int texnum, vec4f_t org, float scale,
vec4f_t vel, float live, int color, float alpha,
float ramp)
{
particle_new (type, texnum, org, scale, vel, live, color, alpha, ramp);
}
static void
CL_Particle_NewRandom (ptype_t type, int texnum, vec4f_t org,
int org_fuzz, float scale, int vel_fuzz, float live,
int color, float alpha, float ramp)
{
particle_new_random (type, texnum, org, org_fuzz, scale, vel_fuzz, live,
color, alpha, ramp);
}
static cl_particle_funcs_t particles_QF = {
CL_RocketTrail_QF,
CL_GrenadeTrail_QF,
CL_BloodTrail_QF,
CL_SlightBloodTrail_QF,
CL_WizTrail_QF,
CL_FlameTrail_QF,
CL_VoorTrail_QF,
CL_GlowTrail_QF,
CL_RunParticleEffect_QF,
CL_BloodPuffEffect_QF,
CL_GunshotEffect_QF,
CL_LightningBloodEffect_QF,
CL_SpikeEffect_QF,
CL_KnightSpikeEffect_QF,
CL_SuperSpikeEffect_QF,
CL_WizSpikeEffect_QF,
CL_BlobExplosion_QF,
CL_ParticleExplosion_QF,
CL_ParticleExplosion2_QF,
CL_LavaSplash_QF,
CL_TeleportSplash_QF,
CL_DarkFieldParticles_ID,
CL_EntityParticles_ID,
CL_Particle_New,
CL_Particle_NewRandom,
};
static cl_particle_funcs_t particles_ID = {
CL_RocketTrail_ID,
CL_GrenadeTrail_ID,
CL_BloodTrail_ID,
CL_SlightBloodTrail_ID,
CL_WizTrail_ID,
CL_FlameTrail_ID,
CL_VoorTrail_ID,
CL_GlowTrail_QF,
CL_RunParticleEffect_ID,
CL_BloodPuffEffect_ID,
CL_GunshotEffect_ID,
CL_LightningBloodEffect_ID,
CL_SpikeEffect_ID,
CL_KnightSpikeEffect_ID,
CL_SuperSpikeEffect_ID,
CL_WizSpikeEffect_ID,
CL_BlobExplosion_ID,
CL_ParticleExplosion_ID,
CL_ParticleExplosion2_QF,
CL_LavaSplash_ID,
CL_TeleportSplash_ID,
CL_DarkFieldParticles_ID,
CL_EntityParticles_ID,
CL_Particle_New,
CL_Particle_NewRandom,
};
static cl_particle_funcs_t particles_QF_egg = {
CL_RocketTrail_EE,
CL_GrenadeTrail_EE,
CL_BloodTrail_QF,
CL_SlightBloodTrail_QF,
CL_WizTrail_QF,
CL_FlameTrail_QF,
CL_VoorTrail_QF,
CL_GlowTrail_QF,
CL_RunParticleEffect_QF,
CL_BloodPuffEffect_QF,
CL_GunshotEffect_QF,
CL_LightningBloodEffect_QF,
CL_SpikeEffect_QF,
CL_KnightSpikeEffect_QF,
CL_SuperSpikeEffect_QF,
CL_WizSpikeEffect_QF,
CL_BlobExplosion_QF,
CL_ParticleExplosion_EE,
CL_ParticleExplosion2_QF,
CL_LavaSplash_QF,
CL_TeleportSplash_EE,
CL_DarkFieldParticles_ID,
CL_EntityParticles_ID,
CL_Particle_New,
CL_Particle_NewRandom,
};
static cl_particle_funcs_t particles_ID_egg = {
CL_RocketTrail_EE,
CL_GrenadeTrail_EE,
CL_BloodTrail_ID,
CL_SlightBloodTrail_ID,
CL_WizTrail_ID,
CL_FlameTrail_ID,
CL_VoorTrail_ID,
CL_GlowTrail_QF,
CL_RunParticleEffect_ID,
CL_BloodPuffEffect_ID,
CL_GunshotEffect_ID,
CL_LightningBloodEffect_ID,
CL_SpikeEffect_ID,
CL_KnightSpikeEffect_ID,
CL_SuperSpikeEffect_ID,
CL_WizSpikeEffect_ID,
CL_BlobExplosion_ID,
CL_ParticleExplosion_EE,
CL_ParticleExplosion2_QF,
CL_LavaSplash_ID,
CL_TeleportSplash_EE,
CL_DarkFieldParticles_ID,
CL_EntityParticles_ID,
CL_Particle_New,
CL_Particle_NewRandom,
};
static void
easter_eggs_f (cvar_t *var)
{
if (easter_eggs) {
if (easter_eggs->int_val) {
if (particles_style->int_val) {
clp_funcs = &particles_QF_egg;
} else {
clp_funcs = &particles_ID_egg;
}
} else if (particles_style) {
if (particles_style->int_val) {
clp_funcs = &particles_QF;
} else {
clp_funcs = &particles_ID;
}
}
}
}
static void
particles_style_f (cvar_t *var)
{
easter_eggs_f (easter_eggs);
cl_psystem->points_only = !var->int_val;
}
static void
CL_ParticleFunctionInit (void)
{
particles_style_f (particles_style);
easter_eggs_f (easter_eggs);
}
void
CL_Particles_Init (void)
{
mtwist_seed (&mt, 0xdeadbeef);
cl_psystem = r_funcs->ParticleSystem ();
easter_eggs = Cvar_Get ("easter_eggs", "0", CVAR_NONE, easter_eggs_f,
"Enables easter eggs.");
particles_style = Cvar_Get ("particles_style", "1", CVAR_ARCHIVE,
particles_style_f,
"Sets particle style. 0 for Id, 1 for QF.");
CL_ParticleFunctionInit ();
}
void
CL_ParticlesGravity (float gravity)
{
cl_psystem->gravity = (vec4f_t) { 0, 0, -gravity, 0 };
}