1 files changed, 60 insertions, 0 deletions
diff --git a/src/simulation/elements/SPLU.cpp b/src/simulation/elements/SPLU.cpp
new file mode 100644
index 0000000..a1279a2
--- /dev/null
+++ b/src/simulation/elements/SPLU.cpp
@@ -0,0 +1,60 @@
+#include "simulation/Elements.h"
+//#TPT-Directive ElementClass Element_SPLU PT_SPLU 177
+Element_SPLU::Element_SPLU()
+{
+	Identifier = "DEFAULT_PT_SPLU";
+	Name = "SPLU";
+	Colour = PIXPACK(0x407020);
+	MenuVisible = 1;
+	MenuSection = SC_NUCLEAR;
+	Enabled = 1;
+	
+	Advection = 0.1f;
+	AirDrag = 0.01f * CFDS;
+	AirLoss = 0.99f;
+	Loss = 0.99f;
+	Collision = 0.0f;
+	Gravity = 0.4f;
+	Diffusion = 0.00f;
+	HotAir = 0.000f	* CFDS;
+	Falldown = 1;
+	
+	Flammable = 0;
+	Explosive = 0;
+	Meltable = 0;
+	Hardness = 0;
+	
+	Weight = 90;
+	
+	Temperature = R_TEMP+4.0f	+273.15f;
+	HeatConduct = 251;
+	Description = "Heavy particles. Fissile. Generates neutrons under pressure.";
+	
+	State = ST_SOLID;
+	Properties = TYPE_SOLID|PROP_NEUTPASS|PROP_RADIOACTIVE;
+	
+	LowPressure = IPL;
+	LowPressureTransition = NT;
+	HighPressure = IPH;
+	HighPressureTransition = NT;
+	LowTemperature = ITL;
+	LowTemperatureTransition = NT;
+	HighTemperature = ITH;
+	HighTemperatureTransition = NT;
+	
+	Update = &Element_SPLU::update;
+	
+}
+
+//#TPT-Directive ElementHeader Element_SPLU static int update(UPDATE_FUNC_ARGS)
+int Element_SPLU::update(UPDATE_FUNC_ARGS)
+{
+	if (!(rand()%100) && ((int)(5.0f*sim->pv[y/CELL][x/CELL]))>(rand()%1000))
+	{
+		sim->create_part(i, x, y, PT_NEUT);
+	}
+	return 0;
+}
+
+
+Element_SPLU::~Element_SPLU() {}