From 2adcbab50f65dcfc5d8516a4da30bf8b8c3a6763 Mon Sep 17 00:00:00 2001 From: Andriy Shinkarchuck Date: Sun, 24 Jul 2011 18:37:07 +0300 Subject: [PATCH] weapons.c weapons.h moved to repo. Added license notification --- weapons.c | 512 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ weapons.h | 50 ++++++ 2 files changed, 562 insertions(+) create mode 100755 weapons.c create mode 100755 weapons.h diff --git a/weapons.c b/weapons.c new file mode 100755 index 0000000..4ccc73b --- /dev/null +++ b/weapons.c @@ -0,0 +1,512 @@ +/* + Copyright (C) Prikol Software 1996-1997 + Copyright (C) Aleksey Volynskov 1996-1997 + Copyright (C) 2011 + + This file is part of the Doom2D:Rembo project. + + Doom2D:Rembo is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License version 2 as + published by the Free Software Foundation. + + Doom2D:Rembo is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, see or + write to the Free Software Foundation, Inc., + 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA +*/ + +#include "glob.h" +#include +//#include +#include "vga.h" +#include "error.h" +#include "sound.h" +#include "view.h" +#include "bmap.h" +#include "dots.h" +#include "smoke.h" +#include "weapons.h" +#include "misc.h" + +extern int hit_xv,hit_yv; + +void bfg_fly(int x,int y,int own); + +enum{NONE=0,ROCKET,PLASMA,APLASMA,BALL1,BALL2,BALL7,BFGBALL,BFGHIT, + MANF,REVF,FIRE}; + +#pragma pack(1) +typedef struct{ + obj_t o; + byte t,s; + int own; + short target; +}weapon_t; +#pragma pack() + +static void *snd[14],*spr[49*2]; +static char sprd[49*2]; +static weapon_t wp[MAXWPN]; + +static void throw(int,int,int,int,int,int,int,int); + +void WP_savegame(FILE* h) { + int n; + + for(n=MAXWPN;--n;) if(wp[n].t) break; + ++n;myfwrite(&n,1,4,h);myfwrite(wp,1,n*sizeof(wp[0]),h); +} + +void WP_loadgame(FILE* h) { + int n; + + myfread(&n,1,4,h);myfread(wp,1,n*sizeof(wp[0]),h); +} + +void WP_alloc(void) { + int i; + static char nm[14][6]={ + "PISTOL", + "SHOTGN", + "DSHTGN", + "RLAUNC", + "RXPLOD", + "PLASMA", + "FIRSHT", + "FIRXPL", + "BAREXP", + "PUNCH", + "SAWHIT", + "MGUN", + "SPARK1", + "SPARK2" + }; + + for(i=0;i<4;++i) { + spr[i*2]=Z_getspr("MISL",i,1,sprd+i*2); + spr[i*2+1]=Z_getspr("MISL",i,2,sprd+i*2+1); + } + for(;i<6;++i) { + spr[i*2]=Z_getspr("PLSS",i-4,1,sprd+i*2); + spr[i*2+1]=Z_getspr("PLSS",i-4,2,sprd+i*2+1); + } + for(;i<11;++i) { + spr[i*2]=Z_getspr("PLSE",i-6,1,sprd+i*2); + spr[i*2+1]=Z_getspr("PLSE",i-6,2,sprd+i*2+1); + } + for(;i<13;++i) { + spr[i*2]=Z_getspr("APLS",i-11,1,sprd+i*2); + spr[i*2+1]=Z_getspr("APLS",i-11,2,sprd+i*2+1); + } + for(;i<18;++i) { + spr[i*2]=Z_getspr("APBX",i-13,1,sprd+i*2); + spr[i*2+1]=Z_getspr("APBX",i-13,2,sprd+i*2+1); + } + for(;i<20;++i) { + spr[i*2]=Z_getspr("BFS1",i-18,1,sprd+i*2); + spr[i*2+1]=Z_getspr("BFS1",i-18,2,sprd+i*2+1); + } + for(;i<26;++i) { + spr[i*2]=Z_getspr("BFE1",i-20,1,sprd+i*2); + spr[i*2+1]=Z_getspr("BFE1",i-20,2,sprd+i*2+1); + } + for(;i<30;++i) { + spr[i*2]=Z_getspr("BFE2",i-26,1,sprd+i*2); + spr[i*2+1]=Z_getspr("BFE2",i-26,2,sprd+i*2+1); + } + for(;i<32;++i) { + spr[i*2]=Z_getspr("MISL",i-30+4,1,sprd+i*2); + spr[i*2+1]=Z_getspr("MISL",i-30+4,2,sprd+i*2+1); + } + for(;i<37;++i) { + spr[i*2]=Z_getspr("BAL1",i-32,1,sprd+i*2); + spr[i*2+1]=Z_getspr("BAL1",i-32,2,sprd+i*2+1); + } + for(;i<42;++i) { + spr[i*2]=Z_getspr("BAL7",i-37,1,sprd+i*2); + spr[i*2+1]=Z_getspr("BAL7",i-37,2,sprd+i*2+1); + } + for(;i<47;++i) { + spr[i*2]=Z_getspr("BAL2",i-42,1,sprd+i*2); + spr[i*2+1]=Z_getspr("BAL2",i-42,2,sprd+i*2+1); + } + for(;i<49;++i) { + spr[i*2]=Z_getspr("MANF",i-47,1,sprd+i*2); + spr[i*2+1]=Z_getspr("MANF",i-47,2,sprd+i*2+1); + } + for(i=0;i<14;++i) snd[i]=Z_getsnd(nm[i]); +} + +void WP_init(void) { + int i; + + for(i=0;i=2) {if(++wp[i].s>=8) wp[i].t=0; break;} + if(st&Z_HITAIR) Z_set_speed(&wp[i].o,12); + if(st&(Z_HITWALL|Z_HITCEIL|Z_HITLAND)) { + wp[i].s=2;wp[i].o.xv=wp[i].o.yv=0;Z_sound(snd[4],128); + Z_explode(wp[i].o.x,wp[i].o.y,30,wp[i].own);break;} + else if(Z_hit(&wp[i].o,10,wp[i].own,HIT_SOME)) { + wp[i].s=2;wp[i].o.xv=wp[i].o.yv=0;Z_sound(snd[4],128); + Z_explode(wp[i].o.x,wp[i].o.y-wp[i].o.h/2,30,wp[i].own);break;} + bfg_fly(wp[i].o.x,wp[i].o.y-wp[i].o.h/2,wp[i].own); + break; + case PLASMA: + case APLASMA: + if(st&Z_INWATER) { + Z_sound(snd[12],128); + Z_water_trap(&wp[i].o); + Z_chktrap(1,10,wp[i].own,HIT_ELECTRO); + Z_untrap(5); + wp[i].t=0;break; + } + case BALL1: + case BALL7: + case BALL2: + case MANF: + if(wp[i].s>=2) + {if(++wp[i].s>=((wp[i].t==BALL1 || wp[i].t==BALL7 || wp[i].t==BALL2 || wp[i].t==MANF)?8:12)) wp[i].t=0; break;} + if(st&Z_HITAIR) Z_set_speed(&wp[i].o,16); + if(st&(Z_HITWALL|Z_HITCEIL|Z_HITLAND)) + {wp[i].s=2;wp[i].o.xv=wp[i].o.yv=0;Z_sound(snd[7],128);break;} + else if(Z_hit(&wp[i].o,(wp[i].t==BALL7 || wp[i].t==MANF)?40:((wp[i].t==BALL2)?20:5),wp[i].own,HIT_SOME)) + {wp[i].s=2;wp[i].o.xv=wp[i].o.yv=0;Z_sound(snd[7],128);break;} + wp[i].s^=1;break; + case BFGBALL: + if(st&Z_INWATER) { + Z_sound(snd[8],40);Z_sound(snd[13],128); + Z_water_trap(&wp[i].o); + Z_chktrap(1,1000,wp[i].own,HIT_ELECTRO); + Z_untrap(5); + wp[i].t=0;break; + } + if(wp[i].s>=2) {if(++wp[i].s>=14) wp[i].t=0; break;} + else if(st&(Z_HITWALL|Z_HITCEIL|Z_HITLAND)) { + Z_bfg9000(wp[i].o.x,wp[i].o.y,wp[i].own); + wp[i].s=2;wp[i].o.xv=wp[i].o.yv=0;Z_sound(snd[8],128);break;} + else if(Z_hit(&wp[i].o,100,wp[i].own,HIT_BFG)) { + Z_bfg9000(wp[i].o.x,wp[i].o.y,wp[i].own); + wp[i].s=2;wp[i].o.xv=wp[i].o.yv=0;Z_sound(snd[8],128);break;} + bfg_fly(wp[i].o.x,wp[i].o.y-wp[i].o.h/2,wp[i].own); + wp[i].s^=1;break; + case BFGHIT: + if(++wp[i].s>=8) wp[i].t=0; + break; + default: break; + } + } +} + +void WP_draw(void) { + int i,s,d,x,y; + + for(i=0;i0)?1:0; + x=abs(wp[i].o.xv);y=wp[i].o.yv;s=0; + if(y<0) {if(-y>=x) s=30;} + else if(y>0) if(y>=x/2) s=31; + }else {s=(d-2)/2+1;d=0;} + break; + case MANF: + if((s=wp[i].s)>=2) {s/=2;break;} + case PLASMA: + case APLASMA: + case BALL1: + case BALL7: + case BALL2: + if((s=wp[i].s)>=2) s=s/2+1; + switch(wp[i].t) { + case PLASMA: s+=4;break; + case APLASMA: s+=11;break; + case BALL1: s+=32;break; + case BALL2: s+=42;break; + case BALL7: s+=37;d=(wp[i].o.xv>=0)?1:0;break; + case MANF: s+=47;d=(wp[i].o.xv>=0)?1:0;break; + }break; + case BFGBALL: + if((s=wp[i].s)>=2) s=s/2+1; + s+=18;break; + case BFGHIT: + s=wp[i].s/2+26;break; + } + if(s>=0) Z_drawspr(wp[i].o.x,wp[i].o.y,spr[s*2+d],sprd[s*2+d]); + } +} + +void WP_gun(int x,int y,int xd,int yd,int o,int v) { + register dword d,m; + int sx,sy,lx,ly; + dword xe,ye,s; + byte f; + + f=BM_MONSTER|BM_WALL; + if(o!=-1) f|=BM_PLR1; + if(o!=-2) f|=BM_PLR2; + if((xd-=x)>0) sx=1; + else if(xd<0) sx=-1; + else sx=0; + if((yd-=y)>0) sy=1; + else if(yd<0) sy=-1; + else sy=0; + if(!xd && !yd) return; + if((xd=abs(xd)) > (yd=abs(yd))) d=xd; else d=yd; + hit_xv=xd*10/d*sx; + hit_yv=yd*10/d*sy; + xe=ye=0; + lx=x;ly=y; + for(;;) { + if(x<0 || x>=FLDW*8 || y<0 || y>=FLDH*8) break; + if(((m=bmap[y>>5][x>>5])&f)) { + if(m&BM_WALL) if(fld[y>>3][x>>3]==1 || fld[y>>3][x>>3]==2) { + for(x=lx,y=ly,xe=ye=0;fld[y>>3][x>>3]!=1 && fld[y>>3][x>>3]!=2;) { + lx=x;ly=y; + if((xe+=xd)>=d) {xe-=d;x+=sx;} + if((ye+=yd)>=d) {ye-=d;y+=sy;} + } + DOT_spark(lx,ly,sx*10,sy*10,1); + break; + } + if(m&(BM_MONSTER|BM_PLR1|BM_PLR2)) if(Z_gunhit(x,y,o,sx*v,sy*v)) break; + lx=x;ly=y; + if((xe+=(xd<<3))>=d) { + x+=xe/d*sx;xe=xe%d; + } + if((ye+=(yd<<3))>=d) { + y+=ye/d*sy;ye=ye%d; + } + }else{ + if(sx==0) m=0; + else{m=x&31;if(sx>0) m^=31; ++m;} + if(sy==0) s=0; + else{s=y&31;if(sy>0) s^=31; ++s;} + if((s=x)?1:0; + wp[i].own=o; + throw(i,x,y,xd,yd,2,5,12); + return; + } +} + +void WP_revf(int x,int y,int xd,int yd,int o,int t) { + int i; + + for(i=0;i=x)?1:0; + wp[i].own=o;wp[i].target=t; + throw(i,x,y,xd,yd,2,5,12); + return; + } +} + +void WP_plasma(int x,int y,int xd,int yd,int o) { + int i; + + for(i=0;i=0;--i) { + j=myrand(10*2+1)-10; + WP_gun(x,y+j,xd,yd+j,o,(i%3)?0:1); + } +} + +void WP_ognemet(int x,int y,int xd,int yd,int xv,int yv,int o) { + int m; + + m=abs(xd-x);if(!m) m=abs(yd-y); + SMK_flame(x,y,xv,yv,2,2,(xd-x)*3000/m,(yd-y)*3000/m,1,o); +} diff --git a/weapons.h b/weapons.h new file mode 100755 index 0000000..538d301 --- /dev/null +++ b/weapons.h @@ -0,0 +1,50 @@ +/* + Copyright (C) Prikol Software 1996-1997 + Copyright (C) Aleksey Volynskov 1996-1997 + Copyright (C) 2011 + + This file is part of the Doom2D:Rembo project. + + Doom2D:Rembo is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License version 2 as + published by the Free Software Foundation. + + Doom2D:Rembo is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, see or + write to the Free Software Foundation, Inc., + 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA +*/ + +// Weapons + +#define MAXWPN 300 + +void WP_init(void); +void WP_alloc(void); +void WP_act(void); +void WP_draw(void); +void WP_punch(int,int,int,int); +int WP_chainsaw(int,int,int,int); +void WP_gun(int,int,int,int,int,int); +void WP_pistol(int,int,int,int,int); +void WP_mgun(int,int,int,int,int); +void WP_rocket(int,int,int,int,int); +void WP_revf(int,int,int,int,int,int); +void WP_plasma(int,int,int,int,int); +void WP_ball1(int,int,int,int,int); +void WP_ball2(int,int,int,int,int); +void WP_ball7(int,int,int,int,int); +void WP_aplasma(int,int,int,int,int); +void WP_manfire(int,int,int,int,int); +void WP_bfgshot(int,int,int,int,int); +void WP_bfghit(int,int,int); +void WP_shotgun(int,int,int,int,int); +void WP_dshotgun(int,int,int,int,int); +void WP_ognemet(int x,int y,int xd,int yd,int xv,int yv,int o); + +void WP_grenade(int x, int y, int xd, int yd, int o); -- 2.29.2