Adamantium

local logan = elements.allocate("TPT" , "XMEN")
 elements.element(logan, elements.element(elements.DEFAULT_PT_METL))
 elements.property(logan, "Name" , "ADMT")
 elements.property(logan, "Description" , "Adamantium, incredibly durable material. Almost virtually indestructible. An alloy of steel and vibranium")
 elements.property(logan, "Color", 0xC8C8D0)
 elements.property(logan, "HighTemperature", 9500.50)
 elements.property(logan, "Weight", 1010)
 elements.property(logan, "Hardness", 0)

 elements.property(elem.DEFAULT_PT_LAVA, "Update", --*1
 function(i,x,y,s,nt) --1
  if math.random(1,2) == 2 then --2
   for r in sim.neighbors(x,y,1,1) do --3
    if sim.partProperty(r, "type") == elements.DEFAULT_PT_LAVA then --4
     if sim.partProperty(r, "ctype") == elements.DEFAULT_PT_METL then --5
      if sim.partProperty(i, "ctype") == elements.DEFAULT_PT_VIBR then --6
       sim.partProperty(r, "type", elements.TPT_PT_XMEN)
       sim.partProperty(i, "type", elements.TPT_PT_XMEN)
       end --6
      end --5
     end --4
    end --3
   end --2
  end --1
  ) --*1