src/smoke.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 "smoke.h"
  27 #include "game.h"
  28 #include "fx.h"
  29 #include "misc.h"
  30 #include "my.h"
  31 #include "monster.h"
  32
  33 #define MAXSR 20
  34
  35 smoke_t sm[MAXSMOK];
  36
  37 static int sr_r,sxr[MAXSR],syr[MAXSR];
  38 static int lsm;
  39
  40 static void *burnsnd;
  41 static int burntm=0;
  42
  43 void SMK_savegame (FILE *h) {
  44   int i, n;
  45   for (i = n = 0; i < MAXSMOK; ++i) {
  46     if (sm[i].t) {
  47       ++n;
  48     }
  49   }
  50   myfwrite32(n, h);
  51   for (i = 0; i < MAXSMOK; ++i) {
  52     if (sm[i].t) {
  53       myfwrite32(sm[i].x, h);
  54       myfwrite32(sm[i].y, h);
  55       myfwrite32(sm[i].xv, h);
  56       myfwrite32(sm[i].xv, h);
  57       myfwrite8(sm[i].t, h);
  58       myfwrite8(sm[i].s, h);
  59       myfwrite16(sm[i].o, h);
  60     }
  61   }
  62 }
  63
  64 void SMK_loadgame (FILE *h) {
  65   int i, n;
  66   n = myfread32(h);
  67   for (i = 0; i < n; ++i) {
  68     sm[i].x = myfread32(h);
  69     sm[i].y = myfread32(h);
  70     sm[i].xv = myfread32(h);
  71     sm[i].xv = myfread32(h);
  72     sm[i].t = myfread8(h);
  73     sm[i].s = myfread8(h);
  74     sm[i].o = myfread16(h);
  75   }
  76 }
  77
  78 void SMK_init (void) {
  79   int i;
  80
  81   for(i=0;i<MAXSMOK;++i) {sm[i].t=0;}
  82   lsm=0;
  83   burntm=0;
  84 }
  85
  86 void SMK_alloc (void) {
  87   int i;
  88   burnsnd=Z_getsnd("BURN");
  89   for(i=0;i<MAXSR;++i) {
  90     sxr[i]=myrand(256*2+1)-256;
  91     syr[i]=myrand(256*2+1)-256;
  92   }
  93   sr_r=0;
  94 }
  95
  96 static void inclast(void) {
  97   if(++lsm>=MAXSMOK) lsm=0;
  98 }
  99
 100 void SMK_act (void) {
 101   int i,ox,oy;
 102   static obj_t o;
 103
 104   if(burntm) --burntm;
 105   for(i=0;i<MAXSMOK;++i) if(sm[i].t) {
 106     if(sm[i].s) {
 107       ox=sm[i].x;oy=sm[i].y;
 108       sm[i].xv=Z_dec(sm[i].xv,20);
 109       sm[i].yv=Z_dec(sm[i].yv,20);
 110       sm[i].x+=sm[i].xv/2;sm[i].y+=sm[i].yv/2;
 111       if(!Z_canfit(sm[i].x>>8,(sm[i].y>>8)+3,3,7)) {
 112         sm[i].x=ox;sm[i].y=oy;
 113       }else if(Z_inwater(sm[i].x>>8,(sm[i].y>>8)+3,3,7)) {
 114         sm[i].x=ox;sm[i].y=oy;
 115       }
 116       ox=sm[i].x;oy=sm[i].y;
 117       sm[i].x+=sm[i].xv/2;sm[i].y+=sm[i].yv/2;
 118       if(!Z_canfit(sm[i].x>>8,(sm[i].y>>8)+3,3,7)) {
 119         sm[i].x=ox;sm[i].y=oy;
 120       }else if(Z_inwater(sm[i].x>>8,(sm[i].y>>8)+3,3,7)) {
 121         sm[i].x=ox;sm[i].y=oy;
 122       }
 123       if(sm[i].o!=-3) {
 124         o.x=sm[i].x>>8;o.y=sm[i].y>>8;
 125         o.xv=sm[i].xv>>10;o.yv=sm[i].yv>>10;
 126         o.vx=o.vy=0;
 127         if(!(g_time&3)) Z_hit(&o,1,sm[i].o,HIT_FLAME);
 128       }
 129     }else{
 130       ox=sm[i].x;oy=sm[i].y;
 131       sm[i].xv=Z_dec(sm[i].xv,20);
 132       sm[i].yv=Z_dec(sm[i].yv,20);
 133       sm[i].x+=sm[i].xv;sm[i].y+=sm[i].yv;
 134       if(!Z_canfit(sm[i].x>>8,(sm[i].y>>8)+3,3,7)) {
 135         sm[i].x=ox;sm[i].y=oy;
 136       }else if(Z_inwater(sm[i].x>>8,(sm[i].y>>8)+3,3,7)) {
 137         sm[i].x=ox;sm[i].y=oy;
 138       }
 139     }
 140     --sm[i].t;
 141   }
 142 }
 143
 144 static void SMK_add (int x, int y, int xv, int yv, byte t, byte s, short o) {
 145   int i;
 146
 147   if(!Z_canfit(x>>8,(y>>8)+3,3,7)) return;
 148   if(Z_inwater(x>>8,(y>>8)+3,3,7)) {FX_bubble(x>>8,y>>8,xv,yv,1);return;}
 149   i=lsm;
 150   sm[i].x=x;sm[i].y=y;
 151   sm[i].xv=xv;sm[i].yv=yv;
 152   sm[i].t=t;sm[i].s=s;
 153   sm[i].o=o;
 154   inclast();
 155 }
 156
 157 void SMK_gas (int x0, int y0, int xr, int yr, int xv, int yv, int k) {
 158   int i,x,y;
 159   static int sxv,syv;
 160
 161   xv=-xv;yv=-yv;
 162   sxv=xv*k;syv=yv*k;
 163   k=max(abs(xv),abs(yv));
 164   if(!k) return;
 165   for(i=0;i<=k;i+=3) {
 166     x=((xv*i/k+x0)<<8)+sxr[sr_r]*xr;
 167     y=((yv*i/k+y0)<<8)+syr[sr_r]*yr;
 168     if(++sr_r>=MAXSR) sr_r=0;
 169     SMK_add(x,y,sxv,syv,SMSN*3,0,-3);
 170   }
 171 }
 172
 173 void SMK_flame (int x0, int y0, int ox, int oy, int xr, int yr, int xv, int yv, int k, int o) {
 174   int i,x,y;
 175   static int sxv,syv;
 176
 177   sxv=xv*k;syv=yv*k;
 178   xv=xv-(ox<<8);yv=yv-(oy<<8);
 179   k=max(abs(xv),abs(yv));
 180   if(!k) return;
 181   if(!burntm) burntm=Z_sound(burnsnd,128);
 182   for(i=0;i<=k;i+=200) {
 183     x=xv*i/k+(x0<<8)+sxr[sr_r]*xr;
 184     y=yv*i/k+(y0<<8)+syr[sr_r]*yr;
 185     if(++sr_r>=MAXSR) sr_r=0;
 186     SMK_add(x,y,sxv,syv,FLSN,1,o);
 187   }
 188 }