Adamantium

local adam = elem.allocate("BAUER", "ADAM")
elem.element(elem.BAUER_PT_ADAM, elem.element(elem.DEFAULT_PT_TTAN))
elem.property(elem.BAUER_PT_ADAM, "Name", "ADAM")
elem.property(elem.BAUER_PT_ADAM, "Description", "Adamantium, indestructible, sort of")
elem.property(elem.BAUER_PT_ADAM, "Colour", 0x5D849F)
elem.property(elem.BAUER_PT_ADAM, "MenuVisible", 1)
elem.property(elem.BAUER_PT_ADAM, "Hardness", 0)
elem.property(elem.BAUER_PT_ADAM, "Meltable", 0)
elem.property(elem.BAUER_PT_ADAM, "HeatConduct", 0)

local function adamUpdate(i, x, y, s, nt)
    for r in sim.neighbors(x, y, 2, 2) do
        local rtype = sim.partProperty(r, "type")
        if rtype == elem.DEFAULT_PT_BOMB or rtype == elem.DEFAULT_PT_DEST then
            sim.partKill(r)
            end
    end
end


elem.property(adam, "Update", adamUpdate)