From 274a78d8b180c58d7d5837b8e015a8f247d58b23 Mon Sep 17 00:00:00 2001 From: DGamerL <108773801+DGamerL@users.noreply.github.com> Date: Wed, 24 Dec 2025 17:10:19 +0100 Subject: [PATCH] Compiles (#31302) --- .../objects/items/devices/bodyanalyzer.dm | 282 +++++ .../game/objects/items/devices/gasanalyzer.dm | 256 ++++ .../objects/items/devices/healthanalyzer.dm | 373 ++++++ .../objects/items/devices/machineanalyzer.dm | 143 +++ code/game/objects/items/devices/scanners.dm | 1074 ----------------- paradise.dme | 4 + 6 files changed, 1058 insertions(+), 1074 deletions(-) create mode 100644 code/game/objects/items/devices/bodyanalyzer.dm create mode 100644 code/game/objects/items/devices/gasanalyzer.dm create mode 100644 code/game/objects/items/devices/healthanalyzer.dm create mode 100644 code/game/objects/items/devices/machineanalyzer.dm diff --git a/code/game/objects/items/devices/bodyanalyzer.dm b/code/game/objects/items/devices/bodyanalyzer.dm new file mode 100644 index 00000000000..8b7a44e044d --- /dev/null +++ b/code/game/objects/items/devices/bodyanalyzer.dm @@ -0,0 +1,282 @@ +/obj/item/bodyanalyzer + name = "handheld body analyzer" + desc = "A handheld scanner capable of deep-scanning an entire body." + icon = 'icons/obj/device.dmi' + icon_state = "bodyanalyzer_0" + worn_icon_state = "healthanalyzer" + inhand_icon_state = "healthanalyzer" + slot_flags = ITEM_SLOT_BELT + w_class = WEIGHT_CLASS_SMALL + throw_speed = 5 + throw_range = 10 + origin_tech = "magnets=6;biotech=6" + var/obj/item/stock_parts/cell/cell + var/cell_type = /obj/item/stock_parts/cell/high + var/ready = TRUE // Ready to scan + var/printing = FALSE + var/time_to_use = 0 // How much time remaining before next scan is available. + var/usecharge = 750 + var/scan_time = 5 SECONDS //how long does it take to scan + var/scan_cd = 30 SECONDS //how long before we can scan again + +/obj/item/bodyanalyzer/get_cell() + return cell + +/obj/item/bodyanalyzer/advanced + cell_type = /obj/item/stock_parts/cell/super // twice the charge! + +/obj/item/bodyanalyzer/borg + name = "cyborg body analyzer" + desc = "Scan an entire body to prepare for field surgery. Consumes power for each scan." + +/obj/item/bodyanalyzer/borg/syndicate + scan_cd = 20 SECONDS + +/obj/item/bodyanalyzer/New() + ..() + cell = new cell_type(src) + cell.give(cell.maxcharge) + update_icon() + +/obj/item/bodyanalyzer/proc/setReady() + ready = TRUE + playsound(src, 'sound/machines/defib_saftyon.ogg', 50, 0) + update_icon() + +/obj/item/bodyanalyzer/update_icon_state() + if(!cell) + icon_state = "bodyanalyzer_0" + return + if(ready) + icon_state = "bodyanalyzer_1" + else + icon_state = "bodyanalyzer_2" + +/obj/item/bodyanalyzer/update_overlays() + . = ..() + var/percent = cell.percent() + var/overlayid = round(percent / 10) + . += "bodyanalyzer_charge[overlayid]" + if(printing) + . += "bodyanalyzer_printing" + +/obj/item/bodyanalyzer/attack__legacy__attackchain(mob/living/M, mob/living/carbon/human/user) + if(user.incapacitated() || !user.Adjacent(M)) + return + + if(!ready) + to_chat(user, SPAN_NOTICE("The scanner beeps angrily at you! It's currently recharging - [round((time_to_use - world.time) * 0.1)] seconds remaining.")) + playsound(user.loc, 'sound/machines/buzz-sigh.ogg', 50, 1) + return + + if(cell.charge >= usecharge) + mobScan(M, user) + else + to_chat(user, SPAN_NOTICE("The scanner beeps angrily at you! It's out of charge!")) + playsound(user.loc, 'sound/machines/buzz-sigh.ogg', 50, 1) + +/obj/item/bodyanalyzer/borg/attack__legacy__attackchain(mob/living/M, mob/living/silicon/robot/user) + if(user.incapacitated() || !user.Adjacent(M)) + return + + if(!ready) + to_chat(user, SPAN_NOTICE("[src] is currently recharging - [round((time_to_use - world.time) * 0.1)] seconds remaining.")) + return + + if(user.cell.charge >= usecharge) + mobScan(M, user) + else + to_chat(user, SPAN_NOTICE("You need to recharge before you can use [src]")) + +/obj/item/bodyanalyzer/proc/mobScan(mob/living/M, mob/user) + if(ishuman(M)) + var/report = generate_printing_text(M, user) + user.visible_message("[user] begins scanning [M] with [src].", "You begin scanning [M].") + if(do_after(user, scan_time, target = M)) + var/obj/item/paper/printout = new + printout.info = report + printout.name = "Scan report - [M.name]" + playsound(user.loc, 'sound/goonstation/machines/printer_dotmatrix.ogg', 50, 1) + user.put_in_hands(printout) + time_to_use = world.time + scan_cd + if(isrobot(user)) + var/mob/living/silicon/robot/R = user + R.cell.use(usecharge) + else + cell.use(usecharge) + ready = FALSE + printing = TRUE + update_icon() + addtimer(CALLBACK(src, TYPE_PROC_REF(/obj/item/bodyanalyzer, setReady)), scan_cd) + addtimer(VARSET_CALLBACK(src, printing, FALSE), 1.4 SECONDS) + addtimer(CALLBACK(src, TYPE_PROC_REF(/atom, update_icon), UPDATE_OVERLAYS), 1.5 SECONDS) + else if(iscorgi(M) && M.stat == DEAD) + to_chat(user, SPAN_NOTICE("You wonder if [M.p_they()] was a good dog. [src] tells you they were the best...")) // :'( + playsound(loc, 'sound/machines/ping.ogg', 50, 0) + ready = FALSE + update_icon(UPDATE_ICON_STATE) + addtimer(CALLBACK(src, TYPE_PROC_REF(/obj/item/bodyanalyzer, setReady)), scan_cd) + time_to_use = world.time + scan_cd + else + to_chat(user, SPAN_NOTICE("Scanning error detected. Invalid specimen.")) + +//Unashamedly ripped from adv_med.dm +/obj/item/bodyanalyzer/proc/generate_printing_text(mob/living/M, mob/user) + var/dat = "" + var/mob/living/carbon/human/target = M + + dat = "Target Statistics:
" + var/t1 + switch(target.stat) // obvious, see what their status is + if(CONSCIOUS) + t1 = "Conscious" + if(UNCONSCIOUS) + t1 = "Unconscious" + else + t1 = "*dead*" + dat += "[target.health > 50 ? "" : ""]\tHealth %: [target.health], ([t1])
" + + var/found_disease = FALSE + for(var/thing in target.viruses) + var/datum/disease/D = thing + if(D.visibility_flags) //If any visibility flags are on. + continue + found_disease = TRUE + break + if(found_disease) + dat += "Disease detected in target.
" + + var/extra_font = null + extra_font = (target.getBruteLoss() < 60 ? "" : "") + dat += "[extra_font]\t-Brute Damage %: [target.getBruteLoss()]
" + + extra_font = (target.getOxyLoss() < 60 ? "" : "") + dat += "[extra_font]\t-Respiratory Damage %: [target.getOxyLoss()]
" + + extra_font = (target.getToxLoss() < 60 ? "" : "") + dat += "[extra_font]\t-Toxin Content %: [target.getToxLoss()]
" + + extra_font = (target.getFireLoss() < 60 ? "" : "") + dat += "[extra_font]\t-Burn Severity %: [target.getFireLoss()]
" + + extra_font = (target.radiation < 10 ?"" : "") + dat += "[extra_font]\tRadiation Level %: [target.radiation]
" + + extra_font = (target.getCloneLoss() < 1 ?"" : "") + dat += "[extra_font]\tGenetic Tissue Damage %: [target.getCloneLoss()]
" + + extra_font = (target.getBrainLoss() < 1 ?"" : "") + dat += "[extra_font]\tApprox. Brain Damage %: [target.getBrainLoss()]
" + + dat += "Paralysis Summary %: [target.IsParalyzed()] ([round(target.AmountParalyzed() / 10)] seconds left!)
" + dat += "Body Temperature: [target.bodytemperature-T0C]°C ([target.bodytemperature*1.8-459.67]°F)
" + + dat += "
" + + var/blood_percent = round((target.blood_volume / BLOOD_VOLUME_NORMAL)) + blood_percent *= 100 + + extra_font = (target.blood_volume > 448 ? "" : "") + dat += "[extra_font]\tBlood Level %: [blood_percent] ([target.blood_volume] units)
" + + if(target.reagents) + dat += "Epinephrine units: [target.reagents.get_reagent_amount("Epinephrine")] units
" + dat += "Ether: [target.reagents.get_reagent_amount("ether")] units
" + + extra_font = (target.reagents.get_reagent_amount("silver_sulfadiazine") < 30 ? "" : "") + dat += "[extra_font]\tSilver Sulfadiazine: [target.reagents.get_reagent_amount("silver_sulfadiazine")]
" + + extra_font = (target.reagents.get_reagent_amount("styptic_powder") < 30 ? "" : "") + dat += "[extra_font]\tStyptic Powder: [target.reagents.get_reagent_amount("styptic_powder")] units
" + + extra_font = (target.reagents.get_reagent_amount("salbutamol") < 30 ? "" : "") + dat += "[extra_font]\tSalbutamol: [target.reagents.get_reagent_amount("salbutamol")] units
" + + dat += "
" + dat += "" + dat += "" + dat += "" + dat += "" + dat += "" + dat += "" + + for(var/obj/item/organ/external/e in target.bodyparts) + dat += "" + var/AN = "" + var/open = "" + var/infected = "" + var/robot = "" + var/imp = "" + var/bled = "" + var/splint = "" + var/internal_bleeding = "" + var/lung_ruptured = "" + if(e.status & ORGAN_INT_BLEEDING) + internal_bleeding = "
Internal bleeding" + if(istype(e, /obj/item/organ/external/chest) && target.is_lung_ruptured()) + lung_ruptured = "Lung ruptured:" + if(e.status & ORGAN_SPLINTED) + splint = "Splinted:" + if(e.status & ORGAN_BROKEN) + AN = "[e.broken_description]:" + if(e.is_robotic()) + robot = "Robotic:" + if(e.open) + open = "Open:" + switch(e.germ_level) + if(INFECTION_LEVEL_ONE to INFECTION_LEVEL_ONE + 200) + infected = "Mild Infection:" + if(INFECTION_LEVEL_ONE + 200 to INFECTION_LEVEL_ONE + 300) + infected = "Mild Infection+:" + if(INFECTION_LEVEL_ONE + 300 to INFECTION_LEVEL_ONE + 400) + infected = "Mild Infection++:" + if(INFECTION_LEVEL_TWO to INFECTION_LEVEL_TWO + 200) + infected = "Acute Infection:" + if(INFECTION_LEVEL_TWO + 200 to INFECTION_LEVEL_TWO + 300) + infected = "Acute Infection+:" + if(INFECTION_LEVEL_TWO + 300 to INFECTION_LEVEL_TWO + 400) + infected = "Acute Infection++:" + if(INFECTION_LEVEL_THREE to INFINITY) + infected = "Septic:" + + var/unknown_body = 0 + for(var/I in e.embedded_objects) + unknown_body++ + + if(unknown_body || e.hidden) + imp += "Unknown body present:" + if(!AN && !open && !infected && !imp) + AN = "None:" + dat += "" + dat += "" + for(var/obj/item/organ/internal/i in target.internal_organs) + var/mech = i.desc + var/infection = "None" + switch(i.germ_level) + if(1 to INFECTION_LEVEL_ONE + 200) + infection = "Mild Infection:" + if(INFECTION_LEVEL_ONE + 200 to INFECTION_LEVEL_ONE + 300) + infection = "Mild Infection+:" + if(INFECTION_LEVEL_ONE + 300 to INFECTION_LEVEL_ONE + 400) + infection = "Mild Infection++:" + if(INFECTION_LEVEL_TWO to INFECTION_LEVEL_TWO + 200) + infection = "Acute Infection:" + if(INFECTION_LEVEL_TWO + 200 to INFECTION_LEVEL_TWO + 300) + infection = "Acute Infection+:" + if(INFECTION_LEVEL_TWO + 300 to INFINITY) + infection = "Acute Infection++:" + + dat += "" + dat += "" + dat += "" + dat += "
OrganBurn DamageBrute DamageOther Wounds
[e.name][e.burn_dam][e.brute_dam][robot][bled][AN][splint][open][infected][imp][internal_bleeding][lung_ruptured]
[i.name]N/A[i.damage][infection]:[mech]
" + if(HAS_TRAIT(target, TRAIT_BLIND)) + dat += "Cataracts detected.
" + if(HAS_TRAIT(target, TRAIT_COLORBLIND)) + dat += "Photoreceptor abnormalities detected.
" + if(HAS_TRAIT(target, TRAIT_NEARSIGHT)) + dat += "Retinal misalignment detected.
" + if(HAS_TRAIT(target, TRAIT_PARAPLEGIC)) + dat += "Lumbar nerves damaged.
" + + return dat diff --git a/code/game/objects/items/devices/gasanalyzer.dm b/code/game/objects/items/devices/gasanalyzer.dm new file mode 100644 index 00000000000..6d6438a93b5 --- /dev/null +++ b/code/game/objects/items/devices/gasanalyzer.dm @@ -0,0 +1,256 @@ +/obj/item/analyzer + name = "analyzer" + desc = "A hand-held environmental scanner which reports current gas levels." + icon = 'icons/obj/device.dmi' + icon_state = "atmos" + inhand_icon_state = "analyzer" + slot_flags = ITEM_SLOT_BELT + w_class = WEIGHT_CLASS_SMALL + flags = CONDUCT + throw_speed = 3 + materials = list(MAT_METAL = 210, MAT_GLASS = 140) + origin_tech = "magnets=1;engineering=1" + var/cooldown = FALSE + var/cooldown_time = 250 + var/accuracy // 0 is the best accuracy. + /// FALSE: Sum gas mixes then present. TRUE: Present each mix individually + var/show_detailed = FALSE + +/obj/item/analyzer/examine(mob/user) + . = ..() + . += SPAN_NOTICE("Alt-click [src] to activate the barometer function.") + . += SPAN_NOTICE("Alt-Shift-click [src] to toggle detailed reporting on or off.") + +/obj/item/analyzer/attack_self__legacy__attackchain(mob/user as mob) + + if(user.stat) + return + + var/turf/location = user.loc + if(!isturf(location)) + return + + atmos_scan(user = user, target = location, detailed = show_detailed) + add_fingerprint(user) + +/obj/item/analyzer/AltShiftClick(mob/user) + show_detailed = !show_detailed + to_chat(user, SPAN_NOTICE("You toggle detailed reporting [show_detailed ? "on" : "off"]")) + +/obj/item/analyzer/AltClick(mob/user) //Barometer output for measuring when the next storm happens + ..() + + if(!user.incapacitated() && Adjacent(user)) + + if(cooldown) + to_chat(user, SPAN_WARNING("[src]'s barometer function is preparing itself.")) + return + + var/turf/T = get_turf(user) + if(!T) + return + + playsound(src, 'sound/effects/pop.ogg', 100) + var/area/user_area = T.loc + var/datum/weather/ongoing_weather = null + + if(!user_area.outdoors) + to_chat(user, SPAN_WARNING("[src]'s barometer function won't work indoors!")) + return + + for(var/V in SSweather.processing) + var/datum/weather/W = V + if(W.barometer_predictable && (T.z in W.impacted_z_levels) && is_type_in_list(user_area, W.area_types) && !(W.stage == WEATHER_END_STAGE)) + ongoing_weather = W + break + + if(ongoing_weather) + if((ongoing_weather.stage == WEATHER_MAIN_STAGE) || (ongoing_weather.stage == WEATHER_WIND_DOWN_STAGE)) + to_chat(user, SPAN_WARNING("[src]'s barometer function can't trace anything while the storm is [ongoing_weather.stage == WEATHER_MAIN_STAGE ? "already here!" : "winding down."]")) + return + + to_chat(user, SPAN_NOTICE("The next [ongoing_weather] will hit in [butchertime(ongoing_weather.next_hit_time - world.time)].")) + if(ongoing_weather.aesthetic) + to_chat(user, SPAN_WARNING("[src]'s barometer function says that the next storm will breeze on by.")) + else + var/next_hit = SSweather.next_hit_by_zlevel["[T.z]"] + var/fixed = next_hit ? next_hit - world.time : -1 + if(fixed < 0) + to_chat(user, SPAN_WARNING("[src]'s barometer function was unable to trace any weather patterns.")) + else + to_chat(user, SPAN_WARNING("[src]'s barometer function says a storm will land in approximately [butchertime(fixed)].")) + cooldown = TRUE + addtimer(CALLBACK(src, PROC_REF(ping)), cooldown_time) + +/obj/item/analyzer/proc/ping() + if(isliving(loc)) + var/mob/living/L = loc + to_chat(L, SPAN_NOTICE("[src]'s barometer function is ready!")) + playsound(src, 'sound/machines/click.ogg', 100) + cooldown = FALSE + +/obj/item/analyzer/proc/butchertime(amount) + if(!amount) + return + if(accuracy) + var/inaccurate = round(accuracy * (1 / 3)) + if(prob(50)) + amount -= inaccurate + if(prob(50)) + amount += inaccurate + return DisplayTimeText(max(1, amount)) + +/obj/item/analyzer/afterattack__legacy__attackchain(atom/target, mob/user, proximity, params) + . = ..() + if(!can_see(user, target, 1)) + return + if(target.return_analyzable_air()) + atmos_scan(user, target, detailed = show_detailed) + else + atmos_scan(user, get_turf(target), detailed = show_detailed) + +/** + * Outputs a message to the user describing the target's gasmixes. + * Used in chat-based gas scans. + */ +/proc/atmos_scan(mob/user, atom/target, silent = FALSE, print = TRUE, milla_turf_details = FALSE, detailed = FALSE) + var/list/airs + var/list/milla = null + if(milla_turf_details && istype(target, /turf)) + // This is one of the few times when it's OK to call MILLA directly, as we need more information than we normally keep, aren't trying to modify it, and don't need it to be synchronized with anything. + milla = new/list(MILLA_TILE_SIZE) + get_tile_atmos(target, milla) + + var/datum/gas_mixture/air = new() + air.copy_from_milla(milla) + airs = list(air) + else + airs = target.return_analyzable_air() + if(!airs) + return FALSE + if(!islist(airs)) + airs = list(airs) + + var/list/message = list() + if(!silent && isliving(user)) + user.visible_message(SPAN_NOTICE("[user] uses the analyzer on [target]."), SPAN_NOTICE("You use the analyzer on [target].")) + message += SPAN_BOLDNOTICE("Results of analysis of [bicon(target)] [target].") + + if(!print) + return TRUE + var/total_moles = 0 + var/pressure = 0 + var/volume = 0 + var/heat_capacity = 0 + var/thermal_energy = 0 + var/oxygen = 0 + var/nitrogen = 0 + var/toxins + var/carbon_dioxide = 0 + var/sleeping_agent = 0 + var/agent_b = 0 + var/hydrogen = 0 + var/water_vapor = 0 + + if(detailed)// Present all mixtures one by one + for(var/datum/gas_mixture/air as anything in airs) + total_moles = air.total_moles() + pressure = air.return_pressure() + volume = air.return_volume() //could just do mixture.volume... but safety, I guess? + heat_capacity = air.heat_capacity() + thermal_energy = air.thermal_energy() + if(total_moles) + message += SPAN_NOTICE("Total: [round(total_moles, 0.01)] moles") + if(air.oxygen() && (milla_turf_details || air.oxygen() / total_moles > 0.01)) + message += " [SPAN_OXYGEN("Oxygen: [round(air.oxygen(), 0.01)] moles ([round(air.oxygen() / total_moles * 100, 0.01)] %)")]" + if(air.nitrogen() && (milla_turf_details || air.nitrogen() / total_moles > 0.01)) + message += " [SPAN_NITROGEN("Nitrogen: [round(air.nitrogen(), 0.01)] moles ([round(air.nitrogen() / total_moles * 100, 0.01)] %)")]" + if(air.carbon_dioxide() && (milla_turf_details || air.carbon_dioxide() / total_moles > 0.01)) + message += " [SPAN_CARBON_DIOXIDE("Carbon Dioxide: [round(air.carbon_dioxide(), 0.01)] moles ([round(air.carbon_dioxide() / total_moles * 100, 0.01)] %)")]" + if(air.toxins() && (milla_turf_details || air.toxins() / total_moles > 0.01)) + message += " [SPAN_PLASMA("Plasma: [round(air.toxins(), 0.01)] moles ([round(air.toxins() / total_moles * 100, 0.01)] %)")]" + if(air.sleeping_agent() && (milla_turf_details || air.sleeping_agent() / total_moles > 0.01)) + message += " [SPAN_SLEEPING_AGENT("Nitrous Oxide: [round(air.sleeping_agent(), 0.01)] moles ([round(air.sleeping_agent() / total_moles * 100, 0.01)] %)")]" + if(air.agent_b() && (milla_turf_details || air.agent_b() / total_moles > 0.01)) + message += " [SPAN_AGENT_B("Agent B: [round(air.agent_b(), 0.01)] moles ([round(air.agent_b() / total_moles * 100, 0.01)] %)")]" + if(air.hydrogen() && (milla_turf_details || air.hydrogen() / total_moles > 0.01)) + message += " [SPAN_HYDROGEN("Hydrogen: [round(air.hydrogen(), 0.01)] moles ([round(air.hydrogen() / total_moles * 100, 0.01)] %)")]" + if(air.water_vapor() && (milla_turf_details || air.water_vapor() / total_moles > 0.01)) + message += " [SPAN_WATER_VAPOR("Water Vapor: [round(air.water_vapor(), 0.01)] moles ([round(air.water_vapor() / total_moles * 100, 0.01)] %)")]" + message += SPAN_NOTICE("Temperature: [round(air.temperature()-T0C)] °C ([round(air.temperature())] K)") + message += SPAN_NOTICE("Volume: [round(volume)] Liters") + message += SPAN_NOTICE("Pressure: [round(pressure, 0.1)] kPa") + message += SPAN_NOTICE("Heat Capacity: [DisplayJoules(heat_capacity)] / K") + message += SPAN_NOTICE("Thermal Energy: [DisplayJoules(thermal_energy)]") + else + message += SPAN_NOTICE("[target] is empty!") + message += SPAN_NOTICE("Volume: [round(volume)] Liters") // don't want to change the order volume appears in, suck it + + else// Sum mixtures then present + for(var/datum/gas_mixture/air as anything in airs) + if(isnull(air)) + continue + total_moles += air.total_moles() + volume += air.return_volume() + heat_capacity += air.heat_capacity() + thermal_energy += air.thermal_energy() + oxygen += air.oxygen() + nitrogen += air.nitrogen() + toxins += air.toxins() + carbon_dioxide += air.carbon_dioxide() + sleeping_agent += air.sleeping_agent() + agent_b += air.agent_b() + hydrogen += air.hydrogen() + water_vapor += air.water_vapor() + + var/temperature = heat_capacity ? thermal_energy / heat_capacity : 0 + pressure = volume ? total_moles * R_IDEAL_GAS_EQUATION * temperature / volume : 0 + + if(total_moles) + message += SPAN_NOTICE("Total: [round(total_moles, 0.01)] moles") + if(oxygen && (milla_turf_details || oxygen / total_moles > 0.01)) + message += " [SPAN_OXYGEN("Oxygen: [round(oxygen, 0.01)] moles ([round(oxygen / total_moles * 100, 0.01)] %)")]" + if(nitrogen && (milla_turf_details || nitrogen / total_moles > 0.01)) + message += " [SPAN_NITROGEN("Nitrogen: [round(nitrogen, 0.01)] moles ([round(nitrogen / total_moles * 100, 0.01)] %)")]" + if(carbon_dioxide && (milla_turf_details || carbon_dioxide / total_moles > 0.01)) + message += " [SPAN_CARBON_DIOXIDE("Carbon Dioxide: [round(carbon_dioxide, 0.01)] moles ([round(carbon_dioxide / total_moles * 100, 0.01)] %)")]" + if(toxins && (milla_turf_details || toxins / total_moles > 0.01)) + message += " [SPAN_PLASMA("Plasma: [round(toxins, 0.01)] moles ([round(toxins / total_moles * 100, 0.01)] %)")]" + if(sleeping_agent && (milla_turf_details || sleeping_agent / total_moles > 0.01)) + message += " [SPAN_SLEEPING_AGENT("Nitrous Oxide: [round(sleeping_agent, 0.01)] moles ([round(sleeping_agent / total_moles * 100, 0.01)] %)")]" + if(agent_b && (milla_turf_details || agent_b / total_moles > 0.01)) + message += " [SPAN_AGENT_B("Agent B: [round(agent_b, 0.01)] moles ([round(agent_b / total_moles * 100, 0.01)] %)")]" + if(hydrogen && (milla_turf_details || hydrogen / total_moles > 0.01)) + message += " [SPAN_HYDROGEN("Hydrogen: [round(hydrogen, 0.01)] moles ([round(hydrogen / total_moles * 100, 0.01)] %)")]" + if(water_vapor && (milla_turf_details || (water_vapor / total_moles > 0.01))) + message += " [SPAN_WATER_VAPOR("Water Vapor: [round(water_vapor, 0.01)] moles ([round(water_vapor / total_moles * 100, 0.01)] %)")]" + message += SPAN_NOTICE("Temperature: [round(temperature-T0C)] °C ([round(temperature)] K)") + message += SPAN_NOTICE("Volume: [round(volume)] Liters") + message += SPAN_NOTICE("Pressure: [round(pressure, 0.1)] kPa") + message += SPAN_NOTICE("Heat Capacity: [DisplayJoules(heat_capacity)] / K") + message += SPAN_NOTICE("Thermal Energy: [DisplayJoules(thermal_energy)]") + else + message += SPAN_NOTICE("[target] is empty!") + message += SPAN_NOTICE("Volume: [round(volume)] Liters") // don't want to change the order volume appears in, suck it + + if(milla) + // Values from milla/src/lib.rs, +1 due to array indexing difference. + message += SPAN_NOTICE("Airtight N/E/S/W: [(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_NORTH) ? "yes" : "no"]/[(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_EAST) ? "yes" : "no"]/[(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_SOUTH) ? "yes" : "no"]/[(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_WEST) ? "yes" : "no"]") + switch(milla[MILLA_INDEX_ATMOS_MODE]) + // These are enum values, so they don't get increased. + if(0) + message += SPAN_NOTICE("Atmos Mode: Space") + if(1) + message += SPAN_NOTICE("Atmos Mode: Sealed") + if(2) + message += SPAN_NOTICE("Atmos Mode: Exposed to Environment (ID: [milla[MILLA_INDEX_ENVIRONMENT_ID]])") + else + message += SPAN_NOTICE("Atmos Mode: Unknown ([milla[MILLA_INDEX_ATMOS_MODE]]), contact a coder.") + message += SPAN_NOTICE("Superconductivity N/E/S/W: [milla[MILLA_INDEX_SUPERCONDUCTIVITY_NORTH]]/[milla[MILLA_INDEX_SUPERCONDUCTIVITY_EAST]]/[milla[MILLA_INDEX_SUPERCONDUCTIVITY_SOUTH]]/[milla[MILLA_INDEX_SUPERCONDUCTIVITY_WEST]]") + message += SPAN_NOTICE("Turf's Innate Heat Capacity: [milla[MILLA_INDEX_INNATE_HEAT_CAPACITY]]") + message += SPAN_NOTICE("Hotspot: [floor(milla[MILLA_INDEX_HOTSPOT_TEMPERATURE]-T0C)] °C ([floor(milla[MILLA_INDEX_HOTSPOT_TEMPERATURE])] K), [round(milla[MILLA_INDEX_HOTSPOT_VOLUME] * CELL_VOLUME, 1)] Liters ([milla[MILLA_INDEX_HOTSPOT_VOLUME]]x)") + message += SPAN_NOTICE("Wind: ([round(milla[MILLA_INDEX_WIND_X], 0.001)], [round(milla[MILLA_INDEX_WIND_Y], 0.001)])") + message += SPAN_NOTICE("Fuel burnt last tick: [milla[MILLA_INDEX_FUEL_BURNT]] moles") + + to_chat(user, chat_box_examine(message.Join("
"))) + return TRUE diff --git a/code/game/objects/items/devices/healthanalyzer.dm b/code/game/objects/items/devices/healthanalyzer.dm new file mode 100644 index 00000000000..01e5c33bf6c --- /dev/null +++ b/code/game/objects/items/devices/healthanalyzer.dm @@ -0,0 +1,373 @@ +#define SIMPLE_HEALTH_SCAN 0 +#define DETAILED_HEALTH_SCAN 1 + +/proc/get_chemscan_results(mob/living/user, mob/living/M) + var/msgs = list() + if(!ishuman(M)) + return + + var/hallucinating = HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) + + var/mob/living/carbon/human/H = M + var/has_real_or_fake_reagents = FALSE + if(length(H.reagents.reagent_list)) + has_real_or_fake_reagents = TRUE + msgs += SPAN_BOLDNOTICE("Subject contains the following reagents:") + for(var/datum/reagent/R in H.reagents.reagent_list) + var/volume = R.volume + var/overdosing = R.overdosed + + if(hallucinating) + if(prob(20)) + // make reagents look like they may exist in really crazy amounts, but also disappear + volume = max(rand(hallucinating - 10, hallucinating + 100), 0) + if(!volume) + continue + if(!overdosing) + overdosing = prob(10) + + msgs += "[volume]u of [R.name][overdosing ? " - [SPAN_BOLDANNOUNCEIC("OVERDOSING")]" : "."]" + + if(hallucinating && prob(10)) + has_real_or_fake_reagents = TRUE + if(!length(H.reagents.reagent_list)) + msgs += SPAN_BOLDNOTICE("Subject contains the following reagents:") + for(var/i in 1 to rand(1, 2)) + var/reagent_name = pick(GLOB.chemical_reagents_list) + msgs += "[rand(5, 100)]u of [GLOB.chemical_reagents_list[reagent_name]][prob(30) ? " - [SPAN_BOLDANNOUNCEIC("OVERDOSING")]" : "."]" + + if(!has_real_or_fake_reagents) + msgs += SPAN_NOTICE("Subject contains no reagents.") + + if(length(H.reagents.addiction_list)) + msgs += SPAN_DANGER("Subject is addicted to the following reagents:") + for(var/datum/reagent/R in H.reagents.addiction_list) + msgs += SPAN_DANGER("[R.name] Stage: [R.addiction_stage]/5") + + if(hallucinating && prob(10)) + if(!length(H.reagents.addiction_list)) + msgs += SPAN_DANGER("Subject is addicted to the following reagents:") + // try to add two random chems + for(var/i in 1 to rand(1, 2)) + var/reagent_name = pick(GLOB.chemical_reagents_list) + msgs += SPAN_DANGER("[GLOB.chemical_reagents_list[reagent_name]] Stage: [rand(1, 5)]/5") + + return msgs + +/proc/chemscan(mob/living/user, mob/living/M) + if(ishuman(M)) + var/list/results = get_chemscan_results(user, M) + to_chat(user, results.Join("
")) + +/obj/item/healthanalyzer + name = "health analyzer" + desc = "A hand-held body scanner able to distinguish vital signs of the subject." + icon = 'icons/obj/device.dmi' + icon_state = "health" + worn_icon_state = "healthanalyzer" + inhand_icon_state = "healthanalyzer" + belt_icon = "health_analyzer" + flags = CONDUCT | NOBLUDGEON + slot_flags = ITEM_SLOT_BELT + w_class = WEIGHT_CLASS_SMALL + throw_speed = 3 + materials = list(MAT_METAL=200) + origin_tech = "magnets=1;biotech=1" + /// Can be SIMPLE_HEALTH_SCAN (damage is only shown as a single % value), or DETAILED_HEALTH_SCAN (shows the % value and also damage for every specific limb). + var/mode = DETAILED_HEALTH_SCAN + /// Is the health analyzer upgraded? Allows reagents in the body to be seen. + var/advanced = FALSE + +/obj/item/healthanalyzer/examine(mob/user) + . = ..() + . += SPAN_NOTICE("Use [src] in hand to toggle showing localised damage.") + +/obj/item/healthanalyzer/attack_self__legacy__attackchain(mob/user) + mode = !mode + switch(mode) + if(DETAILED_HEALTH_SCAN) + to_chat(user, SPAN_NOTICE("The scanner is now showing localised limb damage.")) + if(SIMPLE_HEALTH_SCAN) + to_chat(user, SPAN_NOTICE("The scanner is no longer showing localised limb damage.")) + +/obj/item/healthanalyzer/attack__legacy__attackchain(mob/living/M, mob/living/user) + if((HAS_TRAIT(user, TRAIT_CLUMSY) || user.getBrainLoss() >= 60) && prob(50)) + var/list/msgs = list() + user.visible_message(SPAN_WARNING("[user] analyzes the floor's vitals!"), SPAN_NOTICE("You stupidly try to analyze the floor's vitals!")) + msgs += SPAN_NOTICE("Analyzing results for The floor:\nOverall status: Healthy") + msgs += SPAN_NOTICE("Key: Suffocation/Toxin/Burn/Brute") + msgs += SPAN_NOTICE("Damage specifics: 0 - 0 - 0 - 0") + msgs += SPAN_NOTICE("Body temperature: ???") + to_chat(user, chat_box_healthscan(msgs.Join("
"))) + return + + user.visible_message( + SPAN_NOTICE("[user] analyzes [M]'s vitals."), + SPAN_NOTICE("You analyze [M]'s vitals.") + ) + healthscan(user, M, mode, advanced) + add_fingerprint(user) + +// Used by the PDA medical scanner too. +/proc/healthscan(mob/user, mob/living/M, mode = DETAILED_HEALTH_SCAN, advanced = FALSE) + var/list/msgs = list() + + var/scanned_name = "[M]" + + var/probably_dead = (M.stat == DEAD) + + // show your own health, evil + if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) + M = user + + if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(10) && IS_HORIZONTAL(M)) + probably_dead = TRUE + + if(isanimal_or_basicmob(M)) + // No box here, keep it simple. + if(probably_dead) + to_chat(user, SPAN_NOTICE("Analyzing Results for [M]:\nOverall Status: Dead")) + return + + to_chat(user, "Analyzing Results for [M]:\nOverall Status: [round(M.health / M.maxHealth * 100, 0.1)]% Healthy") + to_chat(user, "\t Damage Specifics: [M.maxHealth - M.health]") + return + + // These sensors are designed for organic life. + if(!ishuman(M) || ismachineperson(M) || (HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5))) + msgs += SPAN_NOTICE("Analyzing Results for ERROR:\nOverall Status: ERROR") + msgs += "Key: [SPAN_HEALTHSCAN_OXY("Suffocation")]/Toxin/Burns/Brute" + msgs += "Damage Specifics: [SPAN_HEALTHSCAN_OXY("?")] - ? - ? - ?" + msgs += SPAN_NOTICE("Body Temperature: [M.bodytemperature-T0C]°C ([M.bodytemperature*1.8-459.67]°F)") + msgs += SPAN_WARNING("Warning: Blood Level ERROR: --% --cl.Type: ERROR") + msgs += SPAN_NOTICE("Subject's pulse: -- bpm.") + to_chat(user, chat_box_healthscan(msgs.Join("
"))) + return + + var/mob/living/carbon/human/H = M + var/fake_oxy = max(rand(1,40), H.getOxyLoss(), (300 - (H.getToxLoss() + H.getFireLoss() + H.getBruteLoss()))) + var/OX = H.getOxyLoss() + var/TX = H.getToxLoss() + var/BU = H.getFireLoss() + var/BR = H.getBruteLoss() + + // adjust health randomly if hallucinating + if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) + var/list/healths = list(OX, TX, BU, BR) + shuffle_inplace(healths) + OX = healths[1] + TX = healths[2] + BU = healths[3] + BR = healths[4] + + OX = OX > 50 ? "[OX]" : OX + TX = TX > 50 ? "[TX]" : TX + BU = BU > 50 ? "[BU]" : BU + BR = BR > 50 ? "[BR]" : BR + + var/status = "Dead" // Dead by default to make it simpler + var/DNR = !H.ghost_can_reenter() // If the ghost can't reenter + if(H.stat == DEAD) + if(DNR) + status = "Dead (DNR)" + else // Alive or unconscious + if(HAS_TRAIT(H, TRAIT_FAKEDEATH) || probably_dead) // status still shows as "Dead" + OX = fake_oxy > 50 ? "[fake_oxy]" : fake_oxy + else + status = "[H.health]% Healthy" + + msgs += "Analyzing Results for [scanned_name]:\nOverall Status: [status]" + msgs += "Key: [SPAN_HEALTHSCAN_OXY("Suffocation")]/Toxin/Burns/Brute" + msgs += "Damage Specifics: [SPAN_HEALTHSCAN_OXY("[OX]")] - [TX] - [BU] - [BR]" + + if(H.timeofdeath && (H.stat == DEAD || (HAS_TRAIT(H, TRAIT_FAKEDEATH)) || probably_dead)) + var/tod = probably_dead && (HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(10)) ? world.time - rand(10, 5000) : H.timeofdeath // Sure let's blow it out + msgs += SPAN_NOTICE("Time of Death: [station_time_timestamp("hh:mm:ss", tod)]") + var/tdelta = round(world.time - tod) + if(H.is_revivable() && !DNR) + msgs += SPAN_DANGER("Subject died [DisplayTimeText(tdelta)] ago, defibrillation may be possible!") + else + msgs += "Subject died [DisplayTimeText(tdelta)] ago. Defibrillation is not possible!" + + if(mode == DETAILED_HEALTH_SCAN) + var/list/damaged = H.get_damaged_organs(1,1) + if(length(damaged)) + msgs += SPAN_NOTICE("Localized Damage, Brute/Burn:") + for(var/obj/item/organ/external/org in damaged) + msgs += "[capitalize(org.name)]: [(org.brute_dam > 0) ? "[org.brute_dam]" : "0"]-[(org.burn_dam > 0) ? "[org.burn_dam]" : "0"]" + + if(advanced) + msgs.Add(get_chemscan_results(user, H)) + + for(var/thing in H.viruses) + var/datum/disease/D = thing + // If the disease is incubating, or if it's stealthy and hasn't been put into a pandemic yet the scanner won't see it + if(D.incubation || (D.visibility_flags & VIRUS_HIDDEN_SCANNER && !(D.GetDiseaseID() in GLOB.detected_advanced_diseases["[user.z]"]))) + continue + // Snowflaking heart problems, because they are special (and common). + if(istype(D, /datum/disease/critical)) + msgs += SPAN_NOTICE("Warning: Subject is undergoing [D.name].\nStage: [D.stage]/[D.max_stages].\nCure: [D.cure_text]") + continue + if(istype(D, /datum/disease/advance)) + var/datum/disease/advance/A = D + if(!(A.id in GLOB.known_advanced_diseases[num2text(user.z)])) + msgs += SPAN_NOTICE("Warning: Unknown viral strain detected\nStrain:[A.strain]\nStage: [A.stage]") + else + msgs += SPAN_NOTICE("Warning: [A.form] detected\nName: [A.name].\nStrain:[A.strain]\nType: [A.spread_text].\nStage: [A.stage]/[A.max_stages].\nPossible Cures: [A.cure_text]\nNeeded Cures: [A.cures_required]") + continue + msgs += SPAN_NOTICE("Warning: [D.form] detected\nName: [D.name].\nType: [D.spread_text].\nStage: [D.stage]/[D.max_stages].\nPossible Cure: [D.cure_text]") + + if(H.undergoing_cardiac_arrest()) + var/datum/organ/heart/heart = H.get_int_organ_datum(ORGAN_DATUM_HEART) + if(heart && !(heart.linked_organ.status & ORGAN_DEAD)) + msgs += "The patient's heart has stopped.\nPossible Cure: Electric Shock" + else if(heart && (heart.linked_organ.status & ORGAN_DEAD)) + msgs += "Subject's heart is necrotic." + else if(!heart) + msgs += "Subject has no heart." + + if(H.getStaminaLoss() || HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) + msgs += SPAN_NOTICE("Subject appears to be suffering from fatigue.") + + if(H.getCloneLoss() || (HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5))) + msgs += SPAN_WARNING("Subject appears to have [H.getCloneLoss() > 30 ? "severe" : "minor"] cellular damage.") + + // Brain. + var/obj/item/organ/internal/brain = H.get_int_organ(/obj/item/organ/internal/brain) + if(brain) + if(H.check_brain_threshold(BRAIN_DAMAGE_RATIO_CRITICAL)) // 100 + msgs += SPAN_WARNING("Subject is brain dead.") + else if(H.check_brain_threshold(BRAIN_DAMAGE_RATIO_MODERATE)) // 60 + msgs += SPAN_WARNING("Severe brain damage detected. Subject likely to have dementia.") + else if(H.check_brain_threshold(BRAIN_DAMAGE_RATIO_MINOR)) // 10 + msgs += SPAN_WARNING("Significant brain damage detected. Subject may have had a concussion.") + else + msgs += SPAN_WARNING("Subject has no brain.") + + // Broken bones, internal bleeding, infection, and critical burns. + var/broken_bone = FALSE + var/internal_bleed = FALSE + var/burn_wound = FALSE + for(var/name in H.bodyparts_by_name) + var/obj/item/organ/external/e = H.bodyparts_by_name[name] + if(!e) + continue + var/limb = e.name + if(e.status & ORGAN_BROKEN) + if((e.limb_name in list("l_arm", "r_arm", "l_hand", "r_hand", "l_leg", "r_leg", "l_foot", "r_foot")) && !(e.status & ORGAN_SPLINTED)) + msgs += SPAN_WARNING("Unsecured fracture in subject [limb]. Splinting recommended for transport.") + broken_bone = TRUE + if(e.has_infected_wound()) + msgs += SPAN_WARNING("Infected wound detected in subject [limb]. Disinfection recommended.") + burn_wound = burn_wound || (e.status & ORGAN_BURNT) + internal_bleed = internal_bleed || (e.status & ORGAN_INT_BLEEDING) + if(broken_bone) + msgs += SPAN_WARNING("Bone fractures detected. Advanced scanner required for location.") + if(internal_bleed) + msgs += SPAN_WARNING("Internal bleeding detected. Advanced scanner required for location.") + if(burn_wound) + msgs += SPAN_WARNING("Critical burn detected. Examine patient's body for location.") + + if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) + var/list/spooky_conditions = list( + SPAN_DEAD("Patient appears to be infested."), + SPAN_DEAD("Patient's bones are hollow."), + SPAN_DEAD("Patient has limited attachment to this physical plane."), + SPAN_USERDANGER("Patient is aggressive. Immediate sedation recommended."), + SPAN_WARNING("Patient's vitamin D levels are dangerously low."), + SPAN_WARNING("Patient's spider levels are dangerously low."), + SPAN_DEAD("Subject is ready for experimentation."), + ) + msgs += pick(spooky_conditions) + + if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5) && (H.stat == DEAD || (HAS_TRAIT(H, TRAIT_FAKEDEATH)))) + addtimer(CALLBACK(GLOBAL_PROC, GLOBAL_PROC_REF(to_chat), user, SPAN_DANGER("[H]'s head snaps to look at you.")), rand(1 SECONDS, 3 SECONDS)) + + // Blood. + var/blood_id = H.get_blood_id() + if(blood_id) + if(H.bleed_rate) + msgs += SPAN_DANGER("Subject is bleeding!") + var/blood_percent = round((H.blood_volume / BLOOD_VOLUME_NORMAL)*100) + var/blood_type = H.dna.blood_type + var/blood_volume = round(H.blood_volume) + if(blood_id != "blood")//special blood substance + var/datum/reagent/R = GLOB.chemical_reagents_list[blood_id] + if(R) + blood_type = R.name + else + blood_type = blood_id + if(H.blood_volume <= BLOOD_VOLUME_SAFE && H.blood_volume > BLOOD_VOLUME_OKAY) + msgs += SPAN_DANGER("LOW blood level [blood_percent] %, [blood_volume] cl, type: [blood_type]") + else if(H.blood_volume <= BLOOD_VOLUME_OKAY) + msgs += SPAN_DANGER("CRITICAL blood level [blood_percent] %, [blood_volume] cl, type: [blood_type]") + else + msgs += SPAN_NOTICE("Blood level [blood_percent] %, [blood_volume] cl, type: [blood_type]") + + msgs += SPAN_NOTICE("Body Temperature: [round(H.bodytemperature-T0C, 0.01)]°C ([round(H.bodytemperature*1.8-459.67, 0.01)]°F)") + msgs += SPAN_NOTICE("Subject's pulse: [H.get_pulse()] bpm.") + + var/implant_detect + for(var/obj/item/organ/internal/O in H.internal_organs) + if(O.is_robotic() && !O.stealth_level) + implant_detect += "[O.name].
" + if(implant_detect) + msgs += SPAN_NOTICE("Detected cybernetic modifications:") + msgs += SPAN_NOTICE("[implant_detect]") + + // Do you have too many genetics superpowers? + if(H.gene_stability < 40) + msgs += SPAN_USERDANGER("Subject's genes are quickly breaking down!") + else if(H.gene_stability < 70) + msgs += SPAN_DANGER("Subject's genes are showing signs of spontaneous breakdown.") + else if(H.gene_stability < 85) + msgs += SPAN_WARNING("Subject's genes are showing minor signs of instability.") + + if(HAS_TRAIT(H, TRAIT_HUSK)) + msgs += SPAN_DANGER("Subject is husked. Application of synthflesh is recommended.") + + if(H.radiation > RAD_MOB_SAFE) + msgs += SPAN_DANGER("Subject is irradiated.") + + msgs += SPAN_NOTICE("Biological Age: [H.age]") + + to_chat(user, chat_box_healthscan(msgs.Join("
"))) + +/obj/item/healthanalyzer/attackby__legacy__attackchain(obj/item/I, mob/user, params) + if(!istype(I, /obj/item/healthupgrade)) + return ..() + + if(advanced) + to_chat(user, SPAN_NOTICE("An upgrade is already installed on [src].")) + return + + if(!user.unequip(I)) + to_chat(user, SPAN_WARNING("[src] is stuck to your hand!")) + return + + to_chat(user, SPAN_NOTICE("You install the upgrade on [src].")) + add_overlay("advanced") + playsound(loc, I.usesound, 50, TRUE) + advanced = TRUE + qdel(I) + +/obj/item/healthanalyzer/advanced + name = "advanced health analyzer" + advanced = TRUE + +/obj/item/healthanalyzer/advanced/Initialize(mapload) + . = ..() + add_overlay("advanced") + + +/obj/item/healthupgrade + name = "Health Analyzer Upgrade" + desc = "An upgrade unit that can be installed on a health analyzer for expanded functionality." + icon = 'icons/obj/device.dmi' + icon_state = "healthupgrade" + w_class = WEIGHT_CLASS_TINY + origin_tech = "magnets=2;biotech=2" + usesound = 'sound/items/deconstruct.ogg' + +#undef SIMPLE_HEALTH_SCAN +#undef DETAILED_HEALTH_SCAN diff --git a/code/game/objects/items/devices/machineanalyzer.dm b/code/game/objects/items/devices/machineanalyzer.dm new file mode 100644 index 00000000000..9f19c97f939 --- /dev/null +++ b/code/game/objects/items/devices/machineanalyzer.dm @@ -0,0 +1,143 @@ +/obj/item/robotanalyzer + name = "machine analyzer" + desc = "A hand-held scanner able to diagnose robotic injuries and the condition of machinery." + icon = 'icons/obj/device.dmi' + icon_state = "robotanalyzer" + inhand_icon_state = "analyzer" + flags = CONDUCT + slot_flags = ITEM_SLOT_BELT + w_class = WEIGHT_CLASS_SMALL + throw_speed = 5 + throw_range = 10 + origin_tech = "magnets=1;biotech=1" + +/obj/item/robotanalyzer/proc/handle_clumsy(mob/living/user) + var/list/msgs = list() + user.visible_message(SPAN_WARNING("[user] has analyzed the floor's components!"), SPAN_WARNING("You try to analyze the floor's vitals!")) + msgs += SPAN_NOTICE("Analyzing Results for The floor:\n\t Overall Status: Unknown") + msgs += SPAN_NOTICE("\t Damage Specifics: [0]/[0]") + msgs += SPAN_NOTICE("Key: Burns/Brute") + msgs += SPAN_NOTICE("Chassis Temperature: ???") + to_chat(user, chat_box_healthscan(msgs.Join("
"))) + +/obj/item/robotanalyzer/attack_obj__legacy__attackchain(obj/machinery/M, mob/living/user) // Scanning a machine object + if(!ismachinery(M)) + return + if((HAS_TRAIT(user, TRAIT_CLUMSY) || user.getBrainLoss() >= 60) && prob(50)) + handle_clumsy(user) + return + user.visible_message(SPAN_NOTICE("[user] has analyzed [M]'s components with [src]."), SPAN_NOTICE("You analyze [M]'s components with [src].")) + machine_scan(user, M) + add_fingerprint(user) + +/obj/item/robotanalyzer/proc/machine_scan(mob/user, obj/machinery/M) + if(M.obj_integrity == M.max_integrity) + to_chat(user, SPAN_NOTICE("[M] is at full integrity.")) + return + to_chat(user, SPAN_NOTICE("Structural damage detected! [M]'s overall estimated integrity is [round((M.obj_integrity / M.max_integrity) * 100)]%.")) + if(M.stat & BROKEN) // Displays alongside above message. Machines with a "broken" state do not become broken at 0% HP - anything that reaches that point is destroyed + to_chat(user, SPAN_WARNING("Further analysis: Catastrophic component failure detected! [M] requires reconstruction to fully repair.")) + +/obj/item/robotanalyzer/attack__legacy__attackchain(mob/living/M, mob/living/user) // Scanning borgs, IPCs/augmented crew, and AIs + if((HAS_TRAIT(user, TRAIT_CLUMSY) || user.getBrainLoss() >= 60) && prob(50)) + handle_clumsy(user) + return + user.visible_message(SPAN_NOTICE("[user] has analyzed [M]'s components with [src]."), SPAN_NOTICE("You analyze [M]'s components with [src].")) + robot_healthscan(user, M) + add_fingerprint(user) + +/proc/robot_healthscan(mob/user, mob/living/M) + var/scan_type + var/list/msgs = list() + if(isrobot(M)) + scan_type = "robot" + else if(ishuman(M)) + scan_type = "prosthetics" + else if(is_ai(M)) + scan_type = "ai" + else + to_chat(user, SPAN_WARNING("You can't analyze non-robotic things!")) + return + + switch(scan_type) + if("robot") + var/burn = M.getFireLoss() > 50 ? "[M.getFireLoss()]" : M.getFireLoss() + var/brute = M.getBruteLoss() > 50 ? "[M.getBruteLoss()]" : M.getBruteLoss() + msgs += SPAN_NOTICE("Analyzing Results for [M]:\n\t Overall Status: [M.stat == DEAD ? "fully disabled" : "[M.health]% functional"]") + msgs += "\t Key: Electronics/Brute" + msgs += "\t Damage Specifics: [burn] - [brute]" + if(M.timeofdeath && M.stat == DEAD) + msgs += SPAN_NOTICE("Time of disable: [station_time_timestamp("hh:mm:ss", M.timeofdeath)]") + var/mob/living/silicon/robot/H = M + var/list/damaged = H.get_damaged_components(TRUE, TRUE, TRUE) // Get all except the missing ones + var/list/missing = H.get_missing_components() + msgs += SPAN_NOTICE("Localized Damage:") + if(!LAZYLEN(damaged) && !LAZYLEN(missing)) + msgs += SPAN_NOTICE("\t Components are OK.") + else + if(LAZYLEN(damaged)) + for(var/datum/robot_component/org in damaged) + msgs += text("\t []: [][] - [] - [] - []", \ + capitalize(org.name), \ + (org.is_destroyed()) ? "DESTROYED " :"",\ + (org.electronics_damage > 0) ? "[org.electronics_damage]" :0, \ + (org.brute_damage > 0) ? "[org.brute_damage]" :0, \ + (org.toggled) ? "Toggled ON" : "Toggled OFF",\ + (org.powered) ? "Power ON" : "Power OFF") + if(LAZYLEN(missing)) + for(var/datum/robot_component/org in missing) + msgs += SPAN_WARNING("\t [capitalize(org.name)]: MISSING") + + if(H.emagged && prob(5)) + msgs += SPAN_WARNING("\t ERROR: INTERNAL SYSTEMS COMPROMISED") + + if("prosthetics") + var/mob/living/carbon/human/H = M + var/is_ipc = ismachineperson(H) + msgs += "Analyzing Results for [M]: [is_ipc ? "\n\t Overall Status: [H.stat == DEAD ? "fully disabled" : "[H.health]% functional"]
" : "
"]" //for the record im sorry + msgs += "\t Key: Electronics/Brute" + msgs += SPAN_NOTICE("External prosthetics:") + var/organ_found + if(LAZYLEN(H.internal_organs)) + for(var/obj/item/organ/external/E in H.bodyparts) + if(!E.is_robotic() || (is_ipc && (E.get_damage() == 0))) //Non-IPCs have their cybernetics show up in the scan, even if undamaged + continue + organ_found = TRUE + msgs += "[E.name]: [E.brute_dam] [E.burn_dam]" + if(!organ_found) + msgs += SPAN_WARNING("No prosthetics located.") + msgs += "
" + msgs += SPAN_NOTICE("Internal prosthetics:") + organ_found = null + if(LAZYLEN(H.internal_organs)) + for(var/obj/item/organ/internal/O in H.internal_organs) + if(!O.is_robotic() || istype(O, /obj/item/organ/internal/cyberimp) || O.stealth_level > 1) + continue + organ_found = TRUE + msgs += "[capitalize(O.name)]: [O.status & ORGAN_DEAD ? "CRITICAL FAILURE" : O.damage]" + if(!organ_found) + msgs += SPAN_WARNING("No prosthetics located.") + msgs += "
" + msgs += SPAN_NOTICE("Cybernetic implants:") + organ_found = null + if(LAZYLEN(H.internal_organs)) + for(var/obj/item/organ/internal/cyberimp/I in H.internal_organs) + if(I.stealth_level > 1) + continue + organ_found = TRUE + msgs += "[capitalize(I.name)]: [(I.crit_fail || I.status & ORGAN_DEAD) ? "CRITICAL FAILURE" : I.damage]" + if(!organ_found) + msgs += SPAN_WARNING("No implants located.") + msgs += "
" + if(is_ipc) + msgs.Add(get_chemscan_results(user, H)) + msgs += SPAN_NOTICE("Subject temperature: [round(H.bodytemperature-T0C, 0.01)]°C ([round(H.bodytemperature*1.8-459.67, 0.01)]°F)") + if("ai") + var/mob/living/silicon/ai/A = M + var/burn = A.getFireLoss() > 50 ? "[A.getFireLoss()]" : A.getFireLoss() + var/brute = A.getBruteLoss() > 50 ? "[A.getBruteLoss()]" : A.getBruteLoss() + msgs += SPAN_NOTICE("Analyzing Results for [M]:\n\t Overall Status: [A.stat == DEAD ? "fully disabled" : "[A.health]% functional"]") + msgs += "\t Key: Electronics/Brute" + msgs += "\t Damage Specifics: [burn] - [brute]" + + to_chat(user, chat_box_healthscan(msgs.Join("
"))) diff --git a/code/game/objects/items/devices/scanners.dm b/code/game/objects/items/devices/scanners.dm index 503502c7d0b..ff1542fbf40 100644 --- a/code/game/objects/items/devices/scanners.dm +++ b/code/game/objects/items/devices/scanners.dm @@ -1,11 +1,7 @@ /* CONTAINS: T-RAY SCANNER -HEALTH ANALYZER -MACHINE ANALYZER -GAS ANALYZER REAGENT SCANNERS -BODY SCANNERS SLIME SCANNER */ @@ -71,790 +67,6 @@ SLIME SCANNER if(length(t_ray_images)) flick_overlay(t_ray_images, list(viewer.client), flick_time) -//////////////////////////////////////// -// MARK: Health analyzer -//////////////////////////////////////// -#define SIMPLE_HEALTH_SCAN 0 -#define DETAILED_HEALTH_SCAN 1 - -/proc/get_chemscan_results(mob/living/user, mob/living/M) - var/msgs = list() - if(!ishuman(M)) - return - - var/hallucinating = HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) - - var/mob/living/carbon/human/H = M - var/has_real_or_fake_reagents = FALSE - if(length(H.reagents.reagent_list)) - has_real_or_fake_reagents = TRUE - msgs += SPAN_BOLDNOTICE("Subject contains the following reagents:") - for(var/datum/reagent/R in H.reagents.reagent_list) - var/volume = R.volume - var/overdosing = R.overdosed - - if(hallucinating) - if(prob(20)) - // make reagents look like they may exist in really crazy amounts, but also disappear - volume = max(rand(hallucinating - 10, hallucinating + 100), 0) - if(!volume) - continue - if(!overdosing) - overdosing = prob(10) - - msgs += "[volume]u of [R.name][overdosing ? " - [SPAN_BOLDANNOUNCEIC("OVERDOSING")]" : "."]" - - if(hallucinating && prob(10)) - has_real_or_fake_reagents = TRUE - if(!length(H.reagents.reagent_list)) - msgs += SPAN_BOLDNOTICE("Subject contains the following reagents:") - for(var/i in 1 to rand(1, 2)) - var/reagent_name = pick(GLOB.chemical_reagents_list) - msgs += "[rand(5, 100)]u of [GLOB.chemical_reagents_list[reagent_name]][prob(30) ? " - [SPAN_BOLDANNOUNCEIC("OVERDOSING")]" : "."]" - - if(!has_real_or_fake_reagents) - msgs += SPAN_NOTICE("Subject contains no reagents.") - - if(length(H.reagents.addiction_list)) - msgs += SPAN_DANGER("Subject is addicted to the following reagents:") - for(var/datum/reagent/R in H.reagents.addiction_list) - msgs += SPAN_DANGER("[R.name] Stage: [R.addiction_stage]/5") - - if(hallucinating && prob(10)) - if(!length(H.reagents.addiction_list)) - msgs += SPAN_DANGER("Subject is addicted to the following reagents:") - // try to add two random chems - for(var/i in 1 to rand(1, 2)) - var/reagent_name = pick(GLOB.chemical_reagents_list) - msgs += SPAN_DANGER("[GLOB.chemical_reagents_list[reagent_name]] Stage: [rand(1, 5)]/5") - - return msgs - -/proc/chemscan(mob/living/user, mob/living/M) - if(ishuman(M)) - var/list/results = get_chemscan_results(user, M) - to_chat(user, results.Join("
")) - -/obj/item/healthanalyzer - name = "health analyzer" - desc = "A hand-held body scanner able to distinguish vital signs of the subject." - icon = 'icons/obj/device.dmi' - icon_state = "health" - worn_icon_state = "healthanalyzer" - inhand_icon_state = "healthanalyzer" - belt_icon = "health_analyzer" - flags = CONDUCT | NOBLUDGEON - slot_flags = ITEM_SLOT_BELT - w_class = WEIGHT_CLASS_SMALL - throw_speed = 3 - materials = list(MAT_METAL=200) - origin_tech = "magnets=1;biotech=1" - /// Can be SIMPLE_HEALTH_SCAN (damage is only shown as a single % value), or DETAILED_HEALTH_SCAN (shows the % value and also damage for every specific limb). - var/mode = DETAILED_HEALTH_SCAN - /// Is the health analyzer upgraded? Allows reagents in the body to be seen. - var/advanced = FALSE - -/obj/item/healthanalyzer/examine(mob/user) - . = ..() - . += SPAN_NOTICE("Use [src] in hand to toggle showing localised damage.") - -/obj/item/healthanalyzer/attack_self__legacy__attackchain(mob/user) - mode = !mode - switch(mode) - if(DETAILED_HEALTH_SCAN) - to_chat(user, SPAN_NOTICE("The scanner is now showing localised limb damage.")) - if(SIMPLE_HEALTH_SCAN) - to_chat(user, SPAN_NOTICE("The scanner is no longer showing localised limb damage.")) - -/obj/item/healthanalyzer/attack__legacy__attackchain(mob/living/M, mob/living/user) - if((HAS_TRAIT(user, TRAIT_CLUMSY) || user.getBrainLoss() >= 60) && prob(50)) - var/list/msgs = list() - user.visible_message(SPAN_WARNING("[user] analyzes the floor's vitals!"), SPAN_NOTICE("You stupidly try to analyze the floor's vitals!")) - msgs += SPAN_NOTICE("Analyzing results for The floor:\nOverall status: Healthy") - msgs += SPAN_NOTICE("Key: Suffocation/Toxin/Burn/Brute") - msgs += SPAN_NOTICE("Damage specifics: 0 - 0 - 0 - 0") - msgs += SPAN_NOTICE("Body temperature: ???") - to_chat(user, chat_box_healthscan(msgs.Join("
"))) - return - - user.visible_message( - SPAN_NOTICE("[user] analyzes [M]'s vitals."), - SPAN_NOTICE("You analyze [M]'s vitals.") - ) - healthscan(user, M, mode, advanced) - add_fingerprint(user) - -// Used by the PDA medical scanner too. -/proc/healthscan(mob/user, mob/living/M, mode = DETAILED_HEALTH_SCAN, advanced = FALSE) - var/list/msgs = list() - - var/scanned_name = "[M]" - - var/probably_dead = (M.stat == DEAD) - - // show your own health, evil - if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) - M = user - - if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(10) && IS_HORIZONTAL(M)) - probably_dead = TRUE - - if(isanimal_or_basicmob(M)) - // No box here, keep it simple. - if(probably_dead) - to_chat(user, SPAN_NOTICE("Analyzing Results for [M]:\nOverall Status: Dead")) - return - - to_chat(user, "Analyzing Results for [M]:\nOverall Status: [round(M.health / M.maxHealth * 100, 0.1)]% Healthy") - to_chat(user, "\t Damage Specifics: [M.maxHealth - M.health]") - return - - // These sensors are designed for organic life. - if(!ishuman(M) || ismachineperson(M) || (HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5))) - msgs += SPAN_NOTICE("Analyzing Results for ERROR:\nOverall Status: ERROR") - msgs += "Key: [SPAN_HEALTHSCAN_OXY("Suffocation")]/Toxin/Burns/Brute" - msgs += "Damage Specifics: [SPAN_HEALTHSCAN_OXY("?")] - ? - ? - ?" - msgs += SPAN_NOTICE("Body Temperature: [M.bodytemperature-T0C]°C ([M.bodytemperature*1.8-459.67]°F)") - msgs += SPAN_WARNING("Warning: Blood Level ERROR: --% --cl.Type: ERROR") - msgs += SPAN_NOTICE("Subject's pulse: -- bpm.") - to_chat(user, chat_box_healthscan(msgs.Join("
"))) - return - - var/mob/living/carbon/human/H = M - var/fake_oxy = max(rand(1,40), H.getOxyLoss(), (300 - (H.getToxLoss() + H.getFireLoss() + H.getBruteLoss()))) - var/OX = H.getOxyLoss() - var/TX = H.getToxLoss() - var/BU = H.getFireLoss() - var/BR = H.getBruteLoss() - - // adjust health randomly if hallucinating - if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) - var/list/healths = list(OX, TX, BU, BR) - shuffle_inplace(healths) - OX = healths[1] - TX = healths[2] - BU = healths[3] - BR = healths[4] - - OX = OX > 50 ? "[OX]" : OX - TX = TX > 50 ? "[TX]" : TX - BU = BU > 50 ? "[BU]" : BU - BR = BR > 50 ? "[BR]" : BR - - var/status = "Dead" // Dead by default to make it simpler - var/DNR = !H.ghost_can_reenter() // If the ghost can't reenter - if(H.stat == DEAD) - if(DNR) - status = "Dead (DNR)" - else // Alive or unconscious - if(HAS_TRAIT(H, TRAIT_FAKEDEATH) || probably_dead) // status still shows as "Dead" - OX = fake_oxy > 50 ? "[fake_oxy]" : fake_oxy - else - status = "[H.health]% Healthy" - - msgs += "Analyzing Results for [scanned_name]:\nOverall Status: [status]" - msgs += "Key: [SPAN_HEALTHSCAN_OXY("Suffocation")]/Toxin/Burns/Brute" - msgs += "Damage Specifics: [SPAN_HEALTHSCAN_OXY("[OX]")] - [TX] - [BU] - [BR]" - - if(H.timeofdeath && (H.stat == DEAD || (HAS_TRAIT(H, TRAIT_FAKEDEATH)) || probably_dead)) - var/tod = probably_dead && (HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(10)) ? world.time - rand(10, 5000) : H.timeofdeath // Sure let's blow it out - msgs += SPAN_NOTICE("Time of Death: [station_time_timestamp("hh:mm:ss", tod)]") - var/tdelta = round(world.time - tod) - if(H.is_revivable() && !DNR) - msgs += SPAN_DANGER("Subject died [DisplayTimeText(tdelta)] ago, defibrillation may be possible!") - else - msgs += "Subject died [DisplayTimeText(tdelta)] ago. Defibrillation is not possible!" - - if(mode == DETAILED_HEALTH_SCAN) - var/list/damaged = H.get_damaged_organs(1,1) - if(length(damaged)) - msgs += SPAN_NOTICE("Localized Damage, Brute/Burn:") - for(var/obj/item/organ/external/org in damaged) - msgs += "[capitalize(org.name)]: [(org.brute_dam > 0) ? "[org.brute_dam]" : "0"]-[(org.burn_dam > 0) ? "[org.burn_dam]" : "0"]" - - if(advanced) - msgs.Add(get_chemscan_results(user, H)) - - for(var/thing in H.viruses) - var/datum/disease/D = thing - // If the disease is incubating, or if it's stealthy and hasn't been put into a pandemic yet the scanner won't see it - if(D.incubation || (D.visibility_flags & VIRUS_HIDDEN_SCANNER && !(D.GetDiseaseID() in GLOB.detected_advanced_diseases["[user.z]"]))) - continue - // Snowflaking heart problems, because they are special (and common). - if(istype(D, /datum/disease/critical)) - msgs += SPAN_NOTICE("Warning: Subject is undergoing [D.name].\nStage: [D.stage]/[D.max_stages].\nCure: [D.cure_text]") - continue - if(istype(D, /datum/disease/advance)) - var/datum/disease/advance/A = D - if(!(A.id in GLOB.known_advanced_diseases[num2text(user.z)])) - msgs += SPAN_NOTICE("Warning: Unknown viral strain detected\nStrain:[A.strain]\nStage: [A.stage]") - else - msgs += SPAN_NOTICE("Warning: [A.form] detected\nName: [A.name].\nStrain:[A.strain]\nType: [A.spread_text].\nStage: [A.stage]/[A.max_stages].\nPossible Cures: [A.cure_text]\nNeeded Cures: [A.cures_required]") - continue - msgs += SPAN_NOTICE("Warning: [D.form] detected\nName: [D.name].\nType: [D.spread_text].\nStage: [D.stage]/[D.max_stages].\nPossible Cure: [D.cure_text]") - - if(H.undergoing_cardiac_arrest()) - var/datum/organ/heart/heart = H.get_int_organ_datum(ORGAN_DATUM_HEART) - if(heart && !(heart.linked_organ.status & ORGAN_DEAD)) - msgs += "The patient's heart has stopped.\nPossible Cure: Electric Shock" - else if(heart && (heart.linked_organ.status & ORGAN_DEAD)) - msgs += "Subject's heart is necrotic." - else if(!heart) - msgs += "Subject has no heart." - - if(H.getStaminaLoss() || HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) - msgs += SPAN_NOTICE("Subject appears to be suffering from fatigue.") - - if(H.getCloneLoss() || (HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5))) - msgs += SPAN_WARNING("Subject appears to have [H.getCloneLoss() > 30 ? "severe" : "minor"] cellular damage.") - - // Brain. - var/obj/item/organ/internal/brain = H.get_int_organ(/obj/item/organ/internal/brain) - if(brain) - if(H.check_brain_threshold(BRAIN_DAMAGE_RATIO_CRITICAL)) // 100 - msgs += SPAN_WARNING("Subject is brain dead.") - else if(H.check_brain_threshold(BRAIN_DAMAGE_RATIO_MODERATE)) // 60 - msgs += SPAN_WARNING("Severe brain damage detected. Subject likely to have dementia.") - else if(H.check_brain_threshold(BRAIN_DAMAGE_RATIO_MINOR)) // 10 - msgs += SPAN_WARNING("Significant brain damage detected. Subject may have had a concussion.") - else - msgs += SPAN_WARNING("Subject has no brain.") - - // Broken bones, internal bleeding, infection, and critical burns. - var/broken_bone = FALSE - var/internal_bleed = FALSE - var/burn_wound = FALSE - for(var/name in H.bodyparts_by_name) - var/obj/item/organ/external/e = H.bodyparts_by_name[name] - if(!e) - continue - var/limb = e.name - if(e.status & ORGAN_BROKEN) - if((e.limb_name in list("l_arm", "r_arm", "l_hand", "r_hand", "l_leg", "r_leg", "l_foot", "r_foot")) && !(e.status & ORGAN_SPLINTED)) - msgs += SPAN_WARNING("Unsecured fracture in subject [limb]. Splinting recommended for transport.") - broken_bone = TRUE - if(e.has_infected_wound()) - msgs += SPAN_WARNING("Infected wound detected in subject [limb]. Disinfection recommended.") - burn_wound = burn_wound || (e.status & ORGAN_BURNT) - internal_bleed = internal_bleed || (e.status & ORGAN_INT_BLEEDING) - if(broken_bone) - msgs += SPAN_WARNING("Bone fractures detected. Advanced scanner required for location.") - if(internal_bleed) - msgs += SPAN_WARNING("Internal bleeding detected. Advanced scanner required for location.") - if(burn_wound) - msgs += SPAN_WARNING("Critical burn detected. Examine patient's body for location.") - - if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5)) - var/list/spooky_conditions = list( - SPAN_DEAD("Patient appears to be infested."), - SPAN_DEAD("Patient's bones are hollow."), - SPAN_DEAD("Patient has limited attachment to this physical plane."), - SPAN_USERDANGER("Patient is aggressive. Immediate sedation recommended."), - SPAN_WARNING("Patient's vitamin D levels are dangerously low."), - SPAN_WARNING("Patient's spider levels are dangerously low."), - SPAN_DEAD("Subject is ready for experimentation."), - ) - msgs += pick(spooky_conditions) - - if(HAS_TRAIT(user, TRAIT_MED_MACHINE_HALLUCINATING) && prob(5) && (H.stat == DEAD || (HAS_TRAIT(H, TRAIT_FAKEDEATH)))) - addtimer(CALLBACK(GLOBAL_PROC, GLOBAL_PROC_REF(to_chat), user, SPAN_DANGER("[H]'s head snaps to look at you.")), rand(1 SECONDS, 3 SECONDS)) - - // Blood. - var/blood_id = H.get_blood_id() - if(blood_id) - if(H.bleed_rate) - msgs += SPAN_DANGER("Subject is bleeding!") - var/blood_percent = round((H.blood_volume / BLOOD_VOLUME_NORMAL)*100) - var/blood_type = H.dna.blood_type - var/blood_volume = round(H.blood_volume) - if(blood_id != "blood")//special blood substance - var/datum/reagent/R = GLOB.chemical_reagents_list[blood_id] - if(R) - blood_type = R.name - else - blood_type = blood_id - if(H.blood_volume <= BLOOD_VOLUME_SAFE && H.blood_volume > BLOOD_VOLUME_OKAY) - msgs += SPAN_DANGER("LOW blood level [blood_percent] %, [blood_volume] cl, type: [blood_type]") - else if(H.blood_volume <= BLOOD_VOLUME_OKAY) - msgs += SPAN_DANGER("CRITICAL blood level [blood_percent] %, [blood_volume] cl, type: [blood_type]") - else - msgs += SPAN_NOTICE("Blood level [blood_percent] %, [blood_volume] cl, type: [blood_type]") - - msgs += SPAN_NOTICE("Body Temperature: [round(H.bodytemperature-T0C, 0.01)]°C ([round(H.bodytemperature*1.8-459.67, 0.01)]°F)") - msgs += SPAN_NOTICE("Subject's pulse: [H.get_pulse()] bpm.") - - var/implant_detect - for(var/obj/item/organ/internal/O in H.internal_organs) - if(O.is_robotic() && !O.stealth_level) - implant_detect += "[O.name].
" - if(implant_detect) - msgs += SPAN_NOTICE("Detected cybernetic modifications:") - msgs += SPAN_NOTICE("[implant_detect]") - - // Do you have too many genetics superpowers? - if(H.gene_stability < 40) - msgs += SPAN_USERDANGER("Subject's genes are quickly breaking down!") - else if(H.gene_stability < 70) - msgs += SPAN_DANGER("Subject's genes are showing signs of spontaneous breakdown.") - else if(H.gene_stability < 85) - msgs += SPAN_WARNING("Subject's genes are showing minor signs of instability.") - - if(HAS_TRAIT(H, TRAIT_HUSK)) - msgs += SPAN_DANGER("Subject is husked. Application of synthflesh is recommended.") - - if(H.radiation > RAD_MOB_SAFE) - msgs += SPAN_DANGER("Subject is irradiated.") - - msgs += SPAN_NOTICE("Biological Age: [H.age]") - - to_chat(user, chat_box_healthscan(msgs.Join("
"))) - -/obj/item/healthanalyzer/attackby__legacy__attackchain(obj/item/I, mob/user, params) - if(!istype(I, /obj/item/healthupgrade)) - return ..() - - if(advanced) - to_chat(user, SPAN_NOTICE("An upgrade is already installed on [src].")) - return - - if(!user.unequip(I)) - to_chat(user, SPAN_WARNING("[src] is stuck to your hand!")) - return - - to_chat(user, SPAN_NOTICE("You install the upgrade on [src].")) - add_overlay("advanced") - playsound(loc, I.usesound, 50, TRUE) - advanced = TRUE - qdel(I) - -/obj/item/healthanalyzer/advanced - name = "advanced health analyzer" - advanced = TRUE - -/obj/item/healthanalyzer/advanced/Initialize(mapload) - . = ..() - add_overlay("advanced") - - -/obj/item/healthupgrade - name = "Health Analyzer Upgrade" - desc = "An upgrade unit that can be installed on a health analyzer for expanded functionality." - icon = 'icons/obj/device.dmi' - icon_state = "healthupgrade" - w_class = WEIGHT_CLASS_TINY - origin_tech = "magnets=2;biotech=2" - usesound = 'sound/items/deconstruct.ogg' - -#undef SIMPLE_HEALTH_SCAN -#undef DETAILED_HEALTH_SCAN - -//////////////////////////////////////// -// MARK: Machine analyzer -//////////////////////////////////////// -/obj/item/robotanalyzer - name = "machine analyzer" - desc = "A hand-held scanner able to diagnose robotic injuries and the condition of machinery." - icon = 'icons/obj/device.dmi' - icon_state = "robotanalyzer" - inhand_icon_state = "analyzer" - flags = CONDUCT - slot_flags = ITEM_SLOT_BELT - w_class = WEIGHT_CLASS_SMALL - throw_speed = 5 - throw_range = 10 - origin_tech = "magnets=1;biotech=1" - -/obj/item/robotanalyzer/proc/handle_clumsy(mob/living/user) - var/list/msgs = list() - user.visible_message(SPAN_WARNING("[user] has analyzed the floor's components!"), SPAN_WARNING("You try to analyze the floor's vitals!")) - msgs += SPAN_NOTICE("Analyzing Results for The floor:\n\t Overall Status: Unknown") - msgs += SPAN_NOTICE("\t Damage Specifics: [0]/[0]") - msgs += SPAN_NOTICE("Key: Burns/Brute") - msgs += SPAN_NOTICE("Chassis Temperature: ???") - to_chat(user, chat_box_healthscan(msgs.Join("
"))) - -/obj/item/robotanalyzer/attack_obj__legacy__attackchain(obj/machinery/M, mob/living/user) // Scanning a machine object - if(!ismachinery(M)) - return - if((HAS_TRAIT(user, TRAIT_CLUMSY) || user.getBrainLoss() >= 60) && prob(50)) - handle_clumsy(user) - return - user.visible_message(SPAN_NOTICE("[user] has analyzed [M]'s components with [src]."), SPAN_NOTICE("You analyze [M]'s components with [src].")) - machine_scan(user, M) - add_fingerprint(user) - -/obj/item/robotanalyzer/proc/machine_scan(mob/user, obj/machinery/M) - if(M.obj_integrity == M.max_integrity) - to_chat(user, SPAN_NOTICE("[M] is at full integrity.")) - return - to_chat(user, SPAN_NOTICE("Structural damage detected! [M]'s overall estimated integrity is [round((M.obj_integrity / M.max_integrity) * 100)]%.")) - if(M.stat & BROKEN) // Displays alongside above message. Machines with a "broken" state do not become broken at 0% HP - anything that reaches that point is destroyed - to_chat(user, SPAN_WARNING("Further analysis: Catastrophic component failure detected! [M] requires reconstruction to fully repair.")) - -/obj/item/robotanalyzer/attack__legacy__attackchain(mob/living/M, mob/living/user) // Scanning borgs, IPCs/augmented crew, and AIs - if((HAS_TRAIT(user, TRAIT_CLUMSY) || user.getBrainLoss() >= 60) && prob(50)) - handle_clumsy(user) - return - user.visible_message(SPAN_NOTICE("[user] has analyzed [M]'s components with [src]."), SPAN_NOTICE("You analyze [M]'s components with [src].")) - robot_healthscan(user, M) - add_fingerprint(user) - -/proc/robot_healthscan(mob/user, mob/living/M) - var/scan_type - var/list/msgs = list() - if(isrobot(M)) - scan_type = "robot" - else if(ishuman(M)) - scan_type = "prosthetics" - else if(is_ai(M)) - scan_type = "ai" - else - to_chat(user, SPAN_WARNING("You can't analyze non-robotic things!")) - return - - switch(scan_type) - if("robot") - var/burn = M.getFireLoss() > 50 ? "[M.getFireLoss()]" : M.getFireLoss() - var/brute = M.getBruteLoss() > 50 ? "[M.getBruteLoss()]" : M.getBruteLoss() - msgs += SPAN_NOTICE("Analyzing Results for [M]:\n\t Overall Status: [M.stat == DEAD ? "fully disabled" : "[M.health]% functional"]") - msgs += "\t Key: Electronics/Brute" - msgs += "\t Damage Specifics: [burn] - [brute]" - if(M.timeofdeath && M.stat == DEAD) - msgs += SPAN_NOTICE("Time of disable: [station_time_timestamp("hh:mm:ss", M.timeofdeath)]") - var/mob/living/silicon/robot/H = M - var/list/damaged = H.get_damaged_components(TRUE, TRUE, TRUE) // Get all except the missing ones - var/list/missing = H.get_missing_components() - msgs += SPAN_NOTICE("Localized Damage:") - if(!LAZYLEN(damaged) && !LAZYLEN(missing)) - msgs += SPAN_NOTICE("\t Components are OK.") - else - if(LAZYLEN(damaged)) - for(var/datum/robot_component/org in damaged) - msgs += text("\t []: [][] - [] - [] - []", \ - capitalize(org.name), \ - (org.is_destroyed()) ? "DESTROYED " :"",\ - (org.electronics_damage > 0) ? "[org.electronics_damage]" :0, \ - (org.brute_damage > 0) ? "[org.brute_damage]" :0, \ - (org.toggled) ? "Toggled ON" : "Toggled OFF",\ - (org.powered) ? "Power ON" : "Power OFF") - if(LAZYLEN(missing)) - for(var/datum/robot_component/org in missing) - msgs += SPAN_WARNING("\t [capitalize(org.name)]: MISSING") - - if(H.emagged && prob(5)) - msgs += SPAN_WARNING("\t ERROR: INTERNAL SYSTEMS COMPROMISED") - - if("prosthetics") - var/mob/living/carbon/human/H = M - var/is_ipc = ismachineperson(H) - msgs += "Analyzing Results for [M]: [is_ipc ? "\n\t Overall Status: [H.stat == DEAD ? "fully disabled" : "[H.health]% functional"]
" : "
"]" //for the record im sorry - msgs += "\t Key: Electronics/Brute" - msgs += SPAN_NOTICE("External prosthetics:") - var/organ_found - if(LAZYLEN(H.internal_organs)) - for(var/obj/item/organ/external/E in H.bodyparts) - if(!E.is_robotic() || (is_ipc && (E.get_damage() == 0))) //Non-IPCs have their cybernetics show up in the scan, even if undamaged - continue - organ_found = TRUE - msgs += "[E.name]: [E.brute_dam] [E.burn_dam]" - if(!organ_found) - msgs += SPAN_WARNING("No prosthetics located.") - msgs += "
" - msgs += SPAN_NOTICE("Internal prosthetics:") - organ_found = null - if(LAZYLEN(H.internal_organs)) - for(var/obj/item/organ/internal/O in H.internal_organs) - if(!O.is_robotic() || istype(O, /obj/item/organ/internal/cyberimp) || O.stealth_level > 1) - continue - organ_found = TRUE - msgs += "[capitalize(O.name)]: [O.status & ORGAN_DEAD ? "CRITICAL FAILURE" : O.damage]" - if(!organ_found) - msgs += SPAN_WARNING("No prosthetics located.") - msgs += "
" - msgs += SPAN_NOTICE("Cybernetic implants:") - organ_found = null - if(LAZYLEN(H.internal_organs)) - for(var/obj/item/organ/internal/cyberimp/I in H.internal_organs) - if(I.stealth_level > 1) - continue - organ_found = TRUE - msgs += "[capitalize(I.name)]: [(I.crit_fail || I.status & ORGAN_DEAD) ? "CRITICAL FAILURE" : I.damage]" - if(!organ_found) - msgs += SPAN_WARNING("No implants located.") - msgs += "
" - if(is_ipc) - msgs.Add(get_chemscan_results(user, H)) - msgs += SPAN_NOTICE("Subject temperature: [round(H.bodytemperature-T0C, 0.01)]°C ([round(H.bodytemperature*1.8-459.67, 0.01)]°F)") - if("ai") - var/mob/living/silicon/ai/A = M - var/burn = A.getFireLoss() > 50 ? "[A.getFireLoss()]" : A.getFireLoss() - var/brute = A.getBruteLoss() > 50 ? "[A.getBruteLoss()]" : A.getBruteLoss() - msgs += SPAN_NOTICE("Analyzing Results for [M]:\n\t Overall Status: [A.stat == DEAD ? "fully disabled" : "[A.health]% functional"]") - msgs += "\t Key: Electronics/Brute" - msgs += "\t Damage Specifics: [burn] - [brute]" - - to_chat(user, chat_box_healthscan(msgs.Join("
"))) - -//////////////////////////////////////// -// MARK: Gas analyzer -//////////////////////////////////////// -/obj/item/analyzer - name = "analyzer" - desc = "A hand-held environmental scanner which reports current gas levels." - icon = 'icons/obj/device.dmi' - icon_state = "atmos" - inhand_icon_state = "analyzer" - slot_flags = ITEM_SLOT_BELT - w_class = WEIGHT_CLASS_SMALL - flags = CONDUCT - throw_speed = 3 - materials = list(MAT_METAL = 210, MAT_GLASS = 140) - origin_tech = "magnets=1;engineering=1" - var/cooldown = FALSE - var/cooldown_time = 250 - var/accuracy // 0 is the best accuracy. - /// FALSE: Sum gas mixes then present. TRUE: Present each mix individually - var/show_detailed = FALSE - -/obj/item/analyzer/examine(mob/user) - . = ..() - . += SPAN_NOTICE("Alt-click [src] to activate the barometer function.") - . += SPAN_NOTICE("Alt-Shift-click [src] to toggle detailed reporting on or off.") - -/obj/item/analyzer/attack_self__legacy__attackchain(mob/user as mob) - - if(user.stat) - return - - var/turf/location = user.loc - if(!isturf(location)) - return - - atmos_scan(user = user, target = location, detailed = show_detailed) - add_fingerprint(user) - -/obj/item/analyzer/AltShiftClick(mob/user) - show_detailed = !show_detailed - to_chat(user, SPAN_NOTICE("You toggle detailed reporting [show_detailed ? "on" : "off"]")) - -/obj/item/analyzer/AltClick(mob/user) //Barometer output for measuring when the next storm happens - ..() - - if(!user.incapacitated() && Adjacent(user)) - - if(cooldown) - to_chat(user, SPAN_WARNING("[src]'s barometer function is preparing itself.")) - return - - var/turf/T = get_turf(user) - if(!T) - return - - playsound(src, 'sound/effects/pop.ogg', 100) - var/area/user_area = T.loc - var/datum/weather/ongoing_weather = null - - if(!user_area.outdoors) - to_chat(user, SPAN_WARNING("[src]'s barometer function won't work indoors!")) - return - - for(var/V in SSweather.processing) - var/datum/weather/W = V - if(W.barometer_predictable && (T.z in W.impacted_z_levels) && is_type_in_list(user_area, W.area_types) && !(W.stage == WEATHER_END_STAGE)) - ongoing_weather = W - break - - if(ongoing_weather) - if((ongoing_weather.stage == WEATHER_MAIN_STAGE) || (ongoing_weather.stage == WEATHER_WIND_DOWN_STAGE)) - to_chat(user, SPAN_WARNING("[src]'s barometer function can't trace anything while the storm is [ongoing_weather.stage == WEATHER_MAIN_STAGE ? "already here!" : "winding down."]")) - return - - to_chat(user, SPAN_NOTICE("The next [ongoing_weather] will hit in [butchertime(ongoing_weather.next_hit_time - world.time)].")) - if(ongoing_weather.aesthetic) - to_chat(user, SPAN_WARNING("[src]'s barometer function says that the next storm will breeze on by.")) - else - var/next_hit = SSweather.next_hit_by_zlevel["[T.z]"] - var/fixed = next_hit ? next_hit - world.time : -1 - if(fixed < 0) - to_chat(user, SPAN_WARNING("[src]'s barometer function was unable to trace any weather patterns.")) - else - to_chat(user, SPAN_WARNING("[src]'s barometer function says a storm will land in approximately [butchertime(fixed)].")) - cooldown = TRUE - addtimer(CALLBACK(src, PROC_REF(ping)), cooldown_time) - -/obj/item/analyzer/proc/ping() - if(isliving(loc)) - var/mob/living/L = loc - to_chat(L, SPAN_NOTICE("[src]'s barometer function is ready!")) - playsound(src, 'sound/machines/click.ogg', 100) - cooldown = FALSE - -/obj/item/analyzer/proc/butchertime(amount) - if(!amount) - return - if(accuracy) - var/inaccurate = round(accuracy * (1 / 3)) - if(prob(50)) - amount -= inaccurate - if(prob(50)) - amount += inaccurate - return DisplayTimeText(max(1, amount)) - -/obj/item/analyzer/afterattack__legacy__attackchain(atom/target, mob/user, proximity, params) - . = ..() - if(!can_see(user, target, 1)) - return - if(target.return_analyzable_air()) - atmos_scan(user, target, detailed = show_detailed) - else - atmos_scan(user, get_turf(target), detailed = show_detailed) - -/** - * Outputs a message to the user describing the target's gasmixes. - * Used in chat-based gas scans. - */ -/proc/atmos_scan(mob/user, atom/target, silent = FALSE, print = TRUE, milla_turf_details = FALSE, detailed = FALSE) - var/list/airs - var/list/milla = null - if(milla_turf_details && istype(target, /turf)) - // This is one of the few times when it's OK to call MILLA directly, as we need more information than we normally keep, aren't trying to modify it, and don't need it to be synchronized with anything. - milla = new/list(MILLA_TILE_SIZE) - get_tile_atmos(target, milla) - - var/datum/gas_mixture/air = new() - air.copy_from_milla(milla) - airs = list(air) - else - airs = target.return_analyzable_air() - if(!airs) - return FALSE - if(!islist(airs)) - airs = list(airs) - - var/list/message = list() - if(!silent && isliving(user)) - user.visible_message(SPAN_NOTICE("[user] uses the analyzer on [target]."), SPAN_NOTICE("You use the analyzer on [target].")) - message += SPAN_BOLDNOTICE("Results of analysis of [bicon(target)] [target].") - - if(!print) - return TRUE - var/total_moles = 0 - var/pressure = 0 - var/volume = 0 - var/heat_capacity = 0 - var/thermal_energy = 0 - var/oxygen = 0 - var/nitrogen = 0 - var/toxins - var/carbon_dioxide = 0 - var/sleeping_agent = 0 - var/agent_b = 0 - var/hydrogen = 0 - var/water_vapor = 0 - - if(detailed)// Present all mixtures one by one - for(var/datum/gas_mixture/air as anything in airs) - total_moles = air.total_moles() - pressure = air.return_pressure() - volume = air.return_volume() //could just do mixture.volume... but safety, I guess? - heat_capacity = air.heat_capacity() - thermal_energy = air.thermal_energy() - if(total_moles) - message += SPAN_NOTICE("Total: [round(total_moles, 0.01)] moles") - if(air.oxygen() && (milla_turf_details || air.oxygen() / total_moles > 0.01)) - message += " [SPAN_OXYGEN("Oxygen: [round(air.oxygen(), 0.01)] moles ([round(air.oxygen() / total_moles * 100, 0.01)] %)")]" - if(air.nitrogen() && (milla_turf_details || air.nitrogen() / total_moles > 0.01)) - message += " [SPAN_NITROGEN("Nitrogen: [round(air.nitrogen(), 0.01)] moles ([round(air.nitrogen() / total_moles * 100, 0.01)] %)")]" - if(air.carbon_dioxide() && (milla_turf_details || air.carbon_dioxide() / total_moles > 0.01)) - message += " [SPAN_CARBON_DIOXIDE("Carbon Dioxide: [round(air.carbon_dioxide(), 0.01)] moles ([round(air.carbon_dioxide() / total_moles * 100, 0.01)] %)")]" - if(air.toxins() && (milla_turf_details || air.toxins() / total_moles > 0.01)) - message += " [SPAN_PLASMA("Plasma: [round(air.toxins(), 0.01)] moles ([round(air.toxins() / total_moles * 100, 0.01)] %)")]" - if(air.sleeping_agent() && (milla_turf_details || air.sleeping_agent() / total_moles > 0.01)) - message += " [SPAN_SLEEPING_AGENT("Nitrous Oxide: [round(air.sleeping_agent(), 0.01)] moles ([round(air.sleeping_agent() / total_moles * 100, 0.01)] %)")]" - if(air.agent_b() && (milla_turf_details || air.agent_b() / total_moles > 0.01)) - message += " [SPAN_AGENT_B("Agent B: [round(air.agent_b(), 0.01)] moles ([round(air.agent_b() / total_moles * 100, 0.01)] %)")]" - if(air.hydrogen() && (milla_turf_details || air.hydrogen() / total_moles > 0.01)) - message += " [SPAN_HYDROGEN("Hydrogen: [round(air.hydrogen(), 0.01)] moles ([round(air.hydrogen() / total_moles * 100, 0.01)] %)")]" - if(air.water_vapor() && (milla_turf_details || air.water_vapor() / total_moles > 0.01)) - message += " [SPAN_WATER_VAPOR("Water Vapor: [round(air.water_vapor(), 0.01)] moles ([round(air.water_vapor() / total_moles * 100, 0.01)] %)")]" - message += SPAN_NOTICE("Temperature: [round(air.temperature()-T0C)] °C ([round(air.temperature())] K)") - message += SPAN_NOTICE("Volume: [round(volume)] Liters") - message += SPAN_NOTICE("Pressure: [round(pressure, 0.1)] kPa") - message += SPAN_NOTICE("Heat Capacity: [DisplayJoules(heat_capacity)] / K") - message += SPAN_NOTICE("Thermal Energy: [DisplayJoules(thermal_energy)]") - else - message += SPAN_NOTICE("[target] is empty!") - message += SPAN_NOTICE("Volume: [round(volume)] Liters") // don't want to change the order volume appears in, suck it - - else// Sum mixtures then present - for(var/datum/gas_mixture/air as anything in airs) - if(isnull(air)) - continue - total_moles += air.total_moles() - volume += air.return_volume() - heat_capacity += air.heat_capacity() - thermal_energy += air.thermal_energy() - oxygen += air.oxygen() - nitrogen += air.nitrogen() - toxins += air.toxins() - carbon_dioxide += air.carbon_dioxide() - sleeping_agent += air.sleeping_agent() - agent_b += air.agent_b() - hydrogen += air.hydrogen() - water_vapor += air.water_vapor() - - var/temperature = heat_capacity ? thermal_energy / heat_capacity : 0 - pressure = volume ? total_moles * R_IDEAL_GAS_EQUATION * temperature / volume : 0 - - if(total_moles) - message += SPAN_NOTICE("Total: [round(total_moles, 0.01)] moles") - if(oxygen && (milla_turf_details || oxygen / total_moles > 0.01)) - message += " [SPAN_OXYGEN("Oxygen: [round(oxygen, 0.01)] moles ([round(oxygen / total_moles * 100, 0.01)] %)")]" - if(nitrogen && (milla_turf_details || nitrogen / total_moles > 0.01)) - message += " [SPAN_NITROGEN("Nitrogen: [round(nitrogen, 0.01)] moles ([round(nitrogen / total_moles * 100, 0.01)] %)")]" - if(carbon_dioxide && (milla_turf_details || carbon_dioxide / total_moles > 0.01)) - message += " [SPAN_CARBON_DIOXIDE("Carbon Dioxide: [round(carbon_dioxide, 0.01)] moles ([round(carbon_dioxide / total_moles * 100, 0.01)] %)")]" - if(toxins && (milla_turf_details || toxins / total_moles > 0.01)) - message += " [SPAN_PLASMA("Plasma: [round(toxins, 0.01)] moles ([round(toxins / total_moles * 100, 0.01)] %)")]" - if(sleeping_agent && (milla_turf_details || sleeping_agent / total_moles > 0.01)) - message += " [SPAN_SLEEPING_AGENT("Nitrous Oxide: [round(sleeping_agent, 0.01)] moles ([round(sleeping_agent / total_moles * 100, 0.01)] %)")]" - if(agent_b && (milla_turf_details || agent_b / total_moles > 0.01)) - message += " [SPAN_AGENT_B("Agent B: [round(agent_b, 0.01)] moles ([round(agent_b / total_moles * 100, 0.01)] %)")]" - if(hydrogen && (milla_turf_details || hydrogen / total_moles > 0.01)) - message += " [SPAN_HYDROGEN("Hydrogen: [round(hydrogen, 0.01)] moles ([round(hydrogen / total_moles * 100, 0.01)] %)")]" - if(water_vapor && (milla_turf_details || (water_vapor / total_moles > 0.01))) - message += " [SPAN_WATER_VAPOR("Water Vapor: [round(water_vapor, 0.01)] moles ([round(water_vapor / total_moles * 100, 0.01)] %)")]" - message += SPAN_NOTICE("Temperature: [round(temperature-T0C)] °C ([round(temperature)] K)") - message += SPAN_NOTICE("Volume: [round(volume)] Liters") - message += SPAN_NOTICE("Pressure: [round(pressure, 0.1)] kPa") - message += SPAN_NOTICE("Heat Capacity: [DisplayJoules(heat_capacity)] / K") - message += SPAN_NOTICE("Thermal Energy: [DisplayJoules(thermal_energy)]") - else - message += SPAN_NOTICE("[target] is empty!") - message += SPAN_NOTICE("Volume: [round(volume)] Liters") // don't want to change the order volume appears in, suck it - - if(milla) - // Values from milla/src/lib.rs, +1 due to array indexing difference. - message += SPAN_NOTICE("Airtight N/E/S/W: [(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_NORTH) ? "yes" : "no"]/[(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_EAST) ? "yes" : "no"]/[(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_SOUTH) ? "yes" : "no"]/[(milla[MILLA_INDEX_AIRTIGHT_DIRECTIONS] & MILLA_WEST) ? "yes" : "no"]") - switch(milla[MILLA_INDEX_ATMOS_MODE]) - // These are enum values, so they don't get increased. - if(0) - message += SPAN_NOTICE("Atmos Mode: Space") - if(1) - message += SPAN_NOTICE("Atmos Mode: Sealed") - if(2) - message += SPAN_NOTICE("Atmos Mode: Exposed to Environment (ID: [milla[MILLA_INDEX_ENVIRONMENT_ID]])") - else - message += SPAN_NOTICE("Atmos Mode: Unknown ([milla[MILLA_INDEX_ATMOS_MODE]]), contact a coder.") - message += SPAN_NOTICE("Superconductivity N/E/S/W: [milla[MILLA_INDEX_SUPERCONDUCTIVITY_NORTH]]/[milla[MILLA_INDEX_SUPERCONDUCTIVITY_EAST]]/[milla[MILLA_INDEX_SUPERCONDUCTIVITY_SOUTH]]/[milla[MILLA_INDEX_SUPERCONDUCTIVITY_WEST]]") - message += SPAN_NOTICE("Turf's Innate Heat Capacity: [milla[MILLA_INDEX_INNATE_HEAT_CAPACITY]]") - message += SPAN_NOTICE("Hotspot: [floor(milla[MILLA_INDEX_HOTSPOT_TEMPERATURE]-T0C)] °C ([floor(milla[MILLA_INDEX_HOTSPOT_TEMPERATURE])] K), [round(milla[MILLA_INDEX_HOTSPOT_VOLUME] * CELL_VOLUME, 1)] Liters ([milla[MILLA_INDEX_HOTSPOT_VOLUME]]x)") - message += SPAN_NOTICE("Wind: ([round(milla[MILLA_INDEX_WIND_X], 0.001)], [round(milla[MILLA_INDEX_WIND_Y], 0.001)])") - message += SPAN_NOTICE("Fuel burnt last tick: [milla[MILLA_INDEX_FUEL_BURNT]] moles") - - to_chat(user, chat_box_examine(message.Join("
"))) - return TRUE - //////////////////////////////////////// // MARK: Reagent scanners //////////////////////////////////////// @@ -988,289 +200,3 @@ SLIME SCANNER to_chat(user, SPAN_NOTICE("Core mutation in progress: [T.effectmod]")) to_chat(user, SPAN_NOTICE("Progress in core mutation: [T.applied] / [SLIME_EXTRACT_CROSSING_REQUIRED]")) to_chat(user, "========================") - -//////////////////////////////////////// -// MARK: Body analyzers -//////////////////////////////////////// -/obj/item/bodyanalyzer - name = "handheld body analyzer" - desc = "A handheld scanner capable of deep-scanning an entire body." - icon = 'icons/obj/device.dmi' - icon_state = "bodyanalyzer_0" - worn_icon_state = "healthanalyzer" - inhand_icon_state = "healthanalyzer" - slot_flags = ITEM_SLOT_BELT - w_class = WEIGHT_CLASS_SMALL - throw_speed = 5 - throw_range = 10 - origin_tech = "magnets=6;biotech=6" - var/obj/item/stock_parts/cell/cell - var/cell_type = /obj/item/stock_parts/cell/high - var/ready = TRUE // Ready to scan - var/printing = FALSE - var/time_to_use = 0 // How much time remaining before next scan is available. - var/usecharge = 750 - var/scan_time = 5 SECONDS //how long does it take to scan - var/scan_cd = 30 SECONDS //how long before we can scan again - -/obj/item/bodyanalyzer/get_cell() - return cell - -/obj/item/bodyanalyzer/advanced - cell_type = /obj/item/stock_parts/cell/super // twice the charge! - -/obj/item/bodyanalyzer/borg - name = "cyborg body analyzer" - desc = "Scan an entire body to prepare for field surgery. Consumes power for each scan." - -/obj/item/bodyanalyzer/borg/syndicate - scan_cd = 20 SECONDS - -/obj/item/bodyanalyzer/New() - ..() - cell = new cell_type(src) - cell.give(cell.maxcharge) - update_icon() - -/obj/item/bodyanalyzer/proc/setReady() - ready = TRUE - playsound(src, 'sound/machines/defib_saftyon.ogg', 50, 0) - update_icon() - -/obj/item/bodyanalyzer/update_icon_state() - if(!cell) - icon_state = "bodyanalyzer_0" - return - if(ready) - icon_state = "bodyanalyzer_1" - else - icon_state = "bodyanalyzer_2" - -/obj/item/bodyanalyzer/update_overlays() - . = ..() - var/percent = cell.percent() - var/overlayid = round(percent / 10) - . += "bodyanalyzer_charge[overlayid]" - if(printing) - . += "bodyanalyzer_printing" - -/obj/item/bodyanalyzer/attack__legacy__attackchain(mob/living/M, mob/living/carbon/human/user) - if(user.incapacitated() || !user.Adjacent(M)) - return - - if(!ready) - to_chat(user, SPAN_NOTICE("The scanner beeps angrily at you! It's currently recharging - [round((time_to_use - world.time) * 0.1)] seconds remaining.")) - playsound(user.loc, 'sound/machines/buzz-sigh.ogg', 50, 1) - return - - if(cell.charge >= usecharge) - mobScan(M, user) - else - to_chat(user, SPAN_NOTICE("The scanner beeps angrily at you! It's out of charge!")) - playsound(user.loc, 'sound/machines/buzz-sigh.ogg', 50, 1) - -/obj/item/bodyanalyzer/borg/attack__legacy__attackchain(mob/living/M, mob/living/silicon/robot/user) - if(user.incapacitated() || !user.Adjacent(M)) - return - - if(!ready) - to_chat(user, SPAN_NOTICE("[src] is currently recharging - [round((time_to_use - world.time) * 0.1)] seconds remaining.")) - return - - if(user.cell.charge >= usecharge) - mobScan(M, user) - else - to_chat(user, SPAN_NOTICE("You need to recharge before you can use [src]")) - -/obj/item/bodyanalyzer/proc/mobScan(mob/living/M, mob/user) - if(ishuman(M)) - var/report = generate_printing_text(M, user) - user.visible_message("[user] begins scanning [M] with [src].", "You begin scanning [M].") - if(do_after(user, scan_time, target = M)) - var/obj/item/paper/printout = new - printout.info = report - printout.name = "Scan report - [M.name]" - playsound(user.loc, 'sound/goonstation/machines/printer_dotmatrix.ogg', 50, 1) - user.put_in_hands(printout) - time_to_use = world.time + scan_cd - if(isrobot(user)) - var/mob/living/silicon/robot/R = user - R.cell.use(usecharge) - else - cell.use(usecharge) - ready = FALSE - printing = TRUE - update_icon() - addtimer(CALLBACK(src, TYPE_PROC_REF(/obj/item/bodyanalyzer, setReady)), scan_cd) - addtimer(VARSET_CALLBACK(src, printing, FALSE), 1.4 SECONDS) - addtimer(CALLBACK(src, TYPE_PROC_REF(/atom, update_icon), UPDATE_OVERLAYS), 1.5 SECONDS) - else if(iscorgi(M) && M.stat == DEAD) - to_chat(user, SPAN_NOTICE("You wonder if [M.p_they()] was a good dog. [src] tells you they were the best...")) // :'( - playsound(loc, 'sound/machines/ping.ogg', 50, 0) - ready = FALSE - update_icon(UPDATE_ICON_STATE) - addtimer(CALLBACK(src, TYPE_PROC_REF(/obj/item/bodyanalyzer, setReady)), scan_cd) - time_to_use = world.time + scan_cd - else - to_chat(user, SPAN_NOTICE("Scanning error detected. Invalid specimen.")) - -//Unashamedly ripped from adv_med.dm -/obj/item/bodyanalyzer/proc/generate_printing_text(mob/living/M, mob/user) - var/dat = "" - var/mob/living/carbon/human/target = M - - dat = "Target Statistics:
" - var/t1 - switch(target.stat) // obvious, see what their status is - if(CONSCIOUS) - t1 = "Conscious" - if(UNCONSCIOUS) - t1 = "Unconscious" - else - t1 = "*dead*" - dat += "[target.health > 50 ? "" : ""]\tHealth %: [target.health], ([t1])
" - - var/found_disease = FALSE - for(var/thing in target.viruses) - var/datum/disease/D = thing - if(D.visibility_flags) //If any visibility flags are on. - continue - found_disease = TRUE - break - if(found_disease) - dat += "Disease detected in target.
" - - var/extra_font = null - extra_font = (target.getBruteLoss() < 60 ? "" : "") - dat += "[extra_font]\t-Brute Damage %: [target.getBruteLoss()]
" - - extra_font = (target.getOxyLoss() < 60 ? "" : "") - dat += "[extra_font]\t-Respiratory Damage %: [target.getOxyLoss()]
" - - extra_font = (target.getToxLoss() < 60 ? "" : "") - dat += "[extra_font]\t-Toxin Content %: [target.getToxLoss()]
" - - extra_font = (target.getFireLoss() < 60 ? "" : "") - dat += "[extra_font]\t-Burn Severity %: [target.getFireLoss()]
" - - extra_font = (target.radiation < 10 ?"" : "") - dat += "[extra_font]\tRadiation Level %: [target.radiation]
" - - extra_font = (target.getCloneLoss() < 1 ?"" : "") - dat += "[extra_font]\tGenetic Tissue Damage %: [target.getCloneLoss()]
" - - extra_font = (target.getBrainLoss() < 1 ?"" : "") - dat += "[extra_font]\tApprox. Brain Damage %: [target.getBrainLoss()]
" - - dat += "Paralysis Summary %: [target.IsParalyzed()] ([round(target.AmountParalyzed() / 10)] seconds left!)
" - dat += "Body Temperature: [target.bodytemperature-T0C]°C ([target.bodytemperature*1.8-459.67]°F)
" - - dat += "
" - - var/blood_percent = round((target.blood_volume / BLOOD_VOLUME_NORMAL)) - blood_percent *= 100 - - extra_font = (target.blood_volume > 448 ? "" : "") - dat += "[extra_font]\tBlood Level %: [blood_percent] ([target.blood_volume] units)
" - - if(target.reagents) - dat += "Epinephrine units: [target.reagents.get_reagent_amount("Epinephrine")] units
" - dat += "Ether: [target.reagents.get_reagent_amount("ether")] units
" - - extra_font = (target.reagents.get_reagent_amount("silver_sulfadiazine") < 30 ? "" : "") - dat += "[extra_font]\tSilver Sulfadiazine: [target.reagents.get_reagent_amount("silver_sulfadiazine")]
" - - extra_font = (target.reagents.get_reagent_amount("styptic_powder") < 30 ? "" : "") - dat += "[extra_font]\tStyptic Powder: [target.reagents.get_reagent_amount("styptic_powder")] units
" - - extra_font = (target.reagents.get_reagent_amount("salbutamol") < 30 ? "" : "") - dat += "[extra_font]\tSalbutamol: [target.reagents.get_reagent_amount("salbutamol")] units
" - - dat += "
" - dat += "" - dat += "" - dat += "" - dat += "" - dat += "" - dat += "" - - for(var/obj/item/organ/external/e in target.bodyparts) - dat += "" - var/AN = "" - var/open = "" - var/infected = "" - var/robot = "" - var/imp = "" - var/bled = "" - var/splint = "" - var/internal_bleeding = "" - var/lung_ruptured = "" - if(e.status & ORGAN_INT_BLEEDING) - internal_bleeding = "
Internal bleeding" - if(istype(e, /obj/item/organ/external/chest) && target.is_lung_ruptured()) - lung_ruptured = "Lung ruptured:" - if(e.status & ORGAN_SPLINTED) - splint = "Splinted:" - if(e.status & ORGAN_BROKEN) - AN = "[e.broken_description]:" - if(e.is_robotic()) - robot = "Robotic:" - if(e.open) - open = "Open:" - switch(e.germ_level) - if(INFECTION_LEVEL_ONE to INFECTION_LEVEL_ONE + 200) - infected = "Mild Infection:" - if(INFECTION_LEVEL_ONE + 200 to INFECTION_LEVEL_ONE + 300) - infected = "Mild Infection+:" - if(INFECTION_LEVEL_ONE + 300 to INFECTION_LEVEL_ONE + 400) - infected = "Mild Infection++:" - if(INFECTION_LEVEL_TWO to INFECTION_LEVEL_TWO + 200) - infected = "Acute Infection:" - if(INFECTION_LEVEL_TWO + 200 to INFECTION_LEVEL_TWO + 300) - infected = "Acute Infection+:" - if(INFECTION_LEVEL_TWO + 300 to INFECTION_LEVEL_TWO + 400) - infected = "Acute Infection++:" - if(INFECTION_LEVEL_THREE to INFINITY) - infected = "Septic:" - - var/unknown_body = 0 - for(var/I in e.embedded_objects) - unknown_body++ - - if(unknown_body || e.hidden) - imp += "Unknown body present:" - if(!AN && !open && !infected && !imp) - AN = "None:" - dat += "" - dat += "" - for(var/obj/item/organ/internal/i in target.internal_organs) - var/mech = i.desc - var/infection = "None" - switch(i.germ_level) - if(1 to INFECTION_LEVEL_ONE + 200) - infection = "Mild Infection:" - if(INFECTION_LEVEL_ONE + 200 to INFECTION_LEVEL_ONE + 300) - infection = "Mild Infection+:" - if(INFECTION_LEVEL_ONE + 300 to INFECTION_LEVEL_ONE + 400) - infection = "Mild Infection++:" - if(INFECTION_LEVEL_TWO to INFECTION_LEVEL_TWO + 200) - infection = "Acute Infection:" - if(INFECTION_LEVEL_TWO + 200 to INFECTION_LEVEL_TWO + 300) - infection = "Acute Infection+:" - if(INFECTION_LEVEL_TWO + 300 to INFINITY) - infection = "Acute Infection++:" - - dat += "" - dat += "" - dat += "" - dat += "
OrganBurn DamageBrute DamageOther Wounds
[e.name][e.burn_dam][e.brute_dam][robot][bled][AN][splint][open][infected][imp][internal_bleeding][lung_ruptured]
[i.name]N/A[i.damage][infection]:[mech]
" - if(HAS_TRAIT(target, TRAIT_BLIND)) - dat += "Cataracts detected.
" - if(HAS_TRAIT(target, TRAIT_COLORBLIND)) - dat += "Photoreceptor abnormalities detected.
" - if(HAS_TRAIT(target, TRAIT_NEARSIGHT)) - dat += "Retinal misalignment detected.
" - if(HAS_TRAIT(target, TRAIT_PARAPLEGIC)) - dat += "Lumbar nerves damaged.
" - - return dat diff --git a/paradise.dme b/paradise.dme index 26f3a01af7a..6d7f13a782f 100644 --- a/paradise.dme +++ b/paradise.dme @@ -1325,16 +1325,20 @@ #include "code\game\objects\items\devices\aicard.dm" #include "code\game\objects\items\devices\autochef_remote.dm" #include "code\game\objects\items\devices\autopsy.dm" +#include "code\game\objects\items\devices\bodyanalyzer.dm" #include "code\game\objects\items\devices\camera_bug.dm" #include "code\game\objects\items\devices\chameleon_counter.dm" #include "code\game\objects\items\devices\chameleonproj.dm" #include "code\game\objects\items\devices\enginepicker.dm" #include "code\game\objects\items\devices\flash.dm" #include "code\game\objects\items\devices\flashlight.dm" +#include "code\game\objects\items\devices\gasanalyzer.dm" #include "code\game\objects\items\devices\geiger_counter.dm" #include "code\game\objects\items\devices\handheld_defib.dm" +#include "code\game\objects\items\devices\healthanalyzer.dm" #include "code\game\objects\items\devices\laserpointer.dm" #include "code\game\objects\items\devices\lightreplacer.dm" +#include "code\game\objects\items\devices\machineanalyzer.dm" #include "code\game\objects\items\devices\machineprototype.dm" #include "code\game\objects\items\devices\megaphone.dm" #include "code\game\objects\items\devices\paicard.dm"