anchor.diff:  	var/heat_efficency = min(temperature * 0.01, cached_gases[/datum/gas/tritium][MOLES], cached_gases[/datum/gas/bz][MOLES])
   	var/energy_used = heat_efficency * 100
   	ASSERT_GAS(/datum/gas/halon, air)
  -	if ((cached_gases[/datum/gas/tritium][MOLES] - heat_efficency * 5 < 0 ) || (cached_gases[/datum/gas/bz][MOLES] - heat_efficency * 0.25 < 0)) //Shouldn't produce gas from nothing.
  -		return NO_REACTION
  -	cached_gases[/datum/gas/tritium][MOLES] -= heat_efficency * 5
  +	if ((cached_gases[/datum/gas/tritium][MOLES] - heat_efficency * 4 < 0 ) || (cached_gases[/datum/gas/bz][MOLES] - heat_efficency * 0.25 < 0)) //Shouldn't produce gas from nothing.
  +		return NO_REACTION
  +	cached_gases[/datum/gas/tritium][MOLES] -= heat_efficency * 4
   	cached_gases[/datum/gas/bz][MOLES] -= heat_efficency * 0.25
  -	cached_gases[/datum/gas/halon][MOLES] += heat_efficency * 2
  +	cached_gases[/datum/gas/halon][MOLES] += heat_efficency * 4.25
   
   	if(energy_used)
   		var/new_heat_capacity = air.heat_capacity()
  
positive.code: 	ASSERT_GAS(/datum/gas/stimulum, air)
  	if ((cached_gases[/datum/gas/tritium][MOLES] - heat_scale < 0 ) || (cached_gases[/datum/gas/nitryl][MOLES] - heat_scale < 0)) //Shouldn't produce gas from nothing.
  		return NO_REACTION
  	cached_gases[/datum/gas/stimulum][MOLES]+= heat_scale/10
  	cached_gases[/datum/gas/tritium][MOLES] -= heat_scale
  	cached_gases[/datum/gas/nitryl][MOLES] -= heat_scale
  	SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, STIMULUM_RESEARCH_AMOUNT * max(stim_energy_change, 0))
  
negative.code: 	var/temperature = air.temperature
  	var/turf/open/location = isturf(holder) ? holder : null
  	var/consumed_fuel = 0
  	consumed_fuel = min(cached_gases[/datum/gas/proto_nitrate][MOLES] * 0.15, 20 * (temperature * 0.01))
  	if ((cached_gases[/datum/gas/proto_nitrate][MOLES] - consumed_fuel * 0.15 < 0 ) || (cached_gases[/datum/gas/nitrogen][MOLES] - consumed_fuel * 0.01 < 0)) //Shouldn't produce gas from nothing.
  		return NO_REACTION
  	cached_gases[/datum/gas/nitrogen][MOLES] -= consumed_fuel * 0.01
  	cached_gases[/datum/gas/proto_nitrate][MOLES] -= consumed_fuel * 0.15
  	if(prob(5 * consumed_fuel))
  		new /obj/item/grenade/gas_crystal/proto_nitrate_crystal(location)
  	energy_released += consumed_fuel * 800
  	if(energy_released)
  