S.P.L.U.R.T-Station-13/modular_sand/code/datums/interactions/interaction_datums/lewd/nipsuck.dm

/datum/interaction/lewd/nipsuck
	description = "Suck their nipples."
	required_from_user = INTERACTION_REQUIRE_MOUTH
	required_from_target_exposed = INTERACTION_REQUIRE_BREASTS
	write_log_user = "sucked nipples"
	write_log_target = "had their nipples sucked by"
	interaction_sound = null
	additional_details = list(
		INTERACTION_MAY_CONTAIN_DRINK
	)

/datum/interaction/lewd/nipsuck/display_interaction(mob/living/carbon/human/user, mob/living/carbon/human/target)
	if((user.a_intent == INTENT_HELP) || (user.a_intent == INTENT_DISARM))
		user.visible_message(
				pick(span_lewd("\The <b>[user]</b> gently sucks on \the <b>[target]</b>'s [pick("nipple", "nipples")]."),
					span_lewd("\The <b>[user]</b> gently nibs \the <b>[target]</b>'s [pick("nipple", "nipples")]."),
					span_lewd("\The <b>[user]</b> licks \the <b>[target]</b>'s [pick("nipple", "nipples")].")))
		var/has_breasts = target.has_breasts()
		if(has_breasts == TRUE || has_breasts == HAS_EXPOSED_GENITAL)
			var/modifier = 1
			var/obj/item/organ/genital/breasts/B = target.getorganslot(ORGAN_SLOT_BREASTS)
			switch(B.size)
				if("c", "d", "e")
					modifier = 2
				if("f", "g", "h")
					modifier = 3
				else
					if(B.size in B.breast_values)
						modifier = clamp(B.breast_values[B.size] - 5, 0, INFINITY)
					else
						modifier = 1
			if(B.fluid_id)
				user.reagents.add_reagent(B.fluid_id, rand(1,2 * modifier))

	if(user.a_intent == INTENT_HARM)
		user.visible_message(
				pick(span_lewd("\The <b>[user]</b> bites \the <b>[target]</b>'s [pick("nipple", "nipples")]."),
					span_lewd("\The <b>[user]</b> aggressively sucks \the <b>[target]</b>'s [pick("nipple", "nipples")].")))
		var/has_breasts = target.has_breasts()
		if(has_breasts == TRUE || has_breasts == HAS_EXPOSED_GENITAL)
			var/modifier = 1
			var/obj/item/organ/genital/breasts/B = target.getorganslot(ORGAN_SLOT_BREASTS)
			switch(B.size)
				if("c", "d", "e")
					modifier = 2
				if("f", "g", "h")
					modifier = 3
				else
					if(B.size in B.breast_values)
						modifier = clamp(B.breast_values[B.size] - 5, 0, INFINITY)
					else
						modifier = 1
			if(B.fluid_id)
				user.reagents.add_reagent(B.fluid_id, rand(1,3 * modifier)) //aggressive sucking leads to high rewards

	if(user.a_intent == INTENT_GRAB)
		user.visible_message(
				pick(span_lewd("\The <b>[user]</b> sucks \the <b>[target]</b>'s [pick("nipple", "nipples")] intently."),
					span_lewd("\The <b>[user]</b> feasts \the <b>[target]</b>'s [pick("nipple", "nipples")]."),
					span_lewd("\The <b>[user]</b> glomps \the <b>[target]</b>'s [pick("nipple", "nipples")].")))
		var/has_breasts = target.has_breasts()
		if(has_breasts == TRUE || has_breasts == HAS_EXPOSED_GENITAL)
			var/modifier = 1
			var/obj/item/organ/genital/breasts/B = target.getorganslot(ORGAN_SLOT_BREASTS)
			switch(B.size)
				if("c", "d", "e")
					modifier = 2
				if("f", "g", "h")
					modifier = 3
				else
					if(B.size in B.breast_values)
						modifier = clamp(B.breast_values[B.size] - 5, 0, INFINITY)
					else
						modifier = 1
			if(B.fluid_id)
				user.reagents.add_reagent(B.fluid_id, rand(1,3 * modifier)) //aggressive sucking leads to high rewards

	if(prob(5 + target.get_lust()))
		if(target.a_intent == INTENT_HELP)
			if(!target.has_breasts())
				user.visible_message(
					pick(span_lewd("\The <b>[target]</b> shivers in arousal."),
						span_lewd("\The <b>[target]</b> moans quietly."),
						span_lewd("\The <b>[target]</b> breathes out a soft moan."),
						span_lewd("\The <b>[target]</b> gasps."),
						span_lewd("\The <b>[target]</b> shudders softly."),
						span_lewd("\The <b>[target]</b> trembles as their chest gets molested.")))
			else
				user.visible_message(
					pick(span_lewd("\The <b>[target]</b> shivers in arousal."),
						span_lewd("\The <b>[target]</b> moans quietly."),
						span_lewd("\The <b>[target]</b> breathes out a soft moan."),
						span_lewd("\The <b>[target]</b> gasps."),
						span_lewd("\The <b>[target]</b> shudders softly."),
						span_lewd("\The <b>[target]</b> trembles as their breasts get molested."),
						span_lewd("\The <b>[target]</b> quivers in arousal as \the <b>[user]</b> delights themselves on their milk.")))
			if(target.get_lust() < 5)
				target.set_lust(5)
		if(target.a_intent == INTENT_DISARM)
			if (target.restrained())
				if(!target.has_breasts())
					user.visible_message(
						pick(span_lewd("\The <b>[target]</b> twists playfully against the restraints."),
							span_lewd("\The <b>[target]</b> squirms away from \the <b>[user]</b>'s mouth."),
							span_lewd("\The <b>[target]</b> slides back from \the <b>[user]</b>'s mouth."),
							span_lewd("\The <b>[target]</b> thrusts their bare chest forward into \the <b>[user]</b>'s mouth.")))
				else
					user.visible_message(
						pick(span_lewd("\The <b>[target]</b> twists playfully against the restraints."),
							span_lewd("\The <b>[target]</b> squirms away from \the <b>[user]</b>'s mouth."),
							span_lewd("\The <b>[target]</b> slides back from \the <b>[user]</b>'s mouth."),
							span_lewd("\The <b>[target]</b> thrust their bare breasts forward into \the <b>[user]</b>'s mouth.")))
			else
				if(!target.has_breasts())
					user.visible_message(
						pick(span_lewd("\The <b>[target]</b> playfully shoos away \the <b>[user]</b>'s head."),
							span_lewd("\The <b>[target]</b> squirms away from \the <b>[user]</b>'s mouth."),
							span_lewd("\The <b>[target]</b> holds \the <b>[user]</b>'s head against their chest."),
							span_lewd("\The <b>[target]</b> teasingly caresses \the <b>[user]</b>'s neck.")))
				else
					user.visible_message(
						pick(span_lewd("\The <b>[target]</b> playfully shoos away \the <b>[user]</b>'s head."),
							span_lewd("\The <b>[target]</b> squirms away from \the <b>[user]</b>'s mouth."),
							span_lewd("\The <b>[target]</b> holds \the <b>[user]</b>'s head against their breast."),
							span_lewd("\The <b>[target]</b> teasingly caresses \the <b>[user]</b>'s neck."),
							span_lewd("\The <b>[target]</b> rubs their breasts against \the <b>[user]</b>'s head.")))
			if(target.get_lust() < 10)
				target.add_lust(1)
	if(target.a_intent == INTENT_GRAB)
		user.visible_message(
				pick(span_lewd("\The <b>[target]</b> grips \the <b>[user]</b>'s head tight."),
				 span_lewd("\The <b>[target]</b> digs nails into \the <b>[user]</b>'s scalp."),
				 span_lewd("\The <b>[target]</b> grabs and shoves \the <b>[user]</b>'s head away.")))
	if(target.a_intent == INTENT_HARM)
		user.adjustBruteLoss(1)
		user.visible_message(
				pick(span_lewd("\The <b>[target]</b> slaps \the <b>[user]</b> away."),
				 span_lewd("\The <b>[target]</b> scratches <b>[user]</b>'s face."),
				 span_lewd("\The <b>[target]</b> fiercely struggles against <b>[user]</b>."),
				 span_lewd("\The <b>[target]</b> claws <b>[user]</b>'s face, drawing blood."),
				 span_lewd("\The <b>[target]</b> elbows <b>[user]</b>'s mouth away.")))
	target.dir = get_dir(target, user)
	user.dir = get_dir(user, target)
	playlewdinteractionsound(get_turf(user), pick('modular_sand/sound/interactions/oral1.ogg',
						'modular_sand/sound/interactions/oral2.ogg'), 70, 1, -1)
	return