diff --git a/src/pregmod/beastFuck.tw b/src/pregmod/beastFuck.tw
new file mode 100644
index 0000000000000000000000000000000000000000..53e2317e7e4221ab26863615662d30c210a14ffe
--- /dev/null
+++ b/src/pregmod/beastFuck.tw
@@ -0,0 +1,80 @@
+:: BeastFuck [nobr]
+
+<<set _animal = {species: "dog", dickSize: "large"}
+
+<<if canWalk($activeSlave)>>
+ You call $him over and tell $him you want to watch $him get fucked by a $animal.species.
+<<else>>
+ You order another slave to bring $activeSlave.slaveName over. Once $he is situated, you tell $him that you want to watch $him get fucked by a $animal.species.
+<</if>>
+
+<<if ($activeSlave.fetish != "mindbroken")>>
+ <<if ($activeSlave.devotion > 50)>>
+ <<switch $activeSlave.fetish>>
+ <<case "masochistic">>
+ $activeSlave.slaveName visibly brightens at the thought of the pain involved.
+ <<case "humiliation">>
+ $activeSlave.slaveName visibly brightens at the thought of the humiliation involved.
+ <<default>>
+ $activeSlave.slaveName looks visibly disturbed, but is so attentive to your will that $he quickly agrees.
+ <</switch>>
+ <</if>>
+
+ <<if (activeSlave.devotion > 20) && (activeSlave.devotion <= 50)>>
+ <<switch $activeSlave.fetish>>
+ <<case "masochistic">>
+ $activeSlave.slaveName isn't too keen on the idea of fucking a $animal.species, but the thought of the pain involved convinces $him to comply.
+ <<case "humiliation">>
+ $activeSlave.slaveName isn't too keen on the idea of fucking a $animal.species, but the thought of the humiliation involved convinces $him to comply.
+ <<default>>
+ $activeSlave.slaveName tries in vain to conceal $his horror, but quickly regains $his composure.
+ <</switch>>
+ <</if>>
+
+ <<if (activeSlave.devotion > -20) && (activeSlave.devotion <= 20)>>
+ <<switch $activeSlave.fetish>>
+ <<case "masochistic">>
+ $activeSlave.slaveName looks disgusted at the thought of fucking a $animal.species at first, but the thought of the pain that comes with it soon sparks a small flame of lust in $him.
+ <<case "humiliation">>
+ $activeSlave.slaveName looks disgusted at the thought of fucking a $animal.species at first, but the thought of the humiliation that comes with it soon sparks a small flame of lust in $him.
+ <<default>>
+ $activeSlave.slaveName tries in vain to conceal $his horror,
+ <</switch>>
+ <</if>>
+
+ <<if (activeSlave.devotion < 20)>>
+ $activeSlave.slaveName's face contorts into a mixture of <<if (activeSlave.devotion < -50)>>hatred, anger, and disgust, <<else>>anger and disgust, <</if>>
+
+<<else>>
+ $activeSlave.slaveName nods $his head dumbly, $his eyes vacant.
+<</if>>
+
+<<if canWalk($activeSlave)>>
+ <<if $activeSlave.devotion > -20>>
+ <<if ($activeSlave.devotion > -20) && ($activeSlave.devotion <= 20) && (activeSlave.fetish != "mindbroken")>>and only the threat of worse punishment prevents $him from running out of the room.<</if>> You have $him <<if ($activeSlave.clothing PLACEHOLDER)>>take off $his clothing and <</if>>kneel down on the floor with $his ass in the air,
+ <<elseif (activeSlave.devotion <= -20) && (activeSlave.fetish != "mindbroken")>>
+ and you have to physically prevent $him from running out of the room. You <<if (activeSlave.clothes != "no clothing")>>force $him to take off $his @activeSlave.clothes and <</if>>restrain $him on the floor with $his ass in the air, all the while ignoring $his screams and pleas for mercy.
+<<else>>
+ You <<if (activeSlave.clothes != "no clothing")>>take off $his activeSlave.clothes and <</if>>place $him on the ground with a cushion under $his hips, $his ass in the air,
+<</if>>
+
+before calling in the $animal.species. The $animal.species slowly saunters up to the <<if ($activeSlave.devotion <= 20)>>bound <</if>>slave and takes it position <<if canWalk($activeSlave)>>behind <<else>>above <</if>>$him. You can see its $animal.dickSize penis slowly come to attention as its animalistic brain realizes its standing <<if canWalk($activeSlave)>>behind <<else>>above <</if>>a warm hole that needs to be filled with seed.
+
+<<switch>>
+<<case "dog">>
+ <<if ($activeSlave.amp != 1)>>
+ The dog clambers up to mount $activeSlave.slaveName, eliciting a squeal from the girl as its claws dig into $his flesh.
+ <<else>>
+ The dog takes a few curious sniffs, then lines its cock up with $activeSlave.slaveName's pussy.
+ The hound wastes no time in beginning to hammer away at $his cunt, causing $activeSlave.slaveName to moan uncontrollably as its thick, veiny member probes the depths of $his pussy. A few short minutes later, $he gives a loud groan <<if ($activeSlave.fetish == "masochist") || ($activeSlave.fetish == "humiliation")>>and shakes in orgasm <</if>>as the dog's knot begins to swell and its penis begins to erupt a thick stream of jizz into $him. After almost a minute, the knot is finally sufficiently small enough that the dog is able to pull its cock out, causing a stream of cum to slide out of $his <<if $activeSlave.vagina <= 2)>>@@.lime;now-gaping pussy@@<<else>>$activeSlave.vagina pussy<</if>>. Having finished its business, the dog runs off, presumably in search of food,
+ <<if $activeSlave.vagina <= 2>>
+ <<set $activeSlave.vagina = 3>>
+ <</if>>
+<<case "horse">>
+ The horse stands over her as another slave lines its massive phallus up with $activeSlave.slaveName's <<if ($activeSlave.fetish == "masochist") || ($activeSlave.fetish == "humiliation")>>wet <</if>>pussy. With a slight thrust, it enters $him and begins to fuck $him. $activeSlave.slaveName can't help but give a loud groan as the huge cock <<if ($activeSlave.vagina <= 2)>>@@.lime;stretches@@ <<else>>enters <</if>> her $activeSlave.vagina pussy. The stallion begins to thrust faster and faster, causing $activeSlave.slaveName to moan and groan in pain as the tip rams $his cervix. Before too long, the horse's movements begin to slow, and you can see its large testicles contract slightly as it begins to fill $activeSlave.slaveName's pussy to the brim with thick horse semen. After what seems like an impossibly long time, the horse's dick finally begins to soften and it finally pulls out. You have a servant lead the horse away, with a fresh apple as a treat for its good performance,
+ <<if $activeSlave.vagina <= 2>>
+ <<set $activeSlave.vagina = 3>>
+ <</if>>
+<</switch>>
+
+while <<if canWalk($activeSlave)>>$activeSlave.slaveName uses a quick douche to clean $his pussy.<<else>>you have another slave return $activeSlave.slaveName to her duties.<</if>>
\ No newline at end of file