-
Notifications
You must be signed in to change notification settings - Fork 4.9k
/
medipen_refiller.dm
96 lines (87 loc) · 3.86 KB
/
medipen_refiller.dm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
/obj/machinery/medipen_refiller
name = "Medipen Refiller"
desc = "A machine that refills used medipens with chemicals."
icon = 'icons/obj/machines/medipen_refiller.dmi'
icon_state = "medipen_refiller"
density = TRUE
circuit = /obj/item/circuitboard/machine/medipen_refiller
idle_power_usage = 100
/// list of medipen subtypes it can refill
var/list/allowed = list(/obj/item/reagent_containers/hypospray/medipen = /datum/reagent/medicine/epinephrine,
/obj/item/reagent_containers/hypospray/medipen/atropine = /datum/reagent/medicine/atropine,
/obj/item/reagent_containers/hypospray/medipen/salbutamol = /datum/reagent/medicine/salbutamol,
/obj/item/reagent_containers/hypospray/medipen/oxandrolone = /datum/reagent/medicine/oxandrolone,
/obj/item/reagent_containers/hypospray/medipen/salacid = /datum/reagent/medicine/sal_acid,
/obj/item/reagent_containers/hypospray/medipen/penacid = /datum/reagent/medicine/pen_acid)
/// var to prevent glitches in the animation
var/busy = FALSE
/obj/machinery/medipen_refiller/Initialize()
. = ..()
create_reagents(100, TRANSPARENT)
for(var/obj/item/stock_parts/matter_bin/B in component_parts)
reagents.maximum_volume += 100 * B.rating
AddComponent(/datum/component/plumbing/simple_demand)
/obj/machinery/medipen_refiller/RefreshParts()
var/new_volume = 100
for(var/obj/item/stock_parts/matter_bin/B in component_parts)
new_volume += 100 * B.rating
if(!reagents)
create_reagents(new_volume, TRANSPARENT)
reagents.maximum_volume = new_volume
return TRUE
/// handles the messages and animation, calls refill to end the animation
/obj/machinery/medipen_refiller/attackby(obj/item/I, mob/user, params)
if(busy)
to_chat(user, "<span class='danger'>The machine is busy.</span>")
return
if(istype(I, /obj/item/reagent_containers) && I.is_open_container())
var/obj/item/reagent_containers/RC = I
var/units = RC.reagents.trans_to(src, RC.amount_per_transfer_from_this, transfered_by = user)
if(units)
to_chat(user, "<span class='notice'>You transfer [units] units of the solution to the [name].</span>")
return
else
to_chat(user, "<span class='danger'>The [name] is full.</span>")
return
if(istype(I, /obj/item/reagent_containers/hypospray/medipen))
var/obj/item/reagent_containers/hypospray/medipen/P = I
if(!(LAZYFIND(allowed, P.type)))
to_chat(user, "<span class='danger'>Error! Unknown schematics.</span>")
return
if(P.reagents?.reagent_list.len)
to_chat(user, "<span class='notice'>The medipen is already filled.</span>")
return
if(reagents.has_reagent(allowed[P.type], 10))
busy = TRUE
add_overlay("active")
addtimer(CALLBACK(src, .proc/refill, P, user), 20)
qdel(P)
return
to_chat(user, "<span class='danger'>There aren't enough reagents to finish this operation.</span>")
return
..()
/obj/machinery/medipen_refiller/plunger_act(obj/item/plunger/P, mob/living/user, reinforced)
to_chat(user, "<span class='notice'>You start furiously plunging [name].</span>")
if(do_after(user, 30, target = src))
to_chat(user, "<span class='notice'>You finish plunging the [name].</span>")
reagents.expose(get_turf(src), TOUCH)
reagents.clear_reagents()
/obj/machinery/medipen_refiller/wrench_act(mob/living/user, obj/item/I)
..()
default_unfasten_wrench(user, I)
return TRUE
/obj/machinery/medipen_refiller/crowbar_act(mob/user, obj/item/I)
..()
default_deconstruction_crowbar(I)
return TRUE
/obj/machinery/medipen_refiller/screwdriver_act(mob/living/user, obj/item/I)
. = ..()
if(!.)
return default_deconstruction_screwdriver(user, "medipen_refiller_open", "medipen_refiller", I)
/// refills the medipen
/obj/machinery/medipen_refiller/proc/refill(obj/item/reagent_containers/hypospray/medipen/P, mob/user)
new P.type(loc)
reagents.remove_reagent(allowed[P.type], 10)
cut_overlays()
busy = FALSE
to_chat(user, "<span class='notice'>Medipen refilled.</span>")