diff --git a/code/game/machinery/frame.dm b/code/game/machinery/frame.dm
index 6c71e63207..c3fa1701fd 100644
--- a/code/game/machinery/frame.dm
+++ b/code/game/machinery/frame.dm
@@ -202,6 +202,12 @@
frame_class = FRAME_CLASS_MACHINE
frame_size = 3
+/datum/frame/frame_types/injector_maker
+ name = "Ready-to-Use Medicine 3000"
+ frame_class = FRAME_CLASS_MACHINE
+ circuit = /obj/machinery/atmospheric_field_generator
+ frame_size = 3
+
//////////////////////////////
// Frame Object (Structure)
//////////////////////////////
diff --git a/code/game/objects/items/weapons/circuitboards/frame.dm b/code/game/objects/items/weapons/circuitboards/frame.dm
index 7ef7c4bfef..000cd011f6 100644
--- a/code/game/objects/items/weapons/circuitboards/frame.dm
+++ b/code/game/objects/items/weapons/circuitboards/frame.dm
@@ -264,4 +264,17 @@
/obj/item/weapon/stock_parts/micro_laser/high = 2, //field emitters
/obj/item/weapon/stock_parts/scanning_module = 1, //atmosphere sensor
/obj/item/weapon/stock_parts/capacitor/adv = 1, //for the JUICE
- /obj/item/stack/cable_coil = 10)
\ No newline at end of file
+ /obj/item/stack/cable_coil = 10)
+
+
+/obj/item/weapon/circuitboard/injector_maker
+ name = T_BOARD("Ready-to-Use Medicine 3000")
+ build_path = /obj/machinery/injector_maker
+ board_type = new /datum/frame/frame_types/injector_maker
+ origin_tech = list(TECH_BIO = 3, TECH_ENGINEERING = 2, TECH_MATERIAL = 2)
+ req_components = list(
+ /obj/item/weapon/stock_parts/matter_bin = 2,
+ /obj/item/weapon/stock_parts/manipulator = 1,
+ /obj/item/weapon/stock_parts/micro_laser = 1,
+ /obj/item/weapon/stock_parts/console_screen = 1
+ )
diff --git a/code/modules/reagents/machinery/injector_maker.dm b/code/modules/reagents/machinery/injector_maker.dm
new file mode 100644
index 0000000000..2c561dcc7b
--- /dev/null
+++ b/code/modules/reagents/machinery/injector_maker.dm
@@ -0,0 +1,281 @@
+/obj/machinery/injector_maker
+ name = "Ready-to-Use Medicine 3000"
+ desc = "Fills plastic autoinjectors with chemicals! Molds new injectors if needed! \n Add a beaker or a bottle filled with chemicals and an autoinjector of appropriate size or sheets of plastic to use!"
+ icon = 'icons/obj/chemical_vr.dmi'
+ icon_state = "injector"
+ use_power = USE_POWER_IDLE
+ anchored = TRUE
+ density = FALSE
+ layer = ABOVE_WINDOW_LAYER
+ vis_flags = VIS_HIDE
+ unacidable = TRUE
+ clicksound = "button"
+ clickvol = 60
+ idle_power_usage = 5
+ active_power_usage = 100
+ circuit = /obj/item/weapon/circuitboard/injector_maker
+ var/obj/item/weapon/reagent_containers/beaker = null
+ var/list/beaker_reagents_list = list()
+
+
+ var/count_large_injector = 0
+ var/count_small_injector = 0
+ var/capacity_large_injector = 40
+ var/capacity_small_injector = 40
+
+ var/count_plastic = 0 //Given in "units", not sheets
+ var/value_plastic = 2000 //1 sheet translates to 2000 units
+ var/cost_plastic_small = 30
+ var/cost_plastic_large = 1500
+ var/capacity_plastic = 60000 // cost_plastic_large * 40
+
+
+/obj/machinery/injector_maker/Initialize()
+ . = ..()
+ default_apply_parts()
+
+/obj/machinery/injector_maker/update_icon()
+ if(!beaker && !count_plastic && !count_small_injector && !count_large_injector) //Empty
+ icon_state = "injector"
+ else if(beaker != null && !count_plastic && !count_small_injector && !count_large_injector ) //Has just beaker
+ icon_state = "injector_b"
+ else if(!beaker && !count_plastic && (count_large_injector > 0 || count_small_injector > 0)) //Has just injectors
+ icon_state = "injector_i"
+ else if(!beaker && count_plastic > 0 && !count_large_injector && !count_small_injector) //Has just plastic
+ icon_state = "injector_p"
+ else if(beaker != null && !count_plastic && (count_large_injector > 0 || count_small_injector > 0)) //beaker + injectors
+ icon_state = "injector_ib"
+ else if(beaker != null && count_plastic > 0 && !count_large_injector && !count_small_injector) //beaker + plastic
+ icon_state = "injector_pb"
+ else if(beaker != null && count_plastic > 0 && (count_large_injector > 0 || count_small_injector > 0)) //Has everything
+ icon_state = "injector_ipb"
+ return
+
+
+/obj/machinery/injector_maker/attackby(var/obj/item/O as obj, var/mob/user as mob)
+
+ if (istype(O, /obj/item/device/multitool))
+ return ..()
+
+ if(istype(O,/obj/item/weapon/reagent_containers/glass) || \
+ istype(O,/obj/item/weapon/reagent_containers/food/drinks/glass2) || \
+ istype(O,/obj/item/weapon/reagent_containers/food/drinks/shaker))
+
+ if (beaker)
+ return 1
+ else
+ src.beaker = O
+ user.drop_item()
+ O.loc = src
+ update_icon()
+ src.updateUsrDialog()
+ return 0
+
+
+
+ if(istype(O,/obj/item/weapon/reagent_containers/hypospray/autoinjector/empty))
+ var/obj/item/weapon/reagent_containers/hypospray/autoinjector/empty/E = O
+ if(src.count_small_injector >= src.capacity_small_injector)
+ to_chat(user, SPAN_WARNING("Storage is full! It can only hold [capacity_small_injector]"))
+ return
+ if(E.reagents.total_volume > 0)
+ to_chat(user, SPAN_WARNING("You cannot put a filled injector into the machine!"))
+ return
+ src.count_small_injector = src.count_small_injector + 1
+ qdel(E)
+ update_icon()
+ if(istype(O,/obj/item/weapon/reagent_containers/hypospray/autoinjector/biginjector/empty))
+ var/obj/item/weapon/reagent_containers/hypospray/autoinjector/biginjector/empty/E = O
+ if(src.count_large_injector >= src.capacity_large_injector)
+ to_chat(user, SPAN_WARNING("Storage is full! It can only hold [capacity_large_injector]"))
+ return
+ if(E.reagents.total_volume > 0)
+ to_chat(user, SPAN_WARNING("You cannot put a filled injector into the machine!"))
+ return
+ src.count_large_injector = src.count_large_injector + 1
+ qdel(E)
+ update_icon()
+
+
+ if(istype(O,/obj/item/stack/material))
+ if(O.get_material_name() == MAT_PLASTIC)
+ var/obj/item/stack/S = O
+ var/input_amount = tgui_input_number(user, "How many sheets would you like to add?", "Add plastic", 0, S.get_amount(), 0, 0, TRUE)
+ if(input_amount == 0)
+ return
+ var/plastic_input = input_amount * value_plastic
+ var/free_space = capacity_plastic - src.count_plastic
+ if(plastic_input > free_space)
+ to_chat(user, SPAN_WARNING("Storage is full! There is only [free_space] units worth of space left!"))
+ else
+ S.use(input_amount)
+ src.count_plastic = src.count_plastic + plastic_input
+ update_icon()
+
+
+/obj/machinery/injector_maker/AltClick(mob/user)
+ . = ..()
+ if(beaker)
+ if(!user.incapacitated() && Adjacent(user))
+ user.put_in_hands(beaker)
+ else
+ beaker.forceMove(drop_location())
+ src.beaker = null
+ update_icon()
+
+/obj/machinery/injector_maker/examine(mob/user)
+ . = ..()
+ if(!in_range(user, src) && !issilicon(user) && !isobserver(user))
+ . += "You're too far away to examine [src]'s contents and display!"
+ return
+
+ if(beaker)
+ . += "\The [src] contains:"
+ if(beaker)
+ . += "- \A [beaker]."
+
+ . += "\The [src] contains [src.count_small_injector] small injectors and [src.count_large_injector] large injectors.\n "
+ . += " It can hold [capacity_small_injector] small and [capacity_large_injector] large injectors respectively.\n "
+ . += " \The [src] contains [src.count_plastic] units of plastic. It can hold up to [capacity_plastic] units.\n "
+
+ if(!(stat & (NOPOWER|BROKEN)))
+ . += "The status display reads the following reagents:\n"
+ if(beaker)
+ for(var/datum/reagent/R in beaker.reagents.reagent_list)
+ . += "- [R.volume] units of [R.name]."
+
+/obj/machinery/injector_maker/attack_hand(mob/user as mob)
+ interact(user)
+
+/obj/machinery/injector_maker/interact(mob/user as mob)
+ if(user.incapacitated() || !beaker)
+ return
+
+ var/choice = tgui_input_list(user, "There are [src.count_small_injector] small and [src.count_large_injector] large injectors left.", "Choose what to do", list("large injector", "small injector", "eject beaker", "cancel"))
+
+ switch(choice)
+ if("cancel")
+ return
+ if("eject beaker")
+ if(!user.incapacitated() && Adjacent(user))
+ user.put_in_hands(beaker)
+ else
+ beaker.forceMove(drop_location())
+ src.beaker = null
+ update_icon()
+
+
+ if("small injector")
+ var/material = tgui_input_list(user, "Use autoinjector storage, or mold new injectors to fill?", "Choose Material", list("mold plastic", "use injectors"))
+ switch(material)
+ if("mold plastic")
+ if(src.count_plastic < cost_plastic_small)
+ to_chat(user, SPAN_WARNING("Not enough plastic! Need at least [cost_plastic_small] units."))
+ return
+ if("use injectors")
+ if(!src.count_small_injector)
+ to_chat(user, SPAN_WARNING("Small injector rack is empty!"))
+ return
+ if(!beaker.reagents.total_volume)
+ to_chat(user, SPAN_WARNING("Chemical storage is empty!"))
+ return
+ var/injector_amount = tgui_input_number(user, "How many injectors would you like?", "Make small injectors", 0, 100, 0, 0, TRUE)
+ if(injector_amount > 0)
+ switch(material)
+ if("mold plastic")
+ var/plastic_cost = cost_plastic_small * injector_amount
+ if(src.count_plastic < plastic_cost)
+ to_chat(user, SPAN_WARNING("Not enough plastic! Need at least [plastic_cost] units."))
+ return
+ if("use injectors")
+ if(src.count_small_injector < injector_amount)
+ to_chat(user, SPAN_WARNING("Not enough autoinjectors! You only have [src.count_small_injector]"))
+ return
+ var/name = sanitize(tgui_input_text(user, "Name Injector", "Naming", null, 32, 0, 0, 0, 0),MAX_MESSAGE_LEN,0,0,0)
+ make_injector("large injector", injector_amount, name, material, user)
+ update_icon()
+
+
+ if("large injector")
+ var/material = tgui_input_list(user, "Use autoinjector storage, or mold new injectors to fill?", "Choose Material", list("mold plastic", "use injectors"))
+ switch(material)
+ if("mold plastic")
+ if(src.count_plastic < cost_plastic_large)
+ to_chat(user, SPAN_WARNING("Not enough plastic! Need at least [cost_plastic_large] units."))
+ return
+ if("use injectors")
+ if(!src.count_large_injector)
+ to_chat(user, SPAN_WARNING("Large injector rack is empty!"))
+ return
+ if(!beaker.reagents.total_volume)
+ to_chat(user, SPAN_WARNING("Chemical storage is empty!"))
+ return
+ var/injector_amount = tgui_input_number(user, "How many injectors would you like?", "Make large injectors", 0, 100, 0, 0, TRUE)
+ if(injector_amount > 0)
+ switch(material)
+ if("mold plastic")
+ var/plastic_cost = cost_plastic_large * injector_amount
+ if(src.count_plastic < plastic_cost)
+ to_chat(user, SPAN_WARNING("Not enough plastic! Need at least [plastic_cost] units."))
+ return
+ if("use injectors")
+ if(src.count_large_injector < injector_amount)
+ to_chat(user, SPAN_WARNING("Not enough autoinjectors! You only have [src.count_large_injector]"))
+ return
+ var/name = sanitize(tgui_input_text(user, "Name Injector", "Naming", null, 32, 0, 0, 0, 0),MAX_MESSAGE_LEN,0,0,0)
+ make_injector("large injector", injector_amount, name, material,user)
+ update_icon()
+
+
+/obj/machinery/injector_maker/proc/make_injector(var/size, var/amount, var/new_name, var/material, mob/user as mob)
+ if(!beaker)
+ return
+ var/amount_per_injector = null
+ var/proceed = "Yes" //Defaulting to Yes. We only check if the amount/injector gets under max volume
+ switch(size)
+ if("small injector")
+ amount_per_injector = CLAMP(beaker.reagents.total_volume / amount, 0, 5)
+ if("large injector")
+ amount_per_injector = CLAMP(beaker.reagents.total_volume / amount, 0, 15)
+ if((size == "small injector" && amount_per_injector < 5) || size == "large injector" && amount_per_injector < 15)
+ proceed = tgui_alert(usr, "Heads up! Less than max volume per injector!\n Making [amount] [size](s) filled with [amount_per_injector] total reagent volume each!","Proceed?",list("No","Yes"))
+ if(proceed == "No" || !amount_per_injector)
+ return
+ for(var/i, i < amount, i++)
+ switch(size)
+ if("small injector")
+ switch(material)
+ if("mold plastic")
+ if(src.count_plastic < cost_plastic_small)
+ return
+ else
+ src.count_plastic = src.count_plastic - cost_plastic_small
+ if("use injectors")
+ if(!src.count_small_injector)
+ return
+ else
+ src.count_small_injector = src.count_small_injector - 1
+ var/obj/item/weapon/reagent_containers/hypospray/autoinjector/empty/P = new(loc)
+ beaker.reagents.trans_to_obj(P, amount_per_injector)
+ P.update_icon()
+ if(new_name)
+ P.name = new_name
+
+
+ if("large injector")
+ switch(material)
+ if("mold plastic")
+ if(src.count_plastic < cost_plastic_large)
+ return
+ else
+ src.count_plastic = src.count_plastic - cost_plastic_large
+ if("use injectors")
+ if(!src.count_large_injector)
+ return
+ else
+ src.count_large_injector = src.count_large_injector - 1
+ var/obj/item/weapon/reagent_containers/hypospray/autoinjector/biginjector/empty/P = new(loc)
+ beaker.reagents.trans_to_obj(P, amount_per_injector)
+ P.update_icon()
+ if(new_name)
+ P.name = new_name
diff --git a/icons/obj/chemical_vr.dmi b/icons/obj/chemical_vr.dmi
index a08a052c90..f6669126d8 100644
Binary files a/icons/obj/chemical_vr.dmi and b/icons/obj/chemical_vr.dmi differ
diff --git a/maps/groundbase/gb-z2.dmm b/maps/groundbase/gb-z2.dmm
index 9c8fd0216f..27353d94d0 100644
--- a/maps/groundbase/gb-z2.dmm
+++ b/maps/groundbase/gb-z2.dmm
@@ -2739,6 +2739,9 @@
/obj/machinery/light{
dir = 8
},
+/obj/machinery/injector_maker{
+ pixel_x = -29
+ },
/turf/simulated/floor/tiled/white,
/area/groundbase/medical/Chemistry)
"hK" = (
@@ -14967,6 +14970,10 @@
/obj/machinery/camera/network/medbay{
dir = 1
},
+/obj/structure/table/glass,
+/obj/machinery/injector_maker{
+ pixel_y = -31
+ },
/turf/simulated/floor/tiled/white,
/area/groundbase/medical/triage)
"QG" = (
diff --git a/maps/stellar_delight/stellar_delight2.dmm b/maps/stellar_delight/stellar_delight2.dmm
index 3c45547994..95df34bba2 100644
--- a/maps/stellar_delight/stellar_delight2.dmm
+++ b/maps/stellar_delight/stellar_delight2.dmm
@@ -4177,6 +4177,9 @@
/obj/item/weapon/reagent_containers/glass/beaker/large,
/obj/item/weapon/reagent_containers/dropper,
/obj/machinery/atmospherics/unary/vent_pump/on,
+/obj/machinery/injector_maker{
+ pixel_y = 21
+ },
/turf/simulated/floor/tiled/eris/white/bluecorner,
/area/medical/chemistry)
"jg" = (
@@ -4436,9 +4439,6 @@
/area/stellardelight/deck2/fore)
"jK" = (
/obj/structure/table/glass,
-/obj/machinery/camera/network/medbay{
- dir = 4
- },
/turf/simulated/floor/tiled/eris/white/bluecorner,
/area/stellardelight/deck2/triage)
"jL" = (
@@ -22226,6 +22226,9 @@
/obj/machinery/camera/network/medbay{
dir = 8
},
+/obj/machinery/injector_maker{
+ pixel_x = 29
+ },
/turf/simulated/floor/tiled/eris/white/bluecorner,
/area/stellardelight/deck2/triage)
"WZ" = (
diff --git a/maps/tether/tether-03-surface3.dmm b/maps/tether/tether-03-surface3.dmm
index 85e772261d..dc4620fa0a 100644
--- a/maps/tether/tether-03-surface3.dmm
+++ b/maps/tether/tether-03-surface3.dmm
@@ -5329,6 +5329,9 @@
pixel_x = -4;
pixel_y = 5
},
+/obj/machinery/injector_maker{
+ pixel_x = -27
+ },
/turf/simulated/floor/tiled/white,
/area/tether/surfacebase/medical/triage)
"ahP" = (
@@ -7069,8 +7072,8 @@
/obj/machinery/light{
dir = 4
},
-/obj/structure/sign/poster{
- dir = 4
+/obj/machinery/injector_maker{
+ pixel_x = 28
},
/turf/simulated/floor/tiled/white,
/area/tether/surfacebase/medical/chemistry)
diff --git a/vorestation.dme b/vorestation.dme
index f56bf5ddcd..834d790ce3 100644
--- a/vorestation.dme
+++ b/vorestation.dme
@@ -3683,6 +3683,7 @@
#include "code\modules\reagents\machinery\chemalyzer.dm"
#include "code\modules\reagents\machinery\distillery.dm"
#include "code\modules\reagents\machinery\grinder.dm"
+#include "code\modules\reagents\machinery\injector_maker.dm"
#include "code\modules\reagents\machinery\pump.dm"
#include "code\modules\reagents\machinery\dispenser\_defines.dm"
#include "code\modules\reagents\machinery\dispenser\cartridge.dm"