View difference between Paste ID: BkLvcBEg and 6ZDYP3vd

 SLTWUpdate = function(i, x, y, s, n)
 chance = math.random(-1,1)
 electrocy = tpt.get_property('ctype', x, y)
 electro = tpt.get_property('type', x + math.random(-1,1), y + chance)
 if electrocy == tpt.el.sltw.id then
 else
 if electro == tpt.el.sprk.id and buttonable == 0 then
 if chance == -1 then
 sim.partChangeType(i, tpt.element('plye'))
 end
 if chance == 0 then
 sim.partChangeType(i, tpt.element('hygn'))
 end
 if chance == 1 then
 sim.partChangeType(i, tpt.element('caus'))
 end
 tpt.set_property('life', 20 ,x, y)
 end
 end
 end
 tpt.element_func(SLTWUpdate, tpt.element('SLTW'))
 
 --petrol
 local antifrzz = elements.allocate("JWARD", "AFRZ")
 local petrolgas = elements.allocate("JWARD", "PTLV")
 local petrol = elements.allocate("JWARD", "PTRL")
 elements.element(elements.JWARD_PT_PTRL, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_PTRL, "Name", "PTRL")
 elements.property(elements.JWARD_PT_PTRL, "Description", "Petrol. Highly flammable liquid.")
 elements.property(elements.JWARD_PT_PTRL, "Colour", 0x0A4A5C)
 elements.property(elements.JWARD_PT_PTRL, "MenuSection", SC_LIQUID)
 elements.property(elements.JWARD_PT_PTRL, "Gravity", 0.6)
 elements.property(elements.JWARD_PT_PTRL, "Flammable", 65)
 elements.property(elements.JWARD_PT_PTRL, "Explosive", 0)
 elements.property(elements.JWARD_PT_PTRL, "Loss", 0.8)
 elements.property(elements.JWARD_PT_PTRL, "AirLoss", 0.94)
 elements.property(elements.JWARD_PT_PTRL, "AirDrag", 0.02)
 elements.property(elements.JWARD_PT_PTRL, "Advection", 0.8)
 elements.property(elements.JWARD_PT_PTRL, "Weight", 12)
 elements.property(elements.JWARD_PT_PTRL, "Diffusion", 0)
 elements.property(elements.JWARD_PT_PTRL, "Meltable", 0)
 elements.property(elements.JWARD_PT_PTRL, "Hardness", 0)
 elements.property(elements.JWARD_PT_PTRL, "Falldown", 2)
 elements.property(elements.JWARD_PT_PTRL, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_PTRL, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_PTRL, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_PTRL, "HeatConduct", 78)
 elements.property(elements.JWARD_PT_PTRL, "HighTemperature", 333.15)
 elements.property(elements.JWARD_PT_PTRL, "HighTemperatureTransition", elements.JWARD_PT_PTLV)
 elements.property(elements.JWARD_PT_PTRL, "LowTemperature", 225.15)
 elements.property(elements.JWARD_PT_PTRL, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 
 elements.element(elements.JWARD_PT_PTLV, elements.element(elements.DEFAULT_PT_HYGN))
 elements.property(elements.JWARD_PT_PTLV, "Name", "PTLV")
 elements.property(elements.JWARD_PT_PTLV, "Description", "petrol gas")
 elements.property(elements.JWARD_PT_PTLV, "Colour", 0x0A4A5C)
 elements.property(elements.JWARD_PT_PTLV, "MenuVisible", 0)
 elements.property(elements.JWARD_PT_PTLV, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_PTLV, "Flammable", 100)
 elements.property(elements.JWARD_PT_PTLV, "Explosive", 1)
 elements.property(elements.JWARD_PT_PTLV, "Loss", 0.75)
 elements.property(elements.JWARD_PT_PTLV, "AirLoss", 0.97)
 elements.property(elements.JWARD_PT_PTLV, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_PTLV, "Advection", 1)
 elements.property(elements.JWARD_PT_PTLV, "Weight", 0)
 elements.property(elements.JWARD_PT_PTLV, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_PTLV, "Meltable", 0)
 elements.property(elements.JWARD_PT_PTLV, "Hardness", 0)
 elements.property(elements.JWARD_PT_PTLV, "Falldown", 0)
 elements.property(elements.JWARD_PT_PTLV, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_PTLV, "State", ST_GAS)
 elements.property(elements.JWARD_PT_PTLV, "Temperature", 343.15)
 elements.property(elements.JWARD_PT_PTLV, "HeatConduct", 80)
 elements.property(elements.JWARD_PT_PTLV, "LowTemperature", 333.14)
 elements.property(elements.JWARD_PT_PTLV, "LowTemperatureTransition", elements.JWARD_PT_PTRL)
 
 elements.element(elements.JWARD_PT_AFRZ, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_AFRZ, "Name", "AFRZ")
 elements.property(elements.JWARD_PT_AFRZ, "Description", "antifreeze, keeps your fuel nice and toasty. methnol")
 elements.property(elements.JWARD_PT_AFRZ, "Colour", 0x0C3F5B)
 elements.property(elements.JWARD_PT_AFRZ, "MenuSection", SC_LIQUID)
 elements.property(elements.JWARD_PT_AFRZ, "Gravity", 0.6)
 elements.property(elements.JWARD_PT_AFRZ, "Flammable", 65)
 elements.property(elements.JWARD_PT_AFRZ, "Explosive", 0)
 elements.property(elements.JWARD_PT_AFRZ, "Loss", 0.8)
 elements.property(elements.JWARD_PT_AFRZ, "AirLoss", 0.94)
 elements.property(elements.JWARD_PT_AFRZ, "AirDrag", 0.02)
 elements.property(elements.JWARD_PT_AFRZ, "Advection", 0.8)
 elements.property(elements.JWARD_PT_AFRZ, "Weight", 12)
 elements.property(elements.JWARD_PT_AFRZ, "Diffusion", 0)
 elements.property(elements.JWARD_PT_AFRZ, "Meltable", 0)
 elements.property(elements.JWARD_PT_AFRZ, "Hardness", 0)
 elements.property(elements.JWARD_PT_AFRZ, "Falldown", 2)
 elements.property(elements.JWARD_PT_AFRZ, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_AFRZ, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_AFRZ, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_AFRZ, "HeatConduct", 78)
 function AFRZ(i,x,y,s,n)
 warm = tpt.get_property("type",x+math.random(-1,1),y+math.random(-1,1))
 warm2 = tpt.get_property("temp",x,y)
 if warm == petrol and warm2 < 276 then
 tpt.set_property('temp', 296 ,x, y)
 end
 if warm == tpt.el.desl.id and warm2 < 276 then
 tpt.set_property('temp', 296 ,x, y)
 end
 if warm == BioDiesel and warm2 < 276 then
 tpt.set_property('temp', 296 ,x, y)
 end
 if warm == jetfuel and warm2 < 276 then
 tpt.set_property('temp', 296 ,x, y)
 end
 if warm == tpt.el.ice.id and warm2 < 276 then
 tpt.set_property('temp', 296 ,x, y)
 end
 end
 tpt.element_func(AFRZ, tpt.element('AFRZ'))
 
 --diesel & bio diesel
 local Dieselgas = elements.allocate("JWARD", "DSLV")
 local potash_lye = elements.allocate("JWARD", "PLYE")
 local cooking_oil = elements.allocate("JWARD", "COIL")
 local BioDiesel = elements.allocate("JWARD", "BDSL")
 
 elements.element(elements.JWARD_PT_DSLV, elements.element(elements.DEFAULT_PT_HYGN))
 elements.property(elements.JWARD_PT_DSLV, "Name", "DSLV")
 elements.property(elements.JWARD_PT_DSLV, "Description", "diesel gas")
 elements.property(elements.JWARD_PT_DSLV, "Colour", 0x440000)
 elements.property(elements.JWARD_PT_DSLV, "MenuVisible", 0)
 elements.property(elements.JWARD_PT_DSLV, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_DSLV, "Flammable", 100)
 elements.property(elements.JWARD_PT_DSLV, "Explosive", 1)
 elements.property(elements.JWARD_PT_DSLV, "Loss", 0.75)
 elements.property(elements.JWARD_PT_DSLV, "AirLoss", 0.97)
 elements.property(elements.JWARD_PT_DSLV, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_DSLV, "Advection", 1)
 elements.property(elements.JWARD_PT_DSLV, "Weight", 0)
 elements.property(elements.JWARD_PT_DSLV, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_DSLV, "Meltable", 0)
 elements.property(elements.JWARD_PT_DSLV, "Hardness", 0)
 elements.property(elements.JWARD_PT_DSLV, "Falldown", 0)
 elements.property(elements.JWARD_PT_DSLV, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_DSLV, "State", ST_GAS)
 elements.property(elements.JWARD_PT_DSLV, "Temperature", 483.15)
 elements.property(elements.JWARD_PT_DSLV, "HeatConduct", 80)
 elements.property(elements.JWARD_PT_DSLV, "LowTemperature", 473.15)
 elements.property(elements.JWARD_PT_DSLV, "LowTemperatureTransition", elements.DEFAULT_PT_DESL)
 
 elements.element(elements.JWARD_PT_COIL, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_COIL, "Name", "COIL")
 elements.property(elements.JWARD_PT_COIL, "Description", "Cooking oil")
 elements.property(elements.JWARD_PT_COIL, "Colour", 0xA57214)
 elements.property(elements.JWARD_PT_COIL, "MenuSection", 7)
 elements.property(elements.JWARD_PT_COIL, "Gravity", 0.6)
 elements.property(elements.JWARD_PT_COIL, "Flammable", 1)
 elements.property(elements.JWARD_PT_COIL, "Explosive", 0)
 elements.property(elements.JWARD_PT_COIL, "Loss", 0.7)
 elements.property(elements.JWARD_PT_COIL, "AirLoss", 0.91)
 elements.property(elements.JWARD_PT_COIL, "AirDrag", 0.02)
 elements.property(elements.JWARD_PT_COIL, "Advection", 0.9)
 elements.property(elements.JWARD_PT_COIL, "Weight", 10)
 elements.property(elements.JWARD_PT_COIL, "Meltable", 0)
 elements.property(elements.JWARD_PT_COIL, "Hardness", 86)
 elements.property(elements.JWARD_PT_COIL, "Falldown", 2)
 elements.property(elements.JWARD_PT_COIL, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_COIL, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_COIL, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_COIL, "HeatConduct", 100)
 function COIL(i,x,y,s,n)
 cx = math.random(-3,3)
 cy = math.random(-5,1)
 reaction = tpt.get_property("temp",x,y)
 bio = tpt.get_property("type",x + math.random(-2,2), y + math.random(-2,2))
 bioo = tpt.get_property("type",x + math.random(-2,2), y + math.random(-2,2))
 biooo = tpt.get_property("type",x + cy, y + cx)
 local noncatalyst = tpt.get_property("life",x,y)
 if reaction > 363.15 and biooo ~= true then
 tpt.delete(x,y)
 tpt.create(x + cx, y + cy, 'COIL')
 end
 if bio == potash_lye and bioo == antifrzz then
 sim.partChangeType(i, tpt.element('BDSL'))
 end
 if biooo == potash_lye and bioo == tpt.element('watr') and reaction > 290 and reaction < 330 then
 sim.partChangeType(i, tpt.element('SOAP'))
 tpt.delete(x + cx,y + cy)
 end
 end
 tpt.element_func(COIL, tpt.element('COIL'))
 
 elements.element(elements.JWARD_PT_BDSL, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_BDSL, "Name", "BDSL")
 elements.property(elements.JWARD_PT_BDSL, "Description", "Bio Diesel. Made from cooking oil.")
 elements.property(elements.JWARD_PT_BDSL, "Colour", 0x331000)
 elements.property(elements.JWARD_PT_BDSL, "MenuSection", SC_LIQUID)
 elements.property(elements.JWARD_PT_BDSL, "Gravity", 0.6)
 elements.property(elements.JWARD_PT_BDSL, "Flammable", 35)
 elements.property(elements.JWARD_PT_BDSL, "Explosive", 0)
 elements.property(elements.JWARD_PT_BDSL, "Loss", 0.8)
 elements.property(elements.JWARD_PT_BDSL, "AirLoss", 0.94)
 elements.property(elements.JWARD_PT_BDSL, "AirDrag", 0.02)
 elements.property(elements.JWARD_PT_BDSL, "Advection", 0.8)
 elements.property(elements.JWARD_PT_BDSL, "Weight", 12)
 elements.property(elements.JWARD_PT_BDSL, "Diffusion", 0)
 elements.property(elements.JWARD_PT_BDSL, "Meltable", 0)
 elements.property(elements.JWARD_PT_BDSL, "Hardness", 0)
 elements.property(elements.JWARD_PT_BDSL, "Falldown", 2)
 elements.property(elements.JWARD_PT_BDSL, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_BDSL, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_BDSL, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_BDSL, "HeatConduct", 99)
 function BDSL(i,x,y,s,n)
 calstmp = tpt.get_property("tmp",x,y)
 findcoil = tpt.get_property("type",x+math.random(-1,1),y+math.random(-1,1))
 if findcoil == cooking_oil then
 tpt.set_property('life', 2 ,x, y)
 end
 if calstmp == 2 then
 if findcoil == tpt.el.desl.id then
 sim.partChangeType(i, tpt.element('desl'))
 reaction = nil
 end
 end
 end
 tpt.element_func(BDSL, tpt.element('BDSL'))
 
 elements.element(elements.JWARD_PT_PLYE, elements.element(elements.DEFAULT_PT_BCOL))
 elements.property(elements.JWARD_PT_PLYE, "Name", "PLYE")
 elements.property(elements.JWARD_PT_PLYE, "Description", "potash lye")
 elements.property(elements.JWARD_PT_PLYE, "Colour", 0xCCCCCC)
 elements.property(elements.JWARD_PT_PLYE, "MenuSection", 8)
 elements.property(elements.JWARD_PT_PLYE, "Gravity", .35)
 elements.property(elements.JWARD_PT_PLYE, "Flammable", 0)
 elements.property(elements.JWARD_PT_PLYE, "Explosive", 0)
 elements.property(elements.JWARD_PT_PLYE, "Loss", 0.15)
 elements.property(elements.JWARD_PT_PLYE, "AirLoss", 0.96)
 elements.property(elements.JWARD_PT_PLYE, "AirDrag", 0.03)
 elements.property(elements.JWARD_PT_PLYE, "Advection", 0.4)
 elements.property(elements.JWARD_PT_PLYE, "Weight", 60)
 elements.property(elements.JWARD_PT_PLYE, "Diffusion", 0)
 elements.property(elements.JWARD_PT_PLYE, "Falldown", 1)
 elements.property(elements.JWARD_PT_PLYE, "Hardness", 0)
 elements.property(elements.JWARD_PT_PLYE, "HeatConduct", 62)
 elements.property(elements.JWARD_PT_PLYE, "Properties", elem.PROP_DEADLY)
 elements.property(elements.JWARD_PT_PLYE, "HighTemperature", 679.15)
 elements.property(elements.JWARD_PT_PLYE, "HighTemperatureTransition", elements.DEFAULT_PT_LAVA)
 function PLYE(i,x,y,s,n)
 cy = math.random(-1,1)
 cx = math.random(-1,1)
 reaction = tpt.get_property("type",x+cx,y+cy)
 if reaction == tpt.el.acid.id then
 tpt.create(x, y + 2, 'hygn')
 tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'SLTW')
 tpt.delete(x,y)
 end
 end
 tpt.element_func(PLYE, tpt.element('PLYE'))
 
 --o0o NITROGEN o0o--
 local nitrogen = elements.allocate("JWARD", "N2")
 local Diazane = elements.allocate("JWARD", "N2H4")
 local DinitrogenTetroxide = elements.allocate("JWARD", "N2O4")
 local nitrous = elements.allocate("JWARD", "N2O")
 local need4speed = elements.allocate("JWARD", "LN2O")
 local amfoness = elements.allocate("JWARD", "AMFO")
 elements.element(elements.JWARD_PT_LN2O, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_LN2O, "Name", "LN2O")
 elements.property(elements.JWARD_PT_LN2O, "Description", "Liquid Nitrous Oxide. Burns very quickly and very hot.")
 elements.property(elements.JWARD_PT_LN2O, "Colour", 0x33C1F5)
 elements.property(elements.JWARD_PT_LN2O, "MenuSection", 7)
 elements.property(elements.JWARD_PT_LN2O, "Gravity", 0.8)
 elements.property(elements.JWARD_PT_LN2O, "Flammable", 6000)
 elements.property(elements.JWARD_PT_LN2O, "Explosive", 0)
 elements.property(elements.JWARD_PT_LN2O, "Loss", 0.5)
 elements.property(elements.JWARD_PT_LN2O, "AirLoss", 0.94)
 elements.property(elements.JWARD_PT_LN2O, "AirDrag", 0.03)
 elements.property(elements.JWARD_PT_LN2O, "Advection", 0.7)
 elements.property(elements.JWARD_PT_LN2O, "Weight", 43)
 elements.property(elements.JWARD_PT_LN2O, "Diffusion", 0)
 elements.property(elements.JWARD_PT_LN2O, "Meltable", 0)
 elements.property(elements.JWARD_PT_LN2O, "Hardness", 0)
 elements.property(elements.JWARD_PT_LN2O, "Falldown", 2)
 elements.property(elements.JWARD_PT_LN2O, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_LN2O, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_LN2O, "Temperature", 174)
 elements.property(elements.JWARD_PT_LN2O, "HeatConduct", 58)
 elements.property(elements.JWARD_PT_LN2O, "HighTemperature", 185)
 elements.property(elements.JWARD_PT_LN2O, "HighTemperatureTransition", elements.JWARD_PT_N2O)
 elements.property(elements.JWARD_PT_LN2O, "LowTemperature", 160.15)
 elements.property(elements.JWARD_PT_LN2O, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 
 elements.element(elements.JWARD_PT_N2O, elements.element(elements.DEFAULT_PT_CO2))
 elements.property(elements.JWARD_PT_N2O, "Name", "N2O")
 elements.property(elements.JWARD_PT_N2O, "Description", "Nitrous Oxide. Highly flammable RACE CAR oxidizer!!!.")
 elements.property(elements.JWARD_PT_N2O, "Colour", 0x43DAFF)
 elements.property(elements.JWARD_PT_N2O, "MenuSection", 6)
 elements.property(elements.JWARD_PT_N2O, "Gravity", 0)
 elements.property(elements.JWARD_PT_N2O, "Flammable", 5500)
 elements.property(elements.JWARD_PT_N2O, "Explosive", 0)
 elements.property(elements.JWARD_PT_N2O, "Loss", 0.7)
 elements.property(elements.JWARD_PT_N2O, "AirLoss", 0.91)
 elements.property(elements.JWARD_PT_N2O, "AirDrag", 0.02)
 elements.property(elements.JWARD_PT_N2O, "Advection", 0.9)
 elements.property(elements.JWARD_PT_N2O, "Weight", 0)
 elements.property(elements.JWARD_PT_N2O, "Diffusion", 1.5)
 elements.property(elements.JWARD_PT_N2O, "Meltable", 0)
 elements.property(elements.JWARD_PT_N2O, "Hardness", 0)
 elements.property(elements.JWARD_PT_N2O, "Falldown", 0)
 elements.property(elements.JWARD_PT_N2O, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_N2O, "State", ST_GAS)
 elements.property(elements.JWARD_PT_N2O, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_N2O, "HeatConduct", 80)
 elements.property(elements.JWARD_PT_N2O, "LowTemperature", 185.67)
 elements.property(elements.JWARD_PT_N2O, "LowTemperatureTransition", elements.JWARD_PT_LN2O)
 function N2O(i,x,y,s,n)
 reaction = tpt.get_property("type",x+math.random(-1,1),y+math.random(-1,1))
 if reaction == tpt.el.fire.id or reaction == tpt.el.plsm.id then
 tpt.create(x+math.random(-1,1), y+math.random(-1,1), 'n2')
 end
 end
 tpt.element_func(N2O,nitrous)
 
 elements.element(elements.JWARD_PT_N2O4, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_N2O4, "Name", "N2O4")
 elements.property(elements.JWARD_PT_N2O4, "Description", "Dinitrogen Tetroxide rocket oxidizer")
 elements.property(elements.JWARD_PT_N2O4, "Colour", 0x30CEC6)
 elements.property(elements.JWARD_PT_N2O4, "MenuSection", 5)
 elements.property(elements.JWARD_PT_N2O4, "Gravity", 0.8)
 elements.property(elements.JWARD_PT_N2O4, "Flammable", 7500)
 elements.property(elements.JWARD_PT_N2O4, "Explosive", 1)
 elements.property(elements.JWARD_PT_N2O4, "Loss", 0.7)
 elements.property(elements.JWARD_PT_N2O4, "AirLoss", 0.91)
 elements.property(elements.JWARD_PT_N2O4, "AirDrag", 0.03)
 elements.property(elements.JWARD_PT_N2O4, "Advection", 0.6)
 elements.property(elements.JWARD_PT_N2O4, "Weight", 46)
 elements.property(elements.JWARD_PT_N2O4, "Diffusion", 1.5)
 elements.property(elements.JWARD_PT_N2O4, "Meltable", 0)
 elements.property(elements.JWARD_PT_N2O4, "Hardness", 0)
 elements.property(elements.JWARD_PT_N2O4, "Falldown", 2)
 elements.property(elements.JWARD_PT_N2O4, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_N2O4, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_N2O4, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_N2O4, "HeatConduct", 78)
 elements.property(elements.JWARD_PT_N2O4, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.JWARD_PT_N2O4, "LowTemperature", 261.9)
 function N2O4(i,x,y,s,n)
 rocket = tpt.get_property("type",x+math.random(-1,1),y+math.random(-1,1))
 if rocket == Diazane then
 tpt.create(x+math.random(-1,1), y+math.random(-1,1), 'plsm')
 tpt.create(x+math.random(-1,1), y+math.random(-1,1), 'n2')
 end
 end
 tpt.element_func(N2O4,DinitrogenTetroxide)
 
 elements.element(elements.JWARD_PT_N2H4, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_N2H4, "Name", "N2H4")
 elements.property(elements.JWARD_PT_N2H4, "Description", "Hydrazine rocket fuel")
 elements.property(elements.JWARD_PT_N2H4, "Colour", 0xB6F064)
 elements.property(elements.JWARD_PT_N2H4, "MenuSection", 5)
 elements.property(elements.JWARD_PT_N2H4, "Gravity", 0.8)
 elements.property(elements.JWARD_PT_N2H4, "Flammable", 1)
 elements.property(elements.JWARD_PT_N2H4, "Explosive", 1)
 elements.property(elements.JWARD_PT_N2H4, "Loss", 0.7)
 elements.property(elements.JWARD_PT_N2H4, "AirLoss", 0.91)
 elements.property(elements.JWARD_PT_N2H4, "AirDrag", 0.03)
 elements.property(elements.JWARD_PT_N2H4, "Advection", 0.6)
 elements.property(elements.JWARD_PT_N2H4, "Weight", 46)
 elements.property(elements.JWARD_PT_N2H4, "Diffusion", 1.5)
 elements.property(elements.JWARD_PT_N2H4, "Meltable", 0)
 elements.property(elements.JWARD_PT_N2H4, "Hardness", 0)
 elements.property(elements.JWARD_PT_N2H4, "Falldown", 2)
 elements.property(elements.JWARD_PT_N2H4, "Properties", TYPE_LIQUID)
 elements.property(elements.JWARD_PT_N2H4, "State", ST_LIQUID)
 elements.property(elements.JWARD_PT_N2H4, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_N2H4, "HeatConduct", 83)
 elements.property(elements.JWARD_PT_N2H4, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.JWARD_PT_N2H4, "LowTemperature", 275.15)
 N2H4Update = function(i, x, y, s, n)
  local clife = tpt.get_property('life', x, y)
  if clife > 1 then
  for cx = -1, 1, 2 do
  for cy = -1, 1, 2 do
  tpt.create(x + cx, y + cy, 'fire')
  tpt.set_property('temp', 1700, x, y)
  tpt.set_pressure(x, y, 2, 2, 200)
  end
  end
  tpt.set_property('life', clife - 1, x, y)
  elseif clife == 1 then
  tpt.set_property('type', 0, x, y)
  elseif s > 0 then
  for cx = -1, 1, 2 do
  for cy = -1, 1, 2 do
  if tpt.get_property('type', x + cx, y + cy) == 4 or tpt.get_property('type', x + cx, y + cy) == 49 then
  tpt.set_property('life', 500, x, y)
  return true
  end
  end
  end
  end
 end
 tpt.element_func(N2H4Update, tpt.element('N2H4'))
 
 elements.element(elements.JWARD_PT_N2, elements.element(elements.DEFAULT_PT_CO2))
 elements.property(elements.JWARD_PT_N2, "Name", "N2")
 elements.property(elements.JWARD_PT_N2, "Description", "Nitrogen Gas. Combines with WATR to make N2O + H2.")
 elements.property(elements.JWARD_PT_N2, "Colour", 0x5E52FF)
 elements.property(elements.JWARD_PT_N2, "MenuSection", SC_GAS)
 elements.property(elements.JWARD_PT_N2, "Gravity", 0)
 elements.property(elements.JWARD_PT_N2, "Flammable", 0)
 elements.property(elements.JWARD_PT_N2, "Explosive", 1)
 elements.property(elements.JWARD_PT_N2, "Loss", 0.3)
 elements.property(elements.JWARD_PT_N2, "AirLoss", 0.99)
 elements.property(elements.JWARD_PT_N2, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_N2, "Advection", 2.0)
 elements.property(elements.JWARD_PT_N2, "Weight", 0)
 elements.property(elements.JWARD_PT_N2, "Diffusion", 2.75)
 elements.property(elements.JWARD_PT_N2, "State", ST_GAS)
 elements.property(elements.JWARD_PT_N2, "Properties", elem.TYPE_GAS)
 elements.property(elements.JWARD_PT_N2, "LowTemperatureTransition", elements.DEFAULT_PT_LN2)
 elements.property(elements.JWARD_PT_N2, "LowTemperature", 76)
 elements.property(elements.JWARD_PT_N2, "HeatConduct", 80)
 function N2(i,x,y,s,n)
 calstmp = tpt.get_property("tmp",x,y)
 if calstmp == 1 then
 sim.partChangeType(i, tpt.element('N2O'))
 end
 end
 tpt.element_func(N2, tpt.element('N2'))
 
 function HYGN(i,x,y,s,n)
 calstmp = tpt.get_property("tmp",x,y)
 if calstmp == 1 then
 sim.partChangeType(i, tpt.element('DSTW'))
 end
 end
 tpt.element_func(HYGN, tpt.element('HYGN'))
 
 elements.element(elements.JWARD_PT_AMFO, elements.element(elements.DEFAULT_PT_BCOL))
 elements.property(elements.JWARD_PT_AMFO, "Name", "AMFO")
 elements.property(elements.JWARD_PT_AMFO, "Description", "amfo explosive")
 elements.property(elements.JWARD_PT_AMFO, "Colour", 0xFFCECA)
 elements.property(elements.JWARD_PT_AMFO, "MenuSection", 5)
 elements.property(elements.JWARD_PT_AMFO, "Gravity", 0.54)
 elements.property(elements.JWARD_PT_AMFO, "Flammable", 500)
 elements.property(elements.JWARD_PT_AMFO, "Explosive", 1)
 elements.property(elements.JWARD_PT_AMFO, "Loss", 0)
 elements.property(elements.JWARD_PT_AMFO, "AirLoss", 0.96)
 elements.property(elements.JWARD_PT_AMFO, "AirDrag", 0.03)
 elements.property(elements.JWARD_PT_AMFO, "Advection", 0)
 elements.property(elements.JWARD_PT_AMFO, "Weight", 75)
 elements.property(elements.JWARD_PT_AMFO, "Diffusion", 0)
 elements.property(elements.JWARD_PT_AMFO, "Falldown", 1)
 elements.property(elements.JWARD_PT_AMFO, "Hardness", 0)
 elements.property(elements.JWARD_PT_AMFO, "HeatConduct", 62)
 elements.property(elements.JWARD_PT_AMFO, "Properties", elem.TYPE_PART+elem.PROP_DEADLY)
 elements.property(elements.JWARD_PT_AMFO, "State", ST_SOLID)
 function AMFO(i,x,y,s,n)
 cy = math.random(-1,1)
 cx = math.random(-1,1)
 ol = math.random(0,1)
 reaction = tpt.get_property("type",x+cx,y+cy)
 atemp = tpt.get_property("temp",x,y)
 calstmp = tpt.get_property("tmp",x,y)
 if reaction == tpt.el.acid.id then
 tpt.create(x, y + 2, 'acid')
 tpt.create(x + math.random(-1,1), y + math.random(-1,1), 'salt')
 tpt.delete(x,y)
 end
 if reaction == tpt.el.fire.id then
 tpt.set_pressure(x, y, 2, 2, 200)
 tpt.set_pressure(x, y - 1, 2, 2, 200)
 sim.partChangeType(i, tpt.element('thdr'))
 end
 if atemp > 483.15 then
 if ol == 1 then
 sim.partChangeType(i, tpt.element('wtrv'))
 else
 sim.partChangeType(i, tpt.element('N2O'))
 end
 end
 if calstmp == 1 then
 sim.partChangeType(i, tpt.element('n2o4'))
 end
 end
 tpt.element_func(AMFO, tpt.element('AMFO'))
 
 --extra
 local catalyst = elements.allocate("JWARD", "CALS")
 local propane = elements.allocate("JWARD", "PRPN")
 
 elements.element(elements.JWARD_PT_CALS, elements.element(elements.DEFAULT_PT_DMND))
 elements.property(elements.JWARD_PT_CALS, "Colour", 0x90965F)
 elements.property(elements.JWARD_PT_CALS, "Name", "CALS")
 elements.property(elements.JWARD_PT_CALS, "Description", "catalyst, used to make multi element machines")
 elements.property(elements.JWARD_PT_CALS, "HeatConduct", 0)
 function CALS(i,x,y,s,n)
 calsd = tpt.get_property("type",x,y+1)
 calsu = tpt.get_property("type",x,y-1)
 calsr = tpt.get_property("type",x+1,y)
 calsl = tpt.get_property("type",x-1,y)
 calsdr = tpt.get_property("type",x+1,y+1)
 calsdl = tpt.get_property("type",x-1,y+1)
 calsur = tpt.get_property("type",x+1,y-1)
 calsul = tpt.get_property("type",x-1,y-1)
 if calsu == tpt.el.gold.id and calsd == tpt.el.gold.id then
  tpt.set_property('tmp', 1, x+math.random(-1,1),y+math.random(-1,1))
 end
 if calsdr == tpt.el.metl.id and calsdl == tpt.el.metl.id and calsur == tpt.el.metl.id and calsul == tpt.el.metl.id then
  tpt.set_property('tmp', 2, x+math.random(-2,2),y+math.random(-2,2))
 end
 if calsu == tpt.el.glas.id and calsdr == tpt.el.ttan.id and calsdl == tpt.el.ttan.id then
  tpt.set_property('ctype', tpt.element('ptrl'), x+math.random(-2,2),y+math.random(-2,2))
 end
 if calsu == tpt.el.glas.id and calsd == tpt.el.glas.id then
  tpt.set_property('tmp2', 1, x+math.random(-2,2),y+math.random(-2,2))
 end
 end
 tpt.element_func(CALS, tpt.element('CALS'))
 
 elements.element(elements.JWARD_PT_PRPN, elements.element(elements.DEFAULT_PT_CO2))
 elements.property(elements.JWARD_PT_PRPN, "Name", "PRPN")
 elements.property(elements.JWARD_PT_PRPN, "Description", "Propane. Explodes very easily.")
 elements.property(elements.JWARD_PT_PRPN, "Colour", 0xF4A26A)
 elements.property(elements.JWARD_PT_PRPN, "MenuSection", 5)
 elements.property(elements.JWARD_PT_PRPN, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_PRPN, "Flammable", 3000)
 elements.property(elements.JWARD_PT_PRPN, "Explosive", 1)
 elements.property(elements.JWARD_PT_PRPN, "Loss", 0.75)
 elements.property(elements.JWARD_PT_PRPN, "AirLoss", 0.97)
 elements.property(elements.JWARD_PT_PRPN, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_PRPN, "Advection", 1)
 elements.property(elements.JWARD_PT_PRPN, "Weight", 0)
 elements.property(elements.JWARD_PT_PRPN, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_PRPN, "Meltable", 0)
 elements.property(elements.JWARD_PT_PRPN, "Hardness", 0)
 elements.property(elements.JWARD_PT_PRPN, "Falldown", 0)
 elements.property(elements.JWARD_PT_PRPN, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_PRPN, "State", ST_GAS)
 elements.property(elements.JWARD_PT_PRPN, "Temperature", 295.15)
 elements.property(elements.JWARD_PT_PRPN, "HeatConduct", 95)
 elements.property(elements.JWARD_PT_PRPN, "HighTemperature", 2379.15)
 elements.property(elements.JWARD_PT_PRPN, "HighTemperatureTransition", tpt.el.fire.id)
 elements.property(elements.JWARD_PT_PRPN, "LowTemperatureTransition", NT)
 function PRPN(i,x,y,s,n)
 calstmp = tpt.get_property("tmp2",x,y)
 if calstmp == 1 then
 sim.partChangeType(i, tpt.element('ptrl'))
 end
 end
 tpt.element_func(PRPN,propane)
 
 --kerosene
 local KEROSENEGAS = elements.allocate("JWARD", "KERV")
 local KEROSENE = elements.allocate("JWARD", "KERO")
 elements.element(elements.JWARD_PT_KERO, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_KERO, "Name", "KERO")
 elements.property(elements.JWARD_PT_KERO, "Description", "KERO BURNS HOT AND QUICK")
 elements.property(elements.JWARD_PT_KERO, "Colour", 0x01B3D7)
 elements.property(elements.JWARD_PT_KERO, "MenuSection", 5)
 elements.property(elements.JWARD_PT_KERO, "Gravity", .04)
 elements.property(elements.JWARD_PT_KERO, "Flammable", 500)
 elements.property(elements.JWARD_PT_KERO, "Explosive", 1)
 elements.property(elements.JWARD_PT_KERO, "Loss", 1)
 elements.property(elements.JWARD_PT_KERO, "AirLoss", .5)
 elements.property(elements.JWARD_PT_KERO, "AirDrag", .01)
 elements.property(elements.JWARD_PT_KERO, "Advection", .01)
 elements.property(elements.JWARD_PT_KERO, "Weight", 5)
 elements.property(elements.JWARD_PT_KERO, "State", ST_liquid)
 elements.property(elements.JWARD_PT_KERO, "Properties", elem.TYPE_LIQUID+elem.PROP_DEADLY)
 elements.property(elements.JWARD_PT_KERO, "HighTemperature", 393.15)
 elements.property(elements.JWARD_PT_KERO, "HighTemperatureTransition", elements.JWARD_PT_KERV)
 function KERO(i,x,y,s,n)
 reaction = tpt.get_property("type",x+math.random(-1,1),y+math.random(-1,1))
 calstmp = tpt.get_property("tmp",x,y)
 if calstmp == 2 then
 if reaction == petrol then
 sim.partChangeType(i, tpt.element('JETB'))
 reaction = nil
 end
 end
 end
 tpt.element_func(KERO,KEROSENE)
 
 elements.element(elements.JWARD_PT_KERV, elements.element(elements.DEFAULT_PT_HYGN))
 elements.property(elements.JWARD_PT_KERV, "Name", "KERV")
 elements.property(elements.JWARD_PT_KERV, "Description", "kerosene gas")
 elements.property(elements.JWARD_PT_KERV, "Colour", 0x01B3D7)
 elements.property(elements.JWARD_PT_KERV, "MenuVisible", 0)
 elements.property(elements.JWARD_PT_KERV, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_KERV, "Flammable", 600)
 elements.property(elements.JWARD_PT_KERV, "Explosive", 1)
 elements.property(elements.JWARD_PT_KERV, "Loss", 0.75)
 elements.property(elements.JWARD_PT_KERV, "AirLoss", 0.97)
 elements.property(elements.JWARD_PT_KERV, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_KERV, "Advection", 1)
 elements.property(elements.JWARD_PT_KERV, "Weight", 0)
 elements.property(elements.JWARD_PT_KERV, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_KERV, "Meltable", 0)
 elements.property(elements.JWARD_PT_KERV, "Hardness", 0)
 elements.property(elements.JWARD_PT_KERV, "Falldown", 0)
 elements.property(elements.JWARD_PT_KERV, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_KERV, "State", ST_GAS)
 elements.property(elements.JWARD_PT_KERV, "Temperature", 403.15)
 elements.property(elements.JWARD_PT_KERV, "HeatConduct", 195)
 elements.property(elements.JWARD_PT_KERV, "LowTemperature", 393.15)
 elements.property(elements.JWARD_PT_KERV, "LowTemperatureTransition", elements.JWARD_PT_KERO)
 
 --jetfuel
 local JETFUEL = elements.allocate("JWARD", "JETB")
 elements.element(elements.JWARD_PT_JETB, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_JETB, "Name", "JETB")
 elements.property(elements.JWARD_PT_JETB, "Description", "Jet b type fuel-blend of Kero and Ptrl for jet engines")
 elements.property(elements.JWARD_PT_JETB, "Colour", 0x676601)
 elements.property(elements.JWARD_PT_JETB, "MenuSection", 5)
 elements.property(elements.JWARD_PT_JETB, "Gravity", .04)
 elements.property(elements.JWARD_PT_JETB, "Flammable", 5000)
 elements.property(elements.JWARD_PT_JETB, "Explosive", 1)
 elements.property(elements.JWARD_PT_JETB, "Loss", 0.8)
 elements.property(elements.JWARD_PT_JETB, "AirLoss", 0.94)
 elements.property(elements.JWARD_PT_JETB, "AirDrag", 0.02)
 elements.property(elements.JWARD_PT_JETB, "Advection", 0.8)
 elements.property(elements.JWARD_PT_JETB, "HighTemperature", 353.15)
 elements.property(elements.JWARD_PT_JETB, "Weight", 13)
 elements.property(elements.JWARD_PT_JETB, "State", ST_liquid)
 elements.property(elements.JWARD_PT_JETB, "Properties", elem.TYPE_LIQUID+elem.PROP_DEADLY)
 elements.property(elements.JWARD_PT_JETB, "LowTemperature", 225.15)
 elements.property(elements.JWARD_PT_JETB, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 
 --tar
 local TARGAS = elements.allocate("JWARD", "TARV")
 local TAR = elements.allocate("JWARD", "TAR")
 elements.element(elements.JWARD_PT_TAR, elements.element(elements.DEFAULT_PT_SOAP))
 elements.property(elements.JWARD_PT_TAR, "Name", "TAR")
 elements.property(elements.JWARD_PT_TAR, "Description", "tar hard to burn")
 elements.property(elements.JWARD_PT_TAR, "Colour", 0x0D0D03)
 elements.property(elements.JWARD_PT_TAR, "MenuSection", 5)
 elements.property(elements.JWARD_PT_TAR, "Gravity", .1)
 elements.property(elements.JWARD_PT_TAR, "Flammable", 2)
 elements.property(elements.JWARD_PT_TAR, "Explosive", 0)
 elements.property(elements.JWARD_PT_TAR, "Loss", 1)
 elements.property(elements.JWARD_PT_TAR, "AirLoss", .5)
 elements.property(elements.JWARD_PT_TAR, "AirDrag", .01)
 elements.property(elements.JWARD_PT_TAR, "Advection", .01)
 elements.property(elements.JWARD_PT_TAR, "Diffusion", 0.01)
 elements.property(elements.JWARD_PT_TAR, "State", ST_liquid)
 elements.property(elements.JWARD_PT_TAR, "Weight", 50)
 elements.property(elements.JWARD_PT_TAR, "Properties", elem.TYPE_LIQUID+elem.PROP_DEADLY)
 elements.property(elements.JWARD_PT_TAR, "HighTemperature", 873.15)
 elements.property(elements.JWARD_PT_TAR, "HighTemperatureTransition", elements.JWARD_PT_TARV)
 
 elements.element(elements.JWARD_PT_TARV, elements.element(elements.DEFAULT_PT_HYGN))
 elements.property(elements.JWARD_PT_TARV, "Name", "TARV")
 elements.property(elements.JWARD_PT_TARV, "Description", "tar gas")
 elements.property(elements.JWARD_PT_TARV, "Colour", 0x4C2D20)
 elements.property(elements.JWARD_PT_TARV, "MenuVisible", 0)
 elements.property(elements.JWARD_PT_TARV, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_TARV, "Flammable", 10)
 elements.property(elements.JWARD_PT_TARV, "Explosive", 0)
 elements.property(elements.JWARD_PT_TARV, "Loss", 0.75)
 elements.property(elements.JWARD_PT_TARV, "AirLoss", 0.97)
 elements.property(elements.JWARD_PT_TARV, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_TARV, "Advection", 1)
 elements.property(elements.JWARD_PT_TARV, "Weight", 0)
 elements.property(elements.JWARD_PT_TARV, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_TARV, "Meltable", 0)
 elements.property(elements.JWARD_PT_TARV, "Hardness", 0)
 elements.property(elements.JWARD_PT_TARV, "Falldown", 0)
 elements.property(elements.JWARD_PT_TARV, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_TARV, "State", ST_GAS)
 elements.property(elements.JWARD_PT_TARV, "Temperature", 403.15)
 elements.property(elements.JWARD_PT_TARV, "HeatConduct", 195)
 elements.property(elements.JWARD_PT_TARV, "LowTemperature", 873.15)
 elements.property(elements.JWARD_PT_TARV, "LowTemperatureTransition", elements.JWARD_PT_TAR)
 
 --wax
 local WAXGAS = elements.allocate("JWARD", "WAXV")
 elements.element(elements.JWARD_PT_WAXV, elements.element(elements.DEFAULT_PT_HYGN))
 elements.property(elements.JWARD_PT_WAXV, "Name", "WAXV")
 elements.property(elements.JWARD_PT_WAXV, "Description", "wax gas")
 elements.property(elements.JWARD_PT_WAXV, "Colour", 0xF0F0BB)
 elements.property(elements.JWARD_PT_WAXV, "MenuSection", SC_GAS)
 elements.property(elements.JWARD_PT_WAXV, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_WAXV, "Flammable", 500)
 elements.property(elements.JWARD_PT_WAXV, "Explosive", 0)
 elements.property(elements.JWARD_PT_WAXV, "Loss", 0.75)
 elements.property(elements.JWARD_PT_WAXV, "AirLoss", 0.97)
 elements.property(elements.JWARD_PT_WAXV, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_WAXV, "Advection", 1)
 elements.property(elements.JWARD_PT_WAXV, "Weight", 0)
 elements.property(elements.JWARD_PT_WAXV, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_WAXV, "Meltable", 0)
 elements.property(elements.JWARD_PT_WAXV, "Hardness", 0)
 elements.property(elements.JWARD_PT_WAXV, "Falldown", 0)
 elements.property(elements.JWARD_PT_WAXV, "Properties", TYPE_GAS)
 elements.property(elements.JWARD_PT_WAXV, "State", ST_GAS)
 elements.property(elements.JWARD_PT_WAXV, "Temperature", 833.15)
 elements.property(elements.JWARD_PT_WAXV, "HeatConduct", 195)
 elements.property(elements.JWARD_PT_WAXV, "LowTemperature", 823.15)
 elements.property(elements.JWARD_PT_WAXV, "LowTemperatureTransition", elements.DEFAULT_PT_WAX)
 
 --coke
 local CoalCoke = elements.allocate("JWARD", "COKE")
 elements.element(elements.JWARD_PT_COKE, elements.element(elements.DEFAULT_PT_BCOL))
 elements.property(elements.JWARD_PT_COKE, "Name", "COKE")
 elements.property(elements.JWARD_PT_COKE, "Description", "COAL COKE. Burns for a long time and hot.")
 elements.property(elements.JWARD_PT_COKE, "Colour", 0xAAAAAA)
 elements.property(elements.JWARD_PT_COKE, "MenuSection", 5)
 elements.property(elements.JWARD_PT_COKE, "Gravity", .35)
 elements.property(elements.JWARD_PT_COKE, "Flammable", 0)
 elements.property(elements.JWARD_PT_COKE, "Explosive", 0)
 elements.property(elements.JWARD_PT_COKE, "Loss", 0.15)
 elements.property(elements.JWARD_PT_COKE, "AirLoss", 0.96)
 elements.property(elements.JWARD_PT_COKE, "AirDrag", 0.03)
 elements.property(elements.JWARD_PT_COKE, "Advection", 0.4)
 elements.property(elements.JWARD_PT_COKE, "Weight", 78)
 elements.property(elements.JWARD_PT_COKE, "Falldown", 1)
 COKEUpdate = function(i, x, y, s, n)
  local clife = tpt.get_property('life', x, y)
  if clife > 1 then
  for cx = -1, 1, 2 do
  for cy = -1, 1, 2 do
  tpt.create(x + cx, y + cy, 'fire')
  tpt.set_property('temp', 1700, x, y)
  end
  end
  tpt.set_property('life', clife - 1, x, y)
  elseif clife == 1 then
  tpt.set_property('type', 0, x, y)
  elseif s > 0 then
  for cx = -1, 1, 2 do
  for cy = -1, 1, 2 do
  if tpt.get_property('type', x + cx, y + cy) == 4 or tpt.get_property('type', x + cx, y + cy) == 49 then
  tpt.set_property('life', 500, x, y)
  return true
  end
  end
  end
  end
 end
 tpt.element_func(COKEUpdate, tpt.element('coke'))
 
 COALUpdate = function(i, x, y, s, n)
 dis = tpt.get_property('temp', x, y)
 if dis > 1273.15 then
 if buttonable == 0 or buttonablest == 0 then
 sim.partChangeType(i, tpt.element('coke'))
  tpt.set_property('life', 0, x, y)
   tpt.create(x, y + 1, 'CRST')
   tpt.create(x, y - 1, 'TAR')
 end
 end
 end
 tpt.element_func(COALUpdate, tpt.element('coal'))
 
 BCOLUpdate = function(i, x, y, s, n)
 dis = tpt.get_property('temp', x, y)
 if dis > 1273.15 then
 if buttonable == 0 or buttonablest == 0 then
 sim.partChangeType(i, tpt.element('coke'))
  tpt.set_property('life', 0, x, y)
   tpt.create(x, y + 1, 'CRST')
   tpt.create(x, y - 1, 'TAR')
 end
 end
 end
 tpt.element_func(BCOLUpdate, tpt.element('bcol'))
 
 local CreosoteGas = elements.allocate("JWARD", "CRTV")
 elements.element(elements.JWARD_PT_CRTV, elements.element(elements.DEFAULT_PT_BOYL))
 elements.property(elements.JWARD_PT_CRTV, "Name", "CRTV")
 elements.property(elements.JWARD_PT_CRTV, "Description", "creosote gas")
 elements.property(elements.JWARD_PT_CRTV, "Colour", 0x585117)
 elements.property(elements.JWARD_PT_CRTV, "MenuVisible", 0)
 elements.property(elements.JWARD_PT_CRTV, "Gravity", -0.02)
 elements.property(elements.JWARD_PT_CRTV, "Explosive", 0)
 elements.property(elements.JWARD_PT_CRTV, "Loss", 0.75)
 elements.property(elements.JWARD_PT_CRTV, "AirDrag", 0.01)
 elements.property(elements.JWARD_PT_CRTV, "Advection", 1)
 elements.property(elements.JWARD_PT_CRTV, "Weight", 0)
 elements.property(elements.JWARD_PT_CRTV, "Diffusion", 0.7)
 elements.property(elements.JWARD_PT_CRTV, "Hardness", 0)
 elements.property(elements.JWARD_PT_CRTV, "Falldown", 0)
 elements.property(elements.JWARD_PT_CRTV, "Properties", elem.TYPE_GAS)
 elements.property(elements.JWARD_PT_CRTV, "State", ST_GAS)
 elements.property(elements.JWARD_PT_CRTV, "Temperature", 883.15)
 elements.property(elements.JWARD_PT_CRTV, "HeatConduct", 81)
 function CRTV(i,x,y,s,n)
  dis = tpt.get_property('temp', x, y)
 if dis < 873.15 then
 sim.partChangeType(i, tpt.element('CRST'))
 end
 end
 tpt.element_func(CRTV,CreosoteGas)
 
 local Creosote = elements.allocate("JWARD", "CRST")
 elements.element(elements.JWARD_PT_CRST, elements.element(elements.DEFAULT_PT_SOAP))
 elements.property(elements.JWARD_PT_CRST, "Name", "CRST")
 elements.property(elements.JWARD_PT_CRST, "Description", "creosote ")
 elements.property(elements.JWARD_PT_CRST, "Colour", 0x0F0E04)
 elements.property(elements.JWARD_PT_CRST, "MenuSection", SC_LIQUID)
 elements.property(elements.JWARD_PT_CRST, "Gravity", .04)
 elements.property(elements.JWARD_PT_CRST, "Flammable", 10)
 elements.property(elements.JWARD_PT_CRST, "Explosive", 0)
 elements.property(elements.JWARD_PT_CRST, "Loss", 1)
 elements.property(elements.JWARD_PT_CRST, "AirLoss", .5)
 elements.property(elements.JWARD_PT_CRST, "AirDrag", .01)
 elements.property(elements.JWARD_PT_CRST, "Advection", .01)
 elements.property(elements.JWARD_PT_CRST, "Weight", 5)
 elements.property(elements.JWARD_PT_CRST, "State", ST_liquid)
 elements.property(elements.JWARD_PT_CRST, "Properties", elem.TYPE_LIQUID)
 elements.property(elements.JWARD_PT_CRST, "HighTemperature", 873)
 elements.property(elements.JWARD_PT_CRST, "HighTemperatureTransition", elements.JWARD_PT_CRTV)
 --crude oil
 function OIL(i,x,y,s,n)
 calstmp = tpt.get_property("tmp",x,y)
 calsctype = tpt.get_property("ctype",x,y)
 calstype = tpt.get_property("type",x + math.random(-1,1),y + math.random(-1,1))
 if calsctype == tpt.element('ptrl') and calstmp == 2 and calstype == tpt.element('ptrl') then
 sim.partChangeType(i, tpt.element('ptrl'))
 end
 end
 tpt.element_func(OIL,tpt.element('oil'))
 
 local OILCRUDE = elements.allocate("JWARD", "OILC")
 elements.element(elements.JWARD_PT_OILC, elements.element(elements.DEFAULT_PT_GEL))
 elements.property(elements.JWARD_PT_OILC, "Name", "OILC")
 elements.property(elements.JWARD_PT_OILC, "Description", "Crude oil can be distilled, didn't name it coil for a reason")
 elements.property(elements.JWARD_PT_OILC, "Colour", 0x35350D)
 elements.property(elements.JWARD_PT_OILC, "MenuSection", 7)
 elements.property(elements.JWARD_PT_OILC, "Gravity", .04)
 elements.property(elements.JWARD_PT_OILC, "Flammable", 50)
 elements.property(elements.JWARD_PT_OILC, "Explosive", 0)
 elements.property(elements.JWARD_PT_OILC, "Loss", 1)
 elements.property(elements.JWARD_PT_OILC, "AirLoss", .5)
 elements.property(elements.JWARD_PT_OILC, "AirDrag", .01)
 elements.property(elements.JWARD_PT_OILC, "Advection", .01)
 elements.property(elements.JWARD_PT_OILC, "Weight", 5)
 elements.property(elements.JWARD_PT_OILC, "State", ST_liquid)
 elements.property(elements.JWARD_PT_OILC, "Properties", elem.TYPE_LIQUID+elem.PROP_DEADLY)
 function OILC(i,x,y,s,n)
  dis = tpt.get_property('temp', x, y)
  if dis > 973.15 then
  tpt.set_property('tmp', math.random(1,9), x, y)
 end
 oillife = tpt.get_property('tmp', x, y)
   if oillife == 9 then
   sim.partChangeType(i, tpt.element('crtv'))
   oillife = nil
   end
   if oillife == 8 then
   sim.partChangeType(i, tpt.element('gas'))
   oillife = nil
   end
   if oillife == 7 then
   sim.partChangeType(i, tpt.element('kerv'))
   oillife = nil
   end
   if oillife == 6 then
   sim.partChangeType(i, tpt.element('ptlv'))
   oillife = nil
   end
   if oillife == 5 then
   sim.partChangeType(i, tpt.element('dslv'))
   oillife = nil
   end
   if oillife == 4 then
   sim.partChangeType(i, tpt.element('waxv'))
   oillife = nil
   end
   if oillife == 3 then
   sim.partChangeType(i, tpt.element('coke'))
   oillife = nil
   end
   if oillife == 2 then
   sim.partChangeType(i, tpt.element('tarv'))
   oillife = nil
   end
   if oillife == 1 then
   sim.partChangeType(i, tpt.element('PRPN'))
   oillife = nil
   end
 end
 tpt.element_func(OILC,OILCRUDE)
 
 --better states of matter
 function BSM(i,x,y,s,n)
 stctype = tpt.get_property('ctype', x, y)
 sttemp = tpt.get_property('temp', x, y)
 if stctype == tpt.element('hygn') and sttemp > 14 then
 sim.partChangeType(i, tpt.el.hygn.id)
 end
 if stctype == tpt.element('nble') and sttemp > 1 then
 sim.partChangeType(i, tpt.el.nble.id)
 end
 if stctype == tpt.element('desl') and sttemp > 255.15 then
 sim.partChangeType(i, tpt.el.desl.id)
 end
 if stctype == tpt.element('ptrl') and sttemp > 225.15 then
 sim.partChangeType(i, tpt.element('ptrl'))
 end
 
 end
 tpt.element_func(BSM,tpt.el.ice.id)
 
 function BSMp(i,x,y,s,n)
 stctype = tpt.get_property('ctype', x, y)
 sttemp = tpt.get_property('temp', x, y)
 if stctype == tpt.element('hygn') and sttemp > 14 then
 sim.partChangeType(i, tpt.el.hygn.id)
 end
 if stctype == tpt.element('nble') and sttemp > 1 then
 sim.partChangeType(i, tpt.el.nble.id)
 end
 if stctype == tpt.element('desl') and sttemp > 255.15 then
 sim.partChangeType(i, tpt.el.desl.id)
 end
 if stctype == tpt.element('ptrl') and sttemp > 225.15 then
 sim.partChangeType(i, tpt.element('ptrl'))
 end
 end
 tpt.element_func(BSMp,tpt.el.snow.id)
 
 function BSMM(i,x,y,s,n)
 stctype = tpt.get_property('ctype', x, y)
 sttemp = tpt.get_property('temp', x, y)
 if stctype == tpt.element('merc') and sttemp > 234 then
 sim.partChangeType(i, tpt.el.merc.id)
 tpt.set_property('tmp', 22, x, y)
 end
 end
 tpt.element_func(BSMM,tpt.el.metl.id)
 
 function BSMMY(i,x,y,s,n)
 sttemp = tpt.get_property('temp', x, y)
 if buttonablest == 0 and sttemp < 234 then
 sim.partChangeType(i, tpt.el.metl.id)
 tpt.set_property('ctype', tpt.el.merc.id, x, y)
 end
 end
 tpt.element_func(BSMMY,tpt.el.merc.id)
 
 function BSMWT(i,x,y,s,n)
 stctype = tpt.get_property('ctype', x, y)
 sttemp = tpt.get_property('temp', x, y)
 if stctype == tpt.element('deut') and sttemp < 376 then
 sim.partChangeType(i, tpt.el.deut.id)
 end
 end
 tpt.element_func(BSMWT,tpt.el.wtrv.id)
 
 function BSMDWT(i,x,y,s,n)
 stctype = tpt.get_property('ctype', x, y)
 if stctype == tpt.element('deut') then
 sim.partChangeType(i, tpt.el.deut.id)
 end
 end
 tpt.element_func(BSMDWT,tpt.el.dstw.id)
 
 function BSMDT(i,x,y,s,n)
 sttemp = tpt.get_property('temp', x, y)
 if buttonablest == 0 and sttemp > 376 then
 sim.partChangeType(i, tpt.el.wtrv.id)
 tpt.set_property('ctype', tpt.el.deut.id, x, y)
 end
 end
 tpt.element_func(BSMDT,tpt.el.deut.id)
 
 function BSMP(i,x,y,s,n)
 sttemp = tpt.get_property('temp', x, y)
 if buttonablest == 0 and sttemp < 260 then
 BSMchance = math.random(1,3)
 else
 BSMchance = 0
 end
 if BSMchance == 1 then
 sim.partChangeType(i, tpt.el.clst.id)
 end
 if BSMchance == 2 then
 sim.partChangeType(i, tpt.el.ice.id)
 tpt.set_property('ctype', tpt.el.pste.id, x, y)
 end
 if BSMchance == 3 then
 sim.partChangeType(i, tpt.el.ice.id)
 tpt.set_property('ctype', tpt.el.watr.id, x, y)
 end
 end
 tpt.element_func(BSMP,tpt.el.pste.id)
 
 --button
 --http://powdertoy.co.uk/Wiki/W/Lua.html
 topress = 0
 thx = 0
 buttonable = 0
 
 function tick()
  if thx == 1 then
  tpt.message_box("thanks "..tpt.get_name().." for your purchase, ","construction or theft of jward's fuel mod")
  thx = 0
  end
- if tpt.version.jacob1s_mod then
+ if tpt.version.jacob1s_mod or elem.DEFAULT_PT_IRNX == 181 then
 tpt.drawrect(597, 1, 14, 14, 255, 255, 255)
 tpt.fillrect(597, 1, 14, 14, 0, 0, 0, 255)
 tpt.drawtext(598, 5, "JW", 255, 255, 255, 255)
 topress = 1
 else
 tpt.drawrect(613, 113, 14, 14, 204, 204, 204)
 tpt.fillrect(613, 113, 14, 14, 0, 0, 0, 255)
 tpt.drawtext(614, 117, "JW", 255, 255, 255, 255)
 topress = 2
 if tpt.mousex >= 613 and tpt.mousey >= 113 and tpt.mousex <= 627 and tpt.mousey <= 124 then
 tpt.drawrect(613, 113, 14, 14, 255, 255, 255)
 tpt.drawtext(500, 117, "JWARD's Mod options", 255, 255, 255, 255)
 end
 end
 if toopress == 1 then
 if topress == 1 then
  tpt.fillrect(596, 0, 16, 16, 255, 255, 255, 255)
  tpt.drawtext(598, 5, "JW", 0, 0, 0, 255)
  end
  if topress == 2 then
  tpt.fillrect(612, 112, 16, 16, 255, 255, 255, 255)
  tpt.drawtext(614, 117, "JW", 0, 0, 0, 255)
  end
  if items == 1 then
  tpt.fillrect(150, 174, 16, 15, 255, 255, 255, 255)
  tpt.drawline(153, 176, 158, 181, 0, 0, 0)
  tpt.drawline(163, 176, 158, 181, 0, 0, 0)
  tpt.drawline(153, 181, 158, 186, 0, 0, 0)
  tpt.drawline(163, 181, 158, 186, 0, 0, 0)
  tpt.drawrect(0, 205, 600, 175, 255, 255, 255)
  tpt.fillrect(0, 205, 600, 175, 0, 0, 0, 255)
  tpt.drawtext(25, 210, "JWARD's Mods' elements", 255, 255, 255, 255)
  tpt.drawrect(5, 208, 14, 14, 255, 255, 255)
  tpt.drawline(17, 215, 12, 210, 255, 255, 255)
  tpt.drawline(7, 215, 12, 210, 255, 255, 255)
  tpt.drawline(17, 220, 12, 215, 255, 255, 255)
  tpt.drawline(7, 220, 12, 215, 255, 255, 255)
  tpt.drawtext(6, 229, "Fuel mod:", 255, 255, 255, 255)
  --anfo
  tpt.fillrect(50, 225, 28, 15, 255, 206, 202, 255)
  tpt.drawtext(51, 229, "AMFO", 0, 0, 0, 255)
  if  tpt.mousex >= 50 and tpt.mousey >= 225 and tpt.mousex <= 78 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(49, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 1 then
  tpt.drawrect(49, 224, 30, 17, 255, 0, 0)
  end
 --PRPN
  tpt.fillrect(83, 225, 28, 15, 244, 162, 106, 255)
  tpt.drawtext(85, 229, "PRPN", 0, 0, 0, 255)
  if  tpt.mousex >= 83 and tpt.mousey >= 225 and tpt.mousex <= 111 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(82, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 2 then
  tpt.drawrect(82, 224, 30, 17, 255, 0, 0)
  end
  --COKE
  tpt.fillrect(116, 225, 28, 15, 170, 170, 170, 255)
  tpt.drawtext(118, 229, "COKE", 0, 0, 0, 255)
  if  tpt.mousex >= 116 and tpt.mousey >= 225 and tpt.mousex <= 144 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(115, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 3 then
  tpt.drawrect(115, 224, 30, 17, 255, 0, 0)
  end
  --OILC
  tpt.fillrect(149, 225, 28, 15, 53, 53, 13, 255)
  tpt.drawtext(153, 229, "OILC", 255, 255, 255, 255)
  if  tpt.mousex >= 149 and tpt.mousey >= 225 and tpt.mousex <= 177 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(148, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 4 then
  tpt.drawrect(148, 224, 30, 17, 255, 0, 0)
  end
 --plye
  tpt.fillrect(182, 225, 28, 15, 204, 204, 204, 255)
  tpt.drawtext(186, 229, "PLYE", 0, 0, 0, 255)
  if  tpt.mousex >= 182 and tpt.mousey >= 225 and tpt.mousex <= 210 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(181, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 5 then
  tpt.drawrect(181, 224, 30, 17, 255, 0, 0)
  end
  --JETB
  tpt.fillrect(215, 225, 28, 15, 103, 102, 1, 255)
  tpt.drawtext(217, 229, "JETB", 255, 255, 255, 255)
  if  tpt.mousex >= 215 and tpt.mousey >= 225 and tpt.mousex <= 243 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(214, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 6 then
  tpt.drawrect(214, 224, 30, 17, 255, 0, 0)
  end
  --kerosene
  tpt.fillrect(248, 225, 28, 15, 1, 179, 255, 255)
  tpt.drawtext(250, 229, "KERO", 0, 0, 0, 255)
  if  tpt.mousex >= 248 and tpt.mousey >= 225 and tpt.mousex <= 276 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(247, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 7 then
  tpt.drawrect(247, 224, 30, 17, 255, 0, 0)
  end
  --N2H4
  tpt.fillrect(281, 225, 28, 15, 182, 240, 100, 255)
  tpt.drawtext(283, 229, "N2H4", 0, 0, 0, 255)
  if  tpt.mousex >= 281 and tpt.mousey >= 225 and tpt.mousex <= 309 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(280, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 8 then
  tpt.drawrect(280, 224, 30, 17, 255, 0, 0)
  end
   --N2O4
  tpt.fillrect(314, 225, 28, 15, 48, 206, 198, 255)
  tpt.drawtext(316, 229, "N2O4", 0, 0, 0, 255)
  if  tpt.mousex >= 314 and tpt.mousey >= 225 and tpt.mousex <= 342 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(313, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 9 then
  tpt.drawrect(313, 224, 30, 17, 255, 0, 0)
  end
  --TAR
  tpt.fillrect(347, 225, 28, 15, 13, 13, 3, 255)
  tpt.drawtext(352, 229, "TAR", 255, 255, 255, 255)
  if  tpt.mousex >= 347 and tpt.mousey >= 225 and tpt.mousex <= 375 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(346, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 10 then
  tpt.drawrect(346, 224, 30, 17, 255, 0, 0)
  end
  --AFRZ
  tpt.fillrect(380, 225, 28, 15, 12, 63, 91, 255)
  tpt.drawtext(382, 229, "AFRZ", 255, 255, 255, 255)
  if  tpt.mousex >= 380 and tpt.mousey >= 225 and tpt.mousex <= 408 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(379, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 11 then
  tpt.drawrect(379, 224, 30, 17, 255, 0, 0)
  end
  --N2O
  tpt.fillrect(413, 225, 28, 15, 67, 218, 255, 255)
  tpt.drawtext(418, 229, "N2O", 0, 0, 0, 255)
  if  tpt.mousex >= 413 and tpt.mousey >= 225 and tpt.mousex <= 441 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(412, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 12 then
  tpt.drawrect(412, 224, 30, 17, 255, 0, 0)
  end
  --N2
  tpt.fillrect(446, 225, 28, 15, 94, 82, 255, 255)
  tpt.drawtext(454, 229, "N2", 0, 0, 0, 255)
  if  tpt.mousex >= 446 and tpt.mousey >= 225 and tpt.mousex <= 474 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(445, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 13 then
  tpt.drawrect(445, 224, 30, 17, 255, 0, 0)
  end
  --PTRL
  tpt.fillrect(479, 225, 28, 15, 10, 74, 92, 255)
  tpt.drawtext(482, 229, "PTRL", 255, 255, 255, 255)
  if  tpt.mousex >= 479 and tpt.mousey >= 225 and tpt.mousex <= 507 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(478, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 14 then
  tpt.drawrect(478, 224, 30, 17, 255, 0, 0)
  end
  --COIL
  tpt.fillrect(512, 225, 28, 15, 165, 114, 20, 255)
  tpt.drawtext(515, 229, "COIL", 0, 0, 0, 255)
  if  tpt.mousex >= 512 and tpt.mousey >= 225 and tpt.mousex <= 540 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(511, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 15 then
  tpt.drawrect(511, 224, 30, 17, 255, 0, 0)
  end
  --CALS
  tpt.fillrect(545, 225, 28, 15, 144, 150, 95, 255)
  tpt.drawtext(548, 229, "CALS", 0, 0, 0, 255)
  if  tpt.mousex >= 545 and tpt.mousey >= 225 and tpt.mousex <= 573 and tpt.mousey <= 240 and items == 1 then
  tpt.drawrect(544, 224, 30, 17, 255, 0, 0)
  end
  if redrect == 16 then
  tpt.drawrect(544, 224, 30, 17, 255, 0, 0)
  end
  --BDSL
  tpt.fillrect(6, 245, 28, 15, 51, 16, 0, 255)
  tpt.drawtext(8, 249, "BDSL", 255, 255, 255, 255)
  if  tpt.mousex >= 6 and tpt.mousey >= 245 and tpt.mousex <= 34 and tpt.mousey <= 260 and items == 1 then
  tpt.drawrect(5, 244, 30, 17, 255, 0, 0)
  end
  if redrect == 17 then
  tpt.drawrect(5, 244, 30, 17, 255, 0, 0)
  end
  --LN2O
  tpt.fillrect(39, 245, 28, 15, 51, 193, 245, 255)
  tpt.drawtext(41, 249, "LN2O", 0, 0, 0, 255)
  if  tpt.mousex >= 39 and tpt.mousey >= 245 and tpt.mousex <= 67 and tpt.mousey <= 260 and items == 1 then
  tpt.drawrect(38, 244, 30, 17, 255, 0, 0)
  end
  if redrect == 18 then
  tpt.drawrect(38, 244, 30, 17, 255, 0, 0)
  end
  --CRST
  tpt.fillrect(72, 245, 28, 15, 15, 14, 4, 255)
  tpt.drawtext(74, 249, "CRST", 255, 255, 255, 255)
  if  tpt.mousex >= 72 and tpt.mousey >= 245 and tpt.mousex <= 100 and tpt.mousey <= 260 and items == 1 then
  tpt.drawrect(71, 244, 30, 17, 255, 0, 0)
  end
  if redrect == 19 then
  tpt.drawrect(71, 244, 30, 17, 255, 0, 0)
  end
  end
  tpt.drawrect(0, 0, 200, 200, 255, 255, 255)
  tpt.fillrect(0, 0, 200, 200, 0, 0, 0, 255)
  tpt.drawtext(10, 5, "JWARD's Mod options", 255, 255, 255, 255)
  --close
  tpt.drawrect(10, 174, 60, 16, 255, 255, 255)
  tpt.drawtext(25, 178, "Close", 255, 255, 255, 255)
  --antisave breaking
  tpt.drawrect(10, 150, 15, 15, 255, 255, 255)
  tpt.drawrect(35, 150, 15, 15, 255, 255, 255)
  tpt.drawtext(13, 154, "on", 255, 255, 255, 255)
  tpt.drawtext(37, 154, "off", 255, 255, 255, 255)
  tpt.drawtext(10, 140, "antisave breaking", 255, 255, 255, 255)
  --THanKs
  tpt.drawrect(80, 174, 60, 16, 255, 255, 255)
  tpt.drawtext(88, 178, ">THanKs<", 255, 255, 255, 255)
  --better states of matter
  tpt.drawtext(13, 127, "on", 255, 255, 255, 255)
  tpt.drawtext(37, 127, "off", 255, 255, 255, 255)
  tpt.drawrect(10, 123, 15, 15, 255, 255, 255)
  tpt.drawrect(35, 123, 15, 15, 255, 255, 255)
  tpt.drawtext(10, 114, "better states of matter", 255, 255, 255, 255)
   --elements
  tpt.drawrect(150, 174, 16, 15, 255, 255, 255)
  tpt.drawline(153, 176, 158, 181, 255, 255, 255)
  tpt.drawline(163, 176, 158, 181, 255, 255, 255)
  tpt.drawline(153, 181, 158, 186, 255, 255, 255)
  tpt.drawline(163, 181, 158, 186, 255, 255, 255)
 end
 end
 function pressthingy()
 if topress == 1 then
  if tpt.mousex >= 597 and tpt.mousey >= 1 and tpt.mousex <= 611 and tpt.mousey <= 14 then
  open = 1
  windowclick = 1
  end
  end
  if topress == 2 then
  if tpt.mousex >= 613 and tpt.mousey >= 113 and tpt.mousex <= 627 and tpt.mousey <= 124 then
  open = 1
  windowclick = 1
  end
  end
  if  tpt.mousex >= 0 and tpt.mousey >= 0 and tpt.mousex <= 200 and tpt.mousey <= 200 and windowclick == 1 then
  open = 1
  end
  if open == 1 then
  if  tpt.mousex >= 10 and tpt.mousey >= 174 and tpt.mousex <= 70 and tpt.mousey <= 190 then
  open = 0
  toopress = 0
  windowclick = 0
  end
  if  tpt.mousex >= 80 and tpt.mousey >= 174 and tpt.mousex <= 140 and tpt.mousey <= 190 then
  thx = 1
  end
  if  tpt.mousex >= 150 and tpt.mousey >= 174 and tpt.mousex <= 166 and tpt.mousey <= 189 then
  items = 1
  end
  if  tpt.mousex >= 5 and tpt.mousey >= 208 and tpt.mousex <= 19 and tpt.mousey <= 222 and items == 1 then
  items = 0
  end
  if  tpt.mousex >= 50 and tpt.mousey >= 225 and tpt.mousex <= 78 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_AMFO"
  redrect = 1
  end
  if  tpt.mousex >= 83 and tpt.mousey >= 225 and tpt.mousex <= 111 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_PRPN"
  redrect = 2
  end
  if  tpt.mousex >= 116 and tpt.mousey >= 225 and tpt.mousex <= 144 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_COKE"
  redrect = 3
  end
  if  tpt.mousex >= 149 and tpt.mousey >= 225 and tpt.mousex <= 177 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_OILC"
  redrect = 4
  end
  if  tpt.mousex >= 182 and tpt.mousey >= 225 and tpt.mousex <= 210 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_PLYE"
  redrect = 5
  end
  if  tpt.mousex >= 215 and tpt.mousey >= 225 and tpt.mousex <= 243 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_JETB"
  redrect = 6
  end
  if  tpt.mousex >= 248 and tpt.mousey >= 225 and tpt.mousex <= 276 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_KERO"
  redrect = 7
  end
  if  tpt.mousex >= 281 and tpt.mousey >= 225 and tpt.mousex <= 309 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_N2H4"
  redrect = 8
  end
  if  tpt.mousex >= 314 and tpt.mousey >= 225 and tpt.mousex <= 342 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_N2O4"
  redrect = 9
  end
  if  tpt.mousex >= 347 and tpt.mousey >= 225 and tpt.mousex <= 375 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_TAR"
  redrect = 10
  end
  if  tpt.mousex >= 380 and tpt.mousey >= 225 and tpt.mousex <= 408 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_AFRZ"
  redrect = 11
  end
  if  tpt.mousex >= 413 and tpt.mousey >= 225 and tpt.mousex <= 441 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_N2O"
  redrect = 12
  end
  if  tpt.mousex >= 446 and tpt.mousey >= 225 and tpt.mousex <= 474 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_N2"
  redrect = 13
  end
  if  tpt.mousex >= 479 and tpt.mousey >= 225 and tpt.mousex <= 507 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_PTRL"
  redrect = 14
  end
  if  tpt.mousex >= 512 and tpt.mousey >= 225 and tpt.mousex <= 540 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_COIL"
  redrect = 15
  end
  if  tpt.mousex >= 545 and tpt.mousey >= 225 and tpt.mousex <= 573 and tpt.mousey <= 240 and items == 1 then
  tpt.selectedl="JWARD_PT_CALS"
  redrect = 16
  end
  if  tpt.mousex >= 6 and tpt.mousey >= 245 and tpt.mousex <= 34 and tpt.mousey <= 260 and items == 1 then
  tpt.selectedl="JWARD_PT_BDSL"
  redrect = 17
  end
  if  tpt.mousex >= 39 and tpt.mousey >= 245 and tpt.mousex <= 67 and tpt.mousey <= 260 and items == 1 then
  tpt.selectedl="JWARD_PT_LN2O"
  redrect = 18
  end
  if  tpt.mousex >= 72 and tpt.mousey >= 245 and tpt.mousex <= 100 and tpt.mousey <= 260 and items == 1 then
  tpt.selectedl="JWARD_PT_CRST"
  redrect = 19
  end
  if  tpt.mousex >= 35 and tpt.mousey >= 123 and tpt.mousex <= 50 and tpt.mousey <= 138 then
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperature", 77)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperatureTransition", elements.DEFAULT_PT_NONE)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressureTransition", elements.DEFAULT_PT_OIL)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperature", 0)
 elements.property(elements.DEFAULT_PT_GAS, "HotAir", 0.001)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperatureTransition", DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperatureTransition", elements.DEFAULT_PT_FIRE)
 elements.property(elements.DEFAULT_PT_GAS, "Temperature", 273.15)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperature", 573)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressure", 6)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperature", 333)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperatureTransition", elements.DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperature", NT)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperatureTransition", ITL)
 elements.property(elements.DEFAULT_PT_HYGN, "LowTemperature", NT)
 elements.property(elements.DEFAULT_PT_HYGN, "LowTemperatureTransition", ITL)
 elements.property(elements.DEFAULT_PT_NBLE, "LowTemperature", NT)
 elements.property(elements.DEFAULT_PT_NBLE, "LowTemperatureTransition", ITL)
 elements.property(elements.DEFAULT_PT_COAL, "HighPressure", 256)
 elements.property(elements.DEFAULT_PT_COAL, "HighPressureTransition", elements.DEFAULT_PT_COAL)
 elements.property(elements.DEFAULT_PT_BCOL, "HighPressure", 256)
 elements.property(elements.DEFAULT_PT_BCOL, "HighPressureTransition", elements.DEFAULT_PT_BCOL)
 elements.property(elements.JWARD_PT_COKE, "HighPressure", 256)
 elements.property(elements.JWARD_PT_COKE, "HighPressureTransition", elements.JWARD_PT_COKE)
 elements.property(elements.JWARD_PT_COKE, "HighTemperature", 10000)
 elements.property(elements.JWARD_PT_COKE, "HighTemperatureTransition", elements.JWARD_PT_COKE)
 elements.property(elements.DEFAULT_PT_URAN, "HighTemperature", 10000)
 elements.property(elements.DEFAULT_PT_URAN, "HighTemperatureTransition", elements.DEFAULT_PT_URAN)
 elements.property(elements.DEFAULT_PT_PLUT, "HighTemperature", 10000)
 elements.property(elements.DEFAULT_PT_PLUT, "HighTemperatureTransition", elements.DEFAULT_PT_PLUT)
 elements.property(elements.DEFAULT_PT_DEUT, "LowTemperature", 0)
 elements.property(elements.DEFAULT_PT_DEUT, "LowTemperatureTransition", elements.DEFAULT_PT_DEUT)
 buttonablest = 1
  end
 if  tpt.mousex >= 10 and tpt.mousey >= 123 and tpt.mousex <= 25 and tpt.mousey <= 138 then
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperature", 76)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperatureTransition", elements.JWARD_PT_N2)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressureTransition", 256)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperature", 573.15)
 elements.property(elements.DEFAULT_PT_GAS, "HotAir", 0)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperatureTransition", elements.DEFAULT_PT_OIL)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperatureTransition", NT)
 elements.property(elements.DEFAULT_PT_GAS, "Temperature", 583.15)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperature", 10000)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperature", 573.15)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperatureTransition", elements.DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_DESL, "HighTemperatureTransition", elements.JWARD_PT_DSLV)
 elements.property(elements.DEFAULT_PT_DESL, "HighTemperature", 473.15)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperature", 255.15)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.DEFAULT_PT_HYGN, "LowTemperature", 14)
 elements.property(elements.DEFAULT_PT_HYGN, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.DEFAULT_PT_NBLE, "LowTemperature", 1)
 elements.property(elements.DEFAULT_PT_NBLE, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.DEFAULT_PT_COAL, "HighPressure", 122)
 elements.property(elements.DEFAULT_PT_COAL, "HighPressureTransition", elements.DEFAULT_PT_DMND)
 elements.property(elements.DEFAULT_PT_BCOL, "HighPressure", 122)
 elements.property(elements.DEFAULT_PT_BCOL, "HighPressureTransition", elements.DEFAULT_PT_DMND)
 elements.property(elements.JWARD_PT_COKE, "HighPressure", 122)
 elements.property(elements.JWARD_PT_COKE, "HighPressureTransition", elements.DEFAULT_PT_DMND)
 elements.property(elements.JWARD_PT_COKE, "HighTemperature", 4373.15)
 elements.property(elements.JWARD_PT_COKE, "HighTemperatureTransition", elements.DEFAULT_PT_CO2)
 elements.property(elements.DEFAULT_PT_URAN, "HighTemperature", 1405)
 elements.property(elements.DEFAULT_PT_URAN, "HighTemperatureTransition", elements.DEFAULT_PT_LAVA)
 elements.property(elements.DEFAULT_PT_PLUT, "HighTemperature", 912)
 elements.property(elements.DEFAULT_PT_PLUT, "HighTemperatureTransition", elements.DEFAULT_PT_LAVA)
 elements.property(elements.DEFAULT_PT_DEUT, "LowTemperature", 276)
 elements.property(elements.DEFAULT_PT_DEUT, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 buttonablest = 0
  end
  if  tpt.mousex >= 10 and tpt.mousey >= 150 and tpt.mousex <= 25 and tpt.mousey <= 165 then
 elements.property(elements.DEFAULT_PT_ACID, "Diffusion", 0)
 elements.property(elements.DEFAULT_PT_ACID, "Gravity", 0.1)
 elements.property(elements.DEFAULT_PT_ACID, "Description", "Dissolves almost everything.")
 elements.property(elements.DEFAULT_PT_ACID, "Flammable", 40)
 elements.property(elements.DEFAULT_PT_INSL, "Hardness", 10)
 elements.property(elements.DEFAULT_PT_INSL, "Flammable", 7)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperature", 77)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperatureTransition", elements.DEFAULT_PT_NONE)
 elements.property(elements.DEFAULT_PT_WATR, "Hardness", 20)
 elements.property(elements.DEFAULT_PT_WATR, "Weight", 30)
 elements.property(elements.DEFAULT_PT_DSTW, "Hardness", 20)
 elements.property(elements.DEFAULT_PT_DSTW, "Weight", 30)
 elements.property(elements.DEFAULT_PT_SLTW, "Hardness", 20)
 elements.property(elements.DEFAULT_PT_SLTW, "Weight", 35)
 elements.property(elements.DEFAULT_PT_BUBW, "Hardness", 20)
 elements.property(elements.DEFAULT_PT_BUBW, "Weight", 30)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressureTransition", elements.DEFAULT_PT_OIL)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperature", 0)
 elements.property(elements.DEFAULT_PT_GAS, "HotAir", 0.001)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperatureTransition", DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperatureTransition", elements.DEFAULT_PT_FIRE)
 elements.property(elements.DEFAULT_PT_GAS, "Temperature", 273.15)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperature", 573)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressure", 6)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperature", 333)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperatureTransition", elements.DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperature", NT)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperatureTransition", ITL)
 elements.property(elements.DEFAULT_PT_DESL, "Weight", 15)
 elements.property(elements.DEFAULT_PT_DESL, "HighPressure", 2)
 buttonable = 1
  end
  if  tpt.mousex >= 35 and tpt.mousey >= 150 and tpt.mousex <= 50 and tpt.mousey <= 165 then
  elements.property(elements.DEFAULT_PT_ACID, "Diffusion", 1.2)
 elements.property(elements.DEFAULT_PT_ACID, "Gravity", 0.62)
 elements.property(elements.DEFAULT_PT_ACID, "Description", "Bubbling caustic liquid.")
 elements.property(elements.DEFAULT_PT_ACID, "Flammable", 0)
 elements.property(elements.DEFAULT_PT_INSL, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_INSL, "Flammable", 0)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperature", 76)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperatureTransition", elements.JWARD_PT_N2)
 elements.property(elements.DEFAULT_PT_WATR, "Hardness", 0.25)
 elements.property(elements.DEFAULT_PT_WATR, "Weight", 32)
 elements.property(elements.DEFAULT_PT_DSTW, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_DSTW, "Weight", 32)
 elements.property(elements.DEFAULT_PT_SLTW, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_SLTW, "Weight", 32)
 elements.property(elements.DEFAULT_PT_BUBW, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_BUBW, "Weight", 32)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressureTransition", 256)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperature", 573.15)
 elements.property(elements.DEFAULT_PT_GAS, "HotAir", 0)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperatureTransition", elements.DEFAULT_PT_OIL)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperatureTransition", NT)
 elements.property(elements.DEFAULT_PT_GAS, "Temperature", 583.15)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperature", 10000)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperature", 573.15)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperatureTransition", elements.DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_DESL, "HighTemperatureTransition", elements.JWARD_PT_DSLV)
 elements.property(elements.DEFAULT_PT_DESL, "HighTemperature", 473.15)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperature", 255.15)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.DEFAULT_PT_DESL, "Weight", 12)
 elements.property(elements.DEFAULT_PT_DESL, "HighPressure", 256)
 buttonable = 0
  end
  tpt.hud(0)
  tpt.set_pause(1)
  toopress = 1
  return false
  else
  toopress = 0
- tpt.set_pause(0)
+
  return true
 end
 end
 
 tpt.register_mouseclick(pressthingy)
 tpt.register_mouseclick(tick)
 tpt.register_step(tick)
 
 --default editing
 elements.property(elements.DEFAULT_PT_ACID, "Flammable", 0)
 elements.property(elements.DEFAULT_PT_DMND, "MenuSection", 9)
 elements.property(elements.DEFAULT_PT_MORT, "MenuVisible", 1)
 elements.property(elements.DEFAULT_PT_MORT, "MenuSection", 8)
 elements.property(elements.DEFAULT_PT_INSL, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_INSL, "Flammable", 0)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperature", 76)
 elements.property(elements.DEFAULT_PT_WATR, "Hardness", 0.25)
 elements.property(elements.DEFAULT_PT_DSTW, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_SLTW, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_BUBW, "Hardness", 0)
 elements.property(elements.DEFAULT_PT_WATR, "Weight", 32)
 elements.property(elements.DEFAULT_PT_DSTW, "Weight", 32)
 elements.property(elements.DEFAULT_PT_SLTW, "Weight", 32)
 elements.property(elements.DEFAULT_PT_BUBW, "Weight", 32)
 elements.property(elements.DEFAULT_PT_ACID, "Weight", 32)
 elements.property(elements.DEFAULT_PT_ACID, "Diffusion", 1.2)
 elements.property(elements.DEFAULT_PT_ACID, "Description", "Bubbling caustic liquid.")
 elements.property(elements.DEFAULT_PT_ACID, "Gravity", 0.62)
 elements.property(elements.DEFAULT_PT_DESL, "HighPressure", 256)
 elements.property(elements.DEFAULT_PT_GAS, "HighPressureTransition", 256)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperature", 573.15)
 elements.property(elements.DEFAULT_PT_GAS, "HotAir", 0)
 elements.property(elements.DEFAULT_PT_GAS, "LowTemperatureTransition", elements.DEFAULT_PT_OIL)
 elements.property(elements.DEFAULT_PT_GAS, "Temperature", 583.15)
 elements.property(elements.DEFAULT_PT_GAS, "HighTemperature", 10000)
 elements.property(elements.DEFAULT_PT_LN2, "HighTemperatureTransition", elements.JWARD_PT_N2)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperature", 573.15)
 elements.property(elements.DEFAULT_PT_OIL, "HighTemperatureTransition", elements.DEFAULT_PT_GAS)
 elements.property(elements.DEFAULT_PT_DESL, "HighTemperatureTransition", elements.JWARD_PT_DSLV)
 elements.property(elements.DEFAULT_PT_DESL, "HighTemperature", 473.15)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperature", 255.15)
 elements.property(elements.DEFAULT_PT_DESL, "LowTemperatureTransition", elements.DEFAULT_PT_ICE)
 elements.property(elements.DEFAULT_PT_DESL, "Weight", 12)
 elements.property(elements.DEFAULT_PT_MWAX, "HighTemperatureTransition", elements.JWARD_PT_WAXV)
 elements.property(elements.DEFAULT_PT_MWAX, "HighTemperature", 643.15)
 elements.property(elements.DEFAULT_PT_WAX, "HeatConduct", 25)