feat(pins): removes absence of pride pins

baystation12.dme

@@ -1802,6 +1802,7 @@
 #include "code\modules\clothing\under\accessories\holster.dm"
 #include "code\modules\clothing\under\accessories\lockets.dm"
 #include "code\modules\clothing\under\accessories\medals.dm"
+#include "code\modules\clothing\under\accessories\pins.dm"
 #include "code\modules\clothing\under\accessories\stethoscope.dm"
 #include "code\modules\clothing\under\accessories\storage.dm"
 #include "code\modules\clothing\under\accessories\ties.dm"

code/modules/client/preference_setup/loadout/lists/accessories.dm

@@ -131,3 +131,18 @@
 	dogtag.stored_name = H.real_name
 	dogtag.religion = H.religion
 	dogtag.stored_blood_type = H.b_type
+
+/datum/gear/accessory/pin
+	display_name = "pin selection"
+	description = "A Nanotrasen holographic pin to show off your loyalty to the company, reminding the crew of your unwavering commitment to whatever NanoTrasen's up to!"
+	path = /obj/item/clothing/accessory/pin
+
+/datum/gear/accessory/pin/New()
+	..()
+	var/pinies = list()
+	pinies["NanoTrasen pin"] = /obj/item/clothing/accessory/pin
+	pinies["pig pin"]        = /obj/item/clothing/accessory/pin/pig
+	pinies["skull pin"]      = /obj/item/clothing/accessory/pin/skull
+	pinies["rainbow pin"]    = /obj/item/clothing/accessory/pin/pride
+
+	gear_tweaks += new /datum/gear_tweak/path(pinies)

code/modules/clothing/under/accessories/pins.dm

@@ -0,0 +1,81 @@
+
+/obj/item/clothing/accessory/pin
+	name = "NT pin"
+	desc = "A Nanotrasen holographic pin to show off your loyalty to the company, reminding the crew of your unwavering commitment to whatever NanoTrasen's up to!"
+	icon_state = "nt"
+	slot_flags = SLOT_TIE
+	slot = ACCESSORY_SLOT_INSIGNIA
+
+/obj/item/clothing/accessory/pin/pig
+	name = "pig pin"
+	desc = "A holographic pin to show off your true nature."
+	icon_state = "pig"
+
+/obj/item/clothing/accessory/pin/skull
+	name = "skull pin"
+	desc = "A holographic pin to show off your edgy nature."
+	icon_state = "skull"
+
+/obj/item/clothing/accessory/pin/pride
+	name = "rainbow pin"
+	desc = "A Nanotrasen Diversity & Inclusion Center-sponsored holographic pin to show off your pride, reminding the crew of their unwavering commitment to equity, diversity, and inclusion!"
+	icon_state = "pride"
+
+	var/pride = 0
+	var/static/list/prides = list(
+		"rainbow:pride",
+		"bisexual:pride_bi",
+		"pansexual:pride_pan",
+		"asexual:pride_ace",
+		"non-binary:pride_enby",
+		"transgender:pride_trans",
+		"intersex:pride_intersex",
+		"lesbian:pride_lesbian"
+	)
+
+/obj/item/clothing/accessory/pin/pride/Initialize()
+	. = ..()
+	for(var/i = 1 to length(prides))
+		if(findtext(prides[i], icon_state))
+			pride = i
+			break
+
+/obj/item/clothing/accessory/pin/pride/attack_self(mob/user)
+	if(!pride)
+		return
+
+	to_chat(user, "You toggle the pin.")
+	add_fingerprint(user)
+
+	pride = pride >= length(prides) ? 1 : pride + 1
+	var/sep_pos = findtext(prides[pride], ":")
+	name = copytext(prides[pride], 1, sep_pos) + " pin"
+	icon_state = copytext(prides[pride], sep_pos + 1)
+
+/obj/item/clothing/accessory/pin/pride/bi
+	name = "bisexual pin"
+	icon_state = "pride_bi"
+
+/obj/item/clothing/accessory/pin/pride/pan
+	name = "pansexual pin"
+	icon_state = "pride_pan"
+
+/obj/item/clothing/accessory/pin/pride/ace
+	name = "asexual pin"
+	icon_state = "pride_ace"
+
+/obj/item/clothing/accessory/pin/pride/enby
+	name = "non-binary pin"
+	icon_state = "pride_enby"
+
+/obj/item/clothing/accessory/pin/pride/trans
+	name = "transgender pin"
+	icon_state = "pride_trans"
+
+/obj/item/clothing/accessory/pin/pride/intersex
+	name = "intersex pin"
+	icon_state = "pride_intersex"
+
+/obj/item/clothing/accessory/pin/pride/lesbian
+	name = "lesbian pin"
+	icon_state = "pride_lesbian"