diff --git a/src/pregmod/beastFucked.tw b/src/pregmod/beastFucked.tw
index 90334c98db621bfd1de8105c3c4621c9aed96cb8..e05aff240fad0f4e36ebc4c070bc2d1f7ba920f6 100644
--- a/src/pregmod/beastFucked.tw
+++ b/src/pregmod/beastFucked.tw
@@ -25,10 +25,10 @@
<<if ($activeSlave.fetish != "mindbroken")>>
<<if ($activeSlave.devotion > 50)>>
- <<if canDoVaginal($activeSlave) || canDoAnal($activeSlave)>>
- <<if (canDoVaginal($activeSlave) && ($activeSlave.vagina > 0)) || (canDoAnal($activeSlave) && ($activeSlave.anus > 0))>>
+ <<if _sexAct == "vaginal" || _sexAct == "anal">>
+ <<if ((_sexAct == "vaginal") && ($activeSlave.vagina > 0)) || ((_sexAct == "anal") && ($activeSlave.anus > 0))>>
<<if $activeSlave.fetishKnown == 1>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
$activeSlave.slaveName's face visibly brightens at the thought of committing such a painful act.
<<elseif $activeSlave.fetish == "humiliation">>
$activeSlave.slaveName's face visibly brightens at the thought of committing such a humiliating act.
@@ -36,13 +36,15 @@
$activeSlave.slaveName's face visibly brightens at the thought of committing such a perverted act.
<<elseif $activeSlave.behavioralQuirk == "sinful">>
$activeSlave.slaveName's face visibly brightens at the thought of committing such a sinful act.
+ <<else>>
+ $activeSlave.slaveName looks visibly disturbed, but is so attentive to your will that $he quickly agrees.
<</if>>
<<else>>
$activeSlave.slaveName looks visibly disturbed, but is so attentive to your will that $he quickly agrees.
<</if>>
<<else>>
<<if $activeSlave.fetishKnown == 1>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
$activeSlave.slaveName's face visibly brightens at the thought of committing such a painful act, although $he seems a bit hesitant at the thought of giving $his <<if !canDoVaginal($activeSlave)>>anal<</if>> virginity to an animal.
<<elseif $activeSlave.fetish == "humiliation">>
$activeSlave.slaveName's face visibly brightens at the thought of committing such a humiliating act, although $he seems a bit hesitant at the thought of giving $his <<if !canDoVaginal($activeSlave)>>anal<</if>> virginity to an animal.
@@ -69,10 +71,10 @@
<</if>>
<<if ($activeSlave.devotion > 20) && ($activeSlave.devotion <= 50)>>
- <<if canDoVaginal($activeSlave) || canDoAnal($activeSlave)>>
- <<if (canDoVaginal($activeSlave) && ($activeSlave.vagina > 0)) || (canDoAnal($activeSlave) && ($activeSlave.anus > 0))>>
+ <<if _sexAct == "vaginal" || _sexAct == "anal">>
+ <<if ((_sexAct == "vaginal") && ($activeSlave.vagina > 0)) || ((_sexAct == "anal") && ($activeSlave.anus > 0))>>
<<if $activeSlave.fetishKnown == 1>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
$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.
<<elseif $activeSlave.fetish == "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.
@@ -88,7 +90,7 @@
<</if>>
<<else>>
<<if $activeSlave.fetishKnown == 1>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
$activeSlave.slaveName clearly has some reservations about having $his <<if !canDoVaginal($activeSlave)>>anal <</if>>virginity taken by a _animal.species, but the thought of the pain that comes with it soon convinces $him to comply.
<<elseif $activeSlave.fetish == "humiliation">>
$activeSlave.slaveName clearly has some reservations about having $his <<if !canDoVaginal($activeSlave)>>anal <</if>>virginity taken by a _animal.species, but the thought of the humiliation that comes with it soon convinces $him to comply.
@@ -115,10 +117,10 @@
<</if>>
<<if ($activeSlave.devotion > -20) && ($activeSlave.devotion <= 20)>>
- <<if canDoVaginal($activeSlave) || canDoAnal($activeSlave)>>
- <<if (canDoVaginal($activeSlave) && ($activeSlave.vagina > 0)) || (canDoAnal($activeSlave) && ($activeSlave.anus > 0))>>
+ <<if _sexAct == "vaginal" || _sexAct == "anal">>
+ <<if (_sexAct == "vaginal" && ($activeSlave.vagina > 0)) || ((_sexAct == "anal") && ($activeSlave.anus > 0))>>
<<if $activeSlave.fetishKnown == 1>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
$activeSlave.slaveName looks disgusted at the thought of fucking a _animal.species at first, but the thought of the pain that comes with it seems to spark a small flame of lust in $him.
<<elseif $activeSlave.fetish == "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 seems to spark a small flame of lust in $him.
@@ -134,7 +136,7 @@
<</if>>
<<else>>
<<if $activeSlave.fetishKnown == 1>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
$activeSlave.slaveName looks disgusted at the thought of giving up $his <<if !canDoVaginal($activeSlave)>>anal <</if>>virginity to a _animal.species, but the thought of the pain that comes with it soon sparks a small flame of lust in $him.
<<elseif $activeSlave.fetish == "humiliation">>
$activeSlave.slaveName looks disgusted at the thought of giving up $his <<if !canDoVaginal($activeSlave)>>anal <</if>>virginity to a _animal.species, but the thought of the humiliation that comes with it soon sparks a small flame of lust in $him.
@@ -204,7 +206,7 @@ before calling in the _animal.species. The _animal.species slowly saunters up to
<</if>>
<<switch _sexAct>>
<<case "vaginal" "anal">>
- It takes a couple of tries, but it finally manages to sink its cock into $his <<if canDoVaginal($activeSlave)>><<if ($activeSlave.fetish == "masochistic") || ($activeSlave.fetish == "humiliation") || ($activeSlave.sexualQuirk == "perverted") || ($activeSlave.behavioralQuirk == "sinful")>>wet <</if>>pussy<<else>>ass<</if>>.
+ It takes a couple of tries, but it finally manages to sink its cock into $his <<if canDoVaginal($activeSlave)>><<if ($activeSlave.fetish == "masochist") || ($activeSlave.fetish == "humiliation") || ($activeSlave.sexualQuirk == "perverted") || ($activeSlave.behavioralQuirk == "sinful")>>wet <</if>>pussy<<else>>ass<</if>>.
<<case "oral">>
<<if canWalk($activeSlave)>>
In one swift motion, the canine buries its cock deep in $his throat, causing $him to gag. It then begins to thrust rapidly, in the way that only dogs can.
@@ -216,9 +218,9 @@ before calling in the _animal.species. The _animal.species slowly saunters up to
<</if>>
<<case "horse">>
- The horse stands over $him as another slave lines its massive phallus up with $activeSlave.slaveName's <<switch _sexAct>><<case "oral">>open mouth<<case "vaginal">><<if ($activeSlave.fetish == "masochistic") || ($activeSlave.fetish == "humiliation") || ($activeSlave.sexualQuirk == "perverted") || ($activeSlave.behavioralQuirk == "sinful")>>wet <</if>>pussy<<case "anal">>ass<</switch>>.
+ The horse stands over $him as another slave lines its massive phallus up with $activeSlave.slaveName's <<switch _sexAct>><<case "oral">>open mouth<<case "vaginal">><<if ($activeSlave.fetish == "masochist") || ($activeSlave.fetish == "humiliation") || ($activeSlave.sexualQuirk == "perverted") || ($activeSlave.behavioralQuirk == "sinful")>>wet <</if>>pussy<<case "anal">>ass<</switch>>.
- With a slight thrust, it enters $him and begins to fuck $him <<if _sexAct == "oral">>mouth<</if>>. $activeSlave.slaveName can't help but give a loud groan as the huge cock
+ With a slight thrust, it enters $him and begins to fuck <<if _sexAct == "oral">>$his mouth<<else>> $him<</if>>. $activeSlave.slaveName can't help but give a loud groan as the huge cock
<<switch _sexAct>>
<<case "oral">>
stretches $his throat to the limit.
@@ -228,7 +230,7 @@ before calling in the _animal.species. The _animal.species slowly saunters up to
<<elseif (canDoVaginal($activeSlave) && ($activeSlave.vagina <= 3)) || (!canDoVaginal($activeSlave) && ($activeSlave.anus <= 2))>>
@@.lime;stretches $his@@
<<else>>
- enters $his
+ fills $his
<</if>>
<<if canDoVaginal($activeSlave)>>
@@ -267,7 +269,7 @@ before calling in the _animal.species. The _animal.species slowly saunters up to
<<if canDoVaginal($activeSlave)>>
<<if $activeSlave.vagina == 0>>
<<if ($activeSlave.devotion >= -20)>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
@@.lime;Losing $his virginity@@ in such a painful manner has @@.hotpink;increased $his devotion to you.@@
<<set $activeSlave.devotion += 10>>
<<elseif $activeSlave.fetish == "humiliation">>
@@ -299,7 +301,7 @@ before calling in the _animal.species. The _animal.species slowly saunters up to
<<else>>
<<if $activeSlave.anus == 0>>
<<if ($activeSlave.devotion >= -20)>>
- <<if $activeSlave.fetish == "masochistic">>
+ <<if $activeSlave.fetish == "masochist">>
@@.lime;Losing $his anal virginity@@ in such a painful manner has @@.hotpink;increased $his devotion to you.@@
<<set $activeSlave.devotion += 10>>
<<elseif $activeSlave.fetish == "humiliation">>
@@ -381,15 +383,39 @@ before calling in the _animal.species. The _animal.species slowly saunters up to
$activeSlave.slaveName to immediately start coughing and retching uncontrollably.
<</switch>> Having finished its business, the dog runs off, presumably in search of food.
+ <<switch _sexAct>>
+ <<case "vaginal">>
+ <<if $activeSlave.vagina < 3>>
+ <<set $activeSlave.vagina = 3>>
+ <</if>>
+ <<set $activeSlave.vaginalCount += 1>>
+ <<case "anal">>
+ <<if $activeSlave.anus < 2>>
+ <<set $activeSlave.anus = 2>>
+ <</if>>
+ <<set $activeSlave.vaginalCount += 1>>
+ <<case "oral">>
+ <<set $activeSlave.oralCount += 1>>
+ <</switch>>
+
<<case "horse">>
The stallion begins to thrust faster and faster, causing $activeSlave.slaveName to moan and groan in pain as the<<if canDoVaginal($activeSlave)>> tip rams $his cervix<<else>> huge horsecock fills $him completely<</if>>. 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 <<switch _sexAct>><<case "vaginal">>pussy<<case "anal">>asshole<<case "oral">>stomach<</switch>> 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.
+ After what seems like an impossibly long time, the horse's dick finally begins to soften and it finally pulls out<<if _sexAct == "oral">>, causing $activeSlave.slaveName to immediately begin to cough and retch uncontrollably<</if>>. You have a servant lead the horse away, with a fresh apple as a treat for its good performance.
- <<if (canDoVaginal($activeSlave)) && ($activeSlave.vagina < 4)>>
- <<set $activeSlave.vagina = 4>>
- <<elseif (canDoAnal($activeSlave)) && ($activeSlave.anus < 4)>>
- <<set $activeSlave.anus = 4>>
- <</if>>
+ <<switch _sexAct>>
+ <<case "vaginal">>
+ <<if $activeSlave.vagina < 4>>
+ <<set $activeSlave.vagina = 4>>
+ <</if>>
+ <<set $activeSlave.vaginalCount += 1>>
+ <<case "anal">>
+ <<if $activeSlave.anus < 4>>
+ <<set $activeSlave.anus = 4>>
+ <</if>>
+ <<set $activeSlave.analCount += 1>>
+ <<case "oral">>
+ <<set $activeSlave.oralCount += 1>>
+ <</switch>>
<</switch>>
<<if (random(1,100) > (100 + $activeSlave.devotion))>>