code:
:: Widgets Combat Beast [widget]

<<widget "beast">>

<<outfitChecks>>
<<set _n to $active_enemy>>

<<if $NPCList[_n].pronoun is "m">>
	<<set $pronoun to "m">>
<<elseif $NPCList[_n].pronoun is "f">>
	<<set $pronoun to "f">>
<<else>>
	<<set $pronoun to "i">>
<</if>>

<<if $NPCList[_n].stance is "top">>
	<<if $NPCList[_n].type is "horse" or $NPCList[_n].type is "centaur">>
		<<if $position is "wall">>
			The $NPCList[_n].type rears above your restrained body in a mating posture.
		<<else>>
			The $NPCList[_n].type rears above you in a mating posture.
		<</if>>
	<<else>>
		The $NPCList[_n].type has you pinned in a mating posture.
		<<if $semenpuddle gte 4>>
			<<if $water is 0>>
				The semen on the ground makes your knees slip with every thrust.
			<<else>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].stance is "topface">>
	The $NPCList[_n].type has you pinned from the front.
	<<if $semenpuddle gte 4>>
		<<if $water is 0>>
			The semen on the ground makes you slip with every thrust.
		<<else>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].stance is "approach">>
	<<if $enemyanger gte 120>>
		<<if $NPCList[_n].type is "hawk">>
			The $NPCList[_n].type shrieks at you.
		<<else>>
			The $NPCList[_n].type bares <<bhis>> teeth at you.
		<</if>>
	<<elseif $enemyanger gte 80>>
		<<if $NPCList[_n].type is "hawk">>
			The $NPCList[_n].type beats <<bhis>> wings.
		<<else>>
			The $NPCList[_n].type bares <<bhis>> teeth at you.
		<</if>>
	<<elseif $enemyanger gte 40>>
		<<if $water is 1>>
			The $NPCList[_n].type swims around you in a circle.
		<<elseif $NPCList[_n].type is "hawk">>
			The $NPCList[_n].type hops back and forth around you.
		<<else>>
			The $NPCList[_n].type paces back and forth.
		<</if>>
	<<else>>
		The $NPCList[_n].type bears down on you.
	<</if>>
<</if>>

<<if $NPCList[_n].monster is "monster">>

	<<hand_section>>

	/* End Hand Section */
<</if>>

<<if $NPCList[_n].mouth is "hair">>
	<<if $enemyanger + $rng lte 50>>
		<<bHe>> releases your hair.
		<<set $NPCList[_n].mouth to 0>>
	<<else>>
		<<bHe>> pulls on your hair, jerking your head back.
		<<violence 1>>
	<</if>>
<</if>>

<<beastclothing>>

<<if $NPCList[_n].mouth is "neck">>
	<<if $enemyanger + $rng lte 100>>
		<<bHe>> releases your neck from <<bhis>> <<beast_jaws_text>>.
		<<set $NPCList[_n].mouth to 0>>
	<<elseif $enemyanger + $rng lte 200>>
		<<bHe>> continues to hold you down by the neck.
		<<violence 3>><<bruise neck>><<hitstat>>
	<<else>>
		<<bHe>> tightens <<bhis>> <<beast_jaws_text>>. You can't breathe!
		<<violence 10>><<bruise neck>><<bruise neck>><<hitstat>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

/*TODO: Adjust to correct for herm characters*/
<<if $NPCList[_n].penis is "thighs">>
	<<if $player.vaginaExist>>
		<<if $rng gte 101>>
			<<bHe>> angles <<bhis>> $NPCList[_n].penisdesc towards your <<pussy>>.
			<<set $thighuse to 0>><<set $NPCList[_n].penis to "vaginaentrance">><<set $vaginause to "penis">><<set $vaginastate to "entrance">><<set $thighactiondefault to "thighs">><<set $vaginatarget to _n>>
		<<else>>
			<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc between your thighs and <<pussy>>.
			<<sex 5>>
		<</if>>
	<<else>>
		<<if $rng gte 101>>
			<<bHe>> moves <<bhis>> penis out from between your thighs.
			<<set $thighuse to 0>><<set $NPCList[_n].penis to 0>><<set $thighactiondefault to "thighs">>
		<<else>>
			<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc between your thighs.
			<<sex 5>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].penis is "vagina">>
	<<set _pain to $vaginalPain>>
	<<if $enemyanger gte 100>><<set _pain *= 1.5>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> fucks your <<pussy>> with a violent intensity.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> continues fucking your <<pussy>>. Each thrust feels deeper than the last.
		<<else>>
			Wanting to prove dominance <<bhe>> pounds your <<pussy>> with deep and deliberate thrusts.
		<</if>>
	<<elseif $enemyanger gte 20>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			You feel <<bhis>> $NPCList[_n].penisdesc throb as <<bhe>> pounds away at your <<pussy>>.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> violates your <<pussy>> with increasing eagerness.
		<<else>>
			<<bHe>> fucks your <<pussy>> with deep and deliberate thrusts.
		<</if>>
	<<else>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> fucks your <<pussy>>, eager to fill you with seed.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> pounds your <<pussy>> without relenting.
		<<else>>
			<<bHe>> continues thrusting into your <<pussy>>.
		<</if>>
	<</if>>
	<<sex 30>><<bruise vagina>><<violence 2>><<pain _pain>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "vaginaimminent" and !$worn.genitals.type.includes("chastity")>>
	<<set _pain to $vaginalPain>>
	<<if $player.virginity.vaginal isnot true>>
		<<if $NPCList[_n].penissize gte 5>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<pussy>>. The sheer size drives thought from your mind.
			<<sex 30>><<set $NPCList[_n].penis to "vagina">><<vaginalstat>><<bruise vagina>><<violence 2>><<raped>><<vaginaraped>><<set $vaginastate to "penetrated">><<set _pain *= 3>><<pain _pain>>
		<<elseif $NPCList[_n].penissize gte 4>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<pussy>>.
			<<sex 30>><<set $NPCList[_n].penis to "vagina">><<vaginalstat>><<bruise vagina>><<violence 2>><<raped>><<vaginaraped>><<set $vaginastate to "penetrated">><<set _pain *= 2>><<pain _pain>>
		<<else>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<pussy>>.
			<<sex 30>><<set $NPCList[_n].penis to "vagina">><<vaginalstat>><<bruise vagina>><<violence 2>><<raped>><<vaginaraped>><<set $vaginastate to "penetrated">><<pain _pain>>
		<</if>>
	<<elseif $player.virginity.vaginal is true>>
		<<if $sexStats.vagina.pregnancy.totalBirthEvents gt 0>>
			Despite your lack of a hymen, you feel something inside you change as your virginity and purity are taken.
			<<violence 10>>
		<<else>>
			<<switch $NPCList[_n].penissize>>
				<<case 5>>
					<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your virgin pussy, obliterating your hymen and forever robbing you of your purity. You'd scream, but the sheer size seizes your breath and thought.
					<<violence 200>><<set _pain *= 3>><<pain _pain>>
				<<case 4>>
					<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your virgin pussy, obliterating your hymen and forever robbing you of your purity. You scream out as your <<pussy>> struggles to accommodate <<bhis>> cock.
					<<violence 200>><<set _pain *= 2>><<pain _pain>>
				<<case 1>>
					<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your virgin pussy, breaking your hymen and forever robbing you of your purity. While technically no longer a virgin, you can barely feel it.
					<<violence 25>><<combattrauma 175>>
				<<default>>
					<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your virgin pussy, breaking your hymen and forever robbing you of your purity.
					<<violence 100>><<pain _pain>>
			<</switch>>
		<</if>>
		<<sex 100>><<set $NPCList[_n].penis to "vagina">><<bruise vagina>><<vaginalstat>><<raped>><<vaginaraped>><<set $vaginastate to "penetrated">>
	<</if>>
	<<takeVirginity $NPCList[_n].fullDescription "vaginal">><<takeNPCVirginity $NPCList[_n].fullDescription "penile">>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "vaginaentrance">>
	<<if $worn.over_lower.vagina_exposed is 0>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your <<pussy>> through your $worn.over_lower.name.
		<<sex 5>><<set $worn.over_lower.integrity -= 10>>
	<<elseif $worn.lower.vagina_exposed is 0>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your <<pussy>> through your $worn.lower.name.
		<<sex 5>><<set $worn.lower.integrity -= 10>>
	<<elseif $worn.lower.vagina_exposed is 1>>
		<<set $rng to random(1, 100)>>
		<<if $worn.under_lower.vagina_exposed is 1 and $worn.genitals.type.includes("chastity")>>
			<<if $NPCList[_n].penissize gte 5>>
				<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc against your $worn.genitals.name, desperate to breed the <<pussy>> beneath. <<bHe>> <<beast_growls_text>> in pain, but the device feels looser after each push.
				<<sex 10>><<set $worn.genitals.integrity -= 240>><<set $enemyanger += 15>><<set $enemytrust -= 15>><<set $enemyhealth -= 5>>
			<<else>>
				<<bHe>> thrusts against your $worn.genitals.name, desperate to breed the <<pussy>> beneath. It hurts itself against the hard material and withdraws, <<beast_growling_text>>.
				<<set $NPCList[_n].penis to 0>><<set $vaginause to 0>><<set $vaginastate to 0>><<sex 20>><<set $worn.genitals.integrity -= 40>><<set $enemyanger += 15>><<set $enemytrust -= 15>><<set $enemyhealth -= 5>>
			<</if>>
		<<elseif $worn.under_lower.vagina_exposed is 0>>
			<<if $NPCList[_n].penissize gte 5>>
				<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc against your <<pussy>> through your $worn.under_lower.name, tearing the fabric.
				<<sex 10>><<set $worn.under_lower.integrity -= 40>>
			<<else>>
				<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your <<pussy>> through your $worn.under_lower.name.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>>
			<</if>>
		<<elseif $worn.under_lower.vagina_exposed is 1>>
			<<if $vaginaWetness gte ($NPCList[_n].penissize * 15) + random(1, 40) or random(1, 2) is 2>>
				<<bHe>> pushes <<bhis>> $NPCList[_n].penisdesc against your <<pussy>>. <<vagina_lube_text>> the tip presses into you, a thrust away from penetrating.
				<<sex 20>><<set $NPCList[_n].penis to "vaginaimminent">><<set $vaginastate to "imminent">>
			<<else>>
				<<bHe>> pushes <<bhis>> $NPCList[_n].penisdesc against your <<pussy>>, but fails to penetrate, instead angling away and rubbing against your <<if $player.penisExist>><<penis>><<else>>clit<</if>>.
				<<sex 5>>
				<<if $enemyarousal gte ($enemyarousalmax / 2) and random(1, 3) is 3>>
					Precum leaks from the tip, lubricating your pussy.
					<<set $player.bodyliquid.vaginaoutside.semen += 1>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "cheeks">>
	<<if $rng gte 101>>
		<<bHe>> angles <<bhis>> $NPCList[_n].penisdesc toward your anus.
		<<set $NPCList[_n].penis to "anusentrance">><<set $anusstate to "entrance">><<set $bottomuse to 0>><<set $cheekactiondefault to "cheeks">><<set $anustarget to _n>>
	<<else>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc between your cheeks.
		<<submission 3>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "leftarm">>
	<<if $rng lte 101>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your hand.
		<<submission 1>>
	<<else>>
		<<bHe>> moves <<bhis>> $NPCList[_n].penisdesc away from your hand.
		<<set $NPCList[_n].penis to 0>><<set $leftarm to 0>><<set $leftcarry to "leftgrab">><<set $leftactiondefault to "leftgrab">>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "rightarm">>
	<<if $rng lte 101>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your hand.
		<<submission 1>>
	<<else>>
		<<bHe>> moves <<bhis>> $NPCList[_n].penisdesc away from your hand.
		<<set $NPCList[_n].penis to 0>><<set $rightarm to 0>><<set $rightcarry to "rightgrab">><<set $rightactiondefault to "rightgrab">>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "botharm">>
	<<if $rng lte 101>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your hands.
		<<submission 2>>
	<<else>>
		<<bHe>> moves <<bhis>> penis away from your hands.
		<<set $NPCList[_n].penis to 0>><<set $leftarm to 0>><<set $rightarm to 0>><<set $leftcarry to "leftgrab">><<set $rightcarry to "rightgrab">><<set $leftactiondefault to "leftgrab">><<set $rightactiondefault to "rightgrab">>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "feet">>
	<<if $rng lte 101>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your feet.
		<<submission 1>>
	<<else>>
		<<bHe>> moves <<bhis>> penis away from your feet.
		<<set $NPCList[_n].penis to 0>><<set $feetuse to 0>><<set $feetactiondefault to "feetgrab">>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "anus">>
	<<set _pain to $analPain>>
	<<if $enemyanger gte 100>><<set _pain *= 1.5>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> fucks your <<bottom>> with a violent intensity.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> continues fucking your <<bottom>>. Each thrust feels deeper than the last.
		<<else>>
			Wanting to prove dominance <<bhe>> pounds your <<bottom>> with deep and deliberate thrusts.
		<</if>>
	<<elseif $enemyanger gte 20>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			You feel <<bhis>> $NPCList[_n].penisdesc throb as <<bhe>> pounds away at your <<bottom>>.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> violates your <<bottom>> with increasing eagerness.
		<<else>>
			<<bHe>> fucks your <<bottom>> with deep and deliberate thrusts.
		<</if>>
	<<else>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> fucks your <<bottom>>, eager to fill you with seed.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> pounds your <<bottom>> and shows no sign of relenting.
		<<else>>
			<<bHe>> continues thrusting into your <<bottom>>.
		<</if>>
	<</if>>
	<<sex 30>><<bruise anus>><<violence 1>><<pain _pain>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "anusimminent" and $worn.genitals.anal_shield isnot 1>>
	<<set _pain to $analPain>>
	<<if $player.virginity.anal isnot true>>
		<<if $NPCList[_n].penissize gte 5>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>. The sheer size pushes all thought from your mind.
			<<sex 30>><<set $NPCList[_n].penis to "anus">><<bruise anus>><<analstat>><<violence 1>><<raped>><<anusraped>><<set $anusstate to "penetrated">><<set _pain *= 3>><<pain _pain>>
		<<elseif $NPCList[_n].penissize gte 4>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>. It's almost too big to handle.
			<<sex 30>><<set $NPCList[_n].penis to "anus">><<bruise anus>><<analstat>><<violence 1>><<raped>><<anusraped>><<set $anusstate to "penetrated">><<set _pain *= 2>><<pain _pain>>
		<<else>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>.
			<<sex 30>><<set $NPCList[_n].penis to "anus">><<bruise anus>><<analstat>><<violence 1>><<raped>><<anusraped>><<set $anusstate to "penetrated">><<pain _pain>>
		<</if>>
	<<elseif $player.virginity.anal is true>>
		<<switch $NPCList[_n].penissize>>
		<<case 5>>
			<<bHe>> forces <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>, violating you in a way you hadn't conceived of. You'd scream, but the sheer size sends your body into momentary shock.
			<<sex 100>><<set $NPCList[_n].penis to "anus">><<takeVirginity $NPCList[_n].fullDescription "anal">><<bruise anus>><<analstat>><<violence 200>><<raped>><<anusraped>><<set $anusstate to "penetrated">><<set _pain *= 3>><<pain _pain>>
		<<case 4>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>, violating you in a way you hadn't conceived of. You scream out as your <<bottom>> struggles to accommodate <<bhis>> cock.
			<<sex 100>><<set $NPCList[_n].penis to "anus">><<takeVirginity $NPCList[_n].fullDescription "anal">><<bruise anus>><<analstat>><<violence 200>><<raped>><<anusraped>><<set $anusstate to "penetrated">><<set _pain *= 2>><<pain _pain>>
		<<case 1>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>, violating you in a way you hadn't conceived of. While technically no longer a virgin, you can barely feel it.
			<<sex 100>><<set $NPCList[_n].penis to "anus">><<takeVirginity $NPCList[_n].fullDescription "anal">><<bruise anus>><<analstat>><<violence 25>><<combattrauma 175>><<raped>><<anusraped>><<set $anusstate to "penetrated">>
		<<default>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc deep into your <<bottom>>, violating you in a way you hadn't conceived of.
			<<sex 100>><<set $NPCList[_n].penis to "anus">><<takeVirginity $NPCList[_n].fullDescription "anal">><<bruise anus>><<analstat>><<violence 200>><<raped>><<anusraped>><<set $anusstate to "penetrated">><<pain _pain>>
		<</switch>>
	<</if>>
	<<takeNPCVirginity $NPCList[_n].fullDescription "penile">>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "anusentrance">>
	<<if $worn.over_lower.anus_exposed is 0>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your <<bottom>> through your $worn.over_lower.name.
		<<sex 5>><<set $worn.over_lower.integrity -= 10>>
	<<elseif $worn.lower.anus_exposed is 0>>
		<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your <<bottom>> through your $worn.lower.name.
		<<sex 5>><<set $worn.lower.integrity -= 10>>
	<<elseif $worn.lower.anus_exposed is 1>>
		<<set $rng to random(1, 100)>>
		<<if $worn.under_lower.anus_exposed is 1 and $worn.genitals.type.includes("chastity") and $worn.genitals.anal_shield is 1>>
			<<if $NPCList[_n].penissize gte 5>>
				<<bHe>> thrusts against your $worn.genitals.name, desperate to violate the <<bottom>> beneath. It <<beast_growls_text>> in pain, but each thrust leaves the device a little looser.
				<<sex 10>><<set $worn.genitals.integrity -= 240>><<set $enemyanger += 15>><<set $enemytrust -= 15>><<set $enemyhealth -= 5>>
			<<else>>
				<<bHe>> thrusts against your $worn.genitals.name, desperate to violate the <<bottom>> beneath. It hurts itself against the hard material and withdraws, <<beast_growling_text>>.
				<<set $NPCList[_n].penis to 0>><<set $anususe to 0>><<set $anusstate to 0>><<sex 20>><<set $worn.genitals.integrity -= 40>><<set $enemyanger += 15>><<set $enemytrust -= 15>><<set $enemyhealth -= 5>>
			<</if>>
		<<elseif $worn.under_lower.anus_exposed is 0>>
			<<if $NPCList[_n].penissize gte 6>>
				<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc against your <<bottom>> through your $worn.under_lower.name, tearing the fabric.
				<<sex 10>><<set $worn.under_lower.integrity -= 40>>
			<<else>>
				<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your <<bottom>> through your $worn.under_lower.name.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>>
			<</if>>
		<<elseif $worn.under_lower.anus_exposed is 1>>
			<<if $anusWetness gte ($NPCList[_n].penissize * 15) + random(1, 40) or random(1, 2) is 2>>
				<<bHe>> pushes <<bhis>> $NPCList[_n].penisdesc against your <<bottom>>. <<anus_lube_text>> the tip presses into you, a thrust away from penetrating.
				<<sex 20>><<set $NPCList[_n].penis to "anusimminent">><<set $anusstate to "imminent">>
			<<else>>
				<<bHe>> pushes <<bhis>> $NPCList[_n].penisdesc against your <<bottom>>, but fails to penetrate, instead angling away and rubbing between your cheeks.
				<<sex 5>>
				<<if $enemyarousal gte ($enemyarousalmax / 2) and random(1, 3) is 3>>
					Precum leaks from the tip, lubricating your ass.
					<<set $player.bodyliquid.bottom.semen += 1>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "mouth">>
	<<if $enemyanger gte random(1, 100)>>
		<<if $oralskill gte random(1, 1200)>>
			<<bHe>> shoves <<bhis>> $NPCList[_n].penisdesc down your throat, but you manage to gasp between <<bhis>> thrusts.
		<<else>>
			You gag as <<bhe>> thrusts <<bhis>> $NPCList[_n].penisdesc down your throat.
				<<oxygen -150>>
			<<if $oxygen gte 900>>
				You struggle for breath.
			<<elseif $oxygen gte 600>>
				You can't breathe!
				<<violence 10>>
			<<elseif $oxygen gte 300>>
				You feel light-headed.
				<<violence 20>>
			<<elseif $oxygen gte 1>>
				You see stars.
				<<violence 40>>
			<<else>>
				You are suffocating.
				<<violence 100>>
			<</if>>
		<</if>>
		<<submission 10>><<bruise face>><<bruise neck>><<violence 1>><<set $speechmouthpenetrated to 1>>
	<<elseif $rng gte 81 and $NPCList[_n].stance isnot "topface">>
		<<bHe>> withdraws <<bhis>> penis from your mouth.
		<<sex 30>><<set $NPCList[_n].penis to "mouthimminent">><<bruise face>><<violence 1>><<set $mouthstate to "imminent">>
	<<elseif $rng gte 1>>
		<<bHe>> continues thrusting into your wet mouth.
		<<submission 10>><<bruise face>><<violence 1>>
		<<if $NPCList[_n].penissize gte 4>>
			<<switch random(1, 4)>>
				<<case 1>>
					It's a struggle not to gag as the $NPCList[_n].penisdesc fills you.
				<<case 2>>
					 Saliva drools down your chin as you struggle to keep your lips wrapped around <<bhis>> $NPCList[_n].penisdesc.
					<<set $hygiene += 500>><<set $player.bodyliquid.face.goo += 1>>
				<<default>>
			<</switch>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "mouthimminent">>
	<<if $rng gte 81 and $NPCList[_n].stance isnot "topface">>
		<<bHe>> stops pressing <<bhis>> penis into your mouth.
		<<set $NPCList[_n].penis to "mouthentrance">><<submission 5>><<set $mouthstate to "entrance">>
	<<elseif $rng lte 20>>
		<<if $player.virginity.oral isnot true>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc into your mouth.
			<<submission 10>><<set $NPCList[_n].penis to "mouth">><<bruise face>><<oralstat>><<raped>><<set $mouthstate to "penetrated">>
		<<elseif $player.virginity.oral is true>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc into your mouth. It tastes strange.
			<<submission 30>><<set $NPCList[_n].penis to "mouth">><<takeVirginity $NPCList[_n].fullDescription "oral">><<bruise face>><<oralstat>><<violence 1>><<raped>><<set $mouthstate to "penetrated">>
		<</if>>
	<<elseif $rng gte 21>>
		<<if $mouthsubmit is 1>>
			<<bHe>> allows you to pleasure <<bhis>> $NPCList[_n].penisdesc with your mouth.
			<<submission 5>>
		<<elseif $player.virginity.oral isnot true>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc into your mouth.
			<<submission 10>><<set $NPCList[_n].penis to "mouth">><<oralstat>><<bruise face>><<violence 1>><<raped>><<set $mouthstate to "penetrated">>
		<<elseif $player.virginity.oral is true>>
			<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc into your mouth. It tastes strange.
			<<submission 30>><<set $NPCList[_n].penis to "mouth">><<takeVirginity $NPCList[_n].fullDescription "oral">><<oralstat>><<bruise face>><<violence 1>><<raped>><<set $mouthstate to "penetrated">>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "mouthentrance">>
	<<if $pullaway is 1 and $rng gte 51>>
		<<bHis>> $NPCList[_n].penisdesc hovers only inches from your face.
	<<elseif $rng gte 81 and $NPCList[_n].stance isnot "topface">>
		<<bHe>> moves <<bhis>> penis away from your mouth.
		<<set $NPCList[_n].penis to 0>><<set $mouthuse to 0>><<set $mouthstate to 0>>
	<<elseif $rng gte 1>>
		<<bHe>> pushes <<bhis>> $NPCList[_n].penisdesc against your lips.
		<<set $NPCList[_n].penis to "mouthimminent">><<submission 5>><<set $mouthstate to "imminent">>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "otherfrot">>
	<<if $rng gte 101>>
		<<bHe>> shifts <<bhis>> ass and presses <<bhis>> anus against your <<penis>>.
		<<set $penisuse to "otheranus">><<set $NPCList[_n].penis to "otheranusentrance">><<set $penisstate to "otheranusentrance">><<set $speechotheranusentrance to 1>>
	<<else>>
		<<bHe>> <<beast_growls_text>> and rubs <<bhis>> ass against your <<penis>>.
		<<sex 5>><<set $enemyanger += 5>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "otheranus">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> pelvis away, releasing your <<penis>> from <<bhis>> anus.
		<<sex 30>><<set $NPCList[_n].penis to "otheranusimminent">><<bruise penis>><<violence 1>><<set $penisstate to "otheranusimminent">><<set $speechotheranusimminent to 1>>
	<<elseif $rng gte 1>>
		<<if $enemyanger gte 100>>
			<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
				<<bHe>> <<beast_growls_text>> and fucks your <<penis>> with <<bhis>> ass, <<bhis>> movements violent and erratic.
			<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
				<<bHe>> <<beast_growls_text>> as <<bhe>> pushes back against your penis.
			<<else>>
				<<bHe>> <<beast_growls_text>> and fucks your <<penis>> with rough movements.
			<</if>>
		<<elseif $enemyanger gte 20>>
			<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
				You feel <<bhis>> ass twitch around your length as <<bhe>> pushes back.
			<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
				<<bHe>> continues to push against your <<penis>>.
			<<else>>
				<<bHe>> fucks your <<penis>>, taking as much of you into <<bhis>> ass as <<bhe>> can.
			<</if>>
		<<else>>
			<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
				<<bHe>> continues pushing against your <<penis>>, <<bhis>> anus rhythmically pounding your length.
			<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
				<<bHe>> continues pushing against your <<penis>>, <<bhis>> anus rhythmically pounding your length.
			<<else>>
				<<bHe>> pushes against your <<penis>> with steady movements.
			<</if>>
		<</if>>
		<<sex 30>><<bruise penis>><<violence 1>><<set $speechotheranuspenetrated to 1>><<set $enemyanger += 10>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "otheranusimminent">>
	<<if $rng gte 101>>
		<<bHe>> stops pressing <<bhis>> ass against your <<penis>>.
		<<set $NPCList[_n].penis to "otheranusentrance">><<set $penisstate to "otheranusentrance">><<set $speechotheranusentrance to 1>>
	<<elseif $rng gte 1>>
		<<if $nopenile is 0>><<set $penisactiondefault to "otheranustake">>
			<<if ($penissize is -1 and $arousal lte ($arousalmax / 10) * 9) or ($penissize is -2 and $arousal lte ($arousalmax / 20) * 19)>>
				<<bHe>> presses <<bhis>> ass against your <<penis>>, trying to force an erection.
				<<set $enemyanger += 5>><<arousal 300>><<set $speechotheranuswithhold to 1>>
			<<elseif $player.virginity.penile isnot true>>
				<<bHe>> eases your <<penis>> into <<bhis>> ass, swallowing you to the base.
				<<sex 30>><<set $NPCList[_n].penis to "otheranus">><<takeVirginity $NPCList[_n].fullDescription "penile">><<takeNPCVirginity $NPCList[_n].fullDescription "anal">><<penilestat>><<bruise penis>><<violence 1>><<raped>><<penisraped>><<set $penisstate to "otheranus">><<set $speechotheranuspenetrated to 1>>
			<<elseif $player.virginity.penile is true>>
				<<bHe>> eases your virgin penis into <<bhis>> ass, separating your foreskin from your glans and forever robbing you of your purity.
				<<sex 100>><<set $NPCList[_n].penis to "otheranus">><<takeVirginity $NPCList[_n].fullDescription "penile">><<takeNPCVirginity $NPCList[_n].fullDescription "anal">><<bruise penis>><<penilestat>><<violence 100>><<raped>><<penisraped>><<set $penisstate to "otheranus">><<set $speechpenisvirgin to 1>>
			<</if>>
		<<else>>
			Respecting your wishes, <<bhe>> does not envelope your <<penis>> with <<bhis>> ass, instead teasing the tip of your glans.
			<<sex 15>><<set $speechotheranuswithhold to 1>><<set $enemyanger += 10>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].penis is "otheranusentrance">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> ass away from your <<penis>>.
		<<set $NPCList[_n].penis to 0>><<set $penisuse to 0>><<set $penisstate to 0>>
	<<elseif $rng gte 1>>
		<<if $worn.over_lower.vagina_exposed is 0>>
			<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.over_lower.name.
			<<sex 5>><<set $worn.over_lower.integrity -= 10>><<set $speechotheranusentrance to 1>><<set $enemyanger += 10>>
		<<elseif $worn.lower.vagina_exposed is 0>>
			<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.lower.name.
			<<sex 5>><<set $worn.lower.integrity -= 10>><<set $speechotheranusentrance to 1>><<set $enemyanger += 10>>
		<<elseif $worn.lower.vagina_exposed is 1>>
			<<set $rng to random(1, 100)>>
			<<if $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.under_lower.name.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>><<set $speechotheranusentrance to 1>><<set $enemyanger += 10>>
			<<elseif $worn.under_lower.vagina_exposed is 1>>
				<<if $rng gte 51>>
					<<if $nopenile is 0 and $worn.genitals.type.includes("chastity")>>
						<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.genitals.name.genitals trying to force <<bhis>> way through.
						<<sex 20>><<set $worn.genitals.integrity -= 40>><<set $enemyanger += 10>>
					<<elseif $nopenile is 1>>
						<<bHe>> presses <<bhis>> ass against your <<penis>>.
						<<sex 20>><<set $NPCList[_n].penis to "otheranusimminent">><<set $penisstate to "otheranusimminent">><<set $speechotheranusimminent to 1>>
					<<else>>
						<<if $penisWetness gte ($penissize * 15) + random(1, 40) or random(1, 2) is 2>>
							<<bHe>> presses <<bhis>> ass against your <<penis>>. <<penis_lube_text>> your tip is pushed inside, a thrust away from being enveloped.
							<<sex 20>><<set $NPCList[_n].penis to "otheranusimminent">><<set $penisstate to "otheranusimminent">><<set $speechotheranusimminent to 1>>
						<<else>>
							<<bHe>> presses <<bhis>> ass against your <<penis>>, but fails to gain purchase.
							<<sex 5>>
						<</if>>
					<</if>>
				<<elseif $rng gte 1>>
					<<if !$worn.genitals.type.includes("chastity")>>
						<<bHe>> <<beast_growls_text>> and rubs against your <<penis>>.
						<<sex 10>><<set $enemyanger += 10>>
					<<else>>
						<<bHe>> <<beast_growls_text>> and rubs against your $worn.genitals.name.
						<<sex 10>><<set $enemyanger += 10>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>
<<if $NPCList[_n].penis is "penisentrance">>
	<<if $rng gte 51>>
		<<bHe>> caresses your <<penis>> with <<bhis>> own, hinting at what's to come.
		<<sex 10>><<set $NPCList[_n].penis to "penisimminent">><<set $penisstate to "otherpenisimminent">>
	<<else>>
		<<bHe>> hovers <<bhis>> $NPCList[_n].penisdesc close to your <<penis>>.
		<<sex 5>>
	<</if>>
<<elseif $NPCList[_n].penis is "penisimminent">>
	<<bHe>> thrusts forward,
		<<if $enemyarousal gte (($enemyarousalmax / 10) * 7)>>
			savagely fencing
		<<elseif $enemyarousal gte (($enemyarousalmax / 10) * 4)>>
			smashing
		<<else>>
			pressing
		<</if>>
		<<if random(0,1) is 1>>
			<<bhis>> $NPCList[_n].penisdesc against yours.
		<<else>>
			<<bhis>> $NPCList[_n].penisdesc against your <<penis>>.
		<</if>>
	<<sex 10>><<set $NPCList[_n].penis to "penis">><<set $penisstate to "otherpenis">>
	<<if $worn.genitals.type.includes("chastity")>>
		<<set $worn.genitals.integrity -= 10>><<set $speechchastity to 1>>
	<</if>>
<<elseif $NPCList[_n].penis is "penis">>
	<<if $rng gte 1>>
		<<if $enemyarousal gte $enemyarousalmax * 0.8>>
			<<bHe>> slams <<bhis>> penis against yours with a bestial fervour as <<bhe>> approaches orgasm.
			<<if $penisWetness gte 45>>
				Your precum mingles.<<purity -1>>
			<</if>>
		<<elseif $enemyarousal gte $enemyarousalmax * 0.6>>
			<<bHe>> thrusts <<bhis>> penis against yours with increasing fervour.
			<<if $penisWetness gte 45>>
				Your precum mingles.<<purity -1>>
			<</if>>
		<<elseif $enemyarousal gte $enemyarousalmax * 0.4>>
			<<bHe>> savagely fences your <<penises>> together.
		<<elseif $enemyarousal gte $enemyarousalmax * 0.2>>
			<<bHe>> thrusts <<bhis>> penis against your <<penis>>.
		<<else>>
			<<bHe>> kneads your <<penises>> together.
		<</if>>
		<<sex 20>><<set $speechpenispenis to 1>>
		<<if $worn.genitals.type.includes("chastity")>>
			<<set $worn.genitals.integrity -= 10>><<set $speechchastity to 1>>
		<</if>>
	<<else>>
		<<bHe>> moves <<bhis>> penis away from yours.
		<<set $penisuse to 0>><<set $NPCList[_n].penis to 0>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "frot">>
	<<if $player.penisExist>>
		<<if $rng gte 101>>
			<<bHe>> angles <<bhis>> pussy toward your <<penis>>.
			<<set $NPCList[_n].vagina to "vaginaentrance">><<set $penisuse to "othervagina">><<set $penisstate to "entrance">><<set $penisactiondefault to "bay">>
		<<else>>
			<<bHe>> frots <<bhis>> pussy against your <<penis>>.
			<<sex 5>>
		<</if>>
	<<else>>
		<<if $rng gte 101>>
			<<bHe>> lift <<bhis>> pussy away from your <<penis>>.
			<<set $thighuse to 0>><<set $NPCList[_n].penis to 0>><<set $penisactiondefault to "bay">>
		<<else>>
			<<bHe>> frots <<bhis>> pussy against your <<penis>>.
			<<sex 5>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].vagina is "penis">>
	<<if $enemyanger gte 100>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> fucks your <<penis>> with a violent intensity.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> continues fucking your <<penis>>. Each thrust feels deeper than the last.
		<<else>>
			Wanting to prove dominance <<bhe>> pounds your <<penis>> with deep and deliberate thrusts.
		<</if>>
	<<elseif $enemyanger gte 20>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			You feel <<bhis>> pussy throb as <<bhe>> pounds away at your <<penis>>.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> violates your <<penis>> with increasing eagerness.
		<<else>>
			<<bHe>> fucks your <<penis>> with deep and deliberate thrusts.
		<</if>>
	<<else>>
		<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> fucks your <<penis>>, eager for your seed.
		<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> pounds your <<penis>> without relenting.
		<<else>>
			<<bHis>> pussy continues swallowing your <<penis>>.
		<</if>>
	<</if>>
	<<sex 30>><<bruise penis>><<violence 2>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "penisimminent" and (($penissize is -1 and $arousal lte ($arousalmax / 10) * 9) or ($penissize is -2 and $arousal lte ($arousalmax / 20) * 19))>>
	<<bHe>> presses <<bhis>> pussy against your <<penis>>, trying to force an erection.
	<<set $enemyanger += 5>><<arousal 300>><<set $speechpeniswithhold to 1>>
<<elseif $NPCList[_n].vagina is "penisimminent">>
	<<if $player.virginity.penile isnot true>>
		<<bHe>> takes your <<penis>> deep into <<bhis>> <<pussy>>.
		<<sex 30>><<set $NPCList[_n].vagina to "penis">><<penilestat>><<bruise penis>><<violence 2>><<raped>><<penisraped>><<set $penisstate to "penetrated">>
	<<elseif $player.virginity.penile is true>>
		<<bHe>> takes your <<penis>> deep into <<bhis>> pussy, separating your foreskin from your glans and forever robbing you of your purity.
		<<sex 100>><<set $NPCList[_n].vagina to "penis">><<bruise penis>><<penilestat>><<violence 100>><<raped>><<penisraped>><<set $penisstate to "penetrated">>
	<</if>>
	<<takeVirginity $NPCList[_n].fullDescription "penile">><<takeNPCVirginity $NPCList[_n].fullDescription "vaginal">>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "penisentrance">>
	<<if $worn.over_lower.vagina_exposed is 0>>
		<<bHe>> rubs <<bhis>> pussy against your <<penis>> through your $worn.over_lower.name.
		<<sex 5>><<set $worn.over_lower.integrity -= 10>>
	<<elseif $worn.lower.vagina_exposed is 0>>
		<<bHe>> rubs <<bhis>> pussy against your <<penis>> through your $worn.lower.name.
		<<sex 5>><<set $worn.lower.integrity -= 10>>
	<<elseif $worn.lower.vagina_exposed is 1>>
		<<set $rng to random(1, 100)>>
		<<if $worn.under_lower.vagina_exposed is 1 and $worn.genitals.type.includes("chastity")>>
			<<bHe>> thrusts against your $worn.genitals.name, desperate to breed with the <<penis>> beneath. It hurts itself against the hard material and withdraws, <<beast_growling_text>>.
			<<set $NPCList[_n].vagina to 0>><<set $penisuse to 0>><<set $penisstate to 0>><<sex 20>><<set $worn.genitals.integrity -= 10>><<set $enemyanger += 15>><<set $enemytrust -= 15>><<set $enemyhealth -= 5>>
		<<elseif $worn.under_lower.vagina_exposed is 0>>
			<<bHe>> rubs <<bhis>> pussy against your <<penis>> through your $worn.under_lower.name.
			<<sex 5>><<set $worn.under_lower.integrity -= 10>>
		<<elseif $worn.under_lower.vagina_exposed is 1>>
			<<if $rng gte 51>>
				<<if $penisWetness gte ($penissize * 15) + random(1, 40) or random(1, 2) is 2>>
					<<bHe>> pushes <<bhis>> pussy against your <<penis>>. <<penis_lube_text>> your tip is pushed inside, a thrust away being enveloped.
					<<sex 20>><<set $NPCList[_n].vagina to "penisimminent">><<set $penisstate to "imminent">>
				<<else>>
					<<bHe>> pushes <<bhis>> pussy against your <<penis>>, but fails to gain purchase.
					<<sex 5>>
					<<if random(1, 3) is 3>>
						Lewd fluids drips from <<bhis>> pussy, lubricating you.
					<</if>>
				<</if>>
			<<elseif $rng gte 1>>
				<<bHe>> rubs <<bhis>> pussy against your <<penis>>.
				<<sex 5>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].vagina is "mouth">>
	<<if $enemyanger gte 100>>
		<<bHe>> covers your mouth with <<bhis>> pussy, making it difficult to breathe.
		<<violence 3>><<bruise face>><<set $speechvaginamouth to 1>>
	<<else>>
		<<if $mouthsubmit is 1>>
			<<if $rng gte 1>>
				<<bHe>> rubs <<bhis>> pussy against your lips.
				<<if $enemyarousal gte (($enemyarousalmax / 5) * 3)>>
					You can taste <<bhis>> juices.
				<</if>>
				<<sex 3>><<set $speechvaginamouth to 1>>
			<<else>>
				<<bHe>> moves <<bhis>> pussy away from your face.
				<<set $mouthuse to 0>><<set $mouthstate to 0>><<set $NPCList[_n].vagina to 0>>
			<</if>>
		<<else>>
			<<if $rng gte 1>>
				<<bHe>> rubs <<bhis>> pussy against your lips.
				<<if $enemyarousal gte (($enemyarousalmax / 5) * 3)>>
					You can taste <<bhis>> juices.
				<</if>>
				<<sex 3>><<set $speechvaginamouth to 1>>
			<<else>>
				<<bHe>> moves <<bhis>> pussy away from your face.
				<<set $mouthuse to 0>><<set $mouthstate to 0>><<set $NPCList[_n].vagina to 0>>
			<</if>>
		<</if>>
	<</if>>
<</if>>
<<set $rng to random(1, 100)>>
<<if $NPCList[_n].vagina is "vaginaentrance">>
	<<if $rng gte 51>>
		<<bHe>> kisses your <<pussy>> with <<bhis>> own, hinting at what's to come.
		<<sex 10>><<set $NPCList[_n].vagina to "vaginaimminent">><<set $vaginastate to "othervaginaimminent">>
	<<else>>
		<<bHe>> hovers <<bhis>> pussy close to yours.
		<<sex 5>>
	<</if>>
<<elseif $NPCList[_n].vagina is "vaginaimminent">>
	<<bHe>> thrusts forward,
		<<if $enemyarousal gte (($enemyarousalmax / 10) * 7)>>
			squelching
		<<elseif $enemyarousal gte (($enemyarousalmax / 10) * 4)>>
			smashing
		<<else>>
			pressing
		<</if>>
		<<bhis>> pussy against yours.
	<<sex 10>><<set $NPCList[_n].vagina to "vagina">><<set $vaginastate to "othervagina">>
<<elseif $NPCList[_n].vagina is "vagina">>
	<<if $rng gte 1>>
		<<if $enemyarousal gte $enemyarousalmax * 0.8>>
			<<bHe>> slams <<bhis>> pussy into yours with a bestial fervour as <<bhe>> approaches orgasm.
			<<if $vaginaWetness gte 45>>
				Your juices mingle.<<purity -1>>
			<</if>>
		<<elseif $enemyarousal gte $enemyarousalmax * 0.6>>
			<<bHe>> thrusts <<bhis>> pussy against yours with increasing fervour.
			<<if $vaginaWetness gte 45>>
				Your juices mingle.<<purity -1>>
			<</if>>
		<<elseif $enemyarousal gte $enemyarousalmax * 0.4>>
			<<bHe>> smashes your pussies together.
		<<elseif $enemyarousal gte $enemyarousalmax * 0.2>>
			<<bHe>> thrusts <<bhis>> pussy against yours.
		<<else>>
			<<bHe>> kneads your pussies together.
		<</if>>
		<<sex 20>><<set $speechvaginavagina to 1>>
	<<else>>
		<<bHe>> moves <<bhis>> pussy away from yours.
		<<set $vaginause to 0>><<set $NPCList[_n].vagina to 0>>
	<</if>>
<</if>>

<<if $NPCList[_n].vagina is "leftarm">>
	<<if $rng gte 1>>
		<<bHe>> rubs <<bhis>> pussy against your fingers.
		<<submission 2>>
	<<else>>
		<<bHe>> moves your hand away from <<bhis>> pussy.
		<<set $leftarm to 0>><<set $NPCList[_n].vagina to 0>><<set $leftactiondefault to "leftplay">>
	<</if>>
<</if>>

<<if $NPCList[_n].vagina is "rightarm">>
	<<if $rng gte 1>>
		<<bHe>> rubs <<bhis>> pussy against your fingers.
		<<submission 2>>
	<<else>>
		<<bHe>> moves your hand away from <<bhis>> pussy.
		<<set $rightarm to 0>><<set $NPCList[_n].vagina to 0>><<set $rightactiondefault to "rightplay">>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "feet">>
	<<if $rng gte 1>>
		<<bHe>> rubs <<bhis>> pussy against your feet.
		<<submission 2>>
	<<else>>
		<<bHe>> moves your feet away from <<bhis>> pussy.
		<<set $feetuse to 0>><<set $NPCList[_n].vagina to 0>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "otherfrot">>
	<<if $rng gte 101>>
		<<bHe>> shifts <<bhis>> ass and presses <<bhis>> anus against your <<penis>>.
		<<set $penisuse to "otheranus">><<set $NPCList[_n].vagina to "otheranusentrance">><<set $penisstate to "otheranusentrance">><<set $speechotheranusentrance to 1>>
	<<else>>
		<<bHe>> <<beast_growls_text>> and rubs <<bhis>> ass against your <<penis>>.
		<<sex 5>><<set $enemyanger += 5>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "otheranus">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> pelvis away, releasing your <<penis>> from <<bhis>> anus.
		<<sex 30>><<set $NPCList[_n].vagina to "otheranusimminent">><<bruise penis>><<violence 1>><<set $penisstate to "otheranusimminent">><<set $speechotheranusimminent to 1>>
	<<elseif $rng gte 1>>
		<<if $enemyanger gte 100>>
			<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
				<<bHe>> <<beast_growls_text>> and fucks your <<penis>> with <<bhis>> ass, <<bhis>> movements violent and erratic.
			<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
				<<bHe>> <<beast_growls_text>> as <<bhe>> pushes back against your penis.
			<<else>>
				<<bHe>> <<beast_growls_text>> and fucks your <<penis>> with rough movements.
			<</if>>
		<<elseif $enemyanger gte 20>>
			<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
				You feel <<bhis>> ass twitch around your length as <<bhe>> pushes back.
			<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
				<<bHe>> continues to push against your <<penis>>.
			<<else>>
				<<bHe>> fucks your <<penis>>, taking as much of you into <<bhis>> ass as <<bhe>> can.
			<</if>>
		<<else>>
			<<if $enemyarousal gte (($enemyarousalmax / 5) * 4)>>
				<<bHe>> continues pushing against your <<penis>>, <<bhis>> anus rhythmically pounding your length.
			<<elseif $enemyarousal gte (($enemyarousalmax / 5) * 2)>>
				<<bHe>> continues pushing against your <<penis>>, <<bhis>> anus rhythmically pounding your length.
			<<else>>
				<<bHe>> pushes against your <<penis>> with steady movements.
			<</if>>
		<</if>>
		<<sex 30>><<bruise penis>><<violence 1>><<set $speechotheranuspenetrated to 1>><<set $enemyanger += 10>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "otheranusimminent">>
	<<if $rng gte 101>>
		<<bHe>> stops pressing <<bhis>> ass against your <<penis>>.
		<<set $NPCList[_n].vagina to "otheranusentrance">><<set $penisstate to "otheranusentrance">><<set $speechotheranusentrance to 1>>
	<<elseif $rng gte 1>>
		<<if $nopenile is 0>><<set $penisactiondefault to "otheranustake">>
			<<if (($penissize is -1 and $arousal lte ($arousalmax / 10) * 9) or ($penissize is -2 and $arousal lte ($arousalmax / 20) * 19))>>
				<<bHe>> presses <<bhis>> ass against your <<penis>>, trying to force an erection.
				<<set $enemyanger += 5>><<arousal 300>><<set $speechotheranuswithhold to 1>>
			<<elseif $player.virginity.penile isnot true>>
				<<bHe>> eases your <<penis>> into <<bhis>> ass, swallowing you to the base.
				<<sex 30>><<set $NPCList[_n].vagina to "otheranus">><<takeVirginity $NPCList[_n].fullDescription "penile">><<takeNPCVirginity $NPCList[_n].fullDescription "anal">><<penilestat>><<bruise penis>><<violence 1>><<raped>><<penisraped>><<set $penisstate to "otheranus">><<set $speechotheranuspenetrated to 1>>
			<<elseif $player.virginity.penile is true>>
				<<bHe>> eases your virgin penis into <<bhis>> ass, separating your foreskin from your glans and forever robbing you of your purity.
				<<sex 100>><<set $NPCList[_n].vagina to "otheranus">><<takeVirginity $NPCList[_n].fullDescription "penile">><<takeNPCVirginity $NPCList[_n].fullDescription "anal">><<bruise penis>><<penilestat>><<violence 100>><<raped>><<penisraped>><<set $penisstate to "otheranus">><<set $speechpenisvirgin to 1>>
			<</if>>
		<<else>>
			Respecting your wishes, <<bhe>> does not envelope your <<penis>> with <<bhis>> ass, instead teasing the tip of your glans.
			<<sex 15>><<set $speechotheranuswithhold to 1>><<set $enemyanger += 10>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].vagina is "otheranusentrance">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> ass away from your <<penis>>.
		<<set $NPCList[_n].vagina to 0>><<set $penisuse to 0>><<set $penisstate to 0>>
	<<elseif $rng gte 1>>
		<<if $worn.over_lower.vagina_exposed is 0>>
			<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.over_lower.name.
			<<sex 5>><<set $worn.over_lower.integrity -= 10>><<set $speechotheranusentrance to 1>><<set $enemyanger += 10>>
		<<elseif $worn.lower.vagina_exposed is 0>>
			<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.lower.name.
			<<sex 5>><<set $worn.lower.integrity -= 10>><<set $speechotheranusentrance to 1>><<set $enemyanger += 10>>
		<<elseif $worn.lower.vagina_exposed is 1>>
			<<set $rng to random(1, 100)>>
			<<if $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> rubs <<bhis>> ass against your <<penis>> through your $worn.under_lower.name.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>><<set $speechotheranusentrance to 1>><<set $enemyanger += 10>>
			<<elseif $worn.under_lower.vagina_exposed is 1>>
				<<if $rng gte 71>>
					<<if $nopenile is 0 and $worn.genitals.type.includes("chastity")>>
						<<bHe>> rubs <<bhis>> ass against your $worn.genitals.name trying to get to your <<penis>>.
						<<sex 20>><<set $worn.genitals.integrity -= 10>><<set $enemyanger += 5>>
					<<elseif $nopenile is 1>>
						<<bHe>> presses <<bhis>> ass against your <<penis>>.
						<<sex 20>><<set $NPCList[_n].vagina to "otheranusimminent">><<set $penisstate to "otheranusimminent">><<set $speechotheranusimminent to 1>>
					<<else>>
						<<if $penisWetness gte ($penissize * 15) + random(1, 40) or random(1, 2) is 2>>
							<<bHe>> presses <<bhis>> ass against your <<penis>>. <<penis_lube_text>> your tip is pushed inside, a thrust away from being enveloped.
							<<sex 20>><<set $NPCList[_n].vagina to "otheranusimminent">><<set $penisstate to "otheranusimminent">><<set $speechotheranusimminent to 1>>
						<<else>>
							<<bHe>> presses <<bhis>> ass against your <<penis>>, but fails to gain purchase.
							<<sex 5>>
						<</if>>
					<</if>>
				<<elseif $rng gte 1>>
					<<if !$worn.genitals.type.includes("chastity")>>
						<<bHe>> <<beast_growls_text>> and rubs against your <<penis>>.
						<<sex 10>><<set $enemyanger += 10>>
					<<else>>
						<<bHe>> <<beast_growls_text>> and rubs against your $worn.genitals.name.
						<<sex 10>><<set $enemyanger += 10>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "penis">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> head back, releasing your <<penis>> from <<bhis>> mouth.
		<<sex 30>><<set $NPCList[_n].mouth to "penisimminent">><<bruise penis>><<violence 1>><<set $penisstate to "othermouthimminent">>
	<<elseif $rng gte 1>>
		<<if $enemyarousal lte ($enemyarousalmax / 5)>>
			<<bHe>> caresses your shaft with <<bhis>> long tongue.
			<<sex 30>><<bruise penis>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> wraps <<bhis>> tongue around your <<penis>> and licks the tip.
			<<sex 30>><<bruise penis>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 3)>>
			<<bHe>> laps at your glans.
			<<sex 30>><<bruise penis>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> takes your <<penis>> deep into <<bhis>> mouth while <<bhis>> tongue teases your testes.
			<<sex 30>><<bruise penis>><<violence 1>>
		<<else>>
			<<bHe>> buries your <<penis>> deep into it's mouth, hot tongue leaving no inch of it unexplored.
			<<sex 30>><<bruise penis>><<violence 1>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "penisimminent">>
	<<if $rng gte 101>>
		<<bHe>> stops pressing <<bhis>> lips against your <<penis>>.
		<<set $NPCList[_n].mouth to "penisentrance">><<set $penisstate to "othermouthentrance">>
	<<elseif $rng gte 1>>
		<<if $nopenile is 0 and $worn.genitals.type.includes("chastity")>>
			<<bHe>> licks around your $worn.genitals.name probing for a way past. <<bHe>> salivates in anticipation.
			<<sex 20>><<set $worn.genitals.integrity -= 10>><<set $enemyanger += 5>>
		<<elseif $nopenile is 1 and $worn.genitals.type.includes("chastity")>>
			<<bHe>> licks around your $worn.genitals.name. <<bHe>> salivates in anticipation.
			<<sex 25>>
		<<elseif $nopenile is 0>>
			<<if $player.virginity.penile isnot true or $virginitytest isnot 1>>
				<<bHe>> pulls your <<penis>> into <<bhis>> mouth with <<bhis>> tongue.
				<<sex 30>><<set $NPCList[_n].mouth to "penis">><<takeNPCVirginity $NPCList[_n].fullDescription "oral">><<penilestat>><<bruise penis>><<violence 1>><<set $penisstate to "othermouth">>
			<<elseif $player.virginity.penile is true>>
				<<bHe>> pulls your virgin penis into <<bhis>> mouth with <<bhis>> tongue, separating your foreskin from your glans and forever robbing you of your purity.
				<<sex 100>><<set $NPCList[_n].mouth to "penis">><<takeVirginity $NPCList[_n].fullDescription "penile">><<takeNPCVirginity $NPCList[_n].fullDescription "oral">><<bruise penis>><<penilestat>><<violence 100>><<raped>><<penisraped>><<set $penisstate to "othermouth">>
			<</if>>
		<<else>>
			Respecting your wishes, <<bhe>> does not envelope your <<penis>> with <<bhis>> mouth, instead licking it with a primal thirst.
			<<sex 15>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "penisentrance">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> head away from your <<penis>>.
		<<set $NPCList[_n].mouth to 0>><<set $penisuse to 0>><<set $penisstate to 0>>
		<<if $NPCList[_n].vagina is "othermouth">>
			<<set $NPCList[_n].vagina to 0>>
		<</if>>
		<<if $NPCList[_n].penis is "othermouth">>
			<<set $NPCList[_n].penis to 0>>
		<</if>>
	<<elseif $rng gte 1>>
		<<if $worn.over_lower.vagina_exposed is 0>>
			<<bHe>> pushes the outline of your <<penis>> with <<bhis>> long tongue through your $worn.over_lower.name, eager to taste the skin beneath.
			<<sex 5>><<set $worn.over_lower.integrity -= 10>>
		<<elseif $worn.lower.vagina_exposed is 0>>
			<<bHe>> pushes the outline of your <<penis>> with <<bhis>> long tongue through your $worn.lower.name, eager to taste the skin beneath.
			<<sex 5>><<set $worn.lower.integrity -= 10>>
		<<elseif $worn.lower.vagina_exposed is 1>>
			<<set $rng to random(1, 100)>>
			<<if $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> traces the outline of your <<penis>> with <<bhis>> long tongue through your $worn.under_lower.name, eager to taste the skin beneath.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>>
			<<elseif $worn.under_lower.vagina_exposed is 1>>
				<<if $rng gte 71>>
					<<if $nopenile is 0 and $worn.genitals.type.includes("chastity")>>
						<<bHe>> starts to lick around your $worn.genitals.name.
						<<sex 20>><<set $NPCList[_n].mouth to "penisimminent">><<set $penisstate to "othermouthimminent">>
					<<elseif $nopenile is 1>>
						<<bHe>> starts to pull your <<penis>> into <<bhis>> mouth with <<bhis>> tongue.
						<<sex 20>><<set $NPCList[_n].mouth to "penisimminent">><<set $penisstate to "othermouthimminent">>
					<<else>>
						<<bHe>> starts to pull your <<penis>> into <<bhis>> mouth with <<bhis>> tongue. <<bHe>> salivates in anticipation.
						<<sex 20>><<set $NPCList[_n].mouth to "penisimminent">><<set $penisstate to "othermouthimminent">>
					<</if>>
				<<elseif $rng gte 1>>
					<<if !$worn.genitals.type.includes("chastity")>>
						<<bHe>> licks and teases your <<penis>> with <<bhis>> long tongue.
						<<sex 10>>
					<<else>>
						<<bHe>> licks and teases you around your $worn.genitals.name with <<bhis>> long tongue.
						<<sex 10>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].mouth is "vagina">>
	<<if $rng gte 101>>
		<<bHe>> retracts <<bhis>> tongue from your <<pussy>>.
		<<sex 30>><<set $NPCList[_n].mouth to "vaginaimminent">><<bruise vagina>><<violence 1>><<set $vaginastate to "othermouthimminent">>
	<<elseif $rng gte 1>>
		<<if $enemyarousal lte ($enemyarousalmax / 5)>>
			<<bHe>> tastes your vagina with <<bhis>> tongue.
			<<sex 30>><<bruise vagina>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> fills your vagina with <<bhis>> long tongue, twisting and caressing inside you.
			<<sex 30>><<bruise vagina>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 3)>>
			<<bHis>> agile tongue explores and teases your <<pussy>>.
			<<sex 30>><<bruise vagina>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> runs <<bhis>> tongue over your <<pussy>>, then presses against it, pushing deep inside you. <<bHe>> pulls out again, and pants.
			<<sex 30>><<bruise vagina>><<violence 1>>
		<<else>>
			<<beast_Jaws_text>> latched onto your pelvis, <<bhe>> fucks your <<pussy>> with <<bhis>> tongue. <<bHis>> breath becomes more rapid.
			<<sex 30>><<bruise vagina>><<violence 1>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "vaginaimminent">>
	<<if $rng gte 101>>
		<<bHe>> stops pressing <<bhis>> tongue against your <<pussy>>.
		<<set $NPCList[_n].mouth to "vaginaentrance">><<set $vaginastate to "othermouthentrance">>
	<<elseif $rng gte 1>>
		<<if $novaginal is 0 and $worn.genitals.type.includes("chastity")>>
			<<bhe>> uses <<bhis>> tongue to lick around your $worn.genitals.name while feeling for a way past.
			<<sex 20>><<set $worn.genitals.integrity -= 10>><<set $enemyanger += 5>>
		<<elseif $novaginal is 1 and $worn.genitals.type.includes("chastity")>>
			<<bhe>> uses <<bhis>> tongue to lick around your $worn.genitals.name.
			<<sex 25>>
		<<elseif $novaginal is 0>>
			<<if $player.virginity.vaginal isnot true or $virginitytest isnot 1>>
				<<bHe>> pushes <<bhis>> long tongue into your <<pussy>>, thirsting for a taste.
				<<sex 30>><<set $NPCList[_n].mouth to "vagina">><<vaginalstat>><<bruise vagina>><<violence 1>><<set $vaginastate to "othermouth">>
			<<elseif $player.virginity.vaginal is true>>
				<<bHe>> pushes <<bhis>> long tongue into your virgin pussy, breaking your hymen and forever robbing you of your purity.
				<<sex 100>><<set $NPCList[_n].mouth to "vagina">><<takeVirginity $NPCList[_n].fullDescription "vaginal">><<bruise vagina>><<vaginalstat>><<violence 100>><<raped>><<vaginaraped>><<set $vaginastate to "othermouth">>
			<</if>>
		<<else>>
			Respecting your wishes, <<bhe>> does not penetrate your <<pussy>> with <<bhis>> tongue, instead licking your labia with a primal thirst.
			<<sex 15>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "vaginaentrance">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> head away from your <<pussy>>.
		<<set $NPCList[_n].mouth to 0>><<set $vaginause to 0>><<set $vaginastate to 0>>
		<<if $NPCList[_n].vagina is "othermouth">>
			<<set $NPCList[_n].vagina to 0>>
		<</if>>
		<<if $NPCList[_n].penis is "othermouth">>
			<<set $NPCList[_n].penis to 0>>
		<</if>>
	<<elseif $rng gte 1>>
		<<if $worn.over_lower.vagina_exposed is 0>>
			<<bHe>> licks your <<pussy>> with <<bhis>> tongue through your $worn.over_lower.name, eager for a taste of the skin beneath.
			<<sex 5>><<set $worn.over_lower.integrity -= 10>>
		<<elseif $worn.lower.vagina_exposed is 0>>
			<<bHe>> licks your <<pussy>> with <<bhis>> tongue through your $worn.lower.name, eager for a taste of the skin beneath.
			<<sex 5>><<set $worn.lower.integrity -= 10>>
		<<elseif $worn.lower.vagina_exposed is 1>>
			<<set $rng to random(1, 100)>>
			<<if $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> licks your <<pussy>> with <<bhis>> tongue through your $worn.under_lower.name.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>>
			<<elseif $worn.under_lower.vagina_exposed is 1>>
				<<if $rng gte 71>>
					<<if $novaginal is 0 and $worn.genitals.type.includes("chastity")>>
						<<bHe>> pushes <<bhis>> long tongue against your $worn.genitals.name near your <<pussy>>.
						<<sex 20>><<set $NPCList[_n].mouth to "vaginaimminent">><<set $vaginastate to "othermouthimminent">>
					<<elseif $novaginal is 1>>
						<<bHe>> pushes <<bhis>> long tongue against your <<pussy>>.
						<<sex 20>><<set $NPCList[_n].mouth to "vaginaimminent">><<set $vaginastate to "othermouthimminent">>
					<<else>>
						<<bHe>> pushes <<bhis>> long tongue against your <<pussy>>, about to penetrate. <<bHe>> salivates in anticipation.
						<<sex 20>><<set $NPCList[_n].mouth to "vaginaimminent">><<set $vaginastate to "othermouthimminent">>
					<</if>>
				<<elseif $rng gte 1>>
					<<if !$worn.genitals.type.includes("chastity")>>
						<<bHe>> laps at your <<if $player.penisExist>><<penis>><<else>>clit<</if>> and labia with <<bhis>> long tongue.
						<<sex 10>>
					<<else>>
						<<bHe>> laps around your $worn.genitals.name with <<bhis>> long tongue.
						<<sex 10>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $NPCList[_n].mouth is "anus">>
	<<if $rng gte 101>>
		<<bHe>> retracts <<bhis>> tongue from your anus.
		<<sex 30>><<set $NPCList[_n].mouth to "anusimminent">><<bruise anus>><<violence 1>><<set $anusstate to "othermouthimminent">>
	<<elseif $rng gte 1>>
		<<if $enemyarousal lte ($enemyarousalmax / 5)>>
			<<bHe>> slides <<bhis>> long tongue in and out of your anus.
			<<sex 30>><<bruise anus>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 2)>>
			<<bHe>> fills your <<bottom>> with <<bhis>> long tongue, twisting and caressing inside you.
			<<sex 30>><<bruise anus>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 3)>>
			<<bHis>> agile tongue twists and teases inside your <<bottom>>.
			<<sex 30>><<bruise anus>><<violence 1>>
		<<elseif $enemyarousal lte (($enemyarousalmax / 5) * 4)>>
			<<bHe>> stretches <<bhis>> tongue deep inside your <<bottom>>, enjoying your taste.
			<<sex 30>><<bruise anus>><<violence 1>>
		<<else>>
			<<bHe>> fucks your <<bottom>> with <<bhis>> long tongue.
			<<sex 30>><<bruise anus>><<violence 1>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "anusimminent">>
	<<if $rng gte 101>>
		<<bHe>> stops pressing <<bhis>> tongue against your anus.
		<<set $NPCList[_n].mouth to "anusentrance">><<set $anusstate to "othermouthentrance">>
	<<elseif $rng gte 1>>
		<<if $noanal is 0 and $worn.genitals.anal_shield is 1>>
			<<bhe>> uses <<bhis>> tongue to lick around your $worn.genitals.name while feeling for a way past.
			<<sex 25>><<set $worn.genitals.integrity -= 10>><<set $enemyanger += 5>>
		<<elseif $noanal is 1 and $worn.genitals.anal_shield is 1>>
			<<bhe>> uses <<bhis>> tongue to lick around your $worn.genitals.name.
			<<sex 30>>
		<<elseif $noanal is 0>>
			<<if $player.virginity.anal isnot true or $virginitytest isnot 1>>
				<<bHe>> pushes <<bhis>> long tongue into your anus.
				<<sex 30>><<set $NPCList[_n].mouth to "anus">><<analstat>><<bruise anus>><<violence 1>><<set $anusstate to "othermouth">>
			<<elseif $player.virginity.anal is true>>
				<<bHe>> pushes <<bhis>> long tongue into your virgin anus, violating you in a way you hadn't conceived of.
				<<sex 100>><<set $NPCList[_n].mouth to "anus">><<takeVirginity $NPCList[_n].fullDescription "anal">><<bruise anus>><<analstat>><<violence 100>><<raped>><<anusraped>><<set $anusstate to "othermouth">>
			<</if>>
		<<else>>
			Respecting your wishes, <<bhe>> does not penetrate your <<bottom>> with <<bhis>> tongue, instead licking your opening.
			<<sex 15>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "anusentrance">>
	<<if $rng gte 101>>
		<<bHe>> moves <<bhis>> head away from your <<bottom>>.
		<<set $NPCList[_n].mouth to 0>><<set $anususe to 0>><<set $anusstate to 0>>
		<<if $NPCList[_n].vagina is "othermouth">>
			<<set $NPCList[_n].vagina to 0>>
		<</if>>
		<<if $NPCList[_n].penis is "othermouth">>
			<<set $NPCList[_n].penis to 0>>
		<</if>>
	<<elseif $rng gte 1>>
		<<if $worn.over_lower.anus_exposed is 0>>
			<<bHe>> circles <<bhis>> long tongue around your anus through your $worn.over_lower.name.
			<<sex 5>><<set $worn.over_lower.integrity -= 10>>
		<<elseif $worn.lower.anus_exposed is 0>>
			<<bHe>> circles <<bhis>> long tongue around your anus through your $worn.lower.name.
			<<sex 5>><<set $worn.lower.integrity -= 10>>
		<<elseif $worn.lower.anus_exposed is 1>>
			<<set $rng to random(1, 100)>>
			<<if $worn.under_lower.anus_exposed is 0>>
				<<bHe>> circles <<bhis>> long tongue around your anus through your $worn.under_lower.name.
				<<sex 5>><<set $worn.under_lower.integrity -= 10>>
			<<elseif $worn.under_lower.anus_exposed is 1>>
				<<if $rng gte 71>>
					<<if $noanal is 0 and $worn.genitals.anal_shield is 1>>
						<<bHe>> presses <<bhis>> tongue against your $worn.genitals.name near your anus.
						<<sex 20>><<set $NPCList[_n].mouth to "anusimminent">><<set $anusstate to "othermouthimminent">>
					<<elseif $noanal is 1>>
						<<bHe>> presses <<bhis>> tongue against your anus.
						<<sex 20>><<set $NPCList[_n].mouth to "anusimminent">><<set $anusstate to "othermouthimminent">>
					<<else>>
						<<bHe>> presses <<bhis>> long tongue against your anus, preparing to penetrate you. <<bHe>> salivates in anticipation.
						<<sex 20>><<set $NPCList[_n].mouth to "anusimminent">><<set $anusstate to "othermouthimminent">>
					<</if>>
				<<elseif $rng gte 1>>
					<<if $worn.genitals.anal_shield isnot 1>>
						<<bHe>> prods and licks your <<bottom>>.
						<<sex 10>>
					<<else>>
						<<bHe>> prods and licks your <<bottom>> near your $worn.genitals.name
						<<sex 10>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].stance is "approach">>

	<<if $NPCList[_n].mouth is 0>>
		<<if $NPCList[_n].monster is "monster" and random(1, 5) is 5>>
			<<beastspeech _n>>
		<<elseif $enemyanger + $rng lte 20>>
			<<if $NPCList[_n].penis is 0 or $NPCList[_n].vagina is 0>>
				Curious, <<bhe>> sniffs your groin.
				<<neutral 5>><<set $enemyarousal += 10>>
			<<else>>
				Curious, <<bhe>> sniffs your face.
				<<neutral 1>><<set $enemyarousal += 10>>
			<</if>>
		<<elseif $enemyanger + $rng lte 40>>
			<<beastlick>>
		<<elseif $enemyanger + $rng lte 160>>
			<<if $worn.over_lower.name isnot "naked" or $worn.lower.name isnot "naked">>
				<<if setup.clothes.over_lower[clothesIndex('over_lower', $worn.over_lower)].skirt is 1 and $worn.over_lower.skirt_down is 1>>
					<<bHe>> lifts up your $worn.over_lower.name with <<bhis>> <<beast_teeth_text>>.
					<<set $worn.lower.skirt_down to 0>><<set $worn.over_lower.vagina_exposed to 1>><<set $worn.over_lower.anus_exposed to 1>><<set $worn.over_lower.exposed to 2>><<set $worn.over_lower.integrity -= 10>>
				<<elseif setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 1 and $worn.lower.skirt_down is 1>>
					<<bHe>> lifts up your $worn.lower.name with <<bhis>> <<beast_teeth_text>>.
					<<set $worn.lower.skirt_down to 0>><<set $worn.lower.vagina_exposed to 1>><<set $worn.lower.anus_exposed to 1>><<set $worn.lower.exposed to 2>><<set $worn.lower.integrity -= 10>>
				<<elseif $worn.over_lower.exposed isnot 2>>
					<<bHe>> grabs your $worn.over_lower.name with <<bhis>> <<beast_teeth_text>>.
					<<set $NPCList[_n].mouth to "overlowerclothes">><<violence 1>>
				<<elseif $worn.lower.exposed isnot 2>>
					<<bHe>> grabs your $worn.lower.name with <<bhis>> <<beast_teeth_text>>.
					<<set $NPCList[_n].mouth to "lowerclothes">><<violence 1>>
				<<elseif $worn.under_lower.name isnot "naked">>
					<<bHe>> grabs your $worn.under_lower.name with <<bhis>> <<beast_teeth_text>>.
					<<set $NPCList[_n].mouth to "underclothes">><<violence 1>>
				<<else>>
					<<beastlick>>
				<</if>>
			<<elseif $worn.under_lower.name isnot "naked">>
				<<bHe>> grabs your $worn.under_lower.name with <<bhis>> <<beast_teeth_text>>.
				<<set $NPCList[_n].mouth to "underclothes">><<violence 1>>
			<<else>>
				<<beastlick>>
			<</if>>
		<<elseif $enemyanger + $rng lte 200>>
			<<bHe>> <<beast_growls_text>> menacingly.
			<<violence 1>>
		<<else>>
			<<if $NPCList[_n].penis is 0 or $NPCList[_n].vagina is 0>>
				<<if $claws is 1>>
					<<bHe>> bites and claws at your thighs.
				<<else>>
					<<bHe>> bites your thighs.
				<</if>>
				<<violence 20>><<bruise thigh>><<bruise thigh>><<set $worn.lower.integrity -= 20>><<set $worn.under_lower.integrity -= 20>><<hitstat>><<set $enemyanger -= 20>>
			<<else>>
				<<bHe>> bites and claws at your <<breasts>>.
				<<violence 20>><<bruise chest>><<bruise chest>><<set $worn.upper.integrity -= 20>><<hitstat>><<set $enemyanger -= 20>><<playWithBreasts>>
			<</if>>
		<</if>>
	<</if>>

	<<set $rng to random(1, 100)>>
	<<if $NPCList[_n].penis is 0 or $NPCList[_n].vagina is 0>>
		<<if $enemyarousal gte (($enemyarousalmax / 10) * 3)>>
			<<if $NPCList[_n].gender is "f" and !$player.penisExist>>
				<<if $rng gte 51 and $position isnot "wall">>
					<<if $water is 0>>
						<<bHe>> jumps on top of you, mounting your face and pinning you down.
						<<set $NPCList[_n].stance to "topface">><<violence 5>><<set $NPCList[_n].mouth to 0>>
					<<else>>
						<<bHe>> swims right up to you, pressing <<bhis>> <<if $NPCList[_n].penis isnot "none">>penis<<else>>pussy<</if>> against your face.
						<<set $NPCList[_n].stance to "topface">><<violence 5>><<set $NPCList[_n].mouth to 0>>
					<</if>>
				<<else>>
					<<if $water is 0>>
						<<bHe>> jumps on top of you and pins you down.
						<<set $NPCList[_n].stance to "top">><<violence 5>><<set $head to "grappled">><<set $NPCList[_n].mouth to 0>>
					<<else>>
						<<bHe>> swims right up to you, pressing <<bhis>> body against yours.
						<<set $NPCList[_n].stance to "top">><<violence 5>><<set $head to "grappled">><<set $NPCList[_n].mouth to 0>>
					<</if>>
				<</if>>
			<<else>>
				<<if $rng gte 71 and $position isnot "wall">>
					<<if $water is 0>>
						<<bHe>> jumps on top of you, mounting your face and pinning you down.
						<<set $NPCList[_n].stance to "topface">><<violence 5>><<set $NPCList[_n].mouth to 0>>
					<<else>>
						<<bHe>> swims right up to you, pressing <<bhis>> <<if $NPCList[_n].penis isnot "none">>penis<<else>>pussy<</if>> against your face.
						<<set $NPCList[_n].stance to "topface">><<violence 5>><<set $NPCList[_n].mouth to 0>>
					<</if>>
				<<else>>
					<<if $water is 0>>
						<<bHe>> jumps on top of you and pins you down.
						<<set $NPCList[_n].stance to "top">><<violence 5>><<set $head to "grappled">><<set $NPCList[_n].mouth to 0>>
					<<else>>
						<<bHe>> swims right up to you, pressing <<bhis>> body against yours.
						<<set $NPCList[_n].stance to "top">><<violence 5>><<set $head to "grappled">><<set $NPCList[_n].mouth to 0>>
					<</if>>
				<</if>>
			<</if>>
		<<else>>
		<</if>>
	<</if>>

<<elseif $NPCList[_n].stance is "top">>
	<<if $NPCList[_n].mouth is 0>>
		<<if $NPCList[_n].monster is "monster" and random(1, 5) is 5>>
			<<beastspeech _n>>
		<<elseif ($enemyanger + $rng) lte 20 and $position isnot "wall">>
			<<bHe>> licks your face.
			<<neutral 2>>
		<<elseif ($enemyanger + $rng) lte 40 and $position isnot "wall">>
			<<bHe>> licks your neck.
			<<neutral 2>>
		<<elseif $enemyanger + $rng lte 60>>
			<<if $worn.upper.name isnot "naked">>
				<<bHe>> tears at your $worn.upper.name.
				<<neutral 3>><<set $worn.upper.integrity -= 10>>
			<<elseif $NPCList[_n].gender is "m">>
				<<bHe>> <<if $claws is 1>>presses <<bhis>> <<beast_claws_text>> into your back<<else>>bites your back<</if>>.
				<<neutral 3>>
			<<else>>
				<<bHe>> licks your <<breasts>>.
				<<neutral 3>><<playWithBreasts>>
			<</if>>
		<<elseif ($enemyanger + $rng) lte 100 and $position isnot "wall">>
			<<bHe>> grabs your hair in <<bhis>> <<beast_teeth_text>>.
			<<set $NPCList[_n].mouth to "hair">><<neutral 3>>
		<<elseif $enemyanger + $rng lte 120>>
			<<bHe>> <<beast_growls_text>> menacingly.
			<<violence 1>>
		<<elseif ($enemyanger + $rng) lte 140 and $position isnot "wall">>
			<<bHe>> bites your face.
			<<violence 5>><<bruise face>><<hitstat>>
		<<elseif ($enemyanger + $rng) lte 160 and $position isnot "wall">>
			<<bHe>> bites your neck.
			<<violence 5>><<bruise neck>><<hitstat>>
		<<elseif $position isnot "wall">>
			<<bHe>> grabs your neck in <<bhis>> <<beast_teeth_text>>.
			<<violence 5>><<bruise neck>><<set $NPCList[_n].mouth to "neck">><<hitstat>>
		<<else>>
			<<bHe>> bites your waist.
			<<violence 5>><<bruise tummy>><<hitstat>>
		<</if>>
	<</if>>
	<<if $NPCList[_n].penis is 0>>
		<<set $rng to random(1, 100)>>

		<<if $rng lte 25>>
			<<bHe>> humps your rear frantically, rubbing <<bhis>> $NPCList[_n].penisdesc against your back.
			<<neutral 5>>
		<<elseif $rng lte 50>>
			<<bHe>> humps your rear frantically, rubbing <<bhis>> $NPCList[_n].penisdesc between your thighs.
			<<sex 3>>
		<<elseif $rng lte 75>>
			<<if $anususe is 0 and $analdisable is "f">>
				<<bHis>> $NPCList[_n].penisdesc gains purchase between your <<bottom>> cheeks.
				<<sex 5>><<bruise anus>><<violence 1>><<set $NPCList[_n].penis to "anusentrance">><<set $anususe to "penis">><<set $anusstate to "entrance">>
			<<else>>
				<<bHis>> $NPCList[_n].penisdesc rubs against your <<bottom>>.
				<<neutral 5>>
			<</if>>
		<<elseif $rng lte 100>>
			<<if $player.vaginaExist and $vaginause is 0 and (!$player.penisExist or random(0,100) lt 75)>>
				<<bHe>> humps your rear frantically, gaining purchase in front of your <<pussy>>.
				<<sex 5>><<bruise vagina>><<violence 1>><<set $NPCList[_n].penis to "vaginaentrance">><<set $vaginause to "penis">><<set $vaginastate to "entrance">><<set $vaginatarget to _n>>
			<<elseif $player.penisExist and $penisuse is 0 and !$worn.genitals.type.includes("chastity") and (!$player.vaginaExist or $vaginause is 0)>>
				<<bHe>> humps your rear frantically, rubbing against your <<penis>>.
				<<sex 5>><<bruise penis>><<violence 1>>
			<<else>>
				<<bHe>> humps your rear frantically, rubbing <<bhis>> $NPCList[_n].penisdesc between your thighs.
				<<sex 3>>
			<</if>>
		<</if>>
	<<elseif $NPCList[_n].vagina is 0>>
		<<set $rng to random(1, 100)>>

		<<if $rng lte 25>>
			<<bHe>> humps between your legs, rubbing <<bhis>> pussy against your <<if $worn.genitals.type.includes("chastity")>>$worn.genitals.name.<<else>><<genitals>>.<</if>>
			<<neutral 5>>
		<<elseif $rng lte 50>>
			<<bHe>> humps between your legs, rubbing <<bhis>> pussy against your <<if $worn.genitals.type.includes("chastity")>>$worn.genitals.name.<<else>><<genitals>>.<</if>>
			<<sex 3>>
		<<elseif $rng lte 100>>
			<<if $player.vaginaExist and $vaginause is 0 and $worn.genitals.type.includes("chastity") or $player.penisExist and $penisuse is 0 and $worn.genitals.type.includes("chastity")>>
				<<bHe>> humps between your legs, rubbing <<bhis>> pussy against your $worn.genitals.name.
				<<sex 3>>
			<<elseif $player.penisExist and $penisuse is 0 and (!$player.vaginaExist or random(0,100) lt 75)>>
				<<bHe>> humps between your legs, gaining purchase on the tip of your <<penis>>.
				<<sex 5>><<bruise penis>><<violence 1>><<set $NPCList[_n].vagina to "penisentrance">><<set $penisuse to "othervagina">><<set $penisstate to "entrance">><<set $penistarget to _n>>
			<<elseif $player.vaginaExist and $vaginause is 0 and (!$player.penisExist or $penisuse is 0)>>
				<<bHe>> humps between your legs, brushing your <<pussy>> with <<bhis>> own.
				<<sex 5>><<bruise vagina>><<violence 1>><<set $NPCList[_n].vagina to "vaginaentrance">><<set $vaginause to "othervagina">><<set $vaginastate to "othervaginaentrance">><<set $vaginatarget to _n>>
			<<else>>
				<<bHe>> humps between your legs, rubbing <<bhis>> pussy against your <<genitals>>.
				<<sex 3>>
			<</if>>
		<</if>>
	<</if>>
<<elseif $NPCList[_n].stance is "topface">>
	<<if $NPCList[_n].mouth is 0>>
		<<if $NPCList[_n].monster is "monster" and random(1, 5) is 5>>
			<<beastspeech _n>>
		<<elseif ($enemyanger + $rng) lte 25 and $position isnot "wall">>
			<<if $worn.genitals.type.includes("chastity")>>
				<<bHe>> licks around your $worn.genitals.name with a hot tongue.
				<<neutral 4>>
			<<elseif $player.vaginaExist>>
				<<bHe>> licks your labia with a hot tongue.
				<<neutral 4>>
			<<else>>
				<<bHe>> licks your testes with a hot tongue.
				<<neutral 4>>
			<</if>>
		<<elseif ($enemyanger + $rng) lte 50 and $position isnot "wall">>
			<<bHe>> buries <<bhis>> wet tongue between your <<bottom>> cheeks, licking and probing.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 75 and $position isnot "wall">>
			<<if $worn.genitals.type.includes("chastity")>>
				<<bHe>> desperately tries to force <<bhis>> tongue around your $worn.genitals.name.

				<<sex 3>>
			<<elseif $player.penisExist>>
				<<bHe>> licks and wraps <<bhis>> tongue around your <<penis>>.

				<<sex 3>><<set $NPCList[_n].mouth to "penisentrance">><<set $penisuse to "othermouth">><<set $penisstate to "othermouthentrance">><<set $penistarget to _n>>
			<<else>>
				<<bHe>> licks and wiggles <<bhis>> tongue against your <<pussy>>.

				<<sex 3>><<set $NPCList[_n].mouth to "vaginaentrance">><<set $vaginause to "othermouth">><<set $vaginastate to "othermouthentrance">><<set $vaginatarget to _n>>
			<</if>>
		<<elseif ($enemyanger + $rng) lte 100 and $position isnot "wall" and $analingusdisablereceiving is "f">>
			<<bHe>> buries <<bhis>> wet tongue between your <<bottom>> cheeks, and prods your <<if $worn.genitals.type.includes("chastity")>>$worn.genitals.name<<else>>opening<</if>>.

			<<sex 3>><<set $NPCList[_n].mouth to "anusentrance">><<set $anususe to "othermouth">><<set $anusstate to "othermouthentrance">><<set $anustarget to _n>>
		<<elseif ($enemyanger + $rng) lte 125 and $position isnot "wall">>
			<<bHe>> <<beast_growls_text>>, <<bhis>> breath hot on your <<if $worn.genitals.type.includes("chastity")>>$worn.genitals.name.<<else>><<genitals>>.<</if>>
			<<sex 1>>
		<<elseif ($enemyanger + $rng) lte 150 and $position isnot "wall">>
			<<bHe>> nips your <<bottom>> in warning.
			<<bruise bottom>><<violence 1>>
		<<elseif ($enemyanger + $rng) lte 175 and $position isnot "wall">>
			<<bHe>> bites your thigh.
			<<bruise thigh>><<violence 2>>
		<<else>>
			<<bHe>> bites your <<bottom>> cheek.
			<<bruise bottom>><<violence 4>>
		<</if>>
	<</if>>
	<<if $NPCList[_n].penis is 0>>
		<<if ($enemyanger + $rng) lte 25>>
			<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your cheek.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 50>>
			<<bHe>> pokes <<bhis>> $NPCList[_n].penisdesc against your face.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 75>>
			<<bHe>> rubs <<bhis>> $NPCList[_n].penisdesc against your lips.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 100>>
			<<if !$worn.face.type.includes("gag")>>
				<<bHe>> pushes <<bhis>> $NPCList[_n].penisdesc against your lips.
				<<sex 3>><<set $NPCList[_n].penis to "mouthentrance">><<set $mouthuse to "penis">><<set $mouthstate to "entrance">><<set $mouthtarget to _n>>
			<<else>>
				<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc against the $worn.face.name covering your mouth.
				<<neutral 5>>
			<</if>>
		<<else>>
			<<if !$worn.face.type.includes("gag")>>
				<<bHe>> shoves <<bhis>> $NPCList[_n].penisdesc between your lips.
				<<sex 3>><<set $NPCList[_n].penis to "mouthimminent">><<set $mouthuse to "penis">><<set $mouthstate to "imminent">><<set $mouthtarget to _n>>
			<<else>>
				<<bHe>> thrusts <<bhis>> $NPCList[_n].penisdesc against the $worn.face.name covering your mouth.
				<<neutral 5>>
			<</if>>
		<</if>>
	<</if>>
	<<if $NPCList[_n].vagina is 0>>
		<<if ($enemyanger + $rng) lte 25>>
			<<bHe>> rubs <<bhis>> pussy against your cheek.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 50>>
			<<bHe>> rubs <<bhis>> pussy against your nose.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 75>>
			<<bHe>> rubs <<bhis>> pussy against your lips.
			<<neutral 3>>
		<<elseif ($enemyanger + $rng) lte 100>>
			<<bHe>> pushes <<bhis>> pussy against your lips.
			<<sex 3>><<set $NPCList[_n].vagina to "mouth">><<set $mouthuse to "othervagina">><<set $mouthstate to "othervagina">><<set $mouthtarget to _n>>
		<<else>>
			<<bHe>> shoves <<bhis>> pussy against your lips.
			<<sex 3>><<set $NPCList[_n].vagina to "mouth">><<set $mouthuse to "othervagina">><<set $mouthstate to "othervagina">><<set $mouthtarget to _n>>
		<</if>>
	<</if>>
<</if>>

<<set _bstindex to ($enemyno -2)>>
<<set _next_beast to $combatTrain.total_length - $combatTrain.length + 1>>
<<set _next_next_beast to $combatTrain.total_length - $combatTrain.length + 2>>
<<if $combatTrain.length is 1>>

	A <<print $combatTrain.beastTypes[_next_beast]>> awaits <<bhisnext>> turn.
<<elseif $combatTrain.length is 2>>

	A <<print $combatTrain.beastTypes[_next_beast]>> awaits <<bhisnext>> turn next, along with one other <<print $combatTrain.beastTypes[_next_next_beast]>>.
<<elseif $combatTrain.length gte 3>>

	A <<print $combatTrain.beastTypes[_next_beast]>> awaits <<bhisnext>> turn next, along with <<number $combatTrain.length-1>> other <<if $bestialitydisable is "f">>beasts<<else>>monsters<</if>>.
<</if>>
<<manend>><<set $pullaway to 0>>

<</widget>>

<<widget "beastlick">>
	<<if $NPCList[_n].penis is 0 or $NPCList[_n].vagina is 0>>
		<<if $worn.genitals.type.includes("chastity")>>
			<<if $vaginause is "cover">>
				<<bHe>> licks your hand, trying to taste the $worn.genitals.name beneath.
				<<if $arousal gte ($arousalmax / 5) * 4>>
					<<bHe>> laps up the juices that leak through your fingers.
				<<elseif $arousal gte $arousalmax / 5>>
					<<bHis>> tongue probes around and between your fingers, searching for a weak spot.
				<<else>>
					<<bHe>> tries to force <<bhis>> tongue between your fingers.
				<</if>>
			<<elseif $worn.over_lower.vagina_exposed is 0>>
				<<neutral 10>>
				<<bHe>> licks your $worn.over_lower.name, trying to taste the $worn.genitals.name beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.over_lower.integrity -= 5>>
			<<elseif $worn.lower.vagina_exposed is 0>>
				<<bHe>> licks your $worn.lower.name, trying to taste the $worn.genitals.name beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.lower.integrity -= 5>>
			<<elseif $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> licks your $worn.under_lower.name, trying to taste the $worn.genitals.name beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.under_lower.integrity -= 5>>
			<<else>>
				<<neutral 15>>
				<<bHe>> licks your $worn.genitals.name.
				<<if $orgasmdown gte 1>>
					The feeling of vibrations from <<bhis>> tongue as you cum is maddening, but <<bhe>> doesn't relent.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					The feeling of vibrations from <<bhis>> tongue on your sensitive flesh makes you jerk and spasm.
				<<elseif $arousal gte $arousalmax / 5>>
					<<bHis>> hot breath and tongue elicit shameful feelings.
				<<else>>
					You try to shift your crotch to escape this violation, but <<bhe>> persists.
				<</if>>
				<<set $worn.genitals.integrity -= 5>>
			<</if>>
		<<elseif $player.vaginaExist>>
			<<if $vaginause is "cover">>
				<<bHe>> licks your hand, trying to taste the <<pussy>> beneath.
				<<if $arousal gte ($arousalmax / 5) * 4>>
					<<bHe>> laps up the juices that leak through your fingers.
				<<elseif $arousal gte $arousalmax / 5>>
					<<bHis>> tongue probes around and between your fingers, searching for a weak spot.
				<<else>>
					<<bHe>> tries to force <<bhis>> tongue between your fingers.
				<</if>>
			<<elseif $worn.over_lower.vagina_exposed is 0>>
				<<neutral 10>>
				<<bHe>> licks your $worn.over_lower.name, trying to taste the <<pussy>> beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.over_lower.integrity -= 5>>
			<<elseif $worn.lower.vagina_exposed is 0>>
				<<bHe>> licks your $worn.lower.name, trying to taste the <<pussy>> beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.lower.integrity -= 5>>
			<<elseif $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> licks your $worn.under_lower.name, trying to taste the <<pussy>> beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.under_lower.integrity -= 5>>
			<<else>>
				<<neutral 15>>
				<<bHe>> licks your bare pussy.
				<<if $orgasmdown gte 1>>
					The feeling of <<bhis>> tongue as you cum is maddening, but <<bhe>> doesn't relent.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					The feeling of <<bhis>> tongue on your sensitive flesh makes your pelvis jerk and spasm.
				<<elseif $arousal gte $arousalmax / 5>>
					<<bHis>> hot breath and tongue elicit shameful feelings.
				<<else>>
					You try to shift your crotch to escape this violation, but <<bhe>> persists.
				<</if>>
			<</if>>
		<<elseif $player.penisExist>>
			<<if $penisuse is "cover">>
				<<bHe>> licks your hand, trying to taste the <<penis>> beneath.
				<<if $arousal gte ($arousalmax / 5) * 4>>
					<<bHe>> laps up the juices that leak through your fingers.
				<<elseif $arousal gte $arousalmax / 5>>
					<<bHis>> tongue probes around and between your fingers, searching for a weak spot.
				<<else>>
					<<bHe>> tries to force <<bhis>> tongue between your fingers.
				<</if>>
			<<elseif $worn.over_lower.vagina_exposed is 0>>
				<<neutral 10>>
				<<bHe>> licks your $worn.over_lower.name, trying to taste the <<penis>> beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.over_lower.integrity -= 5>>
			<<elseif $worn.lower.vagina_exposed is 0>>
				<<bHe>> licks your $worn.lower.name, trying to taste the <<penis>> beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.lower.integrity -= 5>>
			<<elseif $worn.under_lower.vagina_exposed is 0>>
				<<bHe>> licks your $worn.under_lower.name, trying to taste the <<penis>> beneath.
				<<if $orgasmdown gte 1>>
					<<bHe>> laps up your leaking juices as you squirm.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					You're shamed by how good it feels.
				<<elseif $arousal gte $arousalmax / 5>>
					The incessant probing makes your groin heat up.
				<<else>>
					You try to shift your crotch away, but <<bhe>> persists.
				<</if>>
				<<set $worn.under_lower.integrity -= 5>>
			<<else>>
				<<neutral 15>>
				<<bHe>> licks your bare penis.
				<<if $orgasmdown gte 1>>
					The feeling of <<bhis>> tongue as you cum is maddening, but <<bhe>> doesn't relent.
				<<elseif $arousal gte ($arousalmax / 5) * 4>>
					The feeling of <<bhis>> tongue on your sensitive flesh makes your pelvis jerk and spasm.
				<<elseif $arousal gte $arousalmax / 5>>
					<<bHis>> hot breath and tongue elicit shameful feelings.
				<<else>>
					You try to shift your crotch to escape this violation, but <<bhe>> persists.
				<</if>>
			<</if>>
		<</if>>
	<<else>>
		<<if $enemyanger gte 100>>
			<<bHe>> nips your neck.
		<<elseif $enemyanger gte 20>>
			<<bHe>> licks your neck.
		<<else>>
			<<bHe>> licks your face.
		<</if>>
	<</if>>
<<neutral 1>><<set $enemyarousal += 10>>
<</widget>>

:: Widgets Beast Clothing [widget]
<<widget "beastclothing">>
<<outfitChecks>>
<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "overlowerclothes">>
	<<if $NPCList[_n].stance is "top">>
		<<set $NPCList[_n].mouth to 0>>
	<<else>>
		<<if $worn.over_lower.name is "naked">>
			<<bHe>> spits out the ruined fabric.
			<<set $NPCList[_n].mouth to 0>>
		<<elseif $overlowerstruggle is 1>>
			<<set $overlowerstruggle to 0>>
			<<bHe>> tugs at your $worn.over_lower.name, but you keep <<him>> from stripping you.
			<<set $overlowerstruggle to 0>><<neutral 1>><<set $worn.over_lower.integrity -= 5>>
		<<elseif $rng gte 91>>
			<<bHe>> releases your $worn.over_lower.name from <<bhis>> mouth.
			<<set $NPCList[_n].mouth to 0>>
		<<elseif $rng lte 90>>
			<<if _overOutfit>>
				<<if $worn.over_upper.open is 1>>
					<<if $worn.upper.state_top is "chest">>
						<<bHe>> tugs your $worn.over_lower.name, pulling down your $worn.over_upper.name and revealing your <<breasts>>.
						<<set $worn.over_upper.state_top to "midriff">><<set $worn.over_upper.exposed to 2>><<neutral 3>><<set $speechbreasts to 1>>
						<<if $worn.over_upper.state is "chest">>
							<<set $worn.over_upper.state to "midriff">>
						<</if>>
						<<if $worn.over_lower.state is "chest">>
							<<set $worn.over_lower.state to "midriff">>
						<</if>>
					<<elseif $worn.over_upper.state_top is "midriff">>
						<<bHe>> tugs your $worn.over_lower.name, pulling down your $worn.over_upper.name passed your midriff.
						<<set $worn.over_upper.state_top to "waist">><<neutral 1>>
						<<if $worn.over_upper.state is "midriff">>
							<<set $worn.over_upper.state to "waist">>
						<</if>>
						<<if $worn.over_lower.state is "midriff">>
							<<set $worn.over_lower.state to "waist">>
						<</if>>
					<<elseif $worn.over_upper.state_top is "waist">>
						<<bHe>> pulls your $worn.over_upper.name down to your thighs, revealing your
						<<if $worn.lower.state is "waist">>
							$worn.lower.name
							<<neutral 2>>
						<<elseif $worn.under_lower.state is "waist">>
							$worn.under_lower.name
							<<neutral 2>>
						<<else>>
							<<genitals>>.
							<<neutral 5>><<set $speechgenitals to 1>>
						<</if>>
						<<set $worn.over_upper.state_top to "thighs">><<set $worn.over_upper.state to "thighs">><<set $worn.over_lower.vagina_exposed to 1>><<set $worn.over_lower.anus_exposed to 1>><<set $worn.over_lower.exposed to 2>>
						<<if $worn.over_lower.state is "waist">>
							<<set $worn.over_lower.state to "thighs">>
						<</if>>
					<<elseif $worn.over_upper.state_top is "thighs">>
						<<bHe>> pulls your $worn.over_upper.name down to your knees.
						<<set $worn.over_upper.state_top to "knees">><<set $worn.over_upper.state to "knees">><<neutral 1>>
						<<if $worn.over_lower.state is "thighs">>
							<<set $worn.over_lower.state to "knees">>
						<</if>>
					<<elseif $worn.over_upper.state_top is "knees">>
						<<bHe>> pulls your $worn.over_upper.name down to your ankles.
						<<set $worn.over_upper.state_top to "ankles">><<set $worn.over_upper.state to "ankles">><<neutral 1>>
						<<if $worn.over_lower.state is "knees">>
							<<set $worn.over_lower.state to "ankles">>
						<</if>>
					<<elseif $worn.over_upper.state_top is "ankles">>
						<<bHe>> pulls your $worn.over_upper.name off the bottom of your legs.
						<<neutral 5>><<set $worn.over_upper.state_top to 0>><<set $worn.over_upper.state to 0>><<overupperstrip>>
						<<if $worn.over_lower.state is "ankles">>
							<<set $worn.over_lower.state to 0>><<overlowerstrip>>
						<</if>>
					<</if>>
				<<else>>
					<<bHe>> tugs on your $worn.over_lower.name, tugging your $worn.over_upper.name against your shoulders. You hear a tearing sound.
					<<set $worn.over_lower.integrity -= 20>><<neutral 1>>
				<</if>>
			<<elseif _overOutfit isnot true>>
				<<if $worn.over_lower.state is "waist">>
					<<bHe>> pulls down your $worn.over_lower.name, exposing your
					<<if $worn.lower.state is "waist">>
						$worn.lower.name.
					<<elseif $worn.under_lower.state is "waist">>
						$worn.under_lower.name.
					<<else>>
						<<genitals>>.
						<<neutral 5>><<set $speechgenitals to 1>>
					<</if>>
					<<set $worn.over_lower.state to "thighs">><<set $worn.over_lower.vagina_exposed to 1>><<set $worn.over_lower.anus_exposed to 1>><<set $worn.over_lower.exposed to 2>>
				<<elseif $worn.over_lower.state is "thighs">>
					<<bHe>> pulls your $worn.over_lower.name down to your knees.
					<<set $worn.over_lower.state to "knees">><<neutral 1>>
				<<elseif $worn.over_lower.state is "knees">>
					<<bHe>> pulls your $worn.over_lower.name down to your ankles.
					<<set $worn.over_lower.state to "ankles">><<neutral 1>>
				<<elseif $worn.over_lower.state is "ankles">>
					<<bHe>> pulls your $worn.over_lower.name off your legs.
					<<overlowerstrip>>
					<<set $NPCList[_n].mouth to 0>><<neutral 3>><<clothesstripstat>>
				<</if>>
			<<else>>
				<<bHe>> tugs on your $worn.over_lower.name, you hear the fabric tear.
				<<neutral 1>><<set $worn.over_lower.integrity -= 20>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "lowerclothes">>
	<<if $NPCList[_n].stance is "top">>
		<<set $NPCList[_n].mouth to 0>>
	<<else>>
		<<if $worn.lower.name is "naked">>
			<<bHe>> spits out the ruined fabric.
			<<set $NPCList[_n].mouth to 0>>
		<<elseif $lowerstruggle is 1>>
			<<set $lowerstruggle to 0>>
			<<bHe>> tugs at your $worn.lower.name, but you keep <<him>> from stripping you.
			<<set $lowerstruggle to 0>><<neutral 1>><<set $worn.lower.integrity -= 5>>
		<<elseif $rng gte 91>>
			<<bHe>> releases your $worn.lower.name from <<bhis>> mouth.
			<<set $NPCList[_n].mouth to 0>>
		<<elseif $rng lte 90>>
			<<if _middleOutfit>>
				<<if $worn.upper.open is 1>>
					<<if $worn.upper.state_top is "chest">>
						<<bHe>> tugs your $worn.lower.name, pulling down your $worn.upper.name and revealing your <<breasts>>.
						<<set $worn.upper.state_top to "midriff">><<set $worn.upper.exposed to 2>><<neutral 3>><<set $speechbreasts to 1>>
						<<if $worn.upper.state is "chest">>
							<<set $worn.upper.state to "midriff">>
						<</if>>
						<<if $worn.lower.state is "chest">>
							<<set $worn.lower.state to "midriff">>
						<</if>>
					<<elseif $worn.upper.state_top is "midriff">>
						<<bHe>> tugs your $worn.lower.name, pulling down your $worn.upper.name passed your midriff.
						<<set $worn.upper.state_top to "waist">><<neutral 1>>
						<<if $worn.upper.state is "midriff">>
							<<set $worn.upper.state to "waist">>
						<</if>>
						<<if $worn.lower.state is "midriff">>
							<<set $worn.lower.state to "waist">>
						<</if>>
					<<elseif $worn.upper.state_top is "waist">>
						<<bHe>> pulls your $worn.upper.name down to your thighs, revealing your
						<<if $worn.under_lower.state is "waist">>
							$worn.under_lower.name
							<<neutral 2>>
						<<else>>
							<<genitals>>.
							<<neutral 5>><<set $speechgenitals to 1>>
						<</if>>
						<<set $worn.upper.state_top to "thighs">><<set $worn.upper.state to "thighs">><<set $worn.lower.vagina_exposed to 1>><<set $worn.lower.anus_exposed to 1>><<set $worn.lower.exposed to 2>>
						<<if $worn.lower.state is "waist">>
							<<set $worn.lower.state to "thighs">>
						<</if>>
					<<elseif $worn.upper.state_top is "thighs">>
						<<bHe>> pulls your $worn.upper.name down to your knees.
						<<set $worn.upper.state_top to "knees">><<set $worn.upper.state to "knees">><<neutral 1>>
						<<if $worn.lower.state is "thighs">>
							<<set $worn.lower.state to "knees">>
						<</if>>
					<<elseif $worn.upper.state_top is "knees">>
						<<bHe>> pulls your $worn.upper.name down to your ankles.
						<<set $worn.upper.state_top to "ankles">><<set $worn.upper.state to "ankles">><<neutral 1>>
						<<if $worn.lower.state is "knees">>
							<<set $worn.lower.state to "ankles">>
						<</if>>
					<<elseif $worn.upper.state_top is "ankles">>
						<<bHe>> pulls your $worn.upper.name off the bottom of your legs.
						<<neutral 5>><<set $worn.upper.state_top to 0>><<set $worn.upper.state to 0>><<upperstrip>>
						<<if $worn.lower.state is "ankles">>
							<<set $worn.lower.state to 0>><<lowerstrip>>
						<</if>>
					<</if>>
				<<else>>
					<<bHe>> tugs on your $worn.lower.name, tugging your $worn.upper.name against your shoulders. You hear a tearing sound.
					<<set $worn.lower.integrity -= 20>><<neutral 1>>
				<</if>>
			<<elseif _middleOutfit isnot true>>
				<<if $worn.lower.state is "waist">>
					<<bHe>> pulls down your $worn.lower.name, exposing your
					<<if $worn.under_lower.state is "waist">>
						$worn.under_lower.name.
						<<neutral 2>><<set $worn.lower.vagina_exposed to 1>><<set $worn.lower.anus_exposed to 1>>
					<<else>>
						<<genitals>>.
						<<neutral 5>><<set $speechgenitals to 1>>
					<</if>>
					<<set $worn.lower.state to "thighs">><<set $worn.lower.vagina_exposed to 1>><<set $worn.lower.anus_exposed to 1>><<set $worn.lower.exposed to 2>>
				<<elseif $worn.lower.state is "thighs">>
					<<bHe>> pulls your $worn.lower.name down to your knees.
					<<set $worn.lower.state to "knees">><<neutral 1>>
				<<elseif $worn.lower.state is "knees">>
					<<bHe>> pulls your $worn.lower.name down to your ankles.
					<<set $worn.lower.state to "ankles">><<neutral 1>>
				<<elseif $worn.lower.state is "ankles">>
					<<bHe>> pulls your $worn.lower.name off your legs.
					<<lowerstrip>>
					<<set $NPCList[_n].mouth to 0>><<neutral 3>><<clothesstripstat>>
				<</if>>
			<<else>>
				<<bHe>> tugs on your $worn.lower.name, you hear the fabric tear.
				<<neutral 1>><<set $worn.lower.integrity -= 20>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<set $rng to random(1, 100)>>

<<if $NPCList[_n].mouth is "underclothes">>
	<<if $worn.under_lower.name is "naked">>
		<<bHe>> spits out the ruined fabric.
		<<set $NPCList[_n].mouth to 0>>
	<<elseif $understruggle is 1>>
		<<bHe>> tugs on your $worn.under_lower.name, but you keep <<him>> from stripping you.
		<<set $understruggle to 0>><<set $speechstripstruggle to 1>><<neutral 1>><<set $worn.under_lower.integrity -= 5>>
	<<elseif $rng gte 91>>
		<<bHe>> releases your $worn.under_lower.name from <<bhis>> mouth.
		<<set $NPCList[_n].mouth to 0>>
	<<elseif $rng lte 90>>
		<<if setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 1>>
			<<if $worn.under_lower.state is "waist">>
				<<bHe>> pulls your $worn.under_lower.name down your thighs, revealing your <<genitals>>.
				<<set $worn.under_lower.state to "thighs">><<neutral 5>><<set $worn.under_lower.vagina_exposed to 1>><<set $worn.under_lower.anus_exposed to 1>><<set $worn.under_lower.exposed to 1>><<set $speechgenitals to 1>>
			<<elseif $worn.under_lower.state is "thighs">>
				<<bHe>> pulls your $worn.under_lower.name down to your knees.
				<<set $worn.under_lower.state to "knees">><<neutral 1>>
			<<elseif $worn.under_lower.state is "knees">>
				<<bHe>> pulls your $worn.under_lower.name down to your ankles.
				<<set $worn.under_lower.state to "ankles">><<neutral 1>>
			<<elseif $worn.under_lower.state is "ankles">>
				<<bHe>> pulls your $worn.under_lower.name off your legs.
				<<underlowerstrip>><<neutral 3>><<set $NPCList[_n].mouth to 0>><<clothesstripstat>>
			<</if>>
		<<elseif $worn.lower.state isnot "waist">>
			<<if $worn.under_lower.state is "waist">>
				<<bHe>> pulls your $worn.under_lower.name down your thighs, revealing your <<genitals>>.
				<<set $worn.under_lower.state to "thighs">><<neutral 5>><<set $worn.under_lower.vagina_exposed to 1>><<set $worn.under_lower.anus_exposed to 1>><<set $worn.under_lower.exposed to 1>><<set $speechgenitals to 1>>
			<<elseif $worn.under_lower.state is "thighs">>
				<<bHe>> pulls your $worn.under_lower.name down to your knees.
				<<set $worn.under_lower.state to "knees">><<neutral 1>>
			<<elseif $worn.under_lower.state is "knees">>
				<<bHe>> pulls your $worn.under_lower.name down to your ankles.
				<<set $worn.under_lower.state to "ankles">><<neutral 5>>
			<<elseif $worn.under_lower.state is "ankles">>
				<<bHe>> pulls your $worn.under_lower.name off your legs.
				<<underlowerstrip>><<neutral 3>><<set $NPCList[_n].mouth to 0>><<clothesstripstat>>
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $oxygen lt $oxygenmax and $underwater isnot 1 and _strangle is 1>>
	<<unset _strangle>>

Air: <<oxygencaption>>
<</if>>

<</widget>>

<<widget "bhisnext">>
<<if $combatTrain.monsters[_next_beast] is "monster">>
	<<if $combatTrain.pronouns[_next_beast] is "m">>
		<<print "his">>
	<<else>>
		<<print "her">>
	<</if>>
<<else>>
	<<print "its">>
<</if>>
<</widget>>

repo_name: Area/degrees

license: mit


code:
:: Widgets Consensual Man [widget]
<<widget "consensualman">>
<</widget>>
:: Widgets Consensual Actions [widget]
/*
<<widget "consensualman">>
<</widget>>
*/
:: Widgets Consensual Effects [widget]
/*
<<widget "consensualman">>
<</widget>>
*/