[MIRROR] AllergyPen and autoinjector costs (#10714)

Co-authored-by: SatinIsle <98125273+SatinIsle@users.noreply.github.com>

code/modules/client/preference_setup/loadout/loadout_utility.dm

@@ -322,3 +322,8 @@ modular computers
 	display_name = "blood bag (Randomized)"
 	path = /obj/item/reagent_containers/blood/random_bloodsucker
 	cost = 1
+
+/datum/gear/utility/allergypen //For people with allergies
+	display_name = "AllergyPen"
+	path = /obj/item/reagent_containers/hypospray/autoinjector/allergen
+	cost = 1

code/modules/economy/vending_machines.dm

@@ -459,6 +459,7 @@
 					/obj/item/reagent_containers/glass/bottle/toxin = 4,
 					/obj/item/reagent_containers/syringe/antiviral = 4,
 					/obj/item/reagent_containers/syringe = 12,
+					/obj/item/reagent_containers/hypospray/autoinjector/allergen = 6,
 					/obj/item/healthanalyzer = 5,
 					/obj/item/reagent_containers/glass/beaker = 4,
 					/obj/item/reagent_containers/dropper = 2,

code/modules/reagents/machinery/injector_maker.dm

@@ -25,9 +25,9 @@
 
 	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_small = 25
-	var/cost_plastic_large = 1500
+	var/cost_plastic_large = 250
-	var/capacity_plastic = 60000 // cost_plastic_large * 40
+	var/capacity_plastic = 60000 // 30 sheets of plastic
 
 
 /obj/machinery/injector_maker/Initialize(mapload)

code/modules/reagents/reagent_containers/hypospray.dm

@@ -225,6 +225,12 @@
 	desc = "A rapid and safe way to administer small amounts of drugs by untrained or trained personnel. This one excels at treating genetic damage."
 	filled_reagents = list(REAGENT_ID_REZADONE = 5)
 
+/obj/item/reagent_containers/hypospray/autoinjector/allergen
+	name = "AllergyPen"
+	desc = "An autoinjector designed for use during an allergic reaction or anaphylaxis. The user should immediately seek medical support after use, for additional monitoring and aid."
+	icon_state = "allergy"
+	item_state = "allergy"
+
 // These have a 15u capacity, somewhat higher tech level, and generally more useful chems, but are otherwise the same as the regular autoinjectors.
 /obj/item/reagent_containers/hypospray/autoinjector/biginjector
 	name = "empty hypo"