3747c31ebd2d495ad4b3710b887ca57cdcf14341
[xonotic/darkplaces.git] / cl_particles.c
1 /*
2 Copyright (C) 1996-1997 Id Software, Inc.
3
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12
13 See the GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18
19 */
20
21 #include "quakedef.h"
22
23 #include "cl_collision.h"
24 #include "image.h"
25 #include "r_shadow.h"
26
27 // must match ptype_t values
28 particletype_t particletype[pt_total] =
29 {
30         {PBLEND_INVALID, PARTICLE_INVALID, false}, //pt_dead (should never happen)
31         {PBLEND_ALPHA, PARTICLE_BILLBOARD, false}, //pt_alphastatic
32         {PBLEND_ADD, PARTICLE_BILLBOARD, false}, //pt_static
33         {PBLEND_ADD, PARTICLE_SPARK, false}, //pt_spark
34         {PBLEND_ADD, PARTICLE_HBEAM, false}, //pt_beam
35         {PBLEND_ADD, PARTICLE_SPARK, false}, //pt_rain
36         {PBLEND_ADD, PARTICLE_ORIENTED_DOUBLESIDED, false}, //pt_raindecal
37         {PBLEND_ADD, PARTICLE_BILLBOARD, false}, //pt_snow
38         {PBLEND_ADD, PARTICLE_BILLBOARD, false}, //pt_bubble
39         {PBLEND_INVMOD, PARTICLE_BILLBOARD, false}, //pt_blood
40         {PBLEND_ADD, PARTICLE_BILLBOARD, false}, //pt_smoke
41         {PBLEND_INVMOD, PARTICLE_ORIENTED_DOUBLESIDED, false}, //pt_decal
42         {PBLEND_ALPHA, PARTICLE_BILLBOARD, false}, //pt_entityparticle
43 };
44
45 #define PARTICLEEFFECT_UNDERWATER 1
46 #define PARTICLEEFFECT_NOTUNDERWATER 2
47
48 typedef struct particleeffectinfo_s
49 {
50         int effectnameindex; // which effect this belongs to
51         // PARTICLEEFFECT_* bits
52         int flags;
53         // blood effects may spawn very few particles, so proper fraction-overflow
54         // handling is very important, this variable keeps track of the fraction
55         double particleaccumulator;
56         // the math is: countabsolute + requestedcount * countmultiplier * quality
57         // absolute number of particles to spawn, often used for decals
58         // (unaffected by quality and requestedcount)
59         float countabsolute;
60         // multiplier for the number of particles CL_ParticleEffect was told to
61         // spawn, most effects do not really have a count and hence use 1, so
62         // this is often the actual count to spawn, not merely a multiplier
63         float countmultiplier;
64         // if > 0 this causes the particle to spawn in an evenly spaced line from
65         // originmins to originmaxs (causing them to describe a trail, not a box)
66         float trailspacing;
67         // type of particle to spawn (defines some aspects of behavior)
68         ptype_t particletype;
69         // blending mode used on this particle type
70         pblend_t blendmode;
71         // orientation of this particle type (BILLBOARD, SPARK, BEAM, etc)
72         porientation_t orientation;
73         // range of colors to choose from in hex RRGGBB (like HTML color tags),
74         // randomly interpolated at spawn
75         unsigned int color[2];
76         // a random texture is chosen in this range (note the second value is one
77         // past the last choosable, so for example 8,16 chooses any from 8 up and
78         // including 15)
79         // if start and end of the range are the same, no randomization is done
80         int tex[2];
81         // range of size values randomly chosen when spawning, plus size increase over time
82         float size[3];
83         // range of alpha values randomly chosen when spawning, plus alpha fade
84         float alpha[3];
85         // how long the particle should live (note it is also removed if alpha drops to 0)
86         float time[2];
87         // how much gravity affects this particle (negative makes it fly up!)
88         float gravity;
89         // how much bounce the particle has when it hits a surface
90         // if negative the particle is removed on impact
91         float bounce;
92         // if in air this friction is applied
93         // if negative the particle accelerates
94         float airfriction;
95         // if in liquid (water/slime/lava) this friction is applied
96         // if negative the particle accelerates
97         float liquidfriction;
98         // these offsets are added to the values given to particleeffect(), and
99         // then an ellipsoid-shaped jitter is added as defined by these
100         // (they are the 3 radii)
101         float stretchfactor;
102         // stretch velocity factor (used for sparks)
103         float originoffset[3];
104         float velocityoffset[3];
105         float originjitter[3];
106         float velocityjitter[3];
107         float velocitymultiplier;
108         // an effect can also spawn a dlight
109         float lightradiusstart;
110         float lightradiusfade;
111         float lighttime;
112         float lightcolor[3];
113         qboolean lightshadow;
114         int lightcubemapnum;
115         unsigned int staincolor[2]; // note: 0x808080 = neutral (particle's own color), these are modding factors for the particle's original color!
116         int staintex[2];
117 }
118 particleeffectinfo_t;
119
120 char particleeffectname[MAX_PARTICLEEFFECTNAME][64];
121
122
123 particleeffectinfo_t particleeffectinfo[MAX_PARTICLEEFFECTINFO];
124
125 static int particlepalette[256];
126 /*
127         0x000000,0x0f0f0f,0x1f1f1f,0x2f2f2f,0x3f3f3f,0x4b4b4b,0x5b5b5b,0x6b6b6b, // 0-7
128         0x7b7b7b,0x8b8b8b,0x9b9b9b,0xababab,0xbbbbbb,0xcbcbcb,0xdbdbdb,0xebebeb, // 8-15
129         0x0f0b07,0x170f0b,0x1f170b,0x271b0f,0x2f2313,0x372b17,0x3f2f17,0x4b371b, // 16-23
130         0x533b1b,0x5b431f,0x634b1f,0x6b531f,0x73571f,0x7b5f23,0x836723,0x8f6f23, // 24-31
131         0x0b0b0f,0x13131b,0x1b1b27,0x272733,0x2f2f3f,0x37374b,0x3f3f57,0x474767, // 32-39
132         0x4f4f73,0x5b5b7f,0x63638b,0x6b6b97,0x7373a3,0x7b7baf,0x8383bb,0x8b8bcb, // 40-47
133         0x000000,0x070700,0x0b0b00,0x131300,0x1b1b00,0x232300,0x2b2b07,0x2f2f07, // 48-55
134         0x373707,0x3f3f07,0x474707,0x4b4b0b,0x53530b,0x5b5b0b,0x63630b,0x6b6b0f, // 56-63
135         0x070000,0x0f0000,0x170000,0x1f0000,0x270000,0x2f0000,0x370000,0x3f0000, // 64-71
136         0x470000,0x4f0000,0x570000,0x5f0000,0x670000,0x6f0000,0x770000,0x7f0000, // 72-79
137         0x131300,0x1b1b00,0x232300,0x2f2b00,0x372f00,0x433700,0x4b3b07,0x574307, // 80-87
138         0x5f4707,0x6b4b0b,0x77530f,0x835713,0x8b5b13,0x975f1b,0xa3631f,0xaf6723, // 88-95
139         0x231307,0x2f170b,0x3b1f0f,0x4b2313,0x572b17,0x632f1f,0x733723,0x7f3b2b, // 96-103
140         0x8f4333,0x9f4f33,0xaf632f,0xbf772f,0xcf8f2b,0xdfab27,0xefcb1f,0xfff31b, // 104-111
141         0x0b0700,0x1b1300,0x2b230f,0x372b13,0x47331b,0x533723,0x633f2b,0x6f4733, // 112-119
142         0x7f533f,0x8b5f47,0x9b6b53,0xa77b5f,0xb7876b,0xc3937b,0xd3a38b,0xe3b397, // 120-127
143         0xab8ba3,0x9f7f97,0x937387,0x8b677b,0x7f5b6f,0x775363,0x6b4b57,0x5f3f4b, // 128-135
144         0x573743,0x4b2f37,0x43272f,0x371f23,0x2b171b,0x231313,0x170b0b,0x0f0707, // 136-143
145         0xbb739f,0xaf6b8f,0xa35f83,0x975777,0x8b4f6b,0x7f4b5f,0x734353,0x6b3b4b, // 144-151
146         0x5f333f,0x532b37,0x47232b,0x3b1f23,0x2f171b,0x231313,0x170b0b,0x0f0707, // 152-159
147         0xdbc3bb,0xcbb3a7,0xbfa39b,0xaf978b,0xa3877b,0x977b6f,0x876f5f,0x7b6353, // 160-167
148         0x6b5747,0x5f4b3b,0x533f33,0x433327,0x372b1f,0x271f17,0x1b130f,0x0f0b07, // 168-175
149         0x6f837b,0x677b6f,0x5f7367,0x576b5f,0x4f6357,0x475b4f,0x3f5347,0x374b3f, // 176-183
150         0x2f4337,0x2b3b2f,0x233327,0x1f2b1f,0x172317,0x0f1b13,0x0b130b,0x070b07, // 184-191
151         0xfff31b,0xefdf17,0xdbcb13,0xcbb70f,0xbba70f,0xab970b,0x9b8307,0x8b7307, // 192-199
152         0x7b6307,0x6b5300,0x5b4700,0x4b3700,0x3b2b00,0x2b1f00,0x1b0f00,0x0b0700, // 200-207
153         0x0000ff,0x0b0bef,0x1313df,0x1b1bcf,0x2323bf,0x2b2baf,0x2f2f9f,0x2f2f8f, // 208-215
154         0x2f2f7f,0x2f2f6f,0x2f2f5f,0x2b2b4f,0x23233f,0x1b1b2f,0x13131f,0x0b0b0f, // 216-223
155         0x2b0000,0x3b0000,0x4b0700,0x5f0700,0x6f0f00,0x7f1707,0x931f07,0xa3270b, // 224-231
156         0xb7330f,0xc34b1b,0xcf632b,0xdb7f3b,0xe3974f,0xe7ab5f,0xefbf77,0xf7d38b, // 232-239
157         0xa77b3b,0xb79b37,0xc7c337,0xe7e357,0x7fbfff,0xabe7ff,0xd7ffff,0x670000, // 240-247
158         0x8b0000,0xb30000,0xd70000,0xff0000,0xfff393,0xfff7c7,0xffffff,0x9f5b53  // 248-255
159 */
160
161 int             ramp1[8] = {0x6f, 0x6d, 0x6b, 0x69, 0x67, 0x65, 0x63, 0x61};
162 int             ramp2[8] = {0x6f, 0x6e, 0x6d, 0x6c, 0x6b, 0x6a, 0x68, 0x66};
163 int             ramp3[8] = {0x6d, 0x6b, 6, 5, 4, 3};
164
165 //static int explosparkramp[8] = {0x4b0700, 0x6f0f00, 0x931f07, 0xb7330f, 0xcf632b, 0xe3974f, 0xffe7b5, 0xffffff};
166
167 // particletexture_t is a rectangle in the particlefonttexture
168 typedef struct particletexture_s
169 {
170         rtexture_t *texture;
171         float s1, t1, s2, t2;
172 }
173 particletexture_t;
174
175 static rtexturepool_t *particletexturepool;
176 static rtexture_t *particlefonttexture;
177 static particletexture_t particletexture[MAX_PARTICLETEXTURES];
178 skinframe_t *decalskinframe;
179
180 // texture numbers in particle font
181 static const int tex_smoke[8] = {0, 1, 2, 3, 4, 5, 6, 7};
182 static const int tex_bulletdecal[8] = {8, 9, 10, 11, 12, 13, 14, 15};
183 static const int tex_blooddecal[8] = {16, 17, 18, 19, 20, 21, 22, 23};
184 static const int tex_bloodparticle[8] = {24, 25, 26, 27, 28, 29, 30, 31};
185 static const int tex_rainsplash = 32;
186 static const int tex_particle = 63;
187 static const int tex_bubble = 62;
188 static const int tex_raindrop = 61;
189 static const int tex_beam = 60;
190
191 cvar_t cl_particles = {CVAR_SAVE, "cl_particles", "1", "enables particle effects"};
192 cvar_t cl_particles_quality = {CVAR_SAVE, "cl_particles_quality", "1", "multiplies number of particles"};
193 cvar_t cl_particles_alpha = {CVAR_SAVE, "cl_particles_alpha", "1", "multiplies opacity of particles"};
194 cvar_t cl_particles_size = {CVAR_SAVE, "cl_particles_size", "1", "multiplies particle size"};
195 cvar_t cl_particles_quake = {CVAR_SAVE, "cl_particles_quake", "0", "makes particle effects look mostly like the ones in Quake"};
196 cvar_t cl_particles_blood = {CVAR_SAVE, "cl_particles_blood", "1", "enables blood effects"};
197 cvar_t cl_particles_blood_alpha = {CVAR_SAVE, "cl_particles_blood_alpha", "1", "opacity of blood, does not affect decals"};
198 cvar_t cl_particles_blood_decal_alpha = {CVAR_SAVE, "cl_particles_blood_decal_alpha", "1", "opacity of blood decal"};
199 cvar_t cl_particles_blood_decal_scalemin = {CVAR_SAVE, "cl_particles_blood_decal_scalemin", "1.5", "minimal random scale of decal"};
200 cvar_t cl_particles_blood_decal_scalemax = {CVAR_SAVE, "cl_particles_blood_decal_scalemax", "2", "maximal random scale of decal"};
201 cvar_t cl_particles_blood_bloodhack = {CVAR_SAVE, "cl_particles_blood_bloodhack", "1", "make certain quake particle() calls create blood effects instead"};
202 cvar_t cl_particles_bulletimpacts = {CVAR_SAVE, "cl_particles_bulletimpacts", "1", "enables bulletimpact effects"};
203 cvar_t cl_particles_explosions_sparks = {CVAR_SAVE, "cl_particles_explosions_sparks", "1", "enables sparks from explosions"};
204 cvar_t cl_particles_explosions_shell = {CVAR_SAVE, "cl_particles_explosions_shell", "0", "enables polygonal shell from explosions"};
205 cvar_t cl_particles_rain = {CVAR_SAVE, "cl_particles_rain", "1", "enables rain effects"};
206 cvar_t cl_particles_snow = {CVAR_SAVE, "cl_particles_snow", "1", "enables snow effects"};
207 cvar_t cl_particles_smoke = {CVAR_SAVE, "cl_particles_smoke", "1", "enables smoke (used by multiple effects)"};
208 cvar_t cl_particles_smoke_alpha = {CVAR_SAVE, "cl_particles_smoke_alpha", "0.5", "smoke brightness"};
209 cvar_t cl_particles_smoke_alphafade = {CVAR_SAVE, "cl_particles_smoke_alphafade", "0.55", "brightness fade per second"};
210 cvar_t cl_particles_sparks = {CVAR_SAVE, "cl_particles_sparks", "1", "enables sparks (used by multiple effects)"};
211 cvar_t cl_particles_bubbles = {CVAR_SAVE, "cl_particles_bubbles", "1", "enables bubbles (used by multiple effects)"};
212 cvar_t cl_particles_visculling = {CVAR_SAVE, "cl_particles_visculling", "0", "perform a costly check if each particle is visible before drawing"};
213 cvar_t cl_decals = {CVAR_SAVE, "cl_decals", "1", "enables decals (bullet holes, blood, etc)"};
214 cvar_t cl_decals_visculling = {CVAR_SAVE, "cl_decals_visculling", "1", "perform a very cheap check if each decal is visible before drawing"};
215 cvar_t cl_decals_time = {CVAR_SAVE, "cl_decals_time", "20", "how long before decals start to fade away"};
216 cvar_t cl_decals_fadetime = {CVAR_SAVE, "cl_decals_fadetime", "1", "how long decals take to fade away"};
217 cvar_t cl_decals_newsystem = {CVAR_SAVE, "cl_decals_newsystem", "0", "enables new advanced decal system"};
218 cvar_t cl_decals_newsystem_intensitymultiplier = {CVAR_SAVE, "cl_decals_newsystem_intensitymultiplier", "2", "boosts intensity of decals (because the distance fade can make them hard to see otherwise)"};
219 cvar_t cl_decals_models = {CVAR_SAVE, "cl_decals_models", "0", "enables decals on animated models (if newsystem is also 1)"};
220 cvar_t cl_decals_bias = {CVAR_SAVE, "cl_decals_bias", "0.125", "distance to bias decals from surface to prevent depth fighting"};
221 cvar_t cl_decals_max = {CVAR_SAVE, "cl_decals_max", "4096", "maximum number of decals allowed to exist in the world at once"};
222
223
224 void CL_Particles_ParseEffectInfo(const char *textstart, const char *textend, const char *filename)
225 {
226         int arrayindex;
227         int argc;
228         int effectinfoindex;
229         int linenumber;
230         particleeffectinfo_t *info = NULL;
231         const char *text = textstart;
232         char argv[16][1024];
233         effectinfoindex = -1;
234         for (linenumber = 1;;linenumber++)
235         {
236                 argc = 0;
237                 for (arrayindex = 0;arrayindex < 16;arrayindex++)
238                         argv[arrayindex][0] = 0;
239                 for (;;)
240                 {
241                         if (!COM_ParseToken_Simple(&text, true, false))
242                                 return;
243                         if (!strcmp(com_token, "\n"))
244                                 break;
245                         if (argc < 16)
246                         {
247                                 strlcpy(argv[argc], com_token, sizeof(argv[argc]));
248                                 argc++;
249                         }
250                 }
251                 if (argc < 1)
252                         continue;
253 #define checkparms(n) if (argc != (n)) {Con_Printf("%s:%i: error while parsing: %s given %i parameters, should be %i parameters\n", filename, linenumber, argv[0], argc, (n));break;}
254 #define readints(array, n) checkparms(n+1);for (arrayindex = 0;arrayindex < argc - 1;arrayindex++) array[arrayindex] = strtol(argv[1+arrayindex], NULL, 0)
255 #define readfloats(array, n) checkparms(n+1);for (arrayindex = 0;arrayindex < argc - 1;arrayindex++) array[arrayindex] = atof(argv[1+arrayindex])
256 #define readint(var) checkparms(2);var = strtol(argv[1], NULL, 0)
257 #define readfloat(var) checkparms(2);var = atof(argv[1])
258 #define readbool(var) checkparms(2);var = strtol(argv[1], NULL, 0) != 0
259                 if (!strcmp(argv[0], "effect"))
260                 {
261                         int effectnameindex;
262                         checkparms(2);
263                         effectinfoindex++;
264                         if (effectinfoindex >= MAX_PARTICLEEFFECTINFO)
265                         {
266                                 Con_Printf("%s:%i: too many effects!\n", filename, linenumber);
267                                 break;
268                         }
269                         for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME;effectnameindex++)
270                         {
271                                 if (particleeffectname[effectnameindex][0])
272                                 {
273                                         if (!strcmp(particleeffectname[effectnameindex], argv[1]))
274                                                 break;
275                                 }
276                                 else
277                                 {
278                                         strlcpy(particleeffectname[effectnameindex], argv[1], sizeof(particleeffectname[effectnameindex]));
279                                         break;
280                                 }
281                         }
282                         // if we run out of names, abort
283                         if (effectnameindex == MAX_PARTICLEEFFECTNAME)
284                         {
285                                 Con_Printf("%s:%i: too many effects!\n", filename, linenumber);
286                                 break;
287                         }
288                         info = particleeffectinfo + effectinfoindex;
289                         info->effectnameindex = effectnameindex;
290                         info->particletype = pt_alphastatic;
291                         info->blendmode = particletype[info->particletype].blendmode;
292                         info->orientation = particletype[info->particletype].orientation;
293                         info->tex[0] = tex_particle;
294                         info->tex[1] = tex_particle;
295                         info->color[0] = 0xFFFFFF;
296                         info->color[1] = 0xFFFFFF;
297                         info->size[0] = 1;
298                         info->size[1] = 1;
299                         info->alpha[0] = 0;
300                         info->alpha[1] = 256;
301                         info->alpha[2] = 256;
302                         info->time[0] = 9999;
303                         info->time[1] = 9999;
304                         VectorSet(info->lightcolor, 1, 1, 1);
305                         info->lightshadow = true;
306                         info->lighttime = 9999;
307                         info->stretchfactor = 1;
308                         info->staincolor[0] = (unsigned int)-1;
309                         info->staincolor[1] = (unsigned int)-1;
310                         info->staintex[0] = -1;
311                         info->staintex[1] = -1;
312                 }
313                 else if (info == NULL)
314                 {
315                         Con_Printf("%s:%i: command %s encountered before effect\n", filename, linenumber, argv[0]);
316                         break;
317                 }
318                 else if (!strcmp(argv[0], "countabsolute")) {readfloat(info->countabsolute);}
319                 else if (!strcmp(argv[0], "count")) {readfloat(info->countmultiplier);}
320                 else if (!strcmp(argv[0], "type"))
321                 {
322                         checkparms(2);
323                         if (!strcmp(argv[1], "alphastatic")) info->particletype = pt_alphastatic;
324                         else if (!strcmp(argv[1], "static")) info->particletype = pt_static;
325                         else if (!strcmp(argv[1], "spark")) info->particletype = pt_spark;
326                         else if (!strcmp(argv[1], "beam")) info->particletype = pt_beam;
327                         else if (!strcmp(argv[1], "rain")) info->particletype = pt_rain;
328                         else if (!strcmp(argv[1], "raindecal")) info->particletype = pt_raindecal;
329                         else if (!strcmp(argv[1], "snow")) info->particletype = pt_snow;
330                         else if (!strcmp(argv[1], "bubble")) info->particletype = pt_bubble;
331                         else if (!strcmp(argv[1], "blood")) {info->particletype = pt_blood;info->gravity = 1;}
332                         else if (!strcmp(argv[1], "smoke")) info->particletype = pt_smoke;
333                         else if (!strcmp(argv[1], "decal")) info->particletype = pt_decal;
334                         else if (!strcmp(argv[1], "entityparticle")) info->particletype = pt_entityparticle;
335                         else Con_Printf("%s:%i: unrecognized particle type %s\n", filename, linenumber, argv[1]);
336                         info->blendmode = particletype[info->particletype].blendmode;
337                         info->orientation = particletype[info->particletype].orientation;
338                 }
339                 else if (!strcmp(argv[0], "blend"))
340                 {
341                         checkparms(2);
342                         if (!strcmp(argv[1], "alpha")) info->blendmode = PBLEND_ALPHA;
343                         else if (!strcmp(argv[1], "add")) info->blendmode = PBLEND_ADD;
344                         else if (!strcmp(argv[1], "invmod")) info->blendmode = PBLEND_INVMOD;
345                         else Con_Printf("%s:%i: unrecognized blendmode %s\n", filename, linenumber, argv[1]);
346                 }
347                 else if (!strcmp(argv[0], "orientation"))
348                 {
349                         checkparms(2);
350                         if (!strcmp(argv[1], "billboard")) info->orientation = PARTICLE_BILLBOARD;
351                         else if (!strcmp(argv[1], "spark")) info->orientation = PARTICLE_SPARK;
352                         else if (!strcmp(argv[1], "oriented")) info->orientation = PARTICLE_ORIENTED_DOUBLESIDED;
353                         else if (!strcmp(argv[1], "beam")) info->orientation = PARTICLE_HBEAM;
354                         else Con_Printf("%s:%i: unrecognized orientation %s\n", filename, linenumber, argv[1]);
355                 }
356                 else if (!strcmp(argv[0], "color")) {readints(info->color, 2);}
357                 else if (!strcmp(argv[0], "tex")) {readints(info->tex, 2);}
358                 else if (!strcmp(argv[0], "size")) {readfloats(info->size, 2);}
359                 else if (!strcmp(argv[0], "sizeincrease")) {readfloat(info->size[2]);}
360                 else if (!strcmp(argv[0], "alpha")) {readfloats(info->alpha, 3);}
361                 else if (!strcmp(argv[0], "time")) {readfloats(info->time, 2);}
362                 else if (!strcmp(argv[0], "gravity")) {readfloat(info->gravity);}
363                 else if (!strcmp(argv[0], "bounce")) {readfloat(info->bounce);}
364                 else if (!strcmp(argv[0], "airfriction")) {readfloat(info->airfriction);}
365                 else if (!strcmp(argv[0], "liquidfriction")) {readfloat(info->liquidfriction);}
366                 else if (!strcmp(argv[0], "originoffset")) {readfloats(info->originoffset, 3);}
367                 else if (!strcmp(argv[0], "velocityoffset")) {readfloats(info->velocityoffset, 3);}
368                 else if (!strcmp(argv[0], "originjitter")) {readfloats(info->originjitter, 3);}
369                 else if (!strcmp(argv[0], "velocityjitter")) {readfloats(info->velocityjitter, 3);}
370                 else if (!strcmp(argv[0], "velocitymultiplier")) {readfloat(info->velocitymultiplier);}
371                 else if (!strcmp(argv[0], "lightradius")) {readfloat(info->lightradiusstart);}
372                 else if (!strcmp(argv[0], "lightradiusfade")) {readfloat(info->lightradiusfade);}
373                 else if (!strcmp(argv[0], "lighttime")) {readfloat(info->lighttime);}
374                 else if (!strcmp(argv[0], "lightcolor")) {readfloats(info->lightcolor, 3);}
375                 else if (!strcmp(argv[0], "lightshadow")) {readbool(info->lightshadow);}
376                 else if (!strcmp(argv[0], "lightcubemapnum")) {readint(info->lightcubemapnum);}
377                 else if (!strcmp(argv[0], "underwater")) {checkparms(1);info->flags |= PARTICLEEFFECT_UNDERWATER;}
378                 else if (!strcmp(argv[0], "notunderwater")) {checkparms(1);info->flags |= PARTICLEEFFECT_NOTUNDERWATER;}
379                 else if (!strcmp(argv[0], "trailspacing")) {readfloat(info->trailspacing);if (info->trailspacing > 0) info->countmultiplier = 1.0f / info->trailspacing;}
380                 else if (!strcmp(argv[0], "stretchfactor")) {readfloat(info->stretchfactor);}
381                 else if (!strcmp(argv[0], "staincolor")) {readints(info->staincolor, 2);}
382                 else if (!strcmp(argv[0], "staintex")) {readints(info->staintex, 2);}
383                 else if (!strcmp(argv[0], "stainless")) {info->staintex[0] = -2; info->staincolor[0] = (unsigned int)-1; info->staincolor[1] = (unsigned int)-1;}
384                 else
385                         Con_Printf("%s:%i: skipping unknown command %s\n", filename, linenumber, argv[0]);
386 #undef checkparms
387 #undef readints
388 #undef readfloats
389 #undef readint
390 #undef readfloat
391         }
392 }
393
394 int CL_ParticleEffectIndexForName(const char *name)
395 {
396         int i;
397         for (i = 1;i < MAX_PARTICLEEFFECTNAME && particleeffectname[i][0];i++)
398                 if (!strcmp(particleeffectname[i], name))
399                         return i;
400         return 0;
401 }
402
403 const char *CL_ParticleEffectNameForIndex(int i)
404 {
405         if (i < 1 || i >= MAX_PARTICLEEFFECTNAME)
406                 return NULL;
407         return particleeffectname[i];
408 }
409
410 // MUST match effectnameindex_t in client.h
411 static const char *standardeffectnames[EFFECT_TOTAL] =
412 {
413         "",
414         "TE_GUNSHOT",
415         "TE_GUNSHOTQUAD",
416         "TE_SPIKE",
417         "TE_SPIKEQUAD",
418         "TE_SUPERSPIKE",
419         "TE_SUPERSPIKEQUAD",
420         "TE_WIZSPIKE",
421         "TE_KNIGHTSPIKE",
422         "TE_EXPLOSION",
423         "TE_EXPLOSIONQUAD",
424         "TE_TAREXPLOSION",
425         "TE_TELEPORT",
426         "TE_LAVASPLASH",
427         "TE_SMALLFLASH",
428         "TE_FLAMEJET",
429         "EF_FLAME",
430         "TE_BLOOD",
431         "TE_SPARK",
432         "TE_PLASMABURN",
433         "TE_TEI_G3",
434         "TE_TEI_SMOKE",
435         "TE_TEI_BIGEXPLOSION",
436         "TE_TEI_PLASMAHIT",
437         "EF_STARDUST",
438         "TR_ROCKET",
439         "TR_GRENADE",
440         "TR_BLOOD",
441         "TR_WIZSPIKE",
442         "TR_SLIGHTBLOOD",
443         "TR_KNIGHTSPIKE",
444         "TR_VORESPIKE",
445         "TR_NEHAHRASMOKE",
446         "TR_NEXUIZPLASMA",
447         "TR_GLOWTRAIL",
448         "SVC_PARTICLE"
449 };
450
451 void CL_Particles_LoadEffectInfo(void)
452 {
453         int i;
454         int filepass;
455         unsigned char *filedata;
456         fs_offset_t filesize;
457         char filename[MAX_QPATH];
458         memset(particleeffectinfo, 0, sizeof(particleeffectinfo));
459         memset(particleeffectname, 0, sizeof(particleeffectname));
460         for (i = 0;i < EFFECT_TOTAL;i++)
461                 strlcpy(particleeffectname[i], standardeffectnames[i], sizeof(particleeffectname[i]));
462         for (filepass = 0;;filepass++)
463         {
464                 if (filepass == 0)
465                         dpsnprintf(filename, sizeof(filename), "effectinfo.txt");
466                 else if (filepass == 1)
467                         dpsnprintf(filename, sizeof(filename), "maps/%s_effectinfo.txt", cl.levelname);
468                 else
469                         break;
470                 filedata = FS_LoadFile(filename, tempmempool, true, &filesize);
471                 if (!filedata)
472                         continue;
473                 CL_Particles_ParseEffectInfo((const char *)filedata, (const char *)filedata + filesize, filename);
474                 Mem_Free(filedata);
475         }
476 }
477
478 /*
479 ===============
480 CL_InitParticles
481 ===============
482 */
483 void CL_ReadPointFile_f (void);
484 void CL_Particles_Init (void)
485 {
486         Cmd_AddCommand ("pointfile", CL_ReadPointFile_f, "display point file produced by qbsp when a leak was detected in the map (a line leading through the leak hole, to an entity inside the level)");
487         Cmd_AddCommand ("cl_particles_reloadeffects", CL_Particles_LoadEffectInfo, "reloads effectinfo.txt and maps/levelname_effectinfo.txt (where levelname is the current map)");
488
489         Cvar_RegisterVariable (&cl_particles);
490         Cvar_RegisterVariable (&cl_particles_quality);
491         Cvar_RegisterVariable (&cl_particles_alpha);
492         Cvar_RegisterVariable (&cl_particles_size);
493         Cvar_RegisterVariable (&cl_particles_quake);
494         Cvar_RegisterVariable (&cl_particles_blood);
495         Cvar_RegisterVariable (&cl_particles_blood_alpha);
496         Cvar_RegisterVariable (&cl_particles_blood_decal_alpha);
497         Cvar_RegisterVariable (&cl_particles_blood_decal_scalemin);
498         Cvar_RegisterVariable (&cl_particles_blood_decal_scalemax);
499         Cvar_RegisterVariable (&cl_particles_blood_bloodhack);
500         Cvar_RegisterVariable (&cl_particles_explosions_sparks);
501         Cvar_RegisterVariable (&cl_particles_explosions_shell);
502         Cvar_RegisterVariable (&cl_particles_bulletimpacts);
503         Cvar_RegisterVariable (&cl_particles_rain);
504         Cvar_RegisterVariable (&cl_particles_snow);
505         Cvar_RegisterVariable (&cl_particles_smoke);
506         Cvar_RegisterVariable (&cl_particles_smoke_alpha);
507         Cvar_RegisterVariable (&cl_particles_smoke_alphafade);
508         Cvar_RegisterVariable (&cl_particles_sparks);
509         Cvar_RegisterVariable (&cl_particles_bubbles);
510         Cvar_RegisterVariable (&cl_particles_visculling);
511         Cvar_RegisterVariable (&cl_decals);
512         Cvar_RegisterVariable (&cl_decals_visculling);
513         Cvar_RegisterVariable (&cl_decals_time);
514         Cvar_RegisterVariable (&cl_decals_fadetime);
515         Cvar_RegisterVariable (&cl_decals_newsystem);
516         Cvar_RegisterVariable (&cl_decals_newsystem_intensitymultiplier);
517         Cvar_RegisterVariable (&cl_decals_models);
518         Cvar_RegisterVariable (&cl_decals_bias);
519         Cvar_RegisterVariable (&cl_decals_max);
520 }
521
522 void CL_Particles_Shutdown (void)
523 {
524 }
525
526 void CL_SpawnDecalParticleForSurface(int hitent, const vec3_t org, const vec3_t normal, int color1, int color2, int texnum, float size, float alpha);
527 void CL_SpawnDecalParticleForPoint(const vec3_t org, float maxdist, float size, float alpha, int texnum, int color1, int color2);
528
529 // list of all 26 parameters:
530 // ptype - any of the pt_ enum values (pt_static, pt_blood, etc), see ptype_t near the top of this file
531 // pcolor1,pcolor2 - minimum and maximum ranges of color, randomly interpolated to decide particle color
532 // ptex - any of the tex_ values such as tex_smoke[rand()&7] or tex_particle
533 // psize - size of particle (or thickness for PARTICLE_SPARK and PARTICLE_*BEAM)
534 // palpha - opacity of particle as 0-255 (can be more than 255)
535 // palphafade - rate of fade per second (so 256 would mean a 256 alpha particle would fade to nothing in 1 second)
536 // ptime - how long the particle can live (note it is also removed if alpha drops to nothing)
537 // pgravity - how much effect gravity has on the particle (0-1)
538 // pbounce - how much bounce the particle has when it hits a surface (0-1), -1 makes a blood splat when it hits a surface, 0 does not even check for collisions
539 // px,py,pz - starting origin of particle
540 // pvx,pvy,pvz - starting velocity of particle
541 // pfriction - how much the particle slows down per second (0-1 typically, can slowdown faster than 1)
542 // blendmode - one of the PBLEND_ values
543 // orientation - one of the PARTICLE_ values
544 // staincolor1, staincolor2: minimum and maximum ranges of stain color, randomly interpolated to decide particle color (-1 to use none)
545 // staintex: any of the tex_ values such as tex_smoke[rand()&7] or tex_particle (-1 to use none)
546 particle_t *CL_NewParticle(unsigned short ptypeindex, int pcolor1, int pcolor2, int ptex, float psize, float psizeincrease, float palpha, float palphafade, float pgravity, float pbounce, float px, float py, float pz, float pvx, float pvy, float pvz, float pairfriction, float pliquidfriction, float originjitter, float velocityjitter, qboolean pqualityreduction, float lifetime, float stretch, pblend_t blendmode, porientation_t orientation, int staincolor1, int staincolor2, int staintex)
547 {
548         int l1, l2, r, g, b;
549         particle_t *part;
550         vec3_t v;
551         if (!cl_particles.integer)
552                 return NULL;
553         for (;cl.free_particle < cl.max_particles && cl.particles[cl.free_particle].typeindex;cl.free_particle++);
554         if (cl.free_particle >= cl.max_particles)
555                 return NULL;
556         if (!lifetime)
557                 lifetime = palpha / min(1, palphafade);
558         part = &cl.particles[cl.free_particle++];
559         if (cl.num_particles < cl.free_particle)
560                 cl.num_particles = cl.free_particle;
561         memset(part, 0, sizeof(*part));
562         part->typeindex = ptypeindex;
563         part->blendmode = blendmode;
564         if(orientation == PARTICLE_HBEAM || orientation == PARTICLE_VBEAM)
565         {
566                 particletexture_t *tex = &particletexture[ptex];
567                 if(tex->t1 == 0 && tex->t2 == 1) // full height of texture?
568                         part->orientation = PARTICLE_VBEAM;
569                 else
570                         part->orientation = PARTICLE_HBEAM;
571         }
572         else
573                 part->orientation = orientation;
574         l2 = (int)lhrandom(0.5, 256.5);
575         l1 = 256 - l2;
576         part->color[0] = ((((pcolor1 >> 16) & 0xFF) * l1 + ((pcolor2 >> 16) & 0xFF) * l2) >> 8) & 0xFF;
577         part->color[1] = ((((pcolor1 >>  8) & 0xFF) * l1 + ((pcolor2 >>  8) & 0xFF) * l2) >> 8) & 0xFF;
578         part->color[2] = ((((pcolor1 >>  0) & 0xFF) * l1 + ((pcolor2 >>  0) & 0xFF) * l2) >> 8) & 0xFF;
579         part->staintexnum = staintex;
580         if(staincolor1 >= 0 && staincolor2 >= 0)
581         {
582                 l2 = (int)lhrandom(0.5, 256.5);
583                 l1 = 256 - l2;
584                 if(blendmode == PBLEND_INVMOD)
585                 {
586                         r = ((((staincolor1 >> 16) & 0xFF) * l1 + ((staincolor2 >> 16) & 0xFF) * l2) * (255 - part->color[0])) / 0x8000; // staincolor 0x808080 keeps color invariant
587                         g = ((((staincolor1 >>  8) & 0xFF) * l1 + ((staincolor2 >>  8) & 0xFF) * l2) * (255 - part->color[1])) / 0x8000;
588                         b = ((((staincolor1 >>  0) & 0xFF) * l1 + ((staincolor2 >>  0) & 0xFF) * l2) * (255 - part->color[2])) / 0x8000;
589                 }
590                 else
591                 {
592                         r = ((((staincolor1 >> 16) & 0xFF) * l1 + ((staincolor2 >> 16) & 0xFF) * l2) * part->color[0]) / 0x8000; // staincolor 0x808080 keeps color invariant
593                         g = ((((staincolor1 >>  8) & 0xFF) * l1 + ((staincolor2 >>  8) & 0xFF) * l2) * part->color[1]) / 0x8000;
594                         b = ((((staincolor1 >>  0) & 0xFF) * l1 + ((staincolor2 >>  0) & 0xFF) * l2) * part->color[2]) / 0x8000;
595                 }
596                 if(r > 0xFF) r = 0xFF;
597                 if(g > 0xFF) g = 0xFF;
598                 if(b > 0xFF) b = 0xFF;
599         }
600         else
601         {
602                 r = part->color[0]; // -1 is shorthand for stain = particle color
603                 g = part->color[1];
604                 b = part->color[2];
605         }
606         part->staincolor = r * 65536 + g * 256 + b;
607         part->texnum = ptex;
608         part->size = psize;
609         part->sizeincrease = psizeincrease;
610         part->alpha = palpha;
611         part->alphafade = palphafade;
612         part->gravity = pgravity;
613         part->bounce = pbounce;
614         part->stretch = stretch;
615         VectorRandom(v);
616         part->org[0] = px + originjitter * v[0];
617         part->org[1] = py + originjitter * v[1];
618         part->org[2] = pz + originjitter * v[2];
619         part->vel[0] = pvx + velocityjitter * v[0];
620         part->vel[1] = pvy + velocityjitter * v[1];
621         part->vel[2] = pvz + velocityjitter * v[2];
622         part->time2 = 0;
623         part->airfriction = pairfriction;
624         part->liquidfriction = pliquidfriction;
625         part->die = cl.time + lifetime;
626         part->delayedcollisions = 0;
627         part->qualityreduction = pqualityreduction;
628         // if it is rain or snow, trace ahead and shut off collisions until an actual collision event needs to occur to improve performance
629         if (part->typeindex == pt_rain)
630         {
631                 int i;
632                 particle_t *part2;
633                 float lifetime = part->die - cl.time;
634                 vec3_t endvec;
635                 trace_t trace;
636                 // turn raindrop into simple spark and create delayedspawn splash effect
637                 part->typeindex = pt_spark;
638                 part->bounce = 0;
639                 VectorMA(part->org, lifetime, part->vel, endvec);
640                 trace = CL_TraceLine(part->org, endvec, MOVE_NOMONSTERS, NULL, SUPERCONTENTS_SOLID | SUPERCONTENTS_BODY | SUPERCONTENTS_LIQUIDSMASK, true, false, NULL, false);
641                 part->die = cl.time + lifetime * trace.fraction;
642                 part2 = CL_NewParticle(pt_raindecal, pcolor1, pcolor2, tex_rainsplash, part->size, part->size * 20, part->alpha, part->alpha / 0.4, 0, 0, trace.endpos[0] + trace.plane.normal[0], trace.endpos[1] + trace.plane.normal[1], trace.endpos[2] + trace.plane.normal[2], trace.plane.normal[0], trace.plane.normal[1], trace.plane.normal[2], 0, 0, 0, 0, pqualityreduction, 0, 1, PBLEND_ADD, PARTICLE_ORIENTED_DOUBLESIDED, -1, -1, -1);
643                 if (part2)
644                 {
645                         part2->delayedspawn = part->die;
646                         part2->die += part->die - cl.time;
647                         for (i = rand() & 7;i < 10;i++)
648                         {
649                                 part2 = CL_NewParticle(pt_spark, pcolor1, pcolor2, tex_particle, 0.25f, 0, part->alpha * 2, part->alpha * 4, 1, 0, trace.endpos[0] + trace.plane.normal[0], trace.endpos[1] + trace.plane.normal[1], trace.endpos[2] + trace.plane.normal[2], trace.plane.normal[0] * 16, trace.plane.normal[1] * 16, trace.plane.normal[2] * 16 + cl.movevars_gravity * 0.04, 0, 0, 0, 32, pqualityreduction, 0, 1, PBLEND_ADD, PARTICLE_SPARK, -1, -1, -1);
650                                 if (part2)
651                                 {
652                                         part2->delayedspawn = part->die;
653                                         part2->die += part->die - cl.time;
654                                 }
655                         }
656                 }
657         }
658         else if (part->bounce != 0 && part->gravity == 0 && part->typeindex != pt_snow)
659         {
660                 float lifetime = part->alpha / (part->alphafade ? part->alphafade : 1);
661                 vec3_t endvec;
662                 trace_t trace;
663                 VectorMA(part->org, lifetime, part->vel, endvec);
664                 trace = CL_TraceLine(part->org, endvec, MOVE_NOMONSTERS, NULL, SUPERCONTENTS_SOLID | SUPERCONTENTS_BODY, true, false, NULL, false);
665                 part->delayedcollisions = cl.time + lifetime * trace.fraction - 0.1;
666         }
667
668         return part;
669 }
670
671 static void CL_ImmediateBloodStain(particle_t *part)
672 {
673         vec3_t v;
674         int staintex;
675
676         // blood creates a splash at spawn, not just at impact, this makes monsters bloody where they are shot
677         if (part->staintexnum >= 0 && cl_decals_newsystem.integer && cl_decals.integer)
678         {
679                 VectorCopy(part->vel, v);
680                 VectorNormalize(v);
681                 staintex = part->staintexnum;
682                 R_DecalSystem_SplatEntities(part->org, v, 1-((part->staincolor>>16)&255)*(1.0f/255.0f), 1-((part->staincolor>>8)&255)*(1.0f/255.0f), 1-((part->staincolor)&255)*(1.0f/255.0f), part->alpha*(1.0f/255.0f), particletexture[staintex].s1, particletexture[staintex].t1, particletexture[staintex].s2, particletexture[staintex].t2, part->size * 2);
683         }
684
685         // blood creates a splash at spawn, not just at impact, this makes monsters bloody where they are shot
686         if (part->typeindex == pt_blood && cl_decals_newsystem.integer && cl_decals.integer)
687         {
688                 VectorCopy(part->vel, v);
689                 VectorNormalize(v);
690                 staintex = tex_blooddecal[rand()&7];
691                 R_DecalSystem_SplatEntities(part->org, v, part->color[0]*(1.0f/255.0f), part->color[1]*(1.0f/255.0f), part->color[2]*(1.0f/255.0f), part->alpha*(1.0f/255.0f), particletexture[staintex].s1, particletexture[staintex].t1, particletexture[staintex].s2, particletexture[staintex].t2, part->size * 2);
692         }
693 }
694
695 void CL_SpawnDecalParticleForSurface(int hitent, const vec3_t org, const vec3_t normal, int color1, int color2, int texnum, float size, float alpha)
696 {
697         int l1, l2;
698         decal_t *decal;
699         entity_render_t *ent = &cl.entities[hitent].render;
700         unsigned char color[3];
701         if (!cl_decals.integer)
702                 return;
703         if (!ent->allowdecals)
704                 return;
705
706         l2 = (int)lhrandom(0.5, 256.5);
707         l1 = 256 - l2;
708         color[0] = ((((color1 >> 16) & 0xFF) * l1 + ((color2 >> 16) & 0xFF) * l2) >> 8) & 0xFF;
709         color[1] = ((((color1 >>  8) & 0xFF) * l1 + ((color2 >>  8) & 0xFF) * l2) >> 8) & 0xFF;
710         color[2] = ((((color1 >>  0) & 0xFF) * l1 + ((color2 >>  0) & 0xFF) * l2) >> 8) & 0xFF;
711
712         if (cl_decals_newsystem.integer)
713         {
714                 R_DecalSystem_SplatEntities(org, normal, color[0]*(1.0f/255.0f), color[1]*(1.0f/255.0f), color[2]*(1.0f/255.0f), alpha*(1.0f/255.0f), particletexture[texnum].s1, particletexture[texnum].t1, particletexture[texnum].s2, particletexture[texnum].t2, size);
715                 return;
716         }
717
718         for (;cl.free_decal < cl.max_decals && cl.decals[cl.free_decal].typeindex;cl.free_decal++);
719         if (cl.free_decal >= cl.max_decals)
720                 return;
721         decal = &cl.decals[cl.free_decal++];
722         if (cl.num_decals < cl.free_decal)
723                 cl.num_decals = cl.free_decal;
724         memset(decal, 0, sizeof(*decal));
725         decal->decalsequence = cl.decalsequence++;
726         decal->typeindex = pt_decal;
727         decal->texnum = texnum;
728         VectorMA(org, cl_decals_bias.value, normal, decal->org);
729         VectorCopy(normal, decal->normal);
730         decal->size = size;
731         decal->alpha = alpha;
732         decal->time2 = cl.time;
733         decal->color[0] = color[0];
734         decal->color[1] = color[1];
735         decal->color[2] = color[2];
736         decal->owner = hitent;
737         decal->clusterindex = -1000; // no vis culling unless we're sure
738         if (hitent)
739         {
740                 // these relative things are only used to regenerate p->org and p->vel if decal->owner is not world (0)
741                 decal->ownermodel = cl.entities[decal->owner].render.model;
742                 Matrix4x4_Transform(&cl.entities[decal->owner].render.inversematrix, org, decal->relativeorigin);
743                 Matrix4x4_Transform3x3(&cl.entities[decal->owner].render.inversematrix, normal, decal->relativenormal);
744         }
745         else
746         {
747                 if(r_refdef.scene.worldmodel && r_refdef.scene.worldmodel->brush.PointInLeaf)
748                 {
749                         mleaf_t *leaf = r_refdef.scene.worldmodel->brush.PointInLeaf(r_refdef.scene.worldmodel, decal->org);
750                         if(leaf)
751                                 decal->clusterindex = leaf->clusterindex;
752                 }
753         }
754 }
755
756 void CL_SpawnDecalParticleForPoint(const vec3_t org, float maxdist, float size, float alpha, int texnum, int color1, int color2)
757 {
758         int i;
759         float bestfrac, bestorg[3], bestnormal[3];
760         float org2[3];
761         int besthitent = 0, hitent;
762         trace_t trace;
763         bestfrac = 10;
764         for (i = 0;i < 32;i++)
765         {
766                 VectorRandom(org2);
767                 VectorMA(org, maxdist, org2, org2);
768                 trace = CL_TraceLine(org, org2, MOVE_NOMONSTERS, NULL, SUPERCONTENTS_SOLID | SUPERCONTENTS_SKY, true, false, &hitent, false);
769                 // take the closest trace result that doesn't end up hitting a NOMARKS
770                 // surface (sky for example)
771                 if (bestfrac > trace.fraction && !(trace.hitq3surfaceflags & Q3SURFACEFLAG_NOMARKS))
772                 {
773                         bestfrac = trace.fraction;
774                         besthitent = hitent;
775                         VectorCopy(trace.endpos, bestorg);
776                         VectorCopy(trace.plane.normal, bestnormal);
777                 }
778         }
779         if (bestfrac < 1)
780                 CL_SpawnDecalParticleForSurface(besthitent, bestorg, bestnormal, color1, color2, texnum, size, alpha);
781 }
782
783 static void CL_Sparks(const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, float sparkcount);
784 static void CL_Smoke(const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, float smokecount);
785 void CL_ParticleEffect_Fallback(int effectnameindex, float count, const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, entity_t *ent, int palettecolor, qboolean spawndlight, qboolean spawnparticles)
786 {
787         vec3_t center;
788         matrix4x4_t tempmatrix;
789         particle_t *part;
790         VectorLerp(originmins, 0.5, originmaxs, center);
791         Matrix4x4_CreateTranslate(&tempmatrix, center[0], center[1], center[2]);
792         if (effectnameindex == EFFECT_SVC_PARTICLE)
793         {
794                 if (cl_particles.integer)
795                 {
796                         // bloodhack checks if this effect's color matches regular or lightning blood and if so spawns a blood effect instead
797                         if (count == 1024)
798                                 CL_ParticleExplosion(center);
799                         else if (cl_particles_blood_bloodhack.integer && !cl_particles_quake.integer && (palettecolor == 73 || palettecolor == 225))
800                                 CL_ParticleEffect(EFFECT_TE_BLOOD, count / 2.0f, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
801                         else
802                         {
803                                 count *= cl_particles_quality.value;
804                                 for (;count > 0;count--)
805                                 {
806                                         int k = particlepalette[(palettecolor & ~7) + (rand()&7)];
807                                         CL_NewParticle(pt_alphastatic, k, k, tex_particle, 1.5, 0, 255, 0, 0.05, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 0, 0, 8, 0, true, lhrandom(0.1, 0.5), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
808                                 }
809                         }
810                 }
811         }
812         else if (effectnameindex == EFFECT_TE_WIZSPIKE)
813                 CL_ParticleEffect(EFFECT_SVC_PARTICLE, 30*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 20);
814         else if (effectnameindex == EFFECT_TE_KNIGHTSPIKE)
815                 CL_ParticleEffect(EFFECT_SVC_PARTICLE, 20*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 226);
816         else if (effectnameindex == EFFECT_TE_SPIKE)
817         {
818                 if (cl_particles_bulletimpacts.integer)
819                 {
820                         if (cl_particles_quake.integer)
821                         {
822                                 if (cl_particles_smoke.integer)
823                                         CL_ParticleEffect(EFFECT_SVC_PARTICLE, 10*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
824                         }
825                         else
826                         {
827                                 CL_Smoke(originmins, originmaxs, velocitymins, velocitymaxs, 4*count);
828                                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, 15*count);
829                                 CL_NewParticle(pt_static, 0x808080,0x808080, tex_particle, 3, 0, 256, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
830                         }
831                 }
832                 // bullet hole
833                 R_Stain(center, 16, 40, 40, 40, 64, 88, 88, 88, 64);
834                 CL_SpawnDecalParticleForPoint(center, 6, 3, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
835         }
836         else if (effectnameindex == EFFECT_TE_SPIKEQUAD)
837         {
838                 if (cl_particles_bulletimpacts.integer)
839                 {
840                         if (cl_particles_quake.integer)
841                         {
842                                 if (cl_particles_smoke.integer)
843                                         CL_ParticleEffect(EFFECT_SVC_PARTICLE, 10*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
844                         }
845                         else
846                         {
847                                 CL_Smoke(originmins, originmaxs, velocitymins, velocitymaxs, 4*count);
848                                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, 15*count);
849                                 CL_NewParticle(pt_static, 0x808080,0x808080, tex_particle, 3, 0, 256, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
850                         }
851                 }
852                 // bullet hole
853                 R_Stain(center, 16, 40, 40, 40, 64, 88, 88, 88, 64);
854                 CL_SpawnDecalParticleForPoint(center, 6, 3, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
855                 CL_AllocLightFlash(NULL, &tempmatrix, 100, 0.15f, 0.15f, 1.5f, 500, 0.2, 0, -1, true, 1, 0.25, 1, 0, 0, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
856         }
857         else if (effectnameindex == EFFECT_TE_SUPERSPIKE)
858         {
859                 if (cl_particles_bulletimpacts.integer)
860                 {
861                         if (cl_particles_quake.integer)
862                         {
863                                 if (cl_particles_smoke.integer)
864                                         CL_ParticleEffect(EFFECT_SVC_PARTICLE, 20*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
865                         }
866                         else
867                         {
868                                 CL_Smoke(originmins, originmaxs, velocitymins, velocitymaxs, 8*count);
869                                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, 30*count);
870                                 CL_NewParticle(pt_static, 0x808080,0x808080, tex_particle, 3, 0, 256, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
871                         }
872                 }
873                 // bullet hole
874                 R_Stain(center, 16, 40, 40, 40, 64, 88, 88, 88, 64);
875                 CL_SpawnDecalParticleForPoint(center, 6, 3, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
876         }
877         else if (effectnameindex == EFFECT_TE_SUPERSPIKEQUAD)
878         {
879                 if (cl_particles_bulletimpacts.integer)
880                 {
881                         if (cl_particles_quake.integer)
882                         {
883                                 if (cl_particles_smoke.integer)
884                                         CL_ParticleEffect(EFFECT_SVC_PARTICLE, 20*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
885                         }
886                         else
887                         {
888                                 CL_Smoke(originmins, originmaxs, velocitymins, velocitymaxs, 8*count);
889                                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, 30*count);
890                                 CL_NewParticle(pt_static, 0x808080,0x808080, tex_particle, 3, 0, 256, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
891                         }
892                 }
893                 // bullet hole
894                 R_Stain(center, 16, 40, 40, 40, 64, 88, 88, 88, 64);
895                 CL_SpawnDecalParticleForPoint(center, 6, 3, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
896                 CL_AllocLightFlash(NULL, &tempmatrix, 100, 0.15f, 0.15f, 1.5f, 500, 0.2, 0, -1, true, 1, 0.25, 1, 0, 0, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
897         }
898         else if (effectnameindex == EFFECT_TE_BLOOD)
899         {
900                 if (!cl_particles_blood.integer)
901                         return;
902                 if (cl_particles_quake.integer)
903                         CL_ParticleEffect(EFFECT_SVC_PARTICLE, 2*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 73);
904                 else
905                 {
906                         static double bloodaccumulator = 0;
907                         qboolean immediatebloodstain = true;
908                         //CL_NewParticle(pt_alphastatic, 0x4f0000,0x7f0000, tex_particle, 2.5, 0, 256, 256, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 1, 4, 0, 0, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD);
909                         bloodaccumulator += count * 0.333 * cl_particles_quality.value;
910                         for (;bloodaccumulator > 0;bloodaccumulator--)
911                         {
912                                 part = CL_NewParticle(pt_blood, 0xFFFFFF, 0xFFFFFF, tex_bloodparticle[rand()&7], 8, 0, cl_particles_blood_alpha.value * 768, cl_particles_blood_alpha.value * 384, 1, -1, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 1, 4, 0, 64, true, 0, 1, PBLEND_INVMOD, PARTICLE_BILLBOARD, -1, -1, -1);
913                                 if (immediatebloodstain && part)
914                                 {
915                                         immediatebloodstain = false;
916                                         CL_ImmediateBloodStain(part);
917                                 }
918                         }
919                 }
920         }
921         else if (effectnameindex == EFFECT_TE_SPARK)
922                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, count);
923         else if (effectnameindex == EFFECT_TE_PLASMABURN)
924         {
925                 // plasma scorch mark
926                 R_Stain(center, 40, 40, 40, 40, 64, 88, 88, 88, 64);
927                 CL_SpawnDecalParticleForPoint(center, 6, 6, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
928                 CL_AllocLightFlash(NULL, &tempmatrix, 200, 1, 1, 1, 1000, 0.2, 0, -1, true, 1, 0.25, 1, 0, 0, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
929         }
930         else if (effectnameindex == EFFECT_TE_GUNSHOT)
931         {
932                 if (cl_particles_bulletimpacts.integer)
933                 {
934                         if (cl_particles_quake.integer)
935                                 CL_ParticleEffect(EFFECT_SVC_PARTICLE, 20*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
936                         else
937                         {
938                                 CL_Smoke(originmins, originmaxs, velocitymins, velocitymaxs, 4*count);
939                                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, 20*count);
940                                 CL_NewParticle(pt_static, 0x808080,0x808080, tex_particle, 3, 0, 256, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
941                         }
942                 }
943                 // bullet hole
944                 R_Stain(center, 16, 40, 40, 40, 64, 88, 88, 88, 64);
945                 CL_SpawnDecalParticleForPoint(center, 6, 3, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
946         }
947         else if (effectnameindex == EFFECT_TE_GUNSHOTQUAD)
948         {
949                 if (cl_particles_bulletimpacts.integer)
950                 {
951                         if (cl_particles_quake.integer)
952                                 CL_ParticleEffect(EFFECT_SVC_PARTICLE, 20*count, originmins, originmaxs, velocitymins, velocitymaxs, NULL, 0);
953                         else
954                         {
955                                 CL_Smoke(originmins, originmaxs, velocitymins, velocitymaxs, 4*count);
956                                 CL_Sparks(originmins, originmaxs, velocitymins, velocitymaxs, 20*count);
957                                 CL_NewParticle(pt_static, 0x808080,0x808080, tex_particle, 3, 0, 256, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
958                         }
959                 }
960                 // bullet hole
961                 R_Stain(center, 16, 40, 40, 40, 64, 88, 88, 88, 64);
962                 CL_SpawnDecalParticleForPoint(center, 6, 3, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
963                 CL_AllocLightFlash(NULL, &tempmatrix, 100, 0.15f, 0.15f, 1.5f, 500, 0.2, 0, -1, true, 1, 0.25, 1, 0, 0, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
964         }
965         else if (effectnameindex == EFFECT_TE_EXPLOSION)
966         {
967                 CL_ParticleExplosion(center);
968                 CL_AllocLightFlash(NULL, &tempmatrix, 350, 4.0f, 2.0f, 0.50f, 700, 0.5, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
969         }
970         else if (effectnameindex == EFFECT_TE_EXPLOSIONQUAD)
971         {
972                 CL_ParticleExplosion(center);
973                 CL_AllocLightFlash(NULL, &tempmatrix, 350, 2.5f, 2.0f, 4.0f, 700, 0.5, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
974         }
975         else if (effectnameindex == EFFECT_TE_TAREXPLOSION)
976         {
977                 if (cl_particles_quake.integer)
978                 {
979                         int i;
980                         for (i = 0;i < 1024 * cl_particles_quality.value;i++)
981                         {
982                                 if (i & 1)
983                                         CL_NewParticle(pt_alphastatic, particlepalette[66], particlepalette[71], tex_particle, 1.5f, 0, 255, 0, 0, 0, center[0], center[1], center[2], 0, 0, 0, -4, -4, 16, 256, true, (rand() & 1) ? 1.4 : 1.0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
984                                 else
985                                         CL_NewParticle(pt_alphastatic, particlepalette[150], particlepalette[155], tex_particle, 1.5f, 0, 255, 0, 0, 0, center[0], center[1], center[2], 0, 0, lhrandom(-256, 256), 0, 0, 16, 0, true, (rand() & 1) ? 1.4 : 1.0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
986                         }
987                 }
988                 else
989                         CL_ParticleExplosion(center);
990                 CL_AllocLightFlash(NULL, &tempmatrix, 600, 1.6f, 0.8f, 2.0f, 1200, 0.5, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
991         }
992         else if (effectnameindex == EFFECT_TE_SMALLFLASH)
993                 CL_AllocLightFlash(NULL, &tempmatrix, 200, 2, 2, 2, 1000, 0.2, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
994         else if (effectnameindex == EFFECT_TE_FLAMEJET)
995         {
996                 count *= cl_particles_quality.value;
997                 while (count-- > 0)
998                         CL_NewParticle(pt_smoke, 0x6f0f00, 0xe3974f, tex_particle, 4, 0, lhrandom(64, 128), 384, -1, 1.1, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 1, 4, 0, 128, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
999         }
1000         else if (effectnameindex == EFFECT_TE_LAVASPLASH)
1001         {
1002                 float i, j, inc, vel;
1003                 vec3_t dir, org;
1004
1005                 inc = 8 / cl_particles_quality.value;
1006                 for (i = -128;i < 128;i += inc)
1007                 {
1008                         for (j = -128;j < 128;j += inc)
1009                         {
1010                                 dir[0] = j + lhrandom(0, inc);
1011                                 dir[1] = i + lhrandom(0, inc);
1012                                 dir[2] = 256;
1013                                 org[0] = center[0] + dir[0];
1014                                 org[1] = center[1] + dir[1];
1015                                 org[2] = center[2] + lhrandom(0, 64);
1016                                 vel = lhrandom(50, 120) / VectorLength(dir); // normalize and scale
1017                                 CL_NewParticle(pt_alphastatic, particlepalette[224], particlepalette[231], tex_particle, 1.5f, 0, 255, 0, 0.05, 0, org[0], org[1], org[2], dir[0] * vel, dir[1] * vel, dir[2] * vel, 0, 0, 0, 0, true, lhrandom(2, 2.62), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1018                         }
1019                 }
1020         }
1021         else if (effectnameindex == EFFECT_TE_TELEPORT)
1022         {
1023                 float i, j, k, inc, vel;
1024                 vec3_t dir;
1025
1026                 if (cl_particles_quake.integer)
1027                         inc = 4 / cl_particles_quality.value;
1028                 else
1029                         inc = 8 / cl_particles_quality.value;
1030                 for (i = -16;i < 16;i += inc)
1031                 {
1032                         for (j = -16;j < 16;j += inc)
1033                         {
1034                                 for (k = -24;k < 32;k += inc)
1035                                 {
1036                                         VectorSet(dir, i*8, j*8, k*8);
1037                                         VectorNormalize(dir);
1038                                         vel = lhrandom(50, 113);
1039                                         if (cl_particles_quake.integer)
1040                                                 CL_NewParticle(pt_alphastatic, particlepalette[7], particlepalette[14], tex_particle, 1.5f, 0, 255, 0, 0, 0, center[0] + i + lhrandom(0, inc), center[1] + j + lhrandom(0, inc), center[2] + k + lhrandom(0, inc), dir[0] * vel, dir[1] * vel, dir[2] * vel, 0, 0, 0, 0, true, lhrandom(0.2, 0.34), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1041                                         else
1042                                                 CL_NewParticle(pt_alphastatic, particlepalette[7], particlepalette[14], tex_particle, 1.5f, 0, inc * lhrandom(37, 63), inc * 187, 0, 0, center[0] + i + lhrandom(0, inc), center[1] + j + lhrandom(0, inc), center[2] + k + lhrandom(0, inc), dir[0] * vel, dir[1] * vel, dir[2] * vel, 0, 0, 0, 0, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1043                                 }
1044                         }
1045                 }
1046                 if (!cl_particles_quake.integer)
1047                         CL_NewParticle(pt_static, 0xffffff, 0xffffff, tex_particle, 30, 0, 256, 512, 0, 0, center[0], center[1], center[2], 0, 0, 0, 0, 0, 0, 0, false, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1048                 CL_AllocLightFlash(NULL, &tempmatrix, 200, 2.0f, 2.0f, 2.0f, 400, 99.0f, 0, -1, true, 1, 0.25, 1, 0, 0, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1049         }
1050         else if (effectnameindex == EFFECT_TE_TEI_G3)
1051                 CL_NewParticle(pt_beam, 0xFFFFFF, 0xFFFFFF, tex_beam, 8, 0, 256, 256, 0, 0, originmins[0], originmins[1], originmins[2], originmaxs[0], originmaxs[1], originmaxs[2], 0, 0, 0, 0, false, 0, 1, PBLEND_ADD, PARTICLE_HBEAM, -1, -1, -1);
1052         else if (effectnameindex == EFFECT_TE_TEI_SMOKE)
1053         {
1054                 if (cl_particles_smoke.integer)
1055                 {
1056                         count *= 0.25f * cl_particles_quality.value;
1057                         while (count-- > 0)
1058                                 CL_NewParticle(pt_smoke, 0x202020, 0x404040, tex_smoke[rand()&7], 5, 0, 255, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 0, 0, 1.5f, 6.0f, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1059                 }
1060         }
1061         else if (effectnameindex == EFFECT_TE_TEI_BIGEXPLOSION)
1062         {
1063                 CL_ParticleExplosion(center);
1064                 CL_AllocLightFlash(NULL, &tempmatrix, 500, 2.5f, 2.0f, 1.0f, 500, 9999, 0, -1, true, 1, 0.25, 0.5, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1065         }
1066         else if (effectnameindex == EFFECT_TE_TEI_PLASMAHIT)
1067         {
1068                 float f;
1069                 R_Stain(center, 40, 40, 40, 40, 64, 88, 88, 88, 64);
1070                 CL_SpawnDecalParticleForPoint(center, 6, 8, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
1071                 if (cl_particles_smoke.integer)
1072                         for (f = 0;f < count;f += 4.0f / cl_particles_quality.value)
1073                                 CL_NewParticle(pt_smoke, 0x202020, 0x404040, tex_smoke[rand()&7], 5, 0, 255, 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 0, 0, 20, 155, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1074                 if (cl_particles_sparks.integer)
1075                         for (f = 0;f < count;f += 1.0f / cl_particles_quality.value)
1076                                 CL_NewParticle(pt_spark, 0x2030FF, 0x80C0FF, tex_particle, 2.0f, 0, lhrandom(64, 255), 512, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 0, 0, 0, 465, true, 0, 1, PBLEND_ADD, PARTICLE_SPARK, -1, -1, -1);
1077                 CL_AllocLightFlash(NULL, &tempmatrix, 500, 0.6f, 1.2f, 2.0f, 2000, 9999, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1078         }
1079         else if (effectnameindex == EFFECT_EF_FLAME)
1080         {
1081                 count *= 300 * cl_particles_quality.value;
1082                 while (count-- > 0)
1083                         CL_NewParticle(pt_smoke, 0x6f0f00, 0xe3974f, tex_particle, 4, 0, lhrandom(64, 128), 384, -1, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 1, 4, 16, 128, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1084                 CL_AllocLightFlash(NULL, &tempmatrix, 200, 2.0f, 1.5f, 0.5f, 0, 0, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1085         }
1086         else if (effectnameindex == EFFECT_EF_STARDUST)
1087         {
1088                 count *= 200 * cl_particles_quality.value;
1089                 while (count-- > 0)
1090                         CL_NewParticle(pt_static, 0x903010, 0xFFD030, tex_particle, 4, 0, lhrandom(64, 128), 128, 1, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 0.2, 0.8, 16, 128, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1091                 CL_AllocLightFlash(NULL, &tempmatrix, 200, 1.0f, 0.7f, 0.3f, 0, 0, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1092         }
1093         else if (!strncmp(particleeffectname[effectnameindex], "TR_", 3))
1094         {
1095                 vec3_t dir, pos;
1096                 float len, dec, qd;
1097                 int smoke, blood, bubbles, r, color;
1098
1099                 if (spawndlight && r_refdef.scene.numlights < MAX_DLIGHTS)
1100                 {
1101                         vec4_t light;
1102                         Vector4Set(light, 0, 0, 0, 0);
1103
1104                         if (effectnameindex == EFFECT_TR_ROCKET)
1105                                 Vector4Set(light, 3.0f, 1.5f, 0.5f, 200);
1106                         else if (effectnameindex == EFFECT_TR_VORESPIKE)
1107                         {
1108                                 if (gamemode == GAME_PRYDON && !cl_particles_quake.integer)
1109                                         Vector4Set(light, 0.3f, 0.6f, 1.2f, 100);
1110                                 else
1111                                         Vector4Set(light, 1.2f, 0.5f, 1.0f, 200);
1112                         }
1113                         else if (effectnameindex == EFFECT_TR_NEXUIZPLASMA)
1114                                 Vector4Set(light, 0.75f, 1.5f, 3.0f, 200);
1115
1116                         if (light[3])
1117                         {
1118                                 matrix4x4_t tempmatrix;
1119                                 Matrix4x4_CreateFromQuakeEntity(&tempmatrix, originmaxs[0], originmaxs[1], originmaxs[2], 0, 0, 0, light[3]);
1120                                 R_RTLight_Update(&r_refdef.scene.templights[r_refdef.scene.numlights], false, &tempmatrix, light, -1, NULL, true, 1, 0.25, 0, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1121                                 r_refdef.scene.lights[r_refdef.scene.numlights] = &r_refdef.scene.templights[r_refdef.scene.numlights];r_refdef.scene.numlights++;
1122                         }
1123                 }
1124
1125                 if (!spawnparticles)
1126                         return;
1127
1128                 if (originmaxs[0] == originmins[0] && originmaxs[1] == originmins[1] && originmaxs[2] == originmins[2])
1129                         return;
1130
1131                 VectorSubtract(originmaxs, originmins, dir);
1132                 len = VectorNormalizeLength(dir);
1133                 if (ent)
1134                 {
1135                         dec = -ent->persistent.trail_time;
1136                         ent->persistent.trail_time += len;
1137                         if (ent->persistent.trail_time < 0.01f)
1138                                 return;
1139
1140                         // if we skip out, leave it reset
1141                         ent->persistent.trail_time = 0.0f;
1142                 }
1143                 else
1144                         dec = 0;
1145
1146                 // advance into this frame to reach the first puff location
1147                 VectorMA(originmins, dec, dir, pos);
1148                 len -= dec;
1149
1150                 smoke = cl_particles.integer && cl_particles_smoke.integer;
1151                 blood = cl_particles.integer && cl_particles_blood.integer;
1152                 bubbles = cl_particles.integer && cl_particles_bubbles.integer && !cl_particles_quake.integer && (CL_PointSuperContents(pos) & (SUPERCONTENTS_WATER | SUPERCONTENTS_SLIME));
1153                 qd = 1.0f / cl_particles_quality.value;
1154
1155                 while (len >= 0)
1156                 {
1157                         dec = 3;
1158                         if (blood)
1159                         {
1160                                 if (effectnameindex == EFFECT_TR_BLOOD)
1161                                 {
1162                                         if (cl_particles_quake.integer)
1163                                         {
1164                                                 color = particlepalette[67 + (rand()&3)];
1165                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0.05, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 3, 0, true, 2, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1166                                         }
1167                                         else
1168                                         {
1169                                                 dec = 16;
1170                                                 CL_NewParticle(pt_blood, 0xFFFFFF, 0xFFFFFF, tex_bloodparticle[rand()&7], 8, 0, qd * cl_particles_blood_alpha.value * 768.0f, qd * cl_particles_blood_alpha.value * 384.0f, 1, -1, pos[0], pos[1], pos[2], lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 1, 4, 0, 64, true, 0, 1, PBLEND_INVMOD, PARTICLE_BILLBOARD, -1, -1, -1);
1171                                         }
1172                                 }
1173                                 else if (effectnameindex == EFFECT_TR_SLIGHTBLOOD)
1174                                 {
1175                                         if (cl_particles_quake.integer)
1176                                         {
1177                                                 dec = 6;
1178                                                 color = particlepalette[67 + (rand()&3)];
1179                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0.05, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 3, 0, true, 2, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1180                                         }
1181                                         else
1182                                         {
1183                                                 dec = 32;
1184                                                 CL_NewParticle(pt_blood, 0xFFFFFF, 0xFFFFFF, tex_bloodparticle[rand()&7], 8, 0, qd * cl_particles_blood_alpha.value * 768.0f, qd * cl_particles_blood_alpha.value * 384.0f, 1, -1, pos[0], pos[1], pos[2], lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 1, 4, 0, 64, true, 0, 1, PBLEND_INVMOD, PARTICLE_BILLBOARD, -1, -1, -1);
1185                                         }
1186                                 }
1187                         }
1188                         if (smoke)
1189                         {
1190                                 if (effectnameindex == EFFECT_TR_ROCKET)
1191                                 {
1192                                         if (cl_particles_quake.integer)
1193                                         {
1194                                                 r = rand()&3;
1195                                                 color = particlepalette[ramp3[r]];
1196                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, -0.05, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 3, 0, true, 0.1372549*(6-r), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1197                                         }
1198                                         else
1199                                         {
1200                                                 CL_NewParticle(pt_smoke, 0x303030, 0x606060, tex_smoke[rand()&7], 3, 0, cl_particles_smoke_alpha.value*62, cl_particles_smoke_alphafade.value*62, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1201                                                 CL_NewParticle(pt_static, 0x801010, 0xFFA020, tex_smoke[rand()&7], 3, 0, cl_particles_smoke_alpha.value*288, cl_particles_smoke_alphafade.value*1400, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 20, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1202                                         }
1203                                 }
1204                                 else if (effectnameindex == EFFECT_TR_GRENADE)
1205                                 {
1206                                         if (cl_particles_quake.integer)
1207                                         {
1208                                                 r = 2 + (rand()%5);
1209                                                 color = particlepalette[ramp3[r]];
1210                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, -0.05, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 3, 0, true, 0.1372549*(6-r), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1211                                         }
1212                                         else
1213                                         {
1214                                                 CL_NewParticle(pt_smoke, 0x303030, 0x606060, tex_smoke[rand()&7], 3, 0, cl_particles_smoke_alpha.value*50, cl_particles_smoke_alphafade.value*75, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1215                                         }
1216                                 }
1217                                 else if (effectnameindex == EFFECT_TR_WIZSPIKE)
1218                                 {
1219                                         if (cl_particles_quake.integer)
1220                                         {
1221                                                 dec = 6;
1222                                                 color = particlepalette[52 + (rand()&7)];
1223                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, pos[0], pos[1], pos[2], 30*dir[1], 30*-dir[0], 0, 0, 0, 0, 0, true, 0.5, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1224                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, pos[0], pos[1], pos[2], 30*-dir[1], 30*dir[0], 0, 0, 0, 0, 0, true, 0.5, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1225                                         }
1226                                         else if (gamemode == GAME_GOODVSBAD2)
1227                                         {
1228                                                 dec = 6;
1229                                                 CL_NewParticle(pt_static, 0x00002E, 0x000030, tex_particle, 6, 0, 128, 384, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1230                                         }
1231                                         else
1232                                         {
1233                                                 color = particlepalette[20 + (rand()&7)];
1234                                                 CL_NewParticle(pt_static, color, color, tex_particle, 2, 0, 64, 192, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1235                                         }
1236                                 }
1237                                 else if (effectnameindex == EFFECT_TR_KNIGHTSPIKE)
1238                                 {
1239                                         if (cl_particles_quake.integer)
1240                                         {
1241                                                 dec = 6;
1242                                                 color = particlepalette[230 + (rand()&7)];
1243                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, pos[0], pos[1], pos[2], 30*dir[1], 30*-dir[0], 0, 0, 0, 0, 0, true, 0.5, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1244                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, pos[0], pos[1], pos[2], 30*-dir[1], 30*dir[0], 0, 0, 0, 0, 0, true, 0.5, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1245                                         }
1246                                         else
1247                                         {
1248                                                 color = particlepalette[226 + (rand()&7)];
1249                                                 CL_NewParticle(pt_static, color, color, tex_particle, 2, 0, 64, 192, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1250                                         }
1251                                 }
1252                                 else if (effectnameindex == EFFECT_TR_VORESPIKE)
1253                                 {
1254                                         if (cl_particles_quake.integer)
1255                                         {
1256                                                 color = particlepalette[152 + (rand()&3)];
1257                                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 8, 0, true, 0.3, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1258                                         }
1259                                         else if (gamemode == GAME_GOODVSBAD2)
1260                                         {
1261                                                 dec = 6;
1262                                                 CL_NewParticle(pt_alphastatic, particlepalette[0 + (rand()&255)], particlepalette[0 + (rand()&255)], tex_particle, 6, 0, 255, 384, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1263                                         }
1264                                         else if (gamemode == GAME_PRYDON)
1265                                         {
1266                                                 dec = 6;
1267                                                 CL_NewParticle(pt_static, 0x103040, 0x204050, tex_particle, 6, 0, 64, 192, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1268                                         }
1269                                         else
1270                                                 CL_NewParticle(pt_static, 0x502030, 0x502030, tex_particle, 3, 0, 64, 192, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1271                                 }
1272                                 else if (effectnameindex == EFFECT_TR_NEHAHRASMOKE)
1273                                 {
1274                                         dec = 7;
1275                                         CL_NewParticle(pt_alphastatic, 0x303030, 0x606060, tex_smoke[rand()&7], 7, 0, 64, 320, 0, 0, pos[0], pos[1], pos[2], 0, 0, lhrandom(4, 12), 0, 0, 0, 4, false, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1276                                 }
1277                                 else if (effectnameindex == EFFECT_TR_NEXUIZPLASMA)
1278                                 {
1279                                         dec = 4;
1280                                         CL_NewParticle(pt_static, 0x283880, 0x283880, tex_particle, 4, 0, 255, 1024, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 16, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1281                                 }
1282                                 else if (effectnameindex == EFFECT_TR_GLOWTRAIL)
1283                                         CL_NewParticle(pt_alphastatic, particlepalette[palettecolor], particlepalette[palettecolor], tex_particle, 5, 0, 128, 320, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1284                         }
1285                         if (bubbles)
1286                         {
1287                                 if (effectnameindex == EFFECT_TR_ROCKET)
1288                                         CL_NewParticle(pt_bubble, 0x404040, 0x808080, tex_bubble, 2, 0, lhrandom(128, 512), 512, -0.25, 1.5, pos[0], pos[1], pos[2], 0, 0, 0, 0.0625, 0.25, 0, 16, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1289                                 else if (effectnameindex == EFFECT_TR_GRENADE)
1290                                         CL_NewParticle(pt_bubble, 0x404040, 0x808080, tex_bubble, 2, 0, lhrandom(128, 512), 512, -0.25, 1.5, pos[0], pos[1], pos[2], 0, 0, 0, 0.0625, 0.25, 0, 16, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1291                         }
1292                         // advance to next time and position
1293                         dec *= qd;
1294                         len -= dec;
1295                         VectorMA (pos, dec, dir, pos);
1296                 }
1297                 if (ent)
1298                         ent->persistent.trail_time = len;
1299         }
1300         else
1301                 Con_DPrintf("CL_ParticleEffect_Fallback: no fallback found for effect %s\n", particleeffectname[effectnameindex]);
1302 }
1303
1304 // this is also called on point effects with spawndlight = true and
1305 // spawnparticles = true
1306 // it is called CL_ParticleTrail because most code does not want to supply
1307 // these parameters, only trail handling does
1308 void CL_ParticleTrail(int effectnameindex, float pcount, const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, entity_t *ent, int palettecolor, qboolean spawndlight, qboolean spawnparticles)
1309 {
1310         qboolean found = false;
1311         if (effectnameindex < 1 || effectnameindex >= MAX_PARTICLEEFFECTNAME || !particleeffectname[effectnameindex][0])
1312         {
1313                 Con_DPrintf("Unknown effect number %i received from server\n", effectnameindex);
1314                 return; // no such effect
1315         }
1316         if (!cl_particles_quake.integer && particleeffectinfo[0].effectnameindex)
1317         {
1318                 int effectinfoindex;
1319                 int supercontents;
1320                 int tex, staintex;
1321                 particleeffectinfo_t *info;
1322                 vec3_t center;
1323                 vec3_t traildir;
1324                 vec3_t trailpos;
1325                 vec3_t rvec;
1326                 vec_t traillen;
1327                 vec_t trailstep;
1328                 qboolean underwater;
1329                 qboolean immediatebloodstain;
1330                 particle_t *part;
1331                 // note this runs multiple effects with the same name, each one spawns only one kind of particle, so some effects need more than one
1332                 VectorLerp(originmins, 0.5, originmaxs, center);
1333                 supercontents = CL_PointSuperContents(center);
1334                 underwater = (supercontents & (SUPERCONTENTS_WATER | SUPERCONTENTS_SLIME)) != 0;
1335                 VectorSubtract(originmaxs, originmins, traildir);
1336                 traillen = VectorLength(traildir);
1337                 VectorNormalize(traildir);
1338                 for (effectinfoindex = 0, info = particleeffectinfo;effectinfoindex < MAX_PARTICLEEFFECTINFO && info->effectnameindex;effectinfoindex++, info++)
1339                 {
1340                         if (info->effectnameindex == effectnameindex)
1341                         {
1342                                 found = true;
1343                                 if ((info->flags & PARTICLEEFFECT_UNDERWATER) && !underwater)
1344                                         continue;
1345                                 if ((info->flags & PARTICLEEFFECT_NOTUNDERWATER) && underwater)
1346                                         continue;
1347
1348                                 // spawn a dlight if requested
1349                                 if (info->lightradiusstart > 0 && spawndlight)
1350                                 {
1351                                         matrix4x4_t tempmatrix;
1352                                         if (info->trailspacing > 0)
1353                                                 Matrix4x4_CreateTranslate(&tempmatrix, originmaxs[0], originmaxs[1], originmaxs[2]);
1354                                         else
1355                                                 Matrix4x4_CreateTranslate(&tempmatrix, center[0], center[1], center[2]);
1356                                         if (info->lighttime > 0 && info->lightradiusfade > 0)
1357                                         {
1358                                                 // light flash (explosion, etc)
1359                                                 // called when effect starts
1360                                                 CL_AllocLightFlash(NULL, &tempmatrix, info->lightradiusstart, info->lightcolor[0], info->lightcolor[1], info->lightcolor[2], info->lightradiusfade, info->lighttime, info->lightcubemapnum, -1, info->lightshadow, 1, 0.25, 0, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1361                                         }
1362                                         else
1363                                         {
1364                                                 // glowing entity
1365                                                 // called by CL_LinkNetworkEntity
1366                                                 Matrix4x4_Scale(&tempmatrix, info->lightradiusstart, 1);
1367                                                 R_RTLight_Update(&r_refdef.scene.templights[r_refdef.scene.numlights], false, &tempmatrix, info->lightcolor, -1, info->lightcubemapnum > 0 ? va("cubemaps/%i", info->lightcubemapnum) : NULL, info->lightshadow, 1, 0.25, 0, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
1368                                                 r_refdef.scene.lights[r_refdef.scene.numlights] = &r_refdef.scene.templights[r_refdef.scene.numlights];r_refdef.scene.numlights++;
1369                                         }
1370                                 }
1371
1372                                 if (!spawnparticles)
1373                                         continue;
1374
1375                                 // spawn particles
1376                                 tex = info->tex[0];
1377                                 if (info->tex[1] > info->tex[0])
1378                                 {
1379                                         tex = (int)lhrandom(info->tex[0], info->tex[1]);
1380                                         tex = min(tex, info->tex[1] - 1);
1381                                 }
1382                                 if(info->staintex[0] < 0)
1383                                         staintex = info->staintex[0];
1384                                 else
1385                                 {
1386                                         staintex = (int)lhrandom(info->staintex[0], info->staintex[1]);
1387                                         staintex = min(staintex, info->staintex[1] - 1);
1388                                 }
1389                                 if (info->particletype == pt_decal)
1390                                         CL_SpawnDecalParticleForPoint(center, info->originjitter[0], lhrandom(info->size[0], info->size[1]), lhrandom(info->alpha[0], info->alpha[1]), tex, info->color[0], info->color[1]);
1391                                 else if (info->orientation == PARTICLE_HBEAM)
1392                                         CL_NewParticle(info->particletype, info->color[0], info->color[1], tex, lhrandom(info->size[0], info->size[1]), info->size[2], lhrandom(info->alpha[0], info->alpha[1]), info->alpha[2], 0, 0, originmins[0], originmins[1], originmins[2], originmaxs[0], originmaxs[1], originmaxs[2], 0, 0, 0, 0, false, lhrandom(info->time[0], info->time[1]), info->stretchfactor, info->blendmode, info->orientation, info->staincolor[0], info->staincolor[1], staintex);
1393                                 else
1394                                 {
1395                                         if (!cl_particles.integer)
1396                                                 continue;
1397                                         switch (info->particletype)
1398                                         {
1399                                         case pt_smoke: if (!cl_particles_smoke.integer) continue;break;
1400                                         case pt_spark: if (!cl_particles_sparks.integer) continue;break;
1401                                         case pt_bubble: if (!cl_particles_bubbles.integer) continue;break;
1402                                         case pt_blood: if (!cl_particles_blood.integer) continue;break;
1403                                         case pt_rain: if (!cl_particles_rain.integer) continue;break;
1404                                         case pt_snow: if (!cl_particles_snow.integer) continue;break;
1405                                         default: break;
1406                                         }
1407                                         VectorCopy(originmins, trailpos);
1408                                         if (info->trailspacing > 0)
1409                                         {
1410                                                 info->particleaccumulator += traillen / info->trailspacing * cl_particles_quality.value;
1411                                                 trailstep = info->trailspacing / cl_particles_quality.value;
1412                                                 immediatebloodstain = false;
1413                                         }
1414                                         else
1415                                         {
1416                                                 info->particleaccumulator += info->countabsolute + pcount * info->countmultiplier * cl_particles_quality.value;
1417                                                 trailstep = 0;
1418                                                 immediatebloodstain = info->particletype == pt_blood || staintex;
1419                                         }
1420                                         info->particleaccumulator = bound(0, info->particleaccumulator, 16384);
1421                                         for (;info->particleaccumulator >= 1;info->particleaccumulator--)
1422                                         {
1423                                                 if (info->tex[1] > info->tex[0])
1424                                                 {
1425                                                         tex = (int)lhrandom(info->tex[0], info->tex[1]);
1426                                                         tex = min(tex, info->tex[1] - 1);
1427                                                 }
1428                                                 if (!trailstep)
1429                                                 {
1430                                                         trailpos[0] = lhrandom(originmins[0], originmaxs[0]);
1431                                                         trailpos[1] = lhrandom(originmins[1], originmaxs[1]);
1432                                                         trailpos[2] = lhrandom(originmins[2], originmaxs[2]);
1433                                                 }
1434                                                 VectorRandom(rvec);
1435                                                 part = CL_NewParticle(info->particletype, info->color[0], info->color[1], tex, lhrandom(info->size[0], info->size[1]), info->size[2], lhrandom(info->alpha[0], info->alpha[1]), info->alpha[2], info->gravity, info->bounce, trailpos[0] + info->originoffset[0] + info->originjitter[0] * rvec[0], trailpos[1] + info->originoffset[1] + info->originjitter[1] * rvec[1], trailpos[2] + info->originoffset[2] + info->originjitter[2] * rvec[2], lhrandom(velocitymins[0], velocitymaxs[0]) * info->velocitymultiplier + info->velocityoffset[0] + info->velocityjitter[0] * rvec[0], lhrandom(velocitymins[1], velocitymaxs[1]) * info->velocitymultiplier + info->velocityoffset[1] + info->velocityjitter[1] * rvec[1], lhrandom(velocitymins[2], velocitymaxs[2]) * info->velocitymultiplier + info->velocityoffset[2] + info->velocityjitter[2] * rvec[2], info->airfriction, info->liquidfriction, 0, 0, info->countabsolute <= 0, lhrandom(info->time[0], info->time[1]), info->stretchfactor, info->blendmode, info->orientation, info->staincolor[0], info->staincolor[1], staintex);
1436                                                 if (immediatebloodstain && part)
1437                                                 {
1438                                                         immediatebloodstain = false;
1439                                                         CL_ImmediateBloodStain(part);
1440                                                 }
1441                                                 if (trailstep)
1442                                                         VectorMA(trailpos, trailstep, traildir, trailpos);
1443                                         }
1444                                 }
1445                         }
1446                 }
1447         }
1448         if (!found)
1449                 CL_ParticleEffect_Fallback(effectnameindex, pcount, originmins, originmaxs, velocitymins, velocitymaxs, ent, palettecolor, spawndlight, spawnparticles);
1450 }
1451
1452 void CL_ParticleEffect(int effectnameindex, float pcount, const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, entity_t *ent, int palettecolor)
1453 {
1454         CL_ParticleTrail(effectnameindex, pcount, originmins, originmaxs, velocitymins, velocitymaxs, ent, palettecolor, true, true);
1455 }
1456
1457 /*
1458 ===============
1459 CL_EntityParticles
1460 ===============
1461 */
1462 void CL_EntityParticles (const entity_t *ent)
1463 {
1464         int i;
1465         float pitch, yaw, dist = 64, beamlength = 16, org[3], v[3];
1466         static vec3_t avelocities[NUMVERTEXNORMALS];
1467         if (!cl_particles.integer) return;
1468         if (cl.time <= cl.oldtime) return; // don't spawn new entity particles while paused
1469
1470         Matrix4x4_OriginFromMatrix(&ent->render.matrix, org);
1471
1472         if (!avelocities[0][0])
1473                 for (i = 0;i < NUMVERTEXNORMALS * 3;i++)
1474                         avelocities[0][i] = lhrandom(0, 2.55);
1475
1476         for (i = 0;i < NUMVERTEXNORMALS;i++)
1477         {
1478                 yaw = cl.time * avelocities[i][0];
1479                 pitch = cl.time * avelocities[i][1];
1480                 v[0] = org[0] + m_bytenormals[i][0] * dist + (cos(pitch)*cos(yaw)) * beamlength;
1481                 v[1] = org[1] + m_bytenormals[i][1] * dist + (cos(pitch)*sin(yaw)) * beamlength;
1482                 v[2] = org[2] + m_bytenormals[i][2] * dist + (-sin(pitch)) * beamlength;
1483                 CL_NewParticle(pt_entityparticle, particlepalette[0x6f], particlepalette[0x6f], tex_particle, 1, 0, 255, 0, 0, 0, v[0], v[1], v[2], 0, 0, 0, 0, 0, 0, 0, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1484         }
1485 }
1486
1487
1488 void CL_ReadPointFile_f (void)
1489 {
1490         vec3_t org, leakorg;
1491         int r, c, s;
1492         char *pointfile = NULL, *pointfilepos, *t, tchar;
1493         char name[MAX_OSPATH];
1494
1495         if (!cl.worldmodel)
1496                 return;
1497
1498         FS_StripExtension (cl.worldmodel->name, name, sizeof (name));
1499         strlcat (name, ".pts", sizeof (name));
1500         pointfile = (char *)FS_LoadFile(name, tempmempool, true, NULL);
1501         if (!pointfile)
1502         {
1503                 Con_Printf("Could not open %s\n", name);
1504                 return;
1505         }
1506
1507         Con_Printf("Reading %s...\n", name);
1508         VectorClear(leakorg);
1509         c = 0;
1510         s = 0;
1511         pointfilepos = pointfile;
1512         while (*pointfilepos)
1513         {
1514                 while (*pointfilepos == '\n' || *pointfilepos == '\r')
1515                         pointfilepos++;
1516                 if (!*pointfilepos)
1517                         break;
1518                 t = pointfilepos;
1519                 while (*t && *t != '\n' && *t != '\r')
1520                         t++;
1521                 tchar = *t;
1522                 *t = 0;
1523 #if _MSC_VER >= 1400
1524 #define sscanf sscanf_s
1525 #endif
1526                 r = sscanf (pointfilepos,"%f %f %f", &org[0], &org[1], &org[2]);
1527                 *t = tchar;
1528                 pointfilepos = t;
1529                 if (r != 3)
1530                         break;
1531                 if (c == 0)
1532                         VectorCopy(org, leakorg);
1533                 c++;
1534
1535                 if (cl.num_particles < cl.max_particles - 3)
1536                 {
1537                         s++;
1538                         CL_NewParticle(pt_alphastatic, particlepalette[(-c)&15], particlepalette[(-c)&15], tex_particle, 2, 0, 255, 0, 0, 0, org[0], org[1], org[2], 0, 0, 0, 0, 0, 0, 0, true, 1<<30, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1539                 }
1540         }
1541         Mem_Free(pointfile);
1542         VectorCopy(leakorg, org);
1543         Con_Printf("%i points read (%i particles spawned)\nLeak at %f %f %f\n", c, s, org[0], org[1], org[2]);
1544
1545         CL_NewParticle(pt_beam, 0xFF0000, 0xFF0000, tex_beam, 64, 0, 255, 0, 0, 0, org[0] - 4096, org[1], org[2], org[0] + 4096, org[1], org[2], 0, 0, 0, 0, false, 1<<30, 1, PBLEND_ADD, PARTICLE_HBEAM, -1, -1, -1);
1546         CL_NewParticle(pt_beam, 0x00FF00, 0x00FF00, tex_beam, 64, 0, 255, 0, 0, 0, org[0], org[1] - 4096, org[2], org[0], org[1] + 4096, org[2], 0, 0, 0, 0, false, 1<<30, 1, PBLEND_ADD, PARTICLE_HBEAM, -1, -1, -1);
1547         CL_NewParticle(pt_beam, 0x0000FF, 0x0000FF, tex_beam, 64, 0, 255, 0, 0, 0, org[0], org[1], org[2] - 4096, org[0], org[1], org[2] + 4096, 0, 0, 0, 0, false, 1<<30, 1, PBLEND_ADD, PARTICLE_HBEAM, -1, -1, -1);
1548 }
1549
1550 /*
1551 ===============
1552 CL_ParseParticleEffect
1553
1554 Parse an effect out of the server message
1555 ===============
1556 */
1557 void CL_ParseParticleEffect (void)
1558 {
1559         vec3_t org, dir;
1560         int i, count, msgcount, color;
1561
1562         MSG_ReadVector(org, cls.protocol);
1563         for (i=0 ; i<3 ; i++)
1564                 dir[i] = MSG_ReadChar () * (1.0 / 16.0);
1565         msgcount = MSG_ReadByte ();
1566         color = MSG_ReadByte ();
1567
1568         if (msgcount == 255)
1569                 count = 1024;
1570         else
1571                 count = msgcount;
1572
1573         CL_ParticleEffect(EFFECT_SVC_PARTICLE, count, org, org, dir, dir, NULL, color);
1574 }
1575
1576 /*
1577 ===============
1578 CL_ParticleExplosion
1579
1580 ===============
1581 */
1582 void CL_ParticleExplosion (const vec3_t org)
1583 {
1584         int i;
1585         trace_t trace;
1586         //vec3_t v;
1587         //vec3_t v2;
1588         R_Stain(org, 96, 40, 40, 40, 64, 88, 88, 88, 64);
1589         CL_SpawnDecalParticleForPoint(org, 40, 48, 255, tex_bulletdecal[rand()&7], 0xFFFFFF, 0xFFFFFF);
1590
1591         if (cl_particles_quake.integer)
1592         {
1593                 for (i = 0;i < 1024;i++)
1594                 {
1595                         int r, color;
1596                         r = rand()&3;
1597                         if (i & 1)
1598                         {
1599                                 color = particlepalette[ramp1[r]];
1600                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, org[0], org[1], org[2], 0, 0, 0, -4, -4, 16, 256, true, 0.1006 * (8 - r), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1601                         }
1602                         else
1603                         {
1604                                 color = particlepalette[ramp2[r]];
1605                                 CL_NewParticle(pt_alphastatic, color, color, tex_particle, 1.5f, 0, 255, 0, 0, 0, org[0], org[1], org[2], 0, 0, 0, 1, 1, 16, 256, true, 0.0669 * (8 - r), 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1606                         }
1607                 }
1608         }
1609         else
1610         {
1611                 i = CL_PointSuperContents(org);
1612                 if (i & (SUPERCONTENTS_SLIME | SUPERCONTENTS_WATER))
1613                 {
1614                         if (cl_particles.integer && cl_particles_bubbles.integer)
1615                                 for (i = 0;i < 128 * cl_particles_quality.value;i++)
1616                                         CL_NewParticle(pt_bubble, 0x404040, 0x808080, tex_bubble, 2, 0, lhrandom(128, 255), 128, -0.125, 1.5, org[0], org[1], org[2], 0, 0, 0, 0.0625, 0.25, 16, 96, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1617                 }
1618                 else
1619                 {
1620                         if (cl_particles.integer && cl_particles_sparks.integer && cl_particles_explosions_sparks.integer)
1621                         {
1622                                 for (i = 0;i < 512 * cl_particles_quality.value;i++)
1623                                 {
1624                                         int k;
1625                                         vec3_t v, v2;
1626                                         for (k = 0;k < 16;k++)
1627                                         {
1628                                                 VectorRandom(v2);
1629                                                 VectorMA(org, 128, v2, v);
1630                                                 trace = CL_TraceLine(org, v, MOVE_NOMONSTERS, NULL, SUPERCONTENTS_SOLID, true, false, NULL, false);
1631                                                 if (trace.fraction >= 0.1)
1632                                                         break;
1633                                         }
1634                                         VectorSubtract(trace.endpos, org, v2);
1635                                         VectorScale(v2, 2.0f, v2);
1636                                         CL_NewParticle(pt_spark, 0x903010, 0xFFD030, tex_particle, 1.0f, 0, lhrandom(0, 255), 512, 0, 0, org[0], org[1], org[2], v2[0], v2[1], v2[2], 0, 0, 0, 0, true, 0, 1, PBLEND_ADD, PARTICLE_SPARK, -1, -1, -1);
1637                                 }
1638                         }
1639                 }
1640         }
1641
1642         if (cl_particles_explosions_shell.integer)
1643                 R_NewExplosion(org);
1644 }
1645
1646 /*
1647 ===============
1648 CL_ParticleExplosion2
1649
1650 ===============
1651 */
1652 void CL_ParticleExplosion2 (const vec3_t org, int colorStart, int colorLength)
1653 {
1654         int i, k;
1655         if (!cl_particles.integer) return;
1656
1657         for (i = 0;i < 512 * cl_particles_quality.value;i++)
1658         {
1659                 k = particlepalette[colorStart + (i % colorLength)];
1660                 if (cl_particles_quake.integer)
1661                         CL_NewParticle(pt_alphastatic, k, k, tex_particle, 1, 0, 255, 0, 0, 0, org[0], org[1], org[2], 0, 0, 0, -4, -4, 16, 256, true, 0.3, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1662                 else
1663                         CL_NewParticle(pt_alphastatic, k, k, tex_particle, lhrandom(0.5, 1.5), 0, 255, 512, 0, 0, org[0], org[1], org[2], 0, 0, 0, lhrandom(1.5, 3), lhrandom(1.5, 3), 8, 192, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1664         }
1665 }
1666
1667 static void CL_Sparks(const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, float sparkcount)
1668 {
1669         if (cl_particles_sparks.integer)
1670         {
1671                 sparkcount *= cl_particles_quality.value;
1672                 while(sparkcount-- > 0)
1673                         CL_NewParticle(pt_spark, particlepalette[0x68], particlepalette[0x6f], tex_particle, 0.5f, 0, lhrandom(64, 255), 512, 1, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]) + cl.movevars_gravity * 0.1f, 0, 0, 0, 64, true, 0, 1, PBLEND_ADD, PARTICLE_SPARK, -1, -1, -1);
1674         }
1675 }
1676
1677 static void CL_Smoke(const vec3_t originmins, const vec3_t originmaxs, const vec3_t velocitymins, const vec3_t velocitymaxs, float smokecount)
1678 {
1679         if (cl_particles_smoke.integer)
1680         {
1681                 smokecount *= cl_particles_quality.value;
1682                 while(smokecount-- > 0)
1683                         CL_NewParticle(pt_smoke, 0x101010, 0x101010, tex_smoke[rand()&7], 2, 2, 255, 256, 0, 0, lhrandom(originmins[0], originmaxs[0]), lhrandom(originmins[1], originmaxs[1]), lhrandom(originmins[2], originmaxs[2]), lhrandom(velocitymins[0], velocitymaxs[0]), lhrandom(velocitymins[1], velocitymaxs[1]), lhrandom(velocitymins[2], velocitymaxs[2]), 0, 0, 0, smokecount > 0 ? 16 : 0, true, 0, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1684         }
1685 }
1686
1687 void CL_ParticleCube (const vec3_t mins, const vec3_t maxs, const vec3_t dir, int count, int colorbase, vec_t gravity, vec_t randomvel)
1688 {
1689         int k;
1690         if (!cl_particles.integer) return;
1691
1692         count = (int)(count * cl_particles_quality.value);
1693         while (count--)
1694         {
1695                 k = particlepalette[colorbase + (rand()&3)];
1696                 CL_NewParticle(pt_alphastatic, k, k, tex_particle, 2, 0, 255, 128, gravity, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(mins[2], maxs[2]), dir[0], dir[1], dir[2], 0, 0, 0, randomvel, true, 0, 1, PBLEND_ALPHA, PARTICLE_BILLBOARD, -1, -1, -1);
1697         }
1698 }
1699
1700 void CL_ParticleRain (const vec3_t mins, const vec3_t maxs, const vec3_t dir, int count, int colorbase, int type)
1701 {
1702         int k;
1703         float minz, maxz, lifetime = 30;
1704         if (!cl_particles.integer) return;
1705         if (dir[2] < 0) // falling
1706         {
1707                 minz = maxs[2] + dir[2] * 0.1;
1708                 maxz = maxs[2];
1709                 if (cl.worldmodel)
1710                         lifetime = (maxz - cl.worldmodel->normalmins[2]) / max(1, -dir[2]);
1711         }
1712         else // rising??
1713         {
1714                 minz = mins[2];
1715                 maxz = maxs[2] + dir[2] * 0.1;
1716                 if (cl.worldmodel)
1717                         lifetime = (cl.worldmodel->normalmaxs[2] - minz) / max(1, dir[2]);
1718         }
1719
1720         count = (int)(count * cl_particles_quality.value);
1721
1722         switch(type)
1723         {
1724         case 0:
1725                 if (!cl_particles_rain.integer) break;
1726                 count *= 4; // ick, this should be in the mod or maps?
1727
1728                 while(count--)
1729                 {
1730                         k = particlepalette[colorbase + (rand()&3)];
1731                         if (gamemode == GAME_GOODVSBAD2)
1732                                 CL_NewParticle(pt_rain, k, k, tex_particle, 20, 0, lhrandom(32, 64), 0, 0, -1, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(minz, maxz), dir[0], dir[1], dir[2], 0, 0, 0, 0, true, lifetime, 1, PBLEND_ADD, PARTICLE_SPARK, -1, -1, -1);
1733                         else
1734                                 CL_NewParticle(pt_rain, k, k, tex_particle, 0.5, 0, lhrandom(32, 64), 0, 0, -1, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(minz, maxz), dir[0], dir[1], dir[2], 0, 0, 0, 0, true, lifetime, 1, PBLEND_ADD, PARTICLE_SPARK, -1, -1, -1);
1735                 }
1736                 break;
1737         case 1:
1738                 if (!cl_particles_snow.integer) break;
1739                 while(count--)
1740                 {
1741                         k = particlepalette[colorbase + (rand()&3)];
1742                         if (gamemode == GAME_GOODVSBAD2)
1743                                 CL_NewParticle(pt_snow, k, k, tex_particle, 20, 0, lhrandom(64, 128), 0, 0, -1, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(minz, maxz), dir[0], dir[1], dir[2], 0, 0, 0, 0, true, lifetime, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1744                         else
1745                                 CL_NewParticle(pt_snow, k, k, tex_particle, 1, 0, lhrandom(64, 128), 0, 0, -1, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(minz, maxz), dir[0], dir[1], dir[2], 0, 0, 0, 0, true, lifetime, 1, PBLEND_ADD, PARTICLE_BILLBOARD, -1, -1, -1);
1746                 }
1747                 break;
1748         default:
1749                 Con_Printf ("CL_ParticleRain: unknown type %i (0 = rain, 1 = snow)\n", type);
1750         }
1751 }
1752
1753 static cvar_t r_drawparticles = {0, "r_drawparticles", "1", "enables drawing of particles"};
1754 static cvar_t r_drawparticles_drawdistance = {CVAR_SAVE, "r_drawparticles_drawdistance", "2000", "particles further than drawdistance*size will not be drawn"};
1755 static cvar_t r_drawdecals = {0, "r_drawdecals", "1", "enables drawing of decals"};
1756 static cvar_t r_drawdecals_drawdistance = {CVAR_SAVE, "r_drawdecals_drawdistance", "500", "decals further than drawdistance*size will not be drawn"};
1757
1758 #define PARTICLETEXTURESIZE 64
1759 #define PARTICLEFONTSIZE (PARTICLETEXTURESIZE*8)
1760
1761 static unsigned char shadebubble(float dx, float dy, vec3_t light)
1762 {
1763         float dz, f, dot;
1764         vec3_t normal;
1765         dz = 1 - (dx*dx+dy*dy);
1766         if (dz > 0) // it does hit the sphere
1767         {
1768                 f = 0;
1769                 // back side
1770                 normal[0] = dx;normal[1] = dy;normal[2] = dz;
1771                 VectorNormalize(normal);
1772                 dot = DotProduct(normal, light);
1773                 if (dot > 0.5) // interior reflection
1774                         f += ((dot *  2) - 1);
1775                 else if (dot < -0.5) // exterior reflection
1776                         f += ((dot * -2) - 1);
1777                 // front side
1778                 normal[0] = dx;normal[1] = dy;normal[2] = -dz;
1779                 VectorNormalize(normal);
1780                 dot = DotProduct(normal, light);
1781                 if (dot > 0.5) // interior reflection
1782                         f += ((dot *  2) - 1);
1783                 else if (dot < -0.5) // exterior reflection
1784                         f += ((dot * -2) - 1);
1785                 f *= 128;
1786                 f += 16; // just to give it a haze so you can see the outline
1787                 f = bound(0, f, 255);
1788                 return (unsigned char) f;
1789         }
1790         else
1791                 return 0;
1792 }
1793
1794 int particlefontwidth, particlefontheight, particlefontcellwidth, particlefontcellheight, particlefontrows, particlefontcols;
1795 void CL_Particle_PixelCoordsForTexnum(int texnum, int *basex, int *basey, int *width, int *height)
1796 {
1797         *basex = (texnum % particlefontcols) * particlefontcellwidth;
1798         *basey = ((texnum / particlefontcols) % particlefontrows) * particlefontcellheight;
1799         *width = particlefontcellwidth;
1800         *height = particlefontcellheight;
1801 }
1802
1803 static void setuptex(int texnum, unsigned char *data, unsigned char *particletexturedata)
1804 {
1805         int basex, basey, w, h, y;
1806         CL_Particle_PixelCoordsForTexnum(texnum, &basex, &basey, &w, &h);
1807         if(w != PARTICLETEXTURESIZE || h != PARTICLETEXTURESIZE)
1808                 Sys_Error("invalid particle texture size for autogenerating");
1809         for (y = 0;y < PARTICLETEXTURESIZE;y++)
1810                 memcpy(particletexturedata + ((basey + y) * PARTICLEFONTSIZE + basex) * 4, data + y * PARTICLETEXTURESIZE * 4, PARTICLETEXTURESIZE * 4);
1811 }
1812
1813 void particletextureblotch(unsigned char *data, float radius, float red, float green, float blue, float alpha)
1814 {
1815         int x, y;
1816         float cx, cy, dx, dy, f, iradius;
1817         unsigned char *d;
1818         cx = (lhrandom(radius + 1, PARTICLETEXTURESIZE - 2 - radius) + lhrandom(radius + 1, PARTICLETEXTURESIZE - 2 - radius)) * 0.5f;
1819         cy = (lhrandom(radius + 1, PARTICLETEXTURESIZE - 2 - radius) + lhrandom(radius + 1, PARTICLETEXTURESIZE - 2 - radius)) * 0.5f;
1820         iradius = 1.0f / radius;
1821         alpha *= (1.0f / 255.0f);
1822         for (y = 0;y < PARTICLETEXTURESIZE;y++)
1823         {
1824                 for (x = 0;x < PARTICLETEXTURESIZE;x++)
1825                 {
1826                         dx = (x - cx);
1827                         dy = (y - cy);
1828                         f = (1.0f - sqrt(dx * dx + dy * dy) * iradius) * alpha;
1829                         if (f > 0)
1830                         {
1831                                 if (f > 1)
1832                                         f = 1;
1833                                 d = data + (y * PARTICLETEXTURESIZE + x) * 4;
1834                                 d[0] += (int)(f * (blue  - d[0]));
1835                                 d[1] += (int)(f * (green - d[1]));
1836                                 d[2] += (int)(f * (red   - d[2]));
1837                         }
1838                 }
1839         }
1840 }
1841
1842 void particletextureclamp(unsigned char *data, int minr, int ming, int minb, int maxr, int maxg, int maxb)
1843 {
1844         int i;
1845         for (i = 0;i < PARTICLETEXTURESIZE*PARTICLETEXTURESIZE;i++, data += 4)
1846         {
1847                 data[0] = bound(minb, data[0], maxb);
1848                 data[1] = bound(ming, data[1], maxg);
1849                 data[2] = bound(minr, data[2], maxr);
1850         }
1851 }
1852
1853 void particletextureinvert(unsigned char *data)
1854 {
1855         int i;
1856         for (i = 0;i < PARTICLETEXTURESIZE*PARTICLETEXTURESIZE;i++, data += 4)
1857         {
1858                 data[0] = 255 - data[0];
1859                 data[1] = 255 - data[1];
1860                 data[2] = 255 - data[2];
1861         }
1862 }
1863
1864 // Those loops are in a separate function to work around an optimization bug in Mac OS X's GCC
1865 static void R_InitBloodTextures (unsigned char *particletexturedata)
1866 {
1867         int i, j, k, m;
1868         size_t datasize = PARTICLETEXTURESIZE*PARTICLETEXTURESIZE*4;
1869         unsigned char *data = Mem_Alloc(tempmempool, datasize);
1870
1871         // blood particles
1872         for (i = 0;i < 8;i++)
1873         {
1874                 memset(data, 255, datasize);
1875                 for (k = 0;k < 24;k++)
1876                         particletextureblotch(data, PARTICLETEXTURESIZE/16, 96, 0, 0, 160);
1877                 //particletextureclamp(data, 32, 32, 32, 255, 255, 255);
1878                 particletextureinvert(data);
1879                 setuptex(tex_bloodparticle[i], data, particletexturedata);
1880         }
1881
1882         // blood decals
1883         for (i = 0;i < 8;i++)
1884         {
1885                 memset(data, 255, datasize);
1886                 m = 8;
1887                 for (j = 1;j < 10;j++)
1888                         for (k = min(j, m - 1);k < m;k++)
1889                                 particletextureblotch(data, (float)j*PARTICLETEXTURESIZE/64.0f, 96, 0, 0, 320 - j * 8);
1890                 //particletextureclamp(data, 32, 32, 32, 255, 255, 255);
1891                 particletextureinvert(data);
1892                 setuptex(tex_blooddecal[i], data, particletexturedata);
1893         }
1894
1895         Mem_Free(data);
1896 }
1897
1898 //uncomment this to make engine save out particle font to a tga file when run
1899 //#define DUMPPARTICLEFONT
1900
1901 static void R_InitParticleTexture (void)
1902 {
1903         int x, y, d, i, k, m;
1904         int basex, basey, w, h;
1905         float dx, dy, f;
1906         vec3_t light;
1907         char *buf;
1908         fs_offset_t filesize;
1909
1910         // a note: decals need to modulate (multiply) the background color to
1911         // properly darken it (stain), and they need to be able to alpha fade,
1912         // this is a very difficult challenge because it means fading to white
1913         // (no change to background) rather than black (darkening everything
1914         // behind the whole decal polygon), and to accomplish this the texture is
1915         // inverted (dark red blood on white background becomes brilliant cyan
1916         // and white on black background) so we can alpha fade it to black, then
1917         // we invert it again during the blendfunc to make it work...
1918
1919 #ifndef DUMPPARTICLEFONT
1920         decalskinframe = R_SkinFrame_LoadExternal("particles/particlefont.tga", TEXF_ALPHA | TEXF_FORCELINEAR, false);
1921         if (decalskinframe)
1922         {
1923                 particlefonttexture = decalskinframe->base;
1924                 // TODO maybe allow custom grid size?
1925                 particlefontwidth = image_width;
1926                 particlefontheight = image_height;
1927                 particlefontcellwidth = image_width / 8;
1928                 particlefontcellheight = image_height / 8;
1929                 particlefontcols = 8;
1930                 particlefontrows = 8;
1931         }
1932         else
1933 #endif
1934         {
1935                 unsigned char *particletexturedata = (unsigned char *)Mem_Alloc(tempmempool, PARTICLEFONTSIZE*PARTICLEFONTSIZE*4);
1936                 size_t datasize = PARTICLETEXTURESIZE*PARTICLETEXTURESIZE*4;
1937                 unsigned char *data = (unsigned char *)Mem_Alloc(tempmempool, datasize);
1938                 unsigned char *noise1 = (unsigned char *)Mem_Alloc(tempmempool, PARTICLETEXTURESIZE*2*PARTICLETEXTURESIZE*2);
1939                 unsigned char *noise2 = (unsigned char *)Mem_Alloc(tempmempool, PARTICLETEXTURESIZE*2*PARTICLETEXTURESIZE*2);
1940
1941                 particlefontwidth = particlefontheight = PARTICLEFONTSIZE;
1942                 particlefontcellwidth = particlefontcellheight = PARTICLETEXTURESIZE;
1943                 particlefontcols = 8;
1944                 particlefontrows = 8;
1945
1946                 memset(particletexturedata, 255, PARTICLEFONTSIZE*PARTICLEFONTSIZE*4);
1947
1948                 // smoke
1949                 for (i = 0;i < 8;i++)
1950                 {
1951                         memset(data, 255, datasize);
1952                         do
1953                         {
1954                                 fractalnoise(noise1, PARTICLETEXTURESIZE*2, PARTICLETEXTURESIZE/8);
1955                                 fractalnoise(noise2, PARTICLETEXTURESIZE*2, PARTICLETEXTURESIZE/4);
1956                                 m = 0;
1957                                 for (y = 0;y < PARTICLETEXTURESIZE;y++)
1958                                 {
1959                                         dy = (y - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
1960                                         for (x = 0;x < PARTICLETEXTURESIZE;x++)
1961                                         {
1962                                                 dx = (x - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
1963                                                 d = (noise2[y*PARTICLETEXTURESIZE*2+x] - 128) * 3 + 192;
1964                                                 if (d > 0)
1965                                                         d = (int)(d * (1-(dx*dx+dy*dy)));
1966                                                 d = (d * noise1[y*PARTICLETEXTURESIZE*2+x]) >> 7;
1967                                                 d = bound(0, d, 255);
1968                                                 data[(y*PARTICLETEXTURESIZE+x)*4+3] = (unsigned char) d;
1969                                                 if (m < d)
1970                                                         m = d;
1971                                         }
1972                                 }
1973                         }
1974                         while (m < 224);
1975                         setuptex(tex_smoke[i], data, particletexturedata);
1976                 }
1977
1978                 // rain splash
1979                 memset(data, 255, datasize);
1980                 for (y = 0;y < PARTICLETEXTURESIZE;y++)
1981                 {
1982                         dy = (y - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
1983                         for (x = 0;x < PARTICLETEXTURESIZE;x++)
1984                         {
1985                                 dx = (x - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
1986                                 f = 255.0f * (1.0 - 4.0f * fabs(10.0f - sqrt(dx*dx+dy*dy)));
1987                                 data[(y*PARTICLETEXTURESIZE+x)*4+3] = (int) (bound(0.0f, f, 255.0f));
1988                         }
1989                 }
1990                 setuptex(tex_rainsplash, data, particletexturedata);
1991
1992                 // normal particle
1993                 memset(data, 255, datasize);
1994                 for (y = 0;y < PARTICLETEXTURESIZE;y++)
1995                 {
1996                         dy = (y - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
1997                         for (x = 0;x < PARTICLETEXTURESIZE;x++)
1998                         {
1999                                 dx = (x - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
2000                                 d = (int)(256 * (1 - (dx*dx+dy*dy)));
2001                                 d = bound(0, d, 255);
2002                                 data[(y*PARTICLETEXTURESIZE+x)*4+3] = (unsigned char) d;
2003                         }
2004                 }
2005                 setuptex(tex_particle, data, particletexturedata);
2006
2007                 // rain
2008                 memset(data, 255, datasize);
2009                 light[0] = 1;light[1] = 1;light[2] = 1;
2010                 VectorNormalize(light);
2011                 for (y = 0;y < PARTICLETEXTURESIZE;y++)
2012                 {
2013                         dy = (y - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
2014                         // stretch upper half of bubble by +50% and shrink lower half by -50%
2015                         // (this gives an elongated teardrop shape)
2016                         if (dy > 0.5f)
2017                                 dy = (dy - 0.5f) * 2.0f;
2018                         else
2019                                 dy = (dy - 0.5f) / 1.5f;
2020                         for (x = 0;x < PARTICLETEXTURESIZE;x++)
2021                         {
2022                                 dx = (x - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
2023                                 // shrink bubble width to half
2024                                 dx *= 2.0f;
2025                                 data[(y*PARTICLETEXTURESIZE+x)*4+3] = shadebubble(dx, dy, light);
2026                         }
2027                 }
2028                 setuptex(tex_raindrop, data, particletexturedata);
2029
2030                 // bubble
2031                 memset(data, 255, datasize);
2032                 light[0] = 1;light[1] = 1;light[2] = 1;
2033                 VectorNormalize(light);
2034                 for (y = 0;y < PARTICLETEXTURESIZE;y++)
2035                 {
2036                         dy = (y - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
2037                         for (x = 0;x < PARTICLETEXTURESIZE;x++)
2038                         {
2039                                 dx = (x - 0.5f*PARTICLETEXTURESIZE) / (PARTICLETEXTURESIZE*0.5f-1);
2040                                 data[(y*PARTICLETEXTURESIZE+x)*4+3] = shadebubble(dx, dy, light);
2041                         }
2042                 }
2043                 setuptex(tex_bubble, data, particletexturedata);
2044
2045                 // Blood particles and blood decals
2046                 R_InitBloodTextures (particletexturedata);
2047
2048                 // bullet decals
2049                 for (i = 0;i < 8;i++)
2050                 {
2051                         memset(data, 255, datasize);
2052                         for (k = 0;k < 12;k++)
2053                                 particletextureblotch(data, PARTICLETEXTURESIZE/16, 0, 0, 0, 128);
2054                         for (k = 0;k < 3;k++)
2055                                 particletextureblotch(data, PARTICLETEXTURESIZE/2, 0, 0, 0, 160);
2056                         //particletextureclamp(data, 64, 64, 64, 255, 255, 255);
2057                         particletextureinvert(data);
2058                         setuptex(tex_bulletdecal[i], data, particletexturedata);
2059                 }
2060
2061 #ifdef DUMPPARTICLEFONT
2062                 Image_WriteTGABGRA ("particles/particlefont.tga", PARTICLEFONTSIZE, PARTICLEFONTSIZE, particletexturedata);
2063 #endif
2064
2065                 decalskinframe = R_SkinFrame_LoadInternalBGRA("particlefont", TEXF_ALPHA | TEXF_FORCELINEAR, particletexturedata, PARTICLEFONTSIZE, PARTICLEFONTSIZE);
2066                 particlefonttexture = decalskinframe->base;
2067
2068                 Mem_Free(particletexturedata);
2069                 Mem_Free(data);
2070                 Mem_Free(noise1);
2071                 Mem_Free(noise2);
2072         }
2073         for (i = 0;i < MAX_PARTICLETEXTURES;i++)
2074         {
2075                 CL_Particle_PixelCoordsForTexnum(i, &basex, &basey, &w, &h);
2076                 particletexture[i].texture = particlefonttexture;
2077                 particletexture[i].s1 = (basex + 1) / (float)particlefontwidth;
2078                 particletexture[i].t1 = (basey + 1) / (float)particlefontheight;
2079                 particletexture[i].s2 = (basex + w - 1) / (float)particlefontwidth;
2080                 particletexture[i].t2 = (basey + h - 1) / (float)particlefontheight;
2081         }
2082
2083 #ifndef DUMPPARTICLEFONT
2084         particletexture[tex_beam].texture = loadtextureimage(particletexturepool, "particles/nexbeam.tga", false, TEXF_ALPHA | TEXF_FORCELINEAR, true, r_texture_convertsRGB_particles.integer);
2085         if (!particletexture[tex_beam].texture)
2086 #endif
2087         {
2088                 unsigned char noise3[64][64], data2[64][16][4];
2089                 // nexbeam
2090                 fractalnoise(&noise3[0][0], 64, 4);
2091                 m = 0;
2092                 for (y = 0;y < 64;y++)
2093                 {
2094                         dy = (y - 0.5f*64) / (64*0.5f-1);
2095                         for (x = 0;x < 16;x++)
2096                         {
2097                                 dx = (x - 0.5f*16) / (16*0.5f-2);
2098                                 d = (int)((1 - sqrt(fabs(dx))) * noise3[y][x]);
2099                                 data2[y][x][0] = data2[y][x][1] = data2[y][x][2] = (unsigned char) bound(0, d, 255);
2100                                 data2[y][x][3] = 255;
2101                         }
2102                 }
2103
2104 #ifdef DUMPPARTICLEFONT
2105                 Image_WriteTGABGRA ("particles/nexbeam.tga", 64, 64, &data2[0][0][0]);
2106 #endif
2107                 particletexture[tex_beam].texture = R_LoadTexture2D(particletexturepool, "nexbeam", 16, 64, &data2[0][0][0], TEXTYPE_BGRA, TEXF_ALPHA | TEXF_FORCELINEAR, NULL);
2108         }
2109         particletexture[tex_beam].s1 = 0;
2110         particletexture[tex_beam].t1 = 0;
2111         particletexture[tex_beam].s2 = 1;
2112         particletexture[tex_beam].t2 = 1;
2113
2114         // now load an texcoord/texture override file
2115         buf = (char *) FS_LoadFile("particles/particlefont.txt", tempmempool, false, &filesize);
2116         if(buf)
2117         {
2118                 const char *bufptr;
2119                 bufptr = buf;
2120                 for(;;)
2121                 {
2122                         if(!COM_ParseToken_Simple(&bufptr, true, false))
2123                                 break;
2124                         if(!strcmp(com_token, "\n"))
2125                                 continue; // empty line
2126                         i = atoi(com_token) % MAX_PARTICLETEXTURES;
2127                         particletexture[i].texture = particlefonttexture;
2128
2129                         if (!COM_ParseToken_Simple(&bufptr, true, false))
2130                                 break;
2131                         if (!strcmp(com_token, "\n"))
2132                         {
2133                                 Con_Printf("particlefont file: syntax should be texnum texturename or texnum x y w h\n");
2134                                 continue;
2135                         }
2136                         particletexture[i].s1 = atof(com_token);
2137
2138                         if (!COM_ParseToken_Simple(&bufptr, true, false))
2139                                 break;
2140                         if (!strcmp(com_token, "\n"))
2141                         {
2142                                 Con_Printf("particlefont file: syntax should be texnum texturename or texnum x y w h\n");
2143                                 continue;
2144                         }
2145                         particletexture[i].t1 = atof(com_token);
2146
2147                         if (!COM_ParseToken_Simple(&bufptr, true, false))
2148                                 break;
2149                         if (!strcmp(com_token, "\n"))
2150                         {
2151                                 Con_Printf("particlefont file: syntax should be texnum texturename or texnum x y w h\n");
2152                                 continue;
2153                         }
2154                         particletexture[i].s2 = atof(com_token);
2155
2156                         if (!COM_ParseToken_Simple(&bufptr, true, false))
2157                                 break;
2158                         if (!strcmp(com_token, "\n"))
2159                         {
2160                                 Con_Printf("particlefont file: syntax should be texnum texturename or texnum x y w h\n");
2161                                 continue;
2162                         }
2163                         particletexture[i].t2 = atof(com_token);
2164                 }
2165                 Mem_Free(buf);
2166         }
2167 }
2168
2169 static void r_part_start(void)
2170 {
2171         int i;
2172         // generate particlepalette for convenience from the main one
2173         for (i = 0;i < 256;i++)
2174                 particlepalette[i] = palette_rgb[i][0] * 65536 + palette_rgb[i][1] * 256 + palette_rgb[i][2];
2175         particletexturepool = R_AllocTexturePool();
2176         R_InitParticleTexture ();
2177         CL_Particles_LoadEffectInfo();
2178 }
2179
2180 static void r_part_shutdown(void)
2181 {
2182         R_FreeTexturePool(&particletexturepool);
2183 }
2184
2185 static void r_part_newmap(void)
2186 {
2187         if (decalskinframe)
2188                 R_SkinFrame_MarkUsed(decalskinframe);
2189         CL_Particles_LoadEffectInfo();
2190 }
2191
2192 #define BATCHSIZE 256
2193 unsigned short particle_elements[BATCHSIZE*6];
2194 float particle_vertex3f[BATCHSIZE*12], particle_texcoord2f[BATCHSIZE*8], particle_color4f[BATCHSIZE*16];
2195
2196 void R_Particles_Init (void)
2197 {
2198         int i;
2199         for (i = 0;i < BATCHSIZE;i++)
2200         {
2201                 particle_elements[i*6+0] = i*4+0;
2202                 particle_elements[i*6+1] = i*4+1;
2203                 particle_elements[i*6+2] = i*4+2;
2204                 particle_elements[i*6+3] = i*4+0;
2205                 particle_elements[i*6+4] = i*4+2;
2206                 particle_elements[i*6+5] = i*4+3;
2207         }
2208
2209         Cvar_RegisterVariable(&r_drawparticles);
2210         Cvar_RegisterVariable(&r_drawparticles_drawdistance);
2211         Cvar_RegisterVariable(&r_drawdecals);
2212         Cvar_RegisterVariable(&r_drawdecals_drawdistance);
2213         R_RegisterModule("R_Particles", r_part_start, r_part_shutdown, r_part_newmap);
2214 }
2215
2216 void R_DrawDecal_TransparentCallback(const entity_render_t *ent, const rtlight_t *rtlight, int numsurfaces, int *surfacelist)
2217 {
2218         int surfacelistindex;
2219         const decal_t *d;
2220         float *v3f, *t2f, *c4f;
2221         particletexture_t *tex;
2222         float right[3], up[3], size, ca;
2223         float alphascale = (1.0f / 65536.0f) * cl_particles_alpha.value;
2224         float particle_vertex3f[BATCHSIZE*12], particle_texcoord2f[BATCHSIZE*8], particle_color4f[BATCHSIZE*16];
2225
2226         RSurf_ActiveWorldEntity();
2227
2228         r_refdef.stats.drawndecals += numsurfaces;
2229         R_Mesh_ResetTextureState();
2230         R_Mesh_VertexPointer(particle_vertex3f, 0, 0);
2231         R_Mesh_TexCoordPointer(0, 2, particle_texcoord2f, 0, 0);
2232         R_Mesh_ColorPointer(particle_color4f, 0, 0);
2233         GL_DepthMask(false);
2234         GL_DepthRange(0, 1);
2235         GL_PolygonOffset(0, 0);
2236         GL_DepthTest(true);
2237         GL_CullFace(GL_NONE);
2238
2239         // generate all the vertices at once
2240         for (surfacelistindex = 0;surfacelistindex < numsurfaces;surfacelistindex++)
2241         {
2242                 d = cl.decals + surfacelist[surfacelistindex];
2243
2244                 // calculate color
2245                 c4f = particle_color4f + 16*surfacelistindex;
2246                 ca = d->alpha * alphascale;
2247                 if (r_refdef.fogenabled)
2248                         ca *= RSurf_FogVertex(d->org);
2249                 Vector4Set(c4f, d->color[0] * ca, d->color[1] * ca, d->color[2] * ca, 1);
2250                 Vector4Copy(c4f, c4f + 4);
2251                 Vector4Copy(c4f, c4f + 8);
2252                 Vector4Copy(c4f, c4f + 12);
2253
2254                 // calculate vertex positions
2255                 size = d->size * cl_particles_size.value;
2256                 VectorVectors(d->normal, right, up);
2257                 VectorScale(right, size, right);
2258                 VectorScale(up, size, up);
2259                 v3f = particle_vertex3f + 12*surfacelistindex;
2260                 v3f[ 0] = d->org[0] - right[0] - up[0];
2261                 v3f[ 1] = d->org[1] - right[1] - up[1];
2262                 v3f[ 2] = d->org[2] - right[2] - up[2];
2263                 v3f[ 3] = d->org[0] - right[0] + up[0];
2264                 v3f[ 4] = d->org[1] - right[1] + up[1];
2265                 v3f[ 5] = d->org[2] - right[2] + up[2];
2266                 v3f[ 6] = d->org[0] + right[0] + up[0];
2267                 v3f[ 7] = d->org[1] + right[1] + up[1];
2268                 v3f[ 8] = d->org[2] + right[2] + up[2];
2269                 v3f[ 9] = d->org[0] + right[0] - up[0];
2270                 v3f[10] = d->org[1] + right[1] - up[1];
2271                 v3f[11] = d->org[2] + right[2] - up[2];
2272
2273                 // calculate texcoords
2274                 tex = &particletexture[d->texnum];
2275                 t2f = particle_texcoord2f + 8*surfacelistindex;
2276                 t2f[0] = tex->s1;t2f[1] = tex->t2;
2277                 t2f[2] = tex->s1;t2f[3] = tex->t1;
2278                 t2f[4] = tex->s2;t2f[5] = tex->t1;
2279                 t2f[6] = tex->s2;t2f[7] = tex->t2;
2280         }
2281
2282         // now render the decals all at once
2283         // (this assumes they all use one particle font texture!)
2284         GL_BlendFunc(GL_ZERO, GL_ONE_MINUS_SRC_COLOR);
2285         R_SetupShader_Generic(particletexture[63].texture, NULL, GL_MODULATE, 1);
2286         R_Mesh_Draw(0, numsurfaces * 4, 0, numsurfaces * 2, NULL, particle_elements, 0, 0);
2287 }
2288
2289 void R_DrawDecals (void)
2290 {
2291         int i;
2292         int drawdecals = r_drawdecals.integer;
2293         decal_t *decal;
2294         float frametime;
2295         float decalfade;
2296         float drawdist2;
2297         int killsequence = cl.decalsequence - max(0, cl_decals_max.integer);
2298
2299         frametime = bound(0, cl.time - cl.decals_updatetime, 1);
2300         cl.decals_updatetime = bound(cl.time - 1, cl.decals_updatetime + frametime, cl.time + 1);
2301
2302         // LordHavoc: early out conditions
2303         if (!cl.num_decals)
2304                 return;
2305
2306         decalfade = frametime * 256 / cl_decals_fadetime.value;
2307         drawdist2 = r_drawdecals_drawdistance.value * r_refdef.view.quality;
2308         drawdist2 = drawdist2*drawdist2;
2309
2310         for (i = 0, decal = cl.decals;i < cl.num_decals;i++, decal++)
2311         {
2312                 if (!decal->typeindex)
2313                         continue;
2314
2315                 if (killsequence - decal->decalsequence > 0)
2316                         goto killdecal;
2317
2318                 if (cl.time > decal->time2 + cl_decals_time.value)
2319                 {
2320                         decal->alpha -= decalfade;
2321                         if (decal->alpha <= 0)
2322                                 goto killdecal;
2323                 }
2324
2325                 if (decal->owner)
2326                 {
2327                         if (cl.entities[decal->owner].render.model == decal->ownermodel)
2328                         {
2329                                 Matrix4x4_Transform(&cl.entities[decal->owner].render.matrix, decal->relativeorigin, decal->org);
2330                                 Matrix4x4_Transform3x3(&cl.entities[decal->owner].render.matrix, decal->relativenormal, decal->normal);
2331                         }
2332                         else
2333                                 goto killdecal;
2334                 }
2335
2336                 if(cl_decals_visculling.integer && decal->clusterindex > -1000 && !CHECKPVSBIT(r_refdef.viewcache.world_pvsbits, decal->clusterindex))
2337                         continue;
2338
2339                 if (!drawdecals)
2340                         continue;
2341
2342                 if (DotProduct(r_refdef.view.origin, decal->normal) > DotProduct(decal->org, decal->normal) && VectorDistance2(decal->org, r_refdef.view.origin) < drawdist2 * (decal->size * decal->size))
2343                         R_MeshQueue_AddTransparent(decal->org, R_DrawDecal_TransparentCallback, NULL, i, NULL);
2344                 continue;
2345 killdecal:
2346                 decal->typeindex = 0;
2347                 if (cl.free_decal > i)
2348                         cl.free_decal = i;
2349         }
2350
2351         // reduce cl.num_decals if possible
2352         while (cl.num_decals > 0 && cl.decals[cl.num_decals - 1].typeindex == 0)
2353                 cl.num_decals--;
2354
2355         if (cl.num_decals == cl.max_decals && cl.max_decals < MAX_DECALS)
2356         {
2357                 decal_t *olddecals = cl.decals;
2358                 cl.max_decals = min(cl.max_decals * 2, MAX_DECALS);
2359                 cl.decals = (decal_t *) Mem_Alloc(cls.levelmempool, cl.max_decals * sizeof(decal_t));
2360                 memcpy(cl.decals, olddecals, cl.num_decals * sizeof(decal_t));
2361                 Mem_Free(olddecals);
2362         }
2363
2364         r_refdef.stats.totaldecals = cl.num_decals;
2365 }
2366
2367 void R_DrawParticle_TransparentCallback(const entity_render_t *ent, const rtlight_t *rtlight, int numsurfaces, int *surfacelist)
2368 {
2369         int surfacelistindex;
2370         int batchstart, batchcount;
2371         const particle_t *p;
2372         pblend_t blendmode;
2373         rtexture_t *texture;
2374         float *v3f, *t2f, *c4f;
2375         particletexture_t *tex;
2376         float up2[3], v[3], right[3], up[3], fog, ifog, size, len, lenfactor;
2377         float ambient[3], diffuse[3], diffusenormal[3];
2378         vec4_t colormultiplier;
2379
2380         RSurf_ActiveWorldEntity();
2381
2382         Vector4Set(colormultiplier, r_refdef.view.colorscale * (1.0 / 256.0f), r_refdef.view.colorscale * (1.0 / 256.0f), r_refdef.view.colorscale * (1.0 / 256.0f), cl_particles_alpha.value * (1.0 / 256.0f));
2383
2384         r_refdef.stats.particles += numsurfaces;
2385         R_Mesh_ResetTextureState();
2386         R_Mesh_VertexPointer(particle_vertex3f, 0, 0);
2387         R_Mesh_TexCoordPointer(0, 2, particle_texcoord2f, 0, 0);
2388         R_Mesh_ColorPointer(particle_color4f, 0, 0);
2389         GL_DepthMask(false);
2390         GL_DepthRange(0, 1);
2391         GL_PolygonOffset(0, 0);
2392         GL_DepthTest(true);
2393         GL_CullFace(GL_NONE);
2394
2395         // first generate all the vertices at once
2396         for (surfacelistindex = 0, v3f = particle_vertex3f, t2f = particle_texcoord2f, c4f = particle_color4f;surfacelistindex < numsurfaces;surfacelistindex++, v3f += 3*4, t2f += 2*4, c4f += 4*4)
2397         {
2398                 p = cl.particles + surfacelist[surfacelistindex];
2399
2400                 blendmode = p->blendmode;
2401
2402                 switch (blendmode)
2403                 {
2404                 case PBLEND_INVALID:
2405                 case PBLEND_INVMOD:
2406                         c4f[0] = p->color[0] * (1.0f / 256.0f);
2407                         c4f[1] = p->color[1] * (1.0f / 256.0f);
2408                         c4f[2] = p->color[2] * (1.0f / 256.0f);
2409                         c4f[3] = p->alpha * colormultiplier[3];
2410                         // additive and modulate can just fade out in fog (this is correct)
2411                         if (r_refdef.fogenabled)
2412                                 c4f[3] *= RSurf_FogVertex(p->org);
2413                         // collapse alpha into color for these blends (so that the particlefont does not need alpha on most textures)
2414                         c4f[0] *= c4f[3];
2415                         c4f[1] *= c4f[3];
2416                         c4f[2] *= c4f[3];
2417                         c4f[3] = 1;
2418                         break;
2419                 case PBLEND_ADD:
2420                         c4f[0] = p->color[0] * colormultiplier[0];
2421                         c4f[1] = p->color[1] * colormultiplier[1];
2422                         c4f[2] = p->color[2] * colormultiplier[2];
2423                         c4f[3] = p->alpha * colormultiplier[3];
2424                         // additive and modulate can just fade out in fog (this is correct)
2425                         if (r_refdef.fogenabled)
2426                                 c4f[3] *= RSurf_FogVertex(p->org);
2427                         // collapse alpha into color for these blends (so that the particlefont does not need alpha on most textures)
2428                         c4f[0] *= c4f[3];
2429                         c4f[1] *= c4f[3];
2430                         c4f[2] *= c4f[3];
2431                         c4f[3] = 1;
2432                         break;
2433                 case PBLEND_ALPHA:
2434                         c4f[0] = p->color[0] * colormultiplier[0];
2435                         c4f[1] = p->color[1] * colormultiplier[1];
2436                         c4f[2] = p->color[2] * colormultiplier[2];
2437                         c4f[3] = p->alpha * colormultiplier[3];
2438                         // note: lighting is not cheap!
2439                         if (particletype[p->typeindex].lighting)
2440                         {
2441                                 R_CompleteLightPoint(ambient, diffuse, diffusenormal, p->org, true);
2442                                 c4f[0] *= (ambient[0] + 0.5 * diffuse[0]);
2443                                 c4f[1] *= (ambient[1] + 0.5 * diffuse[1]);
2444                                 c4f[2] *= (ambient[2] + 0.5 * diffuse[2]);
2445                         }
2446                         // mix in the fog color
2447                         if (r_refdef.fogenabled)
2448                         {
2449                                 fog = RSurf_FogVertex(p->org);
2450                                 ifog = 1 - fog;
2451                                 c4f[0] = c4f[0] * fog + r_refdef.fogcolor[0] * ifog;
2452                                 c4f[1] = c4f[1] * fog + r_refdef.fogcolor[1] * ifog;
2453                                 c4f[2] = c4f[2] * fog + r_refdef.fogcolor[2] * ifog;
2454                         }
2455                         break;
2456                 }
2457                 // copy the color into the other three vertices
2458                 Vector4Copy(c4f, c4f + 4);
2459                 Vector4Copy(c4f, c4f + 8);
2460                 Vector4Copy(c4f, c4f + 12);
2461
2462                 size = p->size * cl_particles_size.value;
2463                 tex = &particletexture[p->texnum];
2464                 switch(p->orientation)
2465                 {
2466                 case PARTICLE_INVALID:
2467                 case PARTICLE_BILLBOARD:
2468                         VectorScale(r_refdef.view.left, -size * p->stretch, right);
2469                         VectorScale(r_refdef.view.up, size, up);
2470                         v3f[ 0] = p->org[0] - right[0] - up[0];
2471                         v3f[ 1] = p->org[1] - right[1] - up[1];
2472                         v3f[ 2] = p->org[2] - right[2] - up[2];
2473                         v3f[ 3] = p->org[0] - right[0] + up[0];
2474                         v3f[ 4] = p->org[1] - right[1] + up[1];
2475                         v3f[ 5] = p->org[2] - right[2] + up[2];
2476                         v3f[ 6] = p->org[0] + right[0] + up[0];
2477                         v3f[ 7] = p->org[1] + right[1] + up[1];
2478                         v3f[ 8] = p->org[2] + right[2] + up[2];
2479                         v3f[ 9] = p->org[0] + right[0] - up[0];
2480                         v3f[10] = p->org[1] + right[1] - up[1];
2481                         v3f[11] = p->org[2] + right[2] - up[2];
2482                         t2f[0] = tex->s1;t2f[1] = tex->t2;
2483                         t2f[2] = tex->s1;t2f[3] = tex->t1;
2484                         t2f[4] = tex->s2;t2f[5] = tex->t1;
2485                         t2f[6] = tex->s2;t2f[7] = tex->t2;
2486                         break;
2487                 case PARTICLE_ORIENTED_DOUBLESIDED:
2488                         VectorVectors(p->vel, right, up);
2489                         VectorScale(right, size * p->stretch, right);
2490                         VectorScale(up, size, up);
2491                         v3f[ 0] = p->org[0] - right[0] - up[0];
2492                         v3f[ 1] = p->org[1] - right[1] - up[1];
2493                         v3f[ 2] = p->org[2] - right[2] - up[2];
2494                         v3f[ 3] = p->org[0] - right[0] + up[0];
2495                         v3f[ 4] = p->org[1] - right[1] + up[1];
2496                         v3f[ 5] = p->org[2] - right[2] + up[2];
2497                         v3f[ 6] = p->org[0] + right[0] + up[0];
2498                         v3f[ 7] = p->org[1] + right[1] + up[1];
2499                         v3f[ 8] = p->org[2] + right[2] + up[2];
2500                         v3f[ 9] = p->org[0] + right[0] - up[0];
2501                         v3f[10] = p->org[1] + right[1] - up[1];
2502                         v3f[11] = p->org[2] + right[2] - up[2];
2503                         t2f[0] = tex->s1;t2f[1] = tex->t2;
2504                         t2f[2] = tex->s1;t2f[3] = tex->t1;
2505                         t2f[4] = tex->s2;t2f[5] = tex->t1;
2506                         t2f[6] = tex->s2;t2f[7] = tex->t2;
2507                         break;
2508                 case PARTICLE_SPARK:
2509                         len = VectorLength(p->vel);
2510                         VectorNormalize2(p->vel, up);
2511                         lenfactor = p->stretch * 0.04 * len;
2512                         if(lenfactor < size * 0.5)
2513                                 lenfactor = size * 0.5;
2514                         VectorMA(p->org, -lenfactor, up, v);
2515                         VectorMA(p->org,  lenfactor, up, up2);
2516                         R_CalcBeam_Vertex3f(v3f, v, up2, size);
2517                         t2f[0] = tex->s1;t2f[1] = tex->t2;
2518                         t2f[2] = tex->s1;t2f[3] = tex->t1;
2519                         t2f[4] = tex->s2;t2f[5] = tex->t1;
2520                         t2f[6] = tex->s2;t2f[7] = tex->t2;
2521                         break;
2522                 case PARTICLE_VBEAM:
2523                         R_CalcBeam_Vertex3f(v3f, p->org, p->vel, size);
2524                         VectorSubtract(p->vel, p->org, up);
2525                         VectorNormalize(up);
2526                         v[0] = DotProduct(p->org, up) * (1.0f / 64.0f) * p->stretch;
2527                         v[1] = DotProduct(p->vel, up) * (1.0f / 64.0f) * p->stretch;
2528                         t2f[0] = tex->s2;t2f[1] = v[0];
2529                         t2f[2] = tex->s1;t2f[3] = v[0];
2530                         t2f[4] = tex->s1;t2f[5] = v[1];
2531                         t2f[6] = tex->s2;t2f[7] = v[1];
2532                         break;
2533                 case PARTICLE_HBEAM:
2534                         R_CalcBeam_Vertex3f(v3f, p->org, p->vel, size);
2535                         VectorSubtract(p->vel, p->org, up);
2536                         VectorNormalize(up);
2537                         v[0] = DotProduct(p->org, up) * (1.0f / 64.0f) * p->stretch;
2538                         v[1] = DotProduct(p->vel, up) * (1.0f / 64.0f) * p->stretch;
2539                         t2f[0] = v[0];t2f[1] = tex->t1;
2540                         t2f[2] = v[0];t2f[3] = tex->t2;
2541                         t2f[4] = v[1];t2f[5] = tex->t2;
2542                         t2f[6] = v[1];t2f[7] = tex->t1;
2543                         break;
2544                 }
2545         }
2546
2547         // now render batches of particles based on blendmode and texture
2548         blendmode = PBLEND_INVALID;
2549         texture = NULL;
2550         batchstart = 0;
2551         batchcount = 0;
2552         for (surfacelistindex = 0;surfacelistindex < numsurfaces;)
2553         {
2554                 p = cl.particles + surfacelist[surfacelistindex];
2555
2556                 if (blendmode != p->blendmode)
2557                 {
2558                         blendmode = p->blendmode;
2559                         switch(blendmode)
2560                         {
2561                         case PBLEND_ALPHA:
2562                                 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
2563                                 break;
2564                         case PBLEND_INVALID:
2565                         case PBLEND_ADD:
2566                                 GL_BlendFunc(GL_SRC_ALPHA, GL_ONE);
2567                                 break;
2568                         case PBLEND_INVMOD:
2569                                 GL_BlendFunc(GL_ZERO, GL_ONE_MINUS_SRC_COLOR);
2570                                 break;
2571                         }
2572                 }
2573                 if (texture != particletexture[p->texnum].texture)
2574                 {
2575                         texture = particletexture[p->texnum].texture;
2576                         R_SetupShader_Generic(texture, NULL, GL_MODULATE, 1);
2577                 }
2578
2579                 // iterate until we find a change in settings
2580                 batchstart = surfacelistindex++;
2581                 for (;surfacelistindex < numsurfaces;surfacelistindex++)
2582                 {
2583                         p = cl.particles + surfacelist[surfacelistindex];
2584                         if (blendmode != p->blendmode || texture != particletexture[p->texnum].texture)
2585                                 break;
2586                 }
2587
2588                 batchcount = surfacelistindex - batchstart;
2589                 R_Mesh_Draw(batchstart * 4, batchcount * 4, batchstart * 2, batchcount * 2, NULL, particle_elements, 0, 0);
2590         }
2591 }
2592
2593 void R_DrawParticles (void)
2594 {
2595         int i, a;
2596         int drawparticles = r_drawparticles.integer;
2597         float minparticledist;
2598         particle_t *p;
2599         float gravity, frametime, f, dist, oldorg[3];
2600         float drawdist2;
2601         int hitent;
2602         trace_t trace;
2603         qboolean update;
2604
2605         frametime = bound(0, cl.time - cl.particles_updatetime, 1);
2606         cl.particles_updatetime = bound(cl.time - 1, cl.particles_updatetime + frametime, cl.time + 1);
2607
2608         // LordHavoc: early out conditions
2609         if (!cl.num_particles)
2610                 return;
2611
2612         minparticledist = DotProduct(r_refdef.view.origin, r_refdef.view.forward) + 4.0f;
2613         gravity = frametime * cl.movevars_gravity;
2614         update = frametime > 0;
2615         drawdist2 = r_drawparticles_drawdistance.value * r_refdef.view.quality;
2616         drawdist2 = drawdist2*drawdist2;
2617
2618         for (i = 0, p = cl.particles;i < cl.num_particles;i++, p++)
2619         {
2620                 if (!p->typeindex)
2621                 {
2622                         if (cl.free_particle > i)
2623                                 cl.free_particle = i;
2624                         continue;
2625                 }
2626
2627                 if (update)
2628                 {
2629                         if (p->delayedspawn > cl.time)
2630                                 continue;
2631                         p->delayedspawn = 0;
2632
2633                         p->size += p->sizeincrease * frametime;
2634                         p->alpha -= p->alphafade * frametime;
2635
2636                         if (p->alpha <= 0 || p->die <= cl.time)
2637                                 goto killparticle;
2638
2639                         if (p->orientation != PARTICLE_VBEAM && p->orientation != PARTICLE_HBEAM && frametime > 0)
2640                         {
2641                                 if (p->liquidfriction && (CL_PointSuperContents(p->org) & SUPERCONTENTS_LIQUIDSMASK))
2642                                 {
2643                                         if (p->typeindex == pt_blood)
2644                                                 p->size += frametime * 8;
2645                                         else
2646                                                 p->vel[2] -= p->gravity * gravity;
2647                                         f = 1.0f - min(p->liquidfriction * frametime, 1);
2648                                         VectorScale(p->vel, f, p->vel);
2649                                 }
2650                                 else
2651                                 {
2652                                         p->vel[2] -= p->gravity * gravity;
2653                                         if (p->airfriction)
2654                                         {
2655                                                 f = 1.0f - min(p->airfriction * frametime, 1);
2656                                                 VectorScale(p->vel, f, p->vel);
2657                                         }
2658                                 }
2659
2660                                 VectorCopy(p->org, oldorg);
2661                                 VectorMA(p->org, frametime, p->vel, p->org);
2662                                 if (p->bounce && cl.time >= p->delayedcollisions)
2663                                 {
2664                                         trace = CL_TraceLine(oldorg, p->org, MOVE_NOMONSTERS, NULL, SUPERCONTENTS_SOLID | SUPERCONTENTS_BODY | ((p->typeindex == pt_rain || p->typeindex == pt_snow) ? SUPERCONTENTS_LIQUIDSMASK : 0), true, false, &hitent, false);
2665                                         // if the trace started in or hit something of SUPERCONTENTS_NODROP
2666                                         // or if the trace hit something flagged as NOIMPACT
2667                                         // then remove the particle
2668                                         if (trace.hitq3surfaceflags & Q3SURFACEFLAG_NOIMPACT || ((trace.startsupercontents | trace.hitsupercontents) & SUPERCONTENTS_NODROP) || (trace.startsupercontents & SUPERCONTENTS_SOLID))
2669                                                 goto killparticle;
2670                                         VectorCopy(trace.endpos, p->org);
2671                                         // react if the particle hit something
2672                                         if (trace.fraction < 1)
2673                                         {
2674                                                 VectorCopy(trace.endpos, p->org);
2675
2676                                                 if (p->staintexnum >= 0)
2677                                                 {
2678                                                         // blood - splash on solid
2679                                                         if (!(trace.hitq3surfaceflags & Q3SURFACEFLAG_NOMARKS))
2680                                                         {
2681                                                                 R_Stain(p->org, 16,
2682                                                                         (p->staincolor >> 16) & 0xFF, (p->staincolor >> 8) & 0xFF, p->staincolor & 0xFF, (int)(p->alpha * p->size * (1.0f / 80.0f)),
2683                                                                         (p->staincolor >> 16) & 0xFF, (p->staincolor >> 8) & 0xFF, p->staincolor & 0xFF, (int)(p->alpha * p->size * (1.0f / 80.0f)));
2684                                                                 if (cl_decals.integer)
2685                                                                 {
2686                                                                         // create a decal for the blood splat
2687                                                                         CL_SpawnDecalParticleForSurface(hitent, p->org, trace.plane.normal, 0xFFFFFF ^ p->staincolor, 0xFFFFFF ^ p->staincolor, p->staintexnum, p->size * 2, p->alpha); // staincolor needs to be inverted for decals!
2688                                                                 }
2689                                                         }
2690                                                 }
2691
2692                                                 if (p->typeindex == pt_blood)
2693                                                 {
2694                                                         // blood - splash on solid
2695                                                         if (trace.hitq3surfaceflags & Q3SURFACEFLAG_NOMARKS)
2696                                                                 goto killparticle;
2697                                                         if(p->staintexnum == -1) // staintex < -1 means no stains at all
2698                                                         {
2699                                                                 R_Stain(p->org, 16, 64, 16, 16, (int)(p->alpha * p->size * (1.0f / 80.0f)), 64, 32, 32, (int)(p->alpha * p->size * (1.0f / 80.0f)));
2700                                                                 if (cl_decals.integer)
2701                                                                 {
2702                                                                         // create a decal for the blood splat
2703                                                                         CL_SpawnDecalParticleForSurface(hitent, p->org, trace.plane.normal, p->color[0] * 65536 + p->color[1] * 256 + p->color[2], p->color[0] * 65536 + p->color[1] * 256 + p->color[2], tex_blooddecal[rand()&7], p->size * lhrandom(cl_particles_blood_decal_scalemin.value, cl_particles_blood_decal_scalemax.value), cl_particles_blood_decal_alpha.value * 768);
2704                                                                 }
2705                                                         }
2706                                                         goto killparticle;
2707                                                 }
2708                                                 else if (p->bounce < 0)
2709                                                 {
2710                                                         // bounce -1 means remove on impact
2711                                                         goto killparticle;
2712                                                 }
2713                                                 else
2714                                                 {
2715                                                         // anything else - bounce off solid
2716                                                         dist = DotProduct(p->vel, trace.plane.normal) * -p->bounce;
2717                                                         VectorMA(p->vel, dist, trace.plane.normal, p->vel);
2718                                                         if (DotProduct(p->vel, p->vel) < 0.03)
2719                                                                 VectorClear(p->vel);
2720                                                 }
2721                                         }
2722                                 }
2723                         }
2724
2725                         if (p->typeindex != pt_static)
2726                         {
2727                                 switch (p->typeindex)
2728                                 {
2729                                 case pt_entityparticle:
2730                                         // particle that removes itself after one rendered frame
2731                                         if (p->time2)
2732                                                 goto killparticle;
2733                                         else
2734                                                 p->time2 = 1;
2735                                         break;
2736                                 case pt_blood:
2737                                         a = CL_PointSuperContents(p->org);
2738                                         if (a & (SUPERCONTENTS_SOLID | SUPERCONTENTS_LAVA | SUPERCONTENTS_NODROP))
2739                                                 goto killparticle;
2740                                         break;
2741                                 case pt_bubble:
2742                                         a = CL_PointSuperContents(p->org);
2743                                         if (!(a & (SUPERCONTENTS_WATER | SUPERCONTENTS_SLIME)))
2744                                                 goto killparticle;
2745                                         break;
2746                                 case pt_rain:
2747                                         a = CL_PointSuperContents(p->org);
2748                                         if (a & (SUPERCONTENTS_SOLID | SUPERCONTENTS_BODY | SUPERCONTENTS_LIQUIDSMASK))
2749                                                 goto killparticle;
2750                                         break;
2751                                 case pt_snow:
2752                                         if (cl.time > p->time2)
2753                                         {
2754                                                 // snow flutter
2755                                                 p->time2 = cl.time + (rand() & 3) * 0.1;
2756                                                 p->vel[0] = p->vel[0] * 0.9f + lhrandom(-32, 32);
2757                                                 p->vel[1] = p->vel[0] * 0.9f + lhrandom(-32, 32);
2758                                         }
2759                                         a = CL_PointSuperContents(p->org);
2760                                         if (a & (SUPERCONTENTS_SOLID | SUPERCONTENTS_BODY | SUPERCONTENTS_LIQUIDSMASK))
2761                                                 goto killparticle;
2762                                         break;
2763                                 default:
2764                                         break;
2765                                 }
2766                         }
2767                 }
2768                 else if (p->delayedspawn)
2769                         continue;
2770                 if (!drawparticles)
2771                         continue;
2772                 // don't render particles too close to the view (they chew fillrate)
2773                 // also don't render particles behind the view (useless)
2774                 // further checks to cull to the frustum would be too slow here
2775                 switch(p->typeindex)
2776                 {
2777                 case pt_beam:
2778                         // beams have no culling
2779                         R_MeshQueue_AddTransparent(p->org, R_DrawParticle_TransparentCallback, NULL, i, NULL);
2780                         break;
2781                 default:
2782                         if(cl_particles_visculling.integer)
2783                                 if (!r_refdef.viewcache.world_novis)
2784                                         if(r_refdef.scene.worldmodel && r_refdef.scene.worldmodel->brush.PointInLeaf)
2785                                         {
2786                                                 mleaf_t *leaf = r_refdef.scene.worldmodel->brush.PointInLeaf(r_refdef.scene.worldmodel, p->org);
2787                                                 if(leaf)
2788                                                         if(!CHECKPVSBIT(r_refdef.viewcache.world_pvsbits, leaf->clusterindex))
2789                                                                 continue;
2790                                         }
2791                         // anything else just has to be in front of the viewer and visible at this distance
2792                         if (DotProduct(p->org, r_refdef.view.forward) >= minparticledist && VectorDistance2(p->org, r_refdef.view.origin) < drawdist2 * (p->size * p->size))
2793                                 R_MeshQueue_AddTransparent(p->org, R_DrawParticle_TransparentCallback, NULL, i, NULL);
2794                         break;
2795                 }
2796
2797                 continue;
2798 killparticle:
2799                 p->typeindex = 0;
2800                 if (cl.free_particle > i)
2801                         cl.free_particle = i;
2802         }
2803
2804         // reduce cl.num_particles if possible
2805         while (cl.num_particles > 0 && cl.particles[cl.num_particles - 1].typeindex == 0)
2806                 cl.num_particles--;
2807
2808         if (cl.num_particles == cl.max_particles && cl.max_particles < MAX_PARTICLES)
2809         {
2810                 particle_t *oldparticles = cl.particles;
2811                 cl.max_particles = min(cl.max_particles * 2, MAX_PARTICLES);
2812                 cl.particles = (particle_t *) Mem_Alloc(cls.levelmempool, cl.max_particles * sizeof(particle_t));
2813                 memcpy(cl.particles, oldparticles, cl.num_particles * sizeof(particle_t));
2814                 Mem_Free(oldparticles);
2815         }
2816 }