]> de.git.xonotic.org Git - xonotic/darkplaces.git/blobdiff - cl_particles.c
changed lots of printf to Con_Printf
[xonotic/darkplaces.git] / cl_particles.c
index 12fe6194c5dd11d078e47d49afd6ac8a92936752..da745f49a33c8152e61feeeaa6d7f234c49fd46b 100644 (file)
@@ -20,32 +20,207 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
 
 #include "quakedef.h"
 
-#define MAX_PARTICLES                  16384   // default max # of particles at one time
+#ifdef WORKINGLQUAKE
+#define lhrandom(MIN,MAX) ((rand() & 32767) * (((MAX)-(MIN)) * (1.0f / 32767.0f)) + (MIN))
+#define NUMVERTEXNORMALS       162
+siextern float r_avertexnormals[NUMVERTEXNORMALS][3];
+#define m_bytenormals r_avertexnormals
+#define VectorNormalizeFast VectorNormalize
+#define Mod_PointContents(v,m) (Mod_PointInLeaf(v,m)->contents)
+typedef unsigned char qbyte;
+#define cl_stainmaps.integer 0
+void R_Stain (vec3_t origin, float radius, int cr1, int cg1, int cb1, int ca1, int cr2, int cg2, int cb2, int ca2)
+{
+}
+#define CL_EntityParticles R_EntityParticles
+#define CL_ReadPointFile_f R_ReadPointFile_f
+#define CL_ParseParticleEffect R_ParseParticleEffect
+#define CL_ParticleExplosion R_ParticleExplosion
+#define CL_ParticleExplosion2 R_ParticleExplosion2
+#define CL_BlobExplosion R_BlobExplosion
+#define CL_RunParticleEffect R_RunParticleEffect
+#define CL_LavaSplash R_LavaSplash
+#define CL_RocketTrail2 R_RocketTrail2
+void R_CalcBeamVerts (float *vert, vec3_t org1, vec3_t org2, float width)
+{
+       vec3_t right1, right2, diff, normal;
+
+       VectorSubtract (org2, org1, normal);
+       VectorNormalizeFast (normal);
+
+       // calculate 'right' vector for start
+       VectorSubtract (r_origin, org1, diff);
+       VectorNormalizeFast (diff);
+       CrossProduct (normal, diff, right1);
+
+       // calculate 'right' vector for end
+       VectorSubtract (r_origin, org2, diff);
+       VectorNormalizeFast (diff);
+       CrossProduct (normal, diff, right2);
+
+       vert[ 0] = org1[0] + width * right1[0];
+       vert[ 1] = org1[1] + width * right1[1];
+       vert[ 2] = org1[2] + width * right1[2];
+       vert[ 4] = org1[0] - width * right1[0];
+       vert[ 5] = org1[1] - width * right1[1];
+       vert[ 6] = org1[2] - width * right1[2];
+       vert[ 8] = org2[0] - width * right2[0];
+       vert[ 9] = org2[1] - width * right2[1];
+       vert[10] = org2[2] - width * right2[2];
+       vert[12] = org2[0] + width * right2[0];
+       vert[13] = org2[1] + width * right2[1];
+       vert[14] = org2[2] + width * right2[2];
+}
+void fractalnoise(qbyte *noise, int size, int startgrid)
+{
+       int x, y, g, g2, amplitude, min, max, size1 = size - 1, sizepower, gridpower;
+       int *noisebuf;
+#define n(x,y) noisebuf[((y)&size1)*size+((x)&size1)]
+
+       for (sizepower = 0;(1 << sizepower) < size;sizepower++);
+       if (size != (1 << sizepower))
+               Sys_Error("fractalnoise: size must be power of 2\n");
+
+       for (gridpower = 0;(1 << gridpower) < startgrid;gridpower++);
+       if (startgrid != (1 << gridpower))
+               Sys_Error("fractalnoise: grid must be power of 2\n");
+
+       startgrid = bound(0, startgrid, size);
+
+       amplitude = 0xFFFF; // this gets halved before use
+       noisebuf = malloc(size*size*sizeof(int));
+       memset(noisebuf, 0, size*size*sizeof(int));
+
+       for (g2 = startgrid;g2;g2 >>= 1)
+       {
+               // brownian motion (at every smaller level there is random behavior)
+               amplitude >>= 1;
+               for (y = 0;y < size;y += g2)
+                       for (x = 0;x < size;x += g2)
+                               n(x,y) += (rand()&amplitude);
+
+               g = g2 >> 1;
+               if (g)
+               {
+                       // subdivide, diamond-square algorithm (really this has little to do with squares)
+                       // diamond
+                       for (y = 0;y < size;y += g2)
+                               for (x = 0;x < size;x += g2)
+                                       n(x+g,y+g) = (n(x,y) + n(x+g2,y) + n(x,y+g2) + n(x+g2,y+g2)) >> 2;
+                       // square
+                       for (y = 0;y < size;y += g2)
+                               for (x = 0;x < size;x += g2)
+                               {
+                                       n(x+g,y) = (n(x,y) + n(x+g2,y) + n(x+g,y-g) + n(x+g,y+g)) >> 2;
+                                       n(x,y+g) = (n(x,y) + n(x,y+g2) + n(x-g,y+g) + n(x+g,y+g)) >> 2;
+                               }
+               }
+       }
+       // find range of noise values
+       min = max = 0;
+       for (y = 0;y < size;y++)
+               for (x = 0;x < size;x++)
+               {
+                       if (n(x,y) < min) min = n(x,y);
+                       if (n(x,y) > max) max = n(x,y);
+               }
+       max -= min;
+       max++;
+       // normalize noise and copy to output
+       for (y = 0;y < size;y++)
+               for (x = 0;x < size;x++)
+                       *noise++ = (qbyte) (((n(x,y) - min) * 256) / max);
+       free(noisebuf);
+#undef n
+}
+void VectorVectors(const vec3_t forward, vec3_t right, vec3_t up)
+{
+       float d;
+
+       right[0] = forward[2];
+       right[1] = -forward[0];
+       right[2] = forward[1];
+
+       d = DotProduct(forward, right);
+       right[0] -= d * forward[0];
+       right[1] -= d * forward[1];
+       right[2] -= d * forward[2];
+       VectorNormalizeFast(right);
+       CrossProduct(right, forward, up);
+}
+#if QW
+#include "pmove.h"
+extern qboolean PM_RecursiveHullCheck (hull_t *hull, int num, float p1f, float p2f, vec3_t p1, vec3_t p2, pmtrace_t *trace);
+#endif
+float CL_TraceLine (vec3_t start, vec3_t end, vec3_t impact, vec3_t normal, int contents, int hitbmodels, void **hitent)
+{
+#if QW
+       pmtrace_t trace;
+#else
+       trace_t trace;
+#endif
+       memset (&trace, 0, sizeof(trace));
+       trace.fraction = 1;
+       VectorCopy (end, trace.endpos);
+#if QW
+       PM_RecursiveHullCheck (cl.model_precache[1]->hulls, 0, 0, 1, start, end, &trace);
+#else
+       RecursiveHullCheck (cl.worldmodel->hulls, 0, 0, 1, start, end, &trace);
+#endif
+       VectorCopy(trace.endpos, impact);
+       VectorCopy(trace.plane.normal, normal);
+       return trace.fraction;
+}
+#else
+#include "cl_collision.h"
+#endif
+
+#define MAX_PARTICLES                  32768   // default max # of particles at one time
 #define ABSOLUTE_MIN_PARTICLES 512             // no fewer than this no matter what's on the command line
 
 typedef enum
 {
-       pt_static, pt_grav, pt_blob, pt_blob2, pt_bulletsmoke, pt_smoke, pt_snow, pt_rain, pt_spark, pt_bubble, pt_fade, pt_steam, pt_splash, pt_splashpuff, pt_flame, pt_blood, pt_oneframe, pt_lavasplash, pt_raindropsplash, pt_underwaterspark, pt_explosionsplash
+       pt_static, pt_rain, pt_bubble, pt_blood, pt_grow, pt_decal
 }
 ptype_t;
 
+#define PARTICLE_INVALID 0
+#define PARTICLE_BILLBOARD 1
+#define PARTICLE_SPARK 2
+#define PARTICLE_ORIENTED_DOUBLESIDED 3
+#define PARTICLE_BEAM 4
+
+#define PBLEND_ALPHA 0
+#define PBLEND_ADD 1
+#define PBLEND_MOD 2
+
 typedef struct particle_s
 {
        ptype_t         type;
+       int                     orientation;
+       int                     texnum;
+       int                     blendmode;
        vec3_t          org;
        vec3_t          vel;
-       int                     tex;
        float           die;
-       float           scale;
+       float           scalex;
+       float           scaley;
        float           alpha; // 0-255
+       float           alphafade; // how much alpha reduces per second
        float           time2; // used for various things (snow fluttering, for example)
        float           bounce; // how much bounce-back from a surface the particle hits (0 = no physics, 1 = stop and slide, 2 = keep bouncing forever, 1.5 is typical)
+       float           gravity; // how much gravity affects this particle (1.0 = normal gravity, 0.0 = none)
        vec3_t          oldorg;
        vec3_t          vel2; // used for snow fluttering (base velocity, wind for instance)
        float           friction; // how much air friction affects this object (objects with a low mass/size ratio tend to get more air friction)
        float           pressure; // if non-zero, apply pressure to other particles
-       int                     dynlight; // if set the particle will be dynamically lit (if cl_dynamicparticles is on), used for smoke and blood
-       byte            color[4];
+       qbyte           color[4];
+#ifndef WORKINGLQUAKE
+       entity_render_t *owner; // decal stuck to this entity
+       model_t         *ownermodel; // model the decal is stuck to (used to make sure the entity is still alive)
+       vec3_t          relativeorigin; // decal at this location in entity's coordinate space
+       vec3_t          relativedirection; // decal oriented this way relative to entity's coordinate space
+#endif
 }
 particle_t;
 
@@ -85,34 +260,42 @@ static int particlepalette[256] =
        0x8b0000,0xb30000,0xd70000,0xff0000,0xfff393,0xfff7c7,0xffffff,0x9f5b53
 };
 
-static int explosparkramp[8] = {0x4b0700, 0x6f0f00, 0x931f07, 0xb7330f, 0xcf632b, 0xe3974f, 0xffe7b5, 0xffffff};
-//static int explounderwatersparkramp[8] = {0x00074b, 0x000f6f, 0x071f93, 0x0f33b7, 0x2b63cf, 0x4f97e3, 0xb5e7ff, 0xffffff};
+//static int explosparkramp[8] = {0x4b0700, 0x6f0f00, 0x931f07, 0xb7330f, 0xcf632b, 0xe3974f, 0xffe7b5, 0xffffff};
 
-// these must match r_part.c's textures
+// texture numbers in particle font
 static const int tex_smoke[8] = {0, 1, 2, 3, 4, 5, 6, 7};
-static const int tex_bullethole[8] = {8, 9, 10, 11, 12, 13, 14, 15};
-static const int tex_rainsplash[16] = {16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31};
-static const int tex_particle = 32;
-static const int tex_rain = 33;
-static const int tex_bubble = 34;
-static const int tex_rocketglow = 35;
+static const int tex_rainsplash[16] = {8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23};
+static const int tex_particle = 24;
+static const int tex_raindrop = 25;
+static const int tex_bubble = 26;
+static const int tex_beam = 27;
+static const int tex_blooddecal[8] = {32, 33, 34, 35, 36, 37, 38, 39};
 
 static int                     cl_maxparticles;
 static int                     cl_numparticles;
 static particle_t      *particles;
 static particle_t      **freeparticles; // list used only in compacting particles array
-static renderparticle_t        *cl_renderparticles;
-
-static cvar_t cl_particles = {CVAR_SAVE, "cl_particles", "1"};
-static cvar_t cl_particles_size = {CVAR_SAVE, "cl_particles_size", "1"};
-static cvar_t cl_particles_bloodshowers = {CVAR_SAVE, "cl_particles_bloodshowers", "1"};
-static cvar_t cl_particles_blood = {CVAR_SAVE, "cl_particles_blood", "1"};
-static cvar_t cl_particles_smoke = {CVAR_SAVE, "cl_particles_smoke", "1"};
-static cvar_t cl_particles_sparks = {CVAR_SAVE, "cl_particles_sparks", "1"};
-static cvar_t cl_particles_bubbles = {CVAR_SAVE, "cl_particles_bubbles", "1"};
-static cvar_t cl_particles_explosions = {CVAR_SAVE, "cl_particles_explosions", "0"};
 
+cvar_t cl_particles = {CVAR_SAVE, "cl_particles", "1"};
+cvar_t cl_particles_size = {CVAR_SAVE, "cl_particles_size", "1"};
+cvar_t cl_particles_bloodshowers = {CVAR_SAVE, "cl_particles_bloodshowers", "1"};
+cvar_t cl_particles_blood = {CVAR_SAVE, "cl_particles_blood", "1"};
+cvar_t cl_particles_blood_size = {CVAR_SAVE, "cl_particles_blood_size", "8"};
+cvar_t cl_particles_blood_alpha = {CVAR_SAVE, "cl_particles_blood_alpha", "0.5"};
+cvar_t cl_particles_bulletimpacts = {CVAR_SAVE, "cl_particles_bulletimpacts", "1"};
+cvar_t cl_particles_smoke = {CVAR_SAVE, "cl_particles_smoke", "1"};
+cvar_t cl_particles_smoke_size = {CVAR_SAVE, "cl_particles_smoke_size", "7"};
+cvar_t cl_particles_smoke_alpha = {CVAR_SAVE, "cl_particles_smoke_alpha", "0.5"};
+cvar_t cl_particles_smoke_alphafade = {CVAR_SAVE, "cl_particles_smoke_alphafade", "0.55"};
+cvar_t cl_particles_sparks = {CVAR_SAVE, "cl_particles_sparks", "1"};
+cvar_t cl_particles_bubbles = {CVAR_SAVE, "cl_particles_bubbles", "1"};
+cvar_t cl_decals = {CVAR_SAVE, "cl_decals", "0"};
+cvar_t cl_decals_time = {CVAR_SAVE, "cl_decals_time", "0"};
+cvar_t cl_decals_fadetime = {CVAR_SAVE, "cl_decals_fadetime", "20"};
+
+#ifndef WORKINGLQUAKE
 static mempool_t *cl_part_mempool;
+#endif
 
 void CL_Particles_Clear(void)
 {
@@ -131,7 +314,7 @@ void CL_Particles_Init (void)
 
        i = COM_CheckParm ("-particles");
 
-       if (i)
+       if (i && i < com_argc - 1)
        {
                cl_maxparticles = (int)(atoi(com_argv[i+1]));
                if (cl_maxparticles < ABSOLUTE_MIN_PARTICLES)
@@ -146,51 +329,81 @@ void CL_Particles_Init (void)
        Cvar_RegisterVariable (&cl_particles_size);
        Cvar_RegisterVariable (&cl_particles_bloodshowers);
        Cvar_RegisterVariable (&cl_particles_blood);
+       Cvar_RegisterVariable (&cl_particles_blood_size);
+       Cvar_RegisterVariable (&cl_particles_blood_alpha);
+       Cvar_RegisterVariable (&cl_particles_bulletimpacts);
        Cvar_RegisterVariable (&cl_particles_smoke);
+       Cvar_RegisterVariable (&cl_particles_smoke_size);
+       Cvar_RegisterVariable (&cl_particles_smoke_alpha);
+       Cvar_RegisterVariable (&cl_particles_smoke_alphafade);
        Cvar_RegisterVariable (&cl_particles_sparks);
        Cvar_RegisterVariable (&cl_particles_bubbles);
-       Cvar_RegisterVariable (&cl_particles_explosions);
-
+       Cvar_RegisterVariable (&cl_decals);
+       Cvar_RegisterVariable (&cl_decals_time);
+       Cvar_RegisterVariable (&cl_decals_fadetime);
+
+#ifdef WORKINGLQUAKE
+       particles = (particle_t *) Hunk_AllocName(cl_maxparticles * sizeof(particle_t), "particles");
+       freeparticles = (void *) Hunk_AllocName(cl_maxparticles * sizeof(particle_t *), "particles");
+#else
        cl_part_mempool = Mem_AllocPool("CL_Part");
        particles = (particle_t *) Mem_Alloc(cl_part_mempool, cl_maxparticles * sizeof(particle_t));
        freeparticles = (void *) Mem_Alloc(cl_part_mempool, cl_maxparticles * sizeof(particle_t *));
+#endif
        cl_numparticles = 0;
-
-       // FIXME: r_refdef stuff should be allocated somewhere else?
-       r_refdef.particles = cl_renderparticles = Mem_Alloc(cl_part_mempool, cl_maxparticles * sizeof(renderparticle_t));
 }
 
-#define particle(ptype, pcolor, ptex, plight, pscale, palpha, ptime, pbounce, px, py, pz, pvx, pvy, pvz, ptime2, pvx2, pvy2, pvz2, pfriction, ppressure)\
+#define particle(ptype, porientation, pcolor1, pcolor2, ptex, plight, pblendmode, pscalex, pscaley, palpha, palphafade, ptime, pgravity, pbounce, px, py, pz, pvx, pvy, pvz, ptime2, pvx2, pvy2, pvz2, pfriction, ppressure)\
 {\
-       particle_t      *part;\
-       int tempcolor;\
-       if (cl_numparticles >= cl_maxparticles)\
-               return;\
-       part = &particles[cl_numparticles++];\
-       part->type = (ptype);\
-       tempcolor = (pcolor);\
-       part->color[0] = ((tempcolor) >> 16) & 0xFF;\
-       part->color[1] = ((tempcolor) >> 8) & 0xFF;\
-       part->color[2] = (tempcolor) & 0xFF;\
-       part->color[3] = 0xFF;\
-       part->tex = (ptex);\
-       part->dynlight = (plight);\
-       part->scale = (pscale);\
-       part->alpha = (palpha);\
-       part->die = cl.time + (ptime);\
-       part->bounce = (pbounce);\
-       part->org[0] = (px);\
-       part->org[1] = (py);\
-       part->org[2] = (pz);\
-       part->vel[0] = (pvx);\
-       part->vel[1] = (pvy);\
-       part->vel[2] = (pvz);\
-       part->time2 = (ptime2);\
-       part->vel2[0] = (pvx2);\
-       part->vel2[1] = (pvy2);\
-       part->vel2[2] = (pvz2);\
-       part->friction = (pfriction);\
-       part->pressure = (ppressure);\
+       if (cl_numparticles < cl_maxparticles)\
+       {\
+               particle_t      *part;\
+               int ptempcolor, ptempcolor2, pcr1, pcg1, pcb1, pcr2, pcg2, pcb2;\
+               ptempcolor = (pcolor1);\
+               ptempcolor2 = (pcolor2);\
+               pcr2 = ((ptempcolor2) >> 16) & 0xFF;\
+               pcg2 = ((ptempcolor2) >> 8) & 0xFF;\
+               pcb2 = (ptempcolor2) & 0xFF;\
+               if (ptempcolor != ptempcolor2)\
+               {\
+                       pcr1 = ((ptempcolor) >> 16) & 0xFF;\
+                       pcg1 = ((ptempcolor) >> 8) & 0xFF;\
+                       pcb1 = (ptempcolor) & 0xFF;\
+                       ptempcolor = rand() & 0xFF;\
+                       pcr2 = (((pcr2 - pcr1) * ptempcolor) >> 8) + pcr1;\
+                       pcg2 = (((pcg2 - pcg1) * ptempcolor) >> 8) + pcg1;\
+                       pcb2 = (((pcb2 - pcb1) * ptempcolor) >> 8) + pcb1;\
+               }\
+               part = &particles[cl_numparticles++];\
+               memset(part, 0, sizeof(*part));\
+               part->type = (ptype);\
+               part->color[0] = pcr2;\
+               part->color[1] = pcg2;\
+               part->color[2] = pcb2;\
+               part->color[3] = 0xFF;\
+               part->orientation = porientation;\
+               part->texnum = ptex;\
+               part->blendmode = pblendmode;\
+               part->scalex = (pscalex);\
+               part->scaley = (pscaley);\
+               part->alpha = (palpha);\
+               part->alphafade = (palphafade);\
+               part->die = cl.time + (ptime);\
+               part->gravity = (pgravity);\
+               part->bounce = (pbounce);\
+               part->org[0] = (px);\
+               part->org[1] = (py);\
+               part->org[2] = (pz);\
+               part->vel[0] = (pvx);\
+               part->vel[1] = (pvy);\
+               part->vel[2] = (pvz);\
+               part->time2 = (ptime2);\
+               part->vel2[0] = (pvx2);\
+               part->vel2[1] = (pvy2);\
+               part->vel2[2] = (pvz2);\
+               part->friction = (pfriction);\
+               part->pressure = (ppressure);\
+       }\
 }
 
 /*
@@ -229,7 +442,11 @@ void CL_EntityParticles (entity_t *ent)
                forward[1] = cp*sy;
                forward[2] = -sp;
 
-               particle(pt_oneframe, particlepalette[0x6f], tex_particle, false, 2, 255, 9999, 0, ent->render.origin[0] + m_bytenormals[i][0]*dist + forward[0]*beamlength, ent->render.origin[1] + m_bytenormals[i][1]*dist + forward[1]*beamlength, ent->render.origin[2] + m_bytenormals[i][2]*dist + forward[2]*beamlength, 0, 0, 0, 0, 0, 0, 0, 0, 0);
+#ifdef WORKINGLQUAKE
+               particle(pt_static, PARTICLE_BILLBOARD, particlepalette[0x6f], particlepalette[0x6f], tex_particle, false, PBLEND_ALPHA, 2, 2, 255, 0, 0, 0, 0, ent->origin[0] + m_bytenormals[i][0]*dist + forward[0]*beamlength, ent->origin[1] + m_bytenormals[i][1]*dist + forward[1]*beamlength, ent->origin[2] + m_bytenormals[i][2]*dist + forward[2]*beamlength, 0, 0, 0, 0, 0, 0, 0, 0, 0);
+#else
+               particle(pt_static, PARTICLE_BILLBOARD, particlepalette[0x6f], particlepalette[0x6f], tex_particle, false, PBLEND_ALPHA, 2, 2, 255, 0, 0, 0, 0, ent->render.origin[0] + m_bytenormals[i][0]*dist + forward[0]*beamlength, ent->render.origin[1] + m_bytenormals[i][1]*dist + forward[1]*beamlength, ent->render.origin[2] + m_bytenormals[i][2]*dist + forward[2]*beamlength, 0, 0, 0, 0, 0, 0, 0, 0, 0);
+#endif
        }
 }
 
@@ -238,16 +455,33 @@ void CL_ReadPointFile_f (void)
 {
        vec3_t  org;
        int             r, c;
-       char    *pointfile, *pointfilepos, *t, tchar;
+       char    *pointfile = NULL, *pointfilepos, *t, tchar;
+#if WORKINGLQUAKE
+       char    name[MAX_OSPATH];
 
-       pointfile = COM_LoadFile(va("maps/%s.pts", sv.name), true);
+       sprintf (name,"maps/%s.pts", cl.worldmodel->name);
+       COM_FOpenFile (name, &f);
+       if (f)
+       {
+               int pointfilelength;
+               fseek(f, 0, SEEK_END);
+               pointfilelength = ftell(f);
+               fseek(f, 0, SEEK_SET);
+               pointfile = malloc(pointfilelength + 1);
+               fread(pointfile, 1, pointfilelength, f);
+               pointfile[pointfilelength] = 0;
+               fclose(f);
+       }
+#else
+       pointfile = COM_LoadFile(va("maps/%s.pts", cl.worldmodel->name), true);
+#endif
        if (!pointfile)
        {
-               Con_Printf ("couldn't open %s.pts\n", sv.name);
+               Con_Printf ("couldn't open %s.pts\n", cl.worldmodel->name);
                return;
        }
 
-       Con_Printf ("Reading %s.pts...\n", sv.name);
+       Con_Printf ("Reading %s.pts...\n", cl.worldmodel->name);
        c = 0;
        pointfilepos = pointfile;
        while (*pointfilepos)
@@ -273,10 +507,14 @@ void CL_ReadPointFile_f (void)
                        Con_Printf ("Not enough free particles\n");
                        break;
                }
-               particle(pt_static, particlepalette[(-c)&15], tex_particle, false, 2, 255, 99999, 0, org[0], org[1], org[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+               particle(pt_static, PARTICLE_BILLBOARD, particlepalette[(-c)&15], particlepalette[(-c)&15], tex_particle, false, PBLEND_ALPHA, 2, 2, 255, 0, 99999, 0, 0, org[0], org[1], org[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
        }
 
+#ifdef WORKINGLQUAKE
+       free(pointfile);
+#else
        Mem_Free(pointfile);
+#endif
        Con_Printf ("%i points read\n", c);
 }
 
@@ -289,8 +527,8 @@ Parse an effect out of the server message
 */
 void CL_ParseParticleEffect (void)
 {
-       vec3_t          org, dir;
-       int                     i, count, msgcount, color;
+       vec3_t org, dir;
+       int i, count, msgcount, color;
 
        for (i=0 ; i<3 ; i++)
                org[i] = MSG_ReadCoord ();
@@ -313,79 +551,65 @@ CL_ParticleExplosion
 
 ===============
 */
-void CL_ParticleExplosion (vec3_t org, int smoke)
+void CL_ParticleExplosion (vec3_t org)
 {
-       int i, j;
-       float f;
-       vec3_t v, end, ang;
-       byte noise1[32*32], noise2[32*32];
-
-       if (cl_particles.integer && cl_particles_explosions.integer)
+       int i, k;
+       //vec3_t v;
+       //vec3_t v2;
+       if (cl_stainmaps.integer)
+               R_Stain(org, 96, 80, 80, 80, 64, 176, 176, 176, 64);
+
+       i = Mod_PointContents(org, cl.worldmodel);
+       if ((i == CONTENTS_SLIME || i == CONTENTS_WATER) && cl_particles.integer && cl_particles_bubbles.integer)
        {
-               i = Mod_PointInLeaf(org, cl.worldmodel)->contents;
-               if (i == CONTENTS_SLIME || i == CONTENTS_WATER)
+               for (i = 0;i < 128;i++)
                {
-                       for (i = 0;i < 128;i++)
-                               particle(pt_bubble, 0xFFFFFF, tex_bubble, false, lhrandom(1, 2), 255, 9999, 1.5, org[0] + lhrandom(-16, 16), org[1] + lhrandom(-16, 16), org[2] + lhrandom(-16, 16), lhrandom(-96, 96), lhrandom(-96, 96), lhrandom(-96, 96), 0, 0, 0, 0, 0, 0);
-
-                       ang[2] = lhrandom(0, 360);
-                       fractalnoise(noise1, 32, 4);
-                       fractalnoise(noise2, 32, 8);
-                       for (i = 0;i < 32;i++)
-                       {
-                               for (j = 0;j < 32;j++)
-                               {
-                                       VectorRandom(v);
-                                       VectorMA(org, 16, v, v);
-                                       TraceLine(org, v, end, NULL, 0);
-                                       ang[0] = (j + 0.5f) * (360.0f / 32.0f);
-                                       ang[1] = (i + 0.5f) * (360.0f / 32.0f);
-                                       AngleVectors(ang, v, NULL, NULL);
-                                       f = noise1[j*32+i] * 1.5f;
-                                       VectorScale(v, f, v);
-                                       particle(pt_underwaterspark, noise2[j*32+i] * 0x010101, tex_smoke[rand()&7], false, 10, lhrandom(128, 255), 9999, 1.5, end[0], end[1], end[2], v[0], v[1], v[2], 512.0f, 0, 0, 0, 2, 0);
-                                       VectorScale(v, 0.75, v);
-                                       particle(pt_underwaterspark, explosparkramp[(noise2[j*32+i] >> 5)], tex_particle, false, 10, lhrandom(128, 255), 9999, 1.5, end[0], end[1], end[2], v[0], v[1], v[2], 512.0f, 0, 0, 0, 2, 0);
-                               }
-                       }
+                       particle(pt_bubble, PARTICLE_BILLBOARD, 0x404040, 0x808080, tex_bubble, false, PBLEND_ADD, 2, 2, lhrandom(128, 255), 256, 9999, -0.25, 1.5, org[0] + lhrandom(-16, 16), org[1] + lhrandom(-16, 16), org[2] + lhrandom(-16, 16), lhrandom(-96, 96), lhrandom(-96, 96), lhrandom(-96, 96), 0, 0, 0, 0, (1.0 / 16.0), 0);
                }
-               else
+       }
+       else
+       {
+               /*
+               // LordHavoc: smoke effect similar to UT2003, chews fillrate too badly up close
+               // smoke puff
+               if (cl_particles_smoke.integer)
                {
-                       ang[2] = lhrandom(0, 360);
-                       fractalnoise(noise1, 32, 4);
-                       fractalnoise(noise2, 32, 8);
-                       for (i = 0;i < 32;i++)
+                       for (i = 0;i < 64;i++)
                        {
-                               for (j = 0;j < 32;j++)
+#ifdef WORKINGLQUAKE
+                               v2[0] = lhrandom(-64, 64);
+                               v2[1] = lhrandom(-64, 64);
+                               v2[2] = lhrandom(-8, 24);
+#else
+                               for (k = 0;k < 16;k++)
                                {
-                                       VectorRandom(v);
-                                       VectorMA(org, 16, v, v);
-                                       TraceLine(org, v, end, NULL, 0);
-                                       ang[0] = (j + 0.5f) * (360.0f / 32.0f);
-                                       ang[1] = (i + 0.5f) * (360.0f / 32.0f);
-                                       AngleVectors(ang, v, NULL, NULL);
-                                       f = noise1[j*32+i] * 1.5f;
-                                       VectorScale(v, f, v);
-                                       particle(pt_spark, noise2[j*32+i] * 0x010101, tex_smoke[random()&7], false, 10, lhrandom(128, 255), 9999, 1.5, end[0], end[1], end[2], v[0], v[1], v[2] + 160.0f, 512.0f, 0, 0, 0, 2, 0);
-                                       VectorScale(v, 0.75, v);
-                                       particle(pt_spark, explosparkramp[(noise2[j*32+i] >> 5)], tex_particle, false, 10, lhrandom(128, 255), 9999, 1.5, end[0], end[1], end[2], v[0], v[1], v[2] + 160.0f, 512.0f, 0, 0, 0, 2, 0);
-                               //      VectorRandom(v);
-                               //      VectorScale(v, 384, v);
-                               //      particle(pt_spark, explosparkramp[rand()&7], tex_particle, false, 2, lhrandom(16, 255), 9999, 1.5, end[0], end[1], end[2], v[0], v[1], v[2] + 160.0f, 512.0f, 0, 0, 0, 2, 0);
+                                       v[0] = org[0] + lhrandom(-64, 64);
+                                       v[1] = org[1] + lhrandom(-64, 64);
+                                       v[2] = org[2] + lhrandom(-8, 24);
+                                       if (CL_TraceLine(org, v, v2, NULL, 0, true, NULL) >= 0.1)
+                                               break;
                                }
+                               VectorSubtract(v2, org, v2);
+#endif
+                               VectorScale(v2, 2.0f, v2);
+                               particle(pt_static, PARTICLE_BILLBOARD, 0x101010, 0x202020, tex_smoke[rand()&7], true, PBLEND_ADD, 12, 12, 255, 512, 9999, 0, 0, org[0], org[1], org[2], v2[0], v2[1], v2[2], 0, 0, 0, 0, 0, 0);
                        }
                }
-       }
-       else
-       {
-               R_NewExplosion(org);
+               */
 
-               for (i = 0;i < 256;i++)
+               if (cl_particles_sparks.integer)
                {
-                       VectorRandom(v);
-                       particle(pt_spark, explosparkramp[rand()&7], tex_particle, false, 2, lhrandom(16, 255), 9999, 1.5, end[0], end[1], end[2], v[0] * 384.0f, v[1] * 384.0f, v[2] * 384.0f + 160.0f, 512.0f, 0, 0, 0, 2, 0);
+                       // sparks
+                       for (i = 0;i < 256;i++)
+                       {
+                               k = particlepalette[0x68 + (rand() & 7)];
+                               particle(pt_static, PARTICLE_SPARK, k, k, tex_particle, false, PBLEND_ADD, 1.5f, 0.05f, lhrandom(0, 255), 512, 9999, 1, 0, org[0], org[1], org[2], lhrandom(-192, 192), lhrandom(-192, 192), lhrandom(-192, 192) + 160, 0, 0, 0, 0, 0, 0);
+                       }
                }
        }
+
+       if (cl_explosions.integer)
+               R_NewExplosion(org);
 }
 
 /*
@@ -396,11 +620,14 @@ CL_ParticleExplosion2
 */
 void CL_ParticleExplosion2 (vec3_t org, int colorStart, int colorLength)
 {
-       int                     i;
+       int i, k;
        if (!cl_particles.integer) return;
 
        for (i = 0;i < 512;i++)
-               particle(pt_fade, particlepalette[colorStart + (i % colorLength)], tex_particle, false, 1.5, 255, 0.3, 0, org[0] + lhrandom(-8, 8), org[1] + lhrandom(-8, 8), org[2] + lhrandom(-8, 8), lhrandom(-192, 192), lhrandom(-192, 192), lhrandom(-192, 192), 0, 0, 0, 0, 0.1f, 0);
+       {
+               k = particlepalette[colorStart + (i % colorLength)];
+               particle(pt_static, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ALPHA, 1.5, 1.5, 255, 384, 0.3, 0, 0, org[0] + lhrandom(-8, 8), org[1] + lhrandom(-8, 8), org[2] + lhrandom(-8, 8), lhrandom(-192, 192), lhrandom(-192, 192), lhrandom(-192, 192), 0, 0, 0, 0, 1, 0);
+       }
 }
 
 /*
@@ -411,13 +638,11 @@ CL_BlobExplosion
 */
 void CL_BlobExplosion (vec3_t org)
 {
-       int                     i;
-       if (!cl_particles.integer) return;
+       if (cl_stainmaps.integer)
+               R_Stain(org, 96, 80, 80, 80, 64, 176, 176, 176, 64);
 
-       for (i = 0;i < 256;i++)
-               particle(pt_blob , particlepalette[ 66+(rand()%6)], tex_particle, false, 4, 255, 9999, 0, org[0] + lhrandom(-16, 16), org[1] + lhrandom(-16, 16), org[2] + lhrandom(-16, 16), lhrandom(-4, 4), lhrandom(-4, 4), lhrandom(-128, 128), 0, 0, 0, 0, 0, 0);
-       for (i = 0;i < 256;i++)
-               particle(pt_blob2, particlepalette[150+(rand()%6)], tex_particle, false, 4, 255, 9999, 0, org[0] + lhrandom(-16, 16), org[1] + lhrandom(-16, 16), org[2] + lhrandom(-16, 16), lhrandom(-4, 4), lhrandom(-4, 4), lhrandom(-128, 128), 0, 0, 0, 0, 0, 0);
+       if (cl_explosions.integer)
+               R_NewExplosion(org);
 }
 
 /*
@@ -428,15 +653,19 @@ CL_RunParticleEffect
 */
 void CL_RunParticleEffect (vec3_t org, vec3_t dir, int color, int count)
 {
-       if (!cl_particles.integer) return;
+       int k;
 
        if (count == 1024)
        {
-               CL_ParticleExplosion(org, false);
+               CL_ParticleExplosion(org);
                return;
        }
+       if (!cl_particles.integer) return;
        while (count--)
-               particle(pt_fade, particlepalette[color + (rand()&7)], tex_particle, false, 1, 128, 9999, 0, org[0] + lhrandom(-8, 8), org[1] + lhrandom(-8, 8), org[2] + lhrandom(-8, 8), lhrandom(-15, 15), lhrandom(-15, 15), lhrandom(-15, 15), 0, 0, 0, 0, 0, 0);
+       {
+               k = particlepalette[color + (rand()&7)];
+               particle(pt_static, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ALPHA, 1, 1, 255, 512, 9999, 0, 0, org[0] + lhrandom(-8, 8), org[1] + lhrandom(-8, 8), org[2] + lhrandom(-8, 8), lhrandom(-15, 15), lhrandom(-15, 15), lhrandom(-15, 15), 0, 0, 0, 0, 0, 0);
+       }
 }
 
 // LordHavoc: added this for spawning sparks/dust (which have strong gravity)
@@ -447,41 +676,69 @@ CL_SparkShower
 */
 void CL_SparkShower (vec3_t org, vec3_t dir, int count)
 {
+       int k;
        if (!cl_particles.integer) return;
 
-       CL_Decal(org, tex_bullethole[rand()&7], 16 * cl_particles_size.value, 0, 0, 0, 1);
-
-       // smoke puff
-       if (cl_particles_smoke.integer)
-               particle(pt_bulletsmoke, 0xA0A0A0, tex_smoke[rand()&7], true, 5, 255, 9999, 0, org[0], org[1], org[2], lhrandom(-8, 8), lhrandom(-8, 8), lhrandom(0, 16), 0, 0, 0, 0, 0, 0);
+       if (cl_stainmaps.integer)
+               R_Stain(org, 32, 96, 96, 96, 24, 128, 128, 128, 24);
 
-       if (cl_particles_sparks.integer)
+       if (cl_particles_bulletimpacts.integer)
        {
-               // sparks
-               while(count--)
-                       particle(pt_spark, particlepalette[0x68 + (rand() & 7)], tex_particle, false, 1, lhrandom(0, 255), 9999, 1.5, org[0], org[1], org[2], lhrandom(-64, 64), lhrandom(-64, 64), lhrandom(0, 128), 512.0f, 0, 0, 0, 0.2f, 0);
+               // smoke puff
+               if (cl_particles_smoke.integer)
+               {
+                       k = count / 4;
+                       while(k--)
+                       {
+                               particle(pt_grow, PARTICLE_BILLBOARD, 0x101010, 0x202020, tex_smoke[rand()&7], true, PBLEND_ADD, 3, 3, 255, 1024, 9999, -0.2, 0, org[0] + 0.125f * lhrandom(-count, count), org[1] + 0.125f * lhrandom (-count, count), org[2] + 0.125f * lhrandom(-count, count), lhrandom(-8, 8), lhrandom(-8, 8), lhrandom(0, 16), 15, 0, 0, 0, 0, 0);
+                       }
+               }
+
+               if (cl_particles_sparks.integer)
+               {
+                       // sparks
+                       while(count--)
+                       {
+                               k = particlepalette[0x68 + (rand() & 7)];
+                               particle(pt_static, PARTICLE_SPARK, k, k, tex_particle, false, PBLEND_ADD, 0.4f, 0.015f, lhrandom(64, 255), 512, 9999, 1, 0, org[0], org[1], org[2], lhrandom(-64, 64) + dir[0], lhrandom(-64, 64) + dir[1], lhrandom(0, 128) + dir[2], 0, 0, 0, 0, 0, 0);
+                       }
+               }
        }
 }
 
+void CL_PlasmaBurn (vec3_t org)
+{
+       if (cl_stainmaps.integer)
+               R_Stain(org, 48, 96, 96, 96, 32, 128, 128, 128, 32);
+}
+
+static float bloodcount = 0;
 void CL_BloodPuff (vec3_t org, vec3_t vel, int count)
 {
+       float s, r, a;
        // bloodcount is used to accumulate counts too small to cause a blood particle
-       static int bloodcount = 0;
        if (!cl_particles.integer) return;
        if (!cl_particles_blood.integer) return;
 
-       if (count > 100)
-               count = 100;
+       s = count + 32.0f;
+       count *= 5.0f;
+       if (count > 1000)
+               count = 1000;
        bloodcount += count;
-       while(bloodcount >= 10)
+       r = cl_particles_blood_size.value;
+       a = cl_particles_blood_alpha.value * 255;
+       while(bloodcount > 0)
        {
-               particle(pt_blood, 0x300000, tex_smoke[rand()&7], true, 24, 255, 9999, -1, org[0], org[1], org[2], vel[0] + lhrandom(-64, 64), vel[1] + lhrandom(-64, 64), vel[2] + lhrandom(-64, 64), 0, 0, 0, 0, 1.0f, 0);
-               bloodcount -= 10;
+               particle(pt_blood, PARTICLE_BILLBOARD, 0xFFFFFF, 0xFFFFFF, tex_blooddecal[rand()&7], true, PBLEND_MOD, r, r, a * 3, a * 1.5, 9999, 0, -1, org[0], org[1], org[2], vel[0] + lhrandom(-s, s), vel[1] + lhrandom(-s, s), vel[2] + lhrandom(-s, s), 0, 0, 0, 0, 1, 0);
+               //particle(pt_blood, PARTICLE_BILLBOARD, 0x000000, 0x200000, tex_smoke[rand()&7], true, PBLEND_ALPHA, r, r, a, a * 0.5, 9999, 0, -1, org[0], org[1], org[2], vel[0] + lhrandom(-s, s), vel[1] + lhrandom(-s, s), vel[2] + lhrandom(-s, s), 0, 0, 0, 0, 1, 0);
+               bloodcount -= r;
        }
 }
 
 void CL_BloodShower (vec3_t mins, vec3_t maxs, float velspeed, int count)
 {
+       float r;
+       float a;
        vec3_t diff, center, velscale;
        if (!cl_particles.integer) return;
        if (!cl_particles_bloodshowers.integer) return;
@@ -496,7 +753,10 @@ void CL_BloodShower (vec3_t mins, vec3_t maxs, float velspeed, int count)
        velscale[1] = velspeed * 2.0 / diff[1];
        velscale[2] = velspeed * 2.0 / diff[2];
 
-       while (count--)
+       bloodcount += count * 5.0f;
+       r = cl_particles_blood_size.value;
+       a = cl_particles_blood_alpha.value * 255;
+       while (bloodcount > 0)
        {
                vec3_t org, vel;
                org[0] = lhrandom(mins[0], maxs[0]);
@@ -505,26 +765,32 @@ void CL_BloodShower (vec3_t mins, vec3_t maxs, float velspeed, int count)
                vel[0] = (org[0] - center[0]) * velscale[0];
                vel[1] = (org[1] - center[1]) * velscale[1];
                vel[2] = (org[2] - center[2]) * velscale[2];
-               particle(pt_blood, 0x300000, tex_smoke[rand()&7], true, 24, 255, 9999, -1, org[0], org[1], org[2], vel[0], vel[1], vel[2], 0, 0, 0, 0, 1.0f, 0);
+               bloodcount -= r;
+               particle(pt_blood, PARTICLE_BILLBOARD, 0xFFFFFF, 0xFFFFFF, tex_blooddecal[rand()&7], true, PBLEND_MOD, r, r, a * 3, a * 1.5, 9999, 0, -1, org[0], org[1], org[2], vel[0], vel[1], vel[2], 0, 0, 0, 0, 1, 0);
+               //particle(pt_blood, PARTICLE_BILLBOARD, 0x000000, 0x200000, tex_smoke[rand()&7], true, PBLEND_ALPHA, r, r, a, a * 0.5, 9999, 0, -1, org[0], org[1], org[2], vel[0], vel[1], vel[2], 0, 0, 0, 0, 1, 0);
        }
 }
 
 void CL_ParticleCube (vec3_t mins, vec3_t maxs, vec3_t dir, int count, int colorbase, int gravity, int randomvel)
 {
-       float           t;
+       int k;
+       float t;
        if (!cl_particles.integer) return;
        if (maxs[0] <= mins[0]) {t = mins[0];mins[0] = maxs[0];maxs[0] = t;}
        if (maxs[1] <= mins[1]) {t = mins[1];mins[1] = maxs[1];maxs[1] = t;}
        if (maxs[2] <= mins[2]) {t = mins[2];mins[2] = maxs[2];maxs[2] = t;}
 
        while (count--)
-               particle(gravity ? pt_grav : pt_static, particlepalette[colorbase + (rand()&3)], tex_particle, false, 2, 255, lhrandom(1, 2), 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(mins[2], maxs[2]), dir[0] + lhrandom(-randomvel, randomvel), dir[1] + lhrandom(-randomvel, randomvel), dir[2] + lhrandom(-randomvel, randomvel), 0, 0, 0, 0, 0, 0);
+       {
+               k = particlepalette[colorbase + (rand()&3)];
+               particle(pt_static, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ALPHA, 2, 2, 255, 0, lhrandom(1, 2), gravity ? 1 : 0, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(mins[2], maxs[2]), dir[0] + lhrandom(-randomvel, randomvel), dir[1] + lhrandom(-randomvel, randomvel), dir[2] + lhrandom(-randomvel, randomvel), 0, 0, 0, 0, 0, 0);
+       }
 }
 
 void CL_ParticleRain (vec3_t mins, vec3_t maxs, vec3_t dir, int count, int colorbase, int type)
 {
-       vec3_t          vel;
-       float           t, z;
+       int k;
+       float t, z, minz, maxz;
        if (!cl_particles.integer) return;
        if (maxs[0] <= mins[0]) {t = mins[0];mins[0] = maxs[0];maxs[0] = t;}
        if (maxs[1] <= mins[1]) {t = mins[1];mins[1] = maxs[1];maxs[1] = t;}
@@ -542,24 +808,27 @@ void CL_ParticleRain (vec3_t mins, vec3_t maxs, vec3_t dir, int count, int color
        if (t < 0 || t > 2) // sanity check
                t = 2;
 
+       minz = z - fabs(dir[2]) * 0.1;
+       maxz = z + fabs(dir[2]) * 0.1;
+       minz = bound(mins[2], minz, maxs[2]);
+       maxz = bound(mins[2], maxz, maxs[2]);
+
        switch(type)
        {
        case 0:
+               count *= 4; // ick, this should be in the mod or maps?
+
                while(count--)
                {
-                       vel[0] = dir[0] + lhrandom(-16, 16);
-                       vel[1] = dir[1] + lhrandom(-16, 16);
-                       vel[2] = dir[2] + lhrandom(-32, 32);
-                       particle(pt_rain, particlepalette[colorbase + (rand()&3)], tex_rain, true, 3, 255, t, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), z, vel[0], vel[1], vel[2], 0, vel[0], vel[1], vel[2], 0, 0);
+                       k = particlepalette[colorbase + (rand()&3)];
+                       particle(pt_rain, PARTICLE_SPARK, k, k, tex_particle, true, PBLEND_ADD, 0.5, 0.02, lhrandom(8, 16), 0, t, 0, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(minz, maxz), dir[0], dir[1], dir[2], cl.time + 9999, dir[0], dir[1], dir[2], 0, 0);
                }
                break;
        case 1:
                while(count--)
                {
-                       vel[0] = dir[0] + lhrandom(-16, 16);
-                       vel[1] = dir[1] + lhrandom(-16, 16);
-                       vel[2] = dir[2] + lhrandom(-32, 32);
-                       particle(pt_snow, particlepalette[colorbase + (rand()&3)], tex_particle, false, 2, 255, t, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), z, vel[0], vel[1], vel[2], 0, vel[0], vel[1], vel[2], 0, 0);
+                       k = particlepalette[colorbase + (rand()&3)];
+                       particle(pt_rain, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ADD, 1, 1, lhrandom(64, 128), 0, t, 0, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(minz, maxz), dir[0], dir[1], dir[2], 0, dir[0], dir[1], dir[2], 0, 0);
                }
                break;
        default:
@@ -567,24 +836,63 @@ void CL_ParticleRain (vec3_t mins, vec3_t maxs, vec3_t dir, int count, int color
        }
 }
 
+void CL_Stardust (vec3_t mins, vec3_t maxs, int count)
+{
+       int k;
+       float t;
+       vec3_t o, v, center;
+       if (!cl_particles.integer) return;
+
+       if (maxs[0] <= mins[0]) {t = mins[0];mins[0] = maxs[0];maxs[0] = t;}
+       if (maxs[1] <= mins[1]) {t = mins[1];mins[1] = maxs[1];maxs[1] = t;}
+       if (maxs[2] <= mins[2]) {t = mins[2];mins[2] = maxs[2];maxs[2] = t;}
+
+       center[0] = (mins[0] + maxs[0]) * 0.5f;
+       center[1] = (mins[1] + maxs[1]) * 0.5f;
+       center[2] = (mins[2] + maxs[2]) * 0.5f;
+
+       while (count--)
+       {
+               k = particlepalette[224 + (rand()&15)];
+               o[0] = lhrandom(mins[0], maxs[0]);
+               o[1] = lhrandom(mins[1], maxs[1]);
+               o[2] = lhrandom(mins[2], maxs[2]);
+               VectorSubtract(o, center, v);
+               VectorNormalizeFast(v);
+               VectorScale(v, 100, v);
+               v[2] += sv_gravity.value * 0.15f;
+               particle(pt_static, PARTICLE_BILLBOARD, 0x903010, 0xFFD030, tex_particle, false, PBLEND_ADD, 1.5, 1.5, lhrandom(64, 128), 128, 9999, 1, 0, o[0], o[1], o[2], v[0], v[1], v[2], 0, 0, 0, 0, 0, 0);
+       }
+}
+
 void CL_FlameCube (vec3_t mins, vec3_t maxs, int count)
 {
-       float           t;
+       int k;
+       float t;
        if (!cl_particles.integer) return;
        if (maxs[0] <= mins[0]) {t = mins[0];mins[0] = maxs[0];maxs[0] = t;}
        if (maxs[1] <= mins[1]) {t = mins[1];mins[1] = maxs[1];maxs[1] = t;}
        if (maxs[2] <= mins[2]) {t = mins[2];mins[2] = maxs[2];maxs[2] = t;}
 
        while (count--)
-               particle(pt_flame, particlepalette[224 + (rand()&15)], tex_particle, false, 8, 255, 9999, 1.1, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(mins[2], maxs[2]), lhrandom(-32, 32), lhrandom(-32, 32), lhrandom(-32, 64), 0, 0, 0, 0, 0.1f, 0);
+       {
+               k = particlepalette[224 + (rand()&15)];
+               particle(pt_static, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ADD, 4, 4, lhrandom(64, 128), 384, 9999, -1, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(mins[2], maxs[2]), lhrandom(-32, 32), lhrandom(-32, 32), lhrandom(0, 64), 0, 0, 0, 0, 1, 0);
+               if (count & 1)
+                       particle(pt_static, PARTICLE_BILLBOARD, 0x303030, 0x606060, tex_smoke[rand()&7], false, PBLEND_ADD, 6, 6, lhrandom(48, 96), 64, 9999, 0, 0, lhrandom(mins[0], maxs[0]), lhrandom(mins[1], maxs[1]), lhrandom(mins[2], maxs[2]), lhrandom(-8, 8), lhrandom(-8, 8), lhrandom(0, 32), 0, 0, 0, 0, 0, 0);
+       }
 }
 
 void CL_Flames (vec3_t org, vec3_t vel, int count)
 {
+       int k;
        if (!cl_particles.integer) return;
 
        while (count--)
-               particle(pt_flame, particlepalette[224 + (rand()&15)], tex_particle, false, 8, 255, 9999, 1.1, org[0], org[1], org[2], vel[0] + lhrandom(-128, 128), vel[1] + lhrandom(-128, 128), vel[2] + lhrandom(-128, 128), 0, 0, 0, 0, 0.1f, 0);
+       {
+               k = particlepalette[224 + (rand()&15)];
+               particle(pt_static, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ADD, 4, 4, lhrandom(64, 128), 384, 9999, -1, 1.1, org[0], org[1], org[2], vel[0] + lhrandom(-128, 128), vel[1] + lhrandom(-128, 128), vel[2] + lhrandom(-128, 128), 0, 0, 0, 0, 1, 0);
+       }
 }
 
 
@@ -597,7 +905,7 @@ CL_LavaSplash
 */
 void CL_LavaSplash (vec3_t origin)
 {
-       int                     i, j;
+       int                     i, j, k;
        float           vel;
        vec3_t          dir, org;
        if (!cl_particles.integer) return;
@@ -613,7 +921,8 @@ void CL_LavaSplash (vec3_t origin)
                        org[1] = origin[1] + dir[1];
                        org[2] = origin[2] + lhrandom(0, 64);
                        vel = lhrandom(50, 120) / VectorLength(dir); // normalize and scale
-                       particle(pt_lavasplash, particlepalette[224 + (rand()&7)], tex_particle, false, 7, 255, 9999, 0, org[0], org[1], org[2], dir[0] * vel, dir[1] * vel, dir[2] * vel, 0, 0, 0, 0, 0, 0);
+                       k = particlepalette[224 + (rand()&7)];
+                       particle(pt_static, PARTICLE_BILLBOARD, k, k, tex_particle, false, PBLEND_ADD, 7, 7, 255, 192, 9999, 0.05, 0, org[0], org[1], org[2], dir[0] * vel, dir[1] * vel, dir[2] * vel, 0, 0, 0, 0, 0, 0);
                }
        }
 }
@@ -624,180 +933,231 @@ CL_TeleportSplash
 
 ===============
 */
-void CL_TeleportSplash (vec3_t org)
+#if WORKINGLQUAKE
+void R_TeleportSplash (vec3_t org)
 {
-       int                     i, j, k;
+       int i, j, k;
        if (!cl_particles.integer) return;
 
        for (i=-16 ; i<16 ; i+=8)
                for (j=-16 ; j<16 ; j+=8)
                        for (k=-24 ; k<32 ; k+=8)
-                               particle(pt_fade, 0xFFFFFF, tex_particle, false, 1, lhrandom(64, 128), 9999, 0, org[0] + i + lhrandom(0, 8), org[1] + j + lhrandom(0, 8), org[2] + k + lhrandom(0, 8), i*2 + lhrandom(-12.5, 12.5), j*2 + lhrandom(-12.5, 12.5), k*2 + lhrandom(27.5, 52.5), 0, 0, 0, 0, 0.1f, -512.0f);
+                               particle(pt_static, PARTICLE_BILLBOARD, 0xA0A0A0, 0xFFFFFF, tex_particle, false, PBLEND_ADD, 10, 10, lhrandom(64, 128), 256, 9999, 0, 0, org[0] + i + lhrandom(0, 8), org[1] + j + lhrandom(0, 8), org[2] + k + lhrandom(0, 8), lhrandom(-64, 64), lhrandom(-64, 64), lhrandom(-256, 256), 0, 0, 0, 0, 1, 0);
 }
+#endif
 
+#ifdef WORKINGLQUAKE
+void R_RocketTrail (vec3_t start, vec3_t end, int type)
+#else
 void CL_RocketTrail (vec3_t start, vec3_t end, int type, entity_t *ent)
+#endif
 {
-       vec3_t          vec, dir, vel;
-       float           len, dec = 0, speed;
-       int                     contents, bubbles;
-       double          t;
-       if (!cl_particles.integer) return;
+       vec3_t vec, dir, vel, pos;
+       float len, dec, speed, r;
+       int contents, smoke, blood, bubbles;
+
+       if (end[0] == start[0] && end[1] == start[1] && end[2] == start[2])
+               return;
 
        VectorSubtract(end, start, dir);
        VectorNormalize(dir);
 
-       if (type == 0 && host_frametime != 0) // rocket glow
-               particle(pt_oneframe, 0xFFFFFF, tex_rocketglow, false, 24, 255, 9999, 0, end[0] - 12 * dir[0], end[1] - 12 * dir[1], end[2] - 12 * dir[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
-
-       t = ent->persistent.trail_time;
-       if (t >= cl.time)
-               return; // no particles to spawn this frame (sparse trail)
-
-       if (t < cl.oldtime)
-               t = cl.oldtime;
-
        VectorSubtract (end, start, vec);
+#ifdef WORKINGLQUAKE
+       len = VectorNormalize (vec);
+       dec = 0;
+       speed = 1.0f / cl.frametime;
+       VectorSubtract(end, start, vel);
+#else
        len = VectorNormalizeLength (vec);
-       if (len <= 0.01f)
-       {
-               // advance the trail time
-               ent->persistent.trail_time = cl.time;
+       dec = -ent->persistent.trail_time;
+       ent->persistent.trail_time += len;
+       if (ent->persistent.trail_time < 0.01f)
                return;
-       }
-       speed = len / (cl.time - cl.oldtime);
-       VectorScale(vec, speed, vel);
+
+       // if we skip out, leave it reset
+       ent->persistent.trail_time = 0.0f;
+
+       speed = 1.0f / (ent->state_current.time - ent->state_previous.time);
+       VectorSubtract(ent->state_current.origin, ent->state_previous.origin, vel);
+#endif
+       VectorScale(vel, speed, vel);
 
        // advance into this frame to reach the first puff location
-       dec = t - cl.oldtime;
-       dec *= speed;
-       VectorMA(start, dec, vec, start);
+       VectorMA(start, dec, vec, pos);
+       len -= dec;
 
-       contents = Mod_PointInLeaf(start, cl.worldmodel)->contents;
+       contents = Mod_PointContents(pos, cl.worldmodel);
        if (contents == CONTENTS_SKY || contents == CONTENTS_LAVA)
-       {
-               // advance the trail time
-               ent->persistent.trail_time = cl.time;
                return;
-       }
 
-       bubbles = (contents == CONTENTS_WATER || contents == CONTENTS_SLIME);
+       smoke = cl_particles.integer && cl_particles_smoke.integer;
+       blood = cl_particles.integer && cl_particles_blood.integer;
+       bubbles = cl_particles.integer && cl_particles_bubbles.integer && (contents == CONTENTS_WATER || contents == CONTENTS_SLIME);
 
-       while (t < cl.time)
+       while (len >= 0)
        {
                switch (type)
                {
                        case 0: // rocket trail
-                               if (!cl_particles_smoke.integer)
-                                       dec = cl.time - t;
-                               else if (bubbles && cl_particles_bubbles.integer)
+                               dec = 3;
+                               if (smoke)
                                {
-                                       dec = 0.005f;
-                                       particle(pt_bubble, 0xFFFFFF, tex_bubble, false, lhrandom(1, 2), 255, 9999, 1.5, start[0], start[1], start[2], lhrandom(-16, 16), lhrandom(-16, 16), lhrandom(-16, 16), 0, 0, 0, 0, 0, 0);
-                                       particle(pt_bubble, 0xFFFFFF, tex_bubble, false, lhrandom(1, 2), 255, 9999, 1.5, start[0], start[1], start[2], lhrandom(-16, 16), lhrandom(-16, 16), lhrandom(-16, 16), 0, 0, 0, 0, 0, 0);
-                                       particle(pt_smoke, 0xFFFFFF, tex_smoke[rand()&7], false, 2, 160, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                                       particle(pt_grow,   PARTICLE_BILLBOARD, 0x303030, 0x606060, tex_smoke[rand()&7], false, PBLEND_ADD, dec, dec, cl_particles_smoke_alpha.value*125, cl_particles_smoke_alphafade.value*125, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-5, 5), lhrandom(-5, 5), lhrandom(-5, 5), cl_particles_smoke_size.value, 0, 0, 0, 0, 0);
+                                       particle(pt_static, PARTICLE_BILLBOARD, 0x801010, 0xFFA020, tex_smoke[rand()&7], false, PBLEND_ADD, dec, dec, cl_particles_smoke_alpha.value*288, cl_particles_smoke_alphafade.value*1400, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-20, 20), lhrandom(-20, 20), lhrandom(-20, 20), 0, 0, 0, 0, 0, 0);
                                }
-                               else
+                               if (bubbles)
                                {
-                                       dec = 0.005f;
-                                       particle(pt_smoke, 0xC0C0C0, tex_smoke[rand()&7], true, 2, 160, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
-                                       //particle(pt_spark, particlepalette[0x68 + (rand() & 7)], tex_particle, false, 1, lhrandom(128, 255), 9999, 1.5, start[0], start[1], start[2], lhrandom(-64, 64) - vel[0] * 0.0625, lhrandom(-64, 64) - vel[1] * 0.0625, lhrandom(-64, 64) - vel[2] * 0.0625, 512.0f, 0, 0, 0, 0.1f, 0);
-                                       //particle(pt_spark, particlepalette[0x68 + (rand() & 7)], tex_particle, false, 1, lhrandom(128, 255), 9999, 1.5, start[0], start[1], start[2], lhrandom(-64, 64) - vel[0] * 0.0625, lhrandom(-64, 64) - vel[1] * 0.0625, lhrandom(-64, 64) - vel[2] * 0.0625, 512.0f, 0, 0, 0, 0.1f, 0);
-                                       //particle(pt_spark, particlepalette[0x68 + (rand() & 7)], tex_particle, false, 1, lhrandom(128, 255), 9999, 1.5, start[0], start[1], start[2], lhrandom(-64, 64) - vel[0] * 0.0625, lhrandom(-64, 64) - vel[1] * 0.0625, lhrandom(-64, 64) - vel[2] * 0.0625, 512.0f, 0, 0, 0, 0.1f, 0);
-                                       //particle(pt_spark, particlepalette[0x68 + (rand() & 7)], tex_particle, false, 1, lhrandom(128, 255), 9999, 1.5, start[0], start[1], start[2], lhrandom(-64, 64) - vel[0] * 0.0625, lhrandom(-64, 64) - vel[1] * 0.0625, lhrandom(-64, 64) - vel[2] * 0.0625, 512.0f, 0, 0, 0, 0.1f, 0);
+                                       r = lhrandom(1, 2);
+                                       particle(pt_bubble, PARTICLE_BILLBOARD, 0x404040, 0x808080, tex_bubble, false, PBLEND_ADD, r, r, lhrandom(64, 255), 256, 9999, -0.25, 1.5, pos[0], pos[1], pos[2], lhrandom(-16, 16), lhrandom(-16, 16), lhrandom(-16, 16), 0, 0, 0, 0, (1.0 / 16.0), 0);
                                }
                                break;
 
                        case 1: // grenade trail
                                // FIXME: make it gradually stop smoking
-                               if (!cl_particles_smoke.integer)
-                                       dec = cl.time - t;
-                               else if (bubbles && cl_particles_bubbles.integer)
-                               {
-                                       dec = 0.02f;
-                                       particle(pt_bubble, 0xFFFFFF, tex_bubble, false, lhrandom(1, 2), 255, 9999, 1.5, start[0], start[1], start[2], lhrandom(-16, 16), lhrandom(-16, 16), lhrandom(-16, 16), 0, 0, 0, 0, 0, 0);
-                                       particle(pt_bubble, 0xFFFFFF, tex_bubble, false, lhrandom(1, 2), 255, 9999, 1.5, start[0], start[1], start[2], lhrandom(-16, 16), lhrandom(-16, 16), lhrandom(-16, 16), 0, 0, 0, 0, 0, 0);
-                                       particle(pt_smoke, 0xFFFFFF, tex_smoke[rand()&7], false, 2, 160, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
-                               }
-                               else
+                               dec = 3;
+                               if (cl_particles.integer && cl_particles_smoke.integer)
                                {
-                                       dec = 0.02f;
-                                       particle(pt_smoke, 0x808080, tex_smoke[rand()&7], true, 2, 160, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                                       particle(pt_grow, PARTICLE_BILLBOARD, 0x303030, 0x606060, tex_smoke[rand()&7], false, PBLEND_ADD, dec, dec, cl_particles_smoke_alpha.value*100, cl_particles_smoke_alphafade.value*100, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-5, 5), lhrandom(-5, 5), lhrandom(-5, 5), cl_particles_smoke_size.value, 0, 0, 0, 0, 0);
                                }
                                break;
 
 
                        case 2: // blood
-                               if (!cl_particles_blood.integer)
-                                       dec = cl.time - t;
-                               else
-                               {
-                                       dec = 0.1f;
-                                       particle(pt_blood, 0x300000, tex_smoke[rand()&7], true, 24, 255, 9999, -1, start[0], start[1], start[2], vel[0] + lhrandom(-64, 64), vel[1] + lhrandom(-64, 64), vel[2] + lhrandom(-64, 64), 0, 0, 0, 0, 1.0f, 0);
-                               }
-                               break;
-
                        case 4: // slight blood
-                               if (!cl_particles_blood.integer)
-                                       dec = cl.time - t;
-                               else
+                               dec = cl_particles_blood_size.value;
+                               if (blood)
                                {
-                                       dec = 0.15f;
-                                       particle(pt_blood, 0x300000, tex_smoke[rand()&7], true, 24, 255, 9999, -1, start[0], start[1], start[2], vel[0] + lhrandom(-64, 64), vel[1] + lhrandom(-64, 64), vel[2] + lhrandom(-64, 64), 0, 0, 0, 0, 1.0f, 0);
+                                       particle(pt_blood, PARTICLE_BILLBOARD, 0xFFFFFF, 0xFFFFFF, tex_blooddecal[rand()&7], true, PBLEND_MOD, dec, dec, cl_particles_blood_alpha.value * 255.0f * 3.0f, cl_particles_blood_alpha.value * 255.0f * 0.5f * 1.5f, 9999, 0, -1, pos[0], pos[1], pos[2], vel[0] * 0.5f + lhrandom(-64, 64), vel[1] * 0.5f + lhrandom(-64, 64), vel[2] * 0.5f + lhrandom(-64, 64), 0, 0, 0, 0, 1, 0);
+                                       //particle(pt_blood, PARTICLE_BILLBOARD, 0x100000, 0x280000, tex_smoke[rand()&7], true, PBLEND_ALPHA, dec, dec, cl_particles_blood_alpha.value * 255.0f, cl_particles_blood_alpha.value * 255.0f * 0.5, 9999, 0, -1, pos[0], pos[1], pos[2], vel[0] * 0.5f + lhrandom(-64, 64), vel[1] * 0.5f + lhrandom(-64, 64), vel[2] * 0.5f + lhrandom(-64, 64), 0, 0, 0, 0, 1, 0);
                                }
                                break;
 
                        case 3: // green tracer
-                               dec = 0.02f;
-                               particle(pt_fade, 0x373707, tex_smoke[rand()&7], false, 4, 255, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                               dec = 6;
+                               if (smoke)
+                               {
+                                       particle(pt_static, PARTICLE_BILLBOARD, 0x002000, 0x003000, tex_particle, false, PBLEND_ADD, dec, dec, 128, 384, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-8, 8), lhrandom(-8, 8), lhrandom(-8, 8), 0, 0, 0, 0, 0, 0);
+                               }
                                break;
 
                        case 5: // flame tracer
-                               dec = 0.02f;
-                               particle(pt_fade, 0xCF632B, tex_smoke[rand()&7], false, 4, 255, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                               dec = 6;
+                               if (smoke)
+                               {
+                                       particle(pt_static, PARTICLE_BILLBOARD, 0x301000, 0x502000, tex_particle, false, PBLEND_ADD, dec, dec, 128, 384, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-8, 8), lhrandom(-8, 8), lhrandom(-8, 8), 0, 0, 0, 0, 0, 0);
+                               }
                                break;
 
                        case 6: // voor trail
-                               dec = 0.05f; // sparse trail
-                               particle(pt_fade, 0x47232B, tex_smoke[rand()&7], false, 4, 255, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                               dec = 6;
+                               if (smoke)
+                               {
+                                       particle(pt_static, PARTICLE_BILLBOARD, 0x502030, 0x502030, tex_particle, false, PBLEND_ADD, dec, dec, 128, 384, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-8, 8), lhrandom(-8, 8), lhrandom(-8, 8), 0, 0, 0, 0, 0, 0);
+                               }
                                break;
 
                        case 7: // Nehahra smoke tracer
-                               if (!cl_particles_smoke.integer)
-                                       dec = cl.time - t;
-                               else
+                               dec = 7;
+                               if (smoke)
                                {
-                                       dec = 0.14f;
-                                       particle(pt_smoke, 0xC0C0C0, tex_smoke[rand()&7], true, 10, 64, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                                       particle(pt_static, PARTICLE_BILLBOARD, 0x303030, 0x606060, tex_smoke[rand()&7], true, PBLEND_ALPHA, dec, dec, 64, 320, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-4, 4), lhrandom(-4, 4), lhrandom(0, 16), 0, 0, 0, 0, 0, 0);
                                }
                                break;
+                       case 8: // Nexiuz plasma trail
+                               dec = 4;
+                               if (smoke)
+                               {
+                                       //particle(pt_static, PARTICLE_BILLBOARD, 0x2030FF, 0x80C0FF, tex_particle, false, PBLEND_ADD, 3.0f, 3.0f, lhrandom(64, 255), 512, 9999, 0, 0, pos[0], pos[1], pos[2], lhrandom(-32, 32) + dir[0] * -64.0f, lhrandom(-32, 32) + dir[1] * -64.0f, lhrandom(-32, 32) + dir[2] * -64.0f, 0, 0, 0, 0, 0, 0);
+                                       particle(pt_static, PARTICLE_BILLBOARD, 0x283880, 0x283880, tex_particle, false, PBLEND_ADD, dec, dec, 255, 1024, 9999, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+                               }
                }
 
                // advance to next time and position
-               t += dec;
-               dec *= speed;
-               VectorMA (start, dec, vec, start);
+               len -= dec;
+               VectorMA (pos, dec, vec, pos);
        }
-       ent->persistent.trail_time = t;
+#ifndef WORKINGLQUAKE
+       ent->persistent.trail_time = len;
+#endif
 }
 
 void CL_RocketTrail2 (vec3_t start, vec3_t end, int color, entity_t *ent)
 {
-       vec3_t          vec;
-       int                     len;
+       vec3_t vec, pos;
+       int len;
        if (!cl_particles.integer) return;
        if (!cl_particles_smoke.integer) return;
 
+       VectorCopy(start, pos);
        VectorSubtract (end, start, vec);
+#ifdef WORKINGLQUAKE
+       len = (int) (VectorNormalize (vec) * (1.0f / 3.0f));
+#else
        len = (int) (VectorNormalizeLength (vec) * (1.0f / 3.0f));
+#endif
        VectorScale(vec, 3, vec);
        color = particlepalette[color];
        while (len--)
        {
-               particle(pt_smoke, color, tex_particle, false, 8, 192, 9999, 0, start[0], start[1], start[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
-               VectorAdd (start, vec, start);
+               particle(pt_static, PARTICLE_BILLBOARD, color, color, tex_particle, false, PBLEND_ALPHA, 5, 5, 128, 320, 9999, 0, 0, pos[0], pos[1], pos[2], 0, 0, 0, 0, 0, 0, 0, 0, 0);
+               VectorAdd (pos, vec, pos);
        }
 }
 
+void CL_BeamParticle (const vec3_t start, const vec3_t end, vec_t radius, float red, float green, float blue, float alpha, float lifetime)
+{
+       int tempcolor2, cr, cg, cb;
+       cr = red * 255;
+       cg = green * 255;
+       cb = blue * 255;
+       tempcolor2 = (bound(0, cr, 255) << 16) | (bound(0, cg, 255) << 8) | bound(0, cb, 255);
+       particle(pt_static, PARTICLE_BEAM, tempcolor2, tempcolor2, tex_beam, false, PBLEND_ADD, radius, radius, alpha * 255, alpha * 255 / lifetime, 9999, 0, 0, start[0], start[1], start[2], 0, 0, 0, 0, end[0], end[1], end[2], 0, 0);
+}
+
+void CL_Tei_Smoke(const vec3_t org, const vec3_t dir, int count)
+{
+       int k;
+       if (!cl_particles.integer) return;
+
+       // smoke puff
+       if (cl_particles_smoke.integer)
+       {
+               k = count / 4;
+               while(k--)
+               {
+                       particle(pt_grow, PARTICLE_BILLBOARD, 0x202020, 0x404040, tex_smoke[rand()&7], true, PBLEND_ADD, 5, 5, 255, 512, 9999, 0, 0, org[0] + 0.125f * lhrandom(-count, count), org[1] + 0.125f * lhrandom (-count, count), org[2] + 0.125f * lhrandom(-count, count), dir[0] + lhrandom(-count, count) * 0.5f, dir[1] + lhrandom(-count, count) * 0.5f, dir[2] + lhrandom(-count, count) * 0.5f, 15, 0, 0, 0, 0, 0);
+               }
+       }
+}
+
+void CL_Tei_PlasmaHit(const vec3_t org, const vec3_t dir, int count)
+{
+       int k;
+       if (!cl_particles.integer) return;
+
+       if (cl_stainmaps.integer)
+               R_Stain(org, 40, 96, 96, 96, 40, 128, 128, 128, 40);
+
+       // smoke puff
+       if (cl_particles_smoke.integer)
+       {
+               k = count / 4;
+               while(k--)
+               {
+                       particle(pt_grow, PARTICLE_BILLBOARD, 0x202020, 0x404040, tex_smoke[rand()&7], true, PBLEND_ADD, 5, 5, 255, 512, 9999, 0, 0, org[0] + 0.125f * lhrandom(-count, count), org[1] + 0.125f * lhrandom (-count, count), org[2] + 0.125f * lhrandom(-count, count), dir[0] + lhrandom(-count, count), dir[1] + lhrandom(-count, count), dir[2] + lhrandom(-count, count), 15, 0, 0, 0, 0, 0);
+               }
+       }
+
+       if (cl_particles_sparks.integer)
+       {
+               // sparks
+               while(count--)
+               {
+                       particle(pt_static, PARTICLE_SPARK, 0x2030FF, 0x80C0FF, tex_particle, false, PBLEND_ADD, 2.0f, 0.1f, lhrandom(64, 255), 512, 9999, 0, 0, org[0], org[1], org[2], lhrandom(-count, count) * 3.0f + dir[0], lhrandom(-count, count) * 3.0f + dir[1], lhrandom(-count, count) * 3.0f + dir[2], 0, 0, 0, 0, 0, 0);
+               }
+       }
+}
 
 /*
 ===============
@@ -807,50 +1167,77 @@ CL_MoveParticles
 void CL_MoveParticles (void)
 {
        particle_t *p;
-       renderparticle_t *r;
-       int i, activeparticles, maxparticle, j, a, b, pressureused = false;
-       float gravity, dvel, frametime, f, dist, normal[3], v[3], org[3], o[3];
+       int i, activeparticles, maxparticle, j, a, pressureused = false, content;
+       float gravity, dvel, bloodwaterfade, frametime, f, dist, normal[3], v[3], org[3];
+#ifdef WORKINGLQUAKE
+       void *hitent;
+#else
+       entity_render_t *hitent;
+#endif
 
        // LordHavoc: early out condition
        if (!cl_numparticles)
                return;
 
+#ifdef WORKINGLQUAKE
+       frametime = cl.frametime;
+#else
        frametime = cl.time - cl.oldtime;
-       if (!frametime)
-               return; // if absolutely still, don't update particles
+#endif
        gravity = frametime * sv_gravity.value;
        dvel = 1+4*frametime;
+       bloodwaterfade = max(cl_particles_blood_alpha.value, 0.01f) * frametime * 128.0f;
 
        activeparticles = 0;
        maxparticle = -1;
        j = 0;
-       for (i = 0, p = particles, r = r_refdef.particles;i < cl_numparticles;i++, p++)
+       for (i = 0, p = particles;i < cl_numparticles;i++, p++)
        {
-               if (p->die < cl.time)
-               {
-                       freeparticles[j++] = p;
-                       continue;
-               }
-
+               content = 0;
                VectorCopy(p->org, p->oldorg);
                VectorMA(p->org, frametime, p->vel, p->org);
-               if (p->friction)
-               {
-                       f = 1.0f - (p->friction * frametime);
-                       VectorScale(p->vel, f, p->vel);
-               }
                VectorCopy(p->org, org);
                if (p->bounce)
                {
-                       if (TraceLine(p->oldorg, p->org, v, normal, 0) < 1)
+                       if (CL_TraceLine(p->oldorg, p->org, v, normal, 0, true, &hitent) < 1)
                        {
                                VectorCopy(v, p->org);
                                if (p->bounce < 0)
                                {
-                                       CL_Decal(v, p->tex, p->scale * cl_particles_size.value, p->color[0] * (1.0f / 255.0f), p->color[1] * (1.0f / 255.0f), p->color[2] * (1.0f / 255.0f), p->alpha * (1.0f / 255.0f));
-                                       p->die = -1;
-                                       freeparticles[j++] = p;
-                                       continue;
+                                       // assume it's blood (lame, but...)
+#ifndef WORKINGLQUAKE
+                                       if (cl_stainmaps.integer)
+                                               R_Stain(v, 32, 32, 16, 16, p->alpha * p->scalex * (1.0f / 40.0f), 192, 48, 48, p->alpha * p->scalex * (1.0f / 40.0f));
+#endif
+                                       if (cl_decals.integer)
+                                       {
+                                               p->type = pt_decal;
+                                               p->orientation = PARTICLE_ORIENTED_DOUBLESIDED;
+#ifndef WORKINGLQUAKE
+                                               p->owner = hitent;
+                                               p->ownermodel = hitent->model;
+                                               Matrix4x4_Transform(&hitent->inversematrix, v, p->relativeorigin);
+                                               Matrix4x4_Transform3x3(&hitent->inversematrix, normal, p->relativedirection);
+                                               VectorAdd(p->relativeorigin, p->relativedirection, p->relativeorigin);
+#endif
+                                               p->time2 = cl.time + cl_decals_time.value;
+                                               p->die = p->time2 + cl_decals_fadetime.value;
+                                               p->alphafade = 0;
+                                               VectorCopy(normal, p->vel2);
+                                               VectorClear(p->vel);
+                                               VectorAdd(p->org, normal, p->org);
+                                               p->bounce = 0;
+                                               p->friction = 0;
+                                               p->gravity = 0;
+                                               p->scalex *= 1.25f;
+                                               p->scaley *= 1.25f;
+                                       }
+                                       else
+                                       {
+                                               p->die = -1;
+                                               freeparticles[j++] = p;
+                                               continue;
+                                       }
                                }
                                else
                                {
@@ -861,249 +1248,94 @@ void CL_MoveParticles (void)
                                }
                        }
                }
-
-               switch (p->type)
+               p->vel[2] -= p->gravity * gravity;
+               p->alpha -= p->alphafade * frametime;
+               if (p->friction)
                {
-               case pt_static:
-                       break;
-
-                       // LordHavoc: drop-through because of shared code
-               case pt_blob:
-                       p->vel[2] *= dvel;
-               case pt_blob2:
-                       p->vel[0] *= dvel;
-                       p->vel[1] *= dvel;
-                       p->alpha -= frametime * 256;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
+                       f = p->friction * frametime;
+                       if (!content)
+                               content = Mod_PointContents(p->org, cl.worldmodel);
+                       if (content != CONTENTS_EMPTY)
+                               f *= 4;
+                       f = 1.0f - f;
+                       VectorScale(p->vel, f, p->vel);
+               }
 
-               case pt_grav:
-                       p->vel[2] -= gravity;
-                       break;
-               case pt_lavasplash:
-                       p->vel[2] -= gravity * 0.05;
-                       p->alpha -= frametime * 192;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_snow:
-                       if (cl.time > p->time2)
-                       {
-                               p->time2 = cl.time + (rand() & 3) * 0.1;
-                               p->vel[0] = (rand()&63)-32 + p->vel2[0];
-                               p->vel[1] = (rand()&63)-32 + p->vel2[1];
-                               p->vel[2] = (rand()&63)-32 + p->vel2[2];
-                       }
-                       a = Mod_PointInLeaf(p->org, cl.worldmodel)->contents;
-                       if (a != CONTENTS_EMPTY && a != CONTENTS_SKY)
-                       {
-                               vec3_t normal;
-                               if (a == CONTENTS_SOLID && Mod_PointInLeaf(p->oldorg, cl.worldmodel)->contents == CONTENTS_SOLID)
-                                       break; // still in solid
-                               p->die = cl.time + 1000;
-                               p->vel[0] = p->vel[1] = p->vel[2] = 0;
-                               switch (a)
-                               {
-                               case CONTENTS_LAVA:
-                               case CONTENTS_SLIME:
-                                       p->tex = tex_smoke[rand()&7];
-                                       p->type = pt_steam;
-                                       p->alpha = 96;
-                                       p->scale = 5;
-                                       p->vel[2] = 96;
-                                       break;
-                               case CONTENTS_WATER:
-                                       p->tex = tex_smoke[rand()&7];
-                                       p->type = pt_splash;
-                                       p->alpha = 96;
-                                       p->scale = 5;
-                                       p->vel[2] = 96;
-                                       break;
-                               default: // CONTENTS_SOLID and any others
-                                       TraceLine(p->oldorg, p->org, v, normal, 0);
-                                       VectorCopy(v, p->org);
-                                       p->tex = tex_smoke[rand()&7];
-                                       p->type = pt_fade;
-                                       VectorClear(p->vel);
-                                       break;
-                               }
-                       }
-                       break;
-               case pt_blood:
-                       p->friction = 1;
-                       a = Mod_PointInLeaf(p->org, cl.worldmodel)->contents;
-                       if (a != CONTENTS_EMPTY)
+               if (p->type != pt_static)
+               {
+                       switch (p->type)
                        {
-                               if (a == CONTENTS_WATER || a == CONTENTS_SLIME)
+                       case pt_blood:
+                               if (!content)
+                                       content = Mod_PointContents(p->org, cl.worldmodel);
+                               a = content;
+                               if (a != CONTENTS_EMPTY)
                                {
-                                       p->friction = 5;
-                                       p->scale += frametime * 32.0f;
-                                       p->alpha -= frametime * 128.0f;
-                                       p->vel[2] += gravity * 0.125f;
-                                       if (p->alpha < 1)
+                                       if (a == CONTENTS_WATER || a == CONTENTS_SLIME)
+                                       {
+                                               p->scalex += frametime * cl_particles_blood_size.value;
+                                               p->scaley += frametime * cl_particles_blood_size.value;
+                                               //p->alpha -= bloodwaterfade;
+                                       }
+                                       else
                                                p->die = -1;
-                                       break;
                                }
                                else
+                                       p->vel[2] -= gravity;
+                               break;
+                       case pt_bubble:
+                               if (!content)
+                                       content = Mod_PointContents(p->org, cl.worldmodel);
+                               if (content != CONTENTS_WATER && content != CONTENTS_SLIME)
                                {
                                        p->die = -1;
                                        break;
                                }
-                       }
-                       p->vel[2] -= gravity * 0.5;
-                       break;
-               case pt_spark:
-                       p->alpha -= frametime * p->time2;
-                       p->vel[2] -= gravity;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       else if (Mod_PointInLeaf(p->org, cl.worldmodel)->contents != CONTENTS_EMPTY)
-                               p->type = pt_underwaterspark;
-                       break;
-               case pt_underwaterspark:
-                       if (Mod_PointInLeaf(p->org, cl.worldmodel)->contents == CONTENTS_EMPTY)
-                       {
-                               p->tex = tex_smoke[rand()&7];
-                               p->color[0] = p->color[1] = p->color[2] = 255;
-                               p->scale = 16;
-                               p->type = pt_explosionsplash;
-                       }
-                       else
-                               p->vel[2] += gravity * 0.5f;
-                       p->alpha -= frametime * p->time2;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_explosionsplash:
-                       if (Mod_PointInLeaf(p->org, cl.worldmodel)->contents == CONTENTS_EMPTY)
-                               p->vel[2] -= gravity;
-                       else
-                               p->alpha = 0;
-                       p->scale += frametime * 64.0f;
-                       p->alpha -= frametime * 1024.0f;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_fade:
-                       p->alpha -= frametime * 512;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_bubble:
-                       a = Mod_PointInLeaf(p->org, cl.worldmodel)->contents;
-                       if (a != CONTENTS_WATER && a != CONTENTS_SLIME)
-                       {
-                               p->tex = tex_smoke[rand()&7];
-                               p->type = pt_splashpuff;
-                               p->scale = 4;
-                               p->vel[0] = p->vel[1] = p->vel[2] = 0;
                                break;
-                       }
-                       p->vel[2] += gravity * 0.25;
-                       p->vel[0] *= (1 - (frametime * 0.0625));
-                       p->vel[1] *= (1 - (frametime * 0.0625));
-                       p->vel[2] *= (1 - (frametime * 0.0625));
-                       if (cl.time > p->time2)
-                       {
-                               p->time2 = cl.time + lhrandom(0, 0.5);
-                               p->vel[0] += lhrandom(-32,32);
-                               p->vel[1] += lhrandom(-32,32);
-                               p->vel[2] += lhrandom(-32,32);
-                       }
-                       p->alpha -= frametime * 256;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_bulletsmoke:
-                       p->scale += frametime * 16;
-                       p->alpha -= frametime * 1024;
-                       p->vel[2] += gravity * 0.1;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_smoke:
-                       p->scale += frametime * 24;
-                       p->alpha -= frametime * 256;
-                       p->vel[2] += gravity * 0.1;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_steam:
-                       p->scale += frametime * 48;
-                       p->alpha -= frametime * 512;
-                       p->vel[2] += gravity * 0.05;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_splashpuff:
-                       p->alpha -= frametime * 1024;
-                       if (p->alpha < 1)
-                               p->die = -1;
-                       break;
-               case pt_rain:
-                       f = 0;
-                       b = Mod_PointInLeaf(p->oldorg, cl.worldmodel)->contents;
-                       VectorCopy(p->oldorg, o);
-                       while (f < 1)
-                       {
-                               a = b;
-                               f = TraceLine(o, p->org, v, normal, a);
-                               b = traceline_endcontents;
-                               if (f < 1 && b != CONTENTS_EMPTY && b != CONTENTS_SKY)
+                       case pt_rain:
+                               if (cl.time > p->time2)
                                {
-                                       p->die = cl.time + 1000;
-                                       p->vel[0] = p->vel[1] = p->vel[2] = 0;
-                                       VectorCopy(v, p->org);
-                                       switch (b)
-                                       {
-                                       case CONTENTS_LAVA:
-                                       case CONTENTS_SLIME:
-                                               p->tex = tex_smoke[rand()&7];
-                                               p->type = pt_steam;
-                                               p->scale = 3;
-                                               p->vel[2] = 96;
-                                               break;
-                                       default: // water, solid, and anything else
-                                               p->tex = tex_rainsplash[0];
-                                               p->time2 = 0;
-                                               VectorCopy(normal, p->vel2);
-                                       //      VectorAdd(p->org, normal, p->org);
-                                               p->type = pt_raindropsplash;
-                                               p->scale = 8;
-                                               break;
-                                       }
+                                       // snow flutter
+                                       p->time2 = cl.time + (rand() & 3) * 0.1;
+                                       p->vel[0] = lhrandom(-32, 32) + p->vel2[0];
+                                       p->vel[1] = lhrandom(-32, 32) + p->vel2[1];
+                                       p->vel[2] = /*lhrandom(-32, 32) +*/ p->vel2[2];
                                }
-                       }
-                       break;
-               case pt_raindropsplash:
-                       p->time2 += frametime * 64.0f;
-                       if (p->time2 >= 16.0f)
-                       {
+                               if (!content)
+                                       content = Mod_PointContents(p->org, cl.worldmodel);
+                               a = content;
+                               if (a != CONTENTS_EMPTY && a != CONTENTS_SKY)
+                                       p->die = -1;
+                               break;
+                       case pt_grow:
+                               p->scalex += frametime * p->time2;
+                               p->scaley += frametime * p->time2;
+                               break;
+                       case pt_decal:
+#ifndef WORKINGLQUAKE
+                               if (p->owner->model == p->ownermodel)
+                               {
+                                       Matrix4x4_Transform(&p->owner->matrix, p->relativeorigin, p->org);
+                                       Matrix4x4_Transform3x3(&p->owner->matrix, p->relativedirection, p->vel2);
+                               }
+                               else
+                                       p->die = -1;
+#endif
+                               if (cl.time > p->time2)
+                               {
+                                       p->alphafade = p->alpha / (p->die - cl.time);
+                                       p->time2 += 10000;
+                               }
+                               break;
+                       default:
+                               Con_Printf("unknown particle type %i\n", p->type);
                                p->die = -1;
                                break;
                        }
-                       p->tex = tex_rainsplash[(int) p->time2];
-                       break;
-               case pt_flame:
-                       p->alpha -= frametime * 512;
-                       p->vel[2] += gravity;
-                       if (p->alpha < 16)
-                               p->die = -1;
-                       break;
-               case pt_oneframe:
-                       if (p->time2)
-                               p->die = -1;
-                       p->time2 = 1;
-                       break;
-               default:
-                       printf("unknown particle type %i\n", p->type);
-                       p->die = -1;
-                       break;
                }
 
-               // LordHavoc: immediate removal of unnecessary particles (must be done to ensure compactor below operates properly in all cases)
-               if (p->die < cl.time)
+               // remove dead particles
+               if (p->alpha < 1 || p->die < cl.time)
                        freeparticles[j++] = p;
                else
                {
@@ -1111,33 +1343,8 @@ void CL_MoveParticles (void)
                        activeparticles++;
                        if (p->pressure)
                                pressureused = true;
-
-                       // build renderparticle for renderer to use
-                       if (p->type == pt_raindropsplash)
-                       {
-                               r->orientation = PARTICLE_ORIENTED_DOUBLESIDED;
-                               r->dir[0] = p->vel2[0];
-                               r->dir[1] = p->vel2[1];
-                               r->dir[2] = p->vel2[2];
-                       }
-                       else if (p->tex == tex_rain)
-                               r->orientation = PARTICLE_UPRIGHT_FACING;
-                       else
-                               r->orientation = PARTICLE_BILLBOARD;
-                       r->org[0] = p->org[0];
-                       r->org[1] = p->org[1];
-                       r->org[2] = p->org[2];
-                       r->tex = p->tex;
-                       r->scale = p->scale * 0.5f * cl_particles_size.value;
-                       r->dynlight = p->dynlight;
-                       r->color[0] = p->color[0] * (1.0f / 255.0f);
-                       r->color[1] = p->color[1] * (1.0f / 255.0f);
-                       r->color[2] = p->color[2] * (1.0f / 255.0f);
-                       r->color[3] = p->alpha * (1.0f / 255.0f);
-                       r++;
                }
        }
-       r_refdef.numparticles = r - r_refdef.particles;
        // fill in gaps to compact the array
        i = 0;
        while (maxparticle >= activeparticles)
@@ -1168,10 +1375,8 @@ void CL_MoveParticles (void)
                                                dist = DotProduct(diff, diff);
                                                if (dist < 4096 && dist >= 1)
                                                {
-                                                       dist = freeparticles[j]->scale * 4.0f * frametime / sqrt(dist);
+                                                       dist = freeparticles[j]->scalex * 4.0f * frametime / sqrt(dist);
                                                        VectorMA(p->vel, dist, diff, p->vel);
-                                                       //dist = freeparticles[j]->scale * 4.0f * frametime / dist;
-                                                       //VectorMA(p->vel, dist, freeparticles[j]->vel, p->vel);
                                                }
                                        }
                                }
@@ -1179,3 +1384,479 @@ void CL_MoveParticles (void)
                }
        }
 }
+
+#define MAX_PARTICLETEXTURES 64
+// particletexture_t is a rectangle in the particlefonttexture
+typedef struct
+{
+       rtexture_t *texture;
+       float s1, t1, s2, t2;
+}
+particletexture_t;
+
+#if WORKINGLQUAKE
+static int particlefonttexture;
+#else
+static rtexturepool_t *particletexturepool;
+static rtexture_t *particlefonttexture;
+#endif
+static particletexture_t particletexture[MAX_PARTICLETEXTURES];
+
+static cvar_t r_drawparticles = {0, "r_drawparticles", "1"};
+
+static qbyte shadebubble(float dx, float dy, vec3_t light)
+{
+       float dz, f, dot;
+       vec3_t normal;
+       dz = 1 - (dx*dx+dy*dy);
+       if (dz > 0) // it does hit the sphere
+       {
+               f = 0;
+               // back side
+               normal[0] = dx;normal[1] = dy;normal[2] = dz;
+               VectorNormalize(normal);
+               dot = DotProduct(normal, light);
+               if (dot > 0.5) // interior reflection
+                       f += ((dot *  2) - 1);
+               else if (dot < -0.5) // exterior reflection
+                       f += ((dot * -2) - 1);
+               // front side
+               normal[0] = dx;normal[1] = dy;normal[2] = -dz;
+               VectorNormalize(normal);
+               dot = DotProduct(normal, light);
+               if (dot > 0.5) // interior reflection
+                       f += ((dot *  2) - 1);
+               else if (dot < -0.5) // exterior reflection
+                       f += ((dot * -2) - 1);
+               f *= 128;
+               f += 16; // just to give it a haze so you can see the outline
+               f = bound(0, f, 255);
+               return (qbyte) f;
+       }
+       else
+               return 0;
+}
+
+static void setuptex(int texnum, qbyte *data, qbyte *particletexturedata)
+{
+       int basex, basey, y;
+       basex = ((texnum >> 0) & 7) * 32;
+       basey = ((texnum >> 3) & 7) * 32;
+       particletexture[texnum].s1 = (basex + 1) / 256.0f;
+       particletexture[texnum].t1 = (basey + 1) / 256.0f;
+       particletexture[texnum].s2 = (basex + 31) / 256.0f;
+       particletexture[texnum].t2 = (basey + 31) / 256.0f;
+       for (y = 0;y < 32;y++)
+               memcpy(particletexturedata + ((basey + y) * 256 + basex) * 4, data + y * 32 * 4, 32 * 4);
+}
+
+static void R_InitParticleTexture (void)
+{
+       int x, y, d, i, j, k, m;
+       float cx, cy, dx, dy, radius, f, f2;
+       qbyte data[32][32][4], noise1[64][64], noise2[64][64], data2[64][16][4];
+       vec3_t light;
+       qbyte particletexturedata[256*256*4];
+
+       memset(particletexturedata, 255, sizeof(particletexturedata));
+
+       // smoke/blood
+       for (i = 0;i < 8;i++)
+       {
+               do
+               {
+                       fractalnoise(&noise1[0][0], 64, 4);
+                       fractalnoise(&noise2[0][0], 64, 8);
+                       m = 0;
+                       for (y = 0;y < 32;y++)
+                       {
+                               dy = y - 16;
+                               for (x = 0;x < 32;x++)
+                               {
+                                       data[y][x][0] = data[y][x][1] = data[y][x][2] = 255;
+                                       dx = x - 16;
+                                       d = (noise2[y][x] - 128) * 3 + 192;
+                                       if (d > 0)
+                                               d = (d * (256 - (int) (dx*dx+dy*dy))) >> 8;
+                                       d = (d * noise1[y][x]) >> 7;
+                                       d = bound(0, d, 255);
+                                       data[y][x][3] = (qbyte) d;
+                                       if (m < d)
+                                               m = d;
+                               }
+                       }
+               }
+               while (m < 224);
+
+               setuptex(tex_smoke[i], &data[0][0][0], particletexturedata);
+       }
+
+       // rain splash
+       for (i = 0;i < 16;i++)
+       {
+               radius = i * 3.0f / 16.0f;
+               f2 = 255.0f * ((15.0f - i) / 15.0f);
+               for (y = 0;y < 32;y++)
+               {
+                       dy = (y - 16) * 0.25f;
+                       for (x = 0;x < 32;x++)
+                       {
+                               dx = (x - 16) * 0.25f;
+                               data[y][x][0] = data[y][x][1] = data[y][x][2] = 255;
+                               f = (1.0 - fabs(radius - sqrt(dx*dx+dy*dy))) * f2;
+                               f = bound(0.0f, f, 255.0f);
+                               data[y][x][3] = (int) f;
+                       }
+               }
+               setuptex(tex_rainsplash[i], &data[0][0][0], particletexturedata);
+       }
+
+       // normal particle
+       for (y = 0;y < 32;y++)
+       {
+               dy = y - 16;
+               for (x = 0;x < 32;x++)
+               {
+                       data[y][x][0] = data[y][x][1] = data[y][x][2] = 255;
+                       dx = x - 16;
+                       d = (256 - (dx*dx+dy*dy));
+                       d = bound(0, d, 255);
+                       data[y][x][3] = (qbyte) d;
+               }
+       }
+       setuptex(tex_particle, &data[0][0][0], particletexturedata);
+
+       // rain
+       light[0] = 1;light[1] = 1;light[2] = 1;
+       VectorNormalize(light);
+       for (y = 0;y < 32;y++)
+       {
+               for (x = 0;x < 32;x++)
+               {
+                       data[y][x][0] = data[y][x][1] = data[y][x][2] = 255;
+                       data[y][x][3] = shadebubble((x - 16) * (1.0 / 8.0), y < 24 ? (y - 24) * (1.0 / 24.0) : (y - 24) * (1.0 / 8.0), light);
+               }
+       }
+       setuptex(tex_raindrop, &data[0][0][0], particletexturedata);
+
+       // bubble
+       light[0] = 1;light[1] = 1;light[2] = 1;
+       VectorNormalize(light);
+       for (y = 0;y < 32;y++)
+       {
+               for (x = 0;x < 32;x++)
+               {
+                       data[y][x][0] = data[y][x][1] = data[y][x][2] = 255;
+                       data[y][x][3] = shadebubble((x - 16) * (1.0 / 16.0), (y - 16) * (1.0 / 16.0), light);
+               }
+       }
+       setuptex(tex_bubble, &data[0][0][0], particletexturedata);
+
+       // smoke/blood
+       for (i = 0;i < 8;i++)
+       {
+               memset(&data[0][0][0], 255, sizeof(data));
+               for (j = 1;j < 8;j++)
+               {
+                       for (k = 0;k < 3;k++)
+                       {
+                               cx = lhrandom(j + 1, 30 - j);
+                               cy = lhrandom(j + 1, 30 - j);
+                               for (y = 0;y < 32;y++)
+                               {
+                                       for (x = 0;x < 32;x++)
+                                       {
+                                               dx = (x - cx);
+                                               dy = (y - cy);
+                                               f = 1.0f - sqrt(dx * dx + dy * dy) / j;
+                                               if (f > 0)
+                                               {
+                                                       data[y][x][0] = data[y][x][0] + f * 0.5 * ( 160 - data[y][x][0]);
+                                                       data[y][x][1] = data[y][x][1] + f * 0.5 * ( 32 - data[y][x][1]);
+                                                       data[y][x][2] = data[y][x][2] + f * 0.5 * ( 32 - data[y][x][2]);
+                                               }
+                                       }
+                               }
+                       }
+               }
+               // use inverted colors so we can scale them later using glColor and use an inverse blend
+               for (y = 0;y < 32;y++)
+               {
+                       for (x = 0;x < 32;x++)
+                       {
+                               data[y][x][0] = 255 - data[y][x][0];
+                               data[y][x][1] = 255 - data[y][x][1];
+                               data[y][x][2] = 255 - data[y][x][2];
+                       }
+               }
+               setuptex(tex_blooddecal[i], &data[0][0][0], particletexturedata);
+       }
+
+#if WORKINGLQUAKE
+       glBindTexture(GL_TEXTURE_2D, (particlefonttexture = gl_extension_number++));
+       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
+       glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
+#else
+       particlefonttexture = R_LoadTexture2D(particletexturepool, "particlefont", 256, 256, particletexturedata, TEXTYPE_RGBA, TEXF_ALPHA | TEXF_PRECACHE, NULL);
+       for (i = 0;i < MAX_PARTICLETEXTURES;i++)
+               particletexture[i].texture = particlefonttexture;
+
+       // beam
+       fractalnoise(&noise1[0][0], 64, 4);
+       m = 0;
+       for (y = 0;y < 64;y++)
+       {
+               for (x = 0;x < 16;x++)
+               {
+                       if (x < 8)
+                               d = x;
+                       else
+                               d = (15 - x);
+                       d = d * d * noise1[y][x] / (7 * 7);
+                       data2[y][x][0] = data2[y][x][1] = data2[y][x][2] = (qbyte) bound(0, d, 255);
+                       data2[y][x][3] = 255;
+               }
+       }
+
+       particletexture[tex_beam].texture = R_LoadTexture2D(particletexturepool, "beam", 16, 64, &data2[0][0][0], TEXTYPE_RGBA, TEXF_PRECACHE, NULL);
+       particletexture[tex_beam].s1 = 0;
+       particletexture[tex_beam].t1 = 0;
+       particletexture[tex_beam].s2 = 1;
+       particletexture[tex_beam].t2 = 1;
+#endif
+}
+
+static void r_part_start(void)
+{
+       particletexturepool = R_AllocTexturePool();
+       R_InitParticleTexture ();
+}
+
+static void r_part_shutdown(void)
+{
+       R_FreeTexturePool(&particletexturepool);
+}
+
+static void r_part_newmap(void)
+{
+       cl_numparticles = 0;
+}
+
+void R_Particles_Init (void)
+{
+       Cvar_RegisterVariable(&r_drawparticles);
+#ifdef WORKINGLQUAKE
+       r_part_start();
+#else
+       R_RegisterModule("R_Particles", r_part_start, r_part_shutdown, r_part_newmap);
+#endif
+}
+
+#ifdef WORKINGLQUAKE
+void R_InitParticles(void)
+{
+       CL_Particles_Init();
+       R_Particles_Init();
+}
+
+float varray_vertex[16];
+#endif
+
+#ifdef WORKINGLQUAKE
+void R_DrawParticle(particle_t *p)
+{
+#else
+void R_DrawParticleCallback(const void *calldata1, int calldata2)
+{
+       const particle_t *p = calldata1;
+       rmeshstate_t m;
+#endif
+       float org[3], up2[3], v[3], right[3], up[3], fog, ifog, fogvec[3], cr, cg, cb, ca;
+       particletexture_t *tex;
+
+       VectorCopy(p->org, org);
+
+       if (p->orientation == PARTICLE_BILLBOARD)
+       {
+               VectorScale(vright, p->scalex, right);
+               VectorScale(vup, p->scaley, up);
+               varray_vertex[ 0] = org[0] + right[0] - up[0];
+               varray_vertex[ 1] = org[1] + right[1] - up[1];
+               varray_vertex[ 2] = org[2] + right[2] - up[2];
+               varray_vertex[ 4] = org[0] - right[0] - up[0];
+               varray_vertex[ 5] = org[1] - right[1] - up[1];
+               varray_vertex[ 6] = org[2] - right[2] - up[2];
+               varray_vertex[ 8] = org[0] - right[0] + up[0];
+               varray_vertex[ 9] = org[1] - right[1] + up[1];
+               varray_vertex[10] = org[2] - right[2] + up[2];
+               varray_vertex[12] = org[0] + right[0] + up[0];
+               varray_vertex[13] = org[1] + right[1] + up[1];
+               varray_vertex[14] = org[2] + right[2] + up[2];
+       }
+       else if (p->orientation == PARTICLE_SPARK)
+       {
+               VectorMA(p->org, -p->scaley, p->vel, v);
+               VectorMA(p->org, p->scaley, p->vel, up2);
+               R_CalcBeamVerts(varray_vertex, v, up2, p->scalex);
+       }
+       else if (p->orientation == PARTICLE_BEAM)
+               R_CalcBeamVerts(varray_vertex, p->org, p->vel2, p->scalex);
+       else if (p->orientation == PARTICLE_ORIENTED_DOUBLESIDED)
+       {
+               // double-sided
+               if (DotProduct(p->vel2, r_origin) > DotProduct(p->vel2, org))
+               {
+                       VectorNegate(p->vel2, v);
+                       VectorVectors(v, right, up);
+               }
+               else
+                       VectorVectors(p->vel2, right, up);
+               VectorScale(right, p->scalex, right);
+               VectorScale(up, p->scaley, up);
+               varray_vertex[ 0] = org[0] + right[0] - up[0];
+               varray_vertex[ 1] = org[1] + right[1] - up[1];
+               varray_vertex[ 2] = org[2] + right[2] - up[2];
+               varray_vertex[ 4] = org[0] - right[0] - up[0];
+               varray_vertex[ 5] = org[1] - right[1] - up[1];
+               varray_vertex[ 6] = org[2] - right[2] - up[2];
+               varray_vertex[ 8] = org[0] - right[0] + up[0];
+               varray_vertex[ 9] = org[1] - right[1] + up[1];
+               varray_vertex[10] = org[2] - right[2] + up[2];
+               varray_vertex[12] = org[0] + right[0] + up[0];
+               varray_vertex[13] = org[1] + right[1] + up[1];
+               varray_vertex[14] = org[2] + right[2] + up[2];
+       }
+       else
+               Host_Error("R_DrawParticles: unknown particle orientation %i\n", p->orientation);
+
+       tex = &particletexture[p->texnum];
+       cr = p->color[0] * (1.0f / 255.0f);
+       cg = p->color[1] * (1.0f / 255.0f);
+       cb = p->color[2] * (1.0f / 255.0f);
+       ca = p->alpha * (1.0f / 255.0f);
+       if (p->blendmode == PBLEND_MOD)
+       {
+               cr *= ca;
+               cg *= ca;
+               cb *= ca;
+               cr = min(cr, 1);
+               cg = min(cg, 1);
+               cb = min(cb, 1);
+               ca = 1;
+       }
+
+#if WORKINGLQUAKE
+       if (p->blendmode == 0)
+               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+       else if (p->blendmode == 1)
+               glBlendFunc(GL_SRC_ALPHA, GL_ONE);
+       else
+               glBlendFunc(GL_ZERO, GL_ONE_MINUS_SRC_COLOR);
+       glBegin(GL_QUADS);
+       glColor4f(cr, cg, cb, ca);
+       glTexCoord2f(tex->s2, tex->t1);glVertex3f(varray_vertex[ 0], varray_vertex[ 1], varray_vertex[ 2]);
+       glTexCoord2f(tex->s1, tex->t1);glVertex3f(varray_vertex[ 4], varray_vertex[ 5], varray_vertex[ 6]);
+       glTexCoord2f(tex->s1, tex->t2);glVertex3f(varray_vertex[ 8], varray_vertex[ 9], varray_vertex[10]);
+       glTexCoord2f(tex->s2, tex->t2);glVertex3f(varray_vertex[12], varray_vertex[13], varray_vertex[14]);
+       glEnd();
+#else
+       memset(&m, 0, sizeof(m));
+       if (p->blendmode == 0)
+       {
+               m.blendfunc1 = GL_SRC_ALPHA;
+               m.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
+       }
+       else if (p->blendmode == 1)
+       {
+               m.blendfunc1 = GL_SRC_ALPHA;
+               m.blendfunc2 = GL_ONE;
+       }
+       else
+       {
+               m.blendfunc1 = GL_ZERO;
+               m.blendfunc2 = GL_ONE_MINUS_SRC_COLOR;
+       }
+       m.tex[0] = R_GetTexture(tex->texture);
+       R_Mesh_Matrix(&r_identitymatrix);
+       R_Mesh_State(&m);
+
+       if (fogenabled && p->blendmode != PBLEND_MOD)
+       {
+               VectorSubtract(org, r_origin, fogvec);
+               fog = exp(fogdensity/DotProduct(fogvec,fogvec));
+               ifog = 1 - fog;
+               cr = cr * ifog;
+               cg = cg * ifog;
+               cb = cb * ifog;
+               if (p->blendmode == 0)
+               {
+                       cr += fogcolor[0] * fog;
+                       cg += fogcolor[1] * fog;
+                       cb += fogcolor[2] * fog;
+               }
+       }
+       cr *= r_colorscale;
+       cg *= r_colorscale;
+       cb *= r_colorscale;
+
+       if (p->orientation == PARTICLE_BEAM)
+       {
+               VectorSubtract(p->vel2, p->org, up);
+               VectorNormalizeFast(up);
+               v[0] = DotProduct(p->org, up) * (1.0f / 64.0f) - cl.time * 0.25;
+               v[1] = DotProduct(p->vel2, up) * (1.0f / 64.0f) - cl.time * 0.25;
+               varray_texcoord[0][0] = 1;varray_texcoord[0][1] = v[0];
+               varray_texcoord[0][4] = 0;varray_texcoord[0][5] = v[0];
+               varray_texcoord[0][8] = 0;varray_texcoord[0][9] = v[1];
+               varray_texcoord[0][12] = 1;varray_texcoord[0][13] = v[1];
+       }
+       else
+       {
+               varray_texcoord[0][0] = tex->s2;varray_texcoord[0][1] = tex->t1;
+               varray_texcoord[0][4] = tex->s1;varray_texcoord[0][5] = tex->t1;
+               varray_texcoord[0][8] = tex->s1;varray_texcoord[0][9] = tex->t2;
+               varray_texcoord[0][12] = tex->s2;varray_texcoord[0][13] = tex->t2;
+       }
+
+       GL_Color(cr, cg, cb, ca);
+       R_Mesh_Draw(4, 2, polygonelements);
+#endif
+}
+
+void R_DrawParticles (void)
+{
+       int i;
+       float minparticledist;
+       particle_t *p;
+
+#ifdef WORKINGLQUAKE
+       CL_MoveParticles();
+#endif
+
+       // LordHavoc: early out conditions
+       if ((!cl_numparticles) || (!r_drawparticles.integer))
+               return;
+
+       minparticledist = DotProduct(r_origin, vpn) + 16.0f;
+
+#ifdef WORKINGLQUAKE
+       glBindTexture(GL_TEXTURE_2D, particlefonttexture);
+       glEnable(GL_BLEND);
+       glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
+       glDepthMask(0);
+       // LordHavoc: only render if not too close
+       for (i = 0, p = particles;i < cl_numparticles;i++, p++)
+               if (DotProduct(p->org, vpn) >= minparticledist)
+                       R_DrawParticle(p);
+       glDepthMask(1);
+       glDisable(GL_BLEND);
+       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+#else
+       // LordHavoc: only render if not too close
+       c_particles += cl_numparticles;
+       for (i = 0, p = particles;i < cl_numparticles;i++, p++)
+               if (DotProduct(p->org, vpn) >= minparticledist || p->orientation == PARTICLE_BEAM)
+                       R_MeshQueue_AddTransparent(p->org, R_DrawParticleCallback, p, 0);
+#endif
+}
+