rad

if sim.partProperty(i,'temp') > 793.15 and math.random(1,67) == 1 then
	if sim.partProperty(i,'tmp') == 1 then
		sim.partProperty(i,'tmp') = nil
		sim.partChangeType(i, tpt.element('BRMT'))
	elseif sim.partProperty(i,'tmp') == 2 then
		sim.partChangeType(i, tpt.element('POLO'))
		sim.partProperty(i,'tmp', math.random(0,3))
	elseif sim.partProperty(i,'tmp') == 3 then
		sim.partProperty(i,'tmp') = nil
		sim.partChangeType(i, tpt.element('URAN'))
	end
end