From 7330ee18bb2c4066b8b80024df5b2bf030111a37 Mon Sep 17 00:00:00 2001
From: silicons <2003111+silicons@users.noreply.github.com>
Date: Fri, 7 Aug 2020 05:59:26 -0700
Subject: [PATCH 01/14] insanity
---
.../atmospherics/gasmixtures/gas_types.dm | 16 +
code/modules/power/supermatter/supermatter.dm | 902 +++++++++++++-----
2 files changed, 664 insertions(+), 254 deletions(-)
diff --git a/code/modules/atmospherics/gasmixtures/gas_types.dm b/code/modules/atmospherics/gasmixtures/gas_types.dm
index c7ffc51458..f095ff5f30 100644
--- a/code/modules/atmospherics/gasmixtures/gas_types.dm
+++ b/code/modules/atmospherics/gasmixtures/gas_types.dm
@@ -186,6 +186,22 @@ GLOBAL_LIST_INIT(nonreactive_gases, typecacheof(list(/datum/gas/oxygen, /datum/g
moles_visible = MOLES_GAS_VISIBLE * 60
rarity = 250
+/datum/gas/freon
+ id = "freon"
+ specific_heat = 600
+ name = "Freon"
+ gas_overlay = "freon"
+ moles_visible = MOLES_GAS_VISIBLE *30
+ fusion_power = -5
+ rarity = 10
+
+/datum/gas/hydrogen
+ id = "hydrogen"
+ specific_heat = 15
+ name = "Hydrogen"
+ dangerous = TRUE
+ rarity = 700
+
/obj/effect/overlay/gas
icon = 'icons/effects/atmospherics.dmi'
mouse_opacity = MOUSE_OPACITY_TRANSPARENT
diff --git a/code/modules/power/supermatter/supermatter.dm b/code/modules/power/supermatter/supermatter.dm
index 8559b8ba45..fc30646688 100644
--- a/code/modules/power/supermatter/supermatter.dm
+++ b/code/modules/power/supermatter/supermatter.dm
@@ -2,34 +2,54 @@
//Please do not bother them with bugs from this port, however, as it has been modified quite a bit.
//Modifications include removing the world-ending full supermatter variation, and leaving only the shard.
+//Zap constants, speeds up targeting
+
+#define BIKE (COIL + 1)
+#define COIL (ROD + 1)
+#define ROD (LIVING + 1)
+#define LIVING (MACHINERY + 1)
+#define MACHINERY (OBJECT + 1)
+#define OBJECT (LOWEST + 1)
+#define LOWEST (1)
+
#define PLASMA_HEAT_PENALTY 15 // Higher == Bigger heat and waste penalty from having the crystal surrounded by this gas. Negative numbers reduce penalty.
#define OXYGEN_HEAT_PENALTY 1
-#define CO2_HEAT_PENALTY 0.1
#define PLUOXIUM_HEAT_PENALTY -1
#define TRITIUM_HEAT_PENALTY 10
+#define CO2_HEAT_PENALTY 0.1
#define NITROGEN_HEAT_PENALTY -1.5
#define BZ_HEAT_PENALTY 5
+#define H2O_HEAT_PENALTY 8
+#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)
+
+//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
#define OXYGEN_TRANSMIT_MODIFIER 1.5 //Higher == Bigger bonus to power generation.
#define PLASMA_TRANSMIT_MODIFIER 4
#define BZ_TRANSMIT_MODIFIER -2
+#define TRITIUM_TRANSMIT_MODIFIER 30 //We divide by 10, so this works out to 3
+#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 TRITIUM_RADIOACTIVITY_MODIFIER 3 //Higher == Crystal spews out more radiation
-#define BZ_RADIOACTIVITY_MODIFIER 5
-#define PLUOXIUM_RADIOACTIVITY_MODIFIER -2
+#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 PLUOXIUM_HEAT_RESISTANCE 3
+#define HYDROGEN_HEAT_RESISTANCE 2 // just a bit of heat resistance to spice it up
#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
#define POWERLOSS_INHIBITION_MOLE_BOOST_THRESHOLD 500 //bonus powerloss inhibition boost if this amount of moles is reached
-#define MOLE_PENALTY_THRESHOLD 1800 //Higher == Shard can absorb more moles before triggering the high mole penalties.
+#define MOLE_PENALTY_THRESHOLD 1800 //Above this value we can get lord singulo and independent mol damage, below it we can heal damage
#define MOLE_HEAT_PENALTY 350 //Heat damage scales around this. Too hot setups with this amount of moles do regular damage, anything above and below is scaled
-#define POWER_PENALTY_THRESHOLD 5000 //Higher == Engine can generate more power before triggering the high power penalties.
-#define SEVERE_POWER_PENALTY_THRESHOLD 7000 //Same as above, but causes more dangerous effects
-#define CRITICAL_POWER_PENALTY_THRESHOLD 12000 //Even more dangerous effects, threshold for tesla delamination
+//Along with damage_penalty_point, makes flux anomalies.
+#define POWER_PENALTY_THRESHOLD 5000 //The cutoff on power properly doing damage, pulling shit around, and delamming into a tesla. Low chance of pyro anomalies, +2 bolts of electricity
+#define SEVERE_POWER_PENALTY_THRESHOLD 7000 //+1 bolt of electricity, allows for gravitational anomalies, and higher chances of pyro anomalies
+#define CRITICAL_POWER_PENALTY_THRESHOLD 9000 //+1 bolt of electricity.
#define HEAT_PENALTY_THRESHOLD 40 //Higher == Crystal safe operational temperature is higher.
#define DAMAGE_HARDCAP 0.002
#define DAMAGE_INCREASE_MULTIPLIER 0.25
@@ -66,6 +86,13 @@
#define SUPERMATTER_COUNTDOWN_TIME 30 SECONDS
+///to prevent accent sounds from layering
+#define SUPERMATTER_ACCENT_SOUND_MIN_COOLDOWN 2 SECONDS
+
+#define DEFAULT_ZAP_ICON_STATE "sm_arc"
+#define SLIGHTLY_CHARGED_ZAP_ICON_STATE "sm_arc_supercharged"
+#define OVER_9000_ZAP_ICON_STATE "sm_arc_dbz_referance" //Witty I know
+
GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/obj/machinery/power/supermatter_crystal
@@ -76,89 +103,189 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
density = TRUE
anchored = TRUE
flags_1 = PREVENT_CONTENTS_EXPLOSION_1
- var/uid = 1
- var/static/gl_uid = 1
light_range = 4
resistance_flags = INDESTRUCTIBLE | LAVA_PROOF | FIRE_PROOF | UNACIDABLE | ACID_PROOF | FREEZE_PROOF
-
critical_machine = TRUE
+ ///The id of our supermatter
+ var/uid = 1
+ ///The amount of supermatters that have been created this round
+ var/static/gl_uid = 1
+ ///Tracks the bolt color we are using
+ var/zap_icon = DEFAULT_ZAP_ICON_STATE
+ ///The portion of the gasmix we're on that we should remove
var/gasefficency = 0.15
-
+ ///Used for changing icon states for diff base sprites
var/base_icon_state = "darkmatter"
+ ///Are we exploding?
var/final_countdown = FALSE
+ ///The amount of damage we have currently
var/damage = 0
+ ///The damage we had before this cycle. Used to limit the damage we can take each cycle, and for safe_alert
var/damage_archived = 0
+ ///Our "Shit is no longer fucked" message. We send it when damage is less then damage_archived
var/safe_alert = "Crystalline hyperstructure returning to safe operating parameters."
+ ///The point at which we should start sending messeges about the damage to the engi channels.
var/warning_point = 50
+ ///The alert we send when we've reached warning_point
var/warning_alert = "Danger! Crystal hyperstructure integrity faltering!"
- var/damage_penalty_point = 550
+ ///The point at which we start sending messages to the common channel
var/emergency_point = 700
+ ///The alert we send when we've reached emergency_point
var/emergency_alert = "CRYSTAL DELAMINATION IMMINENT."
+ ///The point at which we delam
var/explosion_point = 900
+ ///When we pass this amount of damage we start shooting bolts
+ var/damage_penalty_point = 550
- var/emergency_issued = FALSE
-
+ ///A scaling value that affects the severity of explosions.
var/explosion_power = 35
- var/temp_factor = 30
-
- var/lastwarning = 0 // Time in 1/10th of seconds since the last sent warning
+ ///Time in 1/10th of seconds since the last sent warning
+ var/lastwarning = 0
+ ///Refered to as eer on the moniter. This value effects gas output, heat, damage, and radiation.
var/power = 0
-
- var/n2comp = 0 // raw composition of each gas in the chamber, ranges from 0 to 1
-
- var/plasmacomp = 0
- var/o2comp = 0
- var/co2comp = 0
- var/n2ocomp = 0
- var/pluoxiumcomp = 0
- var/tritiumcomp = 0
- var/bzcomp = 0
-
- var/pluoxiumbonus = 0
-
+ ///Determines the rate of positve change in gas comp values
+ var/gas_change_rate = 0.05
+ ///The list of gases we will be interacting with in process_atoms()
+ var/list/gases_we_care_about = list(
+ /datum/gas/oxygen,
+ /datum/gas/water_vapor,
+ /datum/gas/plasma,
+ /datum/gas/carbon_dioxide,
+ /datum/gas/nitrous_oxide,
+ /datum/gas/nitrogen,
+ /datum/gas/pluoxium,
+ /datum/gas/tritium,
+ /datum/gas/bz,
+ /datum/gas/freon,
+ /datum/gas/hydrogen,
+ )
+ ///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(
+ /datum/gas/oxygen = 0,
+ /datum/gas/water_vapor = 0,
+ /datum/gas/plasma = 0,
+ /datum/gas/carbon_dioxide = 0,
+ /datum/gas/nitrous_oxide = 0,
+ /datum/gas/nitrogen = 0,
+ /datum/gas/pluoxium = 0,
+ /datum/gas/tritium = 0,
+ /datum/gas/bz = 0,
+ /datum/gas/freon = 0,
+ /datum/gas/hydrogen = 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(
+ /datum/gas/oxygen = OXYGEN_TRANSMIT_MODIFIER,
+ /datum/gas/water_vapor = H2O_TRANSMIT_MODIFIER,
+ /datum/gas/plasma = PLASMA_TRANSMIT_MODIFIER,
+ /datum/gas/pluoxium = PLUOXIUM_TRANSMIT_MODIFIER,
+ /datum/gas/tritium = TRITIUM_TRANSMIT_MODIFIER,
+ /datum/gas/bz = BZ_TRANSMIT_MODIFIER,
+ /datum/gas/hydrogen = HYDROGEN_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(
+ /datum/gas/oxygen = OXYGEN_HEAT_PENALTY,
+ /datum/gas/water_vapor = H2O_HEAT_PENALTY,
+ /datum/gas/plasma = PLASMA_HEAT_PENALTY,
+ /datum/gas/carbon_dioxide = CO2_HEAT_PENALTY,
+ /datum/gas/nitrogen = NITROGEN_HEAT_PENALTY,
+ /datum/gas/pluoxium = PLUOXIUM_HEAT_PENALTY,
+ /datum/gas/tritium = TRITIUM_HEAT_PENALTY,
+ /datum/gas/bz = BZ_HEAT_PENALTY,
+ /datum/gas/freon = FREON_HEAT_PENALTY,
+ /datum/gas/hydrogen = HYDROGEN_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/pluoxium = PLUOXIUM_HEAT_RESISTANCE,
+ /datum/gas/hydrogen = HYDROGEN_HEAT_RESISTANCE,
+ )
+ ///The list of gases mapped against their powermix ratio
+ var/list/gas_powermix = list(
+ /datum/gas/oxygen = 1,
+ /datum/gas/water_vapor = 1,
+ /datum/gas/plasma = 1,
+ /datum/gas/carbon_dioxide = 1,
+ /datum/gas/nitrogen = -1,
+ /datum/gas/pluoxium = -1,
+ /datum/gas/tritium = 1,
+ /datum/gas/bz = 1,
+ /datum/gas/freon = -1,
+ /datum/gas/hydrogen = 1,
+ )
+ ///The last air sample's total molar count, will always be above or equal to 0
var/combined_gas = 0
+ ///Affects the power gain the sm experiances from heat
var/gasmix_power_ratio = 0
+ ///Affects the amount of o2 and plasma the sm outputs, along with the heat it makes.
var/dynamic_heat_modifier = 1
+ ///Affects the amount of damage and minimum point at which the sm takes heat damage
var/dynamic_heat_resistance = 1
+ ///Uses powerloss_dynamic_scaling and combined_gas to lessen the effects of our powerloss functions
var/powerloss_inhibitor = 1
+ ///Based on co2 percentage, slowly moves between 0 and 1. We use it to calc the powerloss_inhibitor
var/powerloss_dynamic_scaling= 0
+ ///Affects the amount of radiation the sm makes. We multiply this with power to find the rads.
var/power_transmission_bonus = 0
+ ///Used to increase or lessen the amount of damage the sm takes from heat based on molar counts.
var/mole_heat_penalty = 0
-
-
+ ///Takes the energy throwing things into the sm generates and slowly turns it into actual power
var/matter_power = 0
+ ///The cutoff for a bolt jumping, grows with heat, lowers with higher mol count,
+ var/zap_cutoff = 1500
+ ///How much the bullets damage should be multiplied by when it is added to the internal variables
+ var/bullet_energy = 2
+ ///How much hallucination should we produce per unit of power?
+ var/hallucination_power = 0.1
- //Temporary values so that we can optimize this
- //How much the bullets damage should be multiplied by when it is added to the internal variables
- var/config_bullet_energy = 2
- //How much of the power is left after processing is finished?
-// var/config_power_reduction_per_tick = 0.5
- //How much hallucination should it produce per unit of power?
- var/config_hallucination_power = 0.1
-
+ ///Our internal radio
var/obj/item/radio/radio
+ ///The key our internal radio uses
var/radio_key = /obj/item/encryptionkey/headset_eng
+ ///The engineering channel
var/engineering_channel = "Engineering"
+ ///The common channel
var/common_channel = null
- //for logging
+ ///Boolean used for logging if we've been powered
var/has_been_powered = FALSE
+ ///Boolean used for logging if we've passed the emergency point
var/has_reached_emergency = FALSE
- // For making hugbox supermatter
- var/takes_damage = TRUE
- var/produces_gas = TRUE
+ ///An effect we show to admins and ghosts the percentage of delam we're at
var/obj/effect/countdown/supermatter/countdown
+ ///Used along with a global var to track if we can give out the sm sliver stealing objective
var/is_main_engine = FALSE
-
+ ///Our soundloop
var/datum/looping_sound/supermatter/soundloop
-
+ ///Can it be moved?
var/moveable = FALSE
+ ///cooldown tracker for accent sounds
+ var/last_accent_sound = 0
+ ///Var that increases from 0 to 1 when a psycologist is nearby, and decreases in the same way
+ var/psyCoeff = 0
+ ///Should we check the psy overlay?
+ var/psy_overlay = FALSE
+ ///A pinkish overlay used to denote the presance of a psycologist. We fade in and out of this depending on the amount of time they've spent near the crystal
+ var/obj/overlay/psy/psyOverlay = /obj/overlay/psy
+
+ //For making hugbox supermatters
+ ///Disables all methods of taking damage
+ var/takes_damage = TRUE
+ ///Disables the production of gas, and pretty much any handling of it we do.
+ var/produces_gas = TRUE
+ ///Disables power changes
+ var/power_changes = TRUE
+ ///Disables the sm's proccessing totally.
+ var/processes = TRUE
+
/obj/machinery/power/supermatter_crystal/Initialize()
. = ..()
uid = gl_uid++
@@ -174,7 +301,15 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
if(is_main_engine)
GLOB.main_supermatter_engine = src
+ AddElement(/datum/element/bsa_blocker)
+ RegisterSignal(src, COMSIG_ATOM_BSA_BEAM, .proc/call_explode)
+
soundloop = new(list(src), TRUE)
+ if(ispath(psyOverlay))
+ psyOverlay = new psyOverlay()
+ else
+ stack_trace("Supermatter created with non-path psyOverlay variable. This can break things, please fix.")
+ psyOverlay = new()
/obj/machinery/power/supermatter_crystal/Destroy()
investigate_log("has been destroyed.", INVESTIGATE_SUPERMATTER)
@@ -185,11 +320,13 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
if(is_main_engine && GLOB.main_supermatter_engine == src)
GLOB.main_supermatter_engine = null
QDEL_NULL(soundloop)
+ if(psyOverlay)
+ QDEL_NULL(psyOverlay)
return ..()
/obj/machinery/power/supermatter_crystal/examine(mob/user)
. = ..()
- if (iscarbon(user))
+ if (istype(user, /mob/living/carbon))
var/mob/living/carbon/C = user
if (!istype(C.glasses, /obj/item/clothing/glasses/meson) && (get_dist(user, src) < HALLUCINATION_RANGE(power)))
. += "You get headaches just from looking at it."
@@ -202,19 +339,20 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
if(!air)
return SUPERMATTER_ERROR
- if(get_integrity() < SUPERMATTER_DELAM_PERCENT)
+ var/integrity = get_integrity()
+ if(integrity < SUPERMATTER_DELAM_PERCENT)
return SUPERMATTER_DELAMINATING
- if(get_integrity() < SUPERMATTER_EMERGENCY_PERCENT)
+ if(integrity < SUPERMATTER_EMERGENCY_PERCENT)
return SUPERMATTER_EMERGENCY
- if(get_integrity() < SUPERMATTER_DANGER_PERCENT)
+ if(integrity < SUPERMATTER_DANGER_PERCENT)
return SUPERMATTER_DANGER
- if((get_integrity() < SUPERMATTER_WARNING_PERCENT) || (air.return_temperature() > CRITICAL_TEMPERATURE))
+ if((integrity < SUPERMATTER_WARNING_PERCENT) || (air.temperature > CRITICAL_TEMPERATURE))
return SUPERMATTER_WARNING
- if(air.return_temperature() > (CRITICAL_TEMPERATURE * 0.8))
+ if(air.temperature > (CRITICAL_TEMPERATURE * 0.8))
return SUPERMATTER_NOTIFY
if(power > 5)
@@ -238,23 +376,26 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
integrity = integrity < 0 ? 0 : integrity
return integrity
+/obj/machinery/power/supermatter_crystal/update_overlays()
+ . = ..()
+ if(final_countdown)
+ . += "casuality_field"
+
/obj/machinery/power/supermatter_crystal/proc/countdown()
set waitfor = FALSE
if(final_countdown) // We're already doing it go away
return
final_countdown = TRUE
-
- var/image/causality_field = image(icon, null, "causality_field")
- add_overlay(causality_field, TRUE)
+ update_icon()
var/speaking = "[emergency_alert] The supermatter has reached critical integrity failure. Emergency causality destabilization field has been activated."
radio.talk_into(src, speaking, common_channel, language = get_selected_language())
for(var/i in SUPERMATTER_COUNTDOWN_TIME to 0 step -10)
if(damage < explosion_point) // Cutting it a bit close there engineers
radio.talk_into(src, "[safe_alert] Failsafe has been disengaged.", common_channel)
- cut_overlay(causality_field, TRUE)
final_countdown = FALSE
+ update_icon()
return
else if((i % 50) != 0 && i > 50) // A message once every 5 seconds until the final 5 seconds which count down individualy
sleep(10)
@@ -287,54 +428,79 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
SEND_SIGNAL(M, COMSIG_ADD_MOOD_EVENT, "delam", /datum/mood_event/delam)
if(combined_gas > MOLE_PENALTY_THRESHOLD)
investigate_log("has collapsed into a singularity.", INVESTIGATE_SUPERMATTER)
- if(T)
+ if(T) //If something fucks up we blow anyhow. This fix is 4 years old and none ever said why it's here. help.
var/obj/singularity/S = new(T)
S.energy = 800
S.consume(src)
- else
- investigate_log("has exploded.", INVESTIGATE_SUPERMATTER)
- explosion(get_turf(T), explosion_power * max(gasmix_power_ratio, 0.205) * 0.5 , explosion_power * max(gasmix_power_ratio, 0.205) + 2, explosion_power * max(gasmix_power_ratio, 0.205) + 4 , explosion_power * max(gasmix_power_ratio, 0.205) + 6, 1, 1)
- if(power > POWER_PENALTY_THRESHOLD)
- investigate_log("has spawned additional energy balls.", INVESTIGATE_SUPERMATTER)
+ return //No boom for me sir
+ else if(power > POWER_PENALTY_THRESHOLD)
+ investigate_log("has spawned additional energy balls.", INVESTIGATE_SUPERMATTER)
+ if(T)
var/obj/singularity/energy_ball/E = new(T)
E.energy = power
- qdel(src)
+ investigate_log("has exploded.", INVESTIGATE_SUPERMATTER)
+ //Dear mappers, balance the sm max explosion radius to 17.5, 37, 39, 41
+ explosion(get_turf(T), explosion_power * max(gasmix_power_ratio, 0.205) * 0.5 , explosion_power * max(gasmix_power_ratio, 0.205) + 2, explosion_power * max(gasmix_power_ratio, 0.205) + 4 , explosion_power * max(gasmix_power_ratio, 0.205) + 6, 1, 1)
+ qdel(src)
-/obj/machinery/power/supermatter_crystal/proc/consume_turf(turf/T)
- var/oldtype = T.type
- var/turf/newT = T.ScrapeAway()
- if(newT.type == oldtype)
- return
- playsound(T, 'sound/effects/supermatter.ogg', 50, 1)
- T.visible_message("[T] smacks into [src] and rapidly flashes to ash.",\
- "You hear a loud crack as you are washed with a wave of heat.")
- CALCULATE_ADJACENT_TURFS(T)
+
+//this is here to eat arguments
+/obj/machinery/power/supermatter_crystal/proc/call_explode()
+ explode()
/obj/machinery/power/supermatter_crystal/process_atmos()
+ if(!processes) //Just fuck me up bro
+ return
var/turf/T = loc
- if(isnull(T)) // We have a null turf...something is wrong, stop processing this entity.
+ if(isnull(T))// We have a null turf...something is wrong, stop processing this entity.
return PROCESS_KILL
- if(!istype(T)) //We are in a crate or somewhere that isn't turf, if we return to turf resume processing but for now.
+ if(!istype(T))//We are in a crate or somewhere that isn't turf, if we return to turf resume processing but for now.
return //Yeah just stop.
- if(istype(T, /turf/closed))
- consume_turf(T)
+ if(isclosedturf(T))
+ var/turf/did_it_melt = T.Melt()
+ if(!isclosedturf(did_it_melt)) //In case some joker finds way to place these on indestructible walls
+ visible_message("[src] melts through [T]!")
+ return
+
+ //We vary volume by power, and handle OH FUCK FUSION IN COOLING LOOP noises.
if(power)
- soundloop.volume = min(40, (round(power/100)/50)+1) // 5 +1 volume per 20 power. 2500 power is max
+ soundloop.volume = clamp((50 + (power / 50)), 50, 100)
+ if(damage >= 300)
+ soundloop.mid_sounds = list('sound/machines/sm/loops/delamming.ogg' = 1)
+ else
+ soundloop.mid_sounds = list('sound/machines/sm/loops/calm.ogg' = 1)
+
+ //We play delam/neutral sounds at a rate determined by power and damage
+ if(last_accent_sound < world.time && prob(20))
+ var/aggression = min(((damage / 800) * (power / 2500)), 1.0) * 100
+ if(damage >= 300)
+ playsound(src, "smdelam", max(50, aggression), FALSE, 10)
+ else
+ playsound(src, "smcalm", max(50, aggression), FALSE, 10)
+ var/next_sound = round((100 - aggression) * 5)
+ last_accent_sound = world.time + max(SUPERMATTER_ACCENT_SOUND_MIN_COOLDOWN, next_sound)
//Ok, get the air from the turf
var/datum/gas_mixture/env = T.return_air()
var/datum/gas_mixture/removed
-
if(produces_gas)
//Remove gas from surrounding area
removed = env.remove(gasefficency * env.total_moles())
else
// Pass all the gas related code an empty gas container
removed = new()
+ overlays -= psyOverlay
+ if(psy_overlay)
+ overlays -= psyOverlay
+ if(psyCoeff > 0)
+ psyOverlay.alpha = psyCoeff * 255
+ overlays += psyOverlay
+ else
+ psy_overlay = FALSE
damage_archived = damage
if(!removed || !removed.total_moles() || isspaceturf(T)) //we're in space or there is no gas to process
if(takes_damage)
@@ -342,76 +508,130 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
else
if(takes_damage)
//causing damage
- damage = max(damage + (max(clamp(removed.total_moles() / 200, 0.5, 1) * removed.return_temperature() - ((T0C + HEAT_PENALTY_THRESHOLD)*dynamic_heat_resistance), 0) * mole_heat_penalty / 150 ) * DAMAGE_INCREASE_MULTIPLIER, 0)
+ //Due to DAMAGE_INCREASE_MULTIPLIER, we only deal one 4th of the damage the statements otherwise would cause
+
+ //((((some value between 0.5 and 1 * temp - ((273.15 + 40) * some values between 1 and 10)) * some number between 0.25 and knock your socks off / 150) * 0.25
+ //Heat and mols account for each other, a lot of hot mols are more damaging then a few
+ //Mols start to have a positive effect on damage after 350
+ damage = max(damage + (max(clamp(removed.total_moles() / 200, 0.5, 1) * removed.temperature - ((T0C + HEAT_PENALTY_THRESHOLD)*dynamic_heat_resistance), 0) * mole_heat_penalty / 150 ) * DAMAGE_INCREASE_MULTIPLIER, 0)
+ //Power only starts affecting damage when it is above 5000
damage = max(damage + (max(power - POWER_PENALTY_THRESHOLD, 0)/500) * DAMAGE_INCREASE_MULTIPLIER, 0)
+ //Molar count only starts affecting damage when it is above 1800
damage = max(damage + (max(combined_gas - MOLE_PENALTY_THRESHOLD, 0)/80) * DAMAGE_INCREASE_MULTIPLIER, 0)
+ //There might be a way to integrate healing and hurting via heat
//healing damage
if(combined_gas < MOLE_PENALTY_THRESHOLD)
- damage = max(damage + (min(removed.return_temperature() - (T0C + HEAT_PENALTY_THRESHOLD), 0) / 150 ), 0)
+ //Only has a net positive effect when the temp is below 313.15, heals up to 2 damage. Psycologists increase this temp min by up to 45
+ damage = max(damage + (min(removed.temperature - ((T0C + HEAT_PENALTY_THRESHOLD) + (45 * psyCoeff)), 0) / 150 ), 0)
- //capping damage
+ //caps damage rate
+
+ //Takes the lower number between archived damage + (1.8) and damage
+ //This means we can only deal 1.8 damage per function call
damage = min(damage_archived + (DAMAGE_HARDCAP * explosion_point),damage)
- if(damage > damage_archived && prob(10))
- playsound(get_turf(src), 'sound/effects/empulse.ogg', 50, 1)
+
+ for(var/gasID in gases_we_care_about)
+ removed.assert_gas(gasID)
//calculating gas related values
+ //Wanna know a secret? See that max() to zero? it's used for error checking. If we get a mol count in the negative, we'll get a divide by zero error
combined_gas = max(removed.total_moles(), 0)
- plasmacomp = max(removed.get_moles(/datum/gas/plasma)/combined_gas, 0)
- o2comp = max(removed.get_moles(/datum/gas/oxygen)/combined_gas, 0)
- co2comp = max(removed.get_moles(/datum/gas/carbon_dioxide)/combined_gas, 0)
- tritiumcomp = max(removed.get_moles(/datum/gas/tritium)/combined_gas, 0)
- bzcomp = max(removed.get_moles(/datum/gas/bz)/combined_gas, 0)
+ //This is more error prevention, according to all known laws of atmos, gas_mix.remove() should never make negative mol values.
+ //But this is tg
- pluoxiumcomp = max(removed.get_moles(/datum/gas/pluoxium)/combined_gas, 0)
- n2ocomp = max(removed.get_moles(/datum/gas/nitrous_oxide)/combined_gas, 0)
- n2comp = max(removed.get_moles(/datum/gas/nitrogen)/combined_gas, 0)
+ //Lets get the proportions of the gasses in the mix and then slowly move our comp to that value
+ //Can cause an overestimation of mol count, should stabalize things though.
+ //Prevents huge bursts of gas/heat when a large amount of something is introduced
+ //They range between 0 and 1
+ for(var/gasID in gases_we_care_about)
+ gas_comp[gasID] += clamp(max(removed.gases[gasID][MOLES]/combined_gas, 0) - gas_comp[gasID], -1, gas_change_rate)
- if(pluoxiumcomp >= 0.15)
- pluoxiumbonus = 1 //makes pluoxium only work at 15%+
- else
- pluoxiumbonus = 0
+ var/list/heat_mod = gases_we_care_about.Copy()
+ var/list/transit_mod = gases_we_care_about.Copy()
+ var/list/resistance_mod = gases_we_care_about.Copy()
- gasmix_power_ratio = min(max(plasmacomp + o2comp + co2comp + tritiumcomp + bzcomp - pluoxiumcomp - n2comp, 0), 1)
+ //We're concerned about pluoxium being too easy to abuse at low percents, so we make sure there's a substantial amount.
+ var/pluoxiumbonus = (gas_comp[/datum/gas/pluoxium] >= 0.15) //makes pluoxium only work at 15%+
+ var/h2obonus = 1 - (gas_comp[/datum/gas/water_vapor] * 0.25)//At max this value should be 0.75
+ var/freonbonus = (gas_comp[/datum/gas/freon] <= 0.03) //Let's just yeet power output if this shit is high
- dynamic_heat_modifier = max((plasmacomp * PLASMA_HEAT_PENALTY) + (o2comp * OXYGEN_HEAT_PENALTY) + (co2comp * CO2_HEAT_PENALTY) + (tritiumcomp * TRITIUM_HEAT_PENALTY) + ((pluoxiumcomp * PLUOXIUM_HEAT_PENALTY) * pluoxiumbonus) + (n2comp * NITROGEN_HEAT_PENALTY) + (bzcomp * BZ_HEAT_PENALTY), 0.5)
- dynamic_heat_resistance = max((n2ocomp * N2O_HEAT_RESISTANCE) + ((pluoxiumcomp * PLUOXIUM_HEAT_RESISTANCE) * pluoxiumbonus), 1)
+ heat_mod[/datum/gas/pluoxium] = pluoxiumbonus
+ transit_mod[/datum/gas/pluoxium] = pluoxiumbonus
+ resistance_mod[/datum/gas/pluoxium] = pluoxiumbonus
- power_transmission_bonus = max((plasmacomp * PLASMA_TRANSMIT_MODIFIER) + (o2comp * OXYGEN_TRANSMIT_MODIFIER) + (bzcomp * BZ_TRANSMIT_MODIFIER), 0)
+ //No less then zero, and no greater then one, we use this to do explosions and heat to power transfer
+ //Be very careful with modifing this var by large amounts, and for the love of god do not push it past 1
+ gasmix_power_ratio = 0
+ for(var/gasID in gas_powermix)
+ gasmix_power_ratio += gas_comp[gasID] * gas_powermix[gasID]
+ gasmix_power_ratio = clamp(gasmix_power_ratio, 0, 1)
+
+ //Minimum value of -10, maximum value of 23. Effects plasma and o2 output and the output heat
+ dynamic_heat_modifier = 0
+ for(var/gasID in gas_heat)
+ dynamic_heat_modifier += gas_comp[gasID] * gas_heat[gasID] * (isnull(heat_mod[gasID]) ? 1 : heat_mod[gasID])
+ dynamic_heat_modifier *= h2obonus
+ dynamic_heat_modifier = max(dynamic_heat_modifier, 0.5)
+
+ //Value between 1 and 10. Effects the damage heat does to the crystal
+ dynamic_heat_resistance = 0
+ for(var/gasID in gas_resist)
+ dynamic_heat_resistance += gas_comp[gasID] * gas_resist[gasID] * (isnull(resistance_mod[gasID]) ? 1 : resistance_mod[gasID])
+ dynamic_heat_resistance = max(dynamic_heat_resistance, 1)
+
+ //Value between -5 and 30, used to determine radiation output as it concerns things like collectors.
+ power_transmission_bonus = 0
+ for(var/gasID in gas_trans)
+ power_transmission_bonus += gas_comp[gasID] * gas_trans[gasID] * (isnull(transit_mod[gasID]) ? 1 : transit_mod[gasID])
+ power_transmission_bonus *= h2obonus
//more moles of gases are harder to heat than fewer, so let's scale heat damage around them
mole_heat_penalty = max(combined_gas / MOLE_HEAT_PENALTY, 0.25)
- if (combined_gas > POWERLOSS_INHIBITION_MOLE_THRESHOLD && co2comp > POWERLOSS_INHIBITION_GAS_THRESHOLD)
- powerloss_dynamic_scaling = clamp(powerloss_dynamic_scaling + clamp(co2comp - powerloss_dynamic_scaling, -0.02, 0.02), 0, 1)
+ //Ramps up or down in increments of 0.02 up to the proportion of co2
+ //Given infinite time, powerloss_dynamic_scaling = co2comp
+ //Some value between 0 and 1
+ if (combined_gas > POWERLOSS_INHIBITION_MOLE_THRESHOLD && gas_comp[/datum/gas/carbon_dioxide] > POWERLOSS_INHIBITION_GAS_THRESHOLD) //If there are more then 20 mols, and more then 20% co2
+ powerloss_dynamic_scaling = clamp(powerloss_dynamic_scaling + clamp(gas_comp[/datum/gas/carbon_dioxide] - powerloss_dynamic_scaling, -0.02, 0.02), 0, 1)
else
- powerloss_dynamic_scaling = clamp(powerloss_dynamic_scaling - 0.05,0, 1)
- powerloss_inhibitor = clamp(1-(powerloss_dynamic_scaling * clamp(combined_gas/POWERLOSS_INHIBITION_MOLE_BOOST_THRESHOLD,1 ,1.5)),0 ,1)
+ powerloss_dynamic_scaling = clamp(powerloss_dynamic_scaling - 0.05, 0, 1)
+ //Ranges from 0 to 1(1-(value between 0 and 1 * ranges from 1 to 1.5(mol / 500)))
+ //We take the mol count, and scale it to be our inhibitor
+ powerloss_inhibitor = clamp(1-(powerloss_dynamic_scaling * clamp(combined_gas/POWERLOSS_INHIBITION_MOLE_BOOST_THRESHOLD, 1, 1.5)), 0, 1)
- if(matter_power)
+ //Releases stored power into the general pool
+ //We get this by consuming shit or being scalpeled
+ if(matter_power && power_changes)
+ //We base our removed power off one 10th of the matter_power.
var/removed_matter = max(matter_power/MATTER_POWER_CONVERSION, 40)
+ //Adds at least 40 power
power = max(power + removed_matter, 0)
+ //Removes at least 40 matter power
matter_power = max(matter_power - removed_matter, 0)
var/temp_factor = 50
-
if(gasmix_power_ratio > 0.8)
- // with a perfect gas mix, make the power less based on heat
+ //with a perfect gas mix, make the power more based on heat
icon_state = "[base_icon_state]_glow"
else
- // in normal mode, base the produced energy around the heat
+ //in normal mode, power is less effected by heat
temp_factor = 30
icon_state = base_icon_state
- power = max( (removed.return_temperature() * temp_factor / T0C) * gasmix_power_ratio + power, 0) //Total laser power plus an overload
+ //if there is more pluox and n2 then anything else, we receive no power increase from heat
+ if(power_changes)
+ power = max((removed.temperature * temp_factor / T0C) * gasmix_power_ratio + power, 0)
if(prob(50))
- radiation_pulse(src, power * (1 + (tritiumcomp * TRITIUM_RADIOACTIVITY_MODIFIER) + ((pluoxiumcomp * PLUOXIUM_RADIOACTIVITY_MODIFIER) * pluoxiumbonus) * (power_transmission_bonus/(10-(bzcomp * BZ_RADIOACTIVITY_MODIFIER))))) // Rad Modifiers BZ(500%), Tritium(300%), and Pluoxium(-200%)
- if(bzcomp >= 0.4 && prob(30 * bzcomp))
- fire_nuclear_particle() // Start to emit radballs at a maximum of 30% chance per tick
+ //(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(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
- var/device_energy = power * REACTION_POWER_MODIFIER
+ //Power * 0.55 * a value between 1 and 0.8
+ var/device_energy = power * REACTION_POWER_MODIFIER * (1 - (psyCoeff * 0.2))
//To figure out how much temperature to add each tick, consider that at one atmosphere's worth
//of pure oxygen, with all four lasers firing at standard energy and no N2 present, at room temperature
@@ -420,57 +640,96 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//Also keep in mind we are only adding this temperature to (efficiency)% of the one tile the rock
//is on. An increase of 4*C @ 25% efficiency here results in an increase of 1*C / (#tilesincore) overall.
- removed.set_temperature(removed.return_temperature() + ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER))
-
- removed.set_temperature(max(0, min(removed.return_temperature(), 2500 * dynamic_heat_modifier)))
+ //Power * 0.55 * (some value between 1.5 and 23) / 5
+ removed.temperature += ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER)
+ //We can only emit so much heat, that being 57500
+ removed.temperature = max(0, min(removed.temperature, 2500 * dynamic_heat_modifier))
//Calculate how much gas to release
- removed.adjust_moles(/datum/gas/plasma, max((device_energy * dynamic_heat_modifier) / PLASMA_RELEASE_MODIFIER, 0))
-
- removed.adjust_moles(/datum/gas/oxygen, max(((device_energy + removed.return_temperature() * dynamic_heat_modifier) - T0C) / OXYGEN_RELEASE_MODIFIER, 0))
+ //Varies based on power and gas content
+ removed.gases[/datum/gas/plasma][MOLES] += max((device_energy * dynamic_heat_modifier) / PLASMA_RELEASE_MODIFIER, 0)
+ //Varies based on power, gas content, and heat
+ removed.gases[/datum/gas/oxygen][MOLES] += max(((device_energy + removed.temperature * dynamic_heat_modifier) - T0C) / OXYGEN_RELEASE_MODIFIER, 0)
if(produces_gas)
env.merge(removed)
air_update_turf()
- for(var/mob/living/carbon/human/l in fov_viewers(HALLUCINATION_RANGE(power), src)) // If they can see it without mesons on. Bad on them.
- if(!istype(l.glasses, /obj/item/clothing/glasses/meson))
+ //Makes em go mad and accumulate rads.
+ var/toAdd = -0.05
+ for(var/mob/living/carbon/human/l in view(src, HALLUCINATION_RANGE(power))) // If they can see it without mesons on. Bad on them.
+ if(l.mind?.assigned_role == "Psychologist")
+ toAdd = 0.05
+ psy_overlay = TRUE
+ else if(!istype(l.glasses, /obj/item/clothing/glasses/meson))
var/D = sqrt(1 / max(1, get_dist(l, src)))
- l.hallucination += power * config_hallucination_power * D
- l.hallucination = clamp(0, 200, l.hallucination)
-
+ l.hallucination += power * hallucination_power * D
+ l.hallucination = clamp(l.hallucination, 0, 200)
+ psyCoeff = clamp(psyCoeff + toAdd, 0, 1)
for(var/mob/living/l in range(src, round((power / 100) ** 0.25)))
var/rads = (power / 10) * sqrt( 1 / max(get_dist(l, src),1) )
l.rad_act(rads)
- power -= ((power/500)**3) * powerloss_inhibitor
+ //Transitions between one function and another, one we use for the fast inital startup, the other is used to prevent errors with fusion temperatures.
+ //Use of the second function improves the power gain imparted by using co2
+ if(power_changes)
+ power = max(power - min(((power/500)**3) * powerloss_inhibitor, power * 0.83 * powerloss_inhibitor) * (1 - (0.2 * psyCoeff)),0)
+ //After this point power is lowered
+ //This wraps around to the begining of the function
+ //Handle high power zaps/anomaly generation
+ if(power > POWER_PENALTY_THRESHOLD || damage > damage_penalty_point) //If the power is above 5000 or if the damage is above 550
+ var/range = 4
+ zap_cutoff = 1500
+ if(removed && removed.return_pressure() > 0 && removed.return_temperature() > 0)
+ //You may be able to freeze the zapstate of the engine with good planning, we'll see
+ zap_cutoff = clamp(3000 - (power * (removed.total_moles()) / 10) / removed.return_temperature(), 350, 3000)//If the core is cold, it's easier to jump, ditto if there are a lot of mols
+ //We should always be able to zap our way out of the default enclosure
+ //See supermatter_zap() for more details
+ range = clamp(power / removed.return_pressure() * 10, 2, 7)
+ var/flags = ZAP_SUPERMATTER_FLAGS
+ var/zap_count = 0
+ //Deal with power zaps
+ switch(power)
+ if(POWER_PENALTY_THRESHOLD to SEVERE_POWER_PENALTY_THRESHOLD)
+ zap_icon = DEFAULT_ZAP_ICON_STATE
+ zap_count = 2
+ if(SEVERE_POWER_PENALTY_THRESHOLD to CRITICAL_POWER_PENALTY_THRESHOLD)
+ zap_icon = SLIGHTLY_CHARGED_ZAP_ICON_STATE
+ //Uncaps the zap damage, it's maxed by the input power
+ //Objects take damage now
+ flags |= (ZAP_MOB_DAMAGE | ZAP_OBJ_DAMAGE)
+ zap_count = 3
+ if(CRITICAL_POWER_PENALTY_THRESHOLD to INFINITY)
+ zap_icon = OVER_9000_ZAP_ICON_STATE
+ //It'll stun more now, and damage will hit harder, gloves are no garentee.
+ //Machines go boom
+ flags |= (ZAP_MOB_STUN | ZAP_MACHINE_EXPLOSIVE | ZAP_MOB_DAMAGE | ZAP_OBJ_DAMAGE)
+ zap_count = 4
+ //Now we deal with damage shit
+ if (damage > damage_penalty_point && prob(20))
+ zap_count += 1
- if(power > POWER_PENALTY_THRESHOLD || damage > damage_penalty_point)
+ if(zap_count >= 1)
+ playsound(src.loc, 'sound/weapons/emitter2.ogg', 100, TRUE, extrarange = 10)
+ for(var/i in 1 to zap_count)
+ supermatter_zap(src, range, clamp(power*2, 4000, 20000), flags)
- if(power > POWER_PENALTY_THRESHOLD)
- playsound(src.loc, 'sound/weapons/emitter2.ogg', 100, 1, extrarange = 10)
- supermatter_zap(src, 5, min(power*2, 20000))
- supermatter_zap(src, 5, min(power*2, 20000))
- if(power > SEVERE_POWER_PENALTY_THRESHOLD)
- supermatter_zap(src, 5, min(power*2, 20000))
- if(power > CRITICAL_POWER_PENALTY_THRESHOLD)
- supermatter_zap(src, 5, min(power*2, 20000))
- else if (damage > damage_penalty_point && prob(20))
- playsound(src.loc, 'sound/weapons/emitter2.ogg', 100, 1, extrarange = 10)
- supermatter_zap(src, 5, clamp(power*2, 4000, 20000))
-
- if(prob(15) && power > POWER_PENALTY_THRESHOLD)
- supermatter_pull(src, power/750)
if(prob(5))
supermatter_anomaly_gen(src, FLUX_ANOMALY, rand(5, 10))
if(power > SEVERE_POWER_PENALTY_THRESHOLD && prob(5) || prob(1))
supermatter_anomaly_gen(src, GRAVITATIONAL_ANOMALY, rand(5, 10))
- if(power > SEVERE_POWER_PENALTY_THRESHOLD && prob(2) || prob(0.3) && power > POWER_PENALTY_THRESHOLD)
+ if((power > SEVERE_POWER_PENALTY_THRESHOLD && prob(2)) || (prob(0.3) && power > POWER_PENALTY_THRESHOLD))
supermatter_anomaly_gen(src, PYRO_ANOMALY, rand(5, 10))
+
+ if(prob(15))
+ supermatter_pull(loc, min(power/850, 3))//850, 1700, 2550
+
+ //Tells the engi team to get their butt in gear
if(damage > warning_point) // while the core is still damaged and it's still worth noting its status
if((REALTIMEOFDAY - lastwarning) / 10 >= WARNING_DELAY)
alarm()
+ //Oh shit it's bad, time to freak out
if(damage > emergency_point)
radio.talk_into(src, "[emergency_alert] Integrity: [get_integrity()]%", common_channel)
lastwarning = REALTIMEOFDAY
@@ -493,26 +752,27 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
if(combined_gas > MOLE_PENALTY_THRESHOLD)
radio.talk_into(src, "Warning: Critical coolant mass reached.", engineering_channel)
-
+ //Boom (Mind blown)
if(damage > explosion_point)
countdown()
return 1
-/obj/machinery/power/supermatter_crystal/bullet_act(obj/item/projectile/Proj)
+/obj/machinery/power/supermatter_crystal/bullet_act(obj/projectile/Proj)
var/turf/L = loc
if(!istype(L))
return FALSE
- if(!istype(Proj.firer, /obj/machinery/power/emitter))
+ if(!istype(Proj.firer, /obj/machinery/power/emitter) && power_changes)
investigate_log("has been hit by [Proj] fired by [key_name(Proj.firer)]", INVESTIGATE_SUPERMATTER)
if(Proj.flag != "bullet")
- power += Proj.damage * config_bullet_energy
- if(!has_been_powered)
- investigate_log("has been powered for the first time.", INVESTIGATE_SUPERMATTER)
- message_admins("[src] has been powered for the first time [ADMIN_JMP(src)].")
- has_been_powered = TRUE
+ if(power_changes) //This needs to be here I swear
+ power += Proj.damage * bullet_energy
+ if(!has_been_powered)
+ investigate_log("has been powered for the first time.", INVESTIGATE_SUPERMATTER)
+ message_admins("[src] has been powered for the first time [ADMIN_JMP(src)].")
+ has_been_powered = TRUE
else if(takes_damage)
- matter_power += Proj.damage * config_bullet_energy
+ damage += Proj.damage * bullet_energy
return BULLET_ACT_HIT
/obj/machinery/power/supermatter_crystal/singularity_act()
@@ -529,28 +789,25 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/obj/machinery/power/supermatter_crystal/blob_act(obj/structure/blob/B)
if(B && !isspaceturf(loc)) //does nothing in space
- playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, 1)
+ playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, TRUE)
damage += B.obj_integrity * 0.5 //take damage equal to 50% of remaining blob health before it tried to eat us
if(B.obj_integrity > 100)
B.visible_message("\The [B] strikes at \the [src] and flinches away!",\
- "You hear a loud crack as you are washed with a wave of heat.")
+ "You hear a loud crack as you are washed with a wave of heat.")
B.take_damage(100, BURN)
else
B.visible_message("\The [B] strikes at \the [src] and rapidly flashes to ash.",\
- "You hear a loud crack as you are washed with a wave of heat.")
+ "You hear a loud crack as you are washed with a wave of heat.")
Consume(B)
/obj/machinery/power/supermatter_crystal/attack_tk(mob/user)
if(iscarbon(user))
var/mob/living/carbon/C = user
- log_game("[key_name(C)] has been disintegrated by a telekenetic grab on a supermatter crystal.")
to_chat(C, "That was a really dense idea.")
- C.visible_message("A bright flare of radiation is seen from [C]'s head, shortly before you hear a sickening sizzling!")
+ C.ghostize()
var/obj/item/organ/brain/rip_u = locate(/obj/item/organ/brain) in C.internal_organs
- rip_u.Remove()
+ rip_u.Remove(C)
qdel(rip_u)
- return
- return ..()
/obj/machinery/power/supermatter_crystal/attack_paw(mob/user)
dust_mob(user, cause = "monkey attack")
@@ -559,9 +816,14 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
dust_mob(user, cause = "alien attack")
/obj/machinery/power/supermatter_crystal/attack_animal(mob/living/simple_animal/S)
+ var/murder
+ if(!S.melee_damage_upper && !S.melee_damage_lower)
+ murder = S.friendly_verb_continuous
+ else
+ murder = S.attack_verb_continuous
dust_mob(S, \
- "[S] unwisely [S.attack_verb_continuous] [src], and [S.p_their()] body burns brilliantly before flashing into ash!", \
- "You unwisely [S.attack_verb_simple] [src], and your vision glows brightly as your body crumbles to dust. Oops.", \
+ "[S] unwisely [murder] [src], and [S.p_their()] body burns brilliantly before flashing into ash!", \
+ "You unwisely touch [src], and your vision glows brightly as your body crumbles to dust. Oops.", \
"simple animal attack")
/obj/machinery/power/supermatter_crystal/attack_robot(mob/user)
@@ -571,65 +833,105 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/obj/machinery/power/supermatter_crystal/attack_ai(mob/user)
return
-/obj/machinery/power/supermatter_crystal/on_attack_hand(mob/living/user, act_intent = user.a_intent, unarmed_attack_flags)
+/obj/machinery/power/supermatter_crystal/attack_hand(mob/living/user)
. = ..()
if(.)
return
dust_mob(user, cause = "hand")
/obj/machinery/power/supermatter_crystal/proc/dust_mob(mob/living/nom, vis_msg, mob_msg, cause)
- if(nom.incorporeal_move || nom.status_flags & GODMODE)
+ if(nom.incorporeal_move || nom.status_flags & GODMODE) //try to keep supermatter sliver's + hemostat's dust conditions in sync with this too
return
if(!vis_msg)
- vis_msg = "[nom] reaches out and touches [src], inducing a resonance... [nom.p_their()] body starts to glow and bursts into flames before flashing into ash"
+ vis_msg = "[nom] reaches out and touches [src], inducing a resonance... [nom.p_their()] body starts to glow and burst into flames before flashing into dust!"
if(!mob_msg)
mob_msg = "You reach out and touch [src]. Everything starts burning and all you can hear is ringing. Your last thought is \"That was not a wise decision.\""
if(!cause)
cause = "contact"
- nom.visible_message(vis_msg, mob_msg, "You hear an unearthly noise as a wave of heat washes over you.")
+ nom.visible_message(vis_msg, mob_msg, "You hear an unearthly noise as a wave of heat washes over you.")
investigate_log("has been attacked ([cause]) by [key_name(nom)]", INVESTIGATE_SUPERMATTER)
- playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, 1)
+ playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, TRUE)
Consume(nom)
/obj/machinery/power/supermatter_crystal/attackby(obj/item/W, mob/living/user, params)
if(!istype(W) || (W.item_flags & ABSTRACT) || !istype(user))
return
- if (istype(W, /obj/item/melee/roastingstick))
+ if(istype(W, /obj/item/melee/roastingstick))
return ..()
+ if(istype(W, /obj/item/clothing/mask/cigarette))
+ var/obj/item/clothing/mask/cigarette/cig = W
+ var/clumsy = HAS_TRAIT(user, TRAIT_CLUMSY)
+ if(clumsy)
+ var/which_hand = BODY_ZONE_L_ARM
+ if(!(user.active_hand_index % 2))
+ which_hand = BODY_ZONE_R_ARM
+ var/obj/item/bodypart/dust_arm = user.get_bodypart(which_hand)
+ dust_arm.dismember()
+ user.visible_message("The [W] flashes out of existence on contact with \the [src], resonating with a horrible sound...",\
+ "Oops! The [W] flashes out of existence on contact with \the [src], taking your arm with it! That was clumsy of you!")
+ playsound(src, 'sound/effects/supermatter.ogg', 150, TRUE)
+ Consume(dust_arm)
+ qdel(W)
+ return
+ if(cig.lit || user.a_intent != INTENT_HELP)
+ user.visible_message("A hideous sound echoes as [W] is ashed out on contact with \the [src]. That didn't seem like a good idea...")
+ playsound(src, 'sound/effects/supermatter.ogg', 150, TRUE)
+ Consume(W)
+ radiation_pulse(src, 150, 4)
+ return ..()
+ else
+ cig.light()
+ user.visible_message("As [user] lights \their [W] on \the [src], silence fills the room...",\
+ "Time seems to slow to a crawl as you touch \the [src] with \the [W].\n\The [W] flashes alight with an eerie energy as you nonchalantly lift your hand away from \the [src]. Damn.")
+ playsound(src, 'sound/effects/supermatter.ogg', 50, TRUE)
+ radiation_pulse(src, 50, 3)
+ return
if(istype(W, /obj/item/scalpel/supermatter))
+ var/obj/item/scalpel/supermatter/scalpel = W
to_chat(user, "You carefully begin to scrape \the [src] with \the [W]...")
if(W.use_tool(src, user, 60, volume=100))
- to_chat(user, "You extract a sliver from \the [src]. \The [src] begins to react violently!")
- new /obj/item/nuke_core/supermatter_sliver(drop_location())
- matter_power += 200
+ if (scalpel.usesLeft)
+ to_chat(user, "You extract a sliver from \the [src]. \The [src] begins to react violently!")
+ new /obj/item/nuke_core/supermatter_sliver(drop_location())
+ matter_power += 800
+ scalpel.usesLeft--
+ if (!scalpel.usesLeft)
+ to_chat(user, "A tiny piece of \the [W] falls off, rendering it useless!")
+ else
+ to_chat(user, "You fail to extract a sliver from \The [src]! \the [W] isn't sharp enough anymore.")
else if(user.dropItemToGround(W))
user.visible_message("As [user] touches \the [src] with \a [W], silence fills the room...",\
"You touch \the [src] with \the [W], and everything suddenly goes silent.\n\The [W] flashes into dust as you flinch away from \the [src].",\
- "Everything suddenly goes silent.")
+ "Everything suddenly goes silent.")
investigate_log("has been attacked ([W]) by [key_name(user)]", INVESTIGATE_SUPERMATTER)
Consume(W)
- playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, 1)
+ playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, TRUE)
radiation_pulse(src, 150, 4)
+ else if(Adjacent(user)) //if the item is stuck to the person, kill the person too instead of eating just the item.
+ var/vis_msg = "[user] reaches out and touches [src] with [W], inducing a resonance... [W] starts to glow briefly before the light continues up to [user]'s body. [user.p_they(TRUE)] bursts into flames before flashing into dust!"
+ var/mob_msg = "You reach out and touch [src] with [W]. Everything starts burning and all you can hear is ringing. Your last thought is \"That was not a wise decision.\""
+ dust_mob(user, vis_msg, mob_msg)
+
/obj/machinery/power/supermatter_crystal/wrench_act(mob/user, obj/item/tool)
+ ..()
if (moveable)
default_unfasten_wrench(user, tool, time = 20)
return TRUE
/obj/machinery/power/supermatter_crystal/Bumped(atom/movable/AM)
if(isliving(AM))
- AM.visible_message("\The [AM] slams into \the [src] inducing a resonance... [AM.p_their()] body starts to glow and catch flame before flashing into ash.",\
+ AM.visible_message("\The [AM] slams into \the [src] inducing a resonance... [AM.p_their()] body starts to glow and burst into flames before flashing into dust!",\
"You slam into \the [src] as your ears are filled with unearthly ringing. Your last thought is \"Oh, fuck.\"",\
- "You hear an unearthly noise as a wave of heat washes over you.")
+ "You hear an unearthly noise as a wave of heat washes over you.")
else if(isobj(AM) && !iseffect(AM))
AM.visible_message("\The [AM] smacks into \the [src] and rapidly flashes to ash.", null,\
- "You hear a loud crack as you are washed with a wave of heat.")
+ "You hear a loud crack as you are washed with a wave of heat.")
else
return
- playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, 1)
-
+ playsound(get_turf(src), 'sound/effects/supermatter.ogg', 50, TRUE)
Consume(AM)
/obj/machinery/power/supermatter_crystal/intercept_zImpact(atom/movable/AM, levels)
@@ -645,7 +947,8 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
message_admins("[src] has consumed [key_name_admin(user)] [ADMIN_JMP(src)].")
investigate_log("has consumed [key_name(user)].", INVESTIGATE_SUPERMATTER)
user.dust(force = TRUE)
- matter_power += 200
+ if(power_changes)
+ matter_power += 200
else if(istype(AM, /obj/singularity))
return
else if(isobj(AM))
@@ -656,20 +959,18 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
message_admins("[src] has consumed [AM], [suspicion] [ADMIN_JMP(src)].")
investigate_log("has consumed [AM] - [suspicion].", INVESTIGATE_SUPERMATTER)
qdel(AM)
- if(!iseffect(AM))
+ if(!iseffect(AM) && power_changes)
matter_power += 200
//Some poor sod got eaten, go ahead and irradiate people nearby.
radiation_pulse(src, 3000, 2, TRUE)
- var/list/viewers = fov_viewers(world.view, src)
for(var/mob/living/L in range(10))
investigate_log("has irradiated [key_name(L)] after consuming [AM].", INVESTIGATE_SUPERMATTER)
- if(L in viewers)
+ if(L in view())
L.show_message("As \the [src] slowly stops resonating, you find your skin covered in new radiation burns.", MSG_VISUAL,\
"The unearthly ringing subsides and you notice you have new radiation burns.", MSG_AUDIBLE)
else
- L.show_message("You hear an unearthly ringing and notice your skin is covered in fresh radiation burns.", MSG_AUDIBLE)
-
+ L.show_message("You hear an unearthly ringing and notice your skin is covered in fresh radiation burns.", MSG_AUDIBLE)
//Do not blow up our internal radio
/obj/machinery/power/supermatter_crystal/contents_explosion(severity, target)
return
@@ -685,7 +986,9 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
anchored = FALSE
gasefficency = 0.125
explosion_power = 12
+ layer = ABOVE_MOB_LAYER
moveable = TRUE
+ psyOverlay = /obj/overlay/psy/shard
/obj/machinery/power/supermatter_crystal/shard/engine
name = "anchored supermatter shard"
@@ -699,6 +1002,8 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
name = "anchored supermatter shard"
takes_damage = FALSE
produces_gas = FALSE
+ power_changes = FALSE
+ processes = FALSE //SHUT IT DOWN
moveable = FALSE
anchored = TRUE
@@ -707,101 +1012,190 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
base_icon_state = "darkmatter"
icon_state = "darkmatter"
-/obj/machinery/power/supermatter_crystal/proc/supermatter_pull(turf/center, pull_range = 10)
- playsound(src.loc, 'sound/weapons/marauder.ogg', 100, 1, extrarange = 7)
- for(var/atom/P in orange(pull_range,center))
- if(ismovable(P))
- var/atom/movable/pulled_object = P
- if(ishuman(P))
- var/mob/living/carbon/human/H = P
- H.apply_effect(40, EFFECT_KNOCKDOWN, 0)
- if(pulled_object && !pulled_object.anchored && !ishuman(P))
- step_towards(pulled_object,center)
- step_towards(pulled_object,center)
- step_towards(pulled_object,center)
- step_towards(pulled_object,center)
+/obj/machinery/power/supermatter_crystal/proc/supermatter_pull(turf/center, pull_range = 3)
+ playsound(center, 'sound/weapons/marauder.ogg', 100, TRUE, extrarange = pull_range - world.view)
+ for(var/atom/movable/P in orange(pull_range,center))
+ if((P.anchored || P.move_resist >= MOVE_FORCE_EXTREMELY_STRONG)) //move resist memes.
+ if(istype(P, /obj/structure/closet))
+ var/obj/structure/closet/toggle = P
+ toggle.open(force = TRUE)
+ continue
+ if(ismob(P))
+ var/mob/M = P
+ if(M.mob_negates_gravity())
+ continue //You can't pull someone nailed to the deck
+ step_towards(P,center)
/obj/machinery/power/supermatter_crystal/proc/supermatter_anomaly_gen(turf/anomalycenter, type = FLUX_ANOMALY, anomalyrange = 5)
var/turf/L = pick(orange(anomalyrange, anomalycenter))
if(L)
switch(type)
if(FLUX_ANOMALY)
- var/obj/effect/anomaly/flux/A = new(L, 300)
+ var/obj/effect/anomaly/flux/A = new(L, 300, FALSE)
A.explosive = FALSE
if(GRAVITATIONAL_ANOMALY)
- new /obj/effect/anomaly/grav(L, 250)
+ new /obj/effect/anomaly/grav(L, 250, FALSE)
if(PYRO_ANOMALY)
- new /obj/effect/anomaly/pyro(L, 200)
+ new /obj/effect/anomaly/pyro(L, 200, FALSE)
-/obj/machinery/power/supermatter_crystal/proc/supermatter_zap(atom/zapstart, range = 3, power)
- . = zapstart.dir
- if(power < 1000)
+/obj/machinery/power/supermatter_crystal/proc/supermatter_zap(atom/zapstart = src, range = 5, zap_str = 4000, zap_flags = ZAP_SUPERMATTER_FLAGS, list/targets_hit = list())
+ if(QDELETED(zapstart))
return
+ . = zapstart.dir
+ //If the strength of the zap decays past the cutoff, we stop
+ if(zap_str < zap_cutoff)
+ return
+ var/atom/target
+ var/target_type = LOWEST
+ var/list/arctargets = list()
+ //Making a new copy so additons further down the recursion do not mess with other arcs
+ //Lets put this ourself into the do not hit list, so we don't curve back to hit the same thing twice with one arc
+ for(var/test in oview(zapstart, range))
+ if(!(zap_flags & ZAP_ALLOW_DUPLICATES) && LAZYACCESS(targets_hit, test))
+ continue
- var/target_atom
- var/mob/living/target_mob
- var/obj/machinery/target_machine
- var/obj/structure/target_structure
- var/list/arctargetsmob = list()
- var/list/arctargetsmachine = list()
- var/list/arctargetsstructure = list()
+ if(istype(test, /obj/vehicle/ridden/bicycle/))
+ var/obj/vehicle/ridden/bicycle/bike = test
+ if(!(bike.obj_flags & BEING_SHOCKED) && bike.can_buckle)//God's not on our side cause he hates idiots.
+ if(target_type != BIKE)
+ arctargets = list()
+ arctargets += test
+ target_type = BIKE
- if(prob(20)) //let's not hit all the engineers with every beam and/or segment of the arc
- for(var/mob/living/Z in oview(zapstart, range+2))
- arctargetsmob += Z
- if(arctargetsmob.len)
- var/mob/living/H = pick(arctargetsmob)
- var/atom/A = H
- target_mob = H
- target_atom = A
+ if(target_type > COIL)
+ continue
- else
- for(var/obj/machinery/X in oview(zapstart, range+2))
- arctargetsmachine += X
- if(arctargetsmachine.len)
- var/obj/machinery/M = pick(arctargetsmachine)
- var/atom/A = M
- target_machine = M
- target_atom = A
+ if(istype(test, /obj/machinery/power/tesla_coil/))
+ var/obj/machinery/power/tesla_coil/coil = test
+ if(coil.anchored && !(coil.obj_flags & BEING_SHOCKED) && !coil.panel_open && prob(70))//Diversity of death
+ if(target_type != COIL)
+ arctargets = list()
+ arctargets += test
+ target_type = COIL
- else
- for(var/obj/structure/Y in oview(zapstart, range+2))
- arctargetsstructure += Y
- if(arctargetsstructure.len)
- var/obj/structure/O = pick(arctargetsstructure)
- var/atom/A = O
- target_structure = O
- target_atom = A
+ if(target_type > ROD)
+ continue
- if(target_atom)
- zapstart.Beam(target_atom, icon_state="nzcrentrs_power", time=5)
- var/zapdir = get_dir(zapstart, target_atom)
+ if(istype(test, /obj/machinery/power/grounding_rod/))
+ var/obj/machinery/power/grounding_rod/rod = test
+ //We're adding machine damaging effects, rods need to be surefire
+ if(rod.anchored && !rod.panel_open)
+ if(target_type != ROD)
+ arctargets = list()
+ arctargets += test
+ target_type = ROD
+
+ if(target_type > LIVING)
+ continue
+
+ if(istype(test, /mob/living/))
+ var/mob/living/alive = test
+ if(!(HAS_TRAIT(alive, TRAIT_TESLA_SHOCKIMMUNE)) && !(alive.flags_1 & SHOCKED_1) && alive.stat != DEAD && prob(20))//let's not hit all the engineers with every beam and/or segment of the arc
+ if(target_type != LIVING)
+ arctargets = list()
+ arctargets += test
+ target_type = LIVING
+
+ if(target_type > MACHINERY)
+ continue
+
+ if(istype(test, /obj/machinery/))
+ var/obj/machinery/machine = test
+ if(!(machine.obj_flags & BEING_SHOCKED) && prob(40))
+ if(target_type != MACHINERY)
+ arctargets = list()
+ arctargets += test
+ target_type = MACHINERY
+
+ if(target_type > OBJECT)
+ continue
+
+ if(istype(test, /obj/))
+ var/obj/object = test
+ if(!(object.obj_flags & BEING_SHOCKED))
+ if(target_type != OBJECT)
+ arctargets = list()
+ arctargets += test
+ target_type = OBJECT
+
+ if(arctargets.len)//Pick from our pool
+ target = pick(arctargets)
+
+ if(!QDELETED(target))//If we found something
+ //Do the animation to zap to it from here
+ if(!(zap_flags & ZAP_ALLOW_DUPLICATES))
+ LAZYSET(targets_hit, target, TRUE)
+ zapstart.Beam(target, icon_state=zap_icon, time=5)
+ var/zapdir = get_dir(zapstart, target)
if(zapdir)
. = zapdir
- if(target_mob)
- target_mob.electrocute_act(rand(5,10), "Supermatter Discharge Bolt", 1, SHOCK_NOSTUN)
- if(prob(15))
- supermatter_zap(target_mob, 5, power / 2)
- supermatter_zap(target_mob, 5, power / 2)
- else
- supermatter_zap(target_mob, 5, power / 1.5)
+ //Going boom should be rareish
+ if(prob(80))
+ zap_flags &= ~ZAP_MACHINE_EXPLOSIVE
+ if(target_type == COIL)
+ //In the best situation we can expect this to grow up to 2120kw before a delam/IT'S GONE TOO FAR FRED SHUT IT DOWN
+ //The formula for power gen is zap_str * zap_mod / 2 * capacitor rating, between 1 and 4
+ var/multi = 10
+ switch(power)//Between 7k and 9k it's 20, above that it's 40
+ if(SEVERE_POWER_PENALTY_THRESHOLD to CRITICAL_POWER_PENALTY_THRESHOLD)
+ multi = 20
+ if(CRITICAL_POWER_PENALTY_THRESHOLD to INFINITY)
+ multi = 40
+ target.zap_act(zap_str * multi, zap_flags, list())
+ zap_str /= 3 //Coils should take a lot out of the power of the zap
- else if(target_machine)
- if(prob(15))
- supermatter_zap(target_machine, 5, power / 2)
- supermatter_zap(target_machine, 5, power / 2)
- else
- supermatter_zap(target_machine, 5, power / 1.5)
+ else if(target_type == ROD)
+ //We can expect this to do very little, maybe shock the poor soul buckled to it, but that's all.
+ //This is one of our endpoints, if the bolt hits a grounding rod, it stops jumping
+ target.zap_act(zap_str, zap_flags, list())
+ return
- else if(target_structure)
- if(prob(15))
- supermatter_zap(target_structure, 5, power / 2)
- supermatter_zap(target_structure, 5, power / 2)
- else
- supermatter_zap(target_structure, 5, power / 1.5)
+ else if(isliving(target))//If we got a fleshbag on our hands
+ var/mob/living/creature = target
+ creature.set_shocked()
+ addtimer(CALLBACK(creature, /mob/living/proc/reset_shocked), 10)
+ //3 shots a human with no resistance. 2 to crit, one to death. This is at at least 10000 power.
+ //There's no increase after that because the input power is effectivly capped at 10k
+ //Does 1.5 damage at the least
+ var/shock_damage = ((zap_flags & ZAP_MOB_DAMAGE) ? (power / 200) - 10 : rand(5,10))
+ creature.electrocute_act(shock_damage, "Supermatter Discharge Bolt", 1, ((zap_flags & ZAP_MOB_STUN) ? SHOCK_TESLA : SHOCK_NOSTUN))
+ zap_str /= 1.5 //Meatsacks are conductive, makes working in pairs more destructive
+ else
+ target.zap_act(zap_str, zap_flags, list())
+ zap_str /= 2 // worse then living things, better then coils
+ //This gotdamn variable is a boomer and keeps giving me problems
+ var/turf/T = get_turf(target)
+ var/pressure = 1
+ if(T && T.return_air())
+ pressure = max(1,T.return_air().return_pressure())
+ //We get our range with the strength of the zap and the pressure, the higher the former and the lower the latter the better
+ var/new_range = clamp(zap_str / pressure * 10, 2, 7)
+ var/zap_count = 1
+ if(prob(5))
+ zap_str -= (zap_str/10)
+ zap_count += 1
+ for(var/j in 1 to zap_count)
+ if(zap_count > 1)
+ targets_hit = targets_hit.Copy() //Pass by ref begone
+ supermatter_zap(target, new_range, zap_str, zap_flags, targets_hit)
+
+/obj/overlay/psy
+ icon = 'icons/obj/supermatter.dmi'
+ icon_state = "psy"
+ layer = FLOAT_LAYER - 1
+
+/obj/overlay/psy/shard
+ icon_state = "psy_shard"
#undef HALLUCINATION_RANGE
#undef GRAVITATIONAL_ANOMALY
#undef FLUX_ANOMALY
#undef PYRO_ANOMALY
+#undef BIKE
+#undef COIL
+#undef ROD
+#undef LIVING
+#undef MACHINERY
+#undef OBJECT
+#undef LOWEST
From f787e2d5253ac5471831ac969b29ce6bed7e31c1 Mon Sep 17 00:00:00 2001
From: silicons <2003111+silicons@users.noreply.github.com>
Date: Fri, 7 Aug 2020 06:03:31 -0700
Subject: [PATCH 02/14] whew
---
.../atmospherics/gasmixtures/gas_types.dm | 16 -------------
code/modules/power/supermatter/supermatter.dm | 24 +++++++++----------
2 files changed, 12 insertions(+), 28 deletions(-)
diff --git a/code/modules/atmospherics/gasmixtures/gas_types.dm b/code/modules/atmospherics/gasmixtures/gas_types.dm
index f095ff5f30..c7ffc51458 100644
--- a/code/modules/atmospherics/gasmixtures/gas_types.dm
+++ b/code/modules/atmospherics/gasmixtures/gas_types.dm
@@ -186,22 +186,6 @@ GLOBAL_LIST_INIT(nonreactive_gases, typecacheof(list(/datum/gas/oxygen, /datum/g
moles_visible = MOLES_GAS_VISIBLE * 60
rarity = 250
-/datum/gas/freon
- id = "freon"
- specific_heat = 600
- name = "Freon"
- gas_overlay = "freon"
- moles_visible = MOLES_GAS_VISIBLE *30
- fusion_power = -5
- rarity = 10
-
-/datum/gas/hydrogen
- id = "hydrogen"
- specific_heat = 15
- name = "Hydrogen"
- dangerous = TRUE
- rarity = 700
-
/obj/effect/overlay/gas
icon = 'icons/effects/atmospherics.dmi'
mouse_opacity = MOUSE_OPACITY_TRANSPARENT
diff --git a/code/modules/power/supermatter/supermatter.dm b/code/modules/power/supermatter/supermatter.dm
index fc30646688..4385946e48 100644
--- a/code/modules/power/supermatter/supermatter.dm
+++ b/code/modules/power/supermatter/supermatter.dm
@@ -159,8 +159,8 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/pluoxium,
/datum/gas/tritium,
/datum/gas/bz,
- /datum/gas/freon,
- /datum/gas/hydrogen,
+// /datum/gas/freon,
+// /datum/gas/hydrogen,
)
///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,8 +173,8 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/pluoxium = 0,
/datum/gas/tritium = 0,
/datum/gas/bz = 0,
- /datum/gas/freon = 0,
- /datum/gas/hydrogen = 0,
+// /datum/gas/freon = 0,
+// /datum/gas/hydrogen = 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(
@@ -184,7 +184,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/pluoxium = PLUOXIUM_TRANSMIT_MODIFIER,
/datum/gas/tritium = TRITIUM_TRANSMIT_MODIFIER,
/datum/gas/bz = BZ_TRANSMIT_MODIFIER,
- /datum/gas/hydrogen = HYDROGEN_TRANSMIT_MODIFIER,
+// /datum/gas/hydrogen = HYDROGEN_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,14 +196,14 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/pluoxium = PLUOXIUM_HEAT_PENALTY,
/datum/gas/tritium = TRITIUM_HEAT_PENALTY,
/datum/gas/bz = BZ_HEAT_PENALTY,
- /datum/gas/freon = FREON_HEAT_PENALTY,
- /datum/gas/hydrogen = HYDROGEN_HEAT_PENALTY,
+// /datum/gas/freon = FREON_HEAT_PENALTY,
+// /datum/gas/hydrogen = HYDROGEN_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/pluoxium = PLUOXIUM_HEAT_RESISTANCE,
- /datum/gas/hydrogen = HYDROGEN_HEAT_RESISTANCE,
+// /datum/gas/hydrogen = HYDROGEN_HEAT_RESISTANCE,
)
///The list of gases mapped against their powermix ratio
var/list/gas_powermix = list(
@@ -215,8 +215,8 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
/datum/gas/pluoxium = -1,
/datum/gas/tritium = 1,
/datum/gas/bz = 1,
- /datum/gas/freon = -1,
- /datum/gas/hydrogen = 1,
+// /datum/gas/freon = -1,
+// /datum/gas/hydrogen = 1,
)
///The last air sample's total molar count, will always be above or equal to 0
var/combined_gas = 0
@@ -555,7 +555,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//We're concerned about pluoxium being too easy to abuse at low percents, so we make sure there's a substantial amount.
var/pluoxiumbonus = (gas_comp[/datum/gas/pluoxium] >= 0.15) //makes pluoxium only work at 15%+
var/h2obonus = 1 - (gas_comp[/datum/gas/water_vapor] * 0.25)//At max this value should be 0.75
- var/freonbonus = (gas_comp[/datum/gas/freon] <= 0.03) //Let's just yeet power output if this shit is high
+// var/freonbonus = (gas_comp[/datum/gas/freon] <= 0.03) //Let's just yeet power output if this shit is high
heat_mod[/datum/gas/pluoxium] = pluoxiumbonus
transit_mod[/datum/gas/pluoxium] = pluoxiumbonus
@@ -626,7 +626,7 @@ 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%)
+ radiation_pulse(src, power * max(0, (1 + (power_transmission_bonus/(10-(gas_comp[/datum/gas/bz] * BZ_RADIOACTIVITY_MODIFIER)))) * 1))//freonbonus))// RadModBZ(500%)
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
From 53f908e32b3644c0fd594bb13b4162e63319236b Mon Sep 17 00:00:00 2001
From: silicons <2003111+silicons@users.noreply.github.com>
Date: Fri, 7 Aug 2020 06:09:42 -0700
Subject: [PATCH 03/14] putnamos
---
code/modules/power/supermatter/supermatter.dm | 25 +++++++++----------
1 file changed, 12 insertions(+), 13 deletions(-)
diff --git a/code/modules/power/supermatter/supermatter.dm b/code/modules/power/supermatter/supermatter.dm
index 4385946e48..8e9b1d9233 100644
--- a/code/modules/power/supermatter/supermatter.dm
+++ b/code/modules/power/supermatter/supermatter.dm
@@ -349,10 +349,10 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
if(integrity < SUPERMATTER_DANGER_PERCENT)
return SUPERMATTER_DANGER
- if((integrity < SUPERMATTER_WARNING_PERCENT) || (air.temperature > CRITICAL_TEMPERATURE))
+ if((integrity < SUPERMATTER_WARNING_PERCENT) || (air.return_temperature() > CRITICAL_TEMPERATURE))
return SUPERMATTER_WARNING
- if(air.temperature > (CRITICAL_TEMPERATURE * 0.8))
+ if(air.return_temperature() > (CRITICAL_TEMPERATURE * 0.8))
return SUPERMATTER_NOTIFY
if(power > 5)
@@ -513,7 +513,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//((((some value between 0.5 and 1 * temp - ((273.15 + 40) * some values between 1 and 10)) * some number between 0.25 and knock your socks off / 150) * 0.25
//Heat and mols account for each other, a lot of hot mols are more damaging then a few
//Mols start to have a positive effect on damage after 350
- damage = max(damage + (max(clamp(removed.total_moles() / 200, 0.5, 1) * removed.temperature - ((T0C + HEAT_PENALTY_THRESHOLD)*dynamic_heat_resistance), 0) * mole_heat_penalty / 150 ) * DAMAGE_INCREASE_MULTIPLIER, 0)
+ damage = max(damage + (max(clamp(removed.total_moles() / 200, 0.5, 1) * removed.return_temperature() - ((T0C + HEAT_PENALTY_THRESHOLD)*dynamic_heat_resistance), 0) * mole_heat_penalty / 150 ) * DAMAGE_INCREASE_MULTIPLIER, 0)
//Power only starts affecting damage when it is above 5000
damage = max(damage + (max(power - POWER_PENALTY_THRESHOLD, 0)/500) * DAMAGE_INCREASE_MULTIPLIER, 0)
//Molar count only starts affecting damage when it is above 1800
@@ -523,7 +523,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//healing damage
if(combined_gas < MOLE_PENALTY_THRESHOLD)
//Only has a net positive effect when the temp is below 313.15, heals up to 2 damage. Psycologists increase this temp min by up to 45
- damage = max(damage + (min(removed.temperature - ((T0C + HEAT_PENALTY_THRESHOLD) + (45 * psyCoeff)), 0) / 150 ), 0)
+ damage = max(damage + (min(removed.return_temperature() - ((T0C + HEAT_PENALTY_THRESHOLD) + (45 * psyCoeff)), 0) / 150 ), 0)
//caps damage rate
@@ -531,9 +531,6 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//This means we can only deal 1.8 damage per function call
damage = min(damage_archived + (DAMAGE_HARDCAP * explosion_point),damage)
- for(var/gasID in gases_we_care_about)
- removed.assert_gas(gasID)
-
//calculating gas related values
//Wanna know a secret? See that max() to zero? it's used for error checking. If we get a mol count in the negative, we'll get a divide by zero error
combined_gas = max(removed.total_moles(), 0)
@@ -546,7 +543,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//Prevents huge bursts of gas/heat when a large amount of something is introduced
//They range between 0 and 1
for(var/gasID in gases_we_care_about)
- gas_comp[gasID] += clamp(max(removed.gases[gasID][MOLES]/combined_gas, 0) - gas_comp[gasID], -1, gas_change_rate)
+ gas_comp[gasID] += clamp(max(removed.get_moles(gasID)/combined_gas, 0) - gas_comp[gasID], -1, gas_change_rate)
var/list/heat_mod = gases_we_care_about.Copy()
var/list/transit_mod = gases_we_care_about.Copy()
@@ -641,15 +638,17 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//Also keep in mind we are only adding this temperature to (efficiency)% of the one tile the rock
//is on. An increase of 4*C @ 25% efficiency here results in an increase of 1*C / (#tilesincore) overall.
//Power * 0.55 * (some value between 1.5 and 23) / 5
- removed.temperature += ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER)
+ // so this is added ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER)
+ // oh and
//We can only emit so much heat, that being 57500
- removed.temperature = max(0, min(removed.temperature, 2500 * dynamic_heat_modifier))
+ // so max() it all.
+ removed.set_temperature(max(0, min(removed.temperature + ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER), 2500 * dynamic_heat_modifier)))
//Calculate how much gas to release
//Varies based on power and gas content
- removed.gases[/datum/gas/plasma][MOLES] += max((device_energy * dynamic_heat_modifier) / PLASMA_RELEASE_MODIFIER, 0)
+ removed.adjust_moles(/datum/gas/plasma, max((device_energy * dynamic_heat_modifier) / PLASMA_RELEASE_MODIFIER, 0))
//Varies based on power, gas content, and heat
- removed.gases[/datum/gas/oxygen][MOLES] += max(((device_energy + removed.temperature * dynamic_heat_modifier) - T0C) / OXYGEN_RELEASE_MODIFIER, 0)
+ removed.adjust_moles(/datum/gas/oxygen, max(((device_energy + removed.return_temperature() * dynamic_heat_modifier) - T0C) / OXYGEN_RELEASE_MODIFIER, 0))
if(produces_gas)
env.merge(removed)
@@ -758,7 +757,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
return 1
-/obj/machinery/power/supermatter_crystal/bullet_act(obj/projectile/Proj)
+/obj/machinery/power/supermatter_crystal/bullet_act(obj/item/projectile/Proj)
var/turf/L = loc
if(!istype(L))
return FALSE
From 375e764e4c445e88bcf7c5dfa4b033e273283dcb Mon Sep 17 00:00:00 2001
From: silicons <2003111+silicons@users.noreply.github.com>
Date: Fri, 7 Aug 2020 06:19:39 -0700
Subject: [PATCH 04/14] support updates
---
code/__DEFINES/dcs/signals.dm | 99 ++++++++++++-------
code/__DEFINES/traits.dm | 2 +-
code/datums/elements/bsa_blocker.dm | 10 ++
code/modules/power/supermatter/supermatter.dm | 15 ++-
code/modules/station_goals/bsa.dm | 37 +++++--
tgstation.dme | 1 +
6 files changed, 119 insertions(+), 45 deletions(-)
create mode 100644 code/datums/elements/bsa_blocker.dm
diff --git a/code/__DEFINES/dcs/signals.dm b/code/__DEFINES/dcs/signals.dm
index 7e1a83486d..30e2135fbf 100644
--- a/code/__DEFINES/dcs/signals.dm
+++ b/code/__DEFINES/dcs/signals.dm
@@ -15,22 +15,31 @@
//////////////////////////////////////////////////////////////////
// /datum signals
-#define COMSIG_COMPONENT_ADDED "component_added" //sent to the new datum parent when a component is added to them: (/datum/component)
-#define COMSIG_COMPONENT_REMOVING "component_removing" //sent to the datum parent before a component is removed from them because of RemoveComponent: (/datum/component)
-#define COMSIG_COMPONENT_UNREGISTER_PARENT "component_unregister_parent" //sent to the component itself when unregistered from a parent
-#define COMSIG_COMPONENT_REGISTER_PARENT "component_register_parent" //sent to the component itself when registered to a parent
-#define COMSIG_PARENT_PREQDELETED "parent_preqdeleted" //before a datum's Destroy() is called: (force), returning a nonzero value will cancel the qdel operation
-#define COMSIG_PARENT_QDELETING "parent_qdeleting" //just before a datum's Destroy() is called: (force), at this point none of the other components chose to interrupt qdel and Destroy will be called
-
-/// Trait signals
-#define COMPONENT_ADD_TRAIT (1<<0)
-#define COMPONENT_REMOVE_TRAIT (1<<1)
+/// when a component is added to a datum: (/datum/component)
+#define COMSIG_COMPONENT_ADDED "component_added"
+/// before a component is removed from a datum because of RemoveComponent: (/datum/component)
+#define COMSIG_COMPONENT_REMOVING "component_removing"
+/// before a datum's Destroy() is called: (force), returning a nonzero value will cancel the qdel operation
+#define COMSIG_PARENT_PREQDELETED "parent_preqdeleted"
+/// just before a datum's Destroy() is called: (force), at this point none of the other components chose to interrupt qdel and Destroy will be called
+#define COMSIG_PARENT_QDELETING "parent_qdeleting"
+/// generic topic handler (usr, href_list)
+#define COMSIG_TOPIC "handle_topic"
/// fires on the target datum when an element is attached to it (/datum/element)
#define COMSIG_ELEMENT_ATTACH "element_attach"
/// fires on the target datum when an element is attached to it (/datum/element)
#define COMSIG_ELEMENT_DETACH "element_detach"
+/// sent to the component itself when unregistered from a parent
+#define COMSIG_COMPONENT_UNREGISTER_PARENT "component_unregister_parent"
+/// sent to the component itself when registered to a parent
+#define COMSIG_COMPONENT_REGISTER_PARENT "component_register_parent"
+
+/// Trait signals
+#define COMPONENT_ADD_TRAIT (1<<0)
+#define COMPONENT_REMOVE_TRAIT (1<<1)
+
// /atom signals
//from base of atom/proc/Initialize(): sent any time a new atom is created
#define COMSIG_ATOM_CREATED "atom_created"
@@ -56,30 +65,52 @@
#define COMSIG_ATOM_EXIT "atom_exit" //from base of atom/Exit(): (/atom/movable/exiting, /atom/newloc)
#define COMPONENT_ATOM_BLOCK_EXIT 1
#define COMSIG_ATOM_EXITED "atom_exited" //from base of atom/Exited(): (atom/movable/exiting, atom/newloc)
-#define COMSIG_ATOM_EX_ACT "atom_ex_act" //from base of atom/ex_act(): (severity, target)
-#define COMSIG_ATOM_EMP_ACT "atom_emp_act" //from base of atom/emp_act(): (severity)
-#define COMSIG_ATOM_FIRE_ACT "atom_fire_act" //from base of atom/fire_act(): (exposed_temperature, exposed_volume)
-#define COMSIG_ATOM_BULLET_ACT "atom_bullet_act" //from base of atom/bullet_act(): (/obj/item/projectile, def_zone)
-#define COMSIG_ATOM_BLOB_ACT "atom_blob_act" //from base of atom/blob_act(): (/obj/structure/blob)
-#define COMSIG_ATOM_ACID_ACT "atom_acid_act" //from base of atom/acid_act(): (acidpwr, acid_volume)
-#define COMSIG_ATOM_EMAG_ACT "atom_emag_act" //from base of atom/emag_act(): ()
-#define COMSIG_ATOM_RAD_ACT "atom_rad_act" //from base of atom/rad_act(intensity)
-#define COMSIG_ATOM_NARSIE_ACT "atom_narsie_act" //from base of atom/narsie_act(): ()
-#define COMSIG_ATOM_RATVAR_ACT "atom_ratvar_act" //from base of atom/ratvar_act(): ()
-#define COMSIG_ATOM_RCD_ACT "atom_rcd_act" //from base of atom/rcd_act(): (/mob, /obj/item/construction/rcd, passed_mode)
-#define COMSIG_ATOM_SING_PULL "atom_sing_pull" //from base of atom/singularity_pull(): (S, current_size)
-#define COMSIG_ATOM_SET_LIGHT "atom_set_light" //from base of atom/set_light(): (l_range, l_power, l_color)
-#define COMSIG_ATOM_DIR_CHANGE "atom_dir_change" //from base of atom/setDir(): (old_dir, new_dir)
-#define COMSIG_ATOM_CONTENTS_DEL "atom_contents_del" //from base of atom/handle_atom_del(): (atom/deleted)
-#define COMSIG_ATOM_HAS_GRAVITY "atom_has_gravity" //from base of atom/has_gravity(): (turf/location, list/forced_gravities)
-#define COMSIG_ATOM_RAD_PROBE "atom_rad_probe" //from proc/get_rad_contents(): ()
- #define COMPONENT_BLOCK_RADIATION 1
-#define COMSIG_ATOM_RAD_CONTAMINATING "atom_rad_contam" //from base of datum/radiation_wave/radiate(): (strength)
- #define COMPONENT_BLOCK_CONTAMINATION 1
-#define COMSIG_ATOM_RAD_WAVE_PASSING "atom_rad_wave_pass" //from base of datum/radiation_wave/check_obstructions(): (datum/radiation_wave, width)
- #define COMPONENT_RAD_WAVE_HANDLED 1
-#define COMSIG_ATOM_CANREACH "atom_can_reach" //from internal loop in atom/movable/proc/CanReach(): (list/next)
- #define COMPONENT_BLOCK_REACH 1
+///from base of atom/ex_act(): (severity, target)
+#define COMSIG_ATOM_EX_ACT "atom_ex_act"
+///from base of atom/emp_act(): (severity)
+#define COMSIG_ATOM_EMP_ACT "atom_emp_act"
+///from base of atom/fire_act(): (exposed_temperature, exposed_volume)
+#define COMSIG_ATOM_FIRE_ACT "atom_fire_act"
+///from base of atom/bullet_act(): (/obj/projectile, def_zone)
+#define COMSIG_ATOM_BULLET_ACT "atom_bullet_act"
+///from base of atom/blob_act(): (/obj/structure/blob)
+#define COMSIG_ATOM_BLOB_ACT "atom_blob_act"
+///from base of atom/acid_act(): (acidpwr, acid_volume)
+#define COMSIG_ATOM_ACID_ACT "atom_acid_act"
+///from base of atom/emag_act(): (/mob/user)
+#define COMSIG_ATOM_EMAG_ACT "atom_emag_act"
+///from base of atom/rad_act(intensity)
+#define COMSIG_ATOM_RAD_ACT "atom_rad_act"
+///from base of atom/narsie_act(): ()
+#define COMSIG_ATOM_NARSIE_ACT "atom_narsie_act"
+///from base of atom/rcd_act(): (/mob, /obj/item/construction/rcd, passed_mode)
+#define COMSIG_ATOM_RCD_ACT "atom_rcd_act"
+///from base of atom/singularity_pull(): (S, current_size)
+#define COMSIG_ATOM_SING_PULL "atom_sing_pull"
+///from obj/machinery/bsa/full/proc/fire(): ()
+#define COMSIG_ATOM_BSA_BEAM "atom_bsa_beam_pass"
+ #define COMSIG_ATOM_BLOCKS_BSA_BEAM (1<<0)
+///from base of atom/set_light(): (l_range, l_power, l_color)
+#define COMSIG_ATOM_SET_LIGHT "atom_set_light"
+///from base of atom/setDir(): (old_dir, new_dir). Called before the direction changes.
+#define COMSIG_ATOM_DIR_CHANGE "atom_dir_change"
+///from base of atom/handle_atom_del(): (atom/deleted)
+#define COMSIG_ATOM_CONTENTS_DEL "atom_contents_del"
+///from base of atom/has_gravity(): (turf/location, list/forced_gravities)
+#define COMSIG_ATOM_HAS_GRAVITY "atom_has_gravity"
+///from proc/get_rad_contents(): ()
+#define COMSIG_ATOM_RAD_PROBE "atom_rad_probe"
+ #define COMPONENT_BLOCK_RADIATION (1<<0)
+///from base of datum/radiation_wave/radiate(): (strength)
+#define COMSIG_ATOM_RAD_CONTAMINATING "atom_rad_contam"
+ #define COMPONENT_BLOCK_CONTAMINATION (1<<0)
+///from base of datum/radiation_wave/check_obstructions(): (datum/radiation_wave, width)
+#define COMSIG_ATOM_RAD_WAVE_PASSING "atom_rad_wave_pass"
+ #define COMPONENT_RAD_WAVE_HANDLED (1<<0)
+///from internal loop in atom/movable/proc/CanReach(): (list/next)
+#define COMSIG_ATOM_CANREACH "atom_can_reach"
+ #define COMPONENT_ALLOW_REACH (1<<0)
+
#define COMSIG_ATOM_SCREWDRIVER_ACT "atom_screwdriver_act" //from base of atom/screwdriver_act(): (mob/living/user, obj/item/I)
#define COMSIG_ATOM_INTERCEPT_TELEPORT "intercept_teleport" //called when teleporting into a protected turf: (channel, turf/origin, turf/destination)
#define COMPONENT_BLOCK_TELEPORT 1
diff --git a/code/__DEFINES/traits.dm b/code/__DEFINES/traits.dm
index 3e5b27d376..8bfce40923 100644
--- a/code/__DEFINES/traits.dm
+++ b/code/__DEFINES/traits.dm
@@ -310,4 +310,4 @@
#define ACTIVE_BLOCK_TRAIT "active_block"
/// This trait is added by the parry system.
#define ACTIVE_PARRY_TRAIT "active_parry"
-#define STICKY_NODROP "sticky-nodrop" //sticky nodrop sounds like a bad soundcloud rapper's name
\ No newline at end of file
+#define STICKY_NODROP "sticky-nodrop" //sticky nodrop sounds like a bad soundcloud rapper's name
diff --git a/code/datums/elements/bsa_blocker.dm b/code/datums/elements/bsa_blocker.dm
new file mode 100644
index 0000000000..61140ad0ed
--- /dev/null
+++ b/code/datums/elements/bsa_blocker.dm
@@ -0,0 +1,10 @@
+//blocks bluespace artillery beams that try to fly through
+//look not all elements need to be fancy
+/datum/element/bsa_blocker/Attach(datum/target)
+ if(!isatom(target))
+ return ELEMENT_INCOMPATIBLE
+ RegisterSignal(target, COMSIG_ATOM_BSA_BEAM, .proc/block_bsa)
+ return ..()
+
+/datum/element/bsa_blocker/proc/block_bsa()
+ return COMSIG_ATOM_BLOCKS_BSA_BEAM
diff --git a/code/modules/power/supermatter/supermatter.dm b/code/modules/power/supermatter/supermatter.dm
index 8e9b1d9233..5d44e9c97f 100644
--- a/code/modules/power/supermatter/supermatter.dm
+++ b/code/modules/power/supermatter/supermatter.dm
@@ -619,7 +619,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
//if there is more pluox and n2 then anything else, we receive no power increase from heat
if(power_changes)
- power = max((removed.temperature * temp_factor / T0C) * gasmix_power_ratio + power, 0)
+ power = max((removed.return_temperature() * temp_factor / T0C) * gasmix_power_ratio + power, 0)
if(prob(50))
//(1 + (tritRad + pluoxDampen * bzDampen * o2Rad * plasmaRad / (10 - bzrads))) * freonbonus
@@ -642,7 +642,7 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
// oh and
//We can only emit so much heat, that being 57500
// so max() it all.
- removed.set_temperature(max(0, min(removed.temperature + ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER), 2500 * dynamic_heat_modifier)))
+ removed.set_temperature(max(0, min(removed.return_temperature() + ((device_energy * dynamic_heat_modifier) / THERMAL_RELEASE_MODIFIER), 2500 * dynamic_heat_modifier)))
//Calculate how much gas to release
//Varies based on power and gas content
@@ -970,6 +970,17 @@ GLOBAL_DATUM(main_supermatter_engine, /obj/machinery/power/supermatter_crystal)
"The unearthly ringing subsides and you notice you have new radiation burns.", MSG_AUDIBLE)
else
L.show_message("You hear an unearthly ringing and notice your skin is covered in fresh radiation burns.", MSG_AUDIBLE)
+
+/obj/machinery/power/supermatter_crystal/proc/consume_turf(turf/T)
+ var/oldtype = T.type
+ var/turf/newT = T.ScrapeAway()
+ if(newT.type == oldtype)
+ return
+ playsound(T, 'sound/effects/supermatter.ogg', 50, 1)
+ T.visible_message("[T] smacks into [src] and rapidly flashes to ash.",\
+ "You hear a loud crack as you are washed with a wave of heat.")
+ CALCULATE_ADJACENT_TURFS(T)
+
//Do not blow up our internal radio
/obj/machinery/power/supermatter_crystal/contents_explosion(severity, target)
return
diff --git a/code/modules/station_goals/bsa.dm b/code/modules/station_goals/bsa.dm
index 2ca0e65477..4e3310655f 100644
--- a/code/modules/station_goals/bsa.dm
+++ b/code/modules/station_goals/bsa.dm
@@ -180,16 +180,37 @@
reload()
/obj/machinery/bsa/full/proc/fire(mob/user, turf/bullseye)
- var/turf/point = get_front_turf()
- for(var/turf/T in getline(get_step(point,dir),get_target_turf()))
- T.ex_act(EXPLODE_DEVASTATE)
- point.Beam(get_target_turf(),icon_state="bsa_beam",time=50,maxdistance = world.maxx) //ZZZAP
-
- message_admins("[ADMIN_LOOKUPFLW(user)] has launched an artillery strike.")
- explosion(bullseye,ex_power,ex_power*2,ex_power*4)
-
reload()
+ var/turf/point = get_front_turf()
+ var/turf/target = get_target_turf()
+ var/atom/movable/blocker
+ for(var/T in getline(get_step(point, dir), target))
+ var/turf/tile = T
+ if(SEND_SIGNAL(tile, COMSIG_ATOM_BSA_BEAM) & COMSIG_ATOM_BLOCKS_BSA_BEAM)
+ blocker = tile
+ else
+ for(var/AM in tile)
+ var/atom/movable/stuff = AM
+ if(SEND_SIGNAL(stuff, COMSIG_ATOM_BSA_BEAM) & COMSIG_ATOM_BLOCKS_BSA_BEAM)
+ blocker = stuff
+ break
+ if(blocker)
+ target = tile
+ break
+ else
+ tile.ex_act(EXPLODE_DEVASTATE)
+ point.Beam(target, icon_state = "bsa_beam", time = 50, maxdistance = world.maxx) //ZZZAP
+ new /obj/effect/temp_visual/bsa_splash(point, dir)
+
+ if(!blocker)
+ message_admins("[ADMIN_LOOKUPFLW(user)] has launched an artillery strike targeting [ADMIN_VERBOSEJMP(bullseye)].")
+ log_game("[key_name(user)] has launched an artillery strike targeting [AREACOORD(bullseye)].")
+ explosion(bullseye, ex_power, ex_power*2, ex_power*4)
+ else
+ message_admins("[ADMIN_LOOKUPFLW(user)] has launched an artillery strike targeting [ADMIN_VERBOSEJMP(bullseye)] but it was blocked by [blocker] at [ADMIN_VERBOSEJMP(target)].")
+ log_game("[key_name(user)] has launched an artillery strike targeting [AREACOORD(bullseye)] but it was blocked by [blocker] at [AREACOORD(target)].")
+
/obj/machinery/bsa/full/proc/reload()
ready = FALSE
use_power(power_used_per_shot)
diff --git a/tgstation.dme b/tgstation.dme
index faa1ce990c..65283cd1cb 100644
--- a/tgstation.dme
+++ b/tgstation.dme
@@ -556,6 +556,7 @@
#include "code\datums\elements\_element.dm"
#include "code\datums\elements\art.dm"
#include "code\datums\elements\beauty.dm"
+#include "code\datums\elements\bsa_blocker.dm"
#include "code\datums\elements\cleaning.dm"
#include "code\datums\elements\decal.dm"
#include "code\datums\elements\dusts_on_catatonia.dm"
From 9703bb38b131eeb5158673b723993c4bd22805e0 Mon Sep 17 00:00:00 2001
From: silicons <2003111+silicons@users.noreply.github.com>
Date: Fri, 7 Aug 2020 06:22:46 -0700
Subject: [PATCH 05/14] Fixes
---
code/__DEFINES/dcs/signals.dm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/code/__DEFINES/dcs/signals.dm b/code/__DEFINES/dcs/signals.dm
index 30e2135fbf..c61ad58f94 100644
--- a/code/__DEFINES/dcs/signals.dm
+++ b/code/__DEFINES/dcs/signals.dm
@@ -83,6 +83,8 @@
#define COMSIG_ATOM_RAD_ACT "atom_rad_act"
///from base of atom/narsie_act(): ()
#define COMSIG_ATOM_NARSIE_ACT "atom_narsie_act"
+///from base of atom/ratvar_act(): ()
+#define COMSIG_ATOM_RATVAR_ACT "atom_ratvar_act"
///from base of atom/rcd_act(): (/mob, /obj/item/construction/rcd, passed_mode)
#define COMSIG_ATOM_RCD_ACT "atom_rcd_act"
///from base of atom/singularity_pull(): (S, current_size)
@@ -109,7 +111,7 @@
#define COMPONENT_RAD_WAVE_HANDLED (1<<0)
///from internal loop in atom/movable/proc/CanReach(): (list/next)
#define COMSIG_ATOM_CANREACH "atom_can_reach"
- #define COMPONENT_ALLOW_REACH (1<<0)
+ #define COMPONENT_BLOCK_REACH (1<<0)
#define COMSIG_ATOM_SCREWDRIVER_ACT "atom_screwdriver_act" //from base of atom/screwdriver_act(): (mob/living/user, obj/item/I)
#define COMSIG_ATOM_INTERCEPT_TELEPORT "intercept_teleport" //called when teleporting into a protected turf: (channel, turf/origin, turf/destination)
From 891afed687e773e01e99040dee1db7d7eb20a396 Mon Sep 17 00:00:00 2001
From: silicons <2003111+silicons@users.noreply.github.com>
Date: Fri, 7 Aug 2020 06:27:49 -0700
Subject: [PATCH 06/14] hoh
---
.../effects/temporary_visuals/miscellaneous.dm | 17 +++++++++++++++++
icons/effects/beam_splash.dmi | Bin 0 -> 4548 bytes
sound/machines/sm/loops/calm.ogg | Bin 0 -> 84096 bytes
sound/machines/sm/loops/delamming.ogg | Bin 0 -> 86548 bytes
4 files changed, 17 insertions(+)
create mode 100644 icons/effects/beam_splash.dmi
create mode 100644 sound/machines/sm/loops/calm.ogg
create mode 100644 sound/machines/sm/loops/delamming.ogg
diff --git a/code/game/objects/effects/temporary_visuals/miscellaneous.dm b/code/game/objects/effects/temporary_visuals/miscellaneous.dm
index 396f463136..8d5458333c 100644
--- a/code/game/objects/effects/temporary_visuals/miscellaneous.dm
+++ b/code/game/objects/effects/temporary_visuals/miscellaneous.dm
@@ -139,6 +139,23 @@
/obj/effect/temp_visual/dir_setting/curse/hand
icon_state = "cursehand"
+/obj/effect/temp_visual/bsa_splash
+ name = "\improper Bluespace energy wave"
+ desc = "A massive, rippling wave of bluepace energy, all rapidly exhausting itself the moment it leaves the concentrated beam of light."
+ icon = 'icons/effects/beam_splash.dmi'
+ icon_state = "beam_splash_l"
+ layer = ABOVE_ALL_MOB_LAYER
+ pixel_y = -16
+ duration = 50
+
+/obj/effect/temp_visual/bsa_splash/Initialize(mapload, dir)
+ . = ..()
+ switch(dir)
+ if(WEST)
+ icon_state = "beam_splash_w"
+ if(EAST)
+ icon_state = "beam_splash_e"
+
/obj/effect/temp_visual/wizard
name = "water"
icon = 'icons/mob/mob.dmi'
diff --git a/icons/effects/beam_splash.dmi b/icons/effects/beam_splash.dmi
new file mode 100644
index 0000000000000000000000000000000000000000..d7deb3e9275cdf29efdd160082a402eb1b03a54f
GIT binary patch
literal 4548
zcmV;#5j*aQP)V=-0C=2@%P|VVFcb#hIqwud?Ha^raC?iSNQU+bC6cEJv?@ukczZA4;J1H0
z&cnq|aHFTUl$xIpFzjwmYRj=DFpdXON%B24Fiw_g3r)c2t`gR{zLrqaEFGzsO9jJ_
zx|Og>1;dhxvV;#9MjLIk`Q5j_dyipqaHFR$IHNNffKBV(000p4Nkl1ul>l5lO>eHArZ-*l(I;HUf1W;1
z7qj>0c^8aaJxy;u{={DZaPfVLYsQN<|r1d0+3P-nP>yMM!71c$a7pCekOOc8K2
zM-)nvK-MXv(+TXN@lALcBYPPm`?|*F>l&N;@hH#p?PUrFkrgW&TK<(VeOH&}#drK6
zFW}hwDTI=4-MVmU09WIu9J5mcXf&06AF#)<((lK}OE=`F&q(u77y2DG;nKoDp81X{
zIz|mZ3B2DRlb802DS0t^;&S%S&6K{o!y12((>;6xw<|83CD
zb6n;*E+-RA_#HpuoW6|NAg$Mfz>?A)UaY
z!0X)_#mCLA&OUCCQ3!xzqsV8Q(k5L1Sgo*{OfVrG{Z~G-oIO9x=lEe8tw@ZjB7*co
zRELWNZdWU;NaH8nygUF~~JCYa>dmAk;M+`9aLzXtLW0GpbT(nlt!6-*6LM=(O^lZQ5h
zz-EJ`5CFhqhLxmGApq)|0?)_&<5jm9C#NsXSlReDyTFSuAk7Sm0K^e=@;DngZSXfn8(N9TCvPvfim}
z7Yp374(4Vu7
zsRvHl*BeY8vvSXqeArB)OA|`kda}t>c4-c5CfQZiS|-3G0Km@kG}$8{y!Vr?k7m(m
zY7ShLPG>BHzONwKdaJBgP20y5xP;9q0Gc88a$qO@`hM9PY=WR+V$MhCV$rwJ)(szn
zzRmHId}#WgGT`T?K7FeI=!%eP&-OBcjI37M6)NyjzI7^?j$H`xPipNTlxdHLr9EV&c!An73@&KGVnlb4+7lRI7c!Tx8DklCBpQY((GM3i#O+z&e9em>B
z?fcSq{r->oUu&V&3ajgJeLkwnZw&~MFQ`jA6uJ>66HMBm?|KItK$clLPpQhU{Vu|`
z*c1X+8Jw$Zb$YnRAD=R-2H5Ve0lzvG0}%g@w)O-yP9eKQjTJ@HV2O;i?Dplvu73g60;_P5Q(4?)|e*B8c7fLw)o
z%&_Xh6Q%~hq`4>V8V3Eg|0~NZmzqu~9
zC^mho1~65Ek1C`P_^wFl9w41ixdtApitEsK+29oP2_0Y)v;4zyaL<>6hk%eFAY^I#
zt;Cd#5nu=jtD=9-Az|K8!8$V6#H5KZuPQn=x~tVL*im1mXXI~9r*j#FD;+~kw@Mwe
z4s;{f8k+a8F8RM)nm3hw`?mADLW4q=v*!ozStds2=*<|~VQF(7-6njd4IvV?iU<6{
z!Wj=C!?9&p_-b`@$jF2KtKaAPUqeR(v)*M`IB@L!+#n*$5BO~wt=t|iO@OIzIvl*}
zU3Ij9HbEwJ=u`2w?@Uo6Q`5ld)-X+9ZVhXL2iMjxQ{%Ip
zd`)jqjv&d9mP%RiG4=(@EFpL6ZB5yU0buD@PEaa|E@$6Ib(KYJ81Ynn&Uw=sEClQ(l;njW5xbFbXYjfF9|XG?VYn
zWTy#mrHDz98H8Yh2rURP1(1*nR1^ZugDpcx6XjQz$|6dqS&WjwEY9h)z{z$`KS3Y~-tAT1vzeyYZ#!m5pqw
zaQU5lJ|=&mlS);vY5)pBo5Xxk9%<|~K>{B1$j6ivvub`LrEk;*oF?EL3X@XZ>vZuc
zGozYty+IZ`UvQ-l&?U}608>Mo-|M{-9?Sfm&596kP~`
zw7*@R(s54d;#1(D0cP*d^FE&!1envscgRi>cx4Gog~0@*$5{!$fb{5mns-3A7zCi_
z7zCi_7zCi_7zCi_7zCi_7zCi_=#>D(I^XEujO43M63M56yIgWkz1Cm~GWk7GXq`57HhRfTK$kuLoO)hNm^by9HP0{Y1oqMC
zlTpPCCwtr<{B5d>C>p?5{luoN14>iF6kVM<$fPQ!uyp|lQ9m(g%bhZZ(DIgSKSRE4
z?~@_n@}6@JGHF!+Ak}D55!m
zDR&g<#^)Zwm+>e^zHJ;@&dN3A4q~J0ZR9a`O_LWbaNIGZ%?@BUJyAyiDfSkcb`iTy
z8*d8JW=y$JQzp`g-T0C|X;Mge*f$Yv7+7UrV+w&S!Ey{ikhY&-&VbU5`Ekc^Tk79d
z$8v+Ht_R-?ZM6kJszWL9A?l|tU1@V|_qDl;*!DadUnPymDFjVu5;EC?{!OQ`lL;i4
zPoRpAS^{9&H7k3EullJ=SD$Avd;fcWxBeDw7qNB#Wo4U=k}qZH3e*CcmQFXL&lHep
zVs!R2**1+$fUV~-nd5wpAErZ(V%R~QGv{fwn_j+Ke>>dMX5%jwxV@TB4+$HqGNPIC
zCi%j)`PAfq0_CJp@&IX*Lu$gwT7WINkj&#x!u-7|U!SYMzHp^;k4azV>eJc4m@82B
zeo333+Zch^vbD~?V7z@pW@~)@Z{y*_N%CR#KwQ`*o^mO(R)rSaG?q1eryF0=CG9p7
zR_e^<{GJWY#@DKti6-lg(d9u}rbL;t@!1wdfmfN}QYO$c@!_=^sIyf8zWsEIcTm#-Lm&<9(bQETdAZsLcX=CCtKmGQl)Fc
zuF7|*$GY?Ze_@P4pMv1SLlgQwsp3hO@6$Yt^0(~*PHYdypw~UDz|{kvK2M|2_Z7le
z^d(%{pqhT&!#c`BXd9hX&Xk1|Ufw62L7%MEZPQ;Ya4SzDO-;Z2j^lTs{DdAKFY8}B
z$fParzwoiELgj3H&f?Q2R_|#Tz48$Hz94;Rk8P7OG3lFr3-v3S(3j=c!&t(rG3Ech
z2Sdu|>UzK?`k~Lw=lCIW?Wd+s$X*!Yl(s=%n*vGuBIcopoRdyn`4VyrZ_)xO4u#ZN
zy<<1Ni7sjDdqy8Wx8A2jv-gLbXDjE%O$GnYf2UDTsea5(&ok(XK6wC+b&-NTa2yV6
z4HUFoTIV3+y%wmQ$G_?E>86E|Chu#4kfU5;@=!7X`V4yw-_yUVU~|H%=r@I2sN#2$
zk3IbjES;gP^4rGZG3%e5M`|El|B1rFdECo@b3^uXvy(F0)ec71<=NQuIRupF9!Wm-
zbgcEz7UasDGyyToPm?VjL2Y`1G(a7D-1I29I(~IvY<#|-JT#gLE(*Moh}^CurH+v}A@3zji6yEU!W6DuM+o(O
zE{9S7z22Pe(2?QUZA1j?@)y8r^aUG62g|ToIO9-w85}3#Dgx-^Nk^K)F-6t*K{ehE3&PykQLhIm)qrfL|bv
zw+UcDbVC#cUZwic&&62x)m{eA(3mvnz!W7C!N8%UGL(T|S_XuKL&
zCE+ns#4KmK!<}_y$4C)l5`v<@tI7{jI$pjl&0~9yT-8!yoWAXSDipezKyP6J3E
zps5*tFBQwd9&J@ZkNv6={tehk0KJvlGn)X#Og;dFhM3KeR{$R-a
zg(}r5o^%e5n#v(4?`zDA;a$=}40%VCY~kmYDz?ioFg+@Y-5I0?kl$ZhvXn;&3G1@L
zCG9qPeiN`UWV-kiSyLshH^^N1f|I9`a9FT
zNly$p9vOoowGc>KoHAv5Y9AmJNj1POmtTL*3j)qRU3{;OkMD~K2tls|V8AJU=`(`{
iRAUf;o?{Szp5y<=Kay99Sz+=B#y%i^-Q6Wl#$2o~Jk-6gmMcMZW^LU0QqKmq~YlKkhM
z^X_}!z4P_<*V8p!UNtqnJF8-4r2)VK|2f2E{|$a$8tKDOz<4^jn%THLPr*o4|K}1f
zn7@NI7?tOh|Lb^O`3x~3-G7NK{Ph1i#^C-TVu8YSY@DsxRa~v8>}|}n{-URnr{d=1
z;^yS$?N-g^rn;W+c$qnr6X@Tnk#}wOxpYes0r(2igDWQ2xq6
z1?5Eok@yX^1oAWba8PNwD-_i~v8aGRsF;9k0=|4b{zN_5)E7FHAFOJ4d|!B^H8hnV
z(8I$}+tXsn(__igUpGBezs+B_EmVIw)bKXclql>!?U(=7?Q{DpIu#6%Pb-+Z3o4``
zDf}u}2p1Ao4GX+^RtXhKA`K|9NWRq4w$>)A#k#7+VWNR`q5=KyB~Y8fKXU`*+hmsh
zf10Iks>T1kiCK>_17c8Jj<}GGxX?+f(~Y>YBK_6yC;+vom^$l_E3d2@?}*zgXp?o9
z8cSB3`l*QZUq*N~I{=7rkqxEGjlJ$0zYf6FG4emvArTa>#qgv
zr-^r=wgio54CQCcWV%huqi2@<8+qeqA=OmOLg$DNvN4B=O`+G>%w{50tmr`3>ds{D
zm$&0XM-jz%r~3qVperI)v+UYY456dnZ?ey)P@d=hclQy4+Rb#C
zXgDW`%0Cv-44=A`I*GzP4l^mAYZO#W5fdu|t_W6DCuS^h5Be)P6##@_|MlYk>i)X&
zKQAs$jAR~XYMkVrV14eY2d0HiJ`P|@qH{sLn3WIe#WBtMxo)+Ba&{%ni+U_2$?9NG
z$-jt#8kOozyf`B9-yjJ~cO3_nL8Ib-8tyyYXB_e`|D%1rBvZqshqf==Y#KZw5KV}-
zr-N>q$69Ns;j+iplK<9HjPZ-G|J||vSL6WDpb7aKlgVb$TqD`R$`UC54E$e__Y0o18n2QDf#DYdk2yjM4SvHpK8rbs#e%2BN{fYltG{l`
ze*)%T*laC%{Ex_a4iOr`*j>3q`2UWae5Tm10$Ln>zSJ}qN>1{qAY)0=tUQP3lK|g2(Gw}p4V)y`HhOUkZ3Qbm@2JOeIk8|yjse=W}
zvNfg!k;y~Gxe#-Lu|Xwd8q=T=vXDvfz3ku_aV7wu>V<)RB$#;LNCVi6z_v5p=OkVQ
ze0l{u>CgBUOL$64DZEp>d}^AI2|UPxCS;9J3DQEZgr}tRQxk$G4IzNcr7A(19X|6~
ztY|_u2q6nC7Hfn7+NmB}JW9II(?uxMV=2|&c+tTy{XeLb@c*LXhb*=5skuYcAQrls
z5M56T-CKzEqQ3$Zs-d((0D-hXR<0c&ss20e5JPQ?m0O4|VSxTp=+2G*4$(8_r3DWt
z)O69pwAEva$tKgrwy?Z1lc}<@qO!%IvbILQ@UXJ5a=gK+vbK7>p{}ad{saoGEw5}~
zt*m6NYN)=iWIbsquk5H9Z}^y1TXoWMfi}Q;(&1cLTU*s|`V8%;IT?02>EQG$1x=Jz
z9d}f8bU2=LxJ(jx~$QW6goG2#q!!zAhyIR6Uu32O;%;qNrNNHK=p})8pPi)#bWEF
zq3#REt(UR-OEHC&#~sWQ-B3bY>%&fDot$KbYy40^PD2fvzxn7b%4fT^VV8TM-5Zah
zI&_qgIH+&HJo^UTxL5%-3v8eO41h>|fUkkgJVfP=t$s{ZtjUE)?WPPKB1={U+fpab
zGY?Z~#>$UoC*gvvLCLe~NChRTV7r3kMRmLS(s{Eps$xR04O{Z8o^8eOyk0bpIX3q}
z@tbLRl#-@r02I|heley5xTF|g0nDZ~33cS6S#i0FVq6XRie@OPl43#yFjot{z9ZKn
z8FWQ4uD(2I7+=GIZ8(#5m2QxW1Xt
z&XH@M1Z-3DOuS-`6aiBRJEt9sFb$+KoqREg@*&=vaj?WL)U}hWAvIBvjQm{emj=y1xs1z{-gNmVx0!Trlc$f;BcMyq7h=ON`it){{
zX-bHob}7L(hw7Hd4O4=d*nC=?2^69VW(I{~gXQTpF
zp>u^%xodJWp?5nQz%2H
zfAa`E5RU|i5fwq{3R+>CO$r{8@j^2rSqLWcaCR`J1Tq1X4d}gUQV`lK69AXyz10GOSj712kvH*P@*`OusR3wS^0Ot2tQL9z^Jm?}9@
z9ZC)=QiUrzRChyK&wymTQ!1!y*zj+4|M>tYxenuh`X5Ke{g$SgAsxg`?4Bsr0>mXYa88nm*t#L|;o=XqtP4>C|
zh=u~7r^8Ty-~rilm+cn&--XG4k5K-9gs6blSvXqIyY(;;De}LnTn6{=sk!}siuCk<
zr~jj7|L^Mk|1{FKtAV=Q|Lg#<9#kaY35iroRsckT#`-KHHYT*t8%T$8j7T0520APb
zftsg45-i9>5A_ld2d^QkGOvaPke(fsbvrgt^P*XFGgSZ3
z46$ey#kZ)325dVz1A%fMUBXg|8~eX(|FtzWwAhyTtL^6p19hk^@}IqhS_%yHs%Iae
z4uP8C-&{!i|C+-VI{4>WP=`ABcU`io#9!A!E`ZK~$e~Wg^mjxL9ijXy;Ql&e2rjgg
zONL_pHvTS<-S{$Vs$_`0Y2#I&aHe<(8j}(-xw~!+qB3el1D#6!Kw>!)>
zi&j&~F$Z%ER3~eJnG%9#U8|ctC!tT2RLB4)HZ{+CF&KQJQ7EAhco2~Pv3G{c03QAu
zE;lMV>PU#&tPLE19WsiZ5Uzuci&y!+&`b!>F)$fL3Pg{IX^KKS~p@OFl
zAA-S;4-Ce0eEStcrL7M|NV){`-vclVKmh=W7*sSgnS!yHaai%#2{?(kNqEUn_XU7$
zm_RHbkPaa{Jlrz2XkZtPPU=la@!&Uj`oG}k4jK91qYC`r@qZqWp{elscz!^BCWB6e
zgGWM?+C4ndQQzO)-OqbHy&4%V
z7(GkBmWi2ZhA@mjnt+(d`${P;9y|beEM;!yIhjY0cY)e6H?|D?U!|iA|1+&OD@zFI^3jN6bcC
z^2v(@`lFpWCdG06C0MVH1V$_7jNNbJ{OKDX)hwvK;^!4)CXzJPE50cI*l_+@pYnn7
z2suLX9AR+(fz+7yPR1%$u067PeOLt(nU6>HAqfY8-se5R17l6xW2@)a+=P|UXtK-P
z@J~|-{lD$U`Qu$_8(iI_*y4Vd6Z%rjPKcEMS-~|b|0BP|Gz{O11&F~ZGAHcmWbz?=
zX9cMIS~lbrZ-{rjd6$KUEF7C`Gx*f^Xy#U{jJ(%O7nud4O3f<-SxmbZ7icHoOfx>e
z4H63I6u3)%U!>xTSER9lX(OD-L%wFW#AtBOR;4YAM917al)by_QgcfWc|)EZlJeQ{F*iz<`Wy2f9&2o;)Zx$*-j?-8wF!suBK1+;1%JY+8&Fbln
zx(vb@aTv>suWWN!zN%hB<%xrc_F!p!Ha+U&H
zzkFT1ZPOH#$miDUDbL5|*7xbSF{k$Ex<*S)5~!LOudqLT+kfHhb4*&(kDid^Ge%JD
zRfR7(huHCh|5MkKuTB*so|wY9P8N!56IvRDjEa2=!q%>^N}n|C@4-L>yqc$B?u5ty
zbDP`5?kAU}2}8Z8Dw_tanJDQzBlLbFvQ?fo3~0(?&_Ty{S^enVgtAKTqx0ri*r0Ia
zj(xW_jo`7WIT%ceL~-D6xF~%Jiq4ORXjkgD2cHv0#_jz9sO}!3R8tc
z6ga&q!)3S
z=N=sHJ*DQk4TTPVp%g`Z`l^vwj?`Y>bMY_Q3Y#)yZ%%VI)xU~zhM
zQ~rU+QBqqBX6d#LnBgizA!1Prh%Q#g5A;0I|Kre2NffhL_5scO=j2kgZ0^rXvvV;T
zHOtaXcTXRuAmkkU5ar0}ebuixWp()Cpn|1?J9$1M$Q9omV=H@$U((Lnx)=TM%*0X!
zVaFev9_M817%i(6t3ThJM+?25wwa3>M1@dcdEP|hDiKXsWH%u(ZsIR$@YWk}5RuVa
zAQhQ?X1~$x)k&i@K24q0)W6R{vE%GgYqYJBxbRugX$l|WXA1T){gwG#`Q>Y=J087At7#tTxz4U)9PthOEk4Z8-#C(TRdbWMzbTm
zYSA_{rmmY4!qWBQX;b)RQP~)5yx}umy~qMjD^bB7iysXx9X%2Gs^0Uj{WiFZBIryb
zXeBy3gW;sPkkZNmz0W&?5!HL>T$jMZrpK$j_{@{@u>em@-+L>`!h#j}v>^CNzOR&B
z&@QGgEtR~fQUPxN8`JPHYgY3apC2Pyg6F;g8Y3jiTsPh%Snpz7g2`wM`9~UNAzu;N
z()jf+MeYgA&$NWARY%Tiu0pHa<3)oxsVd7qgcV^N0qHM>
zeuu7Yl+Eha8YJwbHEjm*f_yrCeuCn)Mn>2>h{eT1inTc_+xIxC=med-VfX7kg9c@adfp
zH&KG>_x^@s9R*=OuLXgNGkhKoXIM17br?SZUIxV`m%X8>#N2P+?*ivyF%A=usZR(t
zi3DbT?C)aML=1g|(DYFrvsdj(rA$Y>e>c1H>&nUrG!yvn%08y-Pkzr$U3WKvOhx5P
zkJpY=jgbpKPFhuSnHn>FWTFG!Y(44RDmA%?gcD8(52sqCu;@mtGG6%Rrll2DoLq;Q
zciE?R3!5;ak^a|q5*Y9ZEBA1~3}*Sb_Lv$-0p`^L!i;mH_wVL+j20ZqHa+22^IJph
zKi+I;YLs98T(%?FWAV4~QUon>hQY8V3+2mXy=V)VC+{>}BT
zdi*lc@m`?37cA^`Fq^&F+v;`E-zr%>f1AwP5<`@?(>2<@$ldDw01IaW6p;_-OWTO)
zy}qrmZ24L5VL}GfZY*f+N&&^Nn~7XqydBZ=#6%Su(BkJ8t8l?1D=jB&X0$mBao?B8
ztcK>6XKRGK?R=1nq!)J(7&JpYNzVwgY+7(aPbyNBeGf5v;%UNRPvjo8tlWm^%lmVs~9`^bCKTAGUAvk31F1@K;l$@Kht}S1mpv=&gRTAx?1?XC$NAK
zrcd{{lG$U$X2pxJziZ+Wrq(OS-lPO+?v)IWa;
z$+M4qK%aBrq+g1zkG4`$w7|j&HNqY)N&hiHRc=A$p@{_dOVQYQqc)Mbda<1Sa12ed
zyx024P0y;Te6r6|W(OSzsC=NHgn_|#?s9lE?IG@*j!WvGb2BAkVcP546sLZP-h3j&7NqIbXZp^L>8Q~sT
z-M1o8EaUd}cINtxZlLw2yq`z+;V&7lAD_10cj&giruyurp?bKp<|?T2nYYM|c!>f(VG700Iz34Cm<8(v2QXDxO@;`D#U9eT;7nfcO+Ac&(=M}Fy&Phr1W`BOM#%-gwaaEVa
zfNT=FY*%jqlv^)0zq?~ty|j#8r2r^89~xiHnux(2+;65&iC%Br?P`($SV^2j|9qzh%=^B~f`WiCt#4mcMa
z>}^e_?np_k4racL7Bzw+GE8ODMi^vHL+HB!_
z@$Qz6bjhSbpU>Mk?61;8t_UvumcBb=(yyB24{M1|ypa0xroP~H*9g5qs?o?;4sr#L
zFG3{BW(SmaSae|X)(r;N&K#yv=?||EEk1xA6BnI#^F@Z2jNjojt}DSIEjI+BU@C8r
zPCUHxfr))ks7bqb!O=YTO=}gZcHypAht0b2VKTj!ay07O9$|j-5L_6v$s=33rH#v&
zP09|%*wq`tdM`2FHsNTgHp+TuLV3|81^>-Fr(b?B^e72YOyo;;5x={U8cQc-*EBWM
zXY}I(x{NzVJ->S$VQIZSSaM$rIV!X%lI^mPl2k1L)i_kZ<#s%<$0=H=N@e@M1^_%x
zEq%RMA#UIkJ7MqF(H5RvPalflt{YMPq?*HyA-smMosOq~W_Kf9l2$_aok?_J
zcVmi+D<7<-_HO?;vhV0&C*!^{ZwC+Kn{+UC-zyqq{cv`DHMtDd$-cKLif9^{NKobY
z1)e_a`LcX>^807aJUH^97u~xR@w}ML6N~RdSOjKHo6{WVPi2J{x}wG@#pRZ5LsqXA
z4n+vR{0XsVvTZ4@09sc4Jb@_&g6EijvA!69VDJtdK!=Y`vF?dZB>=Jm#tYj>9FFX;
z0^TjRUY`CiF`HCqy8BYH7~^Yg@BO3oAocOsJMm$7Xk`5mtmimuA2s&JJ)<{d8g+G$h>oA-EpXhPbILfUs+U1;Xjoa$RY>$^%
z7S`|Td6>cC?qXfDYN$ym_F`}8sF7|UXVt!tQU76ZvS%lQ_oYF}`Z5gLnF=0=6o<}t
znmD|nE=jI}9DIsctjrN*C*;CixN!f;7Zw-G0q>BQ3)5Si!Qw~Sc6EEpY_-sD>K&5;
z3>f#Y))ykz5YXxlzZi4=C*(GVv}3Jb60x&I8^XCm66-c-r$BaWo)fdT8~hw%zA2|5
z%)vueF~Oh11)CGM0mHRG23b1w>d2m;q}kwQ3gzp25g3YBQU~A4OQL?wwJV9|E_Z+S
zNqia%cl3YEW>n(rg8#R*AXfHwXW{SG0vvRBS3e*_!ad$M)jQBXI1OS1ad3|H4)k^n
zH4pR+_l&(UvPem2@S~48xByc8Fv}B~mep^H&A*h~+wkeT`uk~|3r{snzP_B4TR2s*oH6K>vN%ZIjCF$&Dw4TQ#kC}
zBzd@DZ|QD*(;&ElrC>8vAcBzUCBCQa`DuO;p?6?of8UiMh7@jZsld6It|gbn1Z>}ieD<66Y8!HAU(dL_9_(GCGxohMOduLy
zD9a=DMs+(K&P1H@S}NQkI;kr|g#>Lp7*fO68>d|s?#{uK_I`NBzgMWJVyX9l(GdLp
zywyXby_S_VaIf?xgpK?*T8sRxm;M%ZR?4M%?OJq{NeHJMl2TiVLE@?{Sp)@4whxP6znWP|1_n#-sysSLan&B+S&pS#N=y(7_W{cMGhWX8K@K8krrb9ZEELsO`2#
ztBKD=8vh}{3N}n1%ovbvqrq~?zBuv8+
z=3VN0hU=q<_z+rjfG=bm#h@km$wT^uO+SFJe$kw-pRW&;lME2lRP(_E?&LPKdX7g}
zWZe2)2?`|a^TEps!IYizgLLgxu#D_Lk$y719VRJ~%qjo4Ul=6EGkIghCQ+}VpF
zJ#8CInFHr;|jEdeOL%t@RD_5NYzgDD}6Qz@wbw>J9Ge8o)jeTZVQmG>FftfO4
z6#I~xd`gNbLS4qV?m))hHpX*Y%f#oKVI5uQd39BB-BoDfT;6d*e8hDB(wl-3ckjxV
zB^n(V?f}%E;?j8eptpBQAP@{UoB0Mv#Ku#Ad9Dl}w|@2x9aYq_+Hlupp9Kj^7I461
zJ`TRcx7Kz0pnH7>nvf*t)bLw!W2mmsbkAju>@T~szj}X4(DFyBjPd6s(#4x!s7rK+
zb`uOg%NRckBY$)idQ6ZCB!$=cYLK&F9E4MT?xEi(&L%{28tXJgfhuZ-KuApMuMw_%}A
zb8{%H;^&U(flcFe<$Ljk0Bpcm(&ym%XzupU7d*;&pS{;V*YFx66V1`_Qz*Hz@V0g2
z3Ym`_VS0#gsEv3kY|JI6+cauXlf+Uu2`AAXqUo)oERSy|ueE_!{CEDT`tgPDVK?&-0ry@V^B9O8
z3+gtdmr^|jHo3&?<5w4c?a`+IuKl797@2WnJ%b-09<`IcDi3}rWsOJ{F0w~UQ>6^~
z2g^g2_;d5elH!BHZi3mde%nNDI2cv*S9rfYLSZvP%0C++t&DY6*noC*y(iH?Um2$N
zY=}E8%Gd0>5ZV*$$i-9h@@{Qr^=MEOi~5VE{I7oK)L~kgEM6)_Fc3-|*YiOP##zGkmo&+}GlHrphmtF=y)Hm6*GRyga5fdjsZv#WC
zSRtWp;XEAtf*&=JCU^PI8xo;6dS#MS$U^#Amk*RE?uae5VYr!ZGvw4LEr0(#acg)KOXQ#n|^
zBMEbE0kdK`@U_=1wQ?iN)jUG4UN&9?zqme%sys|Ncbt8y$Ye8o%mO|o-kZHQGb-=)
z0#uY0O?G02L~P0$9y&rgbu2}^-+k46Fs!iZ&Nw6VPH2^gf<@80_ouXr$FT0b7czad
zK7QI4f5wSbUO()|i-LwYlN8}|?@jpYSJE%n_6>7aPfNEErkaA
zYdw3*?bWfx$zQTGGFn4t$BkErQ~RS_UFVHMk+J7t;=jLA+1*gJ_N_7ZS?t8F+~N}I
zJ23RW7L2W}p8CBJlsfZX&0R6^?m!|GOu@tzgZ_hzs)$7f(?fpo)~{7gwMivU+B}R&
z$8JUbds~B4Vl&GJ3CeT@c$wAcSx<`}r1vw|D-A~^KmgjKPAkezAbh~Z16T+?UeQEx
zN{1uZs1j+&PFb=fRuP`Lf)?lr<$
zXiD|qy9mZTor81nZdEUuUs>ndgTWZ|rw2KTK?%d+#ojC!so~bbJXVJs207#>*=6sz
zeP4iUjeJUC)zcyeS4l{Xarq^sxXQ`cx3Fxo1k1X*A!8beg~lQeTddIga@dGW1$AXm
zkUHCu`)}Op4|XFyC58`(6lmSbY3^7v_|6Y7K)jeSL{Be4Mh#Gb0X{i+TV#w|?;PgV
zlhy2$rkuY7Jw+=i&gN{mSu7T71~D3g@VH9}kNM19bKbA)jT5kMoU>F>SFFnZ5KE}g
z_G(AK!7N$Di3otL@E7SJRevfDJbd+~91Ep+Hs#a2oGoJ^x8-Zjc5MEJZSbct_o`l)
zbr+|hJxF7O&aA~$n6@v&ncGGO@yS{)F>36p#HA<467#!@fO)eOq}l#8&f_jJ&Vzfk
zl~=$fYIodPh>#p=+g67B$6i|oB!`$eqLkPmSnH#P%^}XyggsJQlR8BfXtV$?^t2
zYv;G1{v2^ILC!ckL)|^+4=sO@vNlPjYJ_NJ?+1ggho4OEvEdKNbI~4!TE&H|N!qsF
zr72@48U@-W8R6o}@W8zl+O;lor2NIgcV_bOiYWA2x@kO}BrR8QL+qR6u4w4n63p4k
z?6`#!=KMfK(u)tTgaxcc=iMvS2MUU4+GW1M>g!e+3HmTBqH|ds6tsQU;70KnO;$D4
zBz9Q9T`z#;d3P>l5Gr12wKVxlwa7&w)j)*h0o~GcEy_HqZakHo%%3NB%+IpsZKcXU
zG_=TY!h>Kh+jgZGB=+T6hH{o{!jg8QJ#Ipo&j&6_iX|o7*+@9GVj^fQ%7}Z13DN|g
zuu$!1v9EtzPGnUXf7|jC=g7Si=i#Y6crig0M#YSv!x@+Ua`l#^+*6_^o|Zr4bP9h{
z57s8slOMRJw>S@;cr2#mf)92t;h^;D6(Pd550zUAK=VTLLjB3_Uq7;pE+|gx&OA6@
zOcz6(({6O`f>jzkDwsB{!lYY6GVG=P^Ly2au3c@+mlTRbHKGPTtFlN?>S&B}C*p7zlNI7$Bd+Xq+rwRqFu5;5(RWaSV`;P9ZPVOX|q%^aC9bZIT3
zyY=@*^OV)gm~X57FT1bc8zrx~ZCM9isZA9pC=7{8yp?yLR#F(R3n{aXL5F-xWQm!S
zWcZQzevEAvfuZl(qgUHj%dgHd3Df1m(7QtuWYMo9Jz=zspEPPCp3lhFLnid!=NTq|~0W#Xlsy#PdF=iWU<+ZyZ6;U^maD
z&wL;C=N~cD&x}PlIBK+;Ybp-8>ym_(-JXKrZ25T1K7#n(>j#4z$M?xefKG1o
z9af}L$2?KG2gEvPwEmeJCQ3Nh;of7LI%?bG|1
zD)sJlX9ra(r6WwYm~g;&LYw-2F4~pFQPid8CDMJ%ny23`hvC)o_4w#r&^|Xg5w@@LUUX3d|jt#5}YrU$KY-!-cd1`KUk;4E2
zNH?42_}KCB@!rm%Ae(4^Em%$GFNxwq!2T#*w6b~4rSW;HHYxE+poq)E<9pH39QDVn
zD#asZH_LxC~|h;ga>M>iL`Mx2zr7+*1~-ksQbF&c!r+rjn;$laz_
z{1nLPOHN4R=SB>u*L}G)7zTr3}rByOG}*$o5eX4#B>z+LZULRk9PZJc5+
z5iduDQ6^s{*?|ue*qzGi;>M6h&cf?}Yk+#olX~lKY3asY++ZDEG`+Ff-!;B9)+VF$
zWA9WurnKN2rElHi&w7ungqN&e8Zy-)=YuKF-n?b25Bhj}${U4mLDp!xZ!7hof?l@r
z!s+s|nv14mbsi@(c-w?g+>13oB7}U?(J7Oay)w*K+z>+&xASD(ZKU=q>K?lr>X`xw0C(6dWQJb7@;#3itnd1b7W8qC%H?^6u9j;dgZmGoR
zo9f(3GJX;eYtS5g#X8Da*ITlHzyx<=Yc6=h!qPUD-?^E82wuXbkr+?LX1^#>=vrEM
zcb;%=kwj_&o6GXJO6fwtsR#Y)u_#|Ya1SPAuIZaSH68)N%y{&b+e?M%0;lthR*od!
zr_=d1B1Z%jImS~)GX-htKNc!!XMmp*tA_qpf=XDBLOt+S&D!;T+VQRxdY57xf)dwPU$Ck!dmC&9TIK6W;+!>8s)29gBV
zRfa$LMH;$vF?~xX57V&v#yw0-)y(}L?73XD?~F3&hEV%dEBAUfUqqZ5>X}NwbhA8e
zLUS>`^V=tpW$*VoB&rc9RVhW)K<}IPS&o}OE#`c%326Ps6mRukfA0Sd%2=r;)6`uE
zl6?GDxezy)=oW%7@xd3)UF}{%hvN9S-OR=>v{lK9pB!OPl*RHIU%M^kn22G&t|BwQ
zEQaLgAYmD2^j6)s?T3N0*QzYO$(LLw0R4|`|F2wWt>_T#G96@r#tpYx|MmKUEnakf
zQF%3NVcW%&*dI$cS5s*($HOZ_qUyg}+j`SCKdV1I_sFm>K2TfHgmgyEMDa?Gz32@F
z;NPFwa`7a>m{nopM4C0l~n2S3+_{KlCqObgZ7?Mx4lciEkp;|XcmY_}(pUS=pv8*G
zT1xrlihSeMzWn^Mic~EC1PDLsofp7k_d>r8`-r0osh=Wr)x_^@9E9z?G4e4pUw!y^
zkeThPU#~CG+(NnRct6e_SLGO&y%kt=ADV{}cetQ}msD%7^h^8|ZIXNkKBH~d=H0|5
zYGY+x``ccLxHkt{kD_=44sX68IW$-~uP+AKlM@~)HO+FQ{_@xI1*t43a>(C;xjiwo
zE)*ARG7Xd5{txHcuQ
zI#6FG4!x6a3P0vjxDWx^TQx!(fruu_6Dd{Yyl|t6TZzFL=w-ICSk4mS^FvW^t(>^K
zuBkmkLv0y%A7V)-@IKDddNkb6d(xq^cP#s5q#pl#i+s$S`9jFZUQ&CmpI^if6-hUv
z1MN)o{5@$~h=$Y2Z~7j$1TBz<(7}g4!64gdJs0)JoktsZV}5R}$~2?PjYihaR_|bND
zy}uvYdxOqofVs*hcbmdOpsj}|;de}jy_@$+E9`Wif7YjY4*{w(NR_*wepztmz*x&o
zSovH#?dU+Wg%<3LM*ze@T+iQ<|KoKIk?ZCPsyQ?r<*TK=>#-9sjoJ?WWIp
zj)ey^?coHCkJl<+l<~<6!M$pH0r*C%^qg+<`j0p}AEOA55)x6zb=WN5eiZRCIDJg9
z@I@?bFwLzA`lj#iEMeW%`htE0r^m3Gl34U$Wtk);-30Dg3U+a#Wrv`F`>h1R_Fzh-K+(d*tfvr!0Bl%o%lS*~AWdEPH5y_gp?0(T?5cU|XPGGJXGp7d|nyl)V#
zg+Tyi2Hd!7t`spS+PRm|x61M63O`!MxodMGI`;_U(Z0YI%CD-V!x1t?-46QxM%lwj
zNKpMZPtgaun1}D5_VPrrlKhaS^`~D9a*!D`RSKOia3|hwjxOSs6#OYKYRmVa8I@Hc
zD(K+53E7civH>M@2OkuwjrAc^oAg|nd
z|AUrvv_rYr&c6(;=IlHvG&!V+>A}UH%$Rp}_U+BC%j7Y{xQ~f-lBrR7VO!71ONoQk
z(hly`ArPSOczlZwi@bdY2js^S?OD60kV)eA$^umB*I>(wG0jeS1{6ugV5>7t@3h+>
zt~(FNe)X%*hQ*I*aHxEu#mgNlta=QG#OG#{PO?o0PTdmt^?-wH=5To{R*hyVJ*nMF
zpJYf&2&zkpbD;X$nj7yIqlZ%c`EHsqtu?PLmoxSAoxh+l8?
zRzh2D66R#_r3CCa+#?CqKiS=1%=S2@7}dLQPFM>=toRMiVv4V-D<;z9$J8Y6q3P;igux~n+`~QiP2tU-cXI84h`%=9
zO|yO^gyic9elZWtE&*z}xr&M_B2fzG7wjBcE~kg=E-q9^O?7^Yu+$X84GX3}!5L1+
zV|@K!sIvZ5OV5i*%8kh;to9PrYUe)#(PY
zj`^$+c{|+NYvP}R76Yd9@%U+9`o%&&^haqY)__Lg0$eBGdrx(LJFn%d9z-|0=56M=
zWIc;qj!@Hxe`r=cP99~~wWdGYY@{2?m4*CBZvr0K=7)m50Sx
zK<&Pg#Fbb}ffgg9hyvzQhyA*eeTIii%zm{-#2QQ1j55lRnFvvvd%DAmD%IR`FZQ!O
z`Xv06t=C@IxiYalAD$LFK{>}Q7{1z=QFoylMLrqrDxb_lUT0#Pv4+mG&wc)kwK&M@
zc}0wi^K;~b*C-b|S%?vj!1y4^I(0Y89l>sG1nkv5TWZ7BFXlYh*WCC%J=NOdge)JE
zC=|L;mK^GF%F^dM+O8*!fNq7&=t~?`V7u!zR~Lo?Zf{d1c(Gv?Uu+;dm8EVI(^sdb
zo0~jc^s&Q1&voS>AopmcyyB8A*E}b@OXk&t!PZjq+-Q^JOM#lSzAUr(NCY3bpFRUW
zZ?wiTuVJ}9t`<$h4#-G@%lNjcasv43zTe3kc{$vDX>zLP$@0G3p^iECamjl7+MQC3
z{znHw0OJ?I45URrO0hX}))?^)BLkPhPA6I)4u9d6rRzmW-oyevNoEEqWN&;7HrlyL
z=!=f{q(H7hKY_88(=JRB=t&8)d
z?{m1Gtt&j8SIC1YnVt2KLAIF}47oyuAtjWE6Krz>j}Don3Asx&LR79s1g3``cI%
ze36Yq5iI?u>WwiZ)EI`dHru7fbH1(huNLw~>3vSM{d6G!)QsEm(X
zTlIa~`~W51mS)5)#~Y*bcSm#n2qggi_e?huU{m2y&ygA(e}MDT
zQ}!3!Ds4K>Scen?JsZ?*b6gE!pO;r{e(wBUj+5TGVQ+HtJERLp
zaNH(a*3LQ3Ii;=
z@;KK|sN+EziR@Zr%pjX@q2k9uZ8y5w{!?pH_x37GC*d1=oRsK-DnsSx^uH-X+!^fj
z3Hg&*#IC&$yh}bg@UY3H)=6>aj@Jg2OC*vb!C*n7;^z^`4yyI`pT{=E9JCsoULBhh
zgGye6UcQB2!Hop#9x($q<+GL?ukzAKOD8!hZtXO{=LB0`@5e%#@!BnRUa(LlC%nRN
z7{82aTGr55wT)X(CQ!xv;alg$@(!X!yR;1v0h
z@M_S^KWNE{i}#c5YJ^)Q#SxeYkwyV1$o}r;1n&CwBx1&A!bcO>DW+go1H4$@oa3(C
z5bmOXvm$4_U-q?@8f3L#^RzHe
zMg&@z1BQJOV33hNK)-Xb?$wDPQ;yaOg7Jei9QIL3VXL=xQ8ro4rE#vf=C-Ac-41Hs
zK0Oo;-yWS$wVpTcN!!YocaBfL9|(I)TlB5(qUAba;{EpM2*$QQ@?iYHr!jnP{sUoL
zx$I3lC%Xri#!~uDcVM*Hz+M8g(kFO@@L9IO6!oeNT+LN!CsO-yIGC7qOGzvTd5Epg
z)3QD0_8;c??;Fd5XJ>%;K{Bcny%7t9r#Bc1TD
z>$$I$Bfa^Wsa~(cs3ZBpS#MYNfNkvKje}Zkx>Az_bk`+^eobt@pYZqfh`I&_b4TdR
zONoW_gvIDjF?uyBH4n;pJ&beBjR}#sh0L>xwQCORyg$|1sknwl8S~)MN?_T&e
z=8tX5F{3w6r8uW;&e>-(P?r1azru1sJug~ZB1?J0DAKVbnyk3wm59+?%#jn_`_svV
zWXSvCHQS4B*;|yT>shv+A$#@aMXjUdx!E_2>cwB`eWV}}y;)Yv=Zk5ofyTK94mSO^
zA4n%ML?(`N1TrW?g07QYZ>_C9VEp`Y+2wDXled+!H)0I;pZyKZe}8xI{PqU)4*`Hy
z7w-eY?!NBsfu7#}zP_H3uAZL0{`SG){_#isP2LH5cCwj3uPWtMKnbW!Y$;5%P=GO5
zIN!M6q|4fAwL+--bns{YXxiG#%Xhd~o?V`6X~$7_!YqW{y~_Rmi?;(_LOjd)Cub68
zW40KzAm#HfQU0CTZ7-Qi?v^oHM{dtTkQ4RP_fx{J#&YTDb$+OGGY{GmU8Z=dnY{bP
zOngWzS*ob+a#>cVFXf(7S(%pb{noZqm0K}CRFsi(og3?$1$R%uO@5SS#MHjYoOfq1
zSSO{L_j@ld429w*?+7t3fcN%Yt{IF3p-HtZ%a>eB)a`Q%<{#ZdXZrG)%I8f@=2lmF
z`@2Qcm?GX>dz;xZ#WVF2?M3!B?HA`ebJ+S}Yw7J05qNeCg181GS$f441v@}67yxeh8(()Z`i};&
zfp83M(A`ZSn)>rC7_Yem*t7=%y&r!3L33>!$@Tp@ceU=7M0!1fv}v1j#^p8W#v^p@
zq+%GTs8paxP=dBT)jIZj6IfJ^LYxUN{al*j-x4dcX{6ezwXY|Dhs}{2Q2|LhqevZMxg}LZcWGt0!6WyX
z96qe>)q0Dqf5~RyQ(o-c&
zfsK{&wvPw!yYaP%Yb=aU6T4$e`nI|mJC`@MWj$x_dAM^d!>OudwZ$yVL}as;HYkc1
zS8V9AUKlOMTDC?~dy8WG3N6^6`8Z+e2;=631RTQWg)wemp7?NXm;VZRb9+siqU*t=
zzM{CgTT@n6FXUtp$7GjZN`6|+#H*y;dyo5qtH#~C`@@jol@Z~)%f;03*`+s`^LV6e
zPL1EY!=rJN)PZjO$LvZcq%j-Y#)-|ww(T@-W2cRs@AUodeeTcmJm<$=d#yRw
z++&P6=2a9sDkny_zI%|NydX$s&9n|@3Cdo-R%@=U5gm)WkS{UX%9#z;7}uw>E4PcWrfVx;OFQo&me9k)K#^@(c65jL3WU;8qWpa5R>`}iE;*Nr
z{YE|)=b!Uxy{Rr}vWDZ?(^<0@l%K0yuh}9n6oe|e;LS$>dVC{hQT#-Fr=5K3RlS;2
zxMs)tWO8>IK!2gCxN3II*Q+V_n+BXEeNPhp_I$Yn2tgV$^;>PbU@d{}ZsDkEY=f2k
zyAfYai|yK^VX3TU<8<^se&Va-b|FH688vDc)h98#)^+N>NYByfY3%ji>D!Pe_rsw&
zbCWAFF2?>X;wLzLJx&-A9*ioHtY^*$M94zqISA%?O-$xYzh&)FD{lVm`&ypcg*NmG
zIS@qINLBFWVqW^%fA+XXhMK_sOP;Sxso>CmKD4Rnz_~FB_;)q+fFRR=bQ-AzLaOdq
zMcysSy6sMXru=9B6O&l)_k&_8N`ehU4C70qtOZ^A+>|(EJ!_aBiFD*cGHtH7c%$rM
zVOJwQZGndITXfb-I$wzwFzCYQnz2jm@AK1LE<+c1#o?mf0W{j8A6m<_(0vuY3a+*|
zmX6ACbYiA*eCReum|7&eI^oJnO^gL+KRcIs>mQ;7*G+}RFA2X|oOervl(XB>8F
znu~#h4$#isGY}dAy?r+ijuT%6BK9!jKtkFWEa<~=mBzZw*;p;X`SH}VZ5JiQmYEvn
zz9&w>t#7Ot#+8^e$k{L{ay`&1^#^gJ2R$K?U~#hybQO+GabH;EWAU35gL+vam@v%~
zjQ#;~svq=VwY$45!m9Pn7kS(8RiTr3UXR~7er#n2;G$4dxYTsG!@K!%Lp(^9+$N=+
zbqRRmu_ZL@kzP?&M-y-9`GoR3-^H(5$k3ClESDByASEZDqV)()P=NLUkJ5UyCOSi)
zb~tAdeJuBy3Mi;Qf&fw?FaN%;7(6IO)0IIhozid2+aKEQo|VIm*8!4tZ(=-!#u~%}Dh35w^TZv6ZYx!m*3;W_4R_Ljs?F#jWYOvsubePo-
zVCPlD26MNDy*>CGT;6_OD;is-3mq&1$uL#{hy9lIaEzy^oT(-%E;+lP|f;Z#_bKt8z4Pk@~J`Ao-M?~P;Uv^Z87(_V;6Z5q6!z)_A
zgVraYuYd8kou+^+a~SWqn_O?zxy2Eb-;8u@ui^Z8#O87NtBGn4I^bQXCvQM_Lw;j1ptM>-QRRIC`Ir!kR%HbtGSRNTeKJo;Uxe8sQfhC`6iIYi}&S8W%4wr
zW}(cc!;e;a(P2d+Wl}$Z;JmwYwR>E_mY-=|v661`x|eTgW1%Lh?s&R3e%rwWA-;5M
zNk-HWwr$wn|6MsTUR1QLo-K`A^Gl?c`FO~{F(;1Sm*)_}^%r3L-w9qHp9IRnKVk;1
zRx9uGj1Uobio_kL#gRj?_1q<}amws#Twz=IaNjRiJ#_+Hv*QrcEp0+h)$ul4YFm*2
zANK#sAd?_yrE6u&MucXhew&RdSAKeUlW+l4U2mNg&t7l(?XY?Eg|150}s)ue@U^NnA4x$Fiiw2`45y{qQ
z@_9BqBmG1uNRv%pQ44LwR#kQtj^gu4IWRLl`t`->WrvBF+Zo6JEah1vGH{HkO
zPxS1rcPF{iamvx2?`!QLyqQQ99oBSaI`CJ2wwoWk{nr78yDz89cJ3kZ!lAHQidLaRh}mB;PhP_CLMr(lMNmdbjp;UE
zm_(Ab?E0utSmprbq|Jjg#LXhmeV$mJoT4?g;L$MnS@g#&FdDVqztjN<`dTVLB`dAH
z8hELfHB5hx7;T-)=AF(oE@ie3+Q^3G;>KlAMQ&yr-NSpS1A(fZH6x(`+9%;vZ
z=k6ZOLHc+Ij<1)M6ElhiTb
zm)JSE<4_4)uZH6#kcr~au{=DJUzCaWqQJH~+3h5KC*a_=-O5JimfeW{P2d~jh)^Kp
zFaI2EtO9*jt2hQDnN|EeVNNocIZf@3^NXA}DQ~x%Y*|#dt8d+`_1n?tOPU=@eh;X@C^uyg)`0ho{$;7r{z
ztYm}zxfxW7flAjFjNq96(X5w!cD$l8bXpOq>><>*p_Nv#GiV
z^#cbv?#T0(ENXA7V2>Wot=T|y$J@q=iz>zlUT&CgqqKYTuJXC_kNLZA35Ur#RnvTo
zO_azX93oaRZqUbCPIshmWXAMkBl3LG>|CeD)2|X=_0|%K^SN$BvorSk4Hc~uRp)ml
zxPS_wiCNsvz5%NzRhLZ4O@!V2V4xM`0&Q6V?YnD}ltBjQtgQ=AR1wWZ03{FTXb1Z(
z7ZZs-V3V=avs&v@*wXLHCYs@QMTS06My4gJoypuW=&wXJ7^&m3_LI5nN9LM3@e}GX
zqeV@J5Zn5f7G0La7d04!mry)8{NVvq?NUZa70phm@xaL(jJ%~xmj@iSR4sPK1|))8
zfN}BT%QtZJHnJ7IU%%|sn$>j`D&v(2orKeby<4yz2uxMOcV(SAkMU|#czR%=z8E8HxfP~w^rTKz0Q-VjDPIBUQ
zdkGP#KY1G-6U$i1z`ODiOST!0>nJ!f>y3RS>x?kcD1+-*g_Q9Q-Vo}JoR~f2VPppr
zQpZ(wW+te!!pz-aV)Y0@Y>-oRQ?)KJ$Kr|d$B6`9z7>}ly0}wuG5i@6lT&le?8)k#
zo>Sff6Ec2|;X!!8VLX|6G`?$@16)@4kc2hErxF|0xd_dJ_1b@AIu$aIe!m474Fngb
ze9=nt&;#p_00&@yDjHYia~XV-3zXv84^;+E(kQ1*x0GG%(6ree`3-zU3{$ecjiV^~
zs>oaQ{h{|ueZUfz_(cbmc9W#X$N-vmqALaeIpIwE
z)#2QsdYQhm7F|e#2sn%>fJ0@PORZ7=q5$|;NBC}Ff}&V}1Fl(w2cQ*Hbx~!LTLeIa
zk@9bmo#2shx9)@3Z_#__G52MQCn!G{-jmvM%p!**iV*w0R^BBl1+z(U_uU5KvT*f$azbnTK9F7wXpd#s!!tAQDqDRX=M$#T!I^hy@mCip1uB&d?44%iq?aPtbA
zLcvFiWZ@Yc=Gu7{n`7tZ9CQ|H=%6ie8UG`M{^Yff44@97S6s0&zOdN$sp#WgyC9lG
zU#WtboZ0{(eP6)8AaMRq=>r4!wTcmYI8{n7r3luY2NtydIr}C(dIF>9HoX>%$+)a3
zKSd!OqCT=vdo&qIA%G>IzNAN9nC67PPdS*wbUdF{G|6?$>t88HM`iUe>E~RPxRn-v
zy#m&S@nA5{OBE>Kp(NbVPfO=wML(Z3;A-b86mlP!t?gs~IxJ*`WtAOsSn1ozJmxi#yU!5Ko!
z`hPqc`!oL!#DE6f44w{#JDkHavlDYeOLPphbTmxtOmx(=v@|rdtSl_F^mMfJw6x5u
z%yhK0)O2)o%&cs4>}<0m)3ZhnJ9me~s3MS$zLk(9{%)|ZXB
zz_8GwQG)6dP?e|{ZbKS$`&yo6l7l=A7}YU9Jt?vRjE&?TwHeRc=al&n5h@MVC^`u~
z*^=XT{NDd{-(YOUBEMQDlL3!s|Meik+&cFa5y+HQy9A{r>cn+hG#5iOv3ROsi$#jg
z#u2YscU_C*zOK@ko>q)y3U#W1?J{e(l2PXy@gmJI%vVV-7q&iAt~l(`Cv{lt_bDqJ
zQ9`Q5s3_`#_o3$pfw8^5yHH@jU?U$d{!LO=c55qX{F@Z!b8k|r$cC2dmf0-yv|`9=
zCL{o~A)K4Ouwd{meY+GHP+OqJw`UM#v>`F2qyp$l2LnhqPM}zaupIXo+}HLzHbgMA9G$hFBuneR
z>#S+HmoNTphM}ZJgxYfpW>*n@*&R{Frc0@{@seg
zpy*nW#w|SNG)rAofel%=eO)UpWnECxZYg!wfz#FiRR_H>xdfj(t7vmN#xNQJgT?qB
zLr_y(%0@m1HuyQEQn-pl#)5plqI;NpzpBaF60;Ax49!?{A$t0;xC)^M4oV>Wtzb}?
z|CDxs=9P3~Rc85r=>zs4ko$b&_rcNxb<55!aMvfLW}e&8P*8cP+hcjnqMm?G
zS>m}=VvG#-?Yt^?2*>`BwpacgH5M(;ftjbG)UZU=Nvg4)A@)sMv4+uv=~DPU
zgZn`3og=!UL3`W*aMaA%_QtR%As${ic-Li#*?Gaoz}T~OBb;Ht%+v`1c|vHQK9yN82vsy6-dtrf3bjJTtiYqi6-zEE}g;VN%KDen(x?iwXu@F
zbZ;VAj0D5w0&6GmQ0~oaOnZe7w@ObOSGg&&un@1Vp1mC%=&#aqBqpATHEgv4kW=3p
zTeZ&UCocUSlj}w!`*pdyEIAaZ*X8@85HpYg*!BT62?gMQI$5YAEgv!9R5>G~)z0I*O;e~#fSK>wG)yeI3?(MD
z_A#!N6pbza>x|Mlw8Zd2t8lqY}=}M8Dx3+40-0`ubEFL*_ywUafZ^Y|POFJSYCQxV3
z{ZW`niW;o_S5*SIhf{`yoa?XKYera1@MG-$_WECPgO6ov#}#N79ROZ%*8oHkKHgdx
zxF1Vq1>Wx)cYn$@&Hj9ksI8mIHo(NBK_}Q*5Le#
zIFYB4c*NzI^+>LZpUJv`#?;K8YnOlnpZstm!=Jhyz&&4Oa5__}3<9#kiiiANd;~2g
z$E?JqmSjsPm?EZOSP8iS~fbxsAI)rwTOHy{ZMzuc3ep#y-0|tkjQ{02#Y{jfY`0~z
z!u`29??Mx2iIBn5^R>ea;YCm3Abd`f1rL(&*jNv6s!~MIz_(Szu#r^s`mvg~llz1d
z*e_HBDwes95?=Uf<^j#XU1U;Fw^F*>6*L&#wVLu`amx(fY}Q#AlG-?+=OhIP4ZurR
zjhdZ%t99N0ZJBr{HT<;Fl2>9R$*b10~q8%DmQT|*6uQ&`>O
z3{3W`)%Yqzme<~0@={XR*j46$xCP9A6p?+$%ijQFXI)18WlFBOow;&8w|0f-0U3ws
z29s}#)Y&`w;+#D^X#)=0fG#-nEEcOCFbT*DB$K_xB%w8)5A!P7M|^R*Lr5lqav3tW
zZ4R(I;2aH4OxfI@p8^0QP%w2XY3AUz1{7b0J1p(5XpjHxG@YxG+Xd8wAJgEGWx#1)
z0;C2703qxlm$6u}aEIyKe~)UMMr`bG_CE1HjKMEFZbulz9y9i4v)I2Qqh+_jo6t(0
zwR1LAb!uT2R!)qP4`X_OF9VMw{BGFMunB_LRLWr;@Y7e$Szlb$I=HB3X+;C;_UR4;
zfh8p&po5f8;>!Ii+|3bC7aRr0SW%f@&068qd&v~1arqlkln|{dV0oEbAM6ci>_nZ6
zYM4m01C5Htnk%xm#I#Lk+cd9N-y0G2-bD7-aOvHs;o)EM05Ya-qR=0KqG@@+Ly;i4
zL^;>)`Uvfd<{&mvenfULaGw0@n|?2&Iu-yj0+bw5&kSVwF0UaIk;VV6dKARu&egW4
zOK5lbO1&sEKP1Hd-5g%9WUhaHFoQk-8oP-w-5D3_T>wf$@WI~FO$w|hw9}GEx_4^I
zHr2S#2+XMVzf3Y*WH_%Ct|9`^{}qy(5_ARM&wV{zhY4>9-KM$e`f=-SstnMJ07i#%
zZ!5l6w}H#mRrlPSLbU5NaOeAX=2j>CjtbnD>e~9Yl4YXu(((%9hvWD1uaewDchB>r
zVq|TrjOTpy);#!VGv{zc&VcbPa_dRQRFZpRqA{X*10(D-E#s=gFvgy;`DP1
zWVOGdUN(ebP*O)X9iQO~{#vz*YWBBP|
z?1#~FyFof{<;xQlGdbnPznnJcSW1^v`*btr*QwzJ
z_f_CbXVTJn-$h`lY>CWl-jGK<1X1zL@)iVD#os8^@@y{fJj;IdzMNxMSq6X8A}7uR
zCwcnlz#@e0IA;E#xt8(ij|U>fzU9(dgpUse0!j4ar(Q$#&)-%*x8i2UXi}|ixPxo7k_*=(Fi%_eV|w*t
zTNtVIK;IKP_5tC1&CZZ(>>dE!(b&mbw+L_(M(!%Pf>#p5x
zs;)CCm*@|6dEIR0dvq%z6;C*=4Z`pFznN3ziLB1sCI`WKym{UA{=E8T!R}u*CsY>O
zY1t@V@OrW*t2*X1X#94I0KA4=(lwCE=*C3FilW6&TcIfO2y;CCVitz7;j7)P1ti+4
zQcy?vBZGf&&Dxz@Ovml({K;pg#$p~xbsX=X+RqTcp~>iIRZTf+3lW<+s`X(2|D<#0
zRH4DBI$gxOId&Y7Y8bU(nzowDN=<QGnHx`@JY1FxYpaH
z7_x_u0IG%HTeJ-^CEsj@#)8`oxw`4;{+^l@#Lp+iUm>_ha?>gwj(rzXyH3
zW-IbvseS&~>7g!~Lt;$Cknhn9UMf!>#W|wQ$Kj94wj^Gv;V^(U_f6+
zrlC0FxKuRk%yW}N<9!pu14Dz8V?E>Jvoj-8leyVz1gI8O4gaoqXIRwE9mXtr0;+0g
zu}TSoX`kWorrEw4h!UT2C<|`zaDt#Dmmo;|?I%P3&DLJOpCjVs^`nLdEPQxI7Ds5{
zHNaP5*jSd*FeefdB6vws+2qwEL(NKle_(z#6E@G2Y>H#~XYU>R%vJXW>QHRAGWY@T
zn&^q#;a46JDUt%sAAPD?1-cwf7P8B8_wJMlmktBnP8Op}XG8=!jW|ARe1`y%#{&3Z
zlY!@%6hahnlp$8c5GwfjYPm7ma|soIs0)D-Pj0K3YjY*Oum<(=j^4^%PAE!cg
z2eGjQ`>kD>zE+)07GFcSn;GQ>!X{8zGJqrFHl7J4Tnun_RPARgt-*Sb%g>)ZBGVJy
zD5lL3;qeOC#j>q&`{t~6<(nho7)!VE@wr!6prL%Vb`Eh>nfqKe
zAFX9A6eV$>6^lb4ql=}yVA+Vht^4>0e#c-;uayb!s#gU(V46MqOWdY
zmOQ^RzLpng;E7tVr37!>syBO{t;?>xNOUb)xoTcb24Pe2{6mHB0+`UOz-6An04hN)
z?NyE9&}u}?ye4VCDo}=-Y>sSbJcgFj(*4g
zxN7DeCE%Z@Cf@s!^KHy8XYX!+Amd!#{Qdqp5B_)27jkH*or2eE<=9T#~vz7P15`2F%_Y^Kgz2jXRPUxN$cuvSrt}+vx
zv8@;9lv-Bi@^_)H8m-7<{V-!&%5H`F2S)1Ef%+{TU%lDmEGLLogN%&zS5S*<=z<)L
zw4ZiJ5__TUD&-d$04LM;5boH11`7Bx^`Zx1dDrc9Dj
zzS{6i;(#l<6LXpJlsG4X;o|VJ&i4ejVPU}rlK2l#drO(@%&RqvNoeS2Knfx#O4Wsb
zITH50zJyLhsd)I=Qs#BO5U+g2@46zZ@b15U+bCY$u*Xa9A7Ea>A#D?@Q+Rbzx53!R
zWl(_41_PcU04W-MnfVO>0(WZG(3c^D{*jxZ43!NeE!coRpda^x+m9((E9nU6wK5YU
zG=kWXhCY3(5TiQMy{E$J8*p3pX`ZJX^~Ea`6OQ7JDXcos&7JdbG3e=T}>yN+s2{)+O@YdbxiZR0V3?&Sm|@ql8k3jwZoI2gL+_
z8wk?*7ZZSrX0>|y^fJH^JRtk`(LGb!rX#|{?Olnqb3Z~{Q@VC(0-;K=;vj90IOIylGpoC82Vy1J4>cSkUAx=J6^8z+nrl&K~^)B
z#;F?>CrhI?#%>Zu;W>d~?PbHFTMp@c4T?k<6#|8!+pv)mnAJnEF7{V?2jX=+Y*cRj
zZ-gqj%c}w1T&=VYp7Q2lvEWfNS+AL}w4~|FA3yymz$k8=OdT&`Nguu?EJcpr!%nc1%_ff)P7(J
z@yPbjOlc{QzEvmTZ?m3T90tX!jm@gh80unb7_@qA`eL51;05T0toAAHM{$*-hb8;!
zX2GFu2@I*8p>V}MEx=x`DIxqcSc~~#_QE2NRaOYNWXSn6{6~5u(40MafV%lx5You6ET67Hj
zrC@X{g+lVNW47dN7nntdq?t>ue+?URar_&l=R~h#FJ7wBND+8SF>F+Gy69Ybx%_wD
zZl;zBDJHJUjY+2E*^{9|+{!p!ybk4C>7je+2wiycq4!dQ$d?m^P)4$vTPFj*Ph|p1
z$X1s#X^k!CVu*hrbZ&hiCMKwtc&|jH7z!-be548&38G*5*2)X3b%aN8=;X^*e84X@
ze~MfG!@!+6b=<+)b!$>M1E|cqm%B5v1lactEdB{Ip6t+v_G<}xp)&*c85!UOPhT%N
z`-4b(e;%@I+zhVj=VZ=ykoM&0^dHGm3L(S7_lk0NRNG8*;e3rxiiq=;ip}yE?7PP>
zsJ)WgGny9maPLS!$a8tT9FA4J?3j2=jxGQZKkI>C-&jj|$bXt)!=@neM~c$@KeEbh
z4Sg6AE;kSWz$`#NmW?YqK!y5)0I>h+eY1T&!M?7ToX&O9dA~_r=OM6KY53!2bhAxX
z1HF8|v_e9HcVro78DUKq?G*Xf6-
z!~{n5kC0MGX{ja`?()H>gq}$EF2uCDpCWj8X~7p&5o^a3ZUr8#{a%J~7}}BpMS`dP
zhY+7-P76gc0ij!g9e5&?&=_HNgbjyi0Yt|0F+qTlA;?}3Wf%ZgN6q=`4FUkN_ZVv)
z)O+TK1PEXOOyrG@R>wk)Q*8HABcgUVZgZ>EpMzJW&&o
zh{N({cI1qvR1WbG9`x-Wjfz^U6T|ktRkN6V9c6c}mOXT*wSu&b5l3zXb{viEQ4nK(
z+ib7a0iu%nnJimX%Yow2^*y)ks=n3!nUaou5!XRqa0tfOn?;l9S-GXzYc9U)jh6oG
zMbRghx*jhX$Ky-xD8VLV4bGxf3crj@nHI*dZipxC7AYo!Wa85G&nXvEGl_(31(KEv
zOEV-_9-Pb~q-m+}F7>|Ffqj6Mafr_f`1Rg(hBn{K=g&Yin77bqtf~TU60d-e5>R%$
zQXwE<=cu-2%>3@h@M?0FOs7s=eC?%n-^ZP*qD|a^5dHMad?{v`$Ku52@R?!3fl3jD
zoL+vS^MD4|K+frWKbHevWnKHurgE)dgOZn4jA=4K+e9elvQJxh-YpNeo-XtqHw|qr
zTgza9fOBHx&^wtfaa9j^ja22Ta+cxRzpJK;AV4*LRii5>r^I{Ew^hnrYa<}!_%Ecd
zGJ-MzynTUR=wKNu09X$_RgEBwnQdWI)KvqI`nC72x;L|%_pUy!`5@gQJtg%=q%ey+
z!{#B|8J^PzE!9x)yCBMFz>+9C#qB+X1RqzhPa+miujXdxp}c22F@BV|qFy42-tFky
z$}@*2-nBT{-RMNdh%C;_amo6IPoZ3f5`-Vj;YeW`vJec5Rw+`2@H@4
zXOZ9&i`9ax3g|-zEQZ(`ZE{av>AEf|t(MrgetvCn^&Z`SuH7pNu`#G*UlEY-Xudum
zZpD7ylblgzc^D`pBhyP=vr21@IXLpo?6^nAuG{l_{5KAV87tiy
z#J{#r4yM`p5(d)`p+7f3CQcccu4-YkrI(m>67NU!>I_`89{ASFqV98&LOTkBb5u1N
zzd9W(c_tAf+Nvxo$ZOCEYghfz*RheFJ7ch`=dn(JpmoflLN`O!f$lj7Fmv8YIXP)b
zK!FOF$ZgQ2hKv%?&k1DlxXC7#XT#(5naVnbVuitr-7W8cX>W^tNAZ1j*#oN{at7oR
zDd*%Ov&&YJ)EN^W9+pe%;q0SjgsUr?b>yh&NLG4BcGuPL;}ZRcu9_AiRgWF^MmW)6
z3RIctZ&p{wZwrU)K5Oj)hKy+GsNM?xp98tB^*qdOD9tUEi9)Ym&5g`N3XQ^RMrFKr
zj$r9X9YGGocS*a;MaG}edd$1KA;H1X(ITgyLiPhc;a3@18`vypIh+lU6`ZY7_BcfV
zA$+i)>6yn(UvqPI_p*R_1DajUkCKyiuZlR43@&5F#Jm-U$J$D&g~7nxKeV`~A`^K-kzKqx4KGBtFaU?K1Nx8
zj^-U{_+_?)ea_jj&j7CyXP*)eKczRV4SS`S2vYj6+;_fJbVz*Bx
z=xtPT-fK31Jlm|kkIY|SbyddxOL6xyLo%tLpOgOU!90aq*}o*>r$S`
zP4{HAAU4JSquFkUW7lw$D;%DLIfgbR>*QdN^}Q)@kJtrjh4cOO@xDcin)r6(^vPh;
z(YY1^D!~53AtMMp=<&Zcx9UTBL;hjF2NO47FsLS$qIrTEmL_ptayHB|0M60UmnpBjf@&89|{2Rytt?VboI62!sIRR2M(6F*HGqJJK)6%f9(9p55urSh4v#?OpGO@6Y
zP0x%CkN1u)fO4RYQz4xUQ}8)R3k#`|!Z~>;76l&Ei3Rv&{=t$Gg3(yt+`uBG;{UbG
zLsK~|Jcl2S=1bnZzoOYsG`tFtBax8fBobEQWKj#!zztE;qZ`sd!VaJ2m{DwE#vKuf
zA5g-zL*mxaf(K_pCxcc)J6H>#KoVv7Lgz8Hn7SUATi?`p0=pRP>lZLr-63uC*|a`g
zd&cMFUq3tBsdq`3eXA!^YAmKw#lk3uJ&R+GDkPVAjn=fr=B4gie)CkeejEYY;SsPi
z{SVixxt@o@9KZ&NN&!JtKi;Ym{|WPv02WGu;hUA`k8~Iu*=DQ$UnRF99p)f~IWuq!
zwe+QDzC0<*&PS1+yKmmFhi>DhUG%~Me@YqDCF#k9`LHcs4W9qTr^cNQ_t4MagF3i~RQmm4NAz~9BtFx(hb2i1N|jsQv90r_`&byql1snb%AYy>#9CiA6;!c(
z|ujqYRjB
z9EmlGDxQ^jWV&D
zydseD*gnbBdOEPbEo%Sam=bVZx#h&AOMUKN>3rSwd&W23u_3+UC^ImD2kC_mZl{b-
zn7@bo7zKp1=lCNpM^BllrtPHpPnpm3wiF>YJx&YT$IWfPfo_+p3LL;K|{WjGh{
z(WOxI765Rukt!YplRNg|H}AMif0DoIvxZ3Ka2}0$$DS$h
zclNw?IHKl@O1dtz?=?)_#xNeXeQ&xiEd<1`a&Q2A0X^IZuDBj+kTA2QBLm1V^Q*U(
zN7k0?z_Lola`nEN;ZC4`9!oFK^{$j<*7)_&;2Q&`Qg^m@%9+5AK`ka9Y53$LpEgegA#)9|m3^&D?-E!zVB4Du
zh!3{f(I~bc52PLM{sUJ0(RvWK{B!83uF~!UkKjjZ+_;fb*p`STBCeZhM}D?*{}A6$?eU>
z(uU!e%&24_ev+o(+mlHPj0$ueNq^O-oSto0N$}~$Apb^Xi#0{o@v>_aCbBeQ`fjly
z*fP+Vdo58aT1)!l6GjFJ`DS#AlDHM6G)%rm=Yd>am`I>4hmztPC5yc)4f-yaL{g4F-)1+t1V#!z1M&J
z)N!Z6QAJ3-=u?sf+rAEB8aUSj@9-fLu>l|lSAyUjFjPO_LIa_;A?Aw__tOdJ3bP)U
zKarN5=HSSp^jN}XJ9bb2i@$59By_LZDR9U=LfqKRMhkIr|RmZ=51kAeMjp>^c(fTTT;VS=L7%28GjJTn6HdQaTiw36O;(u1tG&)Xr(@#
zyxLM0+0AhN$e&!I($^{!gtrgU3gol6vT5{17aSrd`gmcQL^>&ywrQ`t{1LXa-td`O
zO>(y=LC#-$=QZh*1Wm~Ty!jYsSuFn)C`Eqjf-4!?h!h?f-LK*I7!frD+#mCPNrNm!
zFnp+xFNW%-*|sFy0y;-TwoiYrT0jOIs^o|;`&k{Pto%iC(`f7zRK(ritOEJra880AM7~#>oBre|&Q+b3+Hr{B7+@`FY7M
zPsT{fWsycTcs}Ob<7fGVr4T`}$MapjRSfMDIT0BH{O6+NvSwz0;*i^}@!uDSgPEhv
zzFPc|r}B(cwLgf_D9gY$0aQqmnl?Zz`UQ>%@^NVmX>i3|r2p~+1oy?|!;vA6MlQr1
zki~NaipO)v2Nd@Y&?<6|kBsF%gv^f5h+gd%cgV$$RPX7(P|uy{QPW_MR}4UE;XbFKv!L%B`>S&`)0k%?3fHT?o@aV`dS%y%5V+Km#&YOuq;&#w~yTI`1$?
ztD2T0t8Q(Qx10}eF|jJpu@Y!J-rT(=r^{i%h(%)e%Z6OvjwHOV!v4*Q>4ub4BPX~jY?P$wS8z%X=|82I@grJ2b>P3vUK9*-jMF0)U&O8Z
zO*VTS$v%?L3P2|5pjv(To!CGW!T^L-;TPojP~qshf}9*!0f63iKg-^g12Vt)5qIIW
zr47Ru9?#2a!Py@F`*>sN)P)EsMQ%yRQcZYx2MZMb7=(-K8|M_of6&N8ZEMQQLAdR|b{69+%t>8jC-**R=HlJ(t2sBR$-f(iDwi
zQ|sm4$hgU}atXfaWF%8iJTgF4xi$nuVwx2oZ*A};0=zNLbZt7WgE8UuJ!G;99ZL$QsoDLiOh6${g0uqMt_#2QYvYf!qJkFKD*`9
z2&|`rjPWeZKf8S_-@|>Cmx-5w75*s40;FV+;B?Vl)^*a$#0(#iR47U45JBmJwmmhd
zY7ijc3dGNRZ9$Xb{0;KYQNd5(tmV9BAYy|00~+vNpKUAR*Kfq4Kua0%@1KXcMAo5@zuTE&hJVl
zjG;;a>9g)x*W<|LWJpYwJpM<+YIxv@BU#MS8Sh5U6Ut#WJft~fxphSjEhwK7RxiVv
zT>gwG){jJM*}<_ZU5L)E*VJ#WRl)ewi$p~H+CcptzDuecnJQxC;9{@aaT
z2s8YvlkNud!-gIz=V)TxrPGfk8P!47eO4y#KdfK@_5lfPCPV-b>;uamYYugqY>AE8
z|0)j!&{3YizFoZJDX&x}c=h)w4JdiYBGt3&%oCEDy3%{)`uZcFSjG%ozhFi-#(B*}
zZ-#TJhFVcb6e7=|xNps9*C(GjvN}>34ZQc#>Aka%z@8xdGxfpt)xmI0$bJ9cM}}IJFV*r9
zS@1pV>ee~FIZif7!q)|5F_lB_rRQ2;*=Gb*(GGc_&$CI5Gr(6px10o#(klD4HOy98~tryvu#
zPc=&p^Vu$18Z&+=vtZ-A5%yoZd^>_9!JlNQXX&sGEu&6AT4aCtK^Z-8PQZg*?~1ew
z6d1z4S(Uc^%?CGAQl)f3$7D?UbuH*~HxFgpX*28W`M&sHc)I6n;}!erd>0y1+P06J
zexKt!k+8ABoJ%#tHEJqIl&v%Azg3C-@S>x^I|8#mQKr&O#F}mjj7RG|x|Rv|vZSLl
z(mCr*5_{E@;>o*6*!eLljo4GFY|F}#eg3G_Sa`LW?zCy4gu8F?Mp@9*QY|Pj~3@t`*4f+>I
zvPa9>Q?v$eYwG=Q&6Zyqe2Pq*!0NYnQGo?G$j&EtB!5N`o$7D~R};Gm{z)5!{63>;
z^U3k~sKq7eu5@;-#yITM#Q~CkAnzPjjGHOi;n}#pmrf)*%QhJyk#dyUTf}&-|>Qq
z;|89fp$r;@uy2$=zL&{Yjxm|aZEq}c2X25l$kSb(Q<`s5qvl=R
z*SEULmFKHbwVqM%i6exJjK^!vS45`Y%TJG^Z;uS)bkDPv
zz-!`Zprfgg9Uj4SQ6)u~(w826u;a>@+23|LhP4)GqD*RULI95Lt?H&H@$>o)G0F^9{$&E;~zx*-s6~*QNB8pXd
zGe&gqq|OC%<8}}J*C>+owsN2ea$s9Yt5{sp424}Cnr^k
z!kQ2hFd+t~78he5mo(*wP
z)n~nClOi3!0li2ZyfW(#4NNIMa%_>1aQ{^20hsMD$@XhNs<|9MYG-}qSi@HFIiRAE
z#t1C;T7HU_O+B`lS5Np8Cx{fEBu#isQ^zLU5VpU{F0LgVpH(EK?2Fo_hDsdL0|a*~cRF|uE$
z57&8SmDuvX)R>{+Z~a|*=cAgsrcG7BFHI?teT^9mGfamzq*;7R<+`_^XW*joL(;Hz
z5@H(%QsjG3=v#7$uZK82{ZV0+h1Jeq43j)h8xJdX(_f#j>FH9Bg>!dZjqBTp@D}kF
zFx<7JEdoyi%f48q!tFodFsh|g!3KuPh!hTs-I-+#RT+$ebA&4caz>QhnIQL%yScW7
zkRu}mar-Bd*m>%tTl)$BR(Z639l!Y8pR{3tAgl^9`Iwp9Y*;FqHlbhvXGnY^4H=;W
zK>l$$fK$vW$&8RNP&Z#HfWMab=#LXN9?i9>8EVT%>L-0A-L9n`>qp)X*atPwmjsZ8
z0=OnhXxS^VRSz7MIVSIh@UEiYMoswLtHbi%uJ+Cyh@?ClI%TjtWG+5LOU&tdX}0i0
zuYA|}Qp;{E%VK*-`-g91=T4tBClPyM7VfwHlb{5$b6{pK=81NFqGS$rNvFMLZx}I9
zuZxJM9oq7Bx{EBg9-Z#o9hh*_C8x6u9~0K|0HU`OH)*+KJYYw{`i3bTVC44(oPDX0V3w+*8`qW(XR18)}Ctu8vhzCh(xUGqOk8$+}#co{>3Yd8(3R
zB$DTHdW38>^7lhb225kbZfh^C5Z&CgDc;}Q>;pYVuKPBtSW>24)z40w17jU2eoAdJ
z%I4dm7!Cm-cuJ+i3j&G#%Fgq8U;k$O)qE)tZZ7WP!jr^O%CD``Vr{p!Y#j;HXa7CB
zl(tXLG}`%wJSLfJR@3bZe?YWLYHz0^R0s3a3+2&K=a9N!9O`nOHts6%M?(48#X@$4de-)z6JitnK>h&_T
zYlxC5>u97yIDJR?N8esJ#`ycg|KkY(%F2fsQDLAzssTBiDN?Oymo`B)TWaS=sdwMc
zc*eFGteTuP<)caVKg|}eQ6}-5J@hCzl)2GNu+8K`j>GfKky7Who5y=N7Wv0{X0n4~5SB|AM8ROH>Vo9gwpW>buNzu~5`Y|@Jy&iYG4sizO5uw@
z&C2f5Uu*OlRUBv{)L9lbu;HTOSHSX46KN9z{foOfmThEC+RJdK4_%n{l*ahG{KG8;
zD~=GeaM2guiENPNTM4RjSh$SVtYC?+F%boesog0@z=0@RbQH76qcU`LIO@SPy;3#C
zjJZnsSl=!lwn=9@&S~9tddZFBA=`7^rBhPd_SCN>*4yp2-UqBr*MIw&_lD7|QGbAH
z7`q2Iwz)s&~q8H7PL+~P|fp(w5c(0;~ls<)yRZSzjoRNbl<6(_%>ymB07pqFOe
z?n}LhToszORj-;0YIwOalFJZtXIwn1s{GxEIxHM1d3=2tok@)QJKWr5{hK7Vs_Qd6
zBC+Hg<5R)TV!rYK<*jsB$jZQf}YPpE`4-+8~jviVRXL
zJBlTzTzx!~;UVB{69b$PFU`bng85^Nf~Y$#eKe?B?20umgAmu%NNNVz=%6xuorG1v
z9M2U$vVpZScP_E(TH#oBBrxuS*8nrL2&#(})x2449(+4h|4tW{8nQa@@3f@0f#1-
z5{wZ?dNw#;CG*(t4O1jC{19xgHr7nclfTTOT`cOtvG{IhdOkBdqvbrd^-b;6s(t4y
zO;>x#mDYC7Ao=}?aEhx7o57Zmn&?97J*J=#uJF0(J5-~rPdPHR)QbsiXT-b-Eqs;b
ze{qc)Ex?!q_!riO8WIs?YKnj$7(kEc=Uw0j#QMA&KDE_|>F*=+ZJr;NJN*~+yqk$q
z>}9mm1+XE=LkP!3-aCwZm`Mol{JgQ*+_tmd_6Rbj#p#tvA@^Fe_4f1KsjM8G
z97suV=a!G~8y3SR1d)DsyKgN4<=Xn`l2HEy1_px15?*@*hTJv9A0V8Y{3HrJF~
zk_3(@0rU#jlcRYe`!OEe%$`04((Y=*pFFt`#`T90^1PMDLGVbrS&j2|FtFD<3(TYv
zpR~LRvQVxLJZMZ#1<7`&4O@L}F`cnESEG8FgUY$aqg&
z!9Ih$ub=~81OyhnYxzicg#QpK4eoPMGg|9}_F`cQ;|T-Z*W1mPh{5x&%UV+f-c>|o
zkK`dJ(3AyY($&`#FqX{SHEp}`z0qS?|GS!+?e!@sC4Y1?l!4J52tg?;SJGEPfTd(H
zGo7lYPI&h3y@_ORb!K#OO25KW{Vt{>_778QMUdBPN8xSo(B80Yw;xwFP*$6YbobOe
z(TE8BErG^mT#}WANFffLgh0SA!->0T_>}4l@+RqTTxjR7P#*R?0kxr&E{&eUmb?%x4IJL-tSQ=H3~{KNrx_<(pEcwod3*Ru;x}h6G_JT4YdVkRcJ*`N?gQM%8TO
zcwC3gM_z?!=}}kD=b+O08SOthPd{%mv<<)KZflp&>>ValgDN)FeEep1e=yK;eBI#t
zt?eOE#Knw)X#g9;r^;!>HSiZ;ON;Q?-yVg*2l)`h{9ZVZAu6{Fw!D
zw1|72X3eHkuC^CH;i=DG1;#zLxu!_~8T9kOL;vFqYoY(|UY=^>7$0Ynzn>ugs;6769`i0pE)w(GEkOUE>tB%5|W^MIlnvaVh
zl&AbzazEjmug{+$33+yd6@GzJ9gSm$1CYYkxySkeZJ8JB=!CNB1+qPz>&cQ`Gs-}5
zz7Y?SL55&w-ReCL$wiqGR79n{m+M}o?g`mJ;7NP~!TJ9&g}MKSDZl_jTgG}B8)tHC
zWR#kYnPF&PbYx%@IHkZe+BG@QKhWLLi4W{PnuWrP}#6@a-~iwKn^BAA?;
z3W`^gvonXenYw4sZS3vWuWhjD;-uQkYI0LE$xKMr6yq$=864Z
zKP$o5xje^?k{{fCD@gB@8@GxI-O)m~ig8BuctljZLPHmf*dg!mEUR2gahzU;2FRe(
z&=QTs!?Zd-8|7nH#`8ca%jKz1=UAr~c*32uqZ(^R)j}vIB)4zoaT@CgEl5`GQBQIx
z!@PVy-f^Lhb-n-wf^c(NhP}Lb|6&QZ8kzF@zan@CmQkgmOhE%^=LH53*!tkF<*am`
zD!SXStD#l3sWel@<8)bHGKkKOde7@m$ydr*WyI33t1&OW%S7w$E(=)aQlP&-T#tX>
zby#_Gon565GJ0IG>UX0H#M4cFYfe(>Z?9<$S}1FnN`FzoxY9ZJ6Z*jL^|Nlj>N{`p
zp?T^a@d}tyREw^;T#fB^mj1i>@tSGrvp-dP@>!I;!S*2yvQ1Bb{G@?Z7IKY_e%NG@
z#U@bjBt6ZY?FTmi8{hJia@`LUf|w>($zJ9VHv_N`e6ZP3FXm@P==ePstLH8^_Rropz!=e~d=EJc?FbNoyxN36_H_9;;H
z;2fN=J-XfMS*JqO5nIzUN%HM-1uFae9b1g9!Oa(WOFlvb-K34{T$>qEUQNKRckamv
zaS$A^WZ{!!EdTZQs$oNc|#XDGerp>JUolUwh(-Qx{tmw7?QjAoI(Q
zkVQMXX~nPd4iN3J15L%#P~{LUY8Z5s_oSPmjI8y_+;pcksRm!j+D3E^b5x4M`HU9N
zanhR{|0!;GHOZlsNYD7h4PkVh<%E*Ob|p8&7e)ng@F!Yi1sZ|a_2Ug$fRn&_y&}NO
zL9_n(6UM&HyCOlp0%(L@@BMv(5Nf_u;&cN-2u
z3iMBEB`&)BZft}aWKXbORq0?B+Ik#q5HbsidBI>>Yh;d*vQXF~;t_i8wJ||12@&&g
zfOU9Ja7~+(rMm%xXwzDU
zQ?HK9ZA1>WW#OwOr?$JjPC=gTJa75etu)mlE5)SSd7ss_lckd0W5$?GB3w51Kh$T7
zb)Ie)W@Kmmc#>2ko_1W#q0omIM-XJ^qUYIg0P9s=^}Dd|!^!ycZKm(xmnqqy!?kXx
zOjcmG_*H|nfsZ1|mait^&$M#YB^HD5Rr>2(Sl&_Zj*!u`{cBsRZWQ-DRPq>iF07Ia
zh>|{JMfT0H55p51gW^``0$3`2-W)Pys=0-(WXe{S2R*$=zZO%b_t}XqdR%Al;B}aI
zm~$m7yB9^CSWnnGhi;Rs_zBxs>e%#5mLgb{cP;D?w4Y}vt<5G6>tB%>uuqUoOu0pDa@~nYJ}RYrDD}%nY{Y2f4Dw
zcwG?y?)~j{e>syMo%9Y?hE(S5zPmCAyyRT0X_-4$+5vC#nqSHxzzJmhUxv62DoYlDA-@Mrlq&7D(;fCU^peU`~-F@i@
zI|j+IH%n}RK#FC=>lv&x6!G5XSlFBYoeR!C-LO8$&m-D#2(JjdCa+<0754w&zi|7>
ztnm9iXkt4)pDIbkWK-zSp5R7L2eLmffXWm!PtSwcfrUl@hk<r#^<&g`zX@a^NoD
zb3{E{+6u0z;`5fyA7tHKnxaY{qwAfK&0YJ01@FUQ5!e0|jmX46g=<|UmdxX1ch{}o
z6Z`sBimj64l8OND$5KISk9bthj1PbN?S(JIsnMnBX2)hEBWAAoG5HxZRW|bVw?p;*
z2)*84?Z5gp9y3Yqv(6mlMe<`1mEpS89{HuQN53%ilQ;^%EW`x|S-=(R?7KM!=z<$*N
z5sl0I5BiEBFn-0e(^#5e74{)@x1`CmKfCo4>CiTnvjpG`l#pKMn5PDbCnOcpCPCR54P(}W}vO_Q(;
zB_FZpxG}Gk(4Vn;;kozWPR!ec5Mt(I@uU4WINKi293^cPq@Ui(m3QjJAJCL08&}!WN=XSEUTYHK~Z~ibO8zhwNVVAWcQ{NjgKM
zVsa5W#v!}VHJK7(!p_z3bHJH4!v%c%Tice1fp&+OBc}^%_g&GlX%=SO=IG_?9J_bE
zm*srUFhKv(tSSwC0~s~+
z_WaFtV!_2WewT5aSsd#O-F#x-g?$Qqv(>^0+Xo-r2YAN+DiIRDGlGCMuEJwVk#
zP^Gl7!i2Ci&}V!=j{v^zg|&16qAV%9P4GsPcGhBc<*Lr1(R4+k>()Z#9?cxOmrBFF
zqw8$E&C-Sht!->{u9d9?Yfth-eccJ=G(#>h)E_UT&!pH0=3kPquAk8Y@&aKe<
z_l0Jat}cm$5omCw@C-cGc5OgleTa0-o`}w?iF0ggOp%Ct6dgrywsV^j4ismKX_5<=
zIMr}2quzFQ3i6l>gfE_LWvsV;VV*O{2?&s2s%j=gO#$1u-jethqmU0`sLVF23hX7~
zv(RkfhXAtugWIdV(k7|fa(9jP+;=04lU-y9dc0xcR=1NqGydRe7D`^%wBsi#RO-RY
ziUdE{0}F=`A}FW_06oZ8%#Q^vRU?WzkT!Nb+mmTeT+fA1gY2piF!Ty
z{V4F-y}^8`1D?UK1OjZzSMyg;N%Bi~NLZk(yUNJ)(i!KT!!7!^?GYDV|u%k)c=B^2qI~
zU+AAPRI2mZVKCwRWOgYLPVQ^eC8t(j>t@_u@??geiM8vFc{sdpWZh&6ZpU5ygb9hL
z5*mrCXBm)Am)kR0_U@?GU9ll!EaTS=l_f17JX4df6{VOlNn@e6I%uLS7qA7|!2xmS
zW^hoT8~ax=Gch;*F!7kQ}r8`~DI?$FdWDp;?%H0Lz#sh1$%yZM+G4
z&6($Yz~lghcH-J;KCvM(5M-P
z#EoEb^3`EXqY;~Z0!KW3IN(j2R!sO`(6c#im)f?f=e3sYW#WuCdsry7u@}Y$7KlY8
z;^xnnJbgT!R!V~NQ9yr-?2({PV9p)=X=?WMm_5JLB8;;w|3&`0y2<%5&12@xGe@T-
zAXA(zx16VQmW5BbTw|1;inEwDv~z~7&_aA%LP54WVW5Ddi7ip=R7V68iFkHaKB!4x
z*jqbYaMtsT6#oB46Ntfp;KBb^9$VzmnJY*&Y>ZsCfl<
z+$JvBAL%}F;mZB8ClZA4(Y?>TR~ZYABX&@6QOuE-3q;Zxw-0-2_R@;~3{twROLL+9?PNfsmWmT8Om58Qeki@N@PQy;fpcvOspZpZMcez04n?b
zhNX`BcP!zCiJ--AxlJf_FZiqU)eR5wj0fqV63xH&FeS4#uBrO$=nYY=@DuGp=ZWRW
zc0KF4fcMp>8a@$f!feHEXDUF(;>52ETPhs$C!F3h-GLW^_t&>Sdou3%tm(Fo)36+^
zWJ6*kO|{Lpl?-z6`~1AgIwg*iHGjk244b}e$bv9lQPC)Uo;9Pgu;%POd2X_-OQ$*T
z&Ifxv#V^zD88zWl&WkSk6T(qUX?uNpmrRXqD8ME5)_GpTvT?Qx8%A602c1t(?>Lh+`@wB
zt)$uSKa1fwV+1o=xNgVImDl&=MR6ugyG~C&kSRFlkY-163d1?_PC`KR&Tcd2s5&Yo3r{P9vHFVb
zJ&IaDz!n=W!Lt&go*vzdDKE%YUjrlM^^$vzPBN%>3ye|ut16VG1WR275KH_+bP+^{
zG-A`FC*5q6u>$JVsV}H3v(3|bu83iMDjre|e~{?(hp*8#qRPM_*~Q|x;$)%JrTles
zD7n)E;^!OEfo0xX0ev?Qy&wEk-7K%?xX>U(ZBblsh3q
zjJZVgrRb!ORr7u6{TYo4Q+hS5*%Z0icyrN_`*8hWb}sI7O2m4KllqZou6k-um(}Ms
z*e8Jo)eC+uqQyZ;QI3F{{vdC%Lc&j=xf{B%y;WNLr=QeC1{tYvH}&}ZpJ|dU1^c63
z9t?M?-Xu_+zreKaBR8!CT@uQ6rOG71o;-sM40GoeA%_A0aR6j~VrF@!*ZlLutErT3
zv%7=!8^db7TARLanohQ}{OFXKD&cv4H1Dvx*Afxr?cRVj>C`%IkjJu9C|dlnbsDIK
zx%&FHd97T!#f^!uEZ6$1bEW68<70Ljo_kbVr8H!na1^d!-{f&=5|pBmS4TfN_)o1|
ze73Z|%t4=7I!dq761$EPmZttXr$5Tey9=4_m(XjW-Z!#H@*