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 "vga.h"
  26 #include "view.h"
  27 #include "dots.h"
  28 #include "misc.h"
  29 #include "my.h"
  30
  31 #define MAXINI 50
  32 #define MAXSR 20
  33
  34 #define BL_XV 4
  35 #define BL_YV 4
  36 #define BL_MINT 10
  37 #define BL_MAXT 14
  38
  39 #define SP_V 2
  40 #define SP_MINT 5
  41 #define SP_MAXT 7
  42
  43 extern byte z_dot;
  44
  45 typedef struct{
  46   int xv,yv;
  47   byte c,t;
  48 }init_t;
  49
  50 dot_t dot[MAXDOT];
  51
  52 static init_t bl_ini[MAXINI],sp_ini[MAXINI];
  53 static int bl_r,sp_r,sr_r,sxr[MAXSR],syr[MAXSR];
  54 static int ldot;
  55
  56 void DOT_savegame (FILE *h) {
  57   int i, n;
  58   for (i = n = 0; i < MAXDOT; ++i) {
  59     if (dot[i].t) {
  60       ++n;
  61     }
  62   }
  63   myfwrite32(n, h);
  64   for (i = 0; i < MAXDOT; ++i) {
  65     if (dot[i].t) {
  66       myfwrite32(dot[i].o.x, h);
  67       myfwrite32(dot[i].o.y, h);
  68       myfwrite32(dot[i].o.xv, h);
  69       myfwrite32(dot[i].o.yv, h);
  70       myfwrite32(dot[i].o.vx, h);
  71       myfwrite32(dot[i].o.vy, h);
  72       myfwrite32(dot[i].o.r, h);
  73       myfwrite32(dot[i].o.h, h);
  74       myfwrite8(dot[i].c, h);
  75       myfwrite8(dot[i].t, h);
  76     }
  77   }
  78 }
  79
  80 void DOT_loadgame (FILE *h) {
  81   int i, n;
  82   n = myfread32(h);
  83   for (i = 0; i < n; i++) {
  84     dot[i].o.x = myfread32(h);
  85     dot[i].o.y = myfread32(h);
  86     dot[i].o.xv = myfread32(h);
  87     dot[i].o.yv = myfread32(h);
  88     dot[i].o.vx = myfread32(h);
  89     dot[i].o.vy = myfread32(h);
  90     dot[i].o.r = myfread32(h);
  91     dot[i].o.h = myfread32(h);
  92     dot[i].c = myfread8(h);
  93     dot[i].t = myfread8(h);
  94   }
  95 }
  96
  97 void DOT_init(void) {
  98   int i;
  99
 100   for(i=0;i<MAXDOT;++i) {dot[i].t=0;dot[i].o.r=0;dot[i].o.h=1;}
 101   ldot=0;
 102 }
 103
 104 static void incldot(void) {
 105   if(++ldot>=MAXDOT) ldot=0;
 106 }
 107
 108 void DOT_alloc(void) {
 109   int i;
 110
 111   for(i=0;i<MAXINI;++i) {
 112         bl_ini[i].xv=myrand(BL_XV*2+1)-BL_XV;
 113         bl_ini[i].yv=-myrand(BL_YV);
 114         bl_ini[i].c=0xB0+myrand(16);
 115         bl_ini[i].t=myrand(BL_MAXT-BL_MINT+1)+BL_MINT;
 116         sp_ini[i].xv=myrand(SP_V*2+1)-SP_V;
 117         sp_ini[i].yv=myrand(SP_V*2+1)-SP_V;
 118         sp_ini[i].c=0xA0+myrand(6);
 119         sp_ini[i].t=myrand(SP_MAXT-SP_MINT+1)+SP_MINT;
 120   }
 121   for(i=0;i<MAXSR;++i) {
 122         sxr[i]=myrand(2*2+1)-2;
 123         syr[i]=myrand(2*2+1)-2;
 124   }
 125   bl_r=sp_r=sr_r=0;
 126 }
 127
 128 void DOT_act(void) {
 129   int i,s,xv,yv;
 130
 131   z_dot=1;
 132   for(i=0;i<MAXDOT;++i) if(dot[i].t) {
 133     xv=dot[i].o.xv+dot[i].o.vx;
 134     yv=dot[i].o.yv+dot[i].o.vy;
 135     s=Z_moveobj(&dot[i].o);
 136     if(dot[i].t<254) --dot[i].t;
 137     if(s&(Z_HITWATER|Z_FALLOUT)) {dot[i].t=0;continue;}
 138     if(s&Z_HITLAND) {
 139       if(!dot[i].o.xv) {
 140         if(yv>2) {
 141           if(!xv) dot[i].o.vx=(rand()&1)?-1:1;
 142           else dot[i].o.vx=Z_sign(dot[i].o.vx);
 143           if(rand()%yv==0) dot[i].o.vx*=2;
 144           dot[i].o.yv=yv-2;
 145         }
 146       }
 147       dot[i].o.xv=0;
 148       if(dot[i].t>4 && dot[i].t!=255) dot[i].t=4;
 149     }
 150     if(s&Z_HITWALL) {
 151       dot[i].o.vx=Z_sign(xv)*2;
 152       dot[i].o.yv=Z_sign(dot[i].o.yv);
 153       if(dot[i].o.yv>=0) if(rand()&3) --dot[i].o.yv;
 154       if(dot[i].o.yv>=0) if(rand()&1) --dot[i].o.yv;
 155     }
 156     if(s&Z_HITCEIL) {dot[i].o.xv=0;dot[i].o.yv=(myrand(100))?-2:0;}
 157   }
 158   z_dot=0;
 159 }
 160
 161 void DOT_add(int x,int y,char xv,char yv,byte c,byte t) {
 162   int i;
 163
 164   if(!Z_canfit(x,y,0,1)) return;
 165   i=ldot;
 166   dot[i].o.x=x;dot[i].o.y=y;
 167   dot[i].o.xv=xv;dot[i].o.yv=yv;
 168   dot[i].c=c;dot[i].t=t;
 169   dot[i].o.vx=dot[i].o.vy=0;
 170   incldot();
 171 }
 172
 173 void DOT_blood(int x,int y,int xv,int yv,int n) {
 174   int i,k,dx,dy;
 175
 176   for(k=n;k;--k) {
 177     dx=x+sxr[sr_r];dy=y+syr[sr_r];
 178     if(!Z_canfit(x,y,0,1)) continue;
 179     i=ldot;
 180         dot[i].o.x=dx;dot[i].o.y=dy;
 181         dot[i].o.xv=bl_ini[bl_r].xv+Z_dec(xv,3);
 182         dot[i].o.yv=bl_ini[bl_r].yv+Z_dec(yv,3)-3;
 183         dot[i].c=bl_ini[bl_r].c;
 184         dot[i].t=255;
 185         dot[i].o.vx=dot[i].o.vy=0;
 186         if(++bl_r>=MAXINI) bl_r=0;
 187         if(++sr_r>=MAXSR) sr_r=0;
 188     incldot();
 189   }
 190 }
 191
 192 void DOT_spark(int x,int y,int xv,int yv,int n) {
 193   int i,k,dx,dy;
 194
 195   for(k=n;k;--k) {
 196     dx=x+sxr[sr_r];dy=y+syr[sr_r];
 197     if(!Z_canfit(x,y,0,1)) continue;
 198     i=ldot;
 199         dot[i].o.x=dx;dot[i].o.y=dy;
 200         dot[i].o.xv=sp_ini[sp_r].xv-xv/4;
 201         dot[i].o.yv=sp_ini[sp_r].yv-yv/4;
 202         dot[i].c=sp_ini[sp_r].c;
 203         dot[i].t=sp_ini[sp_r].t;
 204         dot[i].o.vx=dot[i].o.vy=0;
 205         if(++sp_r>=MAXINI) sp_r=0;
 206         if(++sr_r>=MAXSR) sr_r=0;
 207     incldot();
 208   }
 209 }
 210
 211 void DOT_water(int x,int y,int xv,int yv,int n,int c) {
 212   int i,k,dx,dy;
 213   static byte ct[3]={0xC0,0x70,0xB0};
 214
 215   if(c<0 || c>=3) return;
 216   c=ct[c];
 217   for(k=n;k;--k) {
 218     dx=x+sxr[sr_r];dy=y+syr[sr_r];
 219     if(!Z_canfit(x,y,0,1)) continue;
 220     i=ldot;
 221         dot[i].o.x=dx;dot[i].o.y=dy;
 222         dot[i].o.xv=bl_ini[bl_r].xv-Z_dec(xv,3);
 223         dot[i].o.yv=bl_ini[bl_r].yv-abs(yv);
 224         dot[i].c=bl_ini[bl_r].c-0xB0+c;
 225         dot[i].t=254;
 226         dot[i].o.vx=dot[i].o.vy=0;
 227         if(++bl_r>=MAXINI) bl_r=0;
 228         if(++sr_r>=MAXSR) sr_r=0;
 229     incldot();
 230   }
 231 }