From 5504cc9b367f6cd7825817b83d8d8e2d9cf01c75 Mon Sep 17 00:00:00 2001
From: SkyratBot <59378654+SkyratBot@users.noreply.github.com>
Date: Fri, 11 Sep 2020 23:02:34 +0200
Subject: [PATCH] [MIRROR] Add 5 new gases, related interactions/items/content,
changes parts of fusion (#736)
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
* Merge pull request #53013 from Ghilker/reactions-go-BRRRR
The scope of this PR is to add new and interesting stuff to the atmos crew and to bring more people to it both old and new.
This PR adds 5 new gases, a bunch of reactions (i'm still working on this but suggestions are useful), new recipes and items to the atmosians arsenal. These gases have high utility for everyone, atmosians will find them useful to do their job both as firefighters and air maintenance.
FINAL GAS NAMES (will change only if a maintainer ask about it)
Healium
Proto Nitrate
Cyrion B
Halon
Hexane
reactions avaiable in this PR: https://drive.google.com/file/d/1e6DZlBaKSCNdCADKnrH3F3aDWvl0iZr4/view
What the PR add:
-Healium: a red gas, stronger than n2o if breathed, with healing properties
-Proto Nitrate: a green inert gas if breathed but with different reactions with various gases at high temperatures
-Cyrion B: a black deadly gas if breathed that decompones very fast if exposed to N2 even at minimal amounts
-Halon: a light blue gas that when used in a fire it will suck up the O2 and will help cool the room, helping fighting the fire
-Hexane: a purple gas that has the ability to filter from the air plasma and n2o, useful to clean distro from the harmful gases quickly
-Healium Crystal: a reddish crystal that when broken will explode cooling the room and removing the plasma from the air (act like a grenade)
-Proto Nitrate Crystal: a greenish crystal that when broken will explode refilling a space with O2 and N2
-Cyrion B Crystal: a blackish crystal that when broken will explode dealing damage around it
-Metallic hydrogen recipe addition (atmosian armor and fireaxe)
-Statue of an elder atmosian (for bragging rights)
-Supermatter Interactions
-More gas interactions (Roinnel have multiple and different interactions)
-New RPD device: the pressure valve, a device that allow gas flow in a pipenet if the input pressure is higher than the set pressure it's getting atomized
-Fusion is a bit "easier" to start (minor changes to the math so that the instability is more reasonable)
-pluox can be also made without using rads
-cyrion-b bounty
-all 5 gases can be sold to cargo
More stuff needs to be added (like the SM interactions(added) and probably more reactions and breathe reactions)
Please leave suggestions and feedbacks as it helps improve the PR
Atmos desperately need more content and need to be proactive in the making of its tools, with this PR is a start to more atmos content
🆑
add: hydrogen + rads = trit
add: 5 new gases
add: Healium : made from Bz + Freon + cold, it knocks people down but have healing properties
add: Proto Nitrate : made from pluox and H2 + heat, it has different reaction with a bunch of other gases
add: Cyrion B : made from hypernoblium + stimulum around 0°C, it has heavy damage if breathed but is decomposed rapidly by N2
add: Halon : made from bz + trit + cold, it reacts with O2 at high temperature removing it and cooling the air, helping putting out fires
add: Hexane : made from bz + H2 + cold, it reacts with plasma and n2o and removes them from the air mix, filtering them.
tweak: stimulum no longer require plasma
add: canister sprites, gas sprites
add: crystal from gases formation and reaction
add: new metallic hydrogen recipes
add: elder atmosian statue
add: supermatter interactions
tweak: minor changes to fusion math to make it "easier" to start
add : pluoxium can be also made without using rads (not removing the rad production one) (this also produces a minimal amount of h2)
tweak: lowered hypernoblium min temperature of reaction
tweak: metallic hydrogen production more common
add: cyrion-b bounty
add: all 5 gases are up to selling
/🆑
* Add 5 new gases, related interactions/items/content, changes parts of fusion
Co-authored-by: LemonInTheDark <58055496+LemonInTheDark@users.noreply.github.com>
---
code/__DEFINES/atmospherics.dm | 2 +-
code/__DEFINES/reactions.dm | 7 +-
code/datums/components/crafting/recipes.dm | 12 +
code/game/objects/items/fireaxe.dm | 15 +
code/game/objects/items/flamethrower.dm | 1 -
.../objects/items/grenades/atmos_grenades.dm | 95 ++
.../objects/items/stacks/sheets/mineral.dm | 5 +-
code/game/objects/structures/statues.dm | 10 +
code/game/turfs/open/_open.dm | 17 +-
.../atmospherics/gasmixtures/gas_mixture.dm | 8 +-
.../atmospherics/gasmixtures/gas_types.dm | 45 +
.../atmospherics/gasmixtures/reactions.dm | 900 +++++++++++++++---
.../atmospherics/machinery/airalarm.dm | 28 +-
.../machinery/portable/canister.dm | 78 +-
.../machinery/portable/scrubber.dm | 5 +
code/modules/cargo/bounties/engineering.dm | 6 +
code/modules/cargo/exports/large_objects.dm | 20 +-
code/modules/clothing/head/helmet.dm | 10 +
code/modules/clothing/suits/armor.dm | 11 +
code/modules/movespeed/modifiers/reagent.dm | 3 +
code/modules/power/supermatter/supermatter.dm | 29 +-
.../chemistry/reagents/other_reagents.dm | 55 ++
code/modules/surgery/organs/lungs.dm | 60 +-
icons/effects/atmospherics.dmi | Bin 17591 -> 27163 bytes
icons/mob/inhands/weapons/axes_lefthand.dmi | Bin 1632 -> 2097 bytes
icons/obj/atmos.dmi | Bin 39883 -> 43340 bytes
icons/obj/grenade.dmi | Bin 26794 -> 34903 bytes
icons/obj/items_and_weapons.dmi | Bin 105661 -> 107073 bytes
tgstation.dme | 1 +
29 files changed, 1259 insertions(+), 164 deletions(-)
create mode 100644 code/game/objects/items/grenades/atmos_grenades.dm
diff --git a/code/__DEFINES/atmospherics.dm b/code/__DEFINES/atmospherics.dm
index 1c84a2dafc9..6b41377750f 100644
--- a/code/__DEFINES/atmospherics.dm
+++ b/code/__DEFINES/atmospherics.dm
@@ -95,7 +95,7 @@
#define COLD_FIRE_MAXIMUM_TEMPERATURE_TO_EXIST 273 //fire will start if the temperature is 0 °C
#define COLD_FIRE_SPREAD_RADIOSITY_SCALE 0.95
#define COLD_FIRE_GROWTH_RATE 40000
-#define FREON_MAXIMUM_BURN_TEMPERATURE 293
+#define FREON_MAXIMUM_BURN_TEMPERATURE 283
#define FREON_LOWER_TEMPERATURE 60 //minimum temperature allowed for the burn to go, we would have negative pressure otherwise
#define FREON_OXYGEN_FULLBURN 10
diff --git a/code/__DEFINES/reactions.dm b/code/__DEFINES/reactions.dm
index d7ef3e17a33..66134ffb486 100644
--- a/code/__DEFINES/reactions.dm
+++ b/code/__DEFINES/reactions.dm
@@ -53,16 +53,15 @@
#define METAL_HYDROGEN_RESEARCH_MAX_AMOUNT 3000
#define STIMULUM_RESEARCH_AMOUNT 50
//Plasma fusion properties
-#define FUSION_ENERGY_THRESHOLD 3e9 //Amount of energy it takes to start a fusion reaction
#define FUSION_MOLE_THRESHOLD 250 //Mole count required (tritium/plasma) to start a fusion reaction
#define FUSION_TRITIUM_CONVERSION_COEFFICIENT (1e-10)
#define INSTABILITY_GAS_POWER_FACTOR 0.003
#define FUSION_TRITIUM_MOLES_USED 1
#define PLASMA_BINDING_ENERGY 20000000
-#define TOROID_VOLUME_BREAKEVEN 1000
-#define FUSION_TEMPERATURE_THRESHOLD 10000
+#define TOROID_VOLUME_BREAKEVEN 1000
+#define FUSION_TEMPERATURE_THRESHOLD 9000
#define PARTICLE_CHANCE_CONSTANT (-20000000)
-#define FUSION_RAD_MAX 2000
+#define FUSION_RAD_MAX 1500
#define FUSION_RAD_COEFFICIENT (-1000)
#define FUSION_INSTABILITY_ENDOTHERMALITY 2
#define FUSION_MAXIMUM_TEMPERATURE 1e8
diff --git a/code/datums/components/crafting/recipes.dm b/code/datums/components/crafting/recipes.dm
index 358d80ae207..5e09a05ffb9 100644
--- a/code/datums/components/crafting/recipes.dm
+++ b/code/datums/components/crafting/recipes.dm
@@ -902,3 +902,15 @@
reqs = list(
/obj/item/reagent_containers/food/snacks/grown/wheat = 50
)
+
+
+/datum/crafting_recipe/elder_atmosian_statue
+ name = "Elder Atmosian Statue"
+ result = /obj/structure/statue/elder_atmosian
+ time = 6 SECONDS
+ reqs = list(/obj/item/stack/sheet/mineral/metal_hydrogen = 10,
+ /obj/item/grenade/gas_crystal/healium_crystal = 1,
+ /obj/item/grenade/gas_crystal/proto_nitrate_crystal = 1,
+ /obj/item/grenade/gas_crystal/cyrion_b_crystal = 1
+ )
+ category = CAT_MISC
diff --git a/code/game/objects/items/fireaxe.dm b/code/game/objects/items/fireaxe.dm
index bfdb86757b9..89b2fea8c90 100644
--- a/code/game/objects/items/fireaxe.dm
+++ b/code/game/objects/items/fireaxe.dm
@@ -74,3 +74,18 @@
/obj/item/fireaxe/boneaxe/update_icon_state()
icon_state = "bone_axe0"
+
+/*
+ * Metal Hydrogen Axe
+ */
+/obj/item/fireaxe/metal_h2_axe // Blatant imitation of the fireaxe, but made out of metallic hydrogen
+ icon_state = "metalh2_axe0"
+ name = "metallic hydrogen axe"
+ desc = "A large, menacing axe made of an unkown substance that the most elder atmosians calls Metallic Hydrogen. Truly an otherwordly weapon."
+
+/obj/item/fireaxe/metal_h2_axe/ComponentInitialize()
+ . = ..()
+ AddComponent(/datum/component/two_handed, force_unwielded=5, force_wielded=23, icon_wielded="metalh2_axe1")
+
+/obj/item/fireaxe/metal_h2_axe/update_icon_state()
+ icon_state = "metalh2_axe0"
diff --git a/code/game/objects/items/flamethrower.dm b/code/game/objects/items/flamethrower.dm
index 14a06a1d792..94d6ad04b4e 100644
--- a/code/game/objects/items/flamethrower.dm
+++ b/code/game/objects/items/flamethrower.dm
@@ -223,7 +223,6 @@
//location.hotspot_expose(1000,500,1)
SSair.add_to_active(target, 0)
-
/obj/item/flamethrower/Initialize(mapload)
. = ..()
if(create_full)
diff --git a/code/game/objects/items/grenades/atmos_grenades.dm b/code/game/objects/items/grenades/atmos_grenades.dm
new file mode 100644
index 00000000000..b05b72c8a32
--- /dev/null
+++ b/code/game/objects/items/grenades/atmos_grenades.dm
@@ -0,0 +1,95 @@
+/obj/item/grenade/gas_crystal
+ desc = "Some kind of crystal, this shouldn't spawn"
+ name = "Gas Crystal"
+ icon = 'icons/obj/grenade.dmi'
+ icon_state = "bluefrag"
+ inhand_icon_state = "flashbang"
+ resistance_flags = FIRE_PROOF
+
+
+/obj/item/grenade/gas_crystal/healium_crystal
+ name = "Healium crystal"
+ desc = "A crystal made from the Healium gas, it's cold to the touch."
+ icon_state = "healium_crystal"
+ ///Amount of stamina damage mobs will take if in range
+ var/stamina_damage = 30
+ ///Range of the grenade that will cool down and affect mobs
+ var/freeze_range = 4
+ ///Amount of gas released if the state is optimal
+ var/gas_amount = 250
+
+/obj/item/grenade/gas_crystal/proto_nitrate_crystal
+ name = "Proto Nitrate crystal"
+ desc = "A crystal made from the Proto Nitrate gas, you can see the liquid gases inside."
+ icon_state = "proto_nitrate_crystal"
+ ///Range of the grenade air refilling
+ var/refill_range = 5
+ ///Amount of Nitrogen gas released (close to the grenade)
+ var/n2_gas_amount = 400
+ ///Amount of Oxygen gas released (close to the grenade)
+ var/o2_gas_amount = 100
+
+/obj/item/grenade/gas_crystal/cyrion_b_crystal
+ name = "Cyrion B crystal"
+ desc = "A crystal made from the Cyrion B Gas, you can see the liquid plasma inside."
+ icon_state = "cyrion_b_crystal"
+ ex_dev = 1
+ ex_heavy = 2
+ ex_light = 4
+ ex_flame = 2
+
+/obj/item/grenade/gas_crystal/preprime(mob/user, delayoverride, msg = TRUE, volume = 60)
+ var/turf/turf_loc = get_turf(src)
+ log_grenade(user, turf_loc) //Inbuilt admin procs already handle null users
+ if(user)
+ add_fingerprint(user)
+ if(msg)
+ to_chat(user, "You crush the [src]! [capitalize(DisplayTimeText(det_time))]!")
+ if(shrapnel_type && shrapnel_radius)
+ shrapnel_initialized = TRUE
+ AddComponent(/datum/component/pellet_cloud, projectile_type=shrapnel_type, magnitude=shrapnel_radius)
+ active = TRUE
+ icon_state = initial(icon_state) + "_active"
+ playsound(src, 'sound/effects/hit_on_shattered_glass.ogg', volume, TRUE)
+ SEND_SIGNAL(src, COMSIG_GRENADE_ARMED, det_time, delayoverride)
+ addtimer(CALLBACK(src, .proc/prime), isnull(delayoverride)? det_time : delayoverride)
+
+/obj/item/grenade/gas_crystal/healium_crystal/prime(mob/living/lanced_by)
+ . = ..()
+ update_mob()
+ playsound(src, 'sound/effects/spray2.ogg', 100, TRUE)
+ for(var/turf/turf_loc in view(freeze_range, loc))
+ if(!isopenturf(turf_loc))
+ continue
+ var/distance_from_center = max(get_dist(turf_loc, loc), 1)
+ var/turf/open/floor_loc = turf_loc
+ if(floor_loc.air.temperature > 260 && floor_loc.air.temperature < 370)
+ floor_loc.atmos_spawn_air("n2=[(gas_amount - 150) / distance_from_center];TEMP=273")
+ if(floor_loc.air.temperature > 370)
+ floor_loc.atmos_spawn_air("n2=[gas_amount / distance_from_center];TEMP=30")
+ floor_loc.MakeSlippery(TURF_WET_PERMAFROST, (5 / distance_from_center) MINUTES)
+ if(floor_loc.air.gases[/datum/gas/plasma])
+ floor_loc.air.gases[/datum/gas/plasma][MOLES] -= floor_loc.air.gases[/datum/gas/plasma][MOLES] * 0.5 / distance_from_center
+ floor_loc.air_update_turf()
+ for(var/mob/living/carbon/live_mob in turf_loc)
+ live_mob.adjustStaminaLoss(stamina_damage / distance_from_center)
+ live_mob.adjust_bodytemperature(-150 / distance_from_center)
+ qdel(src)
+
+/obj/item/grenade/gas_crystal/proto_nitrate_crystal/prime(mob/living/lanced_by)
+ . = ..()
+ update_mob()
+ playsound(src, 'sound/effects/spray2.ogg', 100, TRUE)
+ for(var/turf/turf_loc in view(refill_range, loc))
+ if(!isopenturf(turf_loc))
+ continue
+ var/distance_from_center = max(get_dist(turf_loc, loc), 1)
+ var/turf/open/floor_loc = turf_loc
+ floor_loc.atmos_spawn_air("n2=[n2_gas_amount / distance_from_center];o2=[o2_gas_amount / distance_from_center];TEMP=273")
+ floor_loc.air_update_turf()
+ qdel(src)
+
+/obj/item/grenade/gas_crystal/cyrion_b_crystal/prime(mob/living/lanced_by)
+ . = ..()
+ update_mob()
+ qdel(src)
diff --git a/code/game/objects/items/stacks/sheets/mineral.dm b/code/game/objects/items/stacks/sheets/mineral.dm
index d2fe5cde658..5dd200d0339 100644
--- a/code/game/objects/items/stacks/sheets/mineral.dm
+++ b/code/game/objects/items/stacks/sheets/mineral.dm
@@ -482,6 +482,9 @@ GLOBAL_LIST_INIT(abductor_recipes, list ( \
//Metal Hydrogen
GLOBAL_LIST_INIT(metalhydrogen_recipes, list(
new /datum/stack_recipe("incomplete servant golem shell", /obj/item/golem_shell/servant, req_amount=20, res_amount=1),
+ new /datum/stack_recipe("ancient armor", /obj/item/clothing/suit/armor/elder_atmosian, req_amount = 8, res_amount = 1),
+ new /datum/stack_recipe("ancient helmet", /obj/item/clothing/head/helmet/elder_atmosian, req_amount = 5, res_amount = 1),
+ new /datum/stack_recipe("metallic hydrogen axe", /obj/item/fireaxe/metal_h2_axe, req_amount = 15, res_amount = 1),
))
/obj/item/stack/sheet/mineral/metal_hydrogen
@@ -492,7 +495,7 @@ GLOBAL_LIST_INIT(metalhydrogen_recipes, list(
w_class = WEIGHT_CLASS_NORMAL
resistance_flags = FIRE_PROOF | LAVA_PROOF | ACID_PROOF | INDESTRUCTIBLE
point_value = 100
- custom_materials = list(/datum/material/metalhydrogen=MINERAL_MATERIAL_AMOUNT)
+ custom_materials = list(/datum/material/metalhydrogen = MINERAL_MATERIAL_AMOUNT)
merge_type = /obj/item/stack/sheet/mineral/metal_hydrogen
/obj/item/stack/sheet/mineral/metal_hydrogen/get_main_recipes()
diff --git a/code/game/objects/structures/statues.dm b/code/game/objects/structures/statues.dm
index edcf6df50e0..c6fc5e767f6 100644
--- a/code/game/objects/structures/statues.dm
+++ b/code/game/objects/structures/statues.dm
@@ -300,3 +300,13 @@
desc = "A bust depicting a certain 19th century economist. You get the feeling a specter is haunting the station."
icon_state = "marx"
art_type = /datum/component/art/rev
+
+///////////Elder Atmosian///////////////////////////////////////////
+
+/obj/structure/statue/elder_atmosian
+ name = "Elder Atmosian"
+ desc = "A statue of an Elder Atmosian, capable of bending the laws of thermodynamics to their will"
+ icon_state = "eng"
+ material_drop_type = /obj/item/stack/sheet/mineral/metal_hydrogen
+ max_integrity = 1000
+ impressiveness = 100
diff --git a/code/game/turfs/open/_open.dm b/code/game/turfs/open/_open.dm
index f80c206dc8a..12db5391b59 100644
--- a/code/game/turfs/open/_open.dm
+++ b/code/game/turfs/open/_open.dm
@@ -264,9 +264,18 @@
/turf/open/rad_act(pulse_strength)
. = ..()
if (air.gases[/datum/gas/carbon_dioxide] && air.gases[/datum/gas/oxygen])
- pulse_strength = min(pulse_strength,air.gases[/datum/gas/carbon_dioxide][MOLES]*1000,air.gases[/datum/gas/oxygen][MOLES]*2000) //Ensures matter is conserved properly
- air.gases[/datum/gas/carbon_dioxide][MOLES]=max(air.gases[/datum/gas/carbon_dioxide][MOLES]-(pulse_strength/1000),0)
- air.gases[/datum/gas/oxygen][MOLES]=max(air.gases[/datum/gas/oxygen][MOLES]-(pulse_strength/2000),0)
+ pulse_strength = min(pulse_strength, air.gases[/datum/gas/carbon_dioxide][MOLES] * 1000, air.gases[/datum/gas/oxygen][MOLES] * 2000) //Ensures matter is conserved properly
+ air.gases[/datum/gas/carbon_dioxide][MOLES] = max(air.gases[/datum/gas/carbon_dioxide][MOLES] - (pulse_strength * 0.001),0)
+ air.gases[/datum/gas/oxygen][MOLES] = max(air.gases[/datum/gas/oxygen][MOLES]-(pulse_strength * 0.002),0)
air.assert_gas(/datum/gas/pluoxium)
- air.gases[/datum/gas/pluoxium][MOLES]+=(pulse_strength/4000)
+ air.gases[/datum/gas/pluoxium][MOLES] +=(pulse_strength * 0.004)
air.garbage_collect()
+ air_update_turf()
+ if (air.gases[/datum/gas/hydrogen])
+ pulse_strength = min(pulse_strength, air.gases[/datum/gas/hydrogen][MOLES] * 1000)
+ air.gases[/datum/gas/hydrogen][MOLES] = max(air.gases[/datum/gas/hydrogen][MOLES] - (pulse_strength * 0.001), 0)
+ air.assert_gas(/datum/gas/tritium)
+ air.gases[/datum/gas/tritium][MOLES] += (pulse_strength * 0.001)
+ air.garbage_collect()
+ air_update_turf()
+
diff --git a/code/modules/atmospherics/gasmixtures/gas_mixture.dm b/code/modules/atmospherics/gasmixtures/gas_mixture.dm
index 9f5a5122c9a..20fb522d66e 100644
--- a/code/modules/atmospherics/gasmixtures/gas_mixture.dm
+++ b/code/modules/atmospherics/gasmixtures/gas_mixture.dm
@@ -448,12 +448,14 @@ GLOBAL_LIST_INIT(gaslist_cache, init_gaslist_cache())
var/datum/gas_reaction/reaction = r
var/list/min_reqs = reaction.min_requirements
- if((min_reqs["TEMP"] && temp < min_reqs["TEMP"]) \
- || (min_reqs["ENER"] && ener < min_reqs["ENER"]))
+ if( (min_reqs["TEMP"] && temp < min_reqs["TEMP"]) || \
+ (min_reqs["ENER"] && ener < min_reqs["ENER"]) || \
+ (min_reqs["MAX_TEMP"] && temp > min_reqs["MAX_TEMP"])
+ )
continue
for(var/id in min_reqs)
- if (id == "TEMP" || id == "ENER")
+ if (id == "TEMP" || id == "ENER" || id == "MAX_TEMP")
continue
if(!cached_gases[id] || cached_gases[id][MOLES] < min_reqs[id])
continue reaction_loop
diff --git a/code/modules/atmospherics/gasmixtures/gas_types.dm b/code/modules/atmospherics/gasmixtures/gas_types.dm
index 1aae4814e8b..a700007ad73 100644
--- a/code/modules/atmospherics/gasmixtures/gas_types.dm
+++ b/code/modules/atmospherics/gasmixtures/gas_types.dm
@@ -170,6 +170,51 @@ GLOBAL_LIST_INIT(nonreactive_gases, typecacheof(list(/datum/gas/oxygen, /datum/g
dangerous = TRUE
rarity = 700
+/datum/gas/healium
+ id = "healium"
+ specific_heat = 10
+ name = "Healium"
+ dangerous = TRUE
+ gas_overlay = "healium"
+ moles_visible = MOLES_GAS_VISIBLE
+ rarity = 100
+
+/datum/gas/proto_nitrate
+ id = "proto_nitrate"
+ specific_heat = 30
+ name = "Proto Nitrate"
+ dangerous = TRUE
+ gas_overlay = "proto_nitrate"
+ moles_visible = MOLES_GAS_VISIBLE
+ rarity = 100
+
+/datum/gas/cyrion_b
+ id = "cyrion_b"
+ specific_heat = 350
+ name = "Cyrion B"
+ dangerous = TRUE
+ gas_overlay = "cyrion_b"
+ moles_visible = MOLES_GAS_VISIBLE
+ rarity = 100
+
+/datum/gas/halon
+ id = "halon"
+ specific_heat = 175
+ name = "Halon"
+ dangerous = TRUE
+ gas_overlay = "halon"
+ moles_visible = MOLES_GAS_VISIBLE
+ rarity = 100
+
+/datum/gas/hexane
+ id = "hexane"
+ specific_heat = 5
+ name = "Hexane"
+ dangerous = TRUE
+ gas_overlay = "hexane"
+ moles_visible = MOLES_GAS_VISIBLE
+ rarity = 100
+
/obj/effect/overlay/gas
icon = 'icons/effects/atmospherics.dmi'
mouse_opacity = MOUSE_OPACITY_TRANSPARENT
diff --git a/code/modules/atmospherics/gasmixtures/reactions.dm b/code/modules/atmospherics/gasmixtures/reactions.dm
index f4cf36121e2..e6e1b3c1801 100644
--- a/code/modules/atmospherics/gasmixtures/reactions.dm
+++ b/code/modules/atmospherics/gasmixtures/reactions.dm
@@ -1,13 +1,14 @@
//All defines used in reactions are located in ..\__DEFINES\reactions.dm
-/*priority so far, check this list to see what are the numbers used. please use a different priority if the reaction doesn't work (higher number are done first)
+/*priority so far, check this list to see what are the numbers used. Please use a different priority for each reaction(higher number are done first)
miaster = -10 (this should always be under all other fires)
-freonfire = -4
-plasmafire = -3
-h2fire = -2
-tritfire = -1
+freonfire = -5
+plasmafire = -4
+h2fire = -3
+tritfire = -2
+halon_o2removal = -1
nitrous_decomp = 0
water_vapor = 1
-fusion = 2
+pluox_formation = 2
nitrylformation = 3
bzformation = 4
freonformation = 5
@@ -15,6 +16,20 @@ stimformation = 5
nobiliumformation = 6
stimball = 7
ammoniacrystals = 8
+hexane_plasma_filtering = 9
+hexane_n2o_filtering = 10
+cyrion_b_decomp = 11
+healium_production = 12
+proto_nitrate_production = 13
+cyrion_b_production = 14
+halon_formation = 15
+hexane_formation = 16
+healium_crystal_production = 17
+proto_nitrate_crystal_production = 18
+cyrion_b_crystal_production = 19
+proto_nitrate_response = 20 - 25
+fusion = 26
+metallic_hydrogen = 27
nobiliumsuppression = INFINITY
*/
@@ -108,26 +123,28 @@ nobiliumsuppression = INFINITY
var/burned_fuel = 0
- burned_fuel = max(0,0.00002*(temperature-(0.00001*(temperature**2))))*cached_gases[/datum/gas/nitrous_oxide][MOLES]
+ burned_fuel = max(0,0.00002 * (temperature - (0.00001 * (temperature**2)))) * cached_gases[/datum/gas/nitrous_oxide][MOLES]
+ if(cached_gases[/datum/gas/nitrous_oxide][MOLES] - burned_fuel < 0)
+ return NO_REACTION
cached_gases[/datum/gas/nitrous_oxide][MOLES] -= burned_fuel
if(burned_fuel)
energy_released += (N2O_DECOMPOSITION_ENERGY_RELEASED * burned_fuel)
ASSERT_GAS(/datum/gas/oxygen, air)
- cached_gases[/datum/gas/oxygen][MOLES] += burned_fuel/2
+ cached_gases[/datum/gas/oxygen][MOLES] += burned_fuel * 0.5
ASSERT_GAS(/datum/gas/nitrogen, air)
cached_gases[/datum/gas/nitrogen][MOLES] += burned_fuel
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = (temperature*old_heat_capacity + energy_released)/new_heat_capacity
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
return REACTING
return NO_REACTION
//tritium combustion: combustion of oxygen and tritium (treated as hydrocarbons). creates hotspots. exothermic
/datum/gas_reaction/tritfire
- priority = -1 //fire should ALWAYS be last, but tritium fires happen before plasma fires
+ priority = -2 //fire should ALWAYS be last, but tritium fires happen before plasma fires
name = "Tritium Combustion"
id = "tritfire"
@@ -148,27 +165,27 @@ nobiliumsuppression = INFINITY
var/turf/open/location = isturf(holder) ? holder : null
var/burned_fuel = 0
if(cached_gases[/datum/gas/oxygen][MOLES] < cached_gases[/datum/gas/tritium][MOLES] || MINIMUM_TRIT_OXYBURN_ENERGY > air.thermal_energy())
- burned_fuel = cached_gases[/datum/gas/oxygen][MOLES]/TRITIUM_BURN_OXY_FACTOR
+ burned_fuel = cached_gases[/datum/gas/oxygen][MOLES] / TRITIUM_BURN_OXY_FACTOR
cached_gases[/datum/gas/tritium][MOLES] -= burned_fuel
else
- burned_fuel = cached_gases[/datum/gas/tritium][MOLES]*TRITIUM_BURN_TRIT_FACTOR
- cached_gases[/datum/gas/tritium][MOLES] -= cached_gases[/datum/gas/tritium][MOLES]/TRITIUM_BURN_TRIT_FACTOR
+ burned_fuel = cached_gases[/datum/gas/tritium][MOLES] * TRITIUM_BURN_TRIT_FACTOR
+ cached_gases[/datum/gas/tritium][MOLES] -= cached_gases[/datum/gas/tritium][MOLES] / TRITIUM_BURN_TRIT_FACTOR
cached_gases[/datum/gas/oxygen][MOLES] -= cached_gases[/datum/gas/tritium][MOLES]
if(burned_fuel)
energy_released += (FIRE_HYDROGEN_ENERGY_RELEASED * burned_fuel)
if(location && prob(10) && burned_fuel > TRITIUM_MINIMUM_RADIATION_ENERGY) //woah there let's not crash the server
- radiation_pulse(location, energy_released/TRITIUM_BURN_RADIOACTIVITY_FACTOR)
+ radiation_pulse(location, energy_released / TRITIUM_BURN_RADIOACTIVITY_FACTOR)
ASSERT_GAS(/datum/gas/water_vapor, air) //oxygen+more-or-less hydrogen=H2O
- cached_gases[/datum/gas/water_vapor][MOLES] += burned_fuel/TRITIUM_BURN_OXY_FACTOR
+ cached_gases[/datum/gas/water_vapor][MOLES] += burned_fuel / TRITIUM_BURN_OXY_FACTOR
cached_results["fire"] += burned_fuel
if(energy_released > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = (temperature*old_heat_capacity + energy_released)/new_heat_capacity
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
//let the floor know a fire is happening
if(istype(location))
@@ -184,7 +201,7 @@ nobiliumsuppression = INFINITY
//plasma combustion: combustion of oxygen and plasma (treated as hydrocarbons). creates hotspots. exothermic
/datum/gas_reaction/plasmafire
- priority = -3 //fire should ALWAYS be last, but plasma fires happen after tritium fires
+ priority = -4 //fire should ALWAYS be last, but plasma fires happen after tritium fires
name = "Plasma Combustion"
id = "plasmafire"
@@ -215,22 +232,22 @@ nobiliumsuppression = INFINITY
if(temperature > PLASMA_UPPER_TEMPERATURE)
temperature_scale = 1
else
- temperature_scale = (temperature-PLASMA_MINIMUM_BURN_TEMPERATURE)/(PLASMA_UPPER_TEMPERATURE-PLASMA_MINIMUM_BURN_TEMPERATURE)
+ temperature_scale = (temperature - PLASMA_MINIMUM_BURN_TEMPERATURE) / (PLASMA_UPPER_TEMPERATURE-PLASMA_MINIMUM_BURN_TEMPERATURE)
if(temperature_scale > 0)
oxygen_burn_rate = OXYGEN_BURN_RATE_BASE - temperature_scale
if(cached_gases[/datum/gas/oxygen][MOLES] / cached_gases[/datum/gas/plasma][MOLES] > SUPER_SATURATION_THRESHOLD) //supersaturation. Form Tritium.
super_saturation = TRUE
- if(cached_gases[/datum/gas/oxygen][MOLES] > cached_gases[/datum/gas/plasma][MOLES]*PLASMA_OXYGEN_FULLBURN)
- plasma_burn_rate = (cached_gases[/datum/gas/plasma][MOLES]*temperature_scale)/PLASMA_BURN_RATE_DELTA
+ if(cached_gases[/datum/gas/oxygen][MOLES] > cached_gases[/datum/gas/plasma][MOLES] * PLASMA_OXYGEN_FULLBURN)
+ plasma_burn_rate = (cached_gases[/datum/gas/plasma][MOLES] * temperature_scale) / PLASMA_BURN_RATE_DELTA
else
- plasma_burn_rate = (temperature_scale*(cached_gases[/datum/gas/oxygen][MOLES]/PLASMA_OXYGEN_FULLBURN))/PLASMA_BURN_RATE_DELTA
+ plasma_burn_rate = (temperature_scale * (cached_gases[/datum/gas/oxygen][MOLES] / PLASMA_OXYGEN_FULLBURN)) / PLASMA_BURN_RATE_DELTA
if(plasma_burn_rate > MINIMUM_HEAT_CAPACITY)
- plasma_burn_rate = min(plasma_burn_rate,cached_gases[/datum/gas/plasma][MOLES],cached_gases[/datum/gas/oxygen][MOLES]/oxygen_burn_rate) //Ensures matter is conserved properly
+ plasma_burn_rate = min(plasma_burn_rate, cached_gases[/datum/gas/plasma][MOLES], cached_gases[/datum/gas/oxygen][MOLES]/oxygen_burn_rate) //Ensures matter is conserved properly
cached_gases[/datum/gas/plasma][MOLES] = QUANTIZE(cached_gases[/datum/gas/plasma][MOLES] - plasma_burn_rate)
cached_gases[/datum/gas/oxygen][MOLES] = QUANTIZE(cached_gases[/datum/gas/oxygen][MOLES] - (plasma_burn_rate * oxygen_burn_rate))
if (super_saturation)
- ASSERT_GAS(/datum/gas/tritium,air)
+ ASSERT_GAS(/datum/gas/tritium, air)
cached_gases[/datum/gas/tritium][MOLES] += plasma_burn_rate
else
ASSERT_GAS(/datum/gas/carbon_dioxide,air)
@@ -240,7 +257,7 @@ nobiliumsuppression = INFINITY
energy_released += FIRE_PLASMA_ENERGY_RELEASED * (plasma_burn_rate)
- cached_results["fire"] += (plasma_burn_rate)*(1+oxygen_burn_rate)
+ cached_results["fire"] += (plasma_burn_rate) * (1 + oxygen_burn_rate)
if(energy_released > 0)
var/new_heat_capacity = air.heat_capacity()
@@ -261,14 +278,16 @@ nobiliumsuppression = INFINITY
//freon reaction (is not a fire yet)
/datum/gas_reaction/freonfire
- priority = -4
+ priority = -5
name = "Freon combustion"
id = "freonfire"
/datum/gas_reaction/freonfire/init_reqs()
min_requirements = list(
/datum/gas/oxygen = MINIMUM_MOLE_COUNT,
- /datum/gas/freon = MINIMUM_MOLE_COUNT
+ /datum/gas/freon = MINIMUM_MOLE_COUNT,
+ "TEMP" = FREON_LOWER_TEMPERATURE,
+ "MAX_TEMP" = FREON_MAXIMUM_BURN_TEMPERATURE
)
/datum/gas_reaction/freonfire/react(datum/gas_mixture/air, datum/holder)
@@ -276,7 +295,9 @@ nobiliumsuppression = INFINITY
var/old_heat_capacity = air.heat_capacity()
var/list/cached_gases = air.gases //this speeds things up because accessing datum vars is slow
var/temperature = air.temperature
- var/turf/open/location = isturf(holder) ? holder : null
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
//Handle freon burning (only reaction now)
var/freon_burn_rate = 0
@@ -287,19 +308,19 @@ nobiliumsuppression = INFINITY
if(temperature < FREON_LOWER_TEMPERATURE) //stop the reaction when too cold
temperature_scale = 0
else
- temperature_scale = (FREON_MAXIMUM_BURN_TEMPERATURE - temperature)/(FREON_MAXIMUM_BURN_TEMPERATURE - FREON_LOWER_TEMPERATURE) //calculate the scale based on the temperature
+ temperature_scale = (FREON_MAXIMUM_BURN_TEMPERATURE - temperature) / (FREON_MAXIMUM_BURN_TEMPERATURE - FREON_LOWER_TEMPERATURE) //calculate the scale based on the temperature
if(temperature_scale >= 0)
oxygen_burn_rate = OXYGEN_BURN_RATE_BASE - temperature_scale
- if(cached_gases[/datum/gas/oxygen][MOLES] > cached_gases[/datum/gas/freon][MOLES]*FREON_OXYGEN_FULLBURN)
- freon_burn_rate = (cached_gases[/datum/gas/freon][MOLES]*temperature_scale)/FREON_BURN_RATE_DELTA
+ if(cached_gases[/datum/gas/oxygen][MOLES] > cached_gases[/datum/gas/freon][MOLES] * FREON_OXYGEN_FULLBURN)
+ freon_burn_rate = (cached_gases[/datum/gas/freon][MOLES] * temperature_scale) / FREON_BURN_RATE_DELTA
else
- freon_burn_rate = (temperature_scale*(cached_gases[/datum/gas/oxygen][MOLES]/FREON_OXYGEN_FULLBURN))/FREON_BURN_RATE_DELTA
+ freon_burn_rate = (temperature_scale * (cached_gases[/datum/gas/oxygen][MOLES] / FREON_OXYGEN_FULLBURN)) / FREON_BURN_RATE_DELTA
if(freon_burn_rate > MINIMUM_HEAT_CAPACITY)
- freon_burn_rate = min(freon_burn_rate,cached_gases[/datum/gas/freon][MOLES],cached_gases[/datum/gas/oxygen][MOLES]/oxygen_burn_rate) //Ensures matter is conserved properly
+ freon_burn_rate = min(freon_burn_rate, cached_gases[/datum/gas/freon][MOLES], cached_gases[/datum/gas/oxygen][MOLES] / oxygen_burn_rate) //Ensures matter is conserved properly
cached_gases[/datum/gas/freon][MOLES] = QUANTIZE(cached_gases[/datum/gas/freon][MOLES] - freon_burn_rate)
cached_gases[/datum/gas/oxygen][MOLES] = QUANTIZE(cached_gases[/datum/gas/oxygen][MOLES] - (freon_burn_rate * oxygen_burn_rate))
- ASSERT_GAS(/datum/gas/carbon_dioxide,air)
+ ASSERT_GAS(/datum/gas/carbon_dioxide, air)
cached_gases[/datum/gas/carbon_dioxide][MOLES] += freon_burn_rate
if(temperature < 160 && temperature > 120 && prob(2))
@@ -310,10 +331,10 @@ nobiliumsuppression = INFINITY
if(energy_released < 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = (temperature*old_heat_capacity + energy_released)/new_heat_capacity
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
/datum/gas_reaction/h2fire
- priority = -2 //fire should ALWAYS be last, but tritium fires happen before plasma fires
+ priority = -3 //fire should ALWAYS be last, but tritium fires happen before plasma fires
name = "Hydrogen Combustion"
id = "h2fire"
@@ -337,22 +358,22 @@ nobiliumsuppression = INFINITY
burned_fuel = cached_gases[/datum/gas/oxygen][MOLES]/HYDROGEN_BURN_OXY_FACTOR
cached_gases[/datum/gas/hydrogen][MOLES] -= burned_fuel
else
- burned_fuel = cached_gases[/datum/gas/hydrogen][MOLES]*HYDROGEN_BURN_H2_FACTOR
- cached_gases[/datum/gas/hydrogen][MOLES] -= cached_gases[/datum/gas/hydrogen][MOLES]/HYDROGEN_BURN_H2_FACTOR
+ burned_fuel = cached_gases[/datum/gas/hydrogen][MOLES] * HYDROGEN_BURN_H2_FACTOR
+ cached_gases[/datum/gas/hydrogen][MOLES] -= cached_gases[/datum/gas/hydrogen][MOLES] / HYDROGEN_BURN_H2_FACTOR
cached_gases[/datum/gas/oxygen][MOLES] -= cached_gases[/datum/gas/hydrogen][MOLES]
if(burned_fuel)
energy_released += (FIRE_HYDROGEN_ENERGY_RELEASED * burned_fuel)
ASSERT_GAS(/datum/gas/water_vapor, air) //oxygen+more-or-less hydrogen=H2O
- cached_gases[/datum/gas/water_vapor][MOLES] += burned_fuel/HYDROGEN_BURN_OXY_FACTOR
+ cached_gases[/datum/gas/water_vapor][MOLES] += burned_fuel / HYDROGEN_BURN_OXY_FACTOR
cached_results["fire"] += burned_fuel
if(energy_released > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = (temperature*old_heat_capacity + energy_released)/new_heat_capacity
+ air.temperature = (temperature*old_heat_capacity + energy_released) / new_heat_capacity
//let the floor know a fire is happening
if(istype(location))
@@ -374,7 +395,9 @@ nobiliumsuppression = INFINITY
/datum/gas_reaction/ammoniacrystals/init_reqs()
min_requirements = list(
/datum/gas/hydrogen = MINIMUM_MOLE_COUNT,
- /datum/gas/nitrogen = MINIMUM_MOLE_COUNT
+ /datum/gas/nitrogen = MINIMUM_MOLE_COUNT,
+ "TEMP" = 150,
+ "MAX_TEMP" = 273
)
/datum/gas_reaction/ammoniacrystals/react(datum/gas_mixture/air, datum/holder)
@@ -382,10 +405,14 @@ nobiliumsuppression = INFINITY
var/old_heat_capacity = air.heat_capacity()
var/list/cached_gases = air.gases
var/temperature = air.temperature
- var/turf/open/location = isturf(holder) ? holder : null
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
var/consumed_fuel = 0
- if(temperature > 150 && temperature < T0C && cached_gases[/datum/gas/nitrogen][MOLES] > cached_gases[/datum/gas/hydrogen][MOLES])
+ if(cached_gases[/datum/gas/nitrogen][MOLES] > cached_gases[/datum/gas/hydrogen][MOLES])
consumed_fuel = (cached_gases[/datum/gas/hydrogen][MOLES] / AMMONIA_FORMATION_FACTOR)
+ if(cached_gases[/datum/gas/nitrogen][MOLES] - consumed_fuel < 0 || cached_gases[/datum/gas/hydrogen][MOLES] - consumed_fuel * 4 < 0)
+ return NO_REACTION
cached_gases[/datum/gas/nitrogen][MOLES] -= consumed_fuel
cached_gases[/datum/gas/hydrogen][MOLES] -= consumed_fuel * 4
if(prob(30 * consumed_fuel))
@@ -394,7 +421,7 @@ nobiliumsuppression = INFINITY
if(energy_released > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = (temperature*old_heat_capacity + energy_released)/new_heat_capacity
+ air.temperature = (temperature * old_heat_capacity + energy_released)/new_heat_capacity
//fusion: a terrible idea that was fun but broken. Now reworked to be less broken and more interesting. Again (and again, and again). Again!
//Fusion Rework Counter: Please increment this if you make a major overhaul to this system again.
@@ -402,7 +429,7 @@ nobiliumsuppression = INFINITY
/datum/gas_reaction/fusion
exclude = FALSE
- priority = 2
+ priority = 26
name = "Plasmic Fusion"
id = "fusion"
@@ -429,28 +456,28 @@ nobiliumsuppression = INFINITY
var/initial_plasma = cached_gases[/datum/gas/plasma][MOLES]
var/initial_hydrogen = cached_gases[/datum/gas/hydrogen][MOLES]
var/scale_factor = (air.volume)/(PI) //We scale it down by volume/Pi because for fusion conditions, moles roughly = 2*volume, but we want it to be based off something constant between reactions.
- var/toroidal_size = (2*PI)+TORADIANS(arctan((air.volume-TOROID_VOLUME_BREAKEVEN)/TOROID_VOLUME_BREAKEVEN)) //The size of the phase space hypertorus
+ var/toroidal_size = (2 * PI) //The size of the phase space hypertorus
var/gas_power = 0
for (var/gas_id in cached_gases)
- gas_power += (cached_gases[gas_id][GAS_META][META_GAS_FUSION_POWER]*cached_gases[gas_id][MOLES])
- var/instability = MODULUS((gas_power*INSTABILITY_GAS_POWER_FACTOR)**2,toroidal_size) //Instability effects how chaotic the behavior of the reaction is
+ gas_power += (cached_gases[gas_id][GAS_META][META_GAS_FUSION_POWER] * cached_gases[gas_id][MOLES])
+ var/instability = MODULUS((gas_power * INSTABILITY_GAS_POWER_FACTOR)**2, toroidal_size) //Instability effects how chaotic the behavior of the reaction is
cached_scan_results[id] = instability//used for analyzer feedback
var/plasma = (initial_plasma-FUSION_MOLE_THRESHOLD)/(scale_factor) //We have to scale the amounts of hydrogen and plasma down a significant amount in order to show the chaotic dynamics we want
var/hydrogen = (initial_hydrogen-FUSION_MOLE_THRESHOLD)/(scale_factor) //We also subtract out the threshold amount to make it harder for fusion to burn itself out.
//The reaction is a specific form of the Kicked Rotator system, which displays chaotic behavior and can be used to model particle interactions.
- plasma = MODULUS(plasma - (instability*sin(TODEGREES(hydrogen))), toroidal_size)
+ plasma = MODULUS(plasma - (instability * sin(TODEGREES(hydrogen))), toroidal_size)
hydrogen = MODULUS(hydrogen - plasma, toroidal_size)
- cached_gases[/datum/gas/plasma][MOLES] = plasma*scale_factor + FUSION_MOLE_THRESHOLD //Scales the gases back up
- cached_gases[/datum/gas/hydrogen][MOLES] = hydrogen*scale_factor + FUSION_MOLE_THRESHOLD
+ cached_gases[/datum/gas/plasma][MOLES] = plasma * scale_factor + FUSION_MOLE_THRESHOLD //Scales the gases back up
+ cached_gases[/datum/gas/hydrogen][MOLES] = hydrogen * scale_factor + FUSION_MOLE_THRESHOLD
var/delta_plasma = initial_plasma - cached_gases[/datum/gas/plasma][MOLES]
- reaction_energy += delta_plasma*PLASMA_BINDING_ENERGY //Energy is gained or lost corresponding to the creation or destruction of mass.
+ reaction_energy += delta_plasma * PLASMA_BINDING_ENERGY //Energy is gained or lost corresponding to the creation or destruction of mass.
if(instability < FUSION_INSTABILITY_ENDOTHERMALITY)
- reaction_energy = max(reaction_energy,0) //Stable reactions don't end up endothermic.
+ reaction_energy = max(reaction_energy, 0) //Stable reactions don't end up endothermic.
else if (reaction_energy < 0)
reaction_energy *= (instability-FUSION_INSTABILITY_ENDOTHERMALITY)**0.5
@@ -461,24 +488,24 @@ nobiliumsuppression = INFINITY
cached_gases[/datum/gas/tritium][MOLES] -= FUSION_TRITIUM_MOLES_USED
//The decay of the tritium and the reaction's energy produces waste gases, different ones depending on whether the reaction is endo or exothermic
if(reaction_energy > 0)
- air.assert_gases(/datum/gas/carbon_dioxide,/datum/gas/water_vapor)
- cached_gases[/datum/gas/carbon_dioxide][MOLES] += FUSION_TRITIUM_MOLES_USED*(reaction_energy*FUSION_TRITIUM_CONVERSION_COEFFICIENT)
- cached_gases[/datum/gas/water_vapor][MOLES] += (FUSION_TRITIUM_MOLES_USED*(reaction_energy*FUSION_TRITIUM_CONVERSION_COEFFICIENT)) * 0.25
+ air.assert_gases(/datum/gas/carbon_dioxide, /datum/gas/water_vapor)
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] += FUSION_TRITIUM_MOLES_USED * (reaction_energy * FUSION_TRITIUM_CONVERSION_COEFFICIENT)
+ cached_gases[/datum/gas/water_vapor][MOLES] += (FUSION_TRITIUM_MOLES_USED * (reaction_energy * FUSION_TRITIUM_CONVERSION_COEFFICIENT)) * 0.25
else
air.assert_gases(/datum/gas/carbon_dioxide)
- cached_gases[/datum/gas/carbon_dioxide][MOLES] += FUSION_TRITIUM_MOLES_USED*(reaction_energy*-FUSION_TRITIUM_CONVERSION_COEFFICIENT)
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] += FUSION_TRITIUM_MOLES_USED * (reaction_energy * -FUSION_TRITIUM_CONVERSION_COEFFICIENT)
if(reaction_energy)
if(location)
- var/particle_chance = ((PARTICLE_CHANCE_CONSTANT)/(reaction_energy-PARTICLE_CHANCE_CONSTANT)) + 1//Asymptopically approaches 100% as the energy of the reaction goes up.
+ var/particle_chance = ((PARTICLE_CHANCE_CONSTANT) / (reaction_energy - PARTICLE_CHANCE_CONSTANT)) + 1//Asymptopically approaches 100% as the energy of the reaction goes up.
if(prob(PERCENT(particle_chance)))
location.fire_nuclear_particle()
- var/rad_power = max((FUSION_RAD_COEFFICIENT/instability) + FUSION_RAD_MAX,0)
+ var/rad_power = max((FUSION_RAD_COEFFICIENT / instability) + FUSION_RAD_MAX, 0)
radiation_pulse(location,rad_power)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY && (air.temperature <= FUSION_MAXIMUM_TEMPERATURE || reaction_energy <= 0)) //If above FUSION_MAXIMUM_TEMPERATURE, will only adjust temperature for endothermic reactions.
- air.temperature = clamp(((air.temperature*old_heat_capacity + reaction_energy)/new_heat_capacity),TCMB,INFINITY)
+ air.temperature = clamp(((air.temperature * old_heat_capacity + reaction_energy) / new_heat_capacity), TCMB, INFINITY)
return REACTING
/datum/gas_reaction/nitrousformation //formationn of n2o, esothermic, requires bz as catalyst
@@ -491,7 +518,8 @@ nobiliumsuppression = INFINITY
/datum/gas/oxygen = 10,
/datum/gas/nitrogen = 20,
/datum/gas/bz = 5,
- "TEMP" = 200
+ "TEMP" = 200,
+ "MAX_TEMP" = 250
)
/datum/gas_reaction/nitrousformation/react(datum/gas_mixture/air)
@@ -500,10 +528,8 @@ nobiliumsuppression = INFINITY
var/old_heat_capacity = air.heat_capacity()
var/heat_efficency = min(cached_gases[/datum/gas/oxygen][MOLES], cached_gases[/datum/gas/nitrogen][MOLES])
var/energy_used = heat_efficency * NITROUS_FORMATION_ENERGY
- ASSERT_GAS(/datum/gas/nitrous_oxide,air)
- if ((cached_gases[/datum/gas/oxygen][MOLES] - heat_efficency < 0 ) || (cached_gases[/datum/gas/nitrogen][MOLES] - heat_efficency < 0)) //Shouldn't produce gas from nothing.
- return NO_REACTION
- if (temperature > 250) //maximum allowed temperature for the reaction
+ ASSERT_GAS(/datum/gas/nitrous_oxide, air)
+ if ((cached_gases[/datum/gas/oxygen][MOLES] - heat_efficency < 0 ) || (cached_gases[/datum/gas/nitrogen][MOLES] - heat_efficency * 2 < 0)) //Shouldn't produce gas from nothing.
return NO_REACTION
cached_gases[/datum/gas/oxygen][MOLES] -= heat_efficency
cached_gases[/datum/gas/nitrogen][MOLES] -= heat_efficency * 2
@@ -512,7 +538,7 @@ nobiliumsuppression = INFINITY
if(energy_used > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((temperature * old_heat_capacity + energy_used) / new_heat_capacity),TCMB) //the air heats up when reacting
+ air.temperature = max(((temperature * old_heat_capacity + energy_used) / new_heat_capacity), TCMB) //the air heats up when reacting
return REACTING
/datum/gas_reaction/nitrylformation //The formation of nitryl. Endothermic. Requires bz.
@@ -523,9 +549,10 @@ nobiliumsuppression = INFINITY
/datum/gas_reaction/nitrylformation/init_reqs()
min_requirements = list(
/datum/gas/oxygen = 10,
- /datum/gas/nitrogen = 20,
+ /datum/gas/nitrogen = 10,
/datum/gas/bz = 5,
- "TEMP" = FIRE_MINIMUM_TEMPERATURE_TO_EXIST * 60
+ "TEMP" = 1500,
+ "MAX_TEMP" = 10000
)
/datum/gas_reaction/nitrylformation/react(datum/gas_mixture/air)
@@ -533,12 +560,12 @@ nobiliumsuppression = INFINITY
var/temperature = air.temperature
var/old_heat_capacity = air.heat_capacity()
- var/heat_efficency = min(temperature/(FIRE_MINIMUM_TEMPERATURE_TO_EXIST * 100),cached_gases[/datum/gas/oxygen][MOLES],cached_gases[/datum/gas/nitrogen][MOLES])
+ var/heat_efficency = min(temperature / (FIRE_MINIMUM_TEMPERATURE_TO_EXIST * 8), cached_gases[/datum/gas/oxygen][MOLES], cached_gases[/datum/gas/nitrogen][MOLES])
var/energy_used = heat_efficency * NITRYL_FORMATION_ENERGY
- ASSERT_GAS(/datum/gas/nitryl,air)
- if ((cached_gases[/datum/gas/oxygen][MOLES] - heat_efficency < 0 ) || (cached_gases[/datum/gas/nitrogen][MOLES] - heat_efficency < 0) || (cached_gases[/datum/gas/bz][MOLES] - heat_efficency < 0)) //Shouldn't produce gas from nothing.
+ ASSERT_GAS(/datum/gas/nitryl, air)
+ if ((cached_gases[/datum/gas/oxygen][MOLES] - heat_efficency < 0 ) || (cached_gases[/datum/gas/nitrogen][MOLES] - heat_efficency < 0) || (cached_gases[/datum/gas/bz][MOLES] - heat_efficency * 0.05 < 0)) //Shouldn't produce gas from nothing.
return NO_REACTION
- cached_gases[/datum/gas/oxygen][MOLES] -= heat_efficency * 2
+ cached_gases[/datum/gas/oxygen][MOLES] -= heat_efficency
cached_gases[/datum/gas/nitrogen][MOLES] -= heat_efficency
cached_gases[/datum/gas/bz][MOLES] -= heat_efficency * 0.05 //bz gets consumed to balance the nitryl production and not make it too common and/or easy
cached_gases[/datum/gas/nitryl][MOLES] += heat_efficency
@@ -546,7 +573,7 @@ nobiliumsuppression = INFINITY
if(energy_used > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity),TCMB) //the air cools down when reacting
+ air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity), TCMB) //the air cools down when reacting
return REACTING
/datum/gas_reaction/bzformation //Formation of BZ by combining plasma and tritium at low pressures. Exothermic.
@@ -566,29 +593,29 @@ nobiliumsuppression = INFINITY
var/temperature = air.temperature
var/pressure = air.return_pressure()
var/old_heat_capacity = air.heat_capacity()
- var/reaction_efficency = min(1/((pressure/(0.1*ONE_ATMOSPHERE))*(max(cached_gases[/datum/gas/plasma][MOLES]/cached_gases[/datum/gas/nitrous_oxide][MOLES],1))),cached_gases[/datum/gas/nitrous_oxide][MOLES],cached_gases[/datum/gas/plasma][MOLES]/2)
- var/energy_released = 2*reaction_efficency*FIRE_CARBON_ENERGY_RELEASED
- if ((cached_gases[/datum/gas/nitrous_oxide][MOLES] - reaction_efficency < 0 )|| (cached_gases[/datum/gas/plasma][MOLES] - (2*reaction_efficency) < 0) || energy_released <= 0) //Shouldn't produce gas from nothing.
+ var/reaction_efficency = min(1 / ((pressure / (0.1 * ONE_ATMOSPHERE)) * (max(cached_gases[/datum/gas/plasma][MOLES] / cached_gases[/datum/gas/nitrous_oxide][MOLES], 1))), cached_gases[/datum/gas/nitrous_oxide][MOLES], cached_gases[/datum/gas/plasma][MOLES] * 0.5)
+ var/energy_released = 2 * reaction_efficency * FIRE_CARBON_ENERGY_RELEASED
+ if ((cached_gases[/datum/gas/nitrous_oxide][MOLES] - reaction_efficency < 0 )|| (cached_gases[/datum/gas/plasma][MOLES] - (2 * reaction_efficency) < 0) || energy_released <= 0) //Shouldn't produce gas from nothing.
return NO_REACTION
- ASSERT_GAS(/datum/gas/bz,air)
- cached_gases[/datum/gas/bz][MOLES] += reaction_efficency
+ ASSERT_GAS(/datum/gas/bz, air)
+ cached_gases[/datum/gas/bz][MOLES] += reaction_efficency * 2.5
if(reaction_efficency == cached_gases[/datum/gas/nitrous_oxide][MOLES])
- ASSERT_GAS(/datum/gas/oxygen,air)
- cached_gases[/datum/gas/bz][MOLES] -= min(pressure,1)
- cached_gases[/datum/gas/oxygen][MOLES] += min(pressure,1)
+ ASSERT_GAS(/datum/gas/oxygen, air)
+ cached_gases[/datum/gas/bz][MOLES] -= min(pressure,0.5)
+ cached_gases[/datum/gas/oxygen][MOLES] += min(pressure,0.5)
cached_gases[/datum/gas/nitrous_oxide][MOLES] -= reaction_efficency
- cached_gases[/datum/gas/plasma][MOLES] -= 2*reaction_efficency
+ cached_gases[/datum/gas/plasma][MOLES] -= 2 * reaction_efficency
- SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, min((reaction_efficency**2)*BZ_RESEARCH_SCALE),BZ_RESEARCH_MAX_AMOUNT)
+ SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, min((reaction_efficency**2) * BZ_RESEARCH_SCALE), BZ_RESEARCH_MAX_AMOUNT)
if(energy_released > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((temperature*old_heat_capacity + energy_released)/new_heat_capacity),TCMB)
+ air.temperature = max(((temperature * old_heat_capacity + energy_released) / new_heat_capacity), TCMB)
return REACTING
/datum/gas_reaction/metalhydrogen
- priority = 9
+ priority = 27
name = "Metal Hydrogen formation"
id = "metalhydrogen"
@@ -603,26 +630,28 @@ nobiliumsuppression = INFINITY
var/list/cached_gases = air.gases
var/temperature = air.temperature
var/old_heat_capacity = air.heat_capacity()
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
///the more heat you use the higher is this factor
var/increase_factor = min((temperature / METAL_HYDROGEN_MINIMUM_HEAT), 5)
///the more moles you use and the higher the heat, the higher is the efficiency
var/heat_efficency = cached_gases[/datum/gas/hydrogen][MOLES] * 0.01 * increase_factor
var/pressure = air.return_pressure()
var/energy_used = heat_efficency * METAL_HYDROGEN_FORMATION_ENERGY
- var/turf/open/location = isturf(holder) ? holder : null
if(pressure >= METAL_HYDROGEN_MINIMUM_PRESSURE && temperature >= METAL_HYDROGEN_MINIMUM_HEAT)
cached_gases[/datum/gas/bz][MOLES] -= heat_efficency * 0.01
if (prob(20 * increase_factor))
- cached_gases[/datum/gas/hydrogen][MOLES] -= heat_efficency * 10
- if (prob(50 / increase_factor))
+ cached_gases[/datum/gas/hydrogen][MOLES] -= heat_efficency * 3.5
+ if (prob(100 / increase_factor))
new /obj/item/stack/sheet/mineral/metal_hydrogen(location)
- SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, min((heat_efficency * increase_factor), METAL_HYDROGEN_RESEARCH_MAX_AMOUNT))
+ SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, min((heat_efficency * increase_factor * 0.5), METAL_HYDROGEN_RESEARCH_MAX_AMOUNT))
if(energy_used > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity),TCMB)
+ air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity), TCMB)
return REACTING
/datum/gas_reaction/freonformation
@@ -642,20 +671,20 @@ nobiliumsuppression = INFINITY
var/list/cached_gases = air.gases
var/temperature = air.temperature
var/old_heat_capacity = air.heat_capacity()
- var/heat_efficency = min(temperature/(FIRE_MINIMUM_TEMPERATURE_TO_EXIST * 10), cached_gases[/datum/gas/plasma][MOLES], cached_gases[/datum/gas/carbon_dioxide][MOLES], cached_gases[/datum/gas/bz][MOLES])
+ var/heat_efficency = min(temperature / (FIRE_MINIMUM_TEMPERATURE_TO_EXIST * 10), cached_gases[/datum/gas/plasma][MOLES], cached_gases[/datum/gas/carbon_dioxide][MOLES], cached_gases[/datum/gas/bz][MOLES])
var/energy_used = heat_efficency * 100
- ASSERT_GAS(/datum/gas/freon,air)
- if ((cached_gases[/datum/gas/plasma][MOLES] - heat_efficency < 0 ) || (cached_gases[/datum/gas/carbon_dioxide][MOLES] - heat_efficency < 0) || (cached_gases[/datum/gas/bz][MOLES] - heat_efficency < 0)) //Shouldn't produce gas from nothing.
+ ASSERT_GAS(/datum/gas/freon, air)
+ if ((cached_gases[/datum/gas/plasma][MOLES] - heat_efficency * 1.5 < 0 ) || (cached_gases[/datum/gas/carbon_dioxide][MOLES] - heat_efficency * 0.75 < 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/plasma][MOLES] -= heat_efficency * 5
- cached_gases[/datum/gas/carbon_dioxide][MOLES] -= heat_efficency
+ cached_gases[/datum/gas/plasma][MOLES] -= heat_efficency * 1.5
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] -= heat_efficency * 0.75
cached_gases[/datum/gas/bz][MOLES] -= heat_efficency * 0.25
- cached_gases[/datum/gas/freon][MOLES] += heat_efficency * 2
+ cached_gases[/datum/gas/freon][MOLES] += heat_efficency * 2.5
if(energy_used > 0)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((temperature*old_heat_capacity - energy_used)/new_heat_capacity),TCMB)
+ air.temperature = max(((temperature * old_heat_capacity - energy_used)/new_heat_capacity), TCMB)
return REACTING
/datum/gas_reaction/stimformation //Stimulum formation follows a strange pattern of how effective it will be at a given temperature, having some multiple peaks and some large dropoffs. Exo and endo thermic.
@@ -666,10 +695,9 @@ nobiliumsuppression = INFINITY
/datum/gas_reaction/stimformation/init_reqs()
min_requirements = list(
/datum/gas/tritium = 30,
- /datum/gas/plasma = 10,
/datum/gas/bz = 20,
/datum/gas/nitryl = 30,
- "TEMP" = STIMULUM_HEAT_SCALE/2)
+ "TEMP" = 1500)
/datum/gas_reaction/stimformation/react(datum/gas_mixture/air)
var/list/cached_gases = air.gases
@@ -677,19 +705,17 @@ nobiliumsuppression = INFINITY
var/old_heat_capacity = air.heat_capacity()
var/heat_scale = min(air.temperature/STIMULUM_HEAT_SCALE,cached_gases[/datum/gas/tritium][MOLES],cached_gases[/datum/gas/plasma][MOLES],cached_gases[/datum/gas/nitryl][MOLES])
var/stim_energy_change = heat_scale + STIMULUM_FIRST_RISE*(heat_scale**2) - STIMULUM_FIRST_DROP*(heat_scale**3) + STIMULUM_SECOND_RISE*(heat_scale**4) - STIMULUM_ABSOLUTE_DROP*(heat_scale**5)
-
- ASSERT_GAS(/datum/gas/stimulum,air)
- if ((cached_gases[/datum/gas/tritium][MOLES] - heat_scale < 0 )|| (cached_gases[/datum/gas/plasma][MOLES] - heat_scale < 0) || (cached_gases[/datum/gas/nitryl][MOLES] - heat_scale < 0)) //Shouldn't produce gas from nothing.
+ 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/stimulum][MOLES]+= heat_scale * 0.75
cached_gases[/datum/gas/tritium][MOLES] -= heat_scale
- cached_gases[/datum/gas/plasma][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))
+ SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, STIMULUM_RESEARCH_AMOUNT * max(stim_energy_change, 0))
if(stim_energy_change)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((air.temperature*old_heat_capacity + stim_energy_change)/new_heat_capacity),TCMB)
+ air.temperature = max(((air.temperature * old_heat_capacity + stim_energy_change) / new_heat_capacity), TCMB)
return REACTING
/datum/gas_reaction/nobliumformation //Hyper-Noblium formation is extrememly endothermic, but requires high temperatures to start. Due to its high mass, hyper-nobelium uses large amounts of nitrogen and tritium. BZ can be used as a catalyst to make it less endothermic.
@@ -701,25 +727,25 @@ nobiliumsuppression = INFINITY
min_requirements = list(
/datum/gas/nitrogen = 10,
/datum/gas/tritium = 5,
- "TEMP" = 5000000)
+ "TEMP" = 50000)
/datum/gas_reaction/nobliumformation/react(datum/gas_mixture/air)
var/list/cached_gases = air.gases
- air.assert_gases(/datum/gas/hypernoblium,/datum/gas/bz)
+ air.assert_gases(/datum/gas/hypernoblium, /datum/gas/bz)
var/old_heat_capacity = air.heat_capacity()
- var/nob_formed = min((cached_gases[/datum/gas/nitrogen][MOLES]+cached_gases[/datum/gas/tritium][MOLES])/100,cached_gases[/datum/gas/tritium][MOLES]/10,cached_gases[/datum/gas/nitrogen][MOLES]/20)
- var/energy_taken = nob_formed*(NOBLIUM_FORMATION_ENERGY/(max(cached_gases[/datum/gas/bz][MOLES],1)))
- if ((cached_gases[/datum/gas/tritium][MOLES] - 10*nob_formed < 0) || (cached_gases[/datum/gas/nitrogen][MOLES] - 20*nob_formed < 0))
+ var/nob_formed = min((cached_gases[/datum/gas/nitrogen][MOLES] + cached_gases[/datum/gas/tritium][MOLES]) * 0.01, cached_gases[/datum/gas/tritium][MOLES] * 0.1, cached_gases[/datum/gas/nitrogen][MOLES] * 0.2)
+ var/energy_taken = nob_formed * (NOBLIUM_FORMATION_ENERGY / (max(cached_gases[/datum/gas/bz][MOLES], 1)))
+ if ((cached_gases[/datum/gas/tritium][MOLES] - 5 * nob_formed < 0) || (cached_gases[/datum/gas/nitrogen][MOLES] - 10 * nob_formed < 0))
return NO_REACTION
- cached_gases[/datum/gas/tritium][MOLES] -= 10*nob_formed
- cached_gases[/datum/gas/nitrogen][MOLES] -= 20*nob_formed
- cached_gases[/datum/gas/hypernoblium][MOLES]+= nob_formed
- SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, nob_formed*NOBLIUM_RESEARCH_AMOUNT)
+ cached_gases[/datum/gas/tritium][MOLES] -= nob_formed * 5
+ cached_gases[/datum/gas/nitrogen][MOLES] -= nob_formed * 10
+ cached_gases[/datum/gas/hypernoblium][MOLES] += nob_formed
+ SSresearch.science_tech.add_point_type(TECHWEB_POINT_TYPE_DEFAULT, nob_formed * NOBLIUM_RESEARCH_AMOUNT)
if (nob_formed)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = max(((air.temperature*old_heat_capacity - energy_taken)/new_heat_capacity),TCMB)
+ air.temperature = max(((air.temperature * old_heat_capacity - energy_taken) / new_heat_capacity), TCMB)
/datum/gas_reaction/miaster //dry heat sterilization: clears out pathogens in the air
@@ -736,13 +762,13 @@ nobiliumsuppression = INFINITY
/datum/gas_reaction/miaster/react(datum/gas_mixture/air, datum/holder)
var/list/cached_gases = air.gases
// As the name says it, it needs to be dry
- if(cached_gases[/datum/gas/water_vapor] && cached_gases[/datum/gas/water_vapor][MOLES]/air.total_moles() > 0.1)
+ if(cached_gases[/datum/gas/water_vapor] && cached_gases[/datum/gas/water_vapor][MOLES] / air.total_moles() > 0.1)
return
//Replace miasma with oxygen
var/cleaned_air = min(cached_gases[/datum/gas/miasma][MOLES], 20 + (air.temperature - FIRE_MINIMUM_TEMPERATURE_TO_EXIST - 70) / 20)
cached_gases[/datum/gas/miasma][MOLES] -= cleaned_air
- ASSERT_GAS(/datum/gas/oxygen,air)
+ ASSERT_GAS(/datum/gas/oxygen, air)
cached_gases[/datum/gas/oxygen][MOLES] += cleaned_air
//Possibly burning a bit of organic matter through maillard reaction, so a *tiny* bit more heat would be understandable
@@ -770,19 +796,641 @@ nobiliumsuppression = INFINITY
location = get_turf(pick(pipenet.members))
else
location = get_turf(holder)
- air.assert_gases(/datum/gas/water_vapor,/datum/gas/nitryl,/datum/gas/carbon_dioxide,/datum/gas/nitrogen)
- var/ball_shot_angle = 180*cos(cached_gases[/datum/gas/water_vapor][MOLES]/cached_gases[/datum/gas/nitryl][MOLES])+180
- var/stim_used = min(STIM_BALL_GAS_AMOUNT/cached_gases[/datum/gas/plasma][MOLES],cached_gases[/datum/gas/stimulum][MOLES])
- var/pluox_used = min(STIM_BALL_GAS_AMOUNT/cached_gases[/datum/gas/plasma][MOLES],cached_gases[/datum/gas/pluoxium][MOLES])
- var/energy_released = stim_used*STIMULUM_HEAT_SCALE//Stimulum has a lot of stored energy, and breaking it up releases some of it
+ air.assert_gases(/datum/gas/water_vapor, /datum/gas/nitryl, /datum/gas/carbon_dioxide, /datum/gas/nitrogen)
+ var/ball_shot_angle = 180 * cos(cached_gases[/datum/gas/water_vapor][MOLES] / cached_gases[/datum/gas/nitryl][MOLES]) + 180
+ var/stim_used = min(STIM_BALL_GAS_AMOUNT / cached_gases[/datum/gas/plasma][MOLES], cached_gases[/datum/gas/stimulum][MOLES])
+ var/pluox_used = min(STIM_BALL_GAS_AMOUNT / cached_gases[/datum/gas/plasma][MOLES], cached_gases[/datum/gas/pluoxium][MOLES])
+ if ((cached_gases[/datum/gas/pluoxium][MOLES] - pluox_used < 0 ) || (cached_gases[/datum/gas/stimulum][MOLES] - stim_used < 0) || (cached_gases[/datum/gas/plasma][MOLES] - min(stim_used * pluox_used, 30) < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ var/energy_released = stim_used * STIMULUM_HEAT_SCALE//Stimulum has a lot of stored energy, and breaking it up releases some of it
location.fire_nuclear_particle(ball_shot_angle)
- cached_gases[/datum/gas/carbon_dioxide][MOLES] += 4*pluox_used
- cached_gases[/datum/gas/nitrogen][MOLES] += 8*stim_used
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] += 0.5 * pluox_used
+ cached_gases[/datum/gas/nitrogen][MOLES] += 2 * stim_used
cached_gases[/datum/gas/pluoxium][MOLES] -= pluox_used
cached_gases[/datum/gas/stimulum][MOLES] -= stim_used
- cached_gases[/datum/gas/plasma][MOLES] *= 0.5 //Consumes half the plasma each time.
+ cached_gases[/datum/gas/plasma][MOLES] -= min(stim_used * pluox_used, 30)
if(energy_released)
var/new_heat_capacity = air.heat_capacity()
if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
- air.temperature = clamp((air.temperature*old_heat_capacity + energy_released)/new_heat_capacity,TCMB,INFINITY)
+ air.temperature = clamp((air.temperature * old_heat_capacity + energy_released) / new_heat_capacity, TCMB, INFINITY)
return REACTING
+
+/datum/gas_reaction/halon_formation
+ priority = 15
+ name = "Halon formation"
+ id = "halon_formation"
+
+/datum/gas_reaction/halon_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/bz = MINIMUM_MOLE_COUNT,
+ /datum/gas/tritium = MINIMUM_MOLE_COUNT,
+ "TEMP" = 30,
+ "MAX_TEMP" = 55
+ )
+
+/datum/gas_reaction/halon_formation/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.01, cached_gases[/datum/gas/tritium][MOLES], cached_gases[/datum/gas/bz][MOLES])
+ var/energy_used = heat_efficency * 300
+ ASSERT_GAS(/datum/gas/halon, air)
+ 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 * 4.25
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity + energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/hexane_formation
+ priority = 16
+ name = "Hexane formation"
+ id = "hexane_formation"
+
+/datum/gas_reaction/hexane_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/bz = MINIMUM_MOLE_COUNT,
+ /datum/gas/hydrogen = MINIMUM_MOLE_COUNT,
+ "TEMP" = 450,
+ "MAX_TEMP" = 465
+ )
+
+/datum/gas_reaction/hexane_formation/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.01, cached_gases[/datum/gas/hydrogen][MOLES], cached_gases[/datum/gas/bz][MOLES])
+ var/energy_used = heat_efficency * 600
+ ASSERT_GAS(/datum/gas/hexane, air)
+ if ((cached_gases[/datum/gas/hydrogen][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/hydrogen][MOLES] -= heat_efficency * 5
+ cached_gases[/datum/gas/bz][MOLES] -= heat_efficency * 0.25
+ cached_gases[/datum/gas/hexane][MOLES] += heat_efficency * 5.25
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/healium_formation
+ priority = 12
+ name = "Healium formation"
+ id = "healium_formation"
+
+/datum/gas_reaction/healium_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/bz = MINIMUM_MOLE_COUNT,
+ /datum/gas/freon = MINIMUM_MOLE_COUNT,
+ "TEMP" = 25,
+ "MAX_TEMP" = 300
+ )
+
+/datum/gas_reaction/healium_formation/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.3, cached_gases[/datum/gas/freon][MOLES], cached_gases[/datum/gas/bz][MOLES])
+ var/energy_used = heat_efficency * 9000
+ ASSERT_GAS(/datum/gas/healium, air)
+ if ((cached_gases[/datum/gas/freon][MOLES] - heat_efficency * 2.75 < 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/freon][MOLES] -= heat_efficency * 2.75
+ cached_gases[/datum/gas/bz][MOLES] -= heat_efficency * 0.25
+ cached_gases[/datum/gas/healium][MOLES] += heat_efficency * 3
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity + energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_formation
+ priority = 13
+ name = "Proto Nitrate formation"
+ id = "proto_nitrate_formation"
+
+/datum/gas_reaction/proto_nitrate_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/pluoxium = MINIMUM_MOLE_COUNT,
+ /datum/gas/hydrogen = MINIMUM_MOLE_COUNT,
+ "TEMP" = 5000,
+ "MAX_TEMP" = 10000
+ )
+
+/datum/gas_reaction/proto_nitrate_formation/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.005, cached_gases[/datum/gas/pluoxium][MOLES], cached_gases[/datum/gas/hydrogen][MOLES])
+ var/energy_used = heat_efficency * 650
+ ASSERT_GAS(/datum/gas/proto_nitrate, air)
+ if ((cached_gases[/datum/gas/pluoxium][MOLES] - heat_efficency * 0.2 < 0 ) || (cached_gases[/datum/gas/hydrogen][MOLES] - heat_efficency * 2 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/hydrogen][MOLES] -= heat_efficency * 2
+ cached_gases[/datum/gas/pluoxium][MOLES] -= heat_efficency * 0.2
+ cached_gases[/datum/gas/proto_nitrate][MOLES] += heat_efficency * 2.2
+
+ if(energy_used > 0)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity + energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/cyrion_b_formation
+ priority = 14
+ name = "Cyrion B formation"
+ id = "cyrion_b_formation"
+
+/datum/gas_reaction/cyrion_b_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/hypernoblium = MINIMUM_MOLE_COUNT,
+ /datum/gas/stimulum = MINIMUM_MOLE_COUNT,
+ "TEMP" = 50000,
+ "MAX_TEMP" = 75000
+ )
+
+/datum/gas_reaction/cyrion_b_formation/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.000005, cached_gases[/datum/gas/hypernoblium][MOLES], cached_gases[/datum/gas/stimulum][MOLES])
+ var/energy_used = heat_efficency * 5000
+ ASSERT_GAS(/datum/gas/cyrion_b, air)
+ if ((cached_gases[/datum/gas/hypernoblium][MOLES] - heat_efficency * 0.01 < 0 ) || (cached_gases[/datum/gas/stimulum][MOLES] - heat_efficency * 0.5 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/hypernoblium][MOLES] -= heat_efficency * 0.01
+ cached_gases[/datum/gas/stimulum][MOLES] -= heat_efficency * 0.5
+ cached_gases[/datum/gas/cyrion_b][MOLES] += heat_efficency * 0.5
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/halon_o2removal
+ priority = -1
+ name = "Halon o2 removal"
+ id = "halon_o2removal"
+
+/datum/gas_reaction/halon_o2removal/init_reqs()
+ min_requirements = list(
+ /datum/gas/halon = MINIMUM_MOLE_COUNT,
+ /datum/gas/oxygen = MINIMUM_MOLE_COUNT,
+ "TEMP" = FIRE_MINIMUM_TEMPERATURE_TO_EXIST
+ )
+
+/datum/gas_reaction/halon_o2removal/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature / ( FIRE_MINIMUM_TEMPERATURE_TO_EXIST * 10), cached_gases[/datum/gas/halon][MOLES], cached_gases[/datum/gas/oxygen][MOLES])
+ var/energy_used = heat_efficency * 2500
+ ASSERT_GAS(/datum/gas/carbon_dioxide, air)
+ if ((cached_gases[/datum/gas/halon][MOLES] - heat_efficency < 0 ) || (cached_gases[/datum/gas/oxygen][MOLES] - heat_efficency * 20 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/halon][MOLES] -= heat_efficency
+ cached_gases[/datum/gas/oxygen][MOLES] -= heat_efficency * 20
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] += heat_efficency * 5
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/hexane_plasma_filtering
+ priority = 9
+ name = "Hexane plasma filtering"
+ id = "hexane_plasma_filtering"
+
+/datum/gas_reaction/hexane_plasma_filtering/init_reqs()
+ min_requirements = list(
+ /datum/gas/hexane = MINIMUM_MOLE_COUNT,
+ /datum/gas/plasma = MINIMUM_MOLE_COUNT,
+ "TEMP" = 150
+ )
+
+/datum/gas_reaction/hexane_plasma_filtering/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.01, cached_gases[/datum/gas/hexane][MOLES], cached_gases[/datum/gas/plasma][MOLES])
+ var/energy_used = heat_efficency * 250
+ ASSERT_GAS(/datum/gas/carbon_dioxide, air)
+ if ((cached_gases[/datum/gas/hexane][MOLES] - heat_efficency * 0.2 < 0 ) || (cached_gases[/datum/gas/plasma][MOLES] - heat_efficency * 0.5 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/hexane][MOLES] -= heat_efficency * 0.2
+ cached_gases[/datum/gas/plasma][MOLES] -= heat_efficency * 0.5
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] += heat_efficency * 0.4
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity - energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/hexane_n2o_filtering
+ priority = 10
+ name = "Hexane n2o filtering"
+ id = "hexane_n2o_filtering"
+
+/datum/gas_reaction/hexane_n2o_filtering/init_reqs()
+ min_requirements = list(
+ /datum/gas/hexane = MINIMUM_MOLE_COUNT,
+ /datum/gas/nitrous_oxide = MINIMUM_MOLE_COUNT,
+ )
+
+/datum/gas_reaction/hexane_n2o_filtering/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/old_heat_capacity = air.heat_capacity()
+ var/heat_efficency = min(temperature * 0.01, cached_gases[/datum/gas/hexane][MOLES], cached_gases[/datum/gas/nitrous_oxide][MOLES])
+ var/energy_used = heat_efficency * 100
+ ASSERT_GAS(/datum/gas/oxygen, air)
+ ASSERT_GAS(/datum/gas/nitrogen, air)
+ if ((cached_gases[/datum/gas/hexane][MOLES] - heat_efficency * 0.2 < 0 ) || (cached_gases[/datum/gas/nitrous_oxide][MOLES] - heat_efficency * 0.5 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/hexane][MOLES] -= heat_efficency * 0.2
+ cached_gases[/datum/gas/nitrous_oxide][MOLES] -= heat_efficency * 0.6
+ cached_gases[/datum/gas/oxygen][MOLES] += heat_efficency * 0.2
+ cached_gases[/datum/gas/nitrogen][MOLES] += heat_efficency * 0.6
+
+ if(energy_used)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = max(((temperature * old_heat_capacity + energy_used) / new_heat_capacity), TCMB)
+ return REACTING
+
+/datum/gas_reaction/cyrion_b_decomp
+ priority = 11
+ name = "Cyrion B decomposition"
+ id = "cyrion_b_decomp"
+
+/datum/gas_reaction/cyrion_b_decomp/init_reqs()
+ min_requirements = list(
+ /datum/gas/nitrogen = MINIMUM_MOLE_COUNT,
+ /datum/gas/cyrion_b = MINIMUM_MOLE_COUNT
+ )
+
+/datum/gas_reaction/cyrion_b_decomp/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases //this speeds things up because accessing datum vars is slow
+ var/temperature = air.temperature
+ var/burned_fuel = 0
+ burned_fuel = min(20, cached_gases[/datum/gas/nitrogen][MOLES], cached_gases[/datum/gas/cyrion_b][MOLES])
+ if(cached_gases[/datum/gas/cyrion_b][MOLES] - burned_fuel < 0)
+ return NO_REACTION
+ cached_gases[/datum/gas/cyrion_b][MOLES] -= burned_fuel
+
+ if(burned_fuel)
+ energy_released += (460 * burned_fuel)
+
+ ASSERT_GAS(/datum/gas/oxygen, air)
+ ASSERT_GAS(/datum/gas/nitrogen, air)
+ cached_gases[/datum/gas/oxygen][MOLES] += burned_fuel * 0.3
+ cached_gases[/datum/gas/nitrogen][MOLES] += burned_fuel * 0.7
+
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+ return NO_REACTION
+
+/datum/gas_reaction/healium_crystal_formation
+ priority = 17
+ name = "healium crystal formation"
+ id = "healium_crystal_formation"
+
+/datum/gas_reaction/healium_crystal_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/oxygen = 50,
+ /datum/gas/healium = 10,
+ "TEMP" = 1000,
+ "MAX_TEMP" = 2500
+ )
+
+/datum/gas_reaction/healium_crystal_formation/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
+ var/consumed_fuel = 0
+ consumed_fuel = min(cached_gases[/datum/gas/healium][MOLES] * 2.5, 20 * (temperature * 0.001))
+ if ((cached_gases[/datum/gas/healium][MOLES] - consumed_fuel * 0.4 < 0 ) || (cached_gases[/datum/gas/oxygen][MOLES] - consumed_fuel * 0.1 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/oxygen][MOLES] -= consumed_fuel * 0.1
+ cached_gases[/datum/gas/healium][MOLES] -= consumed_fuel * 0.4
+ if(prob(2 * consumed_fuel))
+ new /obj/item/grenade/gas_crystal/healium_crystal(location)
+ energy_released += consumed_fuel * 800
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_crystal_formation
+ priority = 18
+ name = "hydrogen pluoxide crystal formation"
+ id = "proto_nitrate_crystal_formation"
+
+/datum/gas_reaction/proto_nitrate_crystal_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/nitrogen = 50,
+ /datum/gas/proto_nitrate = 10,
+ "TEMP" = 100,
+ "MAX_TEMP" = 150
+ )
+
+/datum/gas_reaction/proto_nitrate_crystal_formation/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
+ 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)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/cyrion_b_crystal_formation
+ priority = 19
+ name = "cyrion_b crystal formation"
+ id = "cyrion_b_crystal_formation"
+
+/datum/gas_reaction/cyrion_b_crystal_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/plasma = 50,
+ /datum/gas/cyrion_b = 10,
+ "TEMP" = 270,
+ "MAX_TEMP" = 280
+ )
+
+/datum/gas_reaction/cyrion_b_crystal_formation/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
+ var/consumed_fuel = 0
+ consumed_fuel = min(cached_gases[/datum/gas/cyrion_b][MOLES] * 0.1, 20 * (temperature * 0.02))
+ if ((cached_gases[/datum/gas/cyrion_b][MOLES] - consumed_fuel * 0.05 < 0 ) || (cached_gases[/datum/gas/plasma][MOLES] - consumed_fuel * 5 < 0)) //Shouldn't produce gas from nothing.
+ return NO_REACTION
+ cached_gases[/datum/gas/plasma][MOLES] -= consumed_fuel * 5
+ cached_gases[/datum/gas/cyrion_b][MOLES] -= consumed_fuel * 0.05
+ if(prob(10 * consumed_fuel))
+ new /obj/item/grenade/gas_crystal/cyrion_b_crystal(location)
+ energy_released += consumed_fuel * 800
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_plasma_response
+ priority = 20
+ name = "Proto Nitrate plasma response"
+ id = "proto_nitrate_plasma_response"
+
+/datum/gas_reaction/proto_nitrate_plasma_response/init_reqs()
+ min_requirements = list(
+ /datum/gas/proto_nitrate = MINIMUM_MOLE_COUNT,
+ /datum/gas/plasma = MINIMUM_MOLE_COUNT,
+ "TEMP" = 250,
+ "MAX_TEMP" = 300
+ )
+
+/datum/gas_reaction/proto_nitrate_plasma_response/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ if(!isturf(holder))
+ return NO_REACTION
+ var/turf/open/location = holder
+ if(cached_gases[/datum/gas/plasma][MOLES] > 10)
+ return NO_REACTION
+ var produced_amount = min(5, cached_gases[/datum/gas/plasma][MOLES], cached_gases[/datum/gas/proto_nitrate][MOLES])
+ if(cached_gases[/datum/gas/plasma][MOLES] - produced_amount < 0 || cached_gases[/datum/gas/proto_nitrate][MOLES] - produced_amount * 0.1 < 0)
+ return NO_REACTION
+ cached_gases[/datum/gas/plasma][MOLES] -= produced_amount
+ cached_gases[/datum/gas/proto_nitrate][MOLES] -= produced_amount * 0.1
+ energy_released -= produced_amount * 1500
+ if(prob(produced_amount * 15))
+ new/obj/item/stack/sheet/mineral/plasma(location)
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_bz_response
+ priority = 21
+ name = "Proto Nitrate bz response"
+ id = "proto_nitrate_bz_response"
+
+/datum/gas_reaction/proto_nitrate_bz_response/init_reqs()
+ min_requirements = list(
+ /datum/gas/proto_nitrate = MINIMUM_MOLE_COUNT,
+ /datum/gas/bz = MINIMUM_MOLE_COUNT,
+ "TEMP" = 260,
+ "MAX_TEMP" = 280
+ )
+
+/datum/gas_reaction/proto_nitrate_bz_response/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/turf/open/location = isturf(holder) ? holder : null
+ var consumed_amount = min(5, cached_gases[/datum/gas/bz][MOLES], cached_gases[/datum/gas/proto_nitrate][MOLES])
+ if(cached_gases[/datum/gas/bz][MOLES] - consumed_amount < 0)
+ return NO_REACTION
+ if(cached_gases[/datum/gas/bz][MOLES] < 30)
+ radiation_pulse(location, consumed_amount, 1, TRUE, FALSE)
+ cached_gases[/datum/gas/bz][MOLES] -= consumed_amount
+ else
+ for(var/mob/living/carbon/L in location)
+ L.hallucination += cached_gases[/datum/gas/bz][MOLES] * 0.5
+ energy_released += 100
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_freon_fire_response
+ priority = 22
+ name = "Proto Nitrate freon fire response"
+ id = "proto_nitrate_freon_fire_response"
+
+/datum/gas_reaction/proto_nitrate_freon_fire_response/init_reqs()
+ min_requirements = list(
+ /datum/gas/proto_nitrate = MINIMUM_MOLE_COUNT,
+ /datum/gas/freon = MINIMUM_MOLE_COUNT,
+ /datum/gas/oxygen = MINIMUM_MOLE_COUNT,
+ "TEMP" = 270,
+ "MAX_TEMP" = 310
+ )
+
+/datum/gas_reaction/proto_nitrate_freon_fire_response/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ if(cached_gases[/datum/gas/freon][MOLES] > 100 && cached_gases[/datum/gas/oxygen][MOLES] > 100)
+ var fuel_consumption = min(5, temperature * 0.03, cached_gases[/datum/gas/freon][MOLES], cached_gases[/datum/gas/proto_nitrate][MOLES])
+ if(cached_gases[/datum/gas/proto_nitrate][MOLES] - fuel_consumption < 0)
+ return NO_REACTION
+ cached_gases[/datum/gas/proto_nitrate][MOLES] -= fuel_consumption
+ cached_gases[/datum/gas/freon][MOLES] += fuel_consumption * 0.01
+ energy_released -= fuel_consumption * 1500
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+ return NO_REACTION
+
+/datum/gas_reaction/proto_nitrate_tritium_response
+ priority = 23
+ name = "Proto Nitrate tritium response"
+ id = "proto_nitrate_tritium_response"
+
+/datum/gas_reaction/proto_nitrate_tritium_response/init_reqs()
+ min_requirements = list(
+ /datum/gas/proto_nitrate = MINIMUM_MOLE_COUNT,
+ /datum/gas/tritium = MINIMUM_MOLE_COUNT,
+ "TEMP" = 150,
+ "MAX_TEMP" = 340
+ )
+
+/datum/gas_reaction/proto_nitrate_tritium_response/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var/turf/open/location = isturf(holder) ? holder : null
+ var produced_amount = min(5, cached_gases[/datum/gas/tritium][MOLES], cached_gases[/datum/gas/proto_nitrate][MOLES])
+ if(cached_gases[/datum/gas/tritium][MOLES] - produced_amount < 0 || cached_gases[/datum/gas/proto_nitrate][MOLES] - produced_amount * 0.01 < 0)
+ return NO_REACTION
+ location.rad_act(produced_amount * 2.4)
+ cached_gases[/datum/gas/tritium][MOLES] -= produced_amount
+ cached_gases[/datum/gas/hydrogen][MOLES] += produced_amount
+ cached_gases[/datum/gas/proto_nitrate][MOLES] -= produced_amount * 0.01
+ energy_released += 50
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_hydrogen_response
+ priority = 24
+ name = "Proto Nitrate hydrogen response"
+ id = "proto_nitrate_hydrogen_response"
+
+/datum/gas_reaction/proto_nitrate_hydrogen_response/init_reqs()
+ min_requirements = list(
+ /datum/gas/proto_nitrate = MINIMUM_MOLE_COUNT,
+ /datum/gas/hydrogen = 150,
+ )
+
+/datum/gas_reaction/proto_nitrate_hydrogen_response/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var produced_amount = min(5, cached_gases[/datum/gas/hydrogen][MOLES], cached_gases[/datum/gas/proto_nitrate][MOLES])
+ if(cached_gases[/datum/gas/hydrogen][MOLES] - produced_amount < 0)
+ return NO_REACTION
+ cached_gases[/datum/gas/hydrogen][MOLES] -= produced_amount
+ cached_gases[/datum/gas/proto_nitrate][MOLES] += produced_amount * 0.5
+ energy_released -= produced_amount * 2500
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
+
+/datum/gas_reaction/proto_nitrate_cyrion_b_response
+ priority = 25
+ name = "Proto Nitrate Cyrion B response"
+ id = "proto_nitrate_cyrion_b_response"
+
+/datum/gas_reaction/proto_nitrate_cyrion_b_response/init_reqs()
+ min_requirements = list(
+ /datum/gas/proto_nitrate = MINIMUM_MOLE_COUNT,
+ /datum/gas/cyrion_b = MINIMUM_MOLE_COUNT,
+ "TEMP" = FIRE_MINIMUM_TEMPERATURE_TO_EXIST
+ )
+
+/datum/gas_reaction/proto_nitrate_cyrion_b_response/react(datum/gas_mixture/air, datum/holder)
+ var/list/cached_gases = air.gases
+ var/turf/open/location = isturf(holder) ? holder : null
+ var max_power = min(5, cached_gases[/datum/gas/cyrion_b][MOLES])
+ cached_gases[/datum/gas/cyrion_b][MOLES] = 0
+ explosion(location, max_power * 0.55, max_power * 0.95, max_power * 1.25, max_power* 3)
+ return REACTING
+
+/datum/gas_reaction/pluox_formation
+ priority = 2
+ name = "Pluoxium formation"
+ id = "pluox_formation"
+
+/datum/gas_reaction/pluox_formation/init_reqs()
+ min_requirements = list(
+ /datum/gas/carbon_dioxide = MINIMUM_MOLE_COUNT,
+ /datum/gas/oxygen = MINIMUM_MOLE_COUNT,
+ /datum/gas/tritium = MINIMUM_MOLE_COUNT,
+ "TEMP" = 50,
+ "MAX_TEMP" = T0C
+ )
+
+/datum/gas_reaction/pluox_formation/react(datum/gas_mixture/air, datum/holder)
+ var/energy_released = 0
+ var/old_heat_capacity = air.heat_capacity()
+ var/list/cached_gases = air.gases
+ var/temperature = air.temperature
+ var produced_amount = min(5, cached_gases[/datum/gas/carbon_dioxide][MOLES], cached_gases[/datum/gas/oxygen][MOLES])
+ if(cached_gases[/datum/gas/carbon_dioxide][MOLES] - produced_amount < 0 || cached_gases[/datum/gas/oxygen][MOLES] - produced_amount * 0.5 < 0 || cached_gases[/datum/gas/tritium][MOLES] - produced_amount * 0.01 < 0)
+ return NO_REACTION
+ cached_gases[/datum/gas/carbon_dioxide][MOLES] -= produced_amount
+ cached_gases[/datum/gas/oxygen][MOLES] -= produced_amount * 0.5
+ cached_gases[/datum/gas/tritium][MOLES] -= produced_amount * 0.01
+ ASSERT_GAS(/datum/gas/pluoxium, air)
+ cached_gases[/datum/gas/pluoxium][MOLES] += produced_amount
+ ASSERT_GAS(/datum/gas/hydrogen, air)
+ cached_gases[/datum/gas/hydrogen][MOLES] += produced_amount * 0.01
+ energy_released += produced_amount * 250
+ if(energy_released)
+ var/new_heat_capacity = air.heat_capacity()
+ if(new_heat_capacity > MINIMUM_HEAT_CAPACITY)
+ air.temperature = (temperature * old_heat_capacity + energy_released) / new_heat_capacity
+ return REACTING
diff --git a/code/modules/atmospherics/machinery/airalarm.dm b/code/modules/atmospherics/machinery/airalarm.dm
index 5faac36c2f3..261565e7ee9 100644
--- a/code/modules/atmospherics/machinery/airalarm.dm
+++ b/code/modules/atmospherics/machinery/airalarm.dm
@@ -101,7 +101,12 @@
/datum/gas/nitryl = new/datum/tlv/dangerous,
/datum/gas/pluoxium = new/datum/tlv(-1, -1, 1000, 1000), // Unlike oxygen, pluoxium does not fuel plasma/tritium fires
/datum/gas/freon = new/datum/tlv/dangerous,
- /datum/gas/hydrogen = new/datum/tlv/dangerous
+ /datum/gas/hydrogen = new/datum/tlv/dangerous,
+ /datum/gas/healium = new/datum/tlv/dangerous,
+ /datum/gas/proto_nitrate = new/datum/tlv/dangerous,
+ /datum/gas/cyrion_b = new/datum/tlv/dangerous,
+ /datum/gas/halon = new/datum/tlv/dangerous,
+ /datum/gas/hexane = new/datum/tlv/dangerous
)
/obj/machinery/airalarm/server // No checks here.
@@ -122,7 +127,12 @@
/datum/gas/nitryl = new/datum/tlv/no_checks,
/datum/gas/pluoxium = new/datum/tlv/no_checks,
/datum/gas/freon = new/datum/tlv/no_checks,
- /datum/gas/hydrogen = new/datum/tlv/no_checks
+ /datum/gas/hydrogen = new/datum/tlv/no_checks,
+ /datum/gas/healium = new/datum/tlv/dangerous,
+ /datum/gas/proto_nitrate = new/datum/tlv/dangerous,
+ /datum/gas/cyrion_b = new/datum/tlv/dangerous,
+ /datum/gas/halon = new/datum/tlv/dangerous,
+ /datum/gas/hexane = new/datum/tlv/dangerous
)
/obj/machinery/airalarm/kitchen_cold_room // Kitchen cold rooms start off at -80°C or 193.15°K.
@@ -143,7 +153,12 @@
/datum/gas/nitryl = new/datum/tlv/dangerous,
/datum/gas/pluoxium = new/datum/tlv(-1, -1, 1000, 1000), // Unlike oxygen, pluoxium does not fuel plasma/tritium fires
/datum/gas/freon = new/datum/tlv/dangerous,
- /datum/gas/hydrogen = new/datum/tlv/dangerous
+ /datum/gas/hydrogen = new/datum/tlv/dangerous,
+ /datum/gas/healium = new/datum/tlv/dangerous,
+ /datum/gas/proto_nitrate = new/datum/tlv/dangerous,
+ /datum/gas/cyrion_b = new/datum/tlv/dangerous,
+ /datum/gas/halon = new/datum/tlv/dangerous,
+ /datum/gas/hexane = new/datum/tlv/dangerous
)
/obj/machinery/airalarm/unlocked
@@ -531,7 +546,12 @@
/datum/gas/stimulum,
/datum/gas/pluoxium,
/datum/gas/freon,
- /datum/gas/hydrogen
+ /datum/gas/hydrogen,
+ /datum/gas/healium,
+ /datum/gas/proto_nitrate,
+ /datum/gas/cyrion_b,
+ /datum/gas/halon,
+ /datum/gas/hexane,
),
"scrubbing" = 1,
"widenet" = 1
diff --git a/code/modules/atmospherics/machinery/portable/canister.dm b/code/modules/atmospherics/machinery/portable/canister.dm
index 7749bae169b..c0958a8eae8 100644
--- a/code/modules/atmospherics/machinery/portable/canister.dm
+++ b/code/modules/atmospherics/machinery/portable/canister.dm
@@ -64,7 +64,12 @@
"caution" = /obj/machinery/portable_atmospherics/canister,
"miasma" = /obj/machinery/portable_atmospherics/canister/miasma,
"freon" = /obj/machinery/portable_atmospherics/canister/freon,
- "hydrogen" = /obj/machinery/portable_atmospherics/canister/hydrogen
+ "hydrogen" = /obj/machinery/portable_atmospherics/canister/hydrogen,
+ "healium" = /obj/machinery/portable_atmospherics/canister/healium,
+ "proto_nitrate" = /obj/machinery/portable_atmospherics/canister/proto_nitrate,
+ "cyrion_b" = /obj/machinery/portable_atmospherics/canister/cyrion_b,
+ "halon" = /obj/machinery/portable_atmospherics/canister/halon,
+ "hexane" = /obj/machinery/portable_atmospherics/canister/hexane
)
/obj/machinery/portable_atmospherics/canister/interact(mob/user)
@@ -80,28 +85,28 @@
. += "This canister is [mode]. A sticker on its side says MAX PRESSURE: [siunit(pressure_limit, "Pa", 0)]."
/obj/machinery/portable_atmospherics/canister/nitrogen
- name = "n2 canister"
+ name = "Nitrogen canister"
desc = "Nitrogen gas. Reportedly useful for something."
icon_state = "red"
base_icon_state = "red"
gas_type = /datum/gas/nitrogen
/obj/machinery/portable_atmospherics/canister/oxygen
- name = "o2 canister"
+ name = "Oxygen canister"
desc = "Oxygen. Necessary for human life."
icon_state = "blue"
base_icon_state = "blue"
gas_type = /datum/gas/oxygen
/obj/machinery/portable_atmospherics/canister/carbon_dioxide
- name = "co2 canister"
+ name = "Carbon dioxide canister"
desc = "Carbon dioxide. What the fuck is carbon dioxide?"
icon_state = "black"
base_icon_state = "black"
gas_type = /datum/gas/carbon_dioxide
/obj/machinery/portable_atmospherics/canister/toxins
- name = "plasma canister"
+ name = "Plasma canister"
desc = "Plasma gas. The reason YOU are here. Highly toxic."
icon_state = "orange"
base_icon_state = "orange"
@@ -115,55 +120,55 @@
gas_type = /datum/gas/bz
/obj/machinery/portable_atmospherics/canister/nitrous_oxide
- name = "n2o canister"
+ name = "Nitrous oxide canister"
desc = "Nitrous oxide gas. Known to cause drowsiness."
icon_state = "redws"
base_icon_state = "redws"
gas_type = /datum/gas/nitrous_oxide
/obj/machinery/portable_atmospherics/canister/air
- name = "air canister"
+ name = "Air canister"
desc = "Pre-mixed air."
icon_state = "grey"
base_icon_state = "grey"
/obj/machinery/portable_atmospherics/canister/tritium
- name = "tritium canister"
+ name = "Tritium canister"
desc = "Tritium. Inhalation might cause irradiation."
icon_state = "green"
base_icon_state = "green"
gas_type = /datum/gas/tritium
/obj/machinery/portable_atmospherics/canister/nob
- name = "hyper-noblium canister"
+ name = "Hyper-noblium canister"
desc = "Hyper-Noblium. More noble than all other gases."
icon_state = "nob"
base_icon_state = "nob"
gas_type = /datum/gas/hypernoblium
/obj/machinery/portable_atmospherics/canister/nitryl
- name = "nitryl canister"
+ name = "Nitryl canister"
desc = "Nitryl gas. Feels great 'til the acid eats your lungs."
icon_state = "brown"
base_icon_state = "brown"
gas_type = /datum/gas/nitryl
/obj/machinery/portable_atmospherics/canister/stimulum
- name = "stimulum canister"
+ name = "Stimulum canister"
desc = "Stimulum. High energy gas, high energy people."
icon_state = "darkpurple"
base_icon_state = "darkpurple"
gas_type = /datum/gas/stimulum
/obj/machinery/portable_atmospherics/canister/pluoxium
- name = "pluoxium canister"
+ name = "Pluoxium canister"
desc = "Pluoxium. Like oxygen, but more bang for your buck."
icon_state = "darkblue"
base_icon_state = "darkblue"
gas_type = /datum/gas/pluoxium
/obj/machinery/portable_atmospherics/canister/water_vapor
- name = "water vapor canister"
+ name = "Water vapor canister"
desc = "Water Vapor. We get it, you vape."
icon_state = "water_vapor"
base_icon_state = "water_vapor"
@@ -171,7 +176,7 @@
filled = 1
/obj/machinery/portable_atmospherics/canister/miasma
- name = "miasma canister"
+ name = "Miasma canister"
desc = "Miasma. Makes you wish your nose were blocked."
icon_state = "miasma"
base_icon_state = "miasma"
@@ -179,7 +184,7 @@
filled = 1
/obj/machinery/portable_atmospherics/canister/freon
- name = "freon canister"
+ name = "Freon canister"
desc = "Freon. Can absorb heat"
icon_state = "freon"
base_icon_state = "freon"
@@ -187,13 +192,52 @@
filled = 1
/obj/machinery/portable_atmospherics/canister/hydrogen
- name = "hydrogen canister"
+ name = "Hydrogen canister"
desc = "Hydrogen, highly flammable"
icon_state = "h2"
base_icon_state = "h2"
gas_type = /datum/gas/hydrogen
filled = 1
+/obj/machinery/portable_atmospherics/canister/healium
+ name = "Healium canister"
+ desc = "Healium, causes deep sleep"
+ icon_state = "healium"
+ base_icon_state = "healium"
+ gas_type = /datum/gas/healium
+ filled = 1
+
+/obj/machinery/portable_atmospherics/canister/proto_nitrate
+ name = "Proto Nitrate canister"
+ desc = "Proto Nitrate, react differently with various gases"
+ icon_state = "proto_nitrate"
+ base_icon_state = "proto_nitrate"
+ gas_type = /datum/gas/proto_nitrate
+ filled = 1
+
+/obj/machinery/portable_atmospherics/canister/cyrion_b
+ name = "Cyrion B canister"
+ desc = "Cyrion B, highly toxic"
+ icon_state = "cyrion_b"
+ base_icon_state = "cyrion_b"
+ gas_type = /datum/gas/cyrion_b
+ filled = 1
+
+/obj/machinery/portable_atmospherics/canister/halon
+ name = "Halon canister"
+ desc = "Halon, remove oxygen from high temperature fires and cool down the area"
+ icon_state = "halon"
+ base_icon_state = "halon"
+ gas_type = /datum/gas/halon
+ filled = 1
+
+/obj/machinery/portable_atmospherics/canister/hexane
+ name = "Hexane canister"
+ desc = "hexane, highly flammable"
+ icon_state = "hexane"
+ base_icon_state = "hexane"
+ gas_type = /datum/gas/hexane
+ filled = 1
/obj/machinery/portable_atmospherics/canister/fusion_test
name = "fusion test canister"
@@ -207,7 +251,7 @@
air_contents.gases[/datum/gas/hydrogen][MOLES] = 500
air_contents.gases[/datum/gas/plasma][MOLES] = 500
air_contents.gases[/datum/gas/tritium][MOLES] = 350
- air_contents.temperature = 15000
+ air_contents.temperature = 10000
/obj/machinery/portable_atmospherics/canister/proc/get_time_left()
if(timing)
diff --git a/code/modules/atmospherics/machinery/portable/scrubber.dm b/code/modules/atmospherics/machinery/portable/scrubber.dm
index cc10b743a98..00f6f022023 100644
--- a/code/modules/atmospherics/machinery/portable/scrubber.dm
+++ b/code/modules/atmospherics/machinery/portable/scrubber.dm
@@ -24,6 +24,11 @@
/datum/gas/water_vapor,
/datum/gas/freon,
/datum/gas/hydrogen,
+ /datum/gas/healium,
+ /datum/gas/proto_nitrate,
+ /datum/gas/cyrion_b,
+ /datum/gas/halon,
+ /datum/gas/hexane,
)
/obj/machinery/portable_atmospherics/scrubber/Destroy()
diff --git a/code/modules/cargo/bounties/engineering.dm b/code/modules/cargo/bounties/engineering.dm
index 2626ededb0f..e2d26119cda 100644
--- a/code/modules/cargo/bounties/engineering.dm
+++ b/code/modules/cargo/bounties/engineering.dm
@@ -34,6 +34,12 @@
description = "Our R&D department is working on the development of more efficient electrical batteries using hydrogen as a catalyst. Ship us a tank full of it. (20 Moles)"
gas_type = /datum/gas/hydrogen
+/datum/bounty/item/engineering/gas/cyrion_b_tank
+ name = "Full Tank of Cyrion-B"
+ description = "The main planet of \[REDACTED] has been chosen as testing grounds for the new weapon that uses the Cyrion-B gas. Ship us a tank full of it. (20 Moles)"
+ reward = 10000
+ gas_type = /datum/gas/cyrion_b
+
/datum/bounty/item/engineering/emitter
name = "Emitter"
description = "We think there may be a defect in your station's emitter designs, based on the sheer number of delaminations your sector seems to see. Ship us one of yours."
diff --git a/code/modules/cargo/exports/large_objects.dm b/code/modules/cargo/exports/large_objects.dm
index 93461e281f3..fe4c65de21f 100644
--- a/code/modules/cargo/exports/large_objects.dm
+++ b/code/modules/cargo/exports/large_objects.dm
@@ -110,7 +110,20 @@
var/obj/machinery/portable_atmospherics/canister/C = O
var/worth = 10
var/gases = C.air_contents.gases
- C.air_contents.assert_gases(/datum/gas/bz,/datum/gas/stimulum,/datum/gas/hypernoblium,/datum/gas/miasma,/datum/gas/tritium,/datum/gas/pluoxium,/datum/gas/freon,/datum/gas/hydrogen)
+ C.air_contents.assert_gases(/datum/gas/bz,
+ /datum/gas/stimulum,
+ /datum/gas/hypernoblium,
+ /datum/gas/miasma,
+ /datum/gas/tritium,
+ /datum/gas/pluoxium,
+ /datum/gas/freon,
+ /datum/gas/hydrogen,
+ /datum/gas/healium,
+ /datum/gas/proto_nitrate,
+ /datum/gas/cyrion_b,
+ /datum/gas/halon,
+ /datum/gas/hexane
+ )
worth += gases[/datum/gas/hypernoblium][MOLES]*1000
worth += gases[/datum/gas/stimulum][MOLES]*100
@@ -120,4 +133,9 @@
worth += gases[/datum/gas/bz][MOLES]*4
worth += gases[/datum/gas/miasma][MOLES]*2
worth += gases[/datum/gas/hydrogen][MOLES]*1
+ worth += gases[/datum/gas/healium][MOLES]*19
+ worth += gases[/datum/gas/proto_nitrate][MOLES]*5
+ worth += gases[/datum/gas/cyrion_b][MOLES]*1050
+ worth += gases[/datum/gas/halon][MOLES]*9
+ worth += gases[/datum/gas/hexane][MOLES]*6
return worth
diff --git a/code/modules/clothing/head/helmet.dm b/code/modules/clothing/head/helmet.dm
index 35aa4b371c9..524178970dc 100644
--- a/code/modules/clothing/head/helmet.dm
+++ b/code/modules/clothing/head/helmet.dm
@@ -370,6 +370,16 @@
flags_cover = HEADCOVERSEYES | HEADCOVERSMOUTH | PEPPERPROOF
strip_delay = 80
+/obj/item/clothing/head/helmet/elder_atmosian
+ name = "Elder Atmosian Helmet"
+ desc = "A superb helmet made with the thoughest and rarest materials avaiable to man."
+ icon_state = "knight_greyscale"
+ inhand_icon_state = "knight_greyscale"
+ armor = list(MELEE = 15, BULLET = 10, LASER = 30, ENERGY = 30, BOMB = 10, BIO = 10, RAD = 20, FIRE = 65, ACID = 40, WOUND = 15)
+ material_flags = MATERIAL_COLOR | MATERIAL_AFFECT_STATISTICS //Can change color and add prefix
+ flags_inv = HIDEMASK|HIDEEARS|HIDEEYES|HIDEFACE|HIDEHAIR
+ flags_cover = HEADCOVERSEYES | HEADCOVERSMOUTH
+
//monkey sentience caps
/obj/item/clothing/head/helmet/monkey_sentience
diff --git a/code/modules/clothing/suits/armor.dm b/code/modules/clothing/suits/armor.dm
index a30c736b03d..604a8be160b 100644
--- a/code/modules/clothing/suits/armor.dm
+++ b/code/modules/clothing/suits/armor.dm
@@ -287,3 +287,14 @@
cold_protection = CHEST|GROIN|LEGS|FEET|ARMS|HANDS
min_cold_protection_temperature = SPACE_SUIT_MIN_TEMP_PROTECT
armor = list(MELEE = 25, BULLET = 20, LASER = 20, ENERGY = 30, BOMB = 20, BIO = 50, RAD = 20, FIRE = -10, ACID = 50, WOUND = 10)
+
+/obj/item/clothing/suit/armor/elder_atmosian
+ name = "Elder Atmosian Armor"
+ desc = "A superb armor made with the thoughest and rarest materials avaiable to man."
+ icon_state = "knight_grey"
+ inhand_icon_state = "knight_greyscale"
+ material_flags = MATERIAL_COLOR | MATERIAL_AFFECT_STATISTICS//Can change color and add prefix
+ armor = list(MELEE = 15, BULLET = 10, LASER = 30, ENERGY = 30, BOMB = 10, BIO = 10, RAD = 20, FIRE = 65, ACID = 40, WOUND = 15)
+ body_parts_covered = CHEST|GROIN|LEGS|FEET|ARMS|HANDS
+ cold_protection = CHEST|GROIN|LEGS|FEET|ARMS|HANDS
+ heat_protection = CHEST|GROIN|LEGS|FEET|ARMS|HANDS
diff --git a/code/modules/movespeed/modifiers/reagent.dm b/code/modules/movespeed/modifiers/reagent.dm
index 698e1aa13c5..f0f2ec301ec 100644
--- a/code/modules/movespeed/modifiers/reagent.dm
+++ b/code/modules/movespeed/modifiers/reagent.dm
@@ -28,6 +28,9 @@
/datum/movespeed_modifier/reagent/freon
multiplicative_slowdown = 1.6
+/datum/movespeed_modifier/reagent/halon
+ multiplicative_slowdown = 1.8
+
/datum/movespeed_modifier/reagent/lenturi
multiplicative_slowdown = 1.5
diff --git a/code/modules/power/supermatter/supermatter.dm b/code/modules/power/supermatter/supermatter.dm
index 93f20e54f5f..63efc861645 100644
--- a/code/modules/power/supermatter/supermatter.dm
+++ b/code/modules/power/supermatter/supermatter.dm
@@ -22,7 +22,9 @@
#define H2O_HEAT_PENALTY 12 //This'll get made slowly over time, I want my spice rock spicy god damnit
#define FREON_HEAT_PENALTY -10 //very good heat absorbtion and less plasma and o2 generation
#define HYDROGEN_HEAT_PENALTY 10 // similar heat penalty as tritium (dangerous)
-
+#define HEALIUM_HEAT_PENALTY 4
+#define PROTO_NITRATE_HEAT_PENALTY -3
+#define CYRION_B_HEAT_PENALTY 8
//All of these get divided by 10-bzcomp * 5 before having 1 added and being multiplied with power to determine rads
//Keep the negative values here above -10 and we won't get negative rads
@@ -33,11 +35,15 @@
#define PLUOXIUM_TRANSMIT_MODIFIER -5 //Should halve the power output
#define H2O_TRANSMIT_MODIFIER 2
#define HYDROGEN_TRANSMIT_MODIFIER 25 //increase the radiation emission, but less than the trit (2.5)
+#define HEALIUM_TRANSMIT_MODIFIER 2.4
+#define PROTO_NITRATE_TRANSMIT_MODIFIER 15
+#define CYRION_B_TRANSMIT_MODIFIER 20
#define BZ_RADIOACTIVITY_MODIFIER 5 //Improves the effect of transmit modifiers
#define N2O_HEAT_RESISTANCE 6 //Higher == Gas makes the crystal more resistant against heat damage.
#define HYDROGEN_HEAT_RESISTANCE 2 // just a bit of heat resistance to spice it up
+#define PROTO_NITRATE_HEAT_RESISTANCE 5
#define POWERLOSS_INHIBITION_GAS_THRESHOLD 0.20 //Higher == Higher percentage of inhibitor gas needed before the charge inertia chain reaction effect starts.
#define POWERLOSS_INHIBITION_MOLE_THRESHOLD 20 //Higher == More moles of the gas are needed before the charge inertia chain reaction effect starts. //Scales powerloss inhibition down until this amount of moles is reached
@@ -159,6 +165,9 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/bz,
/datum/gas/freon,
/datum/gas/hydrogen,
+ /datum/gas/healium,
+ /datum/gas/proto_nitrate,
+ /datum/gas/cyrion_b,
)
///The list of gases mapped against their current comp. We use this to calculate different values the supermatter uses, like power or heat resistance. It doesn't perfectly match the air around the sm, instead moving up at a rate determined by gas_change_rate per call. Ranges from 0 to 1
var/list/gas_comp = list(
@@ -173,6 +182,9 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/bz = 0,
/datum/gas/freon = 0,
/datum/gas/hydrogen = 0,
+ /datum/gas/healium = 0,
+ /datum/gas/proto_nitrate = 0,
+ /datum/gas/cyrion_b = 0,
)
///The list of gases mapped against their transmit values. We use it to determine the effect different gases have on radiation
var/list/gas_trans = list(
@@ -183,6 +195,9 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/tritium = TRITIUM_TRANSMIT_MODIFIER,
/datum/gas/bz = BZ_TRANSMIT_MODIFIER,
/datum/gas/hydrogen = HYDROGEN_TRANSMIT_MODIFIER,
+ /datum/gas/healium = HEALIUM_TRANSMIT_MODIFIER,
+ /datum/gas/proto_nitrate = PROTO_NITRATE_TRANSMIT_MODIFIER,
+ /datum/gas/cyrion_b = CYRION_B_TRANSMIT_MODIFIER,
)
///The list of gases mapped against their heat penaltys. We use it to determin molar and heat output
var/list/gas_heat = list(
@@ -196,11 +211,15 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/bz = BZ_HEAT_PENALTY,
/datum/gas/freon = FREON_HEAT_PENALTY,
/datum/gas/hydrogen = HYDROGEN_HEAT_PENALTY,
+ /datum/gas/healium = HEALIUM_HEAT_PENALTY,
+ /datum/gas/proto_nitrate = PROTO_NITRATE_HEAT_PENALTY,
+ /datum/gas/cyrion_b = CYRION_B_HEAT_PENALTY,
)
///The list of gases mapped against their heat resistance. We use it to moderate heat damage.
var/list/gas_resist = list(
/datum/gas/nitrous_oxide = N2O_HEAT_RESISTANCE,
/datum/gas/hydrogen = HYDROGEN_HEAT_RESISTANCE,
+ /datum/gas/proto_nitrate = PROTO_NITRATE_HEAT_RESISTANCE,
)
///The list of gases mapped against their powermix ratio
var/list/gas_powermix = list(
@@ -214,6 +233,9 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/bz = 1,
/datum/gas/freon = -1,
/datum/gas/hydrogen = 1,
+ /datum/gas/healium = 1,
+ /datum/gas/proto_nitrate = 1,
+ /datum/gas/cyrion_b = 1,
)
///The last air sample's total molar count, will always be above or equal to 0
var/combined_gas = 0
@@ -624,6 +646,11 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
if(prob(50))
//(1 + (tritRad + pluoxDampen * bzDampen * o2Rad * plasmaRad / (10 - bzrads))) * freonbonus
radiation_pulse(src, power * max(0, (1 + (power_transmission_bonus/(10-(gas_comp[/datum/gas/bz] * BZ_RADIOACTIVITY_MODIFIER)))) * freonbonus))// RadModBZ(500%)
+
+ if(prob(gas_comp[/datum/gas/cyrion_b]))
+ playsound(src.loc, 'sound/weapons/emitter2.ogg', 100, TRUE, extrarange = 10)
+ supermatter_zap(src, 6, clamp(power*2, 4000, 20000), ZAP_MOB_STUN)
+
if(gas_comp[/datum/gas/bz] >= 0.4 && prob(30 * gas_comp[/datum/gas/bz]))
src.fire_nuclear_particle() // Start to emit radballs at a maximum of 30% chance per tick
diff --git a/code/modules/reagents/chemistry/reagents/other_reagents.dm b/code/modules/reagents/chemistry/reagents/other_reagents.dm
index f344a91f929..6aaec008bf4 100644
--- a/code/modules/reagents/chemistry/reagents/other_reagents.dm
+++ b/code/modules/reagents/chemistry/reagents/other_reagents.dm
@@ -1362,6 +1362,61 @@
if(isplasmaman(L))
REMOVE_TRAIT(L, TRAIT_NOFIRE, type)
return ..()
+
+/datum/reagent/healium
+ name = "Healium"
+ description = "A Powerful sleeping agent with healing properties"
+ reagent_state = GAS
+ metabolization_rate = REAGENTS_METABOLISM * 0.5
+ color = "90560B"
+ taste_description = "rubbery"
+
+/datum/reagent/healium/on_mob_metabolize(mob/living/L)
+ . = ..()
+ ADD_TRAIT(L, TRAIT_KNOCKEDOUT, type)
+
+/datum/reagent/healium/on_mob_end_metabolize(mob/living/L)
+ REMOVE_TRAIT(L, TRAIT_KNOCKEDOUT, type)
+ return ..()
+
+/datum/reagent/halon
+ name = "Halon"
+ description = "A firefighter gas that remove oxygen and cool down the area"
+ reagent_state = GAS
+ metabolization_rate = REAGENTS_METABOLISM * 0.5
+ color = "90560B"
+ taste_description = "minty"
+
+/datum/reagent/halon/on_mob_metabolize(mob/living/L)
+ . = ..()
+ L.add_movespeed_modifier(/datum/movespeed_modifier/reagent/halon)
+ ADD_TRAIT(L, TRAIT_RESISTHEAT, type)
+
+/datum/reagent/halon/on_mob_end_metabolize(mob/living/L)
+ L.remove_movespeed_modifier(/datum/movespeed_modifier/reagent/halon)
+ REMOVE_TRAIT(L, TRAIT_RESISTHEAT, type)
+ return ..()
+
+/datum/reagent/hexane
+ name = "Hexane"
+ description = "A filtering gas, don't breathe it if you suffer from brain conditions"
+ reagent_state = GAS
+ metabolization_rate = REAGENTS_METABOLISM * 0.5
+ color = "90560B"
+ taste_description = "fresh"
+
+/datum/reagent/hexane/on_mob_metabolize(mob/living/L)
+ . = ..()
+ L.add_movespeed_modifier(/datum/movespeed_modifier/reagent/halon)
+ ADD_TRAIT(L, CHANGELING_HIVEMIND_MUTE, type)
+ ADD_TRAIT(L, TRAIT_SIXTHSENSE, type)
+
+/datum/reagent/hexane/on_mob_end_metabolize(mob/living/L)
+ L.remove_movespeed_modifier(/datum/movespeed_modifier/reagent/halon)
+ REMOVE_TRAIT(L, CHANGELING_HIVEMIND_MUTE, type)
+ REMOVE_TRAIT(L, TRAIT_SIXTHSENSE, type)
+ return ..()
+
/////////////////////////Colorful Powder////////////////////////////
//For colouring in /proc/mix_color_from_reagents
diff --git a/code/modules/surgery/organs/lungs.dm b/code/modules/surgery/organs/lungs.dm
index e8768306886..72c073ab4c6 100644
--- a/code/modules/surgery/organs/lungs.dm
+++ b/code/modules/surgery/organs/lungs.dm
@@ -99,7 +99,24 @@
var/list/breath_gases = breath.gases
- breath.assert_gases(/datum/gas/oxygen, /datum/gas/plasma, /datum/gas/carbon_dioxide, /datum/gas/nitrous_oxide, /datum/gas/bz, /datum/gas/nitrogen, /datum/gas/tritium, /datum/gas/nitryl, /datum/gas/pluoxium, /datum/gas/stimulum, /datum/gas/freon, /datum/gas/hypernoblium)
+ breath.assert_gases(/datum/gas/oxygen,
+ /datum/gas/plasma,
+ /datum/gas/carbon_dioxide,
+ /datum/gas/nitrous_oxide,
+ /datum/gas/bz,
+ /datum/gas/nitrogen,
+ /datum/gas/tritium,
+ /datum/gas/nitryl,
+ /datum/gas/pluoxium,
+ /datum/gas/stimulum,
+ /datum/gas/freon,
+ /datum/gas/hypernoblium,
+ /datum/gas/healium,
+ /datum/gas/proto_nitrate,
+ /datum/gas/cyrion_b,
+ /datum/gas/halon,
+ /datum/gas/hexane
+ )
//Partial pressures in our breath
var/O2_pp = breath.get_breath_partial_pressure(breath_gases[/datum/gas/oxygen][MOLES])+(8*breath.get_breath_partial_pressure(breath_gases[/datum/gas/pluoxium][MOLES]))
@@ -314,6 +331,47 @@
breath_gases[/datum/gas/freon][MOLES]-=gas_breathed
+ // Healium
+ var/healium_pp = breath.get_breath_partial_pressure(breath_gases[/datum/gas/healium][MOLES])
+ if(healium_pp > gas_stimulation_min)
+ var/existing = H.reagents.get_reagent_amount(/datum/reagent/healium)
+ H.reagents.add_reagent(/datum/reagent/healium,max(0, 1 - existing))
+ H.adjustOxyLoss(-5)
+ H.adjustFireLoss(-7)
+ H.adjustToxLoss(-7)
+ H.adjustBruteLoss(-10)
+ gas_breathed = breath_gases[/datum/gas/healium][MOLES]
+ breath_gases[/datum/gas/healium][MOLES]-=gas_breathed
+
+ // Proto Nitrate
+ // Inert
+ // Cyrion B
+ var/cyrion_b_pp = breath.get_breath_partial_pressure(breath_gases[/datum/gas/cyrion_b][MOLES])
+ if(cyrion_b_pp > gas_stimulation_min)
+ H.adjustBruteLoss(25)
+ H.adjustOxyLoss(5)
+ H.adjustFireLoss(8)
+ H.adjustToxLoss(8)
+ gas_breathed = breath_gases[/datum/gas/cyrion_b][MOLES]
+ breath_gases[/datum/gas/cyrion_b][MOLES]-=gas_breathed
+
+ // Halon
+ var/halon_pp = breath.get_breath_partial_pressure(breath_gases[/datum/gas/halon][MOLES])
+ if(halon_pp > gas_stimulation_min)
+ H.adjustOxyLoss(5)
+ var/existing = H.reagents.get_reagent_amount(/datum/reagent/halon)
+ H.reagents.add_reagent(/datum/reagent/halon,max(0, 1 - existing))
+ gas_breathed = breath_gases[/datum/gas/halon][MOLES]
+ breath_gases[/datum/gas/halon][MOLES]-=gas_breathed
+
+ // Hexane
+ var/hexane_pp = breath.get_breath_partial_pressure(breath_gases[/datum/gas/hexane][MOLES])
+ if(hexane_pp > gas_stimulation_min)
+ H.hallucination += 50
+ H.reagents.add_reagent(/datum/reagent/hexane,5)
+ if(prob(33))
+ H.adjustOrganLoss(ORGAN_SLOT_BRAIN, 3, 150)
+
// Stimulum
gas_breathed = breath_gases[/datum/gas/stimulum][MOLES]
if (gas_breathed > gas_stimulation_min)
diff --git a/icons/effects/atmospherics.dmi b/icons/effects/atmospherics.dmi
index acf48a0bd09ab91a59ec8d7a448419082bf22066..640b26fb3f2727b6d552446a4a30db5359d73a71 100644
GIT binary patch
literal 27163
zcmYIv1yEaE)NOEgYazH7D-?Hkrys>>krslxLvSmu#ofIGcPUVcyK4#VZh7hdzc=s9
zWG44!=H9dS*|zpxiPThAz`-QP1ONayN{X`D002VXzYjVp{LV4|Pks1>ocBjPS6NFJ
zb7yNuS8E4*0KhY=I=MGC=smIA!Zn+T>q>gQVA4_@cRB{vOXywg<|xI-9*apwD^u?aAEw7#Hmhwv6{NwOY%x93>+^aDcz*g)`dkJGh^Uj3YN
zCe_bU_+6g2;5(1^hXIuA_s`#B_|H@>=as8H1Lx1~FUMVSl|FIchkckHX}Zl67b`%h
z{(H?2wU}%UJbLG|96{i<5aEH`N?@QCJTcu}-ovg$-Mf!lsy*8w`Si;7NT_M;c99tMLN9irGIn0(v0@QI-=eJ
zLh*>L{F$7mP;iWe?hh--8tqTbxX!X(jIj{Fu%&#`gw*Ji(It$-RNB0vQpOgRov#BGg
z|9JRx`{;M1G3T*e{Oz@wEw5h=;7RG{{uW^W?k~sR90`xD8B0#|OVQMh5_BldyZvn59nmT|W_5@FmXbJL69q6*7oE3mwa|Lmx((bEA
zW$H@iSS^(SWujqhb5$lk*ZCzsFQefrGch8KQY0Yz2*aMhFtLjcYV9YL9!3aBR*>BC
z;lGELM!pvcf$fyuMGru!0TMX!TVi?|0Z!V+HrA~uv}TCtmp>cKd8D44CZd+tUtMCxzz7pdAU!LNiN>4=H|>DHQ1`;_{n=cga!St|+0dz`L6
z(q-{M|5-y;kwn(!(oqebEt2S`mrO#
z-KsYD#xwOaI+^|f{YAZ(4e`&x#dl-~?i>gxxWP4g*1Y%n9C4r9kV*eU4=yA&a!geD
zMlMzi)%=c1cu+x7+Ua-;-D2@J5C$cqiV(e+xa=iRb;KxR@t?Kc@oGnq150}Fn=0V&!Z1zWg8;aa|?)*AGIWOswpfmp9GSfk5
zb)0{zKNTRog5vSIio&UdfIjUk-3p`(d_S&`yB1>Z+{RjuHWIxKZ#ZE_bfiXx=k_A^l=zL?TfipV=jdWJ9b;Hu
zsr_FjpIW`=eBe%b4nk{|bbxZ9%#m1p3BShrqIK1K38IB`r_`+1xxVT)>6I2{iUfqc
zW>IGCI1jC&0q)9m9Hj@0L0e~|0LP>x=O?(wD)NaTdpX(M8t`7h1#u#P_^Hf%3k0Vg
zd;oZ!T^0|G11jEHy2cY(bzf%>IkO6~viBX?)gegU$z9FI1nLM@YsV9Q`&Lac>fp65
zBm$yU>m3|QZrg3#jh~^6O&M-dB&aER)j*805~Os*&_scqFQI9L5P&!Zwme@oNh5q6
zWl8o{s$4f|tycPWc0Nsi1N`$_ttj8rCqU1jT))%_CIQfsAH#8m!bBrt`dWD+EHcqv
zi7YKteB2)r1IXCX_GUyDS7y)?!F|)R^GBL1?OuD+A1e4a=m`+3?I<^-SX3&V!S+mz
zjzaHy`#AQ=pEwDXua@OAM{)RdG^Lm9XTcQGQj81e$7ZAF08WnPX;!j>ZtS+yW3BAk
z0aCn7gCpu2;m>}vY1t~8khbdEpNDVQD8J$0&^mrTeNMTZD-v7St)2t_vyhD7L5&Ca
z(X?Oy(gNToMHrqDBTdH>eZ>C_Kx5*!i9JQy873DE^Q~QFHQSB*E4fdTRzU3$%@k{(oUE2i&?+-5%f9j@2#3#Zv|kwZdq>+n0_2ho
z=0q}|htb)Qwhgb3o?rp$%2F&Yj>6Z6u58aMP)1*Zxb6a5tQ!F76BJ<>)4JkNAcv@3({PVCVf{7;*whUYeg;jG?+U$
zKsY+eM;mf`{D;$KveDA8XXRmG_^0!IjwuV~2Yo
zlM5xo@OJs
zqzE=g14jOa39hheYW>HGv#|2u)l3)VfBrVyj^-&SO-H)KaXZ8k1_=Uy@fv65GL*q
z4lE%Fb!H@I4;-kBFa3V-ku)3n-Bs=-d6CHNiHjXM7`Oo2
zw5Ir4O71?+c!{ZUlzba`VpOt4x+~MkZXX%p3)uI-&lU%rTzz!SZRUd;!wMJr%*>Y0J
z#GbxhQ&h#;x8aA<%dvGIulh5D&0tyMf*g@hOpZvDVkVt4@^@VU!*4pXVFLs$3%%PJ
zdZs&6*8j12l5VJ&8;RUjYwxbhj^B!GLpFnE#^hwMG}R@@5F87GJx{e%!LHcHeKYaNJK&2?4mZYU1yrK-eW8|S
zMQlsI_dyvz%wfY7j!NF1C`YFeJTB0QO>G>JBP34Pa$WuHEKcBLj0(=wvIw35-8%pP
zdL3%+tuOy#@;Y;tVaK+I6?1bI7B9CJB6MW!w^U5Le@b8CJ--l9zEXF&BmsUi0Zo-A
z82T3=DSXqk|1nwu^Cn>d0YK_TLZ}6bJFYUcjr+u%H*D1^s`=H>*6@4Ee~mg%FYxN-
z;`iEY(K4w`za65y(%Lbmb9s+0@)V{KbR!u5G}vpS7Jo9zT&;sXydr;9wp*tK8}P66
zGcMUf31zV$pxkvNiiIM6(ZoSmyx<~}#-WDe1~APJ6l>=UYF&$L2@eE~bR2$LgU4!j
zbuDF+X9*8eEY)ohX)fr>2f{qME~>k}{e*ZCM1*Rg)d2>TQymc!##M$UbHY3maWnuM
zYp0Qm3{CCTz&9yQJ`MDw^<^*lq92(H#2zcz`iovf^HAi!x~DbS14B~m;q)K)J{8UR
z5>)*}^HS}*l+qwv_ChQJkKEDXVM^VLcsEbtZ;sYkB0>jb_i3fp^1y^p
zRiyqzCQ#dw)77c`YOYyC+MSY;nBN+aDmyEUhw>Xik@-+RjuLuB#UME1Akf1oJNguO
zl|6bQ<44_sH%2|kM(d~}{om0bW9qYhITA+?$0XOCOeJ|%VBv#EIr$$#Ea(18(am4M
z@87yvqM)NXA`N8E#^Ur^qwKA3CUPM?{URPtmi%zn7mUnU_t;>#SU<+F*#Dr@ppyGT
zC}8_dtljb%($YND0+=P7>vUQfAN!^&ueje-mZrt+0ed;8&tUYb54A(tqa)sWQiFpd
zSsGX^#qfj;F#1!?8g5YpGRmM>S$;4Ss?V6s|BBthuej@(m^Y`VNG}xoXPO%>RnV2j
zfyztw#dtT33Z1FXvjX#%PC?xG+$0&HmA{C2k;_xsXb>^wT4Q8A+W2V4Miavh5%n*F
z#y*}2lX_G=1PB8zLE1%0ne8DMyJ7&(PR*o(-2s@Pe>v~?MwILJ1_y17K}TGi#6n`-
zO`6!NDqTAtMhWNx)p)msigLGw&-jC(3EII$>r+1w+XAzCF9Na2fB2-63|Snl0G23Q
zN9ZR|{Umr2HP)_|wJO?b1EMY_>%HV^WMSA~FUw9ZOJ`8Q+{&3v;4KV$BX$$#eo7v0
z`4VDEl+wu5Yor5CyDGKKv#>3`qDBxz{9SPUhyZ-c5pn1y$P|%PW65v@kNFd0Qo?w3
z(ujKY9rlLL(rt^s_@Hsx;c4Z5h!Omk)1&*T4TKIhke>Gf|Cw*5npEz~1(UB;*HQ~e
z*G+yP#JGLT!G=C7NP_r|iKS`9iDw2iF5o#D498A^7)&Gtil64x5hkz<4h8+YCG=@FO^-akgatJq7hR-RlFDnoS>`^1CFJd$wt#(yA%;ld
zy4r)t{{DW618YeKqnD9z7rCIwNXkLT#9BakGfw+=ozRnI=A!!%9_AE&hoz|Na%PC!Jqy`295B
zvE}GDo)!PYGJ(*kV}$p0k%vKSLas-=x>38lILM52Ml((~%+z5RlB=0-185tEQYL>>
zjlAkY$w%{VA@1x(%zJJz%KOCvXd`^d!?RS(bJ^|PX)Bn&K+Q%lE0gI&wjI=h7IDV$BpU!0}kP->dEaO551om;eP
za}qQ4EaGwEa))#;htCMj>a)594BP%DSd79+2WxAELoK8^5Q<$@n3C5#;G2An&;JJ3
z1{OCI;YO~5yeZX!moI&qf}r)FdEG%b3$D9#&25HrG6ePn{4`|cGmB=1J|)$Est(?^
z@Jb_b%m6q`WSOgYR~OVPsS}BP)?)jSzKH3#T&Hs~y*!(V!oUV}objqRe^XxUtz%bD
zuHj$^I-XsemsU^@D+;!qakad4xndSEwkr2k|2^5oa4g$tE~X}a60RA7ETU%57ZuwD+{Rn_bwJp)umr-v&YK-9
zzeVOOr9yNyiVZwv(GB!gwCQV$IT(#+-K+gpZRU3jY=hNRW*a$m>KJP0AI&wJ6fI%b
z16x~LKSQ%c=QVZ`6NjG6blXLq5Gb21_fp*7uGcN~|R2QQw9zM5L;$1TYk`qn~
zW2n>W{v1%Ni8q=4EI+y6#|9ZH<@{=zeKmR@r>uWwo9bHkRted-
zdL7b$4wl{`&xYOybtL<7D?fs4N0$-|eudj9yhHgmby#J*2DS-DwRxP<7R_n38c!>k
zM=hsZtiP@6Hy`6xw*SpN&(2{^0P)P0_;hEr(0%X{0JjpGVd=KlA99^V^RdY|i6saw
zA}ojvCO3Jg+J<^q@xNei2;+%m{`SR8J*~Dx$EhC+lFxxV(5;ZI=;Z;MkS}Q0in&T|
zAYGaGKUnov%>D!~sX%kf@V~%}j~?gCHF?4qIz(sY$v)GqH(ss3>a;huFl%
zqxkH)0K{8Ke?iC9L}TB7JG`J$NEm}tUaC}W
z{*ww#jaJmnHzv!Z=~@()!4yKwi@YG`QG)vMCWnH47N26h#!j{l7|ut*z}jLg^Um&<
z+j8PHosq;D(e`5s
zH_H6kWFI7vv^a_R)ovvaENIhKEIyGCpIlYfF)ypXk#PSznDmddl{ygJf$(y2A^U`0Q)bU`ih2ET%7;@v4F}-Vu
zDr28_r|1h?N4CJJr~DLfxuv#kezdH?9*l)WQ6+Lwf^%Y*-bU&64ZV!%=06ooa*C=2
z7aOx+5`-8;HpGnd^hJa}cL+Cw|591N)JjC;+ThL60<5hWhlr@t@$rO$^z{y*x2ya8
zXJl@|#Fy0MOAG@)BaUX;qh5IHxLCT)aT&fvjh1X-X
zpQ#{JuUfRmu5*0jse|3kFkWFHdB15syoldcvfi(NLvZvCyPXj6?!-%s>0OhfCm-~z
zct+-|s`PE40PXSF8Fd)EGjP6N821VQd?qyeRXOcapoY*h)(
zT&BvH5;?B3x6Y+X!~88IBVt)3F?~N;O|3e||LNDKFDd8-9Y!^CN96um)1hhGQ^ccLQ>tvpZaHEqWgW_s;-)ia>IX`MNo^>Y>eb&A
z%=rZCaTQg@;A>~=fh`Q(A^HU=_8MY2+3xg*#{H@sC;aj%)$j6Xk+eGHXg4T7VshSv
zyfdbmNn913vFUWXoj=J>OOejD=~X-CA!Thbu+s5_41wyTQ;V69k9~`@zPsUs*(t)4d6NBUWa8q&ZV6tb@$fVS4o+(t>76mYqNRWn~^vI`Udh
zJiG+Cy#m*a5E~{r67*w!1Z6H-zA4@m{Q_wMD#aI*O>5;Dc)ReJ1&z#+@m}c)HYL-A
zkV0#h71%z~V@Z0L8SK1Yn$HnKqb%slZv=0HUtGY;T8vHS{NYC}~B(u<-Xu
zrCJ(9@3u_jYqllx5qmYtL20mop$U30cN-(d@fiBC7P79fu@DZ$YvRYZovc6A$Bcu>y5t2DAnohQl
zZcJr*x6O;C$aK9|W5+t!IyHrZX80azv17L=oeXSio8+3T^)sw^O((i5VPAa
zZdVBDi8QOGtNge?52)(Gvyx{g>YRFfR8T`tjF4V&&Q2mbf>?=uUQ*zr)f17m_n2eh
zw~exQ5UB>q8d4LeslF+ceNVL;46_fKrqJRmuQ3RpnF%XzuRmQ16RRI(=^%hWSE<;D
z$>?Kff6VTO=J2boow#YJs!pC8?2NGu%8!iAhpTs-{}nqC8F68@*MEP-*`>ri-4~ES
zq4db$e#nl?M&157iPfu
zbLS@nb%}{%yA3q((EwC~!(ZZ!pL^YX;JyF=AnJRI*x_}D1Ge&w
z;HDusYmUF-1#}RfUF|M?+j{coR-^1{I2&mY=A!~PnKmVKEp}!*<916*B)&9Lmiw?k
z^@Q#okoNBstscb22wYF8Mvc>!4Mwi^VbDn!@l?bJbiHzS=o4voZV
zGV%@uOpoXdc+uNLxb`^xrbFY_XQU8!H+r%G`7FrNvZLwKJ*VDLIW^WP0g8WAckZrS
z{c!_1ifUcG8%PRJ
z4*(#+A1Mar*W5%uNl3ok-ullx05lW40VVj}RL-rd+r
zH^BU6qp0$X<$9T#$J}qV82y9$1Zvk74oKof&x(t4$52?(_FrGLBD>$S{x;rS50I5K
zvVe*i+tu0sdg$y(cDZyMQH0O{=U=X21`Mue|1C+S4mBm
z*If)ysUD1>cyuhbd14D0w_WI^m8&GP{A)3^qQcsc&`XQ=`vH_{G{t$QjbtBF?QTvh
z!~^)QRiJ)MqKYrdV^5g=X=711R$KauE6rcc?-xXETTg&vFgmasYxOE25wCa@v-m0a
z%1as7!&KMKIzhZWaj`Z8TCibb-G=-C$V0~}UdAnwm)-pt$1jF*lqa6FNuGC23Fx^y
z^B0j5AN2!l9u_d&k_CdRjwq@}2FNq*yNMI&+Dr8QtmO!oF#ebo$5x8FspvHGX_;I-
zn|%P$@s0?li#KvAO0O*4`d&X_*Ha4c4|swueo_mamTs4z6f_|NMwTbV0nabn9ufYj
zTAB<3zPE09Ho~R~FbT?&@H;#hGX>cs_X47RPDs;~e4OI9g*-PaKDk?yDfxG5mW)Y>
z9Gz*!vdJLCO(2()dd+Tod6Xbeo6RYs5=P*x)7hK_v8=y(e1G(S`>HjXBaqb(FE#^T
zx6W~L0U>qwO+kjG>(xv9Myv#u#6m(xiX!xyUL~^+8i1f>L3r{=77ask>L5M|&%_b$
zyw9%0*fP&SEz3mX<)%`$#y*n&PM~cB8AJ6nDv~8#c%zJRvwC5WTvG{^$+`9|hW@Tb
zP_9qD7^_`_mzeYwm7Bjp&S5TfG;bRN?tNRcB|%h^2#;G}ohyB_smAk9f7ZHj6^cG4
zzRiU#Kht1Wl23*h@Aj@Stu@b2%{9?NHHqH3%mf>~5IPETsj$jo1(hXC(QQwj#tqf}
zMVcT1fM?>WW?dblIG?GLRDi6Z6B1xqWRl`3+|MaixTFcc5hl^6G&){?WW~Aiq}jnagv<(OKaAR64cD&M090G6-*0
znUEc!b-f8RGQp)T0&#QmT=}K$k}TMhy5+t%h0+M`(ad$6|BFcQ;DLH6NaNm$TUjo!
z>KJdJh5*d(z
zWyq(b8?Y=-QQVkvcX8nqNIk;^{C`}49_PV;cNug03GM|-nE*4ha%)7Ee14935d)1F
zwRfFNbkyp}#QC$gl&SNqCq$0;FWucVNrIGQNqBkP(Nm-S-?#?UFikb$@#eI`Dc(ve
zto_$P&X3lbxp;X{c3ouWM(?mpHjK5({Pp0X9y=B|;7*jA5h?r^)-4DpKfHuCD^V~S$e1JX
z$@7J}9cEY^%H6k^r~!mlY%=KiaYpB`iFc9e*1xJHXgoh$#Ygy)W`9MCXC?wMB4x#j
zfam^ey4&)Mom4Jeg)4QJDaro@9%!YniRjWzrP?^2ihXK1n?n^@QrV)wyyxs03(`8i
zHxZ(O<<;8t*-74;MfELj7?%}C(j;}h$K9pGhVuVbT+$3qO<1U#!UOcIk#RoL83fYg
zEFj@0MDe^s%!2|#CzNe^2fJMq<;2m-cc{gEw#wnj??OzkQ+%{lTq`*g3acY0KKH*f
z2`$x-XyDnp`2_HXx4)pCjcdZJhAjGwgmsQo)5I|$f}pNpst5ntaGZ+GbtOh`EB?;JLIFC*l1DzC7d$l)m0tvj`=Y*(h8ZI@*E{
zu^r+;BwahMnZ%!3Sp{*5V$~A88yXq^5(^$k)vUD=8&t(*zLGO$s7g8GKo(jRuB1+0
zXCaUlr~+dyaTrZ5ik`8(1AMHcs%Y$9vn40+PbM!x?>oF!7FIMZvbA1mE{Gvb23q6<
zAa*z+i`n%tVR!Vb2GLuHayoJ$4D0HLNf6IN)$l(nqdCe@KxR<;WZh<>JXC7oIQi}}
zZ})FJdAP1tWXbS&y_9ozqp!i8|NT_a2R>(K9z*mYlFER}BFCK`6GYSa$2fkLhL2
z!!TQ4aiqd7-!?6tT^Y)7_Lwpl$YHLj)tSF
zUCBG_W&nzY#hl{AaaogX_i_vmd`v#bXYJ99cd>@-L*@SEot{z0)v~%o`RLbDZC5Tt
zz`p~oJF(3B^m{#c=UV@}$0Y3H$^Vr~7vu1;Z~jfItI@j?1&%@@{Lov;LGyA%zewWt
zapA2{Wb=2_j)+%(0&vw^4*G%?ozwNop&^ASsVHnJ+1t(KvGA#l3#0g+(>Fpe#%}XeVNj2S1O$fJu8Tb@=zxNjUFV?)V!XQ~OBDn9=3!Pysrn>_hYaA|~j
zVo`L&%~3opOW(K=FT@D1#uBrJloU6u-SlW!=IPq*VqiQ{{9LD4PMLT#VUe7EE-SFP
z^cC7u`N|`_N{<^znREG{i@O=J^ay1oB2c
zr~>Lzr=QRS)%!!y!}^wk3a6kpYNU*ahcA}>rrr~!ue#&KzY=0Tnkvp|H_C!SKccPf
z?{fcktCnJWVpMyZ<)?GhG}v=PO;}2;AI+j$kk6tWB?0Z|{TRHOmG`s(XE*e2pQY?G
z>9j{Kco?2`3vO6=b6z|+Q{ji|PRXBoYJ3Y+8dD)F9sH>M6hF+lG`F%f$BXn`m4SSd
zmyX2A`4r2(I&4LD5-}qjDb|klhoCna_^+Y7%jLFw$m$`+CsKkzXQvrY`mI&GO;2qr
zV7+gI$M?GL>7*e{jPIXOb;o&xxdYinmI}BH>8a?*pS@j=RREPXy*KWC_aE4dJF`gc
zvOwMYokxO@1!eDNq&n{jy>$u5{VQ14ElgqxSzgDz-cGu
zCwQoD+L-CSF+F>^`XJeDG>i$WyMOTf;`3aHQoOSholD+|haOkjg%7_CTuCG+1x*9#cuf#(rCMQ*+XJkJ>d@cj{U5W!rCJ#mE-60ffkoFauAsu+ypBF9h7
zjKKiFYj^v3bMp5LCS;{H^v~aczBR?4v^^INOI%|C?=;q*3{o^f;`<0AGaV^wtv*VL
z6~B#r)CYQ}r2JyPymW4s)aQopuQi6YwO-
zC}w#B+7=5W&9H{~v*l8@v^Njxjd(u3*x(ro9Mo(MeDlXhYfa=P+}h`H{oX{~b1|CW
zsP`ZxEqWv0J6TOA4rTYCN^POJdpQsY^Js*Rb<|sKCn3o&?*0#@cX$q~?fyZ_w<9aL
z;?HyI6Y8Qa-Y|Rsc=>EKMkV}A{0h^{7dN-#b=Oc{
z{W*B)hw}xk)Jz1!6OAyLX(z&-2AnbTH{Ig(!mX6v58S5v24xKe+6VjoxPP`}@u;d2
zi)6pd-r)7DX`0iT~SMzelduU*sk>c^*WUnE<}k@6fG?XmK#pPj(3N8{
zr;iXf{oUVvk9U+Fp^LYoz@&K>c$Kl!8oCbeN>a*WDNw-Fii@O@cq(@N$25GxIR?PksBG?ZQl^9knvhGPV!$Xn
zH!E7becx)00AB{7bAss$l-)Z*`K4qfClGqB;J*)%jaDG#k?WKp
zY;mF8sc1fGTX(BgAA2F(a^8r4;%LF;05`-Xe(|H~1lGFxHuCGO$pGI9^(7}BVAXlB
zGSP5W9lqyKjIL;(-7ksl&vmj0_fz-XOS7pB#hDuK-9{5&0OnD1$9KSpNfVSJ?<35)
z5w%dN2)ad5PXx6uXo`&}JRRz^9V5}1<_=P2XqpAJ4G7~A2Zzy-h!&57GSe50
z8`IH>dKC{OvY%rfW$_OK2FwX{Rh
zjov#MYxs5%9>_Yp`JT2e6imWV@PiB?)ov?LGj-td|3Y&v?Mo)6#`796wfp{=sghln
z9(_MB(T(HnNVNe?3W}p@TX}3p1!VJk{8;aH2|`F6cAJIJb&9*~8M)?hx;*Frw@Fbr
zy-xJt!7p!BP*(o2cR{Df9C2cB#NrbAJ0!P3@
z>WL%LW@Lfq4G2VM&2y>r2dmHXxpV^@K>2!b5t7>1Xz6SC-g}JokU-8hdORKMt$@U+
zxYA=-rB=Emu&$sYiB_l1vi0-jUzscB{Cv?t7ZK-ke~fb9{dyRKrp56+RsH*Lx5kO
zHHH8H%3ggdv-El|_!M%zgjT1_Q|0mektQ~y=J}f9oKL}6Byio0^LH#*3%K1Rub_9v
zvNMK~5_IL*=;{CTY4?plHG(=^>UqKAGq_8d|0E`_{i>QIn12bc=3DwI}HG_L1
zTEJ~gXJ$2KOLEqGqU^+CCl;#EhmYBG-*QVSGf;!FC=*LP4&J2LCb6>?&LzzJSGaKa
zc-H|F;-kS*U>ig~=piLC7_*Vo$nm=^KihcWpDP19)!paY11i>KwuAsJGA9&rwj0n4duukiIk!G$k@2@o6`wF3bWxlkY4Xd>V}Ha$76*upl{yCohv)1jgkI
zJQ@&Hd>03a<`cj0D<%UuIu#tMUBKaILUhRda>ECj!irpfB>#NtP?X8yx6V)V%d~cO
zY8q&%=D{JlY7C75@fv9+Ba{?4;RN21pQtL%2gCVv)m=qKS7Gw(?%0(Jp$i?cZ
zHUC`g7$f{wkJ9075lC`&6bkqp>L|!YQ*`SE1eo9wXsUxt#y|75#@ooeLo*>takSkW
zZus-m+>~F+QSEly@!EMB07UQ-GQjLS;fY8nbx@=@1(ZWif1Xb
zc7*YB$ddaTzRE5Vnyj5u;j5vqGV`bhruq1m2L{>%Uym}^2Nn)3hh=fh^KYV;K{)uz
zDen7oeHX&ZAX?F
zZDT~t*tGgF@c1m!%(a&DUpE#*;nO>xQFP-9iXLW^G#ML(2}bSToTt&pAnn+txjLkW
zfm$)WO`3~<=La1`ksQP4kpJpxWmlvr(F#sjH+OpZ;(hHd{A8QNF6GiFp(`E9D*HF_;@(GNb^pL
z{&(9TrLzJ05?o9Pyl(u$yC&9!2G_X~vaHxaX#w)+>4yo|yc^#_Vr{6V5ylsU)fZC#
zhR>Yn%AJWm`lI^zzb*riK?pkFonfF7N_?AKo9G9)Dil=)UN*MN
zs1yc=_I@urem<+Pj}%Seg=JvyDhh7yk+TtGbt+A7L54{aOjWzncrC_%>4|~4cfB05YM_j0(uuCwK@wSd!7C&
z?$^fI2V866lfh?*o4?_Jvg3YlO+XuxvnonM`o(Dv;jiY*V4+i@b~Yo0nb%C1KYXg>
zS0hr2YO!S{W)i0vBqu!S{DTJbm*WPFlu+_XrC#J6ZiH!n&-G9YMlJp-5uchA}mpqa_SJHYc9eK
zUvyE(jic$v|GsX8>vZBMenEzA7jUJ^z01wIUoRbx_$RaWO>r)j;V(akvxAm;Pu&S-#QpIRU_sD
zA}H8cNQ1S>$;i9ppov3GNXHSWFOioQ_cKwpyhCPZM2?S1Ds;n#o!K3&hEQ_XrQ#)5x@HYOb-=7)(
zdFD_@%|?+0Di`s=9B#w-tI_($r|$+ZRJ>g+rPiDKOkl-zEwqBG_h?jT-Q~FU+Jkz
zTL%k`6PYXydr7vVjy%Vvj^K
zyC$W%yBjw5BPe=vu1b?FEeY{r|N5Pq+Lv~Akxs#evJ%8-b*@uA?~;=92NySe_cj#$
z)x8)3;TI-;EH(7u(fYe|HeTVT@|jA8(RThV?o`4|h4N0@f-#~@grDS^oRoj%@E2-L
zC8mOX<<+%bpVtC5AT{3(e3ct`+Zb5s;_8!&6vcq8Oma;1=7|#_$X^L2vur-}N==N!
zyYSe;i1nk7B%ru<>MGs|U<0-HC)^2hNxTX<>FuNY*>uY##N{OXBVW`P&C;1d-b&dq
z$-7$7o5wB;3~;O8@YCd>JlL9loL`pj~vs
zSGB^k2iVp`fT!64+5PIxRc=|oI>BT~pa|^Sib0A{glWb+eMLGX>tv8$o?Mw?)lCDD
z?!9uwc;Cp}@UT$p`R+~9th
zKB6p*NMBHDr4k3Pm@+bAkVLT@C2+)pP4YxBRaG
z*#&f~WJU9j-+>5_WNx~qn+`L$M{mVI(98IL#{(rsnDL^2-1G6U1BaS~bM3@x-&{Rv
zc$$w1{cRf%+;x6^elW;nB2CBr3OZL)Y?`wzY4ddzOvVSDGmVk#Bz{!SR}px_q26kmqvV|;aWcxyxoc|f}fUL8CN?>MQrD`A(dG%3FIfUA(<0S!rKP}1DGA?!_^pH7B&jS
zx$DcVv_iNJth6GyX4TtbrOvJ#LYGh$-hL1hm~kN@qR+P^Lj0A5*0{5;hJGQEVetPc
zMg`b8d^Gtu_I&sy|K79xTy5GZxi!nwq~^fm?XIoW7EE+%-7g!U2(0)|#HkN8Rp+KI
z|L)DTZ~#W&u44FO)km}pRzdpfSO%s?vjv^XH=Xn$il5F{Sc?Pb3mKxx7I9vL!=~zv
zVl4@eLQqY#rkR%NA|F+d>HWlHShX{dEkb@6EZcogHAv~%`43t7E#%5W6$*0|>{@xS
z>4^z*ei|cQ9T-5S&{jA~uul{=w1HLuk!)U=pr$_?Aa4=IghYvS(^*Hy)b;1_!$_9i
zbYxZkUb>?SPK7!=fKXyObO3$}4w*JXYO3Fn_S!6~_$I#F^*B5+WLJga!0r0)gNx#z
zi+?-|ihyAgGgA{@r>O$|(tFd9I@(%`x~QnHIB*_a0fx88!*H0A>;5yxawT87u_Hx<
z{Eqr70=x^|
zyG70`7yQ-zM|S-+2M!Mgr*D$L{P>xoPzyubMN;_RCUVN@?G660`OW)ad*@1^B{pZ7
z?G}{kBSpQZPmNq(3_aRt$0b~PZzJ{lYNB|J;S48(;GZpEHjXFw02ONHrJUogqTH)~
z!Np2LFKpWS-1UzeNQb4QwWiHqPhDA8(@5*%d&a%*_6kA%IFl&$k0mG_vVKrF9QH$+
z;`6#DAHrHo8?1UT97d`0#XX?BV~|^eJ@z4g@YTpmpypI!%7A$phSmA&<=5PcgHjEg
z6W_Eo9YYat%=FCv%+qRz=l{vi_h8YWlki2z82hD)JU&dbiq`Ekvx4a0O#GCHNF*|6
zynA<+QQcHp(1=oddStOrxmRCMnw|a`4c(rScXlEQtUO*3sCNIReQe-tz>*Q
zkky-aNB+1dBQFUowSs8uEz)u8oy_Pk3)eigXs8|&YvV46{KoLU+w>Sz-w0wazq+al
zWQ3O+spIed(lm=*=DWteKP769sdO-XIfaDR_?0)Fz+0jles@1U4Zk?A@RI_=tK42w
z;}aR@O;wsmhCF^m2nW#vL%{}SAx^pJZ!pqo);(JcA_iA8boo6Mgrr6O*hsEh3)l#W
zxfblS#XSuS)bxdb5kY(Cc1buwBJr=SZw}z55Q4JZ7R%RCy=5{+JU#Ear)Qz#II9D3
zH8Vd+5+c!8WcDy%zuKuLqFnJ?Wq#Z|T=~?E1&FU0LC$J-I%o#~;2>`zYaP}X_s?P*=LI8HF?Q2l9uHU-10X
zQcj}+y#G&OZ{gQ;7_SYFP(Y;-kr-XVL}D~Z*Q5p_j8Z~iBS(WuNJxzar4dFq8$AJu
zfe6yb2$4RGr6Os83JZL9=#hfjhNTw
zy{{ieK>l3$x5Hc8dksCWi2M72JcO!8o6}3f|HN-@`JpdJ+f`-2&SArLZp$oNLTVQy
zqNT#GJ@qj;UFRe3jjck)LE^;#c@pcHedYSI-$agE0F}ZgsQli)1!MTb|2Bor>0!)=
zu_C&}De8mPynh=tlXv&%PoMMFpH^~iY`NbSr~0J>W4P)LrZ3pF0&11D61=H__viG7
z=xj5k2(H$Nt#N4wjjvCqE1r<84jQUSWKY`-hiz$?hI$EvyHi#OzDMTfm3pUjyvlC;
zRwkc3|6?Uj-KuIsLzrRX_9@z-}u4tdGL!zcY2Ur7ll1LhCj|
zSEfxRr0WE8o2FwNLJDVEzWoa#=Pbh}yMi7ezuG$qzh{j`1ZAhrUj!x5HrGrtw2vw^
z-`r>cm7zjg3>fzXU-J8RUuX7Ox`YcvPH#)eZd7=cqW*s0n*q2F!S4zG+_J8s-Kw3w
z7H})Z-2*S2pjYkN{6;T0ZzY1g6!7PL77JQ1Fp=_gU7-#g$cJZ^|I&R07*cY%yuN+Q
z>Mn3ZSc9`j0|*EVPeye*daK_=7C7i5SpXn`vFAp&NgNkg
za~}HN<@{7)mJF$y`%Yc)o>FM0ip%#sfz_zSLbY)l`@A&|mYZ^U2mdxv0o!>Tmo3te
znD*;qnXZ_HHYeiug9morWLmPeViMqN=gN2N@U=e>hnem4rTP!&IkKmZYkt(JsqlX0
zJj`2?i!~_j{M~~1z6QV%O1ur%7meSbA9*a-vxICNT4pQvbdBUAm#uy#Cl#8OfGJyt
z&3b^(QdX@D;SWv5kvH*@{c?nv_}=JQfZs3NX@$@<=EnjpTFeG3>r(`
zA+->l=#v1!Bq`rJ&vaGLGVasz(j#8zX4JI2Kg~1DXw0!c=UK**ft7wW@&OES(xe7U
zBy1tZCob$2g0{^jdn6zK!Bt2j5sysvg%VLt
z3}l8cW^r}mW_nzsfGxh@ojo*eyd#U*ZJc;yE*9`gkxUk@+aFW2qmp;T7}-c&f}5Gp
z1EmFjdl7YKbur?t>;-&MsRZK*)$qjq6DCQwf<3@NC#T*U1Q
zxsVsPoTUA#IT+Zmv<8zWlQ~a@PlPz)5X`{hzNB~D1$iU3+mqg-@_rCDQXxw{@>RWX
zL7TZbNHcfP=LV3bc8*=fwF|H3-20?d{h$J++>jO^cE74QXs`Z+Pkrz!EKyaD;w(#n
zft!bmwv=r&>xC%q4UfxxzEgj}?jlyBo*3<_OT^DuhG1wf+p+giY5AorLL_~_RwD4$
z&PqzvaYFR@`S>fVjiEqzCL!~6|ApoKu#aQ=O4sGurP_{r(;?rN_V@!dInK*FGaN8}
zMrHMVJBqQ$L`t0$iGjkXfhygk_IQnL$apL{WOMCLYaJ`ah!rW(PGPn)4cR#Quc4Qq
zHwVtPKYX3n{>c3*|65HQWZejn7&E^siwgaiF!8B=9koUn&B9czdGS=UcjR<}rGy)-
z$OpWxrWYPs1?$Q4A8Eo+sv{*t&58gE?S?I~1x>`qLoW9GeCfRs*3^|il|_R$amE9s
z=^UWkPAvOgYUdwexoTdt%#*V+Roc55_61>r^d%g5{%MSNzM&27?AO+(%0K+VYEG5q
zRn}jg{#T2;P(SR+UVKrh?*{u?1SSZJ4^;STno9oIGOii&fRw~ehqqx;T=;KcbLI*i
zmRPAn8+v~s2B%}IvQtL~*KD!9_NrC{L3GtsTy#<7Edi2*r5E0YC%B^6JmbexzGZ?1q0<-6U!tfgnN6tQStMbv
zQQ28wQMFn!T8Y642<<(xM+xp?vJB6zkz6}AaJj|?U;pA7{t88H_mv@Oe?An$kv(Z-
z6pqid7Qqvksfps(6l!*i0QZo1neLYOGYu77uE!1DD&Z&LQ#TkZc043+`xzb22z&7tKQ^hTQ&E#*RJjcCPNU$!nON0=+0J3Am92KU`)qn*HG4SxI)gtWpw
zy<5T-`d)f39fmUtuBV6vBb;61&JsJzh>EKe;n|0pQ5p94-v#%0!3bUr0>L9JfkYnx
zmg5&+F~MDMVuCPY0XNxOot^##@<}P&!KzBUJwC@3LLEfgZSRG%t%?Z~{9jIOPh?faoLMzcb
zX}kFJTU33%XOAC)(T#FJpG3JwxY+fU0kJT&8{vK@{R4txLV7+;TJ#p}2awywBVwtnkRUhQa6_f4G8$
z9p?Pwqn~rso`YY1zUn$tbh1Nk{qAxLTYvHGpuPyi_Lz2f)kwt2oTuHamOSwU_xkEf
z;qzU-pYuANzCgN@z8?$2rf`TG_GyVA6{>ENC|w+pYhtCS8rps(1TNB9_5MEg)=sXx
zS)-pu<2+sc+&W2afh8l^2%e1w&2Nq%Zt2yU6!iCid6WdWUZ@9(?$hslf5nX%csUCa
zT(wAk>ak%s8|rJJ5MmVv-}}=#7RRr+9WpNruxejJ#U$`qyPvD?RdVA5S+rE+XaE*QYJWu()?BeWkXyc2K_!)D{4raya_TUjTWu~
z*s;%*I6MYp<{z4-DC(M#QXo!3GFkcqCLd{bWU9rd>JIN?nA`rN9eT>$-9`pgjnE<|
zADy{KB-Q70l5=04To5*K;?nm>&-%C{t#p2FaFEv6S3qf#^C7S{BdB8
z(fxFBwJSe@XFNgh-sAhSjrpfnpEx#@rkSlD>wEt0-AhF+fBWS6+qLfyZI3w7JKpf|
zI_^wAw~GCWN~57E_A_djl@KDmQMMPJ^ymP-cZ|gErySw&p3m)P2;B9?b9OK|XpP7v
zD8EYvztZ^hJV6;njgXKepPaaWd@Gqp~4G{Hn6QaQINQEq3gg`VX5CwCBMoL&tlX-E+9E7J?#@
z)v{wm{oYyQ*#10=bBtHQA3M?p10}D_WSy6~u;iyyxSWS~%vQQAuJ_JeKu*Qb^P_8aNwlcw)B34joRIXWT~VjCXR
z`mv&SNRT<5zGt*Ec_{{i9nl%~NsZ-T`V7kco{LO&cVV?ThhF;V$3Dj1qBBw3J1W&t
zN;fVr4Mpgq=8U43KQop2H++hZ*SCS-P3|7#EvW;(k7_~D03#!^NSdF*^W(t>@$yywcPJM92gQCZ9)+C<6WcV=;Vb4}2%`BD
z?8$tTb!zNSxW)Qc6LkQ%8jo$O=fI8@r^#{zweCT2=4LLtXcr3<=&;qhoe9#0*bf;A
zMB?=rI6in2&+EtgJd>a42?A_@)uSNTW`CD2*6gGdoj0#xN*ycHaS#w=-}J-%XmS{<
zPL{y9K5*!H#qZ3ihx`ezsa#_zMpg5x>F!{`B-a9DZQT$pk8?|#Us1zS3*P>zrV@%O
zIjUHf-43|HfES$d&<)3y>01)*j)=ZdZslW2A6d*5*>OZl8(#r^j>kyr3F=;u*5jfS
zE<^*Ink3LK(E|GxK2Wtjl$R1#=*9J)XuLy+#<*}dFPJpnnSWCk9!eTiiXr+W9XUy>
zKEy|5JaBnC%8(S93cL-p^{Zw_SW0bf{eeh(j%G!O;tK@O_;7lX6Tc6_@pUCuRAwTN
zFl{tx9PpQdr!;3*EZh09a(z}cpXmo&BT8*T#dlezE@tc);V-gIUAMm$Q(q@f`zVBH
zdv0&*#X5_(l3bU~XIr-1z~g_%WZnNaCYz@J2PWf29T}>g^OFx|;=oc(N^h=c
zY)#9L3r(b>6L@lFVvg9ZWu?Mm>#Ssu0+OeRVU}
z?1A-rVY;N_{;EJyc8;_okFXTR9-1aiH&r%ni+S2Cj4LXls>a>`wZ?M%YLu<-0x_yk
zaWJ~C8IGG?CL?OT8qV!tj49eX-XZ~7_t0MDzAzhbbcS_mUak|v>>};``Tp0Y5&Myg
zBO%L_1PaQV)~;$lVeuGkTvrNt@YHKjF5MU`>WB1QrIA8u$--oDapO3q@@jgMovAt#
z!%eK)ys$M>2QNBHD*k_ha}x>TqzG7RucLVnl;3YDXM3OOG^lNHRj2m$`njtNOn)&)
z_Twkn!~^Am{{hjAPjPv7i4YCl9cd}kS5E{~Wqz*EB~4}GnCA?_m2yJ#q^~{?U95CM7#-y7(+GJ8
zM046Zd6YL!&!GdP@g_H9aBH2*3k7{Qy)@va8qSb5VE8+h5+GC?wO3DBRB~XQmHkXL
zJf|Pv!62F&Jtf<_p?V2Q{&G!boTU|#%quCF2{B`qE_SHh^(Wr$rLK<5)bAa7U7w=N
zDoKsn(9%X5_i@0iJ`LPV{?OD!tcQl%Vc#)~nZNX5hVWkhk>}OdjGXwbKlsSi4#iT6
zH!+^7Dp=wbvVVJ@v1pWoi=TD}(N(Vw^Pb?6Q9S{L`jW!8m|(*ucazCm%Wp$mD~Y}?
zglO^|8Xa+ZR(d)W+l_}eq>^*iT6A^mW`dBAg#hqw#u9TV==fMxIzv4CD8E<|*ijQx
zoZ%d4&CglcX941>rs(_K{NYvpwa{iQM9<=5hWNcr9OasHK_A$SKlnY(VtGl*gxFSd
zO~}+Icq}7;u5?Kn6w>A<4Ve7)2;BPAT|3UNhVn7sgk>k|y{AdX0fBobz4%(ro!wx(
zimh&GI*R!h#NJ7Gh?G4T_LZcdeMF=wH~ca4bi-l)i|>+~U>YmZButW>f*#`)w86yC
zga7WN94MP!CIJsk1<
zc-cNU<*9)!WJB!bHwu2rwx%o2*4+W$d?F{LS&X)rea0Nw~M}{1k4g9_@TprdOiOI<)*pH}6
z#(YMaNojYUu^0*E7E#czCn2v32QU~XJQ4|(4l`{bFGzOee$5Di>??>HsQ!XLO{|8x
zc^V2Gh$-Cts{SxZGQ$6kw^ec!BdJ2oHeJ5=7Ezr~+E8k4y~c#RwpYAU9`m&nsL-mT
ziFrppE$^%8B|3hs`=qO~Av-@fYn1qNQvzv0crGUs1W(#~X%IB{g_t0`u=CCq`WR)^
zDXu+#tu%qMb$gc&iCM5hV~TpOQ^}6xdxJ!`6$pgX6Lsh(;80XbG3t(u!k;oO
zMwN{uKI4RD#vcppW9{}HJYj@Dm1_9~(cDhvG{&**DWG5sP)Y)7kog~g>#X`7>I{TJ
zjguWWvVC!p$R-fGr-$G-%fI(kne-E->A}|^8@4xx+-q~@x!Ti@#L$&UaAH;)u=F+o
zd8^7uejoP!7|!)}B;e!C)*tE;*Z>LMN8=x>B1@)ZuIkkiL=!;gEN(b0dl_J7&ZX7I
z%=j?AwZ18k<`!^SOB{G+N98}7$h7e+8h%TGe9w27gE#pJA#>h_sI2ex=G}Wi1|6WO7UY(>fsD1+04i}CEwug1WF1XuJV;;n{E|}
zt@=B<#z9z`j^ZL8t1o8$k_*D5+f<2S?Pe$}h?SU~^Rvl1>#JqhFWFFVB!!YD@IH2r=Eq^!4>PhcK0
z(FSgMkMKb=kDqNt`Y^=*bi_6kVaRVq!b%+-+clY7(3UqUAJcYlTD2rl1b}1Gtii%O
zLqS6&>PL%gw+1J00^v!MFzAK}k9lpN2H`Xqn&?Pwnwp7cLC>m?=`NJ{`ZN!2deK00
zC$HG=W~>^Sa5}3(7riav9Fk3{tT@k;;^Q@+;K^bbSGgda(Vx{Hx%UoHY4Gs}8BG?V
zY!f#@yaF^qJDeQd#({STSS+Q;cs)wGFB
z7WN}MCs2_iL7G}q6;Y~*3G2p2#;Rc;yXFPp3+HUU<&{+7mj40i4(7KvgCEAsG=;C2
zZD#xm4v!TAZ>UKt#*bc`sho3`|0^G$-=90vM}sXF)BW|Sajne>LqCMTowB11?bL_C
z!kRf)
zIOL|OR+Fr)Ra5MX3vy3$5QlzQbJ8+DW(jCmIakEEe4g4&Tq2WE%ty&I{
zMg>~t{-qpM<}>$KiH&)nsseDEK^%oTeKI7aerKs=L$vyt_pZQwsel%j&xo79KO2|I
z;R(L^X#6g%&5Xvl4pO0hA(-3H13zHx=dMhgE2-h`3o{D4_$1eg&
zH!=ZI4WbU7?;W>ZHhV2ihCYzpdzs>_PRRXOPLkG?Ku!~AL}S625P-E?@5+tt(tQTS
zr~5o#lSHWGon$D5-SWUcjO74ap`>r?y5c5k$p!76YrB*d3Ucqmz|A
zE^DXD>tMX>Q7qIXTGO;9@(EctUm=y)n{nI774$FDB%f}t9dXvlVw_z&CV>K`Z5GQQ
zXIz}2Qstn-swIRQzeIz(#*8dI%B#;F#ZwUhUn$L8x@rO)sid%_#F+zbr2RgH4$G|
z`AiqjU7Q``NH^{qT-XXpXSz-{6Pw8+^d?G_UQOd%1~rwXIyU~k;)Cq99vmPiC7Jn%pkj~IMqZ(C&7aaIIiE{U~i0nIy6qL|W_c()HA*&w_{yQ@`VeIS+I2GWWIKD$R
z?`)JHOL|W(n?6qh?2sH}H?0Qsp!!|hgpVLpQgI1Rye<(+nim7BoFkn#zmWl&R0
z(=!ETct_p~W^tK}n{eWvEFP_@r2w#t_1P0uj8WIirBaJo5_gDipHYxS-iPGQCp2uA
zd`pLE`QyeZ6C%T*QMe)ifYR;XHv&w(t4fT!^klU21a45`bvRzBxF}+_YM*A`yVP{8
z)!cdpcT=#TDkP6fgHS)P!1z3cZhX=A4J-i&>zKU7>g0Z-TW$1b8+m;-Xb#b+&ijDo
zFqm#5gS(E(U#5Z5s!AgLBV9pZUQ1q`jgCRXWGPHoetI2)Xqn<)WkI(!bC`>z?p+i=
zAiwa5h%{L%aLUqUaKkv~=xhzh`F|PUy|T(8%D`W~C2cq3=jPH+=HNtVYJgaI6t_Y3
zdCYsbe{z1lsM9rLj(A$7(i2mt2t{uZv15*cjeJ$GsVZu(e}}r
zYEAQGlrN@xYJaVa9~rC(RO-fg@bNJXEht>Wyq=Ut=;s#S4)RMUrzZ>X0Zi}U52PYTLf=6p2=oIp@c-l3KO~(^;byglUPYq^pCCI|2k~+FB
z?67(yy4%XxSvEum=I_&5xnPuxwg#+~S);%$r(4)KJtvEa{kEHPVS=fUQE?L$xkS)q
z{A)7}Zrw|-GmxCmzFNpG7x>~FcFEpat*Xh*{8Lm{1)=^4#SUk?CK|@eovx(x?M;>*
z!fQu$F71bW{y7`h%NjX6tink*i@Kw*9OuR3$|44^&Yi37iDz{e;r^niw}IVU=V~bDZ^%doVDYv%&#i@8fYYBfncVs}o1%
zO^%qbvqn}!7l##nO}3SHzS(W!VS!01#HXv&N9iL!hUbJx})kbcZ9bcM*VY;S{Sadvd^dk+N}
z8gR<
z-hDAMHnJU^&?v`l>AwCn#lc}IBtB`q#2|s*Y4<>RTv6&VCE8*A7KTz8
zm9gyLK}M%nh=~7skxYp8OG1J<`W%HpK{X~=@a7AP@?dhO#Fm2z7Tq0Yc;S!=p7t{@TgKB
zU$!OtmAvM+V+BPmHVAx0|nr(7FRHl?;F=uPJ$IkAq2&x
z$%+OaArwe^uExbnDXUh`(R^tWG5?IS9x)lu5s#~AC!QI_LF`;1HV@H#?dft#NmvVw$+!^L-u6*e{D8}8nQD1?5!2e|whUM2H<#p2ubz$EO
zdCuAkO=f+-G=21%B2af&NclN&{5)(VYs$6y!F>|Y{6K@Y&s$pyMxl0jGL;O9+|!
z(oNf?d?DHg`}cZifY2Db0J%EcCZ059&0iKj^+SPFdibAg7erLVCIjmQ*L-nS&zwco4O{n&sCWjL&Pz?^w{O3^%CAF>Hgwp2YqOoc9G75BK91U5YY!!L_2FY96!3jt0AuRpYf6SD}f67PTB#nK&i&G=cX}9l1&U
z$R>NyjR?e(t$yd*n*S?kNfK`w?=vzTmT&Lzn12witf5eE%!#_4xT`bbx?>AJgB5rweEqB)~M6_|YeT
NuBL%TjoQ=j{|B>Z5+ncs
literal 17591
zcmXtfbyyqU^L4P|?p7!iE!q|@?hb(h#ogT{0ZMU)rnoyTS|C6v4yCvjg1fr~3G&P5
z`#$d<*<|-7&)mCr=FDWy*%&PiMSL6@8~^}-udE~o1OQOXkuNE%7sxANqh*1}6S_cM
z18+GSFDp+6cW(zbR{+32r#f{swwIAiVeXzR-S>@6QLcrcYa}F99)ZI|`V~t%F6-&{
zBiB!*Y$}=_MjqpwFE?$g6u|@o8+dn>UHaQ!d?|#F{1~W~y{T!}y4V#GrhG^diqUU5
z*Xmju-%_=9SIkHNqVS4`REtsF&8fb9|3_Q
zZaVK&S{9oH!q=2+Q@PD-n(6~WbEFM
z2LHSX@E<%$$M3Xy?Qu>)uuFHL^Z6Oz%*UCo%fV|605AfS<)n4}bB=S>tLO*5tr9x$
z$l0e5Gb;5GC7bi$5%#j7Zb@OA^BkoQqM@UtV*cIh1+-5Pz2`%_?HIHiQ7>__VYb`6
zd7=D*#G1PggTux`HB`L6T5#MLYF#e$Zu1h;3us?{7>rux@5-$eAshr
zRV4lZU0NtrI6kYl0#t8PgWheF1$YAAkk!FErJOB>*v$2JQG{?_Ro>pIa@O>?D5<2%{n>kVFRdYXq1bW#Tw
z6T{t|6Af029jI7cUq{LNvlMGIFWZoqaXG47GhcsDVi<>=_OPj$2|pt$zP|Y
zcUY7F)57ev0zdT>Hh+TL1MjrJMWf44hxe*IKv#?60->OA+F}(dfPhBQD{cyhl@WGe~c4p
zdXk=K0f3v;z`u!F%XAHo)Dn_U%Is!fzhl@SaNC`vkwTKkptdfYVTm?XZfwqlm$K%$
z$+<}Z_)r2ORvus}XUu?o#MwE;2eim2i^zS)5j2Oscj3vB=M-$&M{EAIi3M0%7QXBw
zcK7^)LTg|8$IDHESVh{s&^rfGhRFbU2)=U1!#iPit|n8fFl2<9*0?l3W+CV=nA0JS
z3A_Yhq?15S#t-K7rnd9tdf^V9HTveA!NSqZ9j*N`)T+F{?okY%J0H{1mrIEWDV`O)jXh=Kv4*o)N=OCln9s#*_qXT|egM!g)*+$O!
z71r_$ZSc5ObFwMw_oW|>I-L-k4Vrgs$BGG$Pd)dY;o_CF5q;{4h7ZCW=AA#teh+k$
zug!cYrO_H#tWv2UNq7cnXeqM5c?IdOxNf3StRSrj|*piJ&6-=IPbVVyh*1Diyq
z-YjegMQ0AY1iiMTLb=K0kaf+-?BGMwpL9|R%1$}CBw|78ak@N3u#tDI@YlQe5Hlp;
z;hTL6E&sVbvpXQ!YEeooXl(R3a}EG^1Hc7W27<>sa#7C+n#({*pXLA6zn615f8!wy
zcTb@O7Qb@vTudW-rZX#X745j38g^4Wvb7ONJs~uB
zTfU$w?)=6hg~B3nIR{i*!XNOob<*1xV|1qlJc%&p{C0Pg53Rj)
z8>9Of{I@JO&BG}|(ZUD#uA?3vYeDL}I8VFx#F!nV|`TX0-UFXo`H0{ePrzSNG)L;6+M%f_N<
zD+PEvS`b~sB@m0tHRD#LJ3J(q@rAIBbq99}wzDnzP%Pwl+W_4j{SBweZ1M^WSHNV+
zyKltZR<%V4uog=`|H}d6#ti_tMdr?T+9!|AFFjW|gr;9Ldm+j=%D+}&=s~C;f7Mkg
zf|MjZQpkd*NQqdxW)k_{$&6MHV*o-9EGl&CC^H}S@ByK(YGW-+1t*4L*Mow{Xj%Vk
zp6zw{LEQx3HB{WqB9I17MqFS8sWe`)T&V3Ie%0U<>MC)6uEHp1C>6Zf!34pdQ^mqmk1!@Cg634}~JBFaS#dsH0_hsn7b@K0q
z!E4LbCF0jvzHHPNqggv)F~1)52&xihh#i44#=QhDd{IWozbh^zOZY;zxm{5?pHy+~
zfn!*oF6I3rKa6jE#;l;%-3%P7fHK$VcODLRC*p0KBwl!lt&Et*XA*~^FA;Rnuf~!W
zLS(dg{S$??itm77vJMS@)I(*}9#lWPx_dC#$p#3}P>2)w5>SzT@a1h+G_Su4Q|zW?
z(rWfTjJ|A7YE7-}#`H@Q3}RxiVxToV?oFKSc0^zSa&SgD)*IJ{J<4+o9L~S~iuMAs
zaSVhWpq1yQ3ZYb5bti0bxcq@~c#zsN1jEf9dJe)9&_z|FlJ9+ZgQ?qrQZzU?y
z!fx~e*U7r#L-WGg?`V$xEi3xBIriqh9&jZz*907Andk3CI;NYTwBrJVm_!_^=n)ND
zNu2TzC3165ovce0O;>RE#Y}ec%w1QS$3hL5^laO-&~H};
z$hzj2--n6armUb=W#x-zmfD2
zr3!+DN@r+M${qVD%+rCAo+tgb>;aSi&IZ}ms^xiSO@CbeJ3Q^13r_8X0-7m04Fp0<
z7;+%e`&P-ET@s5qpj&Wu=k1Y67`?nUj=8O@DtQLvp;*itBKqRP4(30~F=oksf|NH@
zS_@Y(E-K)LB6fOrqJ>xnePMQyi3!P(bUh)!>f1ru&o~W5-gvuBS1f(Jk-Q{o;G=Q!
z*MnATi-NZLoHY6#dWOkaizX_THufFB%9()^GLQ(+%r(vMMVezgW-ak5oM7*>ZiLci}S|hKGkzwdJZ$qq?
z3V)MKL0rl|z&Z7_s?so}7&B~OB&ALP0o6L)mxT?dg(;0@`0Yzglm+>M!c)iF*~KUQ
zrZ{Xqp{POXfCv{h4Eb=?7=~-AMzU@?VvTks_M|KhS&%HfGJlZBqSk{F{c+lb!OP3u
zoA$?CT)0V9JJ~AeP-juI-l92V%&@u9EuiVsFq=PGH^TH0*l$riWENm8f&%5
z^^WD`zA?M^6K=@GaW{kh=;e}qlTy2>P|6{3Ta+<_YjiKXHQTSE@QWMd(E8k}X-BmM
zUV{{J{J?ibvgpA#3Hi2DJnAa$3
zw?2vDlrWZv7I?lC(@|aYynt3VmChUxIWTxm@wRr{y2@0KeGYeFkj`Ji$`CD(20kp^
z>kj?KEu8NLA=XGehO7l77Kb^X3I}dsg!MDb61&N}RY}Cd*}b24ChdLUD#l<9LZ!%Hx$>&yy)H`n
zYYLZLD7B-I&(CWz29QgePZvZ(_`vFydMuU-Vy)M;_-}FPfNcdmcH!QuSU2+aSt$1f
z?G{!YI!j+IrZD28rv^SeA@m%mQ5iU#^YS!R0uo3zE)C3~oQ%qXX6J<5RR2|>X}z?7
zME5BRg@pnZm3)G?K6F6YZ4BiYfJg2OcPwCgheg-g!8?7FG-*R69ScPLUEFvLV_d0M
zr!TGUYY_X#m_mt}ON&Yu-X8!Rv)%@0CG5H)c5-39*1IG^sJHoHJ?2j9=(fhEsw1z({g3a(jH`>x|5`mYP1)BL}
zFU50v^FW`l*-=L_pT=3=$40#E*=EjomevYEFJwqv9Mg|MMh>PE^8nkNttO=h!4yLJ
zx}k9yxSM=W8+#|?z`SMmW7XpA;o;$FRduy^Q$xe$$-f`^`8*DXL=y^bC33$Y#5}gG
zr&}d??;A{xqK*;9(+uB}=<;PK859|H;6mQSe`X1*+30hx&4n7(Ht5Qt9V)FdX?}AF
z7-CkjtGsI@FwiC|ef6IKHP)}o*Vos6h6o@nm?fo%T~&URu4Wv1M|UZWVerWoC|U#=
zGHwsN-v6Or3-v9=_9bW;1Z5<6c6B6%8B)F}C5_mOTQ(h&P@<#cFq1i6P`aPBd^TdZ
z1n$OJdj$m{zNrYd^~rUK@Jc~o5|P$~j;=;ii>l52G51G4sz>^c=roHp;cntbA;XvX
zjye}Not{)EW5jBMe$p07`E?}3mfQ%z3|J-_Ql9>LXM5Y
z;atz=bogi4Si*WM!-aGTL0O^Gi924G#izVWL{cF!Us!I~TD<+&qn6=8GZi__dIn*E
zq@0C8xz?7t-*gy`$|RUv%ftGhH_~d&5xG
zsuxSE4i^a)^JuWm!DOfzCQ
z2HF-DTMSOMK+-)s61kH85gj(3UfO_Y4S7tA}KVPErVNqL~v!U6~Wl@hnkI%Y%Id~dQ|NjEj0
zgQ5IBT}z5$w3VdU8)&7)Jyo(XMO1L$e(rUQweta07A81-PD+^}>x!?k#3
zrlRzqM)@K6$DDHo;tXd@a#d4(Oy(Moyljd`1SY5<(+c_QHFmq~FUyvA%)}=$tUo`nsfMhH=8_~2_z?2e_c0#4YaDXU)
zzFC|VHJ60M_`Qz)hW$?pti>?nOS|}H^mBD}^{fOtz6j`WLkJ@)AiVx$02OX2Sn51e
z#~|jL>Y^-lULMH+aM+!{=AMn*y33SZjjd8L4-S_PsZxvQ6>xzznyFr~gYdw2R=wg3
z@cRu!32K#+4Ee^?hmAYhw%ZnB?ZiiUR>c;;!$9{O543~(sM@uv2npq6Aj&UEsWLg!
zWe~|Y#_zf)Y7VMJ_(RhqH-63T$ni=oCSu2q&MKL
zbLfYQbUtn!hJVETedNYodS9oO5>P7XAn#oGx9|IV$so14!c6D^s3
z+uvPNzekOP_WTMj>exeF^a_7@Snv1zV*I|+7j#$#%BR&@t=cbjZAhR55?qby|Cu&$%yi2x9~LX;%~zS`Z|2f1uPIq(%9Se&n!
z$^>VyePueoLg;u(!3WSm-K5a;x@m{`x|q67so~pi|i>=jm!+|E#*Oh
zfnc^j%_RdNTL@$Je=pzJv*i%Q8LEPAXZufO0<9rpH?j_fV@{0ZE@iQK^JhLaUT6|(Hxi;&?J8Kx2tB@p>KG!y;dcsmXfS0+`HFvp4YDy<+*
zc$fIo+tputN_cAPa(*1dui56ZM5Sat7+zJG4JG0Vg$+P+FJEzXWi^;!tL%2m%p^Li
z%t3c>NcGOUVoZ_S0hfWQZk0G`$$*Zbt(v06k{iTlMLRO3V1s%{!X0tiiM`6Gyh==s
zccXICY7q`I)V2C=1Ix@RezTVsnWefkI}q}F!ZUWw1o#Mv7Bs2oFxR#}AhN=CjB|5E
zr@X0S831=t2m_zH=LS{
zRKx3yeTRbk(Z^lVrwds=(W=W|(b=Q_-r{r9%Sol-At^2gt@3&*5|U$g4}uT=66Ylo
zl|$dW3a_LeXe~xV0gA2%va23;N3pzSwJ#O><^0*)&lU?--e^SYDv!}5u1u_U-My=b
zRXOQK(vsqyDoKOl7wH`+e`fpf?J6gj|6eSHs;e1^QMBqp(TrSqS)(WDbUkLD7(i~0
z!RBiLAz4k+Rv)#WHqkur_heq2+HiU{li@P*R*PNGM>&aqvHxv?{YP3;JMehdn`ZW+
zIFe{5%}BYV;58_vOWm(2I$H9D7K&bv77rvR@0_k;(zNoy-LY~0;+&FH>bqp?WS*F3
z6&vtP@K2GmgS+Y0Q}nM#b?3_oGW{?JgU-144$wwp#wv=u$g4=Miutwf(n~JT^LpG|
zCkCK)2?1C;+kAJJixxUp{akQmh!U}u87}}QvX(VA&!ZJsb{eL=ctxz|1iUY$oI!n0Yld3~hKnZFu!QkN4yWXLRD*Qh)He!niEg1g+9MsYiu8^MULn#v32kbF;q|KB_ky
zoo${y#1ylQ4tTW2aR+{hrj-V-aNR`Lw$~iDCBaO19JGFlAHcj@k?<|cWwS6d
za9NQ}>%_b)I@)*&9^wBP@=jCqSx8nURHT>0E1b3YOrlwT;gM~WIh28U)zcY4MYihI
zsfpTZaE$v0%VsZ3Bq};${v=G1%QQ;d<3Sci8P!~M+Kgh`H)o3ja6kQ`4MKtUIXgC4
zh5T7qc>xIG303`K(A7@J_+GK=GH<)41?Z1!B)n7yO^~G65mrBr=&ctj60LuN&NZcH
z`WkD4N#OGDS)pD+8+M5uYbz7{E3^*@O=fgo!~O;wHK!w>r~DW1x5z36M9G0b)Tuu7
zcWH~NgS0>(DFATROIhoN7s6UjU6FM1VmHNGOBqztk4rLfdUrmp&HzLYZf
z0p{X=eiyg9hHB|S00`cgcg6_{Q>7r4>pI?pDIT;6ao{lbjH7jxA{Tpx^e?8J5Hr+J
z$(u&Wh}KL)frho>t8tmk|E~o|U*`qlDG`&J
z0|KK|PGt_ie3dD59w0Y6fOFis7SwA9;ItyJ0cU>+&3*^tGcIY%bjb-(0?aY}lhUlv
zv+Fq_;)(I?evG3xF5$L#25yiCRy8CW90+nhBhm#CK#(nxC
z@~FC|D{m%;&zfs{_TP0Rbf5)wjsvyOh2^kO66Kedjw=^|%>5Jht>mu?eP!I4yl;XI
z5+YFBOlPp_7&D^BKLm?DY@c=JVg|!kFwbV!2X4X#C}RS6Zm|Ime;nMxXa1%VrNXB>jDpyr0}5R_=gWA^cg>h*n!>8X^Lbe
zyJ2uzYO2l0}Bf$Jt7Sr*t$JR67xUa-V(Q+w;DI<3H)(Dg@s!n#mK*B1AYILnGTOSc@LUm@?WNj*fqJNu(Dp4b(E@u61wa=JD!UqKpBS+-
zG9LdFlD(ZTI;>bl(!eo-bL`FjF$;CffY6CMX!wpN{Iq^);0ERQ^@v1~jf2wu3f0mV*bcG&ngVw43=iL=_aNEzf`bTN#o6u!X1IeloLQdk{ny{2$PcOj1q+!ca)J
zsh7G53dh>j$Aeu_(HT0eR;_-^RlSW~VgHb8c9LKp#uYMtx7slX3s_`BSq;IEi
zQ+pHnWn@$GBial5r~it&S>%h`IQZ@^p_@x$SX65&)0aRT=IH|>_gbwMlxxrwobNfA
z0E;iqR^!`8_=2DIZ2VK!e+YAUNh@suz{mZ6N1Hu=kO}9SLuiT1N#kV)Kh!loQZtnN
zV9c;2{*I<$fzwdj0m}6igxyJDz^Fm%!`N1fmLHK=Mu^rGBDGKvc0s1?OICA({*G_Sc`Xj-{(gc>&orLd_Zj)F>QzJ6lg5E^v|yANt+WJxz2q0
z<()vYK6`+_Ew|3GPwFbB9`w0B#XW|(V2K?oNUkY8`{mVylCU>=#y8HhG6vL^L#>eK
zGP%)2(`Sq$`EG-71o^n%8rN5eXPu08V)a+X%9c##H=x!^wj)p=vzewz-SCK(wHlu)
zVPCX-7f+>)ZQ()q417sLhGFSd0}Re0)-BVq>rKEz!>ZDnEc`IjP6RGhx4nC_Huy}C
zE2e`L$3cO=aHwe^$n^eQ&Exu604wl=$5jcjo-;*bx(1!NL(xal_9u!58;A50Fki48
zlV#g7L^;U0?6Xb2$Tt?!v*qXIu>(-Z5-<96kIBSFl)@b
zo?i*duj9BAbPO0KcD2y!7rHQ?P$(0&o+=V}_({`-WYOO2)Le{fh9?o%>~
zeXu@Y2c$(#7SP!w;YM&gQYxAJ{d47J60xqgH~s+ko$aiyN0mac2C{&^!lb`s9m%V(>Q8Z
z2)X01hN9LO0t0Y+Rck5%j-cKDBRVU54EsnlCH^Fy%qdZ-((4$(kyOTKiw+}M;^r3i4vQBq@
z4U2TD8nJfewz<(;XwNYiarw$eqDS5-n)zQK_w#|aK;GL55-r!S1Izw(Aw)Dzn@v~u
zrb{F|l4EgoUdDNfP||!Ms|Qp`59qR1GIO>Pija~EA%I7bW>b#?m;~19*}~Tmu$*qn
zlJa5*kvVOp2o3w8#Z1M!u}U{<02WRnS-1S@LH3`J_zShpj&4geY<0y9c6>`tYtN-
ztoUkO%uOdlv$iF`<;M1l3)*ZTDFBAdmmh*|&(F(jSgm(+8mK?)js|=E2^xFbD{`XL
z0@-H+Fa8%DKRCJo7rEx`(Nq}ufVm2Jf*47*8-~S5a4;GwhyY;9u;ZDq?O9J2A*Pdc
zN-nU99y-mJFOh-D!wTavS1@p1Ka=m-g!kT)F@}bAu^@5&2
zHe=ziQ4+r$E$b?Y_prg8XpA(S2Th{j>H6;6O(8)=^w~&y&0p;vI#8ex@-wkWienF^cWgQ4*u&X9e+>^;lz=N9UN?x&v#66<+*{8H4`pMF%DW
z=hJN~Yw0GcN9__+%p~Q>Pk}{i#za!J(O53KvA4JMK0H__bz7%h*G>@j%y&d+ZMRF^
zIKT}`T6Zm`{G~UAV8dUJ+p)Yz<)SE>z{J3mG>8{4GD`h<)Qk`R*6PJasu4ikY8M~7
zmH%eMaKm50l~(WE))2F>P$}l%ds7p_I>{`aXc2|KbbUJGc0sMk>=5sw+e>mtKStHanFRZ}3-xOzq|0tG;+ZFWT)#AfWC
zFQdsy?Z%r2=n9cbOWJ3#(;8K~2R!UjsA^_PL}cnOJ^vdn_lvLC(de*R)0NA>G60r<
z!ln>8FH$eX8;jDOb1WtyJ{%iCW0yC0Q4EBg0^P9%N81n~gAyW6#h@-43qjK5z`l_@
zgavCDJzVJZ5X@6dCUIGd^~)_yNI5(`CFT%qv`28wtq0Jx8|fRuCN{R~HT%oY!k6m)
z5a1=WTi!mHTMlb1utFZ@Madfi9&uc6dYfVpn2L>_5f747o)$8^Z>h?~IGdJRYJgczrCPUU%z=OnIX3~o;Ag;fzX^pZ7vAi*0
z>4R8KG%S-5gO3E%3m=}p%x=QZ
z$cMAlU8qQq|IeW91%%geCOEn&yXXG?{y*aCYjaW|l03ujMsF#Z&jG~IGJ{X3luF%5~JM~IIDgO3lo4@TG$ZiU7vI>Fo
zdG^nhi1G!6T+HW>f)uaQhmITO{^+U_Zr~OmZH!j3yq74vd=u7ayrFR4&9NrK}pK7Sg`BvAy8Tk+8z$Bj+fre6`T=+v&TDvzQ-s>9MJ+LBHs_
zBZbiJ*z#Z#^`&AFJwx>am(3jBB1AaKwT)xZBe|vi4*3=A1lr0pqB1S&rSHWbiDIXc
zX?(gkt{?>aEKO3%9PX1E!t(p!TDu<|>c%)@Z!IOf`kVWM+Yn-zYQErH+eqW{eq^Ic
z55n??A}e_!LhhX|hQ+R*NC&L1$ml4jxjF;fJk-0qdVGA0#-jN9P7B49L}fSc+XaLo
zYi7V-Eoa#VQjz{Mu@>1sr(rZB(X68)hiX#6b6w5brzC8MCm{4}DdXQ%!x=%(_$zSDb{gHb+
zGx;YIi`_S8=`nUx97XDl;@2%eP8241Qg+D7ASRK+Ebr}>nX)8MbV4TBy-4VUKlbhq
zH89(e+4{{u&CH$K9in_Iv^6DP?g<*T=l%)P8@mDTXtqLzX$ZqC7wo3%614{=_N!Ap)`+O?#DaFzRzi8
z1YAVCApP}mxQ*s@|ECf>?$XzT&X`@i$LH#OsiGpPC$uVFpuf5OZ?5*T0!=F9CMWu}?vndFtvHNk#Mw}$sQ40*WaXZZ~-6}hwWca_(T9lCPdW}cqgm4f_>
zA`(h4*K34kX5w3gxK@8~2^OCXt8kErRI89NBqMadHa=7*eA4e+CEl~>UdloB?Wz7^
zR9Xkp+{Hul{bL)kyLzERuAe$_(8*{7^A2|gQjlT>Waw^{?0{`T$LF;aqe=*0nU#Ru
znb#INwn_|N-$+_FKwLDkUom(E2X$ci&xijZ`qh24%J7I+GhQxF|lM+{<^Rf
zsn+Pcu1^QaY%aWD{~Cs+ZM0V*L^8sAAa^3}bL1g%%XvgTqN5r$BB`?3N|}Uy(988d
zM{JaPEsV@V@g|3Pt2J+utTS42z`m6J$!t_*8Oi$q9`
z$mIx=f>I@BXdZ|!?Iyt$4sGze<~f&h#K6#m=M=g)p^`iHowY016q-z+B^V4w{xjuz
zMdm7(l6CX71e3wI#EmF!M^=3ia=ChO^Bkgi`jnp+US_-UPpHjs5A0p((_cFL5166G
z+BT`tk^}rsLa$j3T3f)muDRKh9fzvsJ!S8Ut8;zQXfll8=IQf-ws
zUo0m;K4*|;jOqN^Jh2tX;OL(Npp?CBa-@Y;X#t?l=y_T0W`_NA$
zRV$7)%DH9Y;+Y315w2@$!T{VA3IWU>RS7TSUe%As7O_{xqb@OXCdU?Wy^8{wT`>k%
zAFG}M
z_kWs0ZnpC~?nG)gErJjs;b)GIx4H2ahSqO?8}S+asHEy@Yb1x#9wBqh}C-o&TFMWZt$_bkgC-A
zja`yN6XJ&((l(N8cR$l#y@j6!!}oON5gAM!l21G7pPdjR;ey3_F;F153`&nMz0a9P
zJnz*@-ir4tRzCVI7C|`zp1uXzqsN;o>TrAdi_1&R7#@>IobK|4khiBOD|WpTc`yUP
z5e5XEa_A%TAvXN`z))FAaKb@E9=dxbduAes&)EB@TKBb`@^;h@$hG?U`hK6?*ok&J
z)b@#!I*bb-?ytJ$*GbFfVP3N-Ed?}za<(PL(k}|HHy^&IZ*g4e60f~f_{VWv+$tX*
zs-J7ac{g-b810e}`pvNdz{A^4=)Xr!Zq7nYJ|nv4VQQLs5UP)_0k(@VguQgO&~mi)
zDwqMJH?9t)sqSx9HCh#7_yY@XKj>N~k$0xI81RWnbiR)0nbV8uCZyUi@PwO@1o5HU
z{?X5DBvJ{u&&b!q{K9oHIn<5HEd$4S4mo{
zimZas)Hj&M9hkjSvR95MgaFmH6%Egj%lzrcsh4^qxqvtwXp7Gme(a$K34o9kC=+J5hiySU?}%3ui7gBvK+_fL?8
z7qKr(?_Y6pkD)XC?El1UZeua=7j(yT`7y>D9Ien52bcM6YVZeFwXk7Gh@$2UC^`oU
z!9|4Pz}Jl^ksMk`g7;M6p%eNN$`s`qr`ZIQFwRrfX#4UXC#r(nFGFpGV=4rjahQC9kTh}Z
zPd@j4sNB%!H_&B5`B@rMc^vh5F5e+mMZVHLK{gs&eQ9@mh&j=3)}py7Xc2oupXjIz
z(;M>bKPzd(B=eRZiNxh%|_eqgq+ynZIyLttOA=c=n<&PD9wH-e4PDFt4wKNF%)vLC5C&><6
zP|LwKjlmo>9tE{=R~I3%^&J`Uwx-8je6YXc+4`~#bRXsxy!35bfeT~uqP{D3r60pk
zCUjY_#YF|{^I{}9xLuZ57@OaFv86>MfOE!_BYQ?r^`#%V4+di~0gQZUp@){ngh^TL
zwUgZ6`naY)^7N!tB$JM~*@=%k116tb6;O5*>LB`HcT?ORb$)YS^WfXnk)IP6sVy5z
zOu6f^a=4T35kD0i3nSDAOfNTUu5iULCVyf6l;bhD{9R0#wfhkgi;gT`?>`K+7FhS0E;9+CqzVqBe%bOqaTA{L*`phJ(Fv^&4Cxs3Pi<*G?dvwcr
zX0s7nLgZvj2%KG9xNQsz_1`b^-%msU=1QWF7UhA|G=8vx#xBK3ye9zQDQmi$jU~2p
znxJ$sg@k>-@k^t+UE6<)F(E+N(wFM%VD8xEs6<7*I|%}uiQ8p5g=mzJ%WFHnqeRhR
zHqeNn##D>19F`ewHJ{}2lahC}PLTh&)bq6T7cY*h^$TswqyujD7<4qLZ7OoqC_5bm
z08Mlgr!+i;^}j=&xaPN081w!yW}~}yDMm(50;ka;Z^BNfBEx&kD)0WC>e1m{&0ZEj
z=;&c~I+zJ`w2?V%CKhr}0s#Dek?tkuA0O)E-AC*>ATPENxOb$3@)C@s|B<>^uq8YJ
z(CJH`SB`ZyZr1knI~q{?b^%++^+&GzKK!Gxg=P*YjO@N9;`Z(VV4o3I0OZ6RX*A=)
z#M6=(P`xS)sHwN^XkyFOK#V3Km`F%oJJfSYtNG(Yz=hFw@c=KmCOLvM=I^O+5mXuy
z6KCqucW$@YpjS~m!Oov5bg--DCxk62NTi%IYptpy)Pp|#*j&kWcU!sG{QwSUGUPED
zXwF;w{gSe3(XLh;vsOBVEd2Eh=pr7V8s{jdHCXG$V=YO;G7#RX@KVUPaJD7cis=&*
zj*G>#L+71GZFhZ~9gn2XebV}aL(3M9JXh{n(`7mDwy(^*l0yCqN0mbIEHqytcKWXw
zlETg2YL+h-s}vs~$3`%3DANB~*0(rBi0eL4lI|g&A|*q1UX&34i*rf)r@vtClnMA?
zEsNv1VR2mF9HI7{>ec5f8oGnP7>Q&vNx4t8`q>(7qe($nq=mu95BsVL(X#G+gH>_Z
zZN#=C433E5p4s#2UCRLp8xhi;}}Y7s#hNd)0;-
zmZgJ#EA`S_d$DX9K3$!N=pP+SI&uLP4Mf$3Y+oRIB0uAzr_ICXSMn+D3>{5dSx{;RzVE7$YG1s
zVrS6fDN402zfVn{>`Xt&v$UWDh9SM6Az(t0#6Wk1-%X7UpQRQn6%pA04^y=hCkwRXPim(OSK~wMlTh?q>{?N+aY(rlHvmaOoVWl7FuU|_ZboeOa8*I~0q$7Q4ES3hjGnpsu#
zrTnC4J}^DKuwqfM{=SDvMpz4Iw&tSn+jYH;qAc>WuJ=!qdvKxK_jujs$Md{27fzLV
z`fS^4=>vgQTvKy`U+vf&=NXbUkNwq&Eplnb-j3-G(zO>PFNiTHPr8v}F0`^Yrtp1j
z$!y=8cz(tcdpMiDy`mO1{7o_B@66IY$QyfStKOdp2c`<`7c-NU2BtV*soT}L-X$|K
zPh}U!q3n*g*+qO7<2Fdex25c+VzjNa`i~OS7J0FSup7X#t#31`d
z$s2R~ccu&Z?tJJidcAf_&c%=C+NN2ZP4QYjcQfCu$Z1MzG;arUmL6(l*?vU(svmWyvTs*B+tyaA{!{5Z&u=CDPd!&Z
zT|062Se93|OVGw$x1>^&OmnQ>0`0V`NxFHt#r$;77Zo=NZF}ik&z_}ai;K8M2J#&X
z4-|0?^a2f}p{;ZW4bq7$71TNathIYBI5yaClRErQ?@QeB(3OUE9OtJk5$*u4
zu79(5Zow_iG~w&{WvhijnJ#wl|Pj_b|axn?pma17DTau7JIIPdq*?CbOYgNX3PaFM0y
zU8RR+hA_BuoHb)$nDVyg!}BRSGS%lS(pal8joEBs#!8Kn&)1$k{k;6)rJt7zJlQLO
z&87~SPql?0n|D4sdH3J9o7v|NW*1ndMgunyxH9)P_-ZxG>Ym!;kUxL#HyPKO?ZA5I
z`>oQ7e_LOF*weQuSR_@@Q8_`lGpOal5+<|t`C;;TYYwf}IHmOXEMssmgPKsNVTg$9
uL&Zy+%O9=Q=sJ|H*{%c(XdR~i@=J^z%lbPiZUPS^VeoYIb6Mw<&;$S^>S@*h
diff --git a/icons/mob/inhands/weapons/axes_lefthand.dmi b/icons/mob/inhands/weapons/axes_lefthand.dmi
index 6b4041e477d9ff53c61995f45a04c11d6a765ce9..8f8831d4d4a0088a1a1dc9c16cb3c606fe6e6d95 100644
GIT binary patch
delta 1789
zcmV$4
zcXV-J@kCvQ00001bW%=J06^y0W&i*Hppo*2eK+c*%0olOE+Acg>TOrR|-EG-3^s}t6@koSM7
zj^x7iSywrk@9>P0ad1lj;iVlxKh<3#pPgl
znE(8Ge}#$K_ZR9ekMAIV=>U5*e^7UMd?)!!2iT_pqGswYkMAgd=>U5(PLIwk)vNT-3F&N|ueOo9+deq>~;A#39y^-{}e&a4QAPcR1e=3yYQ+h$(
zede#3UfKbFe+}dFU9QmDmqJOtqzw%2{6|*Sf&cvpqHPVW-G42RH)igbBO+kUwHR>fMc0$uz5gR9ja`;WS=KXH#YQK$M%
zYShz@@0#p6r>44Ja#kdvf1iK8_yX73b8++X^BI$-I{m58uW!b$w}GIqh{4-0$XZdFAqXDv
zpoq|#w9YMWg)EclXjqj4rhhn^P9~Vp+9z3^Ti)ttnagjVJKy)Uuo=i$c%QgH%*_(p!d&~L^I`^*SLhOO-4
z;VGj>kO!+accg8he_!v`HSYKKf71fPRwZyDCpFdclCvTS9WWRK!m<<&kQMMmn(Fjd
z@sS`1f*=TjAP9mW{y40<1(fB`4On*F3QFR*hdl+BZFvVh2bS$wZjBB`!%^W@U}-tF
zXWO+oFr}MV@>b4r=~*63gM)W48W!0V8pa=~Ii1N2NLx8Be>h-A{3>EwH~4L#@pv3_
zU{0sgv9M^#Tb22TEFw7IN6T?hN|=6s3g#al^Evy+EOBZ4G6`&ycvx}?Ah*wg*@{UORqt6D)|0-E&?A)_hB#sa
zi6v0+fA(3TdT-love#!0|4R&To%CX1g2V
zp5ei>5
fJ&YiT{~NynDW&h9;mgvv00000NkvXXu0mjfVZK>`
delta 1321
zcmV+^1=jkp5a0}u7Y?8Z0{{R3ZT6FI0002AktMPl!?$;IabTv4&2<0(00DGTPE!Ct
z=GbNc005Gc1ObPC#A&9of~%hkIJ5xzr&dhe3swmL00g{AL_t(|ob8!?d!jfL#bHtF
z+DdC%UP|puXLOzEvFjfVe^emJIp>1X=ebc71VIo4DWa-s
z