summaryrefslogtreecommitdiff
path: root/src/simulation/elements/BANG.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/simulation/elements/BANG.cpp')
-rw-r--r--src/simulation/elements/BANG.cpp126
1 files changed, 126 insertions, 0 deletions
diff --git a/src/simulation/elements/BANG.cpp b/src/simulation/elements/BANG.cpp
new file mode 100644
index 0000000..ac538ca
--- /dev/null
+++ b/src/simulation/elements/BANG.cpp
@@ -0,0 +1,126 @@
+#include "simulation/Elements.h"
+//#TPT-Directive ElementClass Element_BANG PT_BANG 139
+Element_BANG::Element_BANG()
+{
+ Identifier = "DEFAULT_PT_BANG";
+ Name = "TNT";
+ Colour = PIXPACK(0xC05050);
+ MenuVisible = 1;
+ MenuSection = SC_EXPLOSIVE;
+ Enabled = 1;
+
+ Advection = 0.0f;
+ AirDrag = 0.00f * CFDS;
+ AirLoss = 0.90f;
+ Loss = 0.00f;
+ Collision = 0.0f;
+ Gravity = 0.0f;
+ Diffusion = 0.00f;
+ HotAir = 0.000f * CFDS;
+ Falldown = 0;
+
+ Flammable = 0;
+ Explosive = 0;
+ Meltable = 0;
+ Hardness = 1;
+
+ Weight = 100;
+
+ Temperature = R_TEMP+0.0f +273.15f;
+ HeatConduct = 88;
+ Description = "Explosive.";
+
+ State = ST_SOLID;
+ Properties = TYPE_SOLID | PROP_NEUTPENETRATE;
+
+ LowPressure = IPL;
+ LowPressureTransition = NT;
+ HighPressure = IPH;
+ HighPressureTransition = NT;
+ LowTemperature = ITL;
+ LowTemperatureTransition = NT;
+ HighTemperature = ITH;
+ HighTemperatureTransition = NT;
+
+ Update = &Element_BANG::update;
+ Graphics = NULL;
+}
+
+//#TPT-Directive ElementHeader Element_BANG static int update(UPDATE_FUNC_ARGS)
+int Element_BANG::update(UPDATE_FUNC_ARGS)
+ {
+ int r, rx, ry, nb;
+ if(parts[i].tmp==0)
+ {
+ if(parts[i].temp>=673.0f)
+ parts[i].tmp = 1;
+ else
+ for (rx=-1; rx<2; rx++)
+ for (ry=-1; ry<2; ry++)
+ if (x+rx>=0 && y+ry>0 && x+rx<XRES && y+ry<YRES && (rx || ry))
+ {
+ r = pmap[y+ry][x+rx];
+ if (!r)
+ continue;
+ if ((r&0xFF)==PT_FIRE || (r&0xFF)==PT_PLSM)
+ {
+ parts[i].tmp = 1;
+ }
+ else if ((r&0xFF)==PT_SPRK || (r&0xFF)==PT_LIGH)
+ {
+ parts[i].tmp = 1;
+ }
+ }
+
+ }
+ else if(parts[i].tmp==1)
+ {
+ int tempvalue = 2;
+ sim->flood_prop(x, y, offsetof(Particle, tmp), &tempvalue, 0);
+ }
+ else if(parts[i].tmp==2)
+ {
+ parts[i].tmp = 3;
+ }
+ else if(parts[i].tmp>=3)
+ {
+ float otemp = parts[i].temp-275.13f;
+ //Explode!!
+ sim->pv[y/CELL][x/CELL] += 0.5f;
+ parts[i].tmp = 0;
+ if(!(rand()%3))
+ {
+ if(!(rand()%2))
+ {
+ sim->create_part(i, x, y, PT_FIRE);
+ parts[i].temp = restrict_flt((MAX_TEMP/4)+otemp, MIN_TEMP, MAX_TEMP);
+ }
+ else
+ {
+ sim->create_part(i, x, y, PT_SMKE);
+ parts[i].temp = restrict_flt((MAX_TEMP/4)+otemp, MIN_TEMP, MAX_TEMP);
+ }
+ }
+ else
+ {
+ if(!(rand()%15))
+ {
+ sim->create_part(i, x, y, PT_BOMB);
+ parts[i].tmp = 1;
+ parts[i].life = 50;
+ parts[i].temp = restrict_flt((MAX_TEMP/3)+otemp, MIN_TEMP, MAX_TEMP);
+ parts[i].vx = rand()%20-10;
+ parts[i].vy = rand()%20-10;
+ }
+ else
+ {
+ sim->kill_part(i);
+ }
+ }
+ return 1;
+ }
+ return 0;
+}
+
+
+Element_BANG::~Element_BANG() {} \ No newline at end of file