Made ties on some suits detachable

-Detective suit, grey
-Detective suit, dark
-Lawyer suit, blue,
-IA suit

code/modules/clothing/clothing.dm

@@ -7,6 +7,7 @@
 	var/list/accessories = list()
 	var/list/valid_accessory_slots
 	var/list/restricted_accessory_slots
+	var/list/starting_accessories
 
 	/*
 		Sprites used when the clothing item is refit. This is done by setting icon_override.
@@ -26,6 +27,13 @@
 	..()
 	gunshot_residue = null
 
+/obj/item/clothing/New()
+	..()
+	if(starting_accessories)
+		for(var/T in starting_accessories)
+			var/obj/item/clothing/accessory/tie = new T(src)
+			src.attach_accessory(null, tie)
+
 //BS12: Species-restricted clothing check.
 /obj/item/clothing/mob_can_equip(M as mob, slot)
 

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

@@ -80,6 +80,14 @@
 	name = "red tie"
 	icon_state = "redtie"
 
+/obj/item/clothing/accessory/blue_clip
+	name = "blue tie with a clip"
+	icon_state = "bluecliptie"
+
+/obj/item/clothing/accessory/red_long
+	name = "red long tie"
+	icon_state = "redlongtie"
+
 /obj/item/clothing/accessory/black
 	name = "black tie"
 	icon_state = "blacktie"

code/modules/clothing/under/jobs/civilian.dm

@@ -115,6 +115,7 @@
 	item_state = "ba_suit"
 	worn_state = "internalaffairs"
 	rolled_sleeves = 0
+	starting_accessories = list(/obj/item/clothing/accessory/black)
 
 /obj/item/clothing/under/rank/janitor
 	desc = "It's the official uniform of the station's janitor. It has minor protection from biohazards."
@@ -155,10 +156,11 @@
 
 /obj/item/clothing/under/lawyer/bluesuit
 	name = "Blue Suit"
-	desc = "A classy suit and tie"
+	desc = "A classy suit."
 	icon_state = "bluesuit"
 	item_state = "ba_suit"
 	worn_state = "bluesuit"
+	starting_accessories = list(/obj/item/clothing/accessory/red)
 
 /obj/item/clothing/under/lawyer/purpsuit
 	name = "Purple Suit"

code/modules/clothing/under/jobs/security.dm

@@ -81,13 +81,14 @@
  */
 /obj/item/clothing/under/det
 	name = "detective's suit"
-	desc = "A rumpled white dress shirt paired with well-worn grey slacks, complete with a blue striped tie and a faux-gold tie clip."
+	desc = "A rumpled white dress shirt paired with well-worn grey slacks."
 	icon_state = "detective"
 	item_state = "det"
 	worn_state = "detective"
 	armor = list(melee = 10, bullet = 0, laser = 0,energy = 0, bomb = 0, bio = 0, rad = 0)
 	siemens_coefficient = 0.9
 	rolled_sleeves = 0
+	starting_accessories = list(/obj/item/clothing/accessory/blue_clip)
 
 /*
 /obj/item/clothing/under/det/verb/rollup()
@@ -103,13 +104,15 @@
 /obj/item/clothing/under/det/grey
 	icon_state = "detective2"
 	worn_state = "detective2"
-	desc = "A serious-looking tan dress shirt paired with freshly-pressed black slacks, complete with a red striped tie."
+	desc = "A serious-looking tan dress shirt paired with freshly-pressed black slacks."
+	starting_accessories = list(/obj/item/clothing/accessory/red_long)
 
 /obj/item/clothing/under/det/black
 	icon_state = "detective3"
 	worn_state = "detective3"
 	item_state = "sl_suit"
 	desc = "An immaculate white dress shirt, paired with a pair of dark grey dress pants, a red tie, and a charcoal vest."
+	starting_accessories = null
 
 /obj/item/clothing/under/det/corporate
 	name = "detective's jumpsuit"