Files
CHOMPStation2/code/modules/detectivework/microscope/microscope.dm
CHOMPStation2StaffMirrorBot f7de0bb70b [MIRROR] Start of TG Click Code Port (#12071)
Co-authored-by: Cameron Lennox <killer65311@gmail.com>
2025-12-06 03:18:32 -05:00

113 lines
3.6 KiB
Plaintext

//microscope code itself
/obj/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 = TRUE
density = TRUE
var/obj/item/sample = null
var/report_num = 0
/obj/machinery/microscope/attackby(obj/item/W as obj, mob/user as mob)
if(sample)
to_chat(user, span_warning("There is already a slide in the microscope."))
return
if(istype(W, /obj/item/forensics/swab)|| istype(W, /obj/item/sample/fibers) || istype(W, /obj/item/sample/print))
to_chat(user, span_notice("You insert \the [W] into the microscope."))
user.unEquip(W)
W.forceMove(src)
sample = W
update_icon()
return
/obj/machinery/microscope/attack_hand(mob/user)
if(!sample)
to_chat(user, span_warning("The microscope has no sample to examine."))
return
to_chat(user, span_notice("The microscope whirrs as you examine \the [sample]."))
if(!do_after(user, 2 SECONDS, target = sample) || !sample)
to_chat(user, span_notice("You stop examining \the [sample]."))
return
to_chat(user, span_notice("Printing findings now..."))
var/obj/item/paper/report = new(get_turf(src))
report.stamped = list(/obj/item/stamp)
report.overlays = list("paper_stamped")
report_num++
if(istype(sample, /obj/item/forensics/swab))
var/obj/item/forensics/swab/swab = sample
report.name = "GSR report #[++report_num]: [swab.name]"
report.info = span_bold("Scanned item:") + "<br>[swab.name]<br><br>"
if(swab.gsr)
report.info += "Residue from a [swab.gsr] bullet detected."
else
report.info += "No gunpowder residue found."
else if(istype(sample, /obj/item/sample/fibers))
var/obj/item/sample/fibers/fibers = sample
report.name = "Fiber report #[++report_num]: [fibers.name]"
report.info = span_bold("Scanned item:") + "<br>[fibers.name]<br><br>"
if(fibers.evidence)
report.info = "Molecular analysis on provided sample has determined the presence of unique fiber strings.<br><br>"
for(var/fiber in fibers.evidence)
report.info += span_notice("Most likely match for fibers: [fiber]") + "<br><br>"
else
report.info += "No fibers found."
else if(istype(sample, /obj/item/sample/print))
report.name = "Fingerprint report #[report_num]: [sample.name]"
report.info = span_bold("Fingerprint analysis report #[report_num]") + ": [sample.name]<br>"
var/obj/item/sample/print/card = sample
if(card.evidence && card.evidence.len)
report.info += "Surface analysis has determined unique fingerprint strings:<br><br>"
for(var/prints in card.evidence)
report.info += span_notice("Fingerprint string: ")
if(!is_complete_print(card.evidence[prints]))
report.info += "INCOMPLETE PRINT:[card.evidence[prints]]"
else
report.info += "[prints]"
report.info += "<br>"
else
report.info += "No information available."
if(report)
report.update_icon()
if(report.info)
to_chat(user,report.info)
return
/obj/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/machinery/microscope/click_alt()
remove_sample(usr)
/obj/machinery/microscope/MouseDrop(var/atom/other)
if(usr == other)
remove_sample(usr)
else
return ..()
/obj/machinery/microscope/update_icon()
icon_state = "microscope"
if(sample)
icon_state += "slide"