]> de.git.xonotic.org Git - xonotic/darkplaces.git/blobdiff - gl_models.c
rewrote memory system entirely (hunk, cache, and zone are gone, memory pools replaced...
[xonotic/darkplaces.git] / gl_models.c
index a496b1b345afb7219e960bfaf8f2eee690368ced..8684a8f025330e1618eb752f0062ca976108be7b 100644 (file)
@@ -1,6 +1,9 @@
 
 #include "quakedef.h"
 
+//cvar_t gl_transform = {0, "gl_transform", "1"};
+cvar_t gl_lockarrays = {0, "gl_lockarrays", "1"};
+
 typedef struct
 {
        float m[3][4];
@@ -8,22 +11,61 @@ typedef struct
 
 // LordHavoc: vertex array
 float *aliasvert;
-float *modelaliasvert;
 float *aliasvertnorm;
-byte *aliasvertcolor;
-byte *aliasvertcolor2;
+float *aliasvertcolor;
+float *aliasvertcolor2;
 zymbonematrix *zymbonepose;
 int *aliasvertusage;
 
-int chrometexture;
+rmeshinfo_t aliasmeshinfo;
+
+rtexture_t *chrometexture;
+
+int arraylocked = false;
+void GL_LockArray(int first, int count)
+{
+       if (gl_supportslockarrays && gl_lockarrays.integer)
+       {
+               qglLockArraysEXT(first, count);
+               arraylocked = true;
+       }
+}
 
-void makechrometexture()
+void GL_UnlockArray(void)
+{
+       if (arraylocked)
+       {
+               qglUnlockArraysEXT();
+               arraylocked = false;
+       }
+}
+
+/*
+void GL_SetupModelTransform (vec3_t origin, vec3_t angles, vec_t scale)
+{
+    glTranslatef (origin[0], origin[1], origin[2]);
+
+       if (scale != 1)
+               glScalef (scale, scale, scale);
+       if (angles[1])
+           glRotatef (angles[1],  0, 0, 1);
+       if (angles[0])
+           glRotatef (-angles[0],  0, 1, 0);
+       if (angles[2])
+           glRotatef (angles[2],  1, 0, 0);
+}
+*/
+
+rtexturepool_t *chrometexturepool;
+
+// currently unused reflection effect texture
+void makechrometexture(void)
 {
        int i;
        byte noise[64*64];
        byte data[64*64][4];
 
-       fractalnoise(noise, 64, 16);
+       fractalnoise(noise, 64, 8);
 
        // convert to RGBA data
        for (i = 0;i < 64*64;i++)
@@ -32,110 +74,151 @@ void makechrometexture()
                data[i][3] = 255;
        }
 
-       chrometexture = GL_LoadTexture ("chrometexture", 64, 64, &data[0][0], true, false, 4);
+       chrometexture = R_LoadTexture (chrometexturepool, "chrometexture", 64, 64, &data[0][0], TEXTYPE_RGBA, TEXF_MIPMAP | TEXF_PRECACHE);
 }
 
-void gl_models_start()
+mempool_t *gl_models_mempool;
+
+void gl_models_start(void)
 {
        // allocate vertex processing arrays
-       aliasvert = qmalloc(sizeof(float[MD2MAX_VERTS][3]));
-       modelaliasvert = qmalloc(sizeof(float[MD2MAX_VERTS][3]));
-       aliasvertnorm = qmalloc(sizeof(float[MD2MAX_VERTS][3]));
-       aliasvertcolor = qmalloc(sizeof(byte[MD2MAX_VERTS][4]));
-       aliasvertcolor2 = qmalloc(sizeof(byte[MD2MAX_VERTS][4])); // used temporarily for tinted coloring
-       zymbonepose = qmalloc(sizeof(zymbonematrix[256]));
-       aliasvertusage = qmalloc(sizeof(int[MD2MAX_VERTS]));
+       gl_models_mempool = Mem_AllocPool("GL_Models");
+       aliasvert = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][3]));
+       aliasvertnorm = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][3]));
+       aliasvertcolor = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
+       aliasvertcolor2 = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4])); // used temporarily for tinted coloring
+       zymbonepose = Mem_Alloc(gl_models_mempool, sizeof(zymbonematrix[256]));
+       aliasvertusage = Mem_Alloc(gl_models_mempool, sizeof(int[MD2MAX_VERTS]));
+       chrometexturepool = R_AllocTexturePool();
        makechrometexture();
 }
 
-void gl_models_shutdown()
+void gl_models_shutdown(void)
 {
-       qfree(aliasvert);
-       qfree(aliasvertnorm);
-       qfree(aliasvertcolor);
-       qfree(aliasvertcolor2);
-       qfree(zymbonepose);
-       qfree(aliasvertusage);
+       R_FreeTexturePool(&chrometexturepool);
+       Mem_FreePool(&gl_models_mempool);
 }
 
-void GL_Models_Init()
+void gl_models_newmap(void)
 {
-       R_RegisterModule("GL_Models", gl_models_start, gl_models_shutdown);
 }
 
-extern vec3_t softwaretransform_x;
-extern vec3_t softwaretransform_y;
-extern vec3_t softwaretransform_z;
-extern vec_t softwaretransform_scale;
-extern vec3_t softwaretransform_offset;
-extern cvar_t r_modelsdonttransformnormals;
-void R_AliasLerpVerts(int vertcount, float lerp, trivert2 *verts1, vec3_t scale1, vec3_t translate1, trivert2 *verts2, vec3_t scale2, vec3_t translate2)
+void GL_Models_Init(void)
+{
+//     Cvar_RegisterVariable(&gl_transform);
+       Cvar_RegisterVariable(&gl_lockarrays);
+
+       R_RegisterModule("GL_Models", gl_models_start, gl_models_shutdown, gl_models_newmap);
+}
+
+void R_AliasTransformVerts(int vertcount)
+{
+       vec3_t point;
+       float *av, *avn;
+       av = aliasvert;
+       avn = aliasvertnorm;
+       while (vertcount >= 4)
+       {
+               VectorCopy(av, point);softwaretransform(point, av);av += 3;
+               VectorCopy(av, point);softwaretransform(point, av);av += 3;
+               VectorCopy(av, point);softwaretransform(point, av);av += 3;
+               VectorCopy(av, point);softwaretransform(point, av);av += 3;
+               VectorCopy(avn, point);softwaretransformdirection(point, avn);avn += 3;
+               VectorCopy(avn, point);softwaretransformdirection(point, avn);avn += 3;
+               VectorCopy(avn, point);softwaretransformdirection(point, avn);avn += 3;
+               VectorCopy(avn, point);softwaretransformdirection(point, avn);avn += 3;
+               vertcount -= 4;
+       }
+       while(vertcount > 0)
+       {
+               VectorCopy(av, point);softwaretransform(point, av);av += 3;
+               VectorCopy(avn, point);softwaretransformdirection(point, avn);avn += 3;
+               vertcount--;
+       }
+}
+
+void R_AliasLerpVerts(int vertcount,
+                                         float lerp1, trivertx_t *verts1, vec3_t fscale1, vec3_t translate1,
+                                         float lerp2, trivertx_t *verts2, vec3_t fscale2, vec3_t translate2,
+                                         float lerp3, trivertx_t *verts3, vec3_t fscale3, vec3_t translate3,
+                                         float lerp4, trivertx_t *verts4, vec3_t fscale4, vec3_t translate4)
 {
        int i;
-       vec3_t point, matrix_x, matrix_y, matrix_z;
+       vec3_t scale1, scale2, scale3, scale4, translate;
+       float *n1, *n2, *n3, *n4;
        float *av, *avn;
        av = aliasvert;
        avn = aliasvertnorm;
-       VectorScale(softwaretransform_x, softwaretransform_scale, matrix_x);
-       VectorScale(softwaretransform_y, softwaretransform_scale, matrix_y);
-       VectorScale(softwaretransform_z, softwaretransform_scale, matrix_z);
-       if (lerp < 0) lerp = 0;
-       if (lerp > 1) lerp = 1;
-       if (lerp != 0)
+       VectorScale(fscale1, lerp1, scale1);
+       if (lerp2)
        {
-               float ilerp, ilerp127, lerp127, scalex1, scalex2, translatex, scaley1, scaley2, translatey, scalez1, scalez2, translatez;
-               ilerp = 1 - lerp;
-               ilerp127 = ilerp * (1.0 / 127.0);
-               lerp127 = lerp * (1.0 / 127.0);
-               // calculate combined interpolation variables
-               scalex1 = scale1[0] * ilerp;scalex2 = scale2[0] *  lerp;translatex = translate1[0] * ilerp + translate2[0] *  lerp;
-               scaley1 = scale1[1] * ilerp;scaley2 = scale2[1] *  lerp;translatey = translate1[1] * ilerp + translate2[1] *  lerp;
-               scalez1 = scale1[2] * ilerp;scalez2 = scale2[2] *  lerp;translatez = translate1[2] * ilerp + translate2[2] *  lerp;
-               // generate vertices
-               if (r_modelsdonttransformnormals.value)
+               VectorScale(fscale2, lerp2, scale2);
+               if (lerp3)
                {
-                       float *modelav = modelaliasvert;
-                       for (i = 0;i < vertcount;i++)
+                       VectorScale(fscale3, lerp3, scale3);
+                       if (lerp4)
                        {
-                               // rotate, scale, and translate the vertex locations
-                               point[0] = verts1->v[0] * scalex1 + verts2->v[0] * scalex2 + translatex;
-                               point[1] = verts1->v[1] * scaley1 + verts2->v[1] * scaley2 + translatey;
-                               point[2] = verts1->v[2] * scalez1 + verts2->v[2] * scalez2 + translatez;
-                               // save mostly un-transformed copy for lighting
-                               modelav[0] = point[0] * softwaretransform_scale;
-                               modelav[1] = point[1] * softwaretransform_scale;
-                               modelav[2] = point[2] * softwaretransform_scale;
-                               av[0] = point[0] * matrix_x[0] + point[1] * matrix_y[0] + point[2] * matrix_z[0] + softwaretransform_offset[0];
-                               av[1] = point[0] * matrix_x[1] + point[1] * matrix_y[1] + point[2] * matrix_z[1] + softwaretransform_offset[1];
-                               av[2] = point[0] * matrix_x[2] + point[1] * matrix_y[2] + point[2] * matrix_z[2] + softwaretransform_offset[2];
-                               // decompress but do not transform the normals
-                               avn[0] = verts1->n[0] * ilerp127 + verts2->n[0] * lerp127;
-                               avn[1] = verts1->n[1] * ilerp127 + verts2->n[1] * lerp127;
-                               avn[2] = verts1->n[2] * ilerp127 + verts2->n[2] * lerp127;
-                               modelav += 3;
-                               av += 3;
-                               avn += 3;
-                               verts1++;verts2++;
+                               VectorScale(fscale4, lerp4, scale4);
+                               translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3 + translate4[0] * lerp4;
+                               translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3 + translate4[1] * lerp4;
+                               translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3 + translate4[2] * lerp4;
+                               // generate vertices
+                               for (i = 0;i < vertcount;i++)
+                               {
+                                       av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + verts4->v[0] * scale4[0] + translate[0];
+                                       av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + verts4->v[1] * scale4[1] + translate[1];
+                                       av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + verts4->v[2] * scale4[2] + translate[2];
+                                       n1 = m_bytenormals[verts1->lightnormalindex];
+                                       n2 = m_bytenormals[verts2->lightnormalindex];
+                                       n3 = m_bytenormals[verts3->lightnormalindex];
+                                       n4 = m_bytenormals[verts4->lightnormalindex];
+                                       avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3 + n4[0] * lerp4;
+                                       avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3 + n4[1] * lerp4;
+                                       avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3 + n4[2] * lerp4;
+                                       av += 3;
+                                       avn += 3;
+                                       verts1++;verts2++;verts3++;verts4++;
+                               }
+                       }
+                       else
+                       {
+                               translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3;
+                               translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3;
+                               translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3;
+                               // generate vertices
+                               for (i = 0;i < vertcount;i++)
+                               {
+                                       av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + translate[0];
+                                       av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + translate[1];
+                                       av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + translate[2];
+                                       n1 = m_bytenormals[verts1->lightnormalindex];
+                                       n2 = m_bytenormals[verts2->lightnormalindex];
+                                       n3 = m_bytenormals[verts3->lightnormalindex];
+                                       avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3;
+                                       avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3;
+                                       avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3;
+                                       av += 3;
+                                       avn += 3;
+                                       verts1++;verts2++;verts3++;
+                               }
                        }
                }
                else
                {
+                       translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2;
+                       translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2;
+                       translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2;
+                       // generate vertices
                        for (i = 0;i < vertcount;i++)
                        {
-                               // rotate, scale, and translate the vertex locations
-                               point[0] = verts1->v[0] * scalex1 + verts2->v[0] * scalex2 + translatex;
-                               point[1] = verts1->v[1] * scaley1 + verts2->v[1] * scaley2 + translatey;
-                               point[2] = verts1->v[2] * scalez1 + verts2->v[2] * scalez2 + translatez;
-                               av[0] = point[0] * matrix_x[0] + point[1] * matrix_y[0] + point[2] * matrix_z[0] + softwaretransform_offset[0];
-                               av[1] = point[0] * matrix_x[1] + point[1] * matrix_y[1] + point[2] * matrix_z[1] + softwaretransform_offset[1];
-                               av[2] = point[0] * matrix_x[2] + point[1] * matrix_y[2] + point[2] * matrix_z[2] + softwaretransform_offset[2];
-                               // rotate the normals
-                               point[0] = verts1->n[0] * ilerp127 + verts2->n[0] * lerp127;
-                               point[1] = verts1->n[1] * ilerp127 + verts2->n[1] * lerp127;
-                               point[2] = verts1->n[2] * ilerp127 + verts2->n[2] * lerp127;
-                               avn[0] = point[0] * softwaretransform_x[0] + point[1] * softwaretransform_y[0] + point[2] * softwaretransform_z[0];
-                               avn[1] = point[0] * softwaretransform_x[1] + point[1] * softwaretransform_y[1] + point[2] * softwaretransform_z[1];
-                               avn[2] = point[0] * softwaretransform_x[2] + point[1] * softwaretransform_y[2] + point[2] * softwaretransform_z[2];
+                               av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + translate[0];
+                               av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + translate[1];
+                               av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + translate[2];
+                               n1 = m_bytenormals[verts1->lightnormalindex];
+                               n2 = m_bytenormals[verts2->lightnormalindex];
+                               avn[0] = n1[0] * lerp1 + n2[0] * lerp2;
+                               avn[1] = n1[1] * lerp1 + n2[1] * lerp2;
+                               avn[2] = n1[2] * lerp1 + n2[2] * lerp2;
                                av += 3;
                                avn += 3;
                                verts1++;verts2++;
@@ -144,28 +227,22 @@ void R_AliasLerpVerts(int vertcount, float lerp, trivert2 *verts1, vec3_t scale1
        }
        else
        {
+               translate[0] = translate1[0] * lerp1;
+               translate[1] = translate1[1] * lerp1;
+               translate[2] = translate1[2] * lerp1;
                // generate vertices
-               if (r_modelsdonttransformnormals.value)
+               if (lerp1 != 1)
                {
-                       float *modelav = modelaliasvert;
+                       // general but almost never used case
                        for (i = 0;i < vertcount;i++)
                        {
-                               // rotate, scale, and translate the vertex locations
-                               point[0] = verts1->v[0] * scale1[0] + translate1[0];
-                               point[1] = verts1->v[1] * scale1[1] + translate1[1];
-                               point[2] = verts1->v[2] * scale1[2] + translate1[2];
-                               // save mostly un-transformed copy for lighting
-                               modelav[0] = point[0] * softwaretransform_scale;
-                               modelav[1] = point[1] * softwaretransform_scale;
-                               modelav[2] = point[2] * softwaretransform_scale;
-                               av[0] = point[0] * matrix_x[0] + point[1] * matrix_y[0] + point[2] * matrix_z[0] + softwaretransform_offset[0];
-                               av[1] = point[0] * matrix_x[1] + point[1] * matrix_y[1] + point[2] * matrix_z[1] + softwaretransform_offset[1];
-                               av[2] = point[0] * matrix_x[2] + point[1] * matrix_y[2] + point[2] * matrix_z[2] + softwaretransform_offset[2];
-                               // decompress normal but do not rotate it
-                               avn[0] = verts1->n[0] * (1.0f / 127.0f);
-                               avn[1] = verts1->n[1] * (1.0f / 127.0f);
-                               avn[2] = verts1->n[2] * (1.0f / 127.0f);
-                               modelav += 3;
+                               av[0] = verts1->v[0] * scale1[0] + translate[0];
+                               av[1] = verts1->v[1] * scale1[1] + translate[1];
+                               av[2] = verts1->v[2] * scale1[2] + translate[2];
+                               n1 = m_bytenormals[verts1->lightnormalindex];
+                               avn[0] = n1[0] * lerp1;
+                               avn[1] = n1[1] * lerp1;
+                               avn[2] = n1[2] * lerp1;
                                av += 3;
                                avn += 3;
                                verts1++;
@@ -173,22 +250,13 @@ void R_AliasLerpVerts(int vertcount, float lerp, trivert2 *verts1, vec3_t scale1
                }
                else
                {
+                       // fast normal case
                        for (i = 0;i < vertcount;i++)
                        {
-                               // rotate, scale, and translate the vertex locations
-                               point[0] = verts1->v[0] * scale1[0] + translate1[0];
-                               point[1] = verts1->v[1] * scale1[1] + translate1[1];
-                               point[2] = verts1->v[2] * scale1[2] + translate1[2];
-                               av[0] = point[0] * matrix_x[0] + point[1] * matrix_y[0] + point[2] * matrix_z[0] + softwaretransform_offset[0];
-                               av[1] = point[0] * matrix_x[1] + point[1] * matrix_y[1] + point[2] * matrix_z[1] + softwaretransform_offset[1];
-                               av[2] = point[0] * matrix_x[2] + point[1] * matrix_y[2] + point[2] * matrix_z[2] + softwaretransform_offset[2];
-                               // rotate the normals
-                               point[0] = verts1->n[0] * (1.0f / 127.0f);
-                               point[1] = verts1->n[1] * (1.0f / 127.0f);
-                               point[2] = verts1->n[2] * (1.0f / 127.0f);
-                               avn[0] = point[0] * softwaretransform_x[0] + point[1] * softwaretransform_y[0] + point[2] * softwaretransform_z[0];
-                               avn[1] = point[0] * softwaretransform_x[1] + point[1] * softwaretransform_y[1] + point[2] * softwaretransform_z[1];
-                               avn[2] = point[0] * softwaretransform_x[2] + point[1] * softwaretransform_y[2] + point[2] * softwaretransform_z[2];
+                               av[0] = verts1->v[0] * scale1[0] + translate[0];
+                               av[1] = verts1->v[1] * scale1[1] + translate[1];
+                               av[2] = verts1->v[2] * scale1[2] + translate[2];
+                               VectorCopy(m_bytenormals[verts1->lightnormalindex], avn);
                                av += 3;
                                avn += 3;
                                verts1++;
@@ -197,160 +265,229 @@ void R_AliasLerpVerts(int vertcount, float lerp, trivert2 *verts1, vec3_t scale1
        }
 }
 
-float R_CalcAnimLerp(entity_t *ent, int pose, float lerpscale)
-{
-       if (ent->draw_lastmodel == ent->model && ent->draw_lerpstart <= cl.time)
-       {
-               if (pose != ent->draw_pose)
-               {
-                       ent->draw_lastpose = ent->draw_pose;
-                       ent->draw_pose = pose;
-                       ent->draw_lerpstart = cl.time;
-                       return 0;
-               }
-               else
-                       return ((cl.time - ent->draw_lerpstart) * lerpscale);
-       }
-       else // uninitialized
-       {
-               ent->draw_lastmodel = ent->model;
-               ent->draw_lastpose = ent->draw_pose = pose;
-               ent->draw_lerpstart = cl.time;
-               return 0;
-       }
-}
-
-void GL_DrawModelMesh(int skin, byte *colors, maliashdr_t *maliashdr)
+void GL_DrawModelMesh(rtexture_t *skin, float *colors, float cred, float cgreen, float cblue)
 {
-       int i;
-       if (!r_render.value)
-               return;
-       glBindTexture(GL_TEXTURE_2D, skin);
-       if (!colors)
+       aliasmeshinfo.tex[0] = R_GetTexture(skin);
+       aliasmeshinfo.color = colors;
+       if (colors == NULL)
        {
-               if (lighthalf)
-                       glColor3f(0.5f, 0.5f, 0.5f);
-               else
-                       glColor3f(1.0f, 1.0f, 1.0f);
+               aliasmeshinfo.cr = cred;
+               aliasmeshinfo.cg = cgreen;
+               aliasmeshinfo.cb = cblue;
+               aliasmeshinfo.ca = currentrenderentity->alpha;
        }
-       if (gl_vertexarrays.value)
-       {
-               if (colors)
-               {
-                       qglColorPointer(4, GL_UNSIGNED_BYTE, 0, colors);
-                       glEnableClientState(GL_COLOR_ARRAY);
-               }
-
-               qglTexCoordPointer(2, GL_FLOAT, 0, (void *)((int) maliashdr->texdata + (int) maliashdr));
-               glEnableClientState(GL_TEXTURE_COORD_ARRAY);
 
-               qglDrawElements(GL_TRIANGLES, maliashdr->numtris * 3, GL_UNSIGNED_SHORT, (void *)((int) maliashdr + maliashdr->tridata));
+       R_Mesh_Draw(&aliasmeshinfo);
 
-               glDisableClientState(GL_TEXTURE_COORD_ARRAY);
-
-               if (colors)
-                       glDisableClientState(GL_COLOR_ARRAY);
-       }
-       else
-       {
-               unsigned short *in, index;
-               float *tex;
-               in = (void *)((int) maliashdr + maliashdr->tridata);
-               glBegin(GL_TRIANGLES);
-               tex = (void *)((int) maliashdr + maliashdr->texdata);
-               for (i = 0;i < maliashdr->numtris * 3;i++)
-               {
-                       index = *in++;
-                       glTexCoord2f(tex[index*2], tex[index*2+1]);
-                       if (colors)
-                               glColor4f(colors[index*4] * (1.0f / 255.0f), colors[index*4+1] * (1.0f / 255.0f), colors[index*4+2] * (1.0f / 255.0f), colors[index*4+3] * (1.0f / 255.0f));
-                       glVertex3fv(&aliasvert[index*3]);
-               }
-               glEnd();
-       }
        // leave it in a state for additional passes
-       glDepthMask(0);
-       glEnable(GL_BLEND);
-       glBlendFunc(GL_SRC_ALPHA, GL_ONE); // additive
+       aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+       aliasmeshinfo.blendfunc2 = GL_ONE;
 }
 
-void R_TintModel(byte *in, byte *out, int verts, byte *color)
+void R_TintModel(float *in, float *out, int verts, float r, float g, float b)
 {
        int i;
-       byte r = color[0];
-       byte g = color[1];
-       byte b = color[2];
        for (i = 0;i < verts;i++)
        {
-               out[0] = (byte) ((in[0] * r) >> 8);
-               out[1] = (byte) ((in[1] * g) >> 8);
-               out[2] = (byte) ((in[2] * b) >> 8);
-               out[3] =          in[3];
+               out[0] = in[0] * r;
+               out[1] = in[1] * g;
+               out[2] = in[2] * b;
+               out[3] = in[3];
                in += 4;
                out += 4;
        }
 }
 
-/*
-=================
-R_DrawAliasFrame
+void R_SetupMDLMD2Frames(skinframe_t **skinframe)
+{
+       md2frame_t *frame1, *frame2, *frame3, *frame4;
+       trivertx_t *frame1verts, *frame2verts, *frame3verts, *frame4verts;
+       model_t *model;
+       model = currentrenderentity->model;
 
-=================
-*/
-extern vec3_t lightspot;
-void R_LightModel(int numverts, vec3_t center, vec3_t basecolor);
-void R_DrawAliasFrame (maliashdr_t *maliashdr, float alpha, vec3_t color, entity_t *ent, int shadow, vec3_t org, vec3_t angles, int frame, int *skin, int colormap, int effects, int flags)
+       if (model->skinscenes[currentrenderentity->skinnum].framecount > 1)
+               *skinframe = &model->skinframes[model->skinscenes[currentrenderentity->skinnum].firstframe + (int) (cl.time * 10) % model->skinscenes[currentrenderentity->skinnum].framecount];
+       else
+               *skinframe = &model->skinframes[model->skinscenes[currentrenderentity->skinnum].firstframe];
+
+       softwaretransformforentity(currentrenderentity);
+
+       frame1 = &model->mdlmd2data_frames[currentrenderentity->frameblend[0].frame];
+       frame2 = &model->mdlmd2data_frames[currentrenderentity->frameblend[1].frame];
+       frame3 = &model->mdlmd2data_frames[currentrenderentity->frameblend[2].frame];
+       frame4 = &model->mdlmd2data_frames[currentrenderentity->frameblend[3].frame];
+       frame1verts = &model->mdlmd2data_pose[currentrenderentity->frameblend[0].frame * model->numverts];
+       frame2verts = &model->mdlmd2data_pose[currentrenderentity->frameblend[1].frame * model->numverts];
+       frame3verts = &model->mdlmd2data_pose[currentrenderentity->frameblend[2].frame * model->numverts];
+       frame4verts = &model->mdlmd2data_pose[currentrenderentity->frameblend[3].frame * model->numverts];
+       /*
+       if (currentrenderentity->frameblend[0].lerp)
+               Con_Printf("frame1: %i/%i %s scale %f %f %f translate %f %f %f\n", currentrenderentity->frameblend[0].frame, model->numframes, frame1->name, frame1->scale[0], frame1->scale[1], frame1->scale[2], frame1->translate[0], frame1->translate[1], frame1->translate[2]);
+       if (currentrenderentity->frameblend[1].lerp)
+               Con_Printf("frame2: %i/%i %s scale %f %f %f translate %f %f %f\n", currentrenderentity->frameblend[0].frame, model->numframes, frame2->name, frame2->scale[0], frame2->scale[1], frame2->scale[2], frame2->translate[0], frame2->translate[1], frame2->translate[2]);
+       if (currentrenderentity->frameblend[2].lerp)
+               Con_Printf("frame3: %i/%i %s scale %f %f %f translate %f %f %f\n", currentrenderentity->frameblend[0].frame, model->numframes, frame3->name, frame3->scale[0], frame3->scale[1], frame3->scale[2], frame3->translate[0], frame3->translate[1], frame3->translate[2]);
+       if (currentrenderentity->frameblend[3].lerp)
+               Con_Printf("frame4: %i/%i %s scale %f %f %f translate %f %f %f\n", currentrenderentity->frameblend[0].frame, model->numframes, frame4->name, frame4->scale[0], frame4->scale[1], frame4->scale[2], frame4->translate[0], frame4->translate[1], frame4->translate[2]);
+       */
+       R_AliasLerpVerts(model->numverts,
+               currentrenderentity->frameblend[0].lerp, frame1verts, frame1->scale, frame1->translate,
+               currentrenderentity->frameblend[1].lerp, frame2verts, frame2->scale, frame2->translate,
+               currentrenderentity->frameblend[2].lerp, frame3verts, frame3->scale, frame3->translate,
+               currentrenderentity->frameblend[3].lerp, frame4verts, frame4->scale, frame4->translate);
+       R_AliasTransformVerts(model->numverts);
+
+       R_LightModel(model->numverts);
+}
+
+void R_DrawQ1AliasModel (void)
 {
-       int             i, pose;
-       float   lerpscale, lerp;
-       maliasframe_t *frameinfo;
+       float fog;
+       vec3_t diff;
+       model_t *model;
+       skinframe_t *skinframe;
+
+       model = currentrenderentity->model;
 
-       softwaretransformforentity(ent);
+       R_SetupMDLMD2Frames(&skinframe);
 
-       if ((frame >= maliashdr->numframes) || (frame < 0))
+       memset(&aliasmeshinfo, 0, sizeof(aliasmeshinfo));
+
+       aliasmeshinfo.vertex = aliasvert;
+       aliasmeshinfo.vertexstep = sizeof(float[3]);
+       aliasmeshinfo.numverts = model->numverts;
+       aliasmeshinfo.numtriangles = model->numtris;
+       aliasmeshinfo.index = model->mdldata_indices;
+       aliasmeshinfo.colorstep = sizeof(float[4]);
+       aliasmeshinfo.texcoords[0] = model->mdldata_texcoords;
+       aliasmeshinfo.texcoordstep[0] = sizeof(float[2]);
+
+       fog = 0;
+       if (fogenabled)
        {
-               Con_DPrintf ("R_AliasSetupFrame: no such frame %d\n", frame);
-               frame = 0;
+               VectorSubtract(currentrenderentity->origin, r_origin, diff);
+               fog = exp(fogdensity/DotProduct(diff,diff));
+               if (fog > 1)
+                       fog = 1;
+               if (fog < 0.01f)
+                       fog = 0;
+               // fog method: darken, additive fog
+               // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
+               // 2. render fog as additive
        }
 
-       frameinfo = ((maliasframe_t *)((int) maliashdr + maliashdr->framedata)) + frame;
-       pose = frameinfo->start;
-
-       if (frameinfo->length > 1)
+       if (currentrenderentity->effects & EF_ADDITIVE)
+       {
+               aliasmeshinfo.transparent = true;
+               aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+               aliasmeshinfo.blendfunc2 = GL_ONE;
+       }
+       else if (currentrenderentity->alpha != 1.0 || skinframe->fog != NULL)
        {
-               lerpscale = frameinfo->rate;
-               pose += (int)(cl.time * frameinfo->rate) % frameinfo->length;
+               aliasmeshinfo.transparent = true;
+               aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+               aliasmeshinfo.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
        }
        else
-               lerpscale = 10.0f;
-
-       lerp = R_CalcAnimLerp(ent, pose, lerpscale);
+       {
+               aliasmeshinfo.transparent = false;
+               aliasmeshinfo.blendfunc1 = GL_ONE;
+               aliasmeshinfo.blendfunc2 = GL_ZERO;
+       }
 
-       R_AliasLerpVerts(maliashdr->numverts, lerp, (trivert2 *)((int) maliashdr + maliashdr->posedata) + ent->draw_lastpose * maliashdr->numverts, maliashdr->scale, maliashdr->scale_origin, (trivert2 *)((int) maliashdr + maliashdr->posedata) + ent->draw_pose * maliashdr->numverts, maliashdr->scale, maliashdr->scale_origin);
+       // darken source
+       if (fog)
+               R_TintModel(aliasvertcolor, aliasvertcolor, model->numverts, 1 - fog, 1 - fog, 1 - fog);
 
-       // prep the vertex array as early as possible
-       if (r_render.value)
+       if (skinframe->base || skinframe->pants || skinframe->shirt || skinframe->glow || skinframe->merged)
        {
-               if (gl_vertexarrays.value)
+               if (currentrenderentity->colormap >= 0 && (skinframe->base || skinframe->pants || skinframe->shirt))
+               {
+                       int c;
+                       byte *color;
+                       if (skinframe->base)
+                               GL_DrawModelMesh(skinframe->base, aliasvertcolor, 0, 0, 0);
+                       if (skinframe->pants)
+                       {
+                               c = (currentrenderentity->colormap & 0xF) << 4;c += (c >= 128 && c < 224) ? 4 : 12; // 128-224 are backwards ranges
+                               color = (byte *) (&d_8to24table[c]);
+                               if (c >= 224) // fullbright ranges
+                                       GL_DrawModelMesh(skinframe->pants, NULL, color[0] * (1.0f / 255.0f), color[1] * (1.0f / 255.0f), color[2] * (1.0f / 255.0f));
+                               else
+                               {
+                                       R_TintModel(aliasvertcolor, aliasvertcolor2, model->numverts, color[0] * (1.0f / 255.0f), color[1] * (1.0f / 255.0f), color[2] * (1.0f / 255.0f));
+                                       GL_DrawModelMesh(skinframe->pants, aliasvertcolor2, 0, 0, 0);
+                               }
+                       }
+                       if (skinframe->shirt)
+                       {
+                               c = currentrenderentity->colormap & 0xF0      ;c += (c >= 128 && c < 224) ? 4 : 12; // 128-224 are backwards ranges
+                               color = (byte *) (&d_8to24table[c]);
+                               if (c >= 224) // fullbright ranges
+                                       GL_DrawModelMesh(skinframe->shirt, NULL, color[0] * (1.0f / 255.0f), color[1] * (1.0f / 255.0f), color[2] * (1.0f / 255.0f));
+                               else
+                               {
+                                       R_TintModel(aliasvertcolor, aliasvertcolor2, model->numverts, color[0] * (1.0f / 255.0f), color[1] * (1.0f / 255.0f), color[2] * (1.0f / 255.0f));
+                                       GL_DrawModelMesh(skinframe->shirt, aliasvertcolor2, 0, 0, 0);
+                               }
+                       }
+               }
+               else
                {
-                       qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-                       glEnableClientState(GL_VERTEX_ARRAY);
+                       if (skinframe->merged)
+                               GL_DrawModelMesh(skinframe->merged, aliasvertcolor, 0, 0, 0);
+                       else
+                       {
+                               if (skinframe->base) GL_DrawModelMesh(skinframe->base, aliasvertcolor, 0, 0, 0);
+                               if (skinframe->pants) GL_DrawModelMesh(skinframe->pants, aliasvertcolor, 0, 0, 0);
+                               if (skinframe->shirt) GL_DrawModelMesh(skinframe->shirt, aliasvertcolor, 0, 0, 0);
+                       }
                }
+               if (skinframe->glow) GL_DrawModelMesh(skinframe->glow, NULL, 1 - fog, 1 - fog, 1 - fog);
        }
+       else
+               GL_DrawModelMesh(0, NULL, 1 - fog, 1 - fog, 1 - fog);
 
-       R_LightModel(maliashdr->numverts, org, color);
+       if (fog)
+       {
+               aliasmeshinfo.tex[0] = R_GetTexture(skinframe->fog);
+               aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+               aliasmeshinfo.blendfunc2 = GL_ONE;
+               aliasmeshinfo.color = NULL;
 
-       if (!r_render.value)
+               aliasmeshinfo.cr = fogcolor[0];
+               aliasmeshinfo.cg = fogcolor[1];
+               aliasmeshinfo.cb = fogcolor[2];
+               aliasmeshinfo.ca = currentrenderentity->alpha * fog;
+
+               R_Mesh_Draw(&aliasmeshinfo);
+       }
+}
+
+void R_DrawQ2AliasModel (void)
+{
+       int *order, count;
+       vec3_t diff;
+       skinframe_t *skinframe;
+       model_t *model;
+
+       model = currentrenderentity->model;
+
+       R_SetupMDLMD2Frames(&skinframe);
+
+       if (!r_render.integer)
                return;
-       glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
-       glShadeModel(GL_SMOOTH);
-       if (effects & EF_ADDITIVE)
+
+       // FIXME FIXME FIXME rewrite loader to convert to triangle mesh
+       glBindTexture(GL_TEXTURE_2D, R_GetTexture(skinframe->base));
+
+       if (currentrenderentity->effects & EF_ADDITIVE)
        {
                glBlendFunc(GL_SRC_ALPHA, GL_ONE); // additive rendering
                glEnable(GL_BLEND);
                glDepthMask(0);
        }
-       else if (alpha != 1.0)
+       else if (currentrenderentity->alpha != 1.0 || R_TextureHasAlpha(skinframe->base))
        {
                glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
                glEnable(GL_BLEND);
@@ -362,156 +499,61 @@ void R_DrawAliasFrame (maliashdr_t *maliashdr, float alpha, vec3_t color, entity
                glDepthMask(1);
        }
 
-       if (colormap >= 0)
+       // LordHavoc: big mess...
+       // using vertex arrays only slightly, although it is enough to prevent duplicates
+       // (saving half the transforms)
+       glVertexPointer(3, GL_FLOAT, sizeof(float[3]), aliasvert);
+       glColorPointer(4, GL_FLOAT, sizeof(float[4]), aliasvertcolor);
+       glEnableClientState(GL_VERTEX_ARRAY);
+       glEnableClientState(GL_COLOR_ARRAY);
+
+       GL_LockArray(0, model->numverts);
+
+       order = model->md2data_glcmds;
+       while(1)
        {
-               if (!skin[0] && !skin[1] && !skin[2] && !skin[3])
-                       GL_DrawModelMesh(0, NULL, maliashdr);
+               if (!(count = *order++))
+                       break;
+               if (count > 0)
+                       glBegin(GL_TRIANGLE_STRIP);
                else
                {
-                       int c;
-                       if (skin[0])
-                               GL_DrawModelMesh(skin[0], aliasvertcolor, maliashdr);
-                       if (skin[1])
-                       {
-                               c = (colormap & 0xF) << 4;c += (c >= 128 && c < 224) ? 4 : 12; // 128-224 are backwards ranges
-                               R_TintModel(aliasvertcolor, aliasvertcolor2, maliashdr->numverts, (byte *) (&d_8to24table[c]));
-                               GL_DrawModelMesh(skin[1], aliasvertcolor2, maliashdr);
-                       }
-                       if (skin[2])
-                       {
-                               c = colormap & 0xF0      ;c += (c >= 128 && c < 224) ? 4 : 12; // 128-224 are backwards ranges
-                               R_TintModel(aliasvertcolor, aliasvertcolor2, maliashdr->numverts, (byte *) (&d_8to24table[c]));
-                               GL_DrawModelMesh(skin[2], aliasvertcolor2, maliashdr);
-                       }
-                       if (skin[3]) GL_DrawModelMesh(skin[3], NULL, maliashdr);
+                       glBegin(GL_TRIANGLE_FAN);
+                       count = -count;
                }
-       }
-       else
-       {
-               if (!skin[3] && !skin[4])
-                       GL_DrawModelMesh(0, NULL, maliashdr);
-               else
+               do
                {
-                       if (skin[4]) GL_DrawModelMesh(skin[4], aliasvertcolor, maliashdr);
-                       if (skin[3]) GL_DrawModelMesh(skin[3], NULL, maliashdr);
+                       glTexCoord2f(((float *)order)[0], ((float *)order)[1]);
+                       glArrayElement(order[2]);
+                       order += 3;
                }
+               while (count--);
        }
 
-       if (fogenabled)
-       {
-               vec3_t diff;
-               glDisable (GL_TEXTURE_2D);
-               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-               glEnable (GL_BLEND);
-               glDepthMask(0); // disable zbuffer updates
-
-               VectorSubtract(org, r_refdef.vieworg, diff);
-               glColor4f(fogcolor[0], fogcolor[1], fogcolor[2], exp(fogdensity/DotProduct(diff,diff)));
+       GL_UnlockArray();
 
-               if (gl_vertexarrays.value)
-               {
-                       qglDrawElements(GL_TRIANGLES, maliashdr->numtris * 3, GL_UNSIGNED_SHORT, (void *)((int) maliashdr + maliashdr->tridata));
-               }
-               else
-               {
-                       unsigned short *in;
-                       in = (void *)((int) maliashdr + maliashdr->tridata);
-                       glBegin(GL_TRIANGLES);
-                       for (i = 0;i < maliashdr->numtris * 3;i++)
-                               glVertex3fv(&aliasvert[*in++ * 3]);
-                       glEnd();
-               }
-
-               glEnable (GL_TEXTURE_2D);
-               glColor3f (1,1,1);
-       }
-       if (gl_vertexarrays.value)
-               glDisableClientState(GL_VERTEX_ARRAY);
+       glDisableClientState(GL_COLOR_ARRAY);
+       glDisableClientState(GL_VERTEX_ARRAY);
 
-       if (!fogenabled && r_shadows.value && !(effects & EF_ADDITIVE) && shadow)
+       if (fogenabled)
        {
-               // flatten it to make a shadow
-               float *av = aliasvert + 2, l = lightspot[2] + 0.125;
-               av = aliasvert + 2;
-               for (i = 0;i < maliashdr->numverts;i++, av+=3)
-                       if (*av > l)
-                               *av = l;
                glDisable (GL_TEXTURE_2D);
                glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
                glEnable (GL_BLEND);
                glDepthMask(0); // disable zbuffer updates
-               glColor4f (0,0,0,0.5 * alpha);
-
-               if (gl_vertexarrays.value)
-               {
-                       qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-                       glEnableClientState(GL_VERTEX_ARRAY);
-                       qglDrawElements(GL_TRIANGLES, maliashdr->numtris * 3, GL_UNSIGNED_SHORT, (void *)((int) maliashdr + maliashdr->tridata));
-                       glDisableClientState(GL_VERTEX_ARRAY);
-               }
-               else
-               {
-                       unsigned short *in;
-                       in = (void *)((int) maliashdr + maliashdr->tridata);
-                       glBegin(GL_TRIANGLES);
-                       for (i = 0;i < maliashdr->numtris * 3;i++)
-                               glVertex3fv(&aliasvert[*in++ * 3]);
-                       glEnd();
-               }
-
-               glEnable (GL_TEXTURE_2D);
-               glColor3f (1,1,1);
-       }
-
-       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-       glEnable (GL_BLEND);
-       glDepthMask(1);
-}
-
-/*
-=================
-R_DrawQ2AliasFrame
-
-=================
-*/
-void R_DrawQ2AliasFrame (md2mem_t *pheader, float alpha, vec3_t color, entity_t *ent, int shadow, vec3_t org, vec3_t angles, int frame, int skin, int effects, int flags)
-{
-       int *order, count;
-       float lerp;
-       md2memframe_t *frame1, *frame2;
-
-       if (r_render.value)
-               glBindTexture(GL_TEXTURE_2D, skin);
-
-       softwaretransformforentity(ent);
-
-       if ((frame >= pheader->num_frames) || (frame < 0))
-       {
-               Con_DPrintf ("R_SetupQ2AliasFrame: no such frame %d\n", frame);
-               frame = 0;
-       }
 
-       lerp = R_CalcAnimLerp(ent, frame, 10);
+               VectorSubtract(currentrenderentity->origin, r_origin, diff);
+               glColor4f(fogcolor[0], fogcolor[1], fogcolor[2], currentrenderentity->alpha * exp(fogdensity/DotProduct(diff,diff)));
 
-       frame1 = (void *)((int) pheader + pheader->ofs_frames + (pheader->framesize * ent->draw_lastpose));
-       frame2 = (void *)((int) pheader + pheader->ofs_frames + (pheader->framesize * ent->draw_pose));
-       R_AliasLerpVerts(pheader->num_xyz, lerp, frame1->verts, frame1->scale, frame1->translate, frame2->verts, frame2->scale, frame2->translate);
-
-       R_LightModel(pheader->num_xyz, org, color);
-
-       if (!r_render.value)
-               return;
-       if (gl_vertexarrays.value)
-       {
                // LordHavoc: big mess...
-               // using arrays only slightly, although it is enough to prevent duplicates
+               // using vertex arrays only slightly, although it is enough to prevent duplicates
                // (saving half the transforms)
-               qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-               qglColorPointer(4, GL_UNSIGNED_BYTE, 0, aliasvertcolor);
+               glVertexPointer(3, GL_FLOAT, sizeof(float[3]), aliasvert);
                glEnableClientState(GL_VERTEX_ARRAY);
-               glEnableClientState(GL_COLOR_ARRAY);
 
-               order = (int *)((int)pheader + pheader->ofs_glcmds);
+               GL_LockArray(0, model->numverts);
+
+               order = model->md2data_glcmds;
                while(1)
                {
                        if (!(count = *order++))
@@ -525,230 +567,182 @@ void R_DrawQ2AliasFrame (md2mem_t *pheader, float alpha, vec3_t color, entity_t
                        }
                        do
                        {
-                               glTexCoord2f(((float *)order)[0], ((float *)order)[1]);
-                               qglArrayElement(order[2]);
+                               glArrayElement(order[2]);
                                order += 3;
                        }
                        while (count--);
                }
 
-               glDisableClientState(GL_COLOR_ARRAY);
+               GL_UnlockArray();
+
                glDisableClientState(GL_VERTEX_ARRAY);
-       }
-       else
-       {
-               order = (int *)((int)pheader + pheader->ofs_glcmds);
-               while(1)
-               {
-                       if (!(count = *order++))
-                               break;
-                       if (count > 0)
-                               glBegin(GL_TRIANGLE_STRIP);
-                       else
-                       {
-                               glBegin(GL_TRIANGLE_FAN);
-                               count = -count;
-                       }
-                       do
-                       {
-                               glTexCoord2f(((float *)order)[0], ((float *)order)[1]);
-                               glColor4f(aliasvertcolor[order[2] * 4] * (1.0f / 255.0f), aliasvertcolor[order[2] * 4 + 1] * (1.0f / 255.0f), aliasvertcolor[order[2] * 4 + 2] * (1.0f / 255.0f), aliasvertcolor[order[2] * 4 + 3] * (1.0f / 255.0f));
-                               glVertex3fv(&aliasvert[order[2] * 3]);
-                               order += 3;
-                       }
-                       while (count--);
-               }
+
+               glEnable (GL_TEXTURE_2D);
+               glColor3f (1,1,1);
        }
 
-       if (fogenabled)
-       {
-               glDisable (GL_TEXTURE_2D);
-               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-               glEnable (GL_BLEND);
-               glDepthMask(0); // disable zbuffer updates
-               {
-                       vec3_t diff;
-                       VectorSubtract(org, r_refdef.vieworg, diff);
-                       glColor4f(fogcolor[0], fogcolor[1], fogcolor[2], exp(fogdensity/DotProduct(diff,diff)));
-               }
+       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+       glEnable (GL_BLEND);
+       glDepthMask(1);
+}
 
-               if (gl_vertexarrays.value)
+void ZymoticLerpBones(int count, zymbonematrix *bonebase, frameblend_t *blend, zymbone_t *bone, float rootorigin[3], float rootangles[3], float rootscale)
+{
+       float lerp1, lerp2, lerp3, lerp4;
+       zymbonematrix *out, rootmatrix, m, *bone1, *bone2, *bone3, *bone4;
+       out = zymbonepose;
+       AngleVectors(rootangles, rootmatrix.m[0], rootmatrix.m[1], rootmatrix.m[2]);
+       VectorScale(rootmatrix.m[0], rootscale, rootmatrix.m[0]);
+       VectorScale(rootmatrix.m[1], rootscale, rootmatrix.m[1]);
+       VectorScale(rootmatrix.m[2], rootscale, rootmatrix.m[2]);
+       rootmatrix.m[0][3] = rootorigin[0];
+       rootmatrix.m[1][3] = rootorigin[1];
+       rootmatrix.m[2][3] = rootorigin[2];
+       bone1 = bonebase + blend[0].frame * count;
+       lerp1 = blend[0].lerp;
+       if (blend[1].lerp)
+       {
+               bone2 = bonebase + blend[1].frame * count;
+               lerp2 = blend[1].lerp;
+               if (blend[2].lerp)
                {
-                       // LordHavoc: big mess...
-                       // using arrays only slightly, although it is enough to prevent duplicates
-                       // (saving half the transforms)
-                       qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-                       glEnableClientState(GL_VERTEX_ARRAY);
-
-                       order = (int *)((int)pheader + pheader->ofs_glcmds);
-                       while(1)
+                       bone3 = bonebase + blend[2].frame * count;
+                       lerp3 = blend[2].lerp;
+                       if (blend[3].lerp)
                        {
-                               if (!(count = *order++))
-                                       break;
-                               if (count > 0)
-                                       glBegin(GL_TRIANGLE_STRIP);
-                               else
+                               // 4 poses
+                               bone4 = bonebase + blend[3].frame * count;
+                               lerp4 = blend[3].lerp;
+                               while(count--)
                                {
-                                       glBegin(GL_TRIANGLE_FAN);
-                                       count = -count;
+                                       // interpolate matrices
+                                       m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3 + bone4->m[0][0] * lerp4;
+                                       m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3 + bone4->m[0][1] * lerp4;
+                                       m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3 + bone4->m[0][2] * lerp4;
+                                       m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3 + bone4->m[0][3] * lerp4;
+                                       m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3 + bone4->m[1][0] * lerp4;
+                                       m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3 + bone4->m[1][1] * lerp4;
+                                       m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3 + bone4->m[1][2] * lerp4;
+                                       m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3 + bone4->m[1][3] * lerp4;
+                                       m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3 + bone4->m[2][0] * lerp4;
+                                       m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3 + bone4->m[2][1] * lerp4;
+                                       m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3 + bone4->m[2][2] * lerp4;
+                                       m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3 + bone4->m[2][3] * lerp4;
+                                       if (bone->parent >= 0)
+                                               R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &m.m[0], &out->m[0]);
+                                       else
+                                               R_ConcatTransforms(&rootmatrix.m[0], &m.m[0], &out->m[0]);
+                                       bone1++;
+                                       bone2++;
+                                       bone3++;
+                                       bone4++;
+                                       bone++;
+                                       out++;
                                }
-                               do
+                       }
+                       else
+                       {
+                               // 3 poses
+                               while(count--)
                                {
-                                       qglArrayElement(order[2]);
-                                       order += 3;
+                                       // interpolate matrices
+                                       m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3;
+                                       m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3;
+                                       m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3;
+                                       m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3;
+                                       m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3;
+                                       m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3;
+                                       m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3;
+                                       m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3;
+                                       m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3;
+                                       m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3;
+                                       m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3;
+                                       m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3;
+                                       if (bone->parent >= 0)
+                                               R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &m.m[0], &out->m[0]);
+                                       else
+                                               R_ConcatTransforms(&rootmatrix.m[0], &m.m[0], &out->m[0]);
+                                       bone1++;
+                                       bone2++;
+                                       bone3++;
+                                       bone++;
+                                       out++;
                                }
-                               while (count--);
                        }
-
-                       glDisableClientState(GL_VERTEX_ARRAY);
                }
                else
                {
-                       order = (int *)((int)pheader + pheader->ofs_glcmds);
-                       while(1)
+                       // 2 poses
+                       while(count--)
                        {
-                               if (!(count = *order++))
-                                       break;
-                               if (count > 0)
-                                       glBegin(GL_TRIANGLE_STRIP);
+                               // interpolate matrices
+                               m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2;
+                               m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2;
+                               m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2;
+                               m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2;
+                               m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2;
+                               m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2;
+                               m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2;
+                               m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2;
+                               m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2;
+                               m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2;
+                               m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2;
+                               m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2;
+                               if (bone->parent >= 0)
+                                       R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &m.m[0], &out->m[0]);
                                else
-                               {
-                                       glBegin(GL_TRIANGLE_FAN);
-                                       count = -count;
-                               }
-                               do
-                               {
-                                       glVertex3fv(&aliasvert[order[2] * 3]);
-                                       order += 3;
-                               }
-                               while (count--);
+                                       R_ConcatTransforms(&rootmatrix.m[0], &m.m[0], &out->m[0]);
+                               bone1++;
+                               bone2++;
+                               bone++;
+                               out++;
                        }
                }
-
-               glEnable (GL_TEXTURE_2D);
-               glColor3f (1,1,1);
        }
-
-       if (!fogenabled && r_shadows.value && !(effects & EF_ADDITIVE) && shadow)
+       else
        {
-               int i;
-               float *av = aliasvert + 2, l = lightspot[2] + 0.125;
-               av = aliasvert + 2;
-               for (i = 0;i < pheader->num_xyz;i++, av+=3)
-                       if (*av > l)
-                               *av = l;
-               glDisable (GL_TEXTURE_2D);
-               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-               glEnable (GL_BLEND);
-               glDepthMask(0); // disable zbuffer updates
-               glColor4f (0,0,0,0.5 * alpha);
-
-               if (gl_vertexarrays.value)
+               // 1 pose
+               if (lerp1 != 1)
                {
-                       qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-                       glEnableClientState(GL_VERTEX_ARRAY);
-                                               
-                       while(1)
+                       // lerp != 1.0
+                       while(count--)
                        {
-                               if (!(count = *order++))
-                                       break;
-                               if (count > 0)
-                                       glBegin(GL_TRIANGLE_STRIP);
+                               // interpolate matrices
+                               m.m[0][0] = bone1->m[0][0] * lerp1;
+                               m.m[0][1] = bone1->m[0][1] * lerp1;
+                               m.m[0][2] = bone1->m[0][2] * lerp1;
+                               m.m[0][3] = bone1->m[0][3] * lerp1;
+                               m.m[1][0] = bone1->m[1][0] * lerp1;
+                               m.m[1][1] = bone1->m[1][1] * lerp1;
+                               m.m[1][2] = bone1->m[1][2] * lerp1;
+                               m.m[1][3] = bone1->m[1][3] * lerp1;
+                               m.m[2][0] = bone1->m[2][0] * lerp1;
+                               m.m[2][1] = bone1->m[2][1] * lerp1;
+                               m.m[2][2] = bone1->m[2][2] * lerp1;
+                               m.m[2][3] = bone1->m[2][3] * lerp1;
+                               if (bone->parent >= 0)
+                                       R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &m.m[0], &out->m[0]);
                                else
-                               {
-                                       glBegin(GL_TRIANGLE_FAN);
-                                       count = -count;
-                               }
-                               do
-                               {
-                                       qglArrayElement(order[2]);
-                                       order += 3;
-                               }
-                               while (count--);
+                                       R_ConcatTransforms(&rootmatrix.m[0], &m.m[0], &out->m[0]);
+                               bone1++;
+                               bone++;
+                               out++;
                        }
-
-                       glDisableClientState(GL_VERTEX_ARRAY);
                }
                else
                {
-                       while(1)
+                       // lerp == 1.0
+                       while(count--)
                        {
-                               if (!(count = *order++))
-                                       break;
-                               if (count > 0)
-                                       glBegin(GL_TRIANGLE_STRIP);
+                               if (bone->parent >= 0)
+                                       R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &bone1->m[0], &out->m[0]);
                                else
-                               {
-                                       glBegin(GL_TRIANGLE_FAN);
-                                       count = -count;
-                               }
-                               do
-                               {
-                                       glVertex3fv(&aliasvert[order[2] * 3]);
-                                       order += 3;
-                               }
-                               while (count--);
+                                       R_ConcatTransforms(&rootmatrix.m[0], &bone1->m[0], &out->m[0]);
+                               bone1++;
+                               bone++;
+                               out++;
                        }
                }
-
-               glEnable (GL_TEXTURE_2D);
-               glColor3f (1,1,1);
-       }
-
-       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-       glEnable (GL_BLEND);
-       glDepthMask(1);
-}
-
-void ZymoticLerpBones(int count, float lerp2, zymbonematrix *bone1, zymbonematrix *bone2, zymbone_t *bone, float rootorigin[3], float rootangles[3])
-{
-       float lerp1;
-       zymbonematrix *out, rootmatrix, m;
-       lerp1 = 1 - lerp2;
-       out = zymbonepose;
-       AngleVectors(rootangles, rootmatrix.m[0], rootmatrix.m[1], rootmatrix.m[2]);
-       rootmatrix.m[0][3] = rootorigin[0];
-       rootmatrix.m[1][3] = rootorigin[1];
-       rootmatrix.m[2][3] = rootorigin[2];
-       if (lerp1 != 1) // interpolation
-       {
-               while(count--)
-               {
-                       // interpolate matrices
-                       m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2;
-                       m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2;
-                       m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2;
-                       m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2;
-                       m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2;
-                       m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2;
-                       m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2;
-                       m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2;
-                       m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2;
-                       m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2;
-                       m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2;
-                       m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2;
-                       if (bone->parent >= 0)
-                               R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &m.m[0], &out->m[0]);
-                       else
-                               R_ConcatTransforms(&rootmatrix.m[0], &m.m[0], &out->m[0]);
-                       bone1++;
-                       bone2++;
-                       bone++;
-                       out++;
-               }
-       }
-       else // no interpolation
-       {
-               while(count--)
-               {
-                       if (bone->parent >= 0)
-                               R_ConcatTransforms(&zymbonepose[bone->parent].m[0], &bone1->m[0], &out->m[0]);
-                       else
-                               R_ConcatTransforms(&rootmatrix.m[0], &bone1->m[0], &out->m[0]);
-                       bone1++;
-                       bone++;
-                       out++;
-               }
        }
 }
 
@@ -760,6 +754,7 @@ void ZymoticTransformVerts(int vertcount, int *bonecounts, zymvertex_t *vert)
        while(vertcount--)
        {
                c = *bonecounts++;
+               // FIXME: validate bonecounts at load time (must be >= 1)
                if (c == 1)
                {
                        matrix = &zymbonepose[vert->bonenum];
@@ -784,19 +779,11 @@ void ZymoticTransformVerts(int vertcount, int *bonecounts, zymvertex_t *vert)
        }
 }
 
-float ixtable[4096];
-
 void ZymoticCalcNormals(int vertcount, int shadercount, int *renderlist)
 {
        int a, b, c, d;
        float *out, v1[3], v2[3], normal[3];
        int *u;
-       if (!ixtable[1])
-       {
-               ixtable[0] = 0;
-               for (a = 1;a < 4096;a++)
-                       ixtable[a] = 1.0f / a;
-       }
        // clear normals
        memset(aliasvertnorm, 0, sizeof(float[3]) * vertcount);
        memset(aliasvertusage, 0, sizeof(int) * vertcount);
@@ -816,7 +803,7 @@ void ZymoticCalcNormals(int vertcount, int shadercount, int *renderlist)
                        v2[1] = aliasvert[c+1] - aliasvert[b+1];
                        v2[2] = aliasvert[c+2] - aliasvert[b+2];
                        CrossProduct(v1, v2, normal);
-                       VectorNormalize(normal);
+                       VectorNormalizeFast(normal);
                        // add surface normal to vertices
                        aliasvertnorm[a+0] += normal[0];
                        aliasvertnorm[a+1] += normal[1];
@@ -850,349 +837,111 @@ void ZymoticCalcNormals(int vertcount, int shadercount, int *renderlist)
        }
 }
 
-void GL_DrawZymoticModelMesh(byte *colors, zymtype1header_t *m)
+void GL_DrawZymoticModelMesh(zymtype1header_t *m)
 {
-       int i, c, *renderlist, *texturenum;
-       if (!r_render.value)
-               return;
-       renderlist = (int *)(m->lump_render.start + (int) m);
-       texturenum = (int *)(m->lump_shaders.start + (int) m);
-       if (gl_vertexarrays.value)
-       {
-               qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-               glEnableClientState(GL_VERTEX_ARRAY);
-
-               qglColorPointer(4, GL_UNSIGNED_BYTE, 0, colors);
-               glEnableClientState(GL_COLOR_ARRAY);
-
-               qglTexCoordPointer(2, GL_FLOAT, 0, (float *)(m->lump_texcoords.start + (int) m));
-               glEnableClientState(GL_TEXTURE_COORD_ARRAY);
+       int i, *renderlist;
+       rtexture_t **texture;
 
-               for (i = 0;i < m->numshaders;i++)
-               {
-                       c = (*renderlist++) * 3;
-                       glBindTexture(GL_TEXTURE_2D, *texturenum++);
-                       qglDrawElements(GL_TRIANGLES, c, GL_UNSIGNED_INT, renderlist);
-                       renderlist += c;
-               }
-
-               glDisableClientState(GL_TEXTURE_COORD_ARRAY);
+       // FIXME: do better fog
+       renderlist = (int *)(m->lump_render.start + (int) m);
+       texture = (rtexture_t **)(m->lump_shaders.start + (int) m);
 
-               glDisableClientState(GL_COLOR_ARRAY);
+       aliasmeshinfo.vertex = aliasvert;
+       aliasmeshinfo.vertexstep = sizeof(float[3]);
+       aliasmeshinfo.color = aliasvertcolor;
+       aliasmeshinfo.colorstep = sizeof(float[4]);
+       aliasmeshinfo.texcoords[0] = (float *)(m->lump_texcoords.start + (int) m);
+       aliasmeshinfo.texcoordstep[0] = sizeof(float[2]);
 
-               glDisableClientState(GL_VERTEX_ARRAY);
-       }
-       else
+       for (i = 0;i < m->numshaders;i++)
        {
-               int index;
-               float *tex;
-               tex = (float *)(m->lump_texcoords.start + (int) m);
-
-               for (i = 0;i < m->numshaders;i++)
+               aliasmeshinfo.tex[0] = R_GetTexture(*texture);
+               aliasmeshinfo.tex[1] = 0;
+               if (currentrenderentity->effects & EF_ADDITIVE)
                {
-                       c = *renderlist++;
-                       glBindTexture(GL_TEXTURE_2D, *texturenum++);
-                       glBegin(GL_TRIANGLES);
-                       while (c--)
-                       {
-                               index = *renderlist++;
-                               glTexCoord2fv(tex + index*2);
-                               glColor4ubv(colors + index*4);
-                               glVertex3fv(aliasvert + index*3);
-                               index = *renderlist++;
-                               glTexCoord2fv(tex + index*2);
-                               glColor4ubv(colors + index*4);
-                               glVertex3fv(aliasvert + index*3);
-                               index = *renderlist++;
-                               glTexCoord2fv(tex + index*2);
-                               glColor4ubv(colors + index*4);
-                               glVertex3fv(aliasvert + index*3);
-                       }
-                       glEnd();
+                       aliasmeshinfo.transparent = true;
+                       aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+                       aliasmeshinfo.blendfunc2 = GL_ONE;
                }
-       }
-}
-
-void GL_DrawZymoticModelMeshFog(vec3_t org, zymtype1header_t *m)
-{
-       vec3_t diff;
-       int i, c, *renderlist;
-       if (!r_render.value)
-               return;
-       renderlist = (int *)(m->lump_render.start + (int) m);
-       glDisable(GL_TEXTURE_2D);
-       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-       glEnable (GL_BLEND);
-       glDepthMask(0); // disable zbuffer updates
-
-       VectorSubtract(org, r_refdef.vieworg, diff);
-       glColor4f(fogcolor[0], fogcolor[1], fogcolor[2], exp(fogdensity/DotProduct(diff,diff)));
-       if (gl_vertexarrays.value)
-       {
-               qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-               glEnableClientState(GL_VERTEX_ARRAY);
-
-               for (i = 0;i < m->numshaders;i++)
+               else if (currentrenderentity->alpha != 1.0 || R_TextureHasAlpha(*texture))
                {
-                       c = (*renderlist++) * 3;
-                       qglDrawElements(GL_TRIANGLES, c, GL_UNSIGNED_INT, renderlist);
-                       renderlist += c;
+                       aliasmeshinfo.transparent = true;
+                       aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+                       aliasmeshinfo.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
                }
-
-               glDisableClientState(GL_VERTEX_ARRAY);
-       }
-       else
-       {
-               int index;
-               float *tex;
-               tex = (float *)(m->lump_texcoords.start + (int) m);
-
-               glBegin(GL_TRIANGLES);
-               for (i = 0;i < m->numshaders;i++)
+               else
                {
-                       c = *renderlist++;
-                       while (c--)
-                       {
-                               index = *renderlist++;
-                               glVertex3fv(aliasvert + index*3);
-                               index = *renderlist++;
-                               glVertex3fv(aliasvert + index*3);
-                               index = *renderlist++;
-                               glVertex3fv(aliasvert + index*3);
-                       }
+                       aliasmeshinfo.transparent = false;
+                       aliasmeshinfo.blendfunc1 = GL_ONE;
+                       aliasmeshinfo.blendfunc2 = GL_ZERO;
                }
-               glEnd();
+               aliasmeshinfo.numtriangles = *renderlist++;
+               aliasmeshinfo.index = renderlist;
+               R_Mesh_Draw(&aliasmeshinfo);
+               renderlist += aliasmeshinfo.numtriangles * 3;
        }
-       glEnable(GL_TEXTURE_2D);
-       glColor3f (1,1,1);
 }
 
-void GL_DrawZymoticModelMeshShadow(zymtype1header_t *m)
+void GL_DrawZymoticModelMeshFog(vec3_t org, zymtype1header_t *m)
 {
-       int i, c, *renderlist;
-       float *av, l;
-       if (!r_render.value)
-               return;
-
-       // flatten it to make a shadow
-       av = aliasvert + 2;
-       l = lightspot[2] + 0.125;
-       for (i = 0;i < m->numverts;i++, av+=3)
-               if (*av > l)
-                       *av = l;
+       int i, *renderlist;
+       vec3_t diff;
 
+       // FIXME: do better fog
        renderlist = (int *)(m->lump_render.start + (int) m);
-       glDisable(GL_TEXTURE_2D);
-       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-       glEnable (GL_BLEND);
-       glDepthMask(0); // disable zbuffer updates
 
-       glColor4f(0.0f, 0.0f, 0.0f, 0.5f);
-       if (gl_vertexarrays.value)
-       {
-               qglVertexPointer(3, GL_FLOAT, 0, aliasvert);
-               glEnableClientState(GL_VERTEX_ARRAY);
+       aliasmeshinfo.tex[0] = 0;
+       aliasmeshinfo.blendfunc1 = GL_SRC_ALPHA;
+       aliasmeshinfo.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
 
-               for (i = 0;i < m->numshaders;i++)
-               {
-                       c = (*renderlist++) * 3;
-                       qglDrawElements(GL_TRIANGLES, c, GL_UNSIGNED_INT, renderlist);
-                       renderlist += c;
-               }
+       VectorSubtract(org, r_origin, diff);
+       aliasmeshinfo.cr = fogcolor[0];
+       aliasmeshinfo.cg = fogcolor[1];
+       aliasmeshinfo.cb = fogcolor[2];
+       aliasmeshinfo.ca = currentrenderentity->alpha * exp(fogdensity/DotProduct(diff,diff));
 
-               glDisableClientState(GL_VERTEX_ARRAY);
-       }
-       else
+       for (i = 0;i < m->numshaders;i++)
        {
-               int index;
-               float *tex;
-               tex = (float *)(m->lump_texcoords.start + (int) m);
-
-               glBegin(GL_TRIANGLES);
-               for (i = 0;i < m->numshaders;i++)
-               {
-                       c = *renderlist++;
-                       while (c--)
-                       {
-                               index = *renderlist++;
-                               glVertex3fv(aliasvert + index*3);
-                               index = *renderlist++;
-                               glVertex3fv(aliasvert + index*3);
-                               index = *renderlist++;
-                               glVertex3fv(aliasvert + index*3);
-                       }
-               }
-               glEnd();
+               aliasmeshinfo.numtriangles = *renderlist++;
+               aliasmeshinfo.index = renderlist;
+               R_Mesh_Draw(&aliasmeshinfo);
+               renderlist += aliasmeshinfo.numtriangles * 3;
        }
-       glEnable(GL_TEXTURE_2D);
-       glColor3f (1,1,1);
 }
 
-/*
-=================
-R_DrawZymoticFrame
-=================
-*/
-void R_DrawZymoticFrame (zymtype1header_t *m, float alpha, vec3_t color, entity_t *ent, int shadow, vec3_t org, vec3_t angles, int frame, int skinblah, int effects, int flags)
+void R_DrawZymoticModel (void)
 {
-       zymscene_t *scene;
-       float scenetime, scenefrac;
-       int sceneframe1, sceneframe2;
-       zymbonematrix *basebonepose;
-       if ((frame >= m->numscenes) || (frame < 0))
-       {
-               Con_DPrintf ("R_ZymoticSetupFrame: no such frame %d\n", frame);
-               frame = 0;
-       }
-
-       scene = (zymscene_t *)(m->lump_scenes.start + (int) m) + frame;
-       if (ent->draw_lastmodel != ent->model || ent->draw_pose != frame || ent->draw_lerpstart >= cl.time)
-       {
-               ent->draw_lastmodel = ent->model;
-               ent->draw_lastpose = -1;
-               ent->draw_pose = frame;
-               ent->draw_lerpstart = cl.time;
-       }
-       scenetime = (cl.time - ent->draw_lerpstart) * scene->framerate;
-       sceneframe1 = (int) scenetime;
-       sceneframe2 = sceneframe1 + 1;
-       scenefrac = scenetime - sceneframe1;
-       if (scene->flags & ZYMSCENEFLAG_NOLOOP)
-       {
-               if (sceneframe1 > (scene->length - 1))
-                       sceneframe1 = (scene->length - 1);
-               if (sceneframe2 > (scene->length - 1))
-                       sceneframe2 = (scene->length - 1);
-       }
-       else
-       {
-               sceneframe1 %= scene->length;
-               sceneframe2 %= scene->length;
-       }
-       if (sceneframe2 == sceneframe1)
-               scenefrac = 0;
+       zymtype1header_t *m;
 
-       basebonepose = (zymbonematrix *)(m->lump_poses.start + (int) m);
-       ZymoticLerpBones(m->numbones, scenefrac, basebonepose + sceneframe1 * m->numbones, basebonepose + sceneframe2 * m->numbones, (zymbone_t *)(m->lump_bones.start + (int) m), org, angles);
+       // FIXME: do better fog
+       m = currentrenderentity->model->zymdata_header;
+       ZymoticLerpBones(m->numbones, (zymbonematrix *)(m->lump_poses.start + (int) m), currentrenderentity->frameblend, (zymbone_t *)(m->lump_bones.start + (int) m), currentrenderentity->origin, currentrenderentity->angles, currentrenderentity->scale);
        ZymoticTransformVerts(m->numverts, (int *)(m->lump_vertbonecounts.start + (int) m), (zymvertex_t *)(m->lump_verts.start + (int) m));
        ZymoticCalcNormals(m->numverts, m->numshaders, (int *)(m->lump_render.start + (int) m));
 
-       R_LightModel(m->numverts, org, color);
+       R_LightModel(m->numverts);
 
-       if (!r_render.value)
-               return;
-       glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
-       glShadeModel(GL_SMOOTH);
-       if (effects & EF_ADDITIVE)
-       {
-               glBlendFunc(GL_SRC_ALPHA, GL_ONE); // additive rendering
-               glEnable(GL_BLEND);
-               glDepthMask(0);
-       }
-       else if (alpha != 1.0)
-       {
-               glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-               glEnable(GL_BLEND);
-               glDepthMask(0);
-       }
-       else
-       {
-               glDisable(GL_BLEND);
-               glDepthMask(1);
-       }
+       memset(&aliasmeshinfo, 0, sizeof(aliasmeshinfo));
+       aliasmeshinfo.numverts = m->numverts;
 
-       GL_DrawZymoticModelMesh(aliasvertcolor, m);
+       GL_DrawZymoticModelMesh(m);
 
        if (fogenabled)
-               GL_DrawZymoticModelMeshFog(org, m);
-
-       if (!fogenabled && r_shadows.value && !(effects & EF_ADDITIVE) && shadow)
-               GL_DrawZymoticModelMeshShadow(m);
-
-       glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-       glEnable (GL_BLEND);
-       glDepthMask(1);
+               GL_DrawZymoticModelMeshFog(currentrenderentity->origin, m);
 }
 
-int modeldlightbits[8];
-extern int r_dlightframecount;
-
-/*
-=================
-R_DrawAliasModel
-
-=================
-*/
-void R_DrawAliasModel (entity_t *ent, int cull, float alpha, model_t *clmodel, int frame, int skin, vec3_t org, vec3_t angles, int effects, int flags, int colormap)
+void R_DrawAliasModel (void)
 {
-       int                     i;
-       vec3_t          mins, maxs, color;
-       mleaf_t         *leaf;
-       void            *modelheader;
-       int                     *skinset;
-
-       if (alpha < (1.0 / 64.0))
+       if (currentrenderentity->alpha < (1.0f / 64.0f))
                return; // basically completely transparent
 
-       VectorAdd (org, clmodel->mins, mins);
-       VectorAdd (org, clmodel->maxs, maxs);
-
-       if (cull && R_CullBox (mins, maxs))
-               return;
-
        c_models++;
 
-       leaf = Mod_PointInLeaf (org, cl.worldmodel);
-       if (leaf->dlightframe == r_dlightframecount)
-               for (i = 0;i < 8;i++)
-                       modeldlightbits[i] = leaf->dlightbits[i];
-       else
-               for (i = 0;i < 8;i++)
-                       modeldlightbits[i] = 0;
-
-       // get lighting information
-
-       if ((flags & EF_FULLBRIGHT) || (effects & EF_FULLBRIGHT))
-               color[0] = color[1] = color[2] = 256;
-       else
-               R_LightPoint (color, org);
-
-       if (r_render.value)
-               glDisable(GL_ALPHA_TEST);
-
-       if (frame < 0 || frame >= clmodel->numframes)
-       {
-               frame = 0;
-               Con_DPrintf("invalid skin number %d for model %s\n", frame, clmodel->name);
-       }
-
-       if (skin < 0 || skin >= clmodel->numskins)
-       {
-               skin = 0;
-               Con_DPrintf("invalid skin number %d for model %s\n", skin, clmodel->name);
-       }
-
-       modelheader = Mod_Extradata (clmodel);
-
-       {
-//             int *skinanimrange = (int *) (clmodel->skinanimrange + (int) modelheader) + skin * 2;
-//             int *skinanim = (int *) (clmodel->skinanim + (int) modelheader);
-               int *skinanimrange = clmodel->skinanimrange + skin * 2;
-               int *skinanim = clmodel->skinanim;
-               i = skinanimrange[0];
-               if (skinanimrange[1] > 1) // animated
-                       i += ((int) (cl.time * 10) % skinanimrange[1]);
-               skinset = skinanim + i*5;
-       }
-
-       if (r_render.value)
-               glEnable (GL_TEXTURE_2D);
-
-       c_alias_polys += clmodel->numtris;
-       if (clmodel->aliastype == ALIASTYPE_ZYM)
-               R_DrawZymoticFrame (modelheader, alpha, color, ent, ent != &cl.viewent, org, angles, frame, 0, effects, flags);
-       else if (clmodel->aliastype == ALIASTYPE_MD2)
-               R_DrawQ2AliasFrame (modelheader, alpha, color, ent, ent != &cl.viewent, org, angles, frame, skinset[0], effects, flags);
+       c_alias_polys += currentrenderentity->model->numtris;
+       if (currentrenderentity->model->aliastype == ALIASTYPE_ZYM)
+               R_DrawZymoticModel ();
+       else if (currentrenderentity->model->aliastype == ALIASTYPE_MD2)
+               R_DrawQ2AliasModel ();
        else
-               R_DrawAliasFrame (modelheader, alpha, color, ent, ent != &cl.viewent, org, angles, frame, skinset, colormap, effects, flags);
+               R_DrawQ1AliasModel   ();
 }