GOLD

--[[    element: Gold   by MrSalit0s    ]]
local Gold = elements.allocate("MOD", "GOLD")
elements.element(elements.MOD_PT_GOLD, elements.element(elements.DEFAULT_PT_METL))
elements.property(elements.MOD_PT_GOLD, "Name", "GOLD")
elements.property(elements.MOD_PT_GOLD, "Description", "Gold")
elements.property(elements.MOD_PT_GOLD, "Colour", 0xFFDCAD2C)
elements.property(elements.MOD_PT_GOLD, "MenuSection", 9)
elements.property(elements.MOD_PT_GOLD, "Properties", 0x4124)
elements.property(elements.MOD_PT_GOLD, "Temperature", 295)
elements.property(elements.MOD_PT_GOLD, "Meltable", 1)
elements.property(elements.MOD_PT_GOLD, "HighTemperature", 1273.15)
elements.property(elements.MOD_PT_GOLD, "HighTemperatureTransition", tpt.element("LAVA"))

local elem = tpt.get_property("type", ox, oy)

local function gold(i,x,y,s,n)
local ox = x+math.random(-1,1)
local oy = y+math.random(-1,1)
    if simulation.pressure(x/4, y/4) >= 0 then      --blocks pressure
        simulation.pressure(x/4, y/4, 0)
    end
    if tpt.get_property("type",ox, oy) == elements.DEFAULT_PT_BMTL or tpt.get_property("type",ox, oy) == elements.DEFAULT_PT_BRMT then
        tpt.set_property("type",elements.DEFAULT_PT_IRON,ox,oy)
    end
end

local function goldlava(i,x,y,s,n)
local ox = x+math.random(-1,1)
local oy = y+math.random(-1,1)
    if tpt.get_property("ctype",i) == elements.MOD_PT_GOLD and tpt.get_property("type",ox, oy) == elements.DEFAULT_PT_EXOT then
        tpt.set_property("ctype",elements.DEFAULT_PT_VIBR,i)
    end
end

local function goldgraphics(i, colr, colg, colb)
    return 1,0x00000124,225,220,173,44,225,220,173,44
end

tpt.graphics_func(goldgraphics,elements.MOD_PT_GOLD)
tpt.element_func(gold,elements.MOD_PT_GOLD)
tpt.element_func(goldlava,elements.DEFAULT_PT_LAVA)