Fuel tanks explode when air temperature exceeds 561.15°K.

This commit is contained in:
Rob Nelson
2013-11-23 13:23:08 -08:00
parent f6ac715f6a
commit c5da0e487f
2 changed files with 10 additions and 1 deletions

View File

@@ -1,4 +1,7 @@
// Assuming this is http://en.wikipedia.org/wiki/Butane
// (Autoignition temp 288<38>C, or 561.15<EFBFBD>K)
// Used in fueltanks exploding.
#define AUTOIGNITION_WELDERFUEL 561.15
/obj/structure/reagent_dispensers
name = "Dispenser"
@@ -154,6 +157,11 @@
ex_act()
explode()
temperature_expose(datum/gas_mixture/air, exposed_temperature, exposed_volume)
if(exposed_temperature >= AUTOIGNITION_WELDERFUEL)
explode()
proc/explode()
if (reagents.total_volume > 500)
explosion(src.loc,1,2,4)