TPT: prevent ionizing NBLE and burning H2 during fusion 83d4658589

4 files changed, 20 insertions, 11 deletions

diff --git a/src/elements/elec.cpp b/src/elements/elec.cpp
index e8ddf5e..317d9f5 100644
--- a/src/elements/elec.cpp
+++ b/src/elements/elec.cpp
@@ -79,7 +79,7 @@ int update_ELEC(UPDATE_FUNC_ARGS) {
 					sim->kill_part(i);
 					return 1;
 				}
-				if (sim->ptypes[r&0xFF].properties & PROP_CONDUCTS)
+				if ((sim->ptypes[r&0xFF].properties & PROP_CONDUCTS) && ((r&0xFF)!=PT_H2||parts[i].tmp!=1))
 				{
 					sim->create_part(-1, x+rx, y+ry, PT_SPRK);
 					sim->kill_part(i);
diff --git a/src/elements/h2.cpp b/src/elements/h2.cpp
index dba08e9..7298ebc 100644
--- a/src/elements/h2.cpp
+++ b/src/elements/h2.cpp
@@ -3,6 +3,8 @@
 int update_H2(UPDATE_FUNC_ARGS)
 {
 	int r,rx,ry,rt;
+	if (parts[i].temp > 2273.15 && sim->pv[y/CELL][x/CELL] > 50.0f)
+		parts[i].tmp = 1;
 	for (rx=-2; rx<3; rx++)
 		for (ry=-2; ry<3; ry++)
 			if (x+rx>=0 && y+ry>=0 && x+rx<XRES && y+ry<YRES && (rx || ry))
@@ -16,24 +18,24 @@ int update_H2(UPDATE_FUNC_ARGS)
 					sim->part_change_type(r>>8,x+rx,y+ry,PT_WATR);
 					sim->part_change_type(i,x,y,PT_OIL);
 				}
+				if (parts[r>>8].temp > 2273.15)// && pv[y/CELL][x/CELL] > 50.0f)
+					continue;
 				if (parts[i].tmp != 1)
 				{
-					if ((r&0xFF)==PT_FIRE)
+					if (rt==PT_FIRE)
 					{
 						parts[r>>8].temp=2473.15;
 						if(parts[r>>8].tmp&0x02)
 						parts[r>>8].temp=3473;
 						parts[r>>8].tmp |= 1;
 					}
-					if ((r&0xFF)==PT_FIRE || (r&0xFF)==PT_PLSM || (r&0xFF)==PT_LAVA)
+					if (rt==PT_FIRE || rt==PT_PLSM || rt==PT_LAVA)
 					{
 						sim->create_part(i,x,y,PT_FIRE);
 						parts[i].temp+=(rand()/(RAND_MAX/100));
 						parts[i].tmp |= 1;
 					}
 				}
-				if (parts[i].temp > 2273.15 && sim->pv[y/CELL][x/CELL] > 50.0f && (r&0xFF) == PT_H2)
-					parts[r>>8].tmp = 1;
 			}
 	if (parts[i].temp > 2273.15 && sim->pv[y/CELL][x/CELL] > 50.0f)
 	{
@@ -42,14 +44,19 @@ int update_H2(UPDATE_FUNC_ARGS)
 		{
 			int j;
 			sim->part_change_type(i,x,y,PT_PLSM);
+			parts[i].life = rand()%150+50;
 			sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_NEUT);
 			sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_ELEC);
 			j = sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_PHOT);
-			if (j)
-				parts[j].ctype = 0xFFFF00;
-			sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_NBLE);
+			if (j) parts[j].ctype = 0xFFFF00;
+
+			j = sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_NBLE);
+			 	 if (j) parts[j].tmp = 1;
 			if (rand()%2)
-				sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_NBLE);
+			{
+				j = sim->create_part(-3,x+rand()%3-1,y+rand()%3-1,PT_NBLE);
+				if (j) parts[j].tmp = 1;
+			}
 			if (parts[i].temp < 4273.15)
 				parts[i].temp = 4273.15;
 			sim->pv[y/CELL][x/CELL] += 50;
diff --git a/src/elements/pyro.cpp b/src/elements/pyro.cpp
index 92d4d8c..6ffe644 100644
--- a/src/elements/pyro.cpp
+++ b/src/elements/pyro.cpp
@@ -46,7 +46,7 @@ int update_PYRO(UPDATE_FUNC_ARGS) {
 					(t!=PT_SPRK || (rt!=PT_RBDM && rt!=PT_LRBD && rt!=PT_INSL)) &&
 					(t!=PT_PHOT || rt!=PT_INSL) &&
 				    (rt!=PT_SPNG || parts[r>>8].life==0) &&
-				    (rt!=PT_H2 || parts[r>>8].tmp!=1) &&
+				    (rt!=PT_H2 || (parts[r>>8].temp < 2273.15 && sim->pv[y/CELL][x/CELL] < 50.0f)) &&
 				    sim->ptypes[rt].flammable && (sim->ptypes[rt].flammable + (int)(sim->pv[(y+ry)/CELL][(x+rx)/CELL]*10.0f))>(rand()%1000))
 				{
 					sim->part_change_type(r>>8,x+rx,y+ry,PT_FIRE);
diff --git a/src/elements/sprk.cpp b/src/elements/sprk.cpp
index 149d63b..e01c774 100644
--- a/src/elements/sprk.cpp
+++ b/src/elements/sprk.cpp
@@ -44,7 +44,7 @@ int update_SPRK(UPDATE_FUNC_ARGS) {
 			parts[nearp].ctype = PT_ETRD;
 		}
 	}
-	else if (ct==PT_NBLE&&parts[i].life<=1)
+	else if (ct==PT_NBLE&&parts[i].life<=1&&parts[i].tmp!=1)
 	{
 		parts[i].life = rand()%150+50;
 		sim->part_change_type(i,x,y,PT_PLSM);
@@ -179,6 +179,8 @@ int update_SPRK(UPDATE_FUNC_ARGS) {
 					conduct_sprk = 0;
 				if (rt==PT_INST&&ct!=PT_PSCN)
 					conduct_sprk = 0;
+				if (rt == PT_NBLE && parts[r>>8].tmp == 1)
+					conduct_sprk = 0;
 
 				if (conduct_sprk) {
 					if (rt==PT_WATR||rt==PT_SLTW) {