mirror of
https://github.com/The-Powder-Toy/The-Powder-Toy.git
synced 2025-03-22 15:19:52 +01:00
RFRG and RFGL (#315)
This commit is contained in:
parent
ad4ef65cb3
commit
6e6eb36bf5
92
src/simulation/elements/RFGL.cpp
Normal file
92
src/simulation/elements/RFGL.cpp
Normal file
@ -0,0 +1,92 @@
|
||||
#include "simulation/Elements.h"
|
||||
//#TPT-Directive ElementClass Element_RFGL PT_RFGL 181
|
||||
Element_RFGL::Element_RFGL()
|
||||
{
|
||||
Identifier = "DEFAULT_PT_RFGL";
|
||||
Name = "RFGL";
|
||||
Colour = PIXPACK(0x84C2CF);
|
||||
MenuVisible = 0;
|
||||
MenuSection = SC_LIQUID;
|
||||
Enabled = 1;
|
||||
|
||||
Advection = 0.6f;
|
||||
AirDrag = 0.01f * CFDS;
|
||||
AirLoss = 0.98f;
|
||||
Loss = 0.95f;
|
||||
Collision = 0.0f;
|
||||
Gravity = 0.1f;
|
||||
Diffusion = 0.00f;
|
||||
HotAir = 0.000f * CFDS;
|
||||
Falldown = 2;
|
||||
|
||||
Flammable = 0;
|
||||
Explosive = 0;
|
||||
Meltable = 0;
|
||||
Hardness = 20;
|
||||
|
||||
Weight = 10;
|
||||
|
||||
Temperature = R_TEMP + 273.15f;
|
||||
HeatConduct = 0;
|
||||
Description = "Liquid refrigerant.";
|
||||
|
||||
Properties = TYPE_LIQUID|PROP_DEADLY;
|
||||
|
||||
LowPressure = IPL;
|
||||
LowPressureTransition = NT;
|
||||
HighPressure = IPH;
|
||||
HighPressureTransition = NT;
|
||||
LowTemperature = ITL;
|
||||
LowTemperatureTransition = NT;
|
||||
HighTemperature = ITH;
|
||||
HighTemperatureTransition = NT;
|
||||
|
||||
Update = &Element_RFGL::update;
|
||||
}
|
||||
|
||||
//#TPT-Directive ElementHeader Element_RFGL static int update(UPDATE_FUNC_ARGS)
|
||||
int Element_RFGL::update(UPDATE_FUNC_ARGS)
|
||||
{
|
||||
float pressure = sim->pv[y/CELL][x/CELL];
|
||||
if (pressure > parts[i].tmp)
|
||||
parts[i].tmp = (int)pressure;
|
||||
|
||||
if (pressure > -1 && pressure < 15 && parts[i].life > 0)
|
||||
parts[i].life --;
|
||||
|
||||
if (parts[i].temp >= 323.15f + (pressure * 6.0f))
|
||||
sim->part_change_type(i, x, y, PT_RFRG);
|
||||
|
||||
int r, rx, ry;
|
||||
for (rx=-1; rx<2; rx++)
|
||||
for (ry=-1; ry<2; ry++)
|
||||
if (BOUNDS_CHECK && (rx || ry))
|
||||
{
|
||||
r = pmap[y+ry][x+rx];
|
||||
if (!r)
|
||||
continue;
|
||||
if ((r&0xFF) == PT_RFGL)
|
||||
{
|
||||
float avgTemp = (parts[r>>8].temp + parts[i].temp) / 2;
|
||||
parts[r>>8].temp = avgTemp;
|
||||
parts[i].temp = avgTemp;
|
||||
}
|
||||
else
|
||||
{
|
||||
if (pressure > 20 && parts[i].temp > 273.15f + 2.0f - (pressure - 20.0f) && sim->elements[r&0xFF].HeatConduct)
|
||||
{
|
||||
parts[r>>8].temp = restrict_flt(parts[r>>8].temp + 80.0f, 0.0f, MAX_TEMP);
|
||||
parts[i].temp = restrict_flt(parts[i].temp - 80.0f, 0.0f, MAX_TEMP);
|
||||
}
|
||||
else if (parts[i].life == 0 && parts[r>>8].temp > 273.15f + 2.0f - (parts[i].tmp - 20.0f) && sim->elements[r&0xFF].HeatConduct)
|
||||
{
|
||||
parts[r>>8].temp -= restrict_flt(parts[r>>8].temp - 40.0f, 273.15f + 2.0f - (parts[i].tmp - 60.0f), MAX_TEMP);
|
||||
parts[i].temp = restrict_flt(parts[i].temp + 40.0f, 0.0f, 343.15f);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
Element_RFGL::~Element_RFGL() {}
|
62
src/simulation/elements/RFRG.cpp
Normal file
62
src/simulation/elements/RFRG.cpp
Normal file
@ -0,0 +1,62 @@
|
||||
#include "simulation/Elements.h"
|
||||
//#TPT-Directive ElementClass Element_RFRG PT_RFRG 180
|
||||
Element_RFRG::Element_RFRG()
|
||||
{
|
||||
Identifier = "DEFAULT_PT_RFRG";
|
||||
Name = "RFRG";
|
||||
Colour = PIXPACK(0x72D2D4);
|
||||
MenuVisible = 1;
|
||||
MenuSection = SC_GAS;
|
||||
Enabled = 1;
|
||||
|
||||
Advection = 1.2f;
|
||||
AirDrag = 0.00f * CFDS;
|
||||
AirLoss = 0.99f;
|
||||
Loss = 0.30f;
|
||||
Collision = -0.1f;
|
||||
Gravity = 0.0f;
|
||||
Diffusion = 1.3f;
|
||||
HotAir = 0.0001f * CFDS;
|
||||
Falldown = 0;
|
||||
|
||||
Flammable = 0;
|
||||
Explosive = 0;
|
||||
Meltable = 0;
|
||||
Hardness = 20;
|
||||
|
||||
Weight = 1;
|
||||
|
||||
Temperature = R_TEMP + 273.15f;
|
||||
HeatConduct = 3;
|
||||
Description = "Refrigerant. Liquifies and transfers heat to other particles under pressure.";
|
||||
|
||||
Properties = TYPE_GAS|PROP_DEADLY;
|
||||
|
||||
LowPressure = IPL;
|
||||
LowPressureTransition = NT;
|
||||
HighPressure = IPH;
|
||||
HighPressureTransition = NT;
|
||||
LowTemperature = ITL;
|
||||
LowTemperatureTransition = NT;
|
||||
HighTemperature = ITH;
|
||||
HighTemperatureTransition = NT;
|
||||
|
||||
Update = &Element_RFRG::update;
|
||||
}
|
||||
|
||||
//#TPT-Directive ElementHeader Element_RFRG static int update(UPDATE_FUNC_ARGS)
|
||||
int Element_RFRG::update(UPDATE_FUNC_ARGS)
|
||||
{
|
||||
if (sim->pv[y/CELL][x/CELL] > 15) {
|
||||
parts[i].temp += (sim->pv[y/CELL][x/CELL] - 15.0f) / 2.0f;
|
||||
if (parts[i].temp >= 343.15f) {
|
||||
sim->part_change_type(i, x, y, PT_RFGL);
|
||||
parts[i].life = 20;
|
||||
}
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
Element_RFRG::~Element_RFRG() {}
|
Loading…
x
Reference in New Issue
Block a user