diff --git a/src/elements/bcln.c b/src/elements/bcln.c
index 328fc6e9a..91dac12d2 100644
--- a/src/elements/bcln.c
+++ b/src/elements/bcln.c
@@ -38,18 +38,26 @@ int update_BCLN(UPDATE_FUNC_ARGS) {
 						continue;
 					if ((r&0xFF)!=PT_CLNE && (r&0xFF)!=PT_PCLN &&
 				        (r&0xFF)!=PT_BCLN && (r&0xFF)!=PT_STKM &&
-				        (r&0xFF)!=PT_STKM2 && (r&0xFF)!=PT_PBCN &&
+				        (r&0xFF)!=PT_PBCN && (r&0xFF)!=PT_STKM2 &&
 				        (r&0xFF)<PT_NUM)
 					{
 						parts[i].ctype = r&0xFF;
-						if ((r&0xFF)==PT_LIFE)
+						if ((r&0xFF)==PT_LIFE || (r&0xFF)==PT_LAVA)
 							parts[i].tmp = parts[r>>8].ctype;
 					}
 				}
 	}
 	else {
 		if (parts[i].ctype==PT_LIFE) create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype|(parts[i].tmp<<8));
-		else create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+		else
+		{
+			int np = create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+			if (np>=0)
+			{
+				if (parts[i].ctype==PT_LAVA && parts[i].tmp>0 && parts[i].tmp<PT_NUM && ptransitions[parts[i].tmp].tht==PT_LAVA)
+					parts[np].ctype = parts[i].tmp;
+			}
+		}
 	}
 	return 0;
 }
diff --git a/src/elements/clne.c b/src/elements/clne.c
index 3dfd7bb7d..3ac45d8de 100644
--- a/src/elements/clne.c
+++ b/src/elements/clne.c
@@ -34,14 +34,22 @@ int update_CLNE(UPDATE_FUNC_ARGS) {
 				        (r&0xFF)<PT_NUM)
 					{
 						parts[i].ctype = r&0xFF;
-						if ((r&0xFF)==PT_LIFE)
+						if ((r&0xFF)==PT_LIFE || (r&0xFF)==PT_LAVA)
 							parts[i].tmp = parts[r>>8].ctype;
 					}
 				}
 	}
 	else {
 		if (parts[i].ctype==PT_LIFE) create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype|(parts[i].tmp<<8));
-		else create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+		else
+		{
+			int np = create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+			if (np>=0)
+			{
+				if (parts[i].ctype==PT_LAVA && parts[i].tmp>0 && parts[i].tmp<PT_NUM && ptransitions[parts[i].tmp].tht==PT_LAVA)
+					parts[np].ctype = parts[i].tmp;
+			}
+		}
 	}
 	return 0;
 }
diff --git a/src/elements/pbcn.c b/src/elements/pbcn.c
index df3824834..001c5dfcb 100644
--- a/src/elements/pbcn.c
+++ b/src/elements/pbcn.c
@@ -49,7 +49,7 @@ int update_PBCN(UPDATE_FUNC_ARGS) {
 				        (r&0xFF)!=PT_PBCN && (r&0xFF)<PT_NUM)
 					{
 						parts[i].ctype = r&0xFF;
-						if ((r&0xFF)==PT_LIFE)
+						if ((r&0xFF)==PT_LIFE || (r&0xFF)==PT_LAVA)
 							parts[i].tmp = parts[r>>8].ctype;
 					}
 				}
@@ -100,8 +100,15 @@ int update_PBCN(UPDATE_FUNC_ARGS) {
 					create_part(-1, x+rx, y+ry, parts[i].ctype|(parts[i].tmp<<8));
 				}
 			}
-		} else {
-			create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+		}
+		else
+		{
+			int np = create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+			if (np>=0)
+			{
+				if (parts[i].ctype==PT_LAVA && parts[i].tmp>0 && parts[i].tmp<PT_NUM && ptransitions[parts[i].tmp].tht==PT_LAVA)
+					parts[np].ctype = parts[i].tmp;
+			}
 		}
 	}
 	return 0;
diff --git a/src/elements/pcln.c b/src/elements/pcln.c
index ac286aa0f..1ffcbb440 100644
--- a/src/elements/pcln.c
+++ b/src/elements/pcln.c
@@ -58,7 +58,7 @@ int update_PCLN(UPDATE_FUNC_ARGS) {
 				        (r&0xFF)!=PT_PBCN && (r&0xFF)<PT_NUM)
 					{
 						parts[i].ctype = r&0xFF;
-						if ((r&0xFF)==PT_LIFE)
+						if ((r&0xFF)==PT_LIFE || (r&0xFF)==PT_LAVA)
 							parts[i].tmp = parts[r>>8].ctype;
 					}
 				}
@@ -90,8 +90,15 @@ int update_PCLN(UPDATE_FUNC_ARGS) {
 					create_part(-1, x+rx, y+ry, parts[i].ctype|(parts[i].tmp<<8));
 				}
 			}
-		} else {
-			create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+		}
+		else
+		{
+			int np = create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+			if (np>=0)
+			{
+				if (parts[i].ctype==PT_LAVA && parts[i].tmp>0 && parts[i].tmp<PT_NUM && ptransitions[parts[i].tmp].tht==PT_LAVA)
+					parts[np].ctype = parts[i].tmp;
+			}
 		}
 	}
 	return 0;