Adding the 'special' interactions to a specific plush. (#4515)

## About The Pull Request

This is a completely cursed PR, Y'know the screws plush? You can now use
it... Why? Don't ask me.

<details>
<summary> EXPLICIT CONTENT WARNING!! </summary>
This literally makes the suggested fleshlight on the plush actually work
as one, 'cause funny... it also adds the capability to make others...
'usable'.

</details>
## Why It's Good For The Game

~~More holes...~~

## Proof Of Testing
<details>
<summary>Screenshots/Videos (EXPLICIT CONTENT WARNING)</summary>

<img width="648" height="185" alt="image"
src="https://github.com/user-attachments/assets/b8e6b280-0427-4010-a9d5-0a0d5bc2152e"
/>


</details>

## Changelog
🆑
code: adds cursed functionality to a specific CE plush.
/🆑

---------

Co-authored-by: Alexis <catmc8565@gmail.com>

modular_skyrat/modules/modular_items/lewd_items/code/lewd_items/fleshlight.dm

@@ -89,3 +89,58 @@
 						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang4.ogg',
 						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang5.ogg',
 						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang6.ogg'), 70, 1, -1)
+
+/obj/item/toy/plush/fleshlight/screws
+	name = "Chief Screws Plush"
+	desc = "An adorable blue Lizard plushie wearing a Chief Engineer's Uniform... her upturned skirt revealing a tight, pre-lubed pussy."
+	icon = 'modular_zubbers/icons/obj/toys/plushes.dmi'
+	icon_state = "cescrewsplush"
+	base_icon_state = "cescrewsplush"
+
+/obj/item/toy/plush/fleshlight/screws/examine(mob/user)
+	. = ..()
+	. += span_notice("Alt-click to cover her up.")
+
+/obj/item/toy/plush/fleshlight/screws/click_alt(mob/user)
+	user.visible_message(span_notice("[user] turns [src], hiding the hole underneath."), span_notice("You turn [src], covering her up with her little skirt."))
+	playsound(user, 'sound/effects/blob/blobattack.ogg', 50, TRUE)
+	var/obj/item/toy/plush/cescrewsplush/plushie = new(null)
+	qdel(src)
+	user.put_in_hands(plushie)
+	return TRUE
+
+/obj/item/toy/plush/fleshlight/attack(mob/living/carbon/human/target, mob/living/carbon/human/user)
+	. = ..()
+	if(!istype(target))
+		return
+	if(target.stat == DEAD)
+		return
+
+	if(!target.check_erp_prefs(/datum/preference/toggle/erp/sex_toy, user, src))
+		to_chat(user, span_danger("[target] doesn't want you to do that!"))
+		return
+
+	var/obj/item/organ/genital/penis = target.get_organ_slot(ORGAN_SLOT_PENIS)
+	if(!penis?.is_exposed())
+		to_chat(user, span_danger("Looks like [target]'s groin is covered!"))
+		return
+
+	var/message = (user == target) ? pick("moans in ecstasy as [target.p_they()] fuck the [src]",
+			"slowly moves [src] up and down on [target]'s penis, causing [target.p_them()] to bend in pleasure",
+			"shivers in pleasure as [target.p_they()] move [src] on their penis") \
+		: pick("uses [src] on [target]'s penis",
+			"fucks [target] with [src]",
+			"masturbates [target] with [src], causing [target.p_them()] to moan in ecstasy")
+
+	if(prob(70))
+		target.try_lewd_autoemote(pick("twitch_s", "moan", "blush"))
+	target.adjust_arousal(6)
+	target.adjust_pleasure(9)
+	user.visible_message(span_purple("[user] [message]!"))
+	conditional_pref_sound(loc, pick('modular_skyrat/modules/modular_items/lewd_items/sounds/bang1.ogg',
+						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang2.ogg',
+						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang3.ogg',
+						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang4.ogg',
+						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang5.ogg',
+						'modular_skyrat/modules/modular_items/lewd_items/sounds/bang6.ogg'), 70, 1, -1)
+

modular_zubbers/code/game/objects/items/plushes.dm

@@ -154,6 +154,18 @@
 	gender = FEMALE
 	squeak_override = list('sound/misc/soggy.ogg'=1)
 
+/obj/item/toy/plush/cescrewsplush/examine(mob/user)
+	. = ..()
+	. += span_notice("Alt-click to take a look under her skirt.")
+
+/obj/item/toy/plush/cescrewsplush/click_alt(mob/user)
+	user.visible_message(span_notice("[user] turns [src], revealing the hole underneath."), span_notice("You turn [src], revealing a tight, lubed hole."))
+	playsound(user, 'sound/effects/blob/blobattack.ogg', 50, TRUE)
+	var/obj/item/toy/plush/fleshlight/screws/toy = new(null)
+	qdel(src)
+	user.put_in_hands(toy)
+	return TRUE
+
 /obj/item/toy/plush/internshiba
 	name = "Intern Shiba Plush" //Plush for Kazumi Hasegawa/sprited by Amorbis
 	desc = "An adorable shiba inu plushie of a well-known intern mutt."