3 #include "cl_collision.h"
6 cvar_t r_quickmodels = {0, "r_quickmodels", "1"};
13 // LordHavoc: vertex arrays
16 float *aliasvertcolorbuf;
17 float *aliasvert; // this may point at aliasvertbuf or at vertex arrays in the mesh backend
18 float *aliasvertcolor; // this may point at aliasvertcolorbuf or at vertex arrays in the mesh backend
20 float *aliasvertcolor2;
23 zymbonematrix *zymbonepose;
25 mempool_t *gl_models_mempool;
27 void gl_models_start(void)
29 // allocate vertex processing arrays
30 gl_models_mempool = Mem_AllocPool("GL_Models");
31 aliasvert = aliasvertbuf = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
32 aliasvertcolor = aliasvertcolorbuf = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
33 aliasvertnorm = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][3]));
34 aliasvertcolor2 = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4])); // used temporarily for tinted coloring
35 zymbonepose = Mem_Alloc(gl_models_mempool, sizeof(zymbonematrix[256]));
36 aliasvertusage = Mem_Alloc(gl_models_mempool, sizeof(int[MD2MAX_VERTS]));
39 void gl_models_shutdown(void)
41 Mem_FreePool(&gl_models_mempool);
44 void gl_models_newmap(void)
48 void GL_Models_Init(void)
50 Cvar_RegisterVariable(&r_quickmodels);
52 R_RegisterModule("GL_Models", gl_models_start, gl_models_shutdown, gl_models_newmap);
56 void R_AliasTransformVerts(int vertcount)
61 while (vertcount >= 4)
63 VectorCopy(av, point);softwaretransform(point, av);av += 4;
64 VectorCopy(av, point);softwaretransform(point, av);av += 4;
65 VectorCopy(av, point);softwaretransform(point, av);av += 4;
66 VectorCopy(av, point);softwaretransform(point, av);av += 4;
71 VectorCopy(av, point);softwaretransform(point, av);av += 4;
77 void R_AliasLerpVerts(int vertcount, float *vertices, float *normals,
78 float lerp1, const trivertx_t *verts1, const vec3_t fscale1, const vec3_t translate1,
79 float lerp2, const trivertx_t *verts2, const vec3_t fscale2, const vec3_t translate2,
80 float lerp3, const trivertx_t *verts3, const vec3_t fscale3, const vec3_t translate3,
81 float lerp4, const trivertx_t *verts4, const vec3_t fscale4, const vec3_t translate4)
84 vec3_t scale1, scale2, scale3, scale4, translate;
85 const float *n1, *n2, *n3, *n4;
89 VectorScale(fscale1, lerp1, scale1);
92 VectorScale(fscale2, lerp2, scale2);
95 VectorScale(fscale3, lerp3, scale3);
98 VectorScale(fscale4, lerp4, scale4);
99 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3 + translate4[0] * lerp4;
100 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3 + translate4[1] * lerp4;
101 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3 + translate4[2] * lerp4;
103 for (i = 0;i < vertcount;i++)
105 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + verts4->v[0] * scale4[0] + translate[0];
106 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + verts4->v[1] * scale4[1] + translate[1];
107 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + verts4->v[2] * scale4[2] + translate[2];
108 n1 = m_bytenormals[verts1->lightnormalindex];
109 n2 = m_bytenormals[verts2->lightnormalindex];
110 n3 = m_bytenormals[verts3->lightnormalindex];
111 n4 = m_bytenormals[verts4->lightnormalindex];
112 avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3 + n4[0] * lerp4;
113 avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3 + n4[1] * lerp4;
114 avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3 + n4[2] * lerp4;
117 verts1++;verts2++;verts3++;verts4++;
122 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3;
123 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3;
124 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3;
126 for (i = 0;i < vertcount;i++)
128 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + translate[0];
129 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + translate[1];
130 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + translate[2];
131 n1 = m_bytenormals[verts1->lightnormalindex];
132 n2 = m_bytenormals[verts2->lightnormalindex];
133 n3 = m_bytenormals[verts3->lightnormalindex];
134 avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3;
135 avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3;
136 avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3;
139 verts1++;verts2++;verts3++;
145 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2;
146 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2;
147 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2;
149 for (i = 0;i < vertcount;i++)
151 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + translate[0];
152 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + translate[1];
153 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + translate[2];
154 n1 = m_bytenormals[verts1->lightnormalindex];
155 n2 = m_bytenormals[verts2->lightnormalindex];
156 avn[0] = n1[0] * lerp1 + n2[0] * lerp2;
157 avn[1] = n1[1] * lerp1 + n2[1] * lerp2;
158 avn[2] = n1[2] * lerp1 + n2[2] * lerp2;
167 translate[0] = translate1[0] * lerp1;
168 translate[1] = translate1[1] * lerp1;
169 translate[2] = translate1[2] * lerp1;
173 // general but almost never used case
174 for (i = 0;i < vertcount;i++)
176 av[0] = verts1->v[0] * scale1[0] + translate[0];
177 av[1] = verts1->v[1] * scale1[1] + translate[1];
178 av[2] = verts1->v[2] * scale1[2] + translate[2];
179 n1 = m_bytenormals[verts1->lightnormalindex];
180 avn[0] = n1[0] * lerp1;
181 avn[1] = n1[1] * lerp1;
182 avn[2] = n1[2] * lerp1;
191 for (i = 0;i < vertcount;i++)
193 av[0] = verts1->v[0] * scale1[0] + translate[0];
194 av[1] = verts1->v[1] * scale1[1] + translate[1];
195 av[2] = verts1->v[2] * scale1[2] + translate[2];
196 VectorCopy(m_bytenormals[verts1->lightnormalindex], avn);
205 skinframe_t *R_FetchSkinFrame(const entity_render_t *ent)
207 model_t *model = ent->model;
208 unsigned int s = (unsigned int) ent->skinnum;
209 if (s >= model->numskins)
211 if (model->skinscenes[s].framecount > 1)
212 return &model->skinframes[model->skinscenes[s].firstframe + (int) (cl.time * 10) % model->skinscenes[s].framecount];
214 return &model->skinframes[model->skinscenes[s].firstframe];
217 void R_LerpMDLMD2Vertices(const entity_render_t *ent, float *vertices, float *normals)
219 const md2frame_t *frame1, *frame2, *frame3, *frame4;
220 const trivertx_t *frame1verts, *frame2verts, *frame3verts, *frame4verts;
221 const model_t *model = ent->model;
223 frame1 = &model->mdlmd2data_frames[ent->frameblend[0].frame];
224 frame2 = &model->mdlmd2data_frames[ent->frameblend[1].frame];
225 frame3 = &model->mdlmd2data_frames[ent->frameblend[2].frame];
226 frame4 = &model->mdlmd2data_frames[ent->frameblend[3].frame];
227 frame1verts = &model->mdlmd2data_pose[ent->frameblend[0].frame * model->numverts];
228 frame2verts = &model->mdlmd2data_pose[ent->frameblend[1].frame * model->numverts];
229 frame3verts = &model->mdlmd2data_pose[ent->frameblend[2].frame * model->numverts];
230 frame4verts = &model->mdlmd2data_pose[ent->frameblend[3].frame * model->numverts];
231 R_AliasLerpVerts(model->numverts, vertices, normals,
232 ent->frameblend[0].lerp, frame1verts, frame1->scale, frame1->translate,
233 ent->frameblend[1].lerp, frame2verts, frame2->scale, frame2->translate,
234 ent->frameblend[2].lerp, frame3verts, frame3->scale, frame3->translate,
235 ent->frameblend[3].lerp, frame4verts, frame4->scale, frame4->translate);
238 void R_DrawQ1Q2AliasModelCallback (const void *calldata1, int calldata2)
240 int i, c, pantsfullbright, shirtfullbright, colormapped, tex;
241 float pantscolor[3], shirtcolor[3];
242 float fog, colorscale;
247 skinframe_t *skinframe;
248 const entity_render_t *ent = calldata1;
249 int blendfunc1, blendfunc2;
251 // softwaretransformforentity(ent);
252 R_Mesh_Matrix(&ent->matrix);
257 VectorSubtract(ent->origin, r_origin, diff);
258 fog = DotProduct(diff,diff);
261 fog = exp(fogdensity/fog);
266 // fog method: darken, additive fog
267 // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
268 // 2. render fog as additive
272 R_Mesh_ResizeCheck(model->numverts);
274 skinframe = R_FetchSkinFrame(ent);
276 if (ent->effects & EF_ADDITIVE)
278 blendfunc1 = GL_SRC_ALPHA;
281 else if (ent->alpha != 1.0 || skinframe->fog != NULL)
283 blendfunc1 = GL_SRC_ALPHA;
284 blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
289 blendfunc2 = GL_ZERO;
292 colorscale = r_colorscale;
293 if (gl_combine.integer)
296 if (!skinframe->base && !skinframe->pants && !skinframe->shirt && !skinframe->glow)
299 memset(&m, 0, sizeof(m));
300 m.blendfunc1 = blendfunc1;
301 m.blendfunc2 = blendfunc2;
302 if (gl_combine.integer)
303 m.texrgbscale[0] = 4;
304 m.tex[0] = R_GetTexture(r_notexture);
307 c_alias_polys += model->numtris;
308 for (i = 0;i < model->numverts * 2;i++)
309 varray_texcoord[0][i] = model->mdlmd2data_texcoords[i] * 8.0f;
310 aliasvert = varray_vertex;
311 aliasvertcolor = varray_color;
312 R_LerpMDLMD2Vertices(ent, aliasvert, aliasvertnorm);
313 R_LightModel(ent, model->numverts, colorscale, colorscale, colorscale, false);
314 aliasvert = aliasvertbuf;
315 aliasvertcolor = aliasvertcolorbuf;
317 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
322 colormapped = !skinframe->merged || (ent->colormap >= 0 && skinframe->base && (skinframe->pants || skinframe->shirt));
323 if (!colormapped && !fog && !skinframe->glow && !skinframe->fog)
325 // fastpath for the normal situation (one texture)
326 memset(&m, 0, sizeof(m));
327 m.blendfunc1 = blendfunc1;
328 m.blendfunc2 = blendfunc2;
329 if (gl_combine.integer)
330 m.texrgbscale[0] = 4;
331 m.tex[0] = R_GetTexture(skinframe->merged);
334 c_alias_polys += model->numtris;
335 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
336 aliasvert = varray_vertex;
337 aliasvertcolor = varray_color;
338 R_LerpMDLMD2Vertices(ent, aliasvert, aliasvertnorm);
339 R_LightModel(ent, model->numverts, colorscale, colorscale, colorscale, false);
340 aliasvert = aliasvertbuf;
341 aliasvertcolor = aliasvertcolorbuf;
343 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
347 R_LerpMDLMD2Vertices(ent, aliasvert, aliasvertnorm);
348 R_LightModel(ent, model->numverts, colorscale * (1 - fog), colorscale * (1 - fog), colorscale * (1 - fog), false);
352 // 128-224 are backwards ranges
353 c = (ent->colormap & 0xF) << 4;c += (c >= 128 && c < 224) ? 4 : 12;
354 bcolor = (qbyte *) (&d_8to24table[c]);
355 pantsfullbright = c >= 224;
356 VectorScale(bcolor, (1.0f / 255.0f), pantscolor);
357 c = (ent->colormap & 0xF0);c += (c >= 128 && c < 224) ? 4 : 12;
358 bcolor = (qbyte *) (&d_8to24table[c]);
359 shirtfullbright = c >= 224;
360 VectorScale(bcolor, (1.0f / 255.0f), shirtcolor);
364 pantscolor[0] = pantscolor[1] = pantscolor[2] = shirtcolor[0] = shirtcolor[1] = shirtcolor[2] = 1;
365 pantsfullbright = shirtfullbright = false;
368 tex = colormapped ? R_GetTexture(skinframe->base) : R_GetTexture(skinframe->merged);
371 memset(&m, 0, sizeof(m));
372 m.blendfunc1 = blendfunc1;
373 m.blendfunc2 = blendfunc2;
374 if (gl_combine.integer)
375 m.texrgbscale[0] = 4;
379 blendfunc1 = GL_SRC_ALPHA;
381 c_alias_polys += model->numtris;
382 R_ModulateColors(aliasvertcolor, varray_color, model->numverts, colorscale, colorscale, colorscale);
383 memcpy(varray_vertex, aliasvert, model->numverts * sizeof(float[4]));
384 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
386 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
391 if (skinframe->pants)
393 tex = R_GetTexture(skinframe->pants);
396 memset(&m, 0, sizeof(m));
397 m.blendfunc1 = blendfunc1;
398 m.blendfunc2 = blendfunc2;
399 if (gl_combine.integer)
400 m.texrgbscale[0] = 4;
404 blendfunc1 = GL_SRC_ALPHA;
406 c_alias_polys += model->numtris;
408 GL_Color(pantscolor[0] * colorscale, pantscolor[1] * colorscale, pantscolor[2] * colorscale, ent->alpha);
412 R_ModulateColors(aliasvertcolor, varray_color, model->numverts, pantscolor[0] * colorscale, pantscolor[1] * colorscale, pantscolor[2] * colorscale);
414 memcpy(varray_vertex, aliasvert, model->numverts * sizeof(float[4]));
415 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
416 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
419 if (skinframe->shirt)
421 tex = R_GetTexture(skinframe->shirt);
424 memset(&m, 0, sizeof(m));
425 m.blendfunc1 = blendfunc1;
426 m.blendfunc2 = blendfunc2;
427 if (gl_combine.integer)
428 m.texrgbscale[0] = 4;
432 blendfunc1 = GL_SRC_ALPHA;
434 c_alias_polys += model->numtris;
436 GL_Color(shirtcolor[0] * colorscale, shirtcolor[1] * colorscale, shirtcolor[2] * colorscale, ent->alpha);
440 R_ModulateColors(aliasvertcolor, varray_color, model->numverts, shirtcolor[0] * colorscale, shirtcolor[1] * colorscale, shirtcolor[2] * colorscale);
442 memcpy(varray_vertex, aliasvert, model->numverts * sizeof(float[4]));
443 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
444 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
450 tex = R_GetTexture(skinframe->glow);
453 memset(&m, 0, sizeof(m));
454 m.blendfunc1 = blendfunc1;
455 m.blendfunc2 = blendfunc2;
459 blendfunc1 = GL_SRC_ALPHA;
461 c_alias_polys += model->numtris;
462 memcpy(varray_vertex, aliasvert, model->numverts * sizeof(float[4]));
463 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
464 GL_Color((1 - fog) * r_colorscale, (1 - fog) * r_colorscale, (1 - fog) * r_colorscale, ent->alpha);
465 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
470 memset(&m, 0, sizeof(m));
471 m.blendfunc1 = GL_SRC_ALPHA;
472 m.blendfunc2 = GL_ONE;
473 m.tex[0] = R_GetTexture(skinframe->fog);
476 c_alias_polys += model->numtris;
477 memcpy(varray_vertex, aliasvert, model->numverts * sizeof(float[4]));
478 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[2]));
479 GL_Color(fogcolor[0] * fog * r_colorscale, fogcolor[1] * fog * r_colorscale, fogcolor[2] * fog * r_colorscale, ent->alpha);
480 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
484 extern cvar_t r_shadows;
485 void R_DrawQ1Q2AliasModelFakeShadow (entity_render_t *ent)
490 float *v, planenormal[3], planedist, dist, projection[3], floororigin[3], surfnormal[3], lightdirection[3], v2[3];
494 if (r_shadows.integer > 1)
496 float f, lightscale, lightcolor[3];
498 memset(&m, 0, sizeof(m));
499 m.blendfunc1 = GL_ONE;
500 m.blendfunc2 = GL_ONE;
502 R_Mesh_Matrix(&ent->matrix);
503 for (i = 0, sl = cl.worldmodel->lights;i < cl.worldmodel->numlights;i++, sl++)
505 if (d_lightstylevalue[sl->style] > 0)
507 VectorSubtract(ent->origin, sl->origin, temp);
508 f = DotProduct(temp,temp);
509 if (f < (ent->model->radius2 + sl->cullradius2))
512 R_Mesh_ResizeCheck(model->numverts * 2);
513 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
514 Matrix4x4_Transform(&ent->inversematrix, sl->origin, temp);
515 GL_Color(0.1 * r_colorscale, 0.025 * r_colorscale, 0.0125 * r_colorscale, 1);
516 R_Shadow_Volume(model->numverts, model->numtris, model->mdlmd2data_indices, model->mdlmd2data_triangleneighbors, temp, sl->cullradius + model->radius - sqrt(f), true);
518 lightscale = d_lightstylevalue[sl->style] * (1.0f / 65536.0f);
519 VectorScale(sl->light, lightscale, lightcolor);
520 R_Shadow_VertexLight(model->numverts, aliasvertnorm, temp, sl->cullradius2, sl->distbias, sl->subtract, lightcolor);
521 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
525 for (i = 0, rd = r_dlight;i < r_numdlights;i++, rd++)
529 VectorSubtract(ent->origin, rd->origin, temp);
530 f = DotProduct(temp,temp);
531 if (f < (ent->model->radius2 + rd->cullradius2))
534 R_Mesh_ResizeCheck(model->numverts * 2);
535 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
536 Matrix4x4_Transform(&ent->inversematrix, rd->origin, temp);
537 GL_Color(0.1 * r_colorscale, 0.025 * r_colorscale, 0.0125 * r_colorscale, 1);
538 R_Shadow_Volume(model->numverts, model->numtris, model->mdlmd2data_indices, model->mdlmd2data_triangleneighbors, temp, rd->cullradius + model->radius - sqrt(f), true);
540 R_Shadow_VertexLight(model->numverts, aliasvertnorm, temp, rd->cullradius2, LIGHTOFFSET, rd->subtract, rd->light);
541 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
548 lightdirection[0] = 0.5;
549 lightdirection[1] = 0.2;
550 lightdirection[2] = -1;
551 VectorNormalizeFast(lightdirection);
553 VectorMA(ent->origin, 65536.0f, lightdirection, v2);
554 if (CL_TraceLine(ent->origin, v2, floororigin, surfnormal, 0, false, NULL) == 1)
557 R_Mesh_Matrix(&ent->matrix);
560 R_Mesh_ResizeCheck(model->numverts);
562 memset(&m, 0, sizeof(m));
563 m.blendfunc1 = GL_SRC_ALPHA;
564 m.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
567 c_alias_polys += model->numtris;
568 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvertnorm);
570 // put a light direction in the entity's coordinate space
571 Matrix4x4_Transform3x3(&ent->inversematrix, lightdirection, projection);
572 VectorNormalizeFast(projection);
574 // put the plane's normal in the entity's coordinate space
575 Matrix4x4_Transform3x3(&ent->inversematrix, surfnormal, planenormal);
576 VectorNormalizeFast(planenormal);
578 // put the plane's distance in the entity's coordinate space
579 VectorSubtract(floororigin, ent->origin, floororigin);
580 planedist = DotProduct(floororigin, surfnormal) + 2;
582 dist = -1.0f / DotProduct(projection, planenormal);
583 VectorScale(projection, dist, projection);
584 for (i = 0, v = varray_vertex;i < model->numverts;i++, v += 4)
586 dist = DotProduct(v, planenormal) - planedist;
589 VectorMA(v, dist, projection, v);
591 GL_Color(0, 0, 0, 0.5);
592 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
595 int ZymoticLerpBones(int count, const zymbonematrix *bonebase, const frameblend_t *blend, const zymbone_t *bone)
598 float lerp1, lerp2, lerp3, lerp4;
599 zymbonematrix *out, rootmatrix, m;
600 const zymbonematrix *bone1, *bone2, *bone3, *bone4;
603 // LordHavoc: combine transform from zym coordinate space to quake coordinate space with model to world transform matrix
604 rootmatrix.m[0][0] = softwaretransform_matrix[0][1];
605 rootmatrix.m[0][1] = -softwaretransform_matrix[0][0];
606 rootmatrix.m[0][2] = softwaretransform_matrix[0][2];
607 rootmatrix.m[0][3] = softwaretransform_matrix[0][3];
608 rootmatrix.m[1][0] = softwaretransform_matrix[1][1];
609 rootmatrix.m[1][1] = -softwaretransform_matrix[1][0];
610 rootmatrix.m[1][2] = softwaretransform_matrix[1][2];
611 rootmatrix.m[1][3] = softwaretransform_matrix[1][3];
612 rootmatrix.m[2][0] = softwaretransform_matrix[2][1];
613 rootmatrix.m[2][1] = -softwaretransform_matrix[2][0];
614 rootmatrix.m[2][2] = softwaretransform_matrix[2][2];
615 rootmatrix.m[2][3] = softwaretransform_matrix[2][3];
617 rootmatrix.m[0][0] = 1;
618 rootmatrix.m[0][1] = 0;
619 rootmatrix.m[0][2] = 0;
620 rootmatrix.m[0][3] = 0;
621 rootmatrix.m[1][0] = 0;
622 rootmatrix.m[1][1] = 1;
623 rootmatrix.m[1][2] = 0;
624 rootmatrix.m[1][3] = 0;
625 rootmatrix.m[2][0] = 0;
626 rootmatrix.m[2][1] = 0;
627 rootmatrix.m[2][2] = 1;
628 rootmatrix.m[2][3] = 0;
630 bone1 = bonebase + blend[0].frame * count;
631 lerp1 = blend[0].lerp;
634 bone2 = bonebase + blend[1].frame * count;
635 lerp2 = blend[1].lerp;
638 bone3 = bonebase + blend[2].frame * count;
639 lerp3 = blend[2].lerp;
643 bone4 = bonebase + blend[3].frame * count;
644 lerp4 = blend[3].lerp;
645 for (i = 0, out = zymbonepose;i < count;i++, out++)
647 // interpolate matrices
648 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3 + bone4->m[0][0] * lerp4;
649 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3 + bone4->m[0][1] * lerp4;
650 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3 + bone4->m[0][2] * lerp4;
651 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3 + bone4->m[0][3] * lerp4;
652 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3 + bone4->m[1][0] * lerp4;
653 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3 + bone4->m[1][1] * lerp4;
654 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3 + bone4->m[1][2] * lerp4;
655 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3 + bone4->m[1][3] * lerp4;
656 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3 + bone4->m[2][0] * lerp4;
657 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3 + bone4->m[2][1] * lerp4;
658 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3 + bone4->m[2][2] * lerp4;
659 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3 + bone4->m[2][3] * lerp4;
660 if (bone->parent >= 0)
661 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
663 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
674 for (i = 0, out = zymbonepose;i < count;i++, out++)
676 // interpolate matrices
677 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3;
678 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3;
679 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3;
680 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3;
681 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3;
682 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3;
683 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3;
684 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3;
685 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3;
686 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3;
687 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3;
688 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3;
689 if (bone->parent >= 0)
690 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
692 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
703 for (i = 0, out = zymbonepose;i < count;i++, out++)
705 // interpolate matrices
706 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2;
707 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2;
708 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2;
709 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2;
710 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2;
711 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2;
712 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2;
713 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2;
714 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2;
715 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2;
716 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2;
717 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2;
718 if (bone->parent >= 0)
719 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
721 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
734 for (i = 0, out = zymbonepose;i < count;i++, out++)
736 // interpolate matrices
737 m.m[0][0] = bone1->m[0][0] * lerp1;
738 m.m[0][1] = bone1->m[0][1] * lerp1;
739 m.m[0][2] = bone1->m[0][2] * lerp1;
740 m.m[0][3] = bone1->m[0][3] * lerp1;
741 m.m[1][0] = bone1->m[1][0] * lerp1;
742 m.m[1][1] = bone1->m[1][1] * lerp1;
743 m.m[1][2] = bone1->m[1][2] * lerp1;
744 m.m[1][3] = bone1->m[1][3] * lerp1;
745 m.m[2][0] = bone1->m[2][0] * lerp1;
746 m.m[2][1] = bone1->m[2][1] * lerp1;
747 m.m[2][2] = bone1->m[2][2] * lerp1;
748 m.m[2][3] = bone1->m[2][3] * lerp1;
749 if (bone->parent >= 0)
750 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
752 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
760 for (i = 0, out = zymbonepose;i < count;i++, out++)
762 if (bone->parent >= 0)
763 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &bone1->m[0][0], &out->m[0][0]);
765 R_ConcatTransforms(&rootmatrix.m[0][0], &bone1->m[0][0], &out->m[0][0]);
774 void ZymoticTransformVerts(int vertcount, int *bonecounts, zymvertex_t *vert)
777 float *out = aliasvert;
778 zymbonematrix *matrix;
782 // FIXME: validate bonecounts at load time (must be >= 1)
783 // FIXME: need 4th component in origin, for how much of the translate to blend in
786 matrix = &zymbonepose[vert->bonenum];
787 out[0] = vert->origin[0] * matrix->m[0][0] + vert->origin[1] * matrix->m[0][1] + vert->origin[2] * matrix->m[0][2] + matrix->m[0][3];
788 out[1] = vert->origin[0] * matrix->m[1][0] + vert->origin[1] * matrix->m[1][1] + vert->origin[2] * matrix->m[1][2] + matrix->m[1][3];
789 out[2] = vert->origin[0] * matrix->m[2][0] + vert->origin[1] * matrix->m[2][1] + vert->origin[2] * matrix->m[2][2] + matrix->m[2][3];
797 matrix = &zymbonepose[vert->bonenum];
798 out[0] += vert->origin[0] * matrix->m[0][0] + vert->origin[1] * matrix->m[0][1] + vert->origin[2] * matrix->m[0][2] + matrix->m[0][3];
799 out[1] += vert->origin[0] * matrix->m[1][0] + vert->origin[1] * matrix->m[1][1] + vert->origin[2] * matrix->m[1][2] + matrix->m[1][3];
800 out[2] += vert->origin[0] * matrix->m[2][0] + vert->origin[1] * matrix->m[2][1] + vert->origin[2] * matrix->m[2][2] + matrix->m[2][3];
808 void ZymoticCalcNormals(int vertcount, int shadercount, int *renderlist)
811 float *out, v1[3], v2[3], normal[3], s;
814 memset(aliasvertnorm, 0, sizeof(float) * vertcount * 3);
815 memset(aliasvertusage, 0, sizeof(int) * vertcount);
816 // parse render list and accumulate surface normals
825 v1[0] = aliasvert[a+0] - aliasvert[b+0];
826 v1[1] = aliasvert[a+1] - aliasvert[b+1];
827 v1[2] = aliasvert[a+2] - aliasvert[b+2];
828 v2[0] = aliasvert[c+0] - aliasvert[b+0];
829 v2[1] = aliasvert[c+1] - aliasvert[b+1];
830 v2[2] = aliasvert[c+2] - aliasvert[b+2];
831 CrossProduct(v1, v2, normal);
832 VectorNormalizeFast(normal);
833 // add surface normal to vertices
834 a = renderlist[0] * 3;
835 aliasvertnorm[a+0] += normal[0];
836 aliasvertnorm[a+1] += normal[1];
837 aliasvertnorm[a+2] += normal[2];
838 aliasvertusage[renderlist[0]]++;
839 a = renderlist[1] * 3;
840 aliasvertnorm[a+0] += normal[0];
841 aliasvertnorm[a+1] += normal[1];
842 aliasvertnorm[a+2] += normal[2];
843 aliasvertusage[renderlist[1]]++;
844 a = renderlist[2] * 3;
845 aliasvertnorm[a+0] += normal[0];
846 aliasvertnorm[a+1] += normal[1];
847 aliasvertnorm[a+2] += normal[2];
848 aliasvertusage[renderlist[2]]++;
852 // FIXME: precalc this
853 // average surface normals
870 void R_DrawZymoticModelMeshCallback (const void *calldata1, int calldata2)
872 float fog, colorscale;
874 int i, *renderlist, *elements;
878 const entity_render_t *ent = calldata1;
879 int shadernum = calldata2;
880 int numverts, numtriangles;
882 R_Mesh_Matrix(&ent->matrix);
884 // find the vertex index list and texture
885 m = ent->model->zymdata_header;
886 renderlist = (int *)(m->lump_render.start + (int) m);
887 for (i = 0;i < shadernum;i++)
888 renderlist += renderlist[0] * 3 + 1;
889 texture = ((rtexture_t **)(m->lump_shaders.start + (int) m))[shadernum];
891 numverts = m->numverts;
892 numtriangles = *renderlist++;
893 elements = renderlist;
894 R_Mesh_ResizeCheck(numverts);
899 VectorSubtract(ent->origin, r_origin, diff);
900 fog = DotProduct(diff,diff);
903 fog = exp(fogdensity/fog);
908 // fog method: darken, additive fog
909 // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
910 // 2. render fog as additive
913 ZymoticLerpBones(m->numbones, (zymbonematrix *)(m->lump_poses.start + (int) m), ent->frameblend, (zymbone_t *)(m->lump_bones.start + (int) m));
914 ZymoticTransformVerts(numverts, (int *)(m->lump_vertbonecounts.start + (int) m), (zymvertex_t *)(m->lump_verts.start + (int) m));
915 ZymoticCalcNormals(numverts, m->numshaders, (int *)(m->lump_render.start + (int) m));
917 R_LightModel(ent, numverts, 1 - fog, 1 - fog, 1 - fog, false);
919 memset(&mstate, 0, sizeof(mstate));
920 if (ent->effects & EF_ADDITIVE)
922 mstate.blendfunc1 = GL_SRC_ALPHA;
923 mstate.blendfunc2 = GL_ONE;
925 else if (ent->alpha != 1.0 || R_TextureHasAlpha(texture))
927 mstate.blendfunc1 = GL_SRC_ALPHA;
928 mstate.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
932 mstate.blendfunc1 = GL_ONE;
933 mstate.blendfunc2 = GL_ZERO;
935 colorscale = r_colorscale;
936 if (gl_combine.integer)
938 mstate.texrgbscale[0] = 4;
941 mstate.tex[0] = R_GetTexture(texture);
942 R_Mesh_State(&mstate);
944 c_alias_polys += numtriangles;
945 memcpy(varray_vertex, aliasvert, numverts * sizeof(float[4]));
946 R_ModulateColors(aliasvertcolor, varray_color, numverts, colorscale, colorscale, colorscale);
947 memcpy(varray_texcoord[0], (float *)(m->lump_texcoords.start + (int) m), numverts * sizeof(float[2]));
949 R_Mesh_Draw(numverts, numtriangles, elements);
953 memset(&mstate, 0, sizeof(mstate));
954 mstate.blendfunc1 = GL_SRC_ALPHA;
955 mstate.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
956 // FIXME: need alpha mask for fogging...
957 //mstate.tex[0] = R_GetTexture(texture);
958 R_Mesh_State(&mstate);
960 c_alias_polys += numtriangles;
961 memcpy(varray_vertex, aliasvert, numverts * sizeof(float[4]));
962 //memcpy(mesh_texcoord[0], (float *)(m->lump_texcoords.start + (int) m), numverts * sizeof(float[2]));
963 GL_Color(fogcolor[0] * r_colorscale, fogcolor[1] * r_colorscale, fogcolor[2] * r_colorscale, ent->alpha * fog);
964 R_Mesh_Draw(numverts, numtriangles, elements);
968 void R_DrawZymoticModel (entity_render_t *ent)
974 if (ent->alpha < (1.0f / 64.0f))
975 return; // basically completely transparent
979 m = ent->model->zymdata_header;
980 for (i = 0;i < m->numshaders;i++)
982 texture = ((rtexture_t **)(m->lump_shaders.start + (int) m))[i];
983 if (ent->effects & EF_ADDITIVE || ent->alpha != 1.0 || R_TextureHasAlpha(texture))
984 R_MeshQueue_AddTransparent(ent->origin, R_DrawZymoticModelMeshCallback, ent, i);
986 R_DrawZymoticModelMeshCallback(ent, i);
990 void R_DrawQ1Q2AliasModel(entity_render_t *ent)
992 if (ent->alpha < (1.0f / 64.0f))
993 return; // basically completely transparent
997 if (ent->effects & EF_ADDITIVE || ent->alpha != 1.0 || R_FetchSkinFrame(ent)->fog != NULL)
998 R_MeshQueue_AddTransparent(ent->origin, R_DrawQ1Q2AliasModelCallback, ent, 0);
1000 R_DrawQ1Q2AliasModelCallback(ent, 0);