123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592 |
- #include "r_local.h"
- unsigned char *r_turb_pbase, *r_turb_pdest;
- fixed16_t r_turb_s, r_turb_t, r_turb_sstep, r_turb_tstep;
- int *r_turb_turb;
- int r_turb_spancount;
- void D_DrawTurbulent8Span (void);
- void D_WarpScreen (void)
- {
- int w, h;
- int u,v, u2, v2;
- byte *dest;
- int *turb;
- int *col;
- byte **row;
- static int cached_width, cached_height;
- static byte *rowptr[1200+AMP2*2];
- static int column[1600+AMP2*2];
-
-
-
- w = r_newrefdef.width;
- h = r_newrefdef.height;
- if (w != cached_width || h != cached_height)
- {
- cached_width = w;
- cached_height = h;
- for (v=0 ; v<h+AMP2*2 ; v++)
- {
- v2 = (int)((float)v/(h + AMP2 * 2) * r_refdef.vrect.height);
- rowptr[v] = r_warpbuffer + (WARP_WIDTH * v2);
- }
- for (u=0 ; u<w+AMP2*2 ; u++)
- {
- u2 = (int)((float)u/(w + AMP2 * 2) * r_refdef.vrect.width);
- column[u] = u2;
- }
- }
- turb = intsintable + ((int)(r_newrefdef.time*SPEED)&(CYCLE-1));
- dest = vid.buffer + r_newrefdef.y * vid.rowbytes + r_newrefdef.x;
- for (v=0 ; v<h ; v++, dest += vid.rowbytes)
- {
- col = &column[turb[v]];
- row = &rowptr[v];
- for (u=0 ; u<w ; u+=4)
- {
- dest[u+0] = row[turb[u+0]][col[u+0]];
- dest[u+1] = row[turb[u+1]][col[u+1]];
- dest[u+2] = row[turb[u+2]][col[u+2]];
- dest[u+3] = row[turb[u+3]][col[u+3]];
- }
- }
- }
- #if !id386
- void D_DrawTurbulent8Span (void)
- {
- int sturb, tturb;
- do
- {
- sturb = ((r_turb_s + r_turb_turb[(r_turb_t>>16)&(CYCLE-1)])>>16)&63;
- tturb = ((r_turb_t + r_turb_turb[(r_turb_s>>16)&(CYCLE-1)])>>16)&63;
- *r_turb_pdest++ = *(r_turb_pbase + (tturb<<6) + sturb);
- r_turb_s += r_turb_sstep;
- r_turb_t += r_turb_tstep;
- } while (--r_turb_spancount > 0);
- }
- #endif
- void Turbulent8 (espan_t *pspan)
- {
- int count;
- fixed16_t snext, tnext;
- float sdivz, tdivz, zi, z, du, dv, spancountminus1;
- float sdivz16stepu, tdivz16stepu, zi16stepu;
-
- r_turb_turb = sintable + ((int)(r_newrefdef.time*SPEED)&(CYCLE-1));
- r_turb_sstep = 0;
- r_turb_tstep = 0;
- r_turb_pbase = (unsigned char *)cacheblock;
- sdivz16stepu = d_sdivzstepu * 16;
- tdivz16stepu = d_tdivzstepu * 16;
- zi16stepu = d_zistepu * 16;
- do
- {
- r_turb_pdest = (unsigned char *)((byte *)d_viewbuffer +
- (r_screenwidth * pspan->v) + pspan->u);
- count = pspan->count;
-
- du = (float)pspan->u;
- dv = (float)pspan->v;
- sdivz = d_sdivzorigin + dv*d_sdivzstepv + du*d_sdivzstepu;
- tdivz = d_tdivzorigin + dv*d_tdivzstepv + du*d_tdivzstepu;
- zi = d_ziorigin + dv*d_zistepv + du*d_zistepu;
- z = (float)0x10000 / zi;
- r_turb_s = (int)(sdivz * z) + sadjust;
- if (r_turb_s > bbextents)
- r_turb_s = bbextents;
- else if (r_turb_s < 0)
- r_turb_s = 0;
- r_turb_t = (int)(tdivz * z) + tadjust;
- if (r_turb_t > bbextentt)
- r_turb_t = bbextentt;
- else if (r_turb_t < 0)
- r_turb_t = 0;
- do
- {
-
- if (count >= 16)
- r_turb_spancount = 16;
- else
- r_turb_spancount = count;
- count -= r_turb_spancount;
- if (count)
- {
-
-
- sdivz += sdivz16stepu;
- tdivz += tdivz16stepu;
- zi += zi16stepu;
- z = (float)0x10000 / zi;
- snext = (int)(sdivz * z) + sadjust;
- if (snext > bbextents)
- snext = bbextents;
- else if (snext < 16)
- snext = 16;
-
-
- tnext = (int)(tdivz * z) + tadjust;
- if (tnext > bbextentt)
- tnext = bbextentt;
- else if (tnext < 16)
- tnext = 16;
- r_turb_sstep = (snext - r_turb_s) >> 4;
- r_turb_tstep = (tnext - r_turb_t) >> 4;
- }
- else
- {
-
-
-
-
- spancountminus1 = (float)(r_turb_spancount - 1);
- sdivz += d_sdivzstepu * spancountminus1;
- tdivz += d_tdivzstepu * spancountminus1;
- zi += d_zistepu * spancountminus1;
- z = (float)0x10000 / zi;
- snext = (int)(sdivz * z) + sadjust;
- if (snext > bbextents)
- snext = bbextents;
- else if (snext < 16)
- snext = 16;
-
-
- tnext = (int)(tdivz * z) + tadjust;
- if (tnext > bbextentt)
- tnext = bbextentt;
- else if (tnext < 16)
- tnext = 16;
- if (r_turb_spancount > 1)
- {
- r_turb_sstep = (snext - r_turb_s) / (r_turb_spancount - 1);
- r_turb_tstep = (tnext - r_turb_t) / (r_turb_spancount - 1);
- }
- }
- r_turb_s = r_turb_s & ((CYCLE<<16)-1);
- r_turb_t = r_turb_t & ((CYCLE<<16)-1);
- D_DrawTurbulent8Span ();
- r_turb_s = snext;
- r_turb_t = tnext;
- } while (count > 0);
- } while ((pspan = pspan->pnext) != NULL);
- }
- void NonTurbulent8 (espan_t *pspan)
- {
- int count;
- fixed16_t snext, tnext;
- float sdivz, tdivz, zi, z, du, dv, spancountminus1;
- float sdivz16stepu, tdivz16stepu, zi16stepu;
-
- r_turb_turb = blanktable;
- r_turb_sstep = 0;
- r_turb_tstep = 0;
- r_turb_pbase = (unsigned char *)cacheblock;
- sdivz16stepu = d_sdivzstepu * 16;
- tdivz16stepu = d_tdivzstepu * 16;
- zi16stepu = d_zistepu * 16;
- do
- {
- r_turb_pdest = (unsigned char *)((byte *)d_viewbuffer +
- (r_screenwidth * pspan->v) + pspan->u);
- count = pspan->count;
-
- du = (float)pspan->u;
- dv = (float)pspan->v;
- sdivz = d_sdivzorigin + dv*d_sdivzstepv + du*d_sdivzstepu;
- tdivz = d_tdivzorigin + dv*d_tdivzstepv + du*d_tdivzstepu;
- zi = d_ziorigin + dv*d_zistepv + du*d_zistepu;
- z = (float)0x10000 / zi;
- r_turb_s = (int)(sdivz * z) + sadjust;
- if (r_turb_s > bbextents)
- r_turb_s = bbextents;
- else if (r_turb_s < 0)
- r_turb_s = 0;
- r_turb_t = (int)(tdivz * z) + tadjust;
- if (r_turb_t > bbextentt)
- r_turb_t = bbextentt;
- else if (r_turb_t < 0)
- r_turb_t = 0;
- do
- {
-
- if (count >= 16)
- r_turb_spancount = 16;
- else
- r_turb_spancount = count;
- count -= r_turb_spancount;
- if (count)
- {
-
-
- sdivz += sdivz16stepu;
- tdivz += tdivz16stepu;
- zi += zi16stepu;
- z = (float)0x10000 / zi;
- snext = (int)(sdivz * z) + sadjust;
- if (snext > bbextents)
- snext = bbextents;
- else if (snext < 16)
- snext = 16;
-
-
- tnext = (int)(tdivz * z) + tadjust;
- if (tnext > bbextentt)
- tnext = bbextentt;
- else if (tnext < 16)
- tnext = 16;
- r_turb_sstep = (snext - r_turb_s) >> 4;
- r_turb_tstep = (tnext - r_turb_t) >> 4;
- }
- else
- {
-
-
-
-
- spancountminus1 = (float)(r_turb_spancount - 1);
- sdivz += d_sdivzstepu * spancountminus1;
- tdivz += d_tdivzstepu * spancountminus1;
- zi += d_zistepu * spancountminus1;
- z = (float)0x10000 / zi;
- snext = (int)(sdivz * z) + sadjust;
- if (snext > bbextents)
- snext = bbextents;
- else if (snext < 16)
- snext = 16;
-
-
- tnext = (int)(tdivz * z) + tadjust;
- if (tnext > bbextentt)
- tnext = bbextentt;
- else if (tnext < 16)
- tnext = 16;
- if (r_turb_spancount > 1)
- {
- r_turb_sstep = (snext - r_turb_s) / (r_turb_spancount - 1);
- r_turb_tstep = (tnext - r_turb_t) / (r_turb_spancount - 1);
- }
- }
- r_turb_s = r_turb_s & ((CYCLE<<16)-1);
- r_turb_t = r_turb_t & ((CYCLE<<16)-1);
- D_DrawTurbulent8Span ();
- r_turb_s = snext;
- r_turb_t = tnext;
- } while (count > 0);
- } while ((pspan = pspan->pnext) != NULL);
- }
- #if !id386
- void D_DrawSpans16 (espan_t *pspan)
- {
- int count, spancount;
- unsigned char *pbase, *pdest;
- fixed16_t s, t, snext, tnext, sstep, tstep;
- float sdivz, tdivz, zi, z, du, dv, spancountminus1;
- float sdivz8stepu, tdivz8stepu, zi8stepu;
- sstep = 0;
- tstep = 0;
- pbase = (unsigned char *)cacheblock;
- sdivz8stepu = d_sdivzstepu * 8;
- tdivz8stepu = d_tdivzstepu * 8;
- zi8stepu = d_zistepu * 8;
- do
- {
- pdest = (unsigned char *)((byte *)d_viewbuffer +
- (r_screenwidth * pspan->v) + pspan->u);
- count = pspan->count;
-
- du = (float)pspan->u;
- dv = (float)pspan->v;
- sdivz = d_sdivzorigin + dv*d_sdivzstepv + du*d_sdivzstepu;
- tdivz = d_tdivzorigin + dv*d_tdivzstepv + du*d_tdivzstepu;
- zi = d_ziorigin + dv*d_zistepv + du*d_zistepu;
- z = (float)0x10000 / zi;
- s = (int)(sdivz * z) + sadjust;
- if (s > bbextents)
- s = bbextents;
- else if (s < 0)
- s = 0;
- t = (int)(tdivz * z) + tadjust;
- if (t > bbextentt)
- t = bbextentt;
- else if (t < 0)
- t = 0;
- do
- {
-
- if (count >= 8)
- spancount = 8;
- else
- spancount = count;
- count -= spancount;
- if (count)
- {
-
-
- sdivz += sdivz8stepu;
- tdivz += tdivz8stepu;
- zi += zi8stepu;
- z = (float)0x10000 / zi;
- snext = (int)(sdivz * z) + sadjust;
- if (snext > bbextents)
- snext = bbextents;
- else if (snext < 8)
- snext = 8;
-
-
- tnext = (int)(tdivz * z) + tadjust;
- if (tnext > bbextentt)
- tnext = bbextentt;
- else if (tnext < 8)
- tnext = 8;
- sstep = (snext - s) >> 3;
- tstep = (tnext - t) >> 3;
- }
- else
- {
-
-
-
-
- spancountminus1 = (float)(spancount - 1);
- sdivz += d_sdivzstepu * spancountminus1;
- tdivz += d_tdivzstepu * spancountminus1;
- zi += d_zistepu * spancountminus1;
- z = (float)0x10000 / zi;
- snext = (int)(sdivz * z) + sadjust;
- if (snext > bbextents)
- snext = bbextents;
- else if (snext < 8)
- snext = 8;
-
-
- tnext = (int)(tdivz * z) + tadjust;
- if (tnext > bbextentt)
- tnext = bbextentt;
- else if (tnext < 8)
- tnext = 8;
- if (spancount > 1)
- {
- sstep = (snext - s) / (spancount - 1);
- tstep = (tnext - t) / (spancount - 1);
- }
- }
- do
- {
- *pdest++ = *(pbase + (s >> 16) + (t >> 16) * cachewidth);
- s += sstep;
- t += tstep;
- } while (--spancount > 0);
- s = snext;
- t = tnext;
- } while (count > 0);
- } while ((pspan = pspan->pnext) != NULL);
- }
- #endif
- #if !id386
- void D_DrawZSpans (espan_t *pspan)
- {
- int count, doublecount, izistep;
- int izi;
- short *pdest;
- unsigned ltemp;
- float zi;
- float du, dv;
- izistep = (int)(d_zistepu * 0x8000 * 0x10000);
- do
- {
- pdest = d_pzbuffer + (d_zwidth * pspan->v) + pspan->u;
- count = pspan->count;
-
- du = (float)pspan->u;
- dv = (float)pspan->v;
- zi = d_ziorigin + dv*d_zistepv + du*d_zistepu;
-
- izi = (int)(zi * 0x8000 * 0x10000);
- if ((long)pdest & 0x02)
- {
- *pdest++ = (short)(izi >> 16);
- izi += izistep;
- count--;
- }
- if ((doublecount = count >> 1) > 0)
- {
- do
- {
- ltemp = izi >> 16;
- izi += izistep;
- ltemp |= izi & 0xFFFF0000;
- izi += izistep;
- *(int *)pdest = ltemp;
- pdest += 2;
- } while (--doublecount > 0);
- }
- if (count & 1)
- *pdest = (short)(izi >> 16);
- } while ((pspan = pspan->pnext) != NULL);
- }
- #endif
|