diff --git a/src/pregmod/beastFucked.tw b/src/pregmod/beastFucked.tw
index 82dd83833f8347b07e844fd0db13badc11fa09c6..73dc23f0c21cb1c2bab961203364b451f8704543 100644
--- a/src/pregmod/beastFucked.tw
+++ b/src/pregmod/beastFucked.tw
@@ -381,21 +381,23 @@ 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.
 
-    <<if (canDoVaginal($activeSlave)) && ($activeSlave.vagina < 3)>>
+    <<switch _sexAct>>
+    <<case "vaginal">>
         <<set $activeSlave.vagina = 3>>
-    <<elseif (canDoAnal($activeSlave)) && ($activeSlave.anus < 3)>>
-        <<set $activeSlave.anus = 3>>
-    <</if>>
+    <<case "anal">>
+        <<set $activeSlave.anus = 2>>
+    <</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. 
     
-    <<if (canDoVaginal($activeSlave)) && ($activeSlave.vagina < 4)>>
+    <<switch _sexAct>>
+    <<case "vaginal">>
         <<set $activeSlave.vagina = 4>>
-    <<elseif (canDoAnal($activeSlave)) && ($activeSlave.anus < 4)>>
+    <<case "anal">>
         <<set $activeSlave.anus = 4>>
-    <</if>>
+    <</switch>>
 <</switch>>
 
 <<if (random(1,100) > (100 + $activeSlave.devotion))>>