summaryrefslogtreecommitdiffstats
path: root/apps/plugins/sdl/progs/wolf3d/wl_dir3dspr.c
diff options
context:
space:
mode:
Diffstat (limited to 'apps/plugins/sdl/progs/wolf3d/wl_dir3dspr.c')
-rw-r--r--apps/plugins/sdl/progs/wolf3d/wl_dir3dspr.c230
1 files changed, 230 insertions, 0 deletions
diff --git a/apps/plugins/sdl/progs/wolf3d/wl_dir3dspr.c b/apps/plugins/sdl/progs/wolf3d/wl_dir3dspr.c
new file mode 100644
index 0000000000..4bae691621
--- /dev/null
+++ b/apps/plugins/sdl/progs/wolf3d/wl_dir3dspr.c
@@ -0,0 +1,230 @@
+#include "version.h"
+
+#ifdef USE_DIR3DSPR
+#include "wl_def.h"
+#include "wl_shade.h"
+
+// Define directional 3d sprites in wl_act1.cpp (there are two examples)
+// Make sure you have according entries in ScanInfoPlane in wl_game.cpp.
+
+
+void Scale3DShaper(int x1, int x2, int shapenum, uint32_t flags, fixed ny1, fixed ny2,
+ fixed nx1, fixed nx2, byte *vbuf, unsigned vbufPitch)
+{
+ t_compshape *shape;
+ unsigned scale1,starty,endy;
+ word *cmdptr;
+ byte *line;
+ byte *vmem;
+ int dx,len,i,newstart,ycnt,pixheight,screndy,upperedge,scrstarty;
+ unsigned j;
+ fixed height,dheight,height1,height2;
+ int xpos[TEXTURESIZE+1];
+ int slinex;
+ fixed dxx=(ny2-ny1)<<8,dzz=(nx2-nx1)<<8;
+ fixed dxa=0,dza=0;
+ byte col;
+
+ shape = (t_compshape *) PM_GetSprite(shapenum);
+
+ len=shape->rightpix-shape->leftpix+1;
+ if(!len) return;
+
+ ny1+=dxx>>9;
+ nx1+=dzz>>9;
+
+ dxa=-(dxx>>1),dza=-(dzz>>1);
+ dxx>>=TEXTURESHIFT,dzz>>=TEXTURESHIFT;
+ dxa+=shape->leftpix*dxx,dza+=shape->leftpix*dzz;
+
+ xpos[0]=(int)((ny1+(dxa>>8))*scale/(nx1+(dza>>8))+centerx);
+ height1 = heightnumerator/((nx1+(dza>>8))>>8);
+ height=(((fixed)height1)<<12)+2048;
+
+ for(i=1;i<=len;i++)
+ {
+ dxa+=dxx,dza+=dzz;
+ xpos[i]=(int)((ny1+(dxa>>8))*scale/(nx1+(dza>>8))+centerx);
+ if(xpos[i-1]>viewwidth) break;
+ }
+ len=i-1;
+ dx = xpos[len] - xpos[0];
+ if(!dx) return;
+
+ height2 = heightnumerator/((nx1+(dza>>8))>>8);
+ dheight=(((fixed)height2-(fixed)height1)<<12)/(fixed)dx;
+
+ cmdptr = (word *) shape->dataofs;
+
+ i=0;
+ if(x2>viewwidth) x2=viewwidth;
+
+ for(i=0;i<len;i++)
+ {
+ for(slinex=xpos[i];slinex<xpos[i+1] && slinex<x2;slinex++)
+ {
+ height+=dheight;
+ if(slinex<0) continue;
+
+ scale1=(unsigned)(height>>15);
+
+ if(wallheight[slinex]<(height>>12) && scale1 /*&& scale1<=maxscale*/)
+ {
+#ifdef USE_SHADING
+ byte *curshades;
+ if(flags & FL_FULLBRIGHT)
+ curshades = shadetable[0];
+ else
+ curshades = shadetable[GetShade(scale1<<3)];
+#endif
+
+ pixheight=scale1*SPRITESCALEFACTOR;
+ upperedge=viewheight/2-scale1;
+
+ line=(byte *)shape + cmdptr[i];
+
+ while((endy = READWORD(&line)) != 0)
+ {
+ endy >>= 1;
+ newstart = READWORD(&line);
+ starty = READWORD(&line) >> 1;
+ j=starty;
+ ycnt=j*pixheight;
+ screndy=(ycnt>>6)+upperedge;
+ if(screndy<0) vmem=vbuf+slinex;
+ else vmem=vbuf+screndy*vbufPitch+slinex;
+ for(;j<endy;j++)
+ {
+ scrstarty=screndy;
+ ycnt+=pixheight;
+ screndy=(ycnt>>6)+upperedge;
+ if(scrstarty!=screndy && screndy>0)
+ {
+#ifdef USE_SHADING
+ col=curshades[((byte *)shape)[newstart+j]];
+#else
+ col=((byte *)shape)[newstart+j];
+#endif
+ if(scrstarty<0) scrstarty=0;
+ if(screndy>viewheight) screndy=viewheight,j=endy;
+
+ while(scrstarty<screndy)
+ {
+ *vmem=col;
+ vmem+=vbufPitch;
+ scrstarty++;
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+}
+
+void Scale3DShape(byte *vbuf, unsigned vbufPitch, statobj_t *ob)
+{
+ fixed nx1,nx2,ny1,ny2;
+ int viewx1,viewx2;
+ fixed diradd;
+ fixed playx = viewx;
+ fixed playy = viewy;
+
+ //
+ // the following values for "diradd" aren't optimized yet
+ // if you have problems with sprites being visible through wall edges
+ // where they shouldn't, you can try to adjust these values and SIZEADD
+ //
+
+#define SIZEADD 1024
+
+ switch(ob->flags & FL_DIR_POS_MASK)
+ {
+ case FL_DIR_POS_FW: diradd=0x7ff0+0x8000; break;
+ case FL_DIR_POS_BW: diradd=-0x7ff0+0x8000; break;
+ case FL_DIR_POS_MID: diradd=0x8000; break;
+ default:
+ Quit("Unknown directional 3d sprite position (shapenum = %i)", ob->shapenum);
+ }
+
+ if(ob->flags & FL_DIR_VERT_FLAG) // vertical dir 3d sprite
+ {
+ fixed gy1,gy2,gx,gyt1,gyt2,gxt;
+ //
+ // translate point to view centered coordinates
+ //
+ gy1 = (((long)ob->tiley) << TILESHIFT)+0x8000-playy-0x8000L-SIZEADD;
+ gy2 = gy1+0x10000L+2*SIZEADD;
+ gx = (((long)ob->tilex) << TILESHIFT)+diradd-playx;
+
+ //
+ // calculate newx
+ //
+ gxt = FixedMul(gx,viewcos);
+ gyt1 = FixedMul(gy1,viewsin);
+ gyt2 = FixedMul(gy2,viewsin);
+ nx1 = gxt-gyt1;
+ nx2 = gxt-gyt2;
+
+ //
+ // calculate newy
+ //
+ gxt = FixedMul(gx,viewsin);
+ gyt1 = FixedMul(gy1,viewcos);
+ gyt2 = FixedMul(gy2,viewcos);
+ ny1 = gyt1+gxt;
+ ny2 = gyt2+gxt;
+ }
+ else // horizontal dir 3d sprite
+ {
+ fixed gx1,gx2,gy,gxt1,gxt2,gyt;
+ //
+ // translate point to view centered coordinates
+ //
+ gx1 = (((long)ob->tilex) << TILESHIFT)+0x8000-playx-0x8000L-SIZEADD;
+ gx2 = gx1+0x10000L+2*SIZEADD;
+ gy = (((long)ob->tiley) << TILESHIFT)+diradd-playy;
+
+ //
+ // calculate newx
+ //
+ gxt1 = FixedMul(gx1,viewcos);
+ gxt2 = FixedMul(gx2,viewcos);
+ gyt = FixedMul(gy,viewsin);
+ nx1 = gxt1-gyt;
+ nx2 = gxt2-gyt;
+
+ //
+ // calculate newy
+ //
+ gxt1 = FixedMul(gx1,viewsin);
+ gxt2 = FixedMul(gx2,viewsin);
+ gyt = FixedMul(gy,viewcos);
+ ny1 = gyt+gxt1;
+ ny2 = gyt+gxt2;
+ }
+
+ if(nx1 < 0 || nx2 < 0) return; // TODO: Clip on viewplane
+
+ //
+ // calculate perspective ratio
+ //
+ if(nx1>=0 && nx1<=1792) nx1=1792;
+ if(nx1<0 && nx1>=-1792) nx1=-1792;
+ if(nx2>=0 && nx2<=1792) nx2=1792;
+ if(nx2<0 && nx2>=-1792) nx2=-1792;
+
+ viewx1=(int)(centerx+ny1*scale/nx1);
+ viewx2=(int)(centerx+ny2*scale/nx2);
+
+ if(viewx2 < viewx1)
+ {
+ Scale3DShaper(viewx2,viewx1,ob->shapenum,ob->flags,ny2,ny1,nx2,nx1,vbuf,vbufPitch);
+ }
+ else
+ {
+ Scale3DShaper(viewx1,viewx2,ob->shapenum,ob->flags,ny1,ny2,nx1,nx2,vbuf,vbufPitch);
+ }
+}
+
+#endif