Files
Batrachophreno 4ecb0bc21c Repath obj/machinery to obj/structure/machinery [MDB Ignore] (#22500)
Repaths obj/machinery to obj/structure/machinery. **Note for
reviewers:** the only meaningful changed code exists within
**code/game/objects/structures.dm** and
**code/game/objects/structures/_machinery.dm**, largely concerning
damage procs. With the exception of moving airlock defines to their own
file, ALL OTHER CHANGES ARE STRICTLY PATH CHANGES.

Objects, _categorically_, are largely divided between those you can hold
in your hand/inventory and those you can't. Machinery objects are
already subtypes of Structures behaviorally, this PR just makes their
pathing reflect that, and allows for future work (tool actions, more
health/destruction functionality) to be developed without unnecessary
code duplication.

I have tested this PR by loading up the Horizon and dismantling various
machines and structures with tools, shooting guns of various types
throughout the ship, and detonating a bunch of explosions throughout the
ship.
2026-05-26 19:35:48 +00:00

190 lines
6.4 KiB
Plaintext

//microscope code itself
/obj/structure/machinery/microscope
name = "high powered electron microscope"
desc = "A highly advanced microscope capable of zooming up to 3000x."
icon = 'icons/obj/forensics.dmi'
icon_state = "microscope"
anchored = 1
density = 1
/**
* The sample being analysed
*/
var/obj/item/sample = null
/**
* The report number of the last fiber analysis
*/
var/report_fiber_num = 0
/**
* The report number of the last fingerprint analysis
*/
var/report_print_num = 0
/**
* The report number of the last gunshot residue analysis
*/
var/report_gsr_num = 0
/**
* The report number of the last cellular analysis
*/
var/report_cell_num = 0
/**
* Which types of sample can we analyse
*/
var/allowed_analysis = MICROSCOPE_ALL
/obj/structure/machinery/microscope/mechanics_hints(mob/user, distance, is_adjacent)
. += ..()
. += "Use a microscope slide or a fingerprint card on this machine to insert it."
. += "Alt-click to remove any object within it."
/obj/structure/machinery/microscope/attackby(obj/item/attacking_item, mob/user)
if(sample)
to_chat(user, SPAN_WARNING("There is already a slide in the microscope."))
return
if(istype(attacking_item, /obj/item/forensics/slide) || istype(attacking_item, /obj/item/sample/print))
to_chat(user, SPAN_NOTICE("You insert \the [attacking_item] into the microscope."))
user.unEquip(attacking_item)
attacking_item.forceMove(src)
sample = attacking_item
update_icon()
return
/obj/structure/machinery/microscope/attack_hand(mob/user)
if(!sample)
to_chat(user, SPAN_WARNING("The microscope has no sample to examine."))
return
if(istype(sample, /obj/item/forensics/slide))
var/obj/item/forensics/slide/slide = sample
if((slide.has_swab && !(allowed_analysis & MICROSCOPE_GSR)) || (slide.has_sample && !(allowed_analysis & MICROSCOPE_FIBER)) || (slide.reagents.total_volume && !(allowed_analysis & MICROSCOPE_CELLS)))
to_chat(user, SPAN_NOTICE("The magnification of \the [src] is too low to analyse this."))
return
else if(istype(sample, /obj/item/sample/print) && !(allowed_analysis & MICROSCOPE_PRINTS))
to_chat(user, SPAN_NOTICE("The magnification of \the [src] is too low to analyse this."))
return
to_chat(user, SPAN_NOTICE("The microscope whirrs as you examine \the [sample]."))
if(!do_after(user, 25) || !sample)
return
to_chat(user, SPAN_NOTICE("Printing findings now..."))
var/obj/item/paper/report = new()
var/pname
var/info
report.stamped = list(/obj/item/stamp)
report.overlays = list("paper_stamped")
if(istype(sample, /obj/item/forensics/slide))
var/obj/item/forensics/slide/slide = sample
if(slide.has_swab)
var/obj/item/forensics/swab/swab = slide.has_swab
report_gsr_num++
pname = "GSR report #[report_gsr_num]"
info = "<b><font size=\"4\">GSR anaylsis report #[report_gsr_num]</font></b><HR>"
if(length(swab.gsr))
info += "Residue analysis of the [swab.name] has determined the presence of the following residues.<ul>"
for(var/gsr in swab.gsr)
info += "<li>Residue from a [gsr] bullet detected.</li>"
info += "</ul>"
else
info += "No gunpowder residue found."
else if(slide.has_sample)
var/obj/item/sample/fibers/fibers = slide.has_sample
report_fiber_num++
pname = "Fiber report #[report_fiber_num]"
if(fibers.evidence)
info = "<b><font size=\"4\">Fiber anaylsis report #[report_fiber_num]</font></b><HR>"
info += "<b>Source locations:</b> "
info += "[english_list(fibers.source, "no sources were found", ", ", ", ", "")].<br><br>"
info += "Molecular analysis on [fibers.name] has determined the presence of unique fiber strings.<ul>"
for(var/fiber in fibers.evidence)
info += "<li><b>Most likely match for fibers:</b> [fiber]</li>"
info += "</ul>"
else
info += "No fibers found."
else if(slide.reagents.total_volume)
report_cell_num++
pname = "Cell report #[report_cell_num]"
var/list/tissue = REAGENT_DATA(slide.reagents, /singleton/reagent/biological_tissue)
if(tissue)
info = "<b><font size=\"4\">Cell anaylsis report #[report_cell_num]</font></b><HR>"
info += "Optical analysis has revealed unique cellular characteristics<ul>"
for(var/characteristic in tissue)
info += "<li>[characteristic]</li>"
info += "</ul>"
else
info += "No cells found."
else
pname = "Empty slide report #[report_fiber_num]"
info = "Evidence suggests that there's nothing in this slide."
else if(istype(sample, /obj/item/sample/print))
report_print_num++
pname = "Fingerprint report #[report_print_num]"
var/obj/item/sample/print/card = sample
info = "<b><font size=\"4\">Fingerprint analysis report #[report_print_num]</font></b><HR>"
info += "<b>Source locations:</b> "
info += "[english_list(card.source, "no sources were found", ", ", ", ", "")].<br><br>"
if(card.evidence && card.evidence.len)
info += "Surface analysis has determined unique fingerprint strings:<ul>"
//Get the list of all the COMPLETE fingerprints, use it to acquire the hidden ones, check if they are complete enough, if so show them
for(var/full_fingerprint in card.evidence)
//Acquire the partial fingerprint
var/partial_fingerprint = card.evidence[full_fingerprint]
info += "<li><b>Fingerprint string: </b>"
//If the fingerprint is complete enough, show the partial fingerprint
if(!is_complete_print(partial_fingerprint))
info += "INCOMPLETE PRINT"
else
info += "[partial_fingerprint]"
info += "</li>"
info += "</ul>"
else
info += "No information available."
report.set_content_unsafe(pname, info)
if(report)
report.update_icon()
if(report.info)
to_chat(user, report.info)
print(report, user)
/obj/structure/machinery/microscope/proc/remove_sample(var/mob/living/remover)
if(!istype(remover) || remover.incapacitated() || !Adjacent(remover))
return
if(!sample)
to_chat(remover, SPAN_WARNING("\The [src] does not have a sample in it."))
return
to_chat(remover, SPAN_NOTICE("You remove \the [sample] from \the [src]."))
sample.forceMove(get_turf(src))
remover.put_in_hands(sample)
sample = null
update_icon()
/obj/structure/machinery/microscope/AltClick()
remove_sample(usr)
/obj/structure/machinery/microscope/mouse_drop_dragged(atom/over, mob/user, src_location, over_location, params)
if(over == user)
remove_sample(user)
else
return ..()
/obj/structure/machinery/microscope/update_icon()
icon_state = "microscope"
if(sample)
icon_state += "slide"