diff options
| author | Simon Robertshaw <simon@hardwired.org.uk> | 2012-11-17 19:44:09 (GMT) |
|---|---|---|
| committer | Simon Robertshaw <simon@hardwired.org.uk> | 2012-11-17 19:44:09 (GMT) |
| commit | 058a2edd75debbd0297f92572316daa704bd379f (patch) | |
| tree | ad303f091f9a08b209b91eb34a9fcad996a3de69 /src/simulation/elements/TTAN.cpp | |
| parent | e3594aba9e05c6865d396418c028049cda92c2f3 (diff) | |
| parent | 7a21ae192fe19868539956f3fe28e62b2c7c4429 (diff) | |
| download | powder-058a2edd75debbd0297f92572316daa704bd379f.zip powder-058a2edd75debbd0297f92572316daa704bd379f.tar.gz | |
Merge branch 'master' of github.com:FacialTurd/PowderToypp
Diffstat (limited to 'src/simulation/elements/TTAN.cpp')
| -rw-r--r-- | src/simulation/elements/TTAN.cpp | 76 |
1 files changed, 76 insertions, 0 deletions
diff --git a/src/simulation/elements/TTAN.cpp b/src/simulation/elements/TTAN.cpp new file mode 100644 index 0000000..c51319d --- /dev/null +++ b/src/simulation/elements/TTAN.cpp @@ -0,0 +1,76 @@ +#include "simulation/Elements.h" +#include "simulation/Air.h" +//#TPT-Directive ElementClass Element_TTAN PT_TTAN 144 +Element_TTAN::Element_TTAN() +{ + Identifier = "DEFAULT_PT_TTAN"; + Name = "TTAN"; + Colour = PIXPACK(0x909090); + MenuVisible = 1; + MenuSection = SC_SOLIDS; + 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 = 1; + Hardness = 50; + + Weight = 100; + + Temperature = R_TEMP+0.0f +273.15f; + HeatConduct = 251; + Description = "Titanium, Higher melting temperature than other metals, blocks all air pressure"; + + State = ST_SOLID; + Properties = TYPE_SOLID|PROP_CONDUCTS|PROP_HOT_GLOW|PROP_LIFE_DEC; + + LowPressure = IPL; + LowPressureTransition = NT; + HighPressure = IPH; + HighPressureTransition = NT; + LowTemperature = ITL; + LowTemperatureTransition = NT; + HighTemperature = 1941.0f; + HighTemperatureTransition = PT_LAVA; + + Update = &Element_TTAN::update; + +} + +//#TPT-Directive ElementHeader Element_TTAN static int update(UPDATE_FUNC_ARGS) +int Element_TTAN::update(UPDATE_FUNC_ARGS) + { + int nx, ny, ttan = 0; + if(nt<=2) + ttan = 2; + else if(parts[i].tmp) + ttan = 2; + else if(nt<=6) + for (nx=-1; nx<2; nx++) { + for (ny=-1; ny<2; ny++) { + if ((!nx != !ny) && x+nx>=0 && y+ny>=0 && x+nx<XRES && y+ny<YRES) { + if((pmap[y+ny][x+nx]&0xFF)==PT_TTAN) + ttan++; + } + } + } + + if(ttan>=2) { + sim->air->bmap_blockair[y/CELL][x/CELL] = 1; + sim->air->bmap_blockairh[y/CELL][x/CELL] = 1; + } + return 0; +} + + +Element_TTAN::~Element_TTAN() {} |
