1 files changed, 32 insertions, 0 deletions
diff --git a/src/elements/amtr.c b/src/elements/amtr.c
new file mode 100644
index 0000000..3f70daa
--- /dev/null
+++ b/src/elements/amtr.c
@@ -0,0 +1,32 @@
+#include <powder.h>
+
+int update_AMTR(UPDATE_FUNC_ARGS) {
+	int r, rt;
+	for (nx=-1; nx<2; nx++)
+		for (ny=-1; ny<2; ny++)
+			if (x+nx>=0 && y+ny>0 &&
+			        x+nx<XRES && y+ny<YRES && (nx || ny))
+			{
+				r = pmap[y+ny][x+nx];
+				if ((r>>8)>=NPART || !r)
+					continue;
+				rt = parts[r>>8].type;
+				if ((r&0xFF)!=PT_AMTR && (r&0xFF)!=PT_DMND && (r&0xFF)!=PT_CLNE && (r&0xFF)!=PT_PCLN && (r&0xFF)!=PT_NONE && (r&0xFF)!=PT_PHOT && (r&0xFF)!=PT_VOID && (r&0xFF)!=PT_BHOL && (r&0xFF)!=PT_PRTI && (r&0xFF)!=PT_PRTO)
+				{
+					parts[i].life++;
+					if (parts[i].life==3)
+					{
+						parts[i].type = PT_NONE;
+						kill_part(i);
+						return 1;
+					}
+					parts[r>>8].life = 0;
+					parts[r>>8].type = PT_NONE;
+					kill_part(r>>8);
+					if (2>(rand()/(RAND_MAX/100)))
+						create_part(-1, x+nx, y+ny, PT_PHOT);
+					pv[y/CELL][x/CELL] -= 5.0f;
+				}
+			}
+	return 0;
+}