src/dots.c

   1 /*
   2    Copyright (C) Prikol Software 1996-1997
   3    Copyright (C) Aleksey Volynskov 1996-1997
   4    Copyright (C) <ARembo@gmail.com> 2011
   5
   6    This file is part of the Doom2D:Rembo project.
   7
   8    Doom2D:Rembo is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License version 2 as
  10    published by the Free Software Foundation.
  11
  12    Doom2D:Rembo is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, see <http://www.gnu.org/licenses/> or
  19    write to the Free Software Foundation, Inc.,
  20    51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  21 */
  22
  23 #include "glob.h"
  24 #include <stdlib.h>
  25 #include "view.h"
  26 #include "dots.h"
  27 #include "misc.h"
  28 #include "my.h"
  29
  30 #define MAXINI 50
  31 #define MAXSR 20
  32
  33 #define BL_XV 4
  34 #define BL_YV 4
  35 #define BL_MINT 10
  36 #define BL_MAXT 14
  37
  38 #define SP_V 2
  39 #define SP_MINT 5
  40 #define SP_MAXT 7
  41
  42 extern byte z_dot;
  43
  44 typedef struct{
  45   int xv,yv;
  46   byte c,t;
  47 }init_t;
  48
  49 dot_t dot[MAXDOT];
  50
  51 static init_t bl_ini[MAXINI],sp_ini[MAXINI];
  52 static int bl_r,sp_r,sr_r,sxr[MAXSR],syr[MAXSR];
  53 static int ldot;
  54
  55 void DOT_savegame (FILE *h) {
  56   int i, n;
  57   for (i = n = 0; i < MAXDOT; ++i) {
  58     if (dot[i].t) {
  59       ++n;
  60     }
  61   }
  62   myfwrite32(n, h);
  63   for (i = 0; i < MAXDOT; ++i) {
  64     if (dot[i].t) {
  65       myfwrite32(dot[i].o.x, h);
  66       myfwrite32(dot[i].o.y, h);
  67       myfwrite32(dot[i].o.xv, h);
  68       myfwrite32(dot[i].o.yv, h);
  69       myfwrite32(dot[i].o.vx, h);
  70       myfwrite32(dot[i].o.vy, h);
  71       myfwrite32(dot[i].o.r, h);
  72       myfwrite32(dot[i].o.h, h);
  73       myfwrite8(dot[i].c, h);
  74       myfwrite8(dot[i].t, h);
  75     }
  76   }
  77 }
  78
  79 void DOT_loadgame (FILE *h) {
  80   int i, n;
  81   n = myfread32(h);
  82   for (i = 0; i < n; i++) {
  83     dot[i].o.x = myfread32(h);
  84     dot[i].o.y = myfread32(h);
  85     dot[i].o.xv = myfread32(h);
  86     dot[i].o.yv = myfread32(h);
  87     dot[i].o.vx = myfread32(h);
  88     dot[i].o.vy = myfread32(h);
  89     dot[i].o.r = myfread32(h);
  90     dot[i].o.h = myfread32(h);
  91     dot[i].c = myfread8(h);
  92     dot[i].t = myfread8(h);
  93   }
  94 }
  95
  96 void DOT_init(void) {
  97   int i;
  98
  99   for(i=0;i<MAXDOT;++i) {dot[i].t=0;dot[i].o.r=0;dot[i].o.h=1;}
 100   ldot=0;
 101 }
 102
 103 static void incldot(void) {
 104   if(++ldot>=MAXDOT) ldot=0;
 105 }
 106
 107 void DOT_alloc(void) {
 108   int i;
 109
 110   for(i=0;i<MAXINI;++i) {
 111         bl_ini[i].xv=myrand(BL_XV*2+1)-BL_XV;
 112         bl_ini[i].yv=-myrand(BL_YV);
 113         bl_ini[i].c=0xB0+myrand(16);
 114         bl_ini[i].t=myrand(BL_MAXT-BL_MINT+1)+BL_MINT;
 115         sp_ini[i].xv=myrand(SP_V*2+1)-SP_V;
 116         sp_ini[i].yv=myrand(SP_V*2+1)-SP_V;
 117         sp_ini[i].c=0xA0+myrand(6);
 118         sp_ini[i].t=myrand(SP_MAXT-SP_MINT+1)+SP_MINT;
 119   }
 120   for(i=0;i<MAXSR;++i) {
 121         sxr[i]=myrand(2*2+1)-2;
 122         syr[i]=myrand(2*2+1)-2;
 123   }
 124   bl_r=sp_r=sr_r=0;
 125 }
 126
 127 void DOT_act(void) {
 128   int i,s,xv,yv;
 129
 130   z_dot=1;
 131   for(i=0;i<MAXDOT;++i) if(dot[i].t) {
 132     xv=dot[i].o.xv+dot[i].o.vx;
 133     yv=dot[i].o.yv+dot[i].o.vy;
 134     s=Z_moveobj(&dot[i].o);
 135     if(dot[i].t<254) --dot[i].t;
 136     if(s&(Z_HITWATER|Z_FALLOUT)) {dot[i].t=0;continue;}
 137     if(s&Z_HITLAND) {
 138       if(!dot[i].o.xv) {
 139         if(yv>2) {
 140           if(!xv) dot[i].o.vx=(rand()&1)?-1:1;
 141           else dot[i].o.vx=Z_sign(dot[i].o.vx);
 142           if(rand()%yv==0) dot[i].o.vx*=2;
 143           dot[i].o.yv=yv-2;
 144         }
 145       }
 146       dot[i].o.xv=0;
 147       if(dot[i].t>4 && dot[i].t!=255) dot[i].t=4;
 148     }
 149     if(s&Z_HITWALL) {
 150       dot[i].o.vx=Z_sign(xv)*2;
 151       dot[i].o.yv=Z_sign(dot[i].o.yv);
 152       if(dot[i].o.yv>=0) if(rand()&3) --dot[i].o.yv;
 153       if(dot[i].o.yv>=0) if(rand()&1) --dot[i].o.yv;
 154     }
 155     if(s&Z_HITCEIL) {dot[i].o.xv=0;dot[i].o.yv=(myrand(100))?-2:0;}
 156   }
 157   z_dot=0;
 158 }
 159
 160 void DOT_add(int x,int y,char xv,char yv,byte c,byte t) {
 161   int i;
 162
 163   if(!Z_canfit(x,y,0,1)) return;
 164   i=ldot;
 165   dot[i].o.x=x;dot[i].o.y=y;
 166   dot[i].o.xv=xv;dot[i].o.yv=yv;
 167   dot[i].c=c;dot[i].t=t;
 168   dot[i].o.vx=dot[i].o.vy=0;
 169   incldot();
 170 }
 171
 172 void DOT_blood(int x,int y,int xv,int yv,int n) {
 173   int i,k,dx,dy;
 174
 175   for(k=n;k;--k) {
 176     dx=x+sxr[sr_r];dy=y+syr[sr_r];
 177     if(!Z_canfit(x,y,0,1)) continue;
 178     i=ldot;
 179         dot[i].o.x=dx;dot[i].o.y=dy;
 180         dot[i].o.xv=bl_ini[bl_r].xv+Z_dec(xv,3);
 181         dot[i].o.yv=bl_ini[bl_r].yv+Z_dec(yv,3)-3;
 182         dot[i].c=bl_ini[bl_r].c;
 183         dot[i].t=255;
 184         dot[i].o.vx=dot[i].o.vy=0;
 185         if(++bl_r>=MAXINI) bl_r=0;
 186         if(++sr_r>=MAXSR) sr_r=0;
 187     incldot();
 188   }
 189 }
 190
 191 void DOT_spark(int x,int y,int xv,int yv,int n) {
 192   int i,k,dx,dy;
 193
 194   for(k=n;k;--k) {
 195     dx=x+sxr[sr_r];dy=y+syr[sr_r];
 196     if(!Z_canfit(x,y,0,1)) continue;
 197     i=ldot;
 198         dot[i].o.x=dx;dot[i].o.y=dy;
 199         dot[i].o.xv=sp_ini[sp_r].xv-xv/4;
 200         dot[i].o.yv=sp_ini[sp_r].yv-yv/4;
 201         dot[i].c=sp_ini[sp_r].c;
 202         dot[i].t=sp_ini[sp_r].t;
 203         dot[i].o.vx=dot[i].o.vy=0;
 204         if(++sp_r>=MAXINI) sp_r=0;
 205         if(++sr_r>=MAXSR) sr_r=0;
 206     incldot();
 207   }
 208 }
 209
 210 void DOT_water(int x,int y,int xv,int yv,int n,int c) {
 211   int i,k,dx,dy;
 212   static byte ct[3]={0xC0,0x70,0xB0};
 213
 214   if(c<0 || c>=3) return;
 215   c=ct[c];
 216   for(k=n;k;--k) {
 217     dx=x+sxr[sr_r];dy=y+syr[sr_r];
 218     if(!Z_canfit(x,y,0,1)) continue;
 219     i=ldot;
 220         dot[i].o.x=dx;dot[i].o.y=dy;
 221         dot[i].o.xv=bl_ini[bl_r].xv-Z_dec(xv,3);
 222         dot[i].o.yv=bl_ini[bl_r].yv-abs(yv);
 223         dot[i].c=bl_ini[bl_r].c-0xB0+c;
 224         dot[i].t=254;
 225         dot[i].o.vx=dot[i].o.vy=0;
 226         if(++bl_r>=MAXINI) bl_r=0;
 227         if(++sr_r>=MAXSR) sr_r=0;
 228     incldot();
 229   }
 230 }