fixed artificialInsemination.tw print issues

src/pregmod/artificialInsemination.tw

@@ -11,11 +11,13 @@ __Select an eligible slave to serve as the semen donatrix:__
 <br>
 
 <<for _ai = 0; _ai < $slaves.length; _ai++>>
+<<capture _ai>>
 	<<if $slaves[_ai].balls > 0 && $slaves[_ai].pubertyXY == 1 && canBreed($activeSlave, $slaves[_ai])>>
 		<<set _name = SlaveFullName($slaves[_ai])>>
-		<br><<print "[[_name|Surgery Degradation][$impregnatrix = $slaves[" + _ai + "], cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), $surgeryType = 'insemination']]">>
+		<br>[[_name|Surgery Degradation][$impregnatrix = $slaves[_ai], cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), $surgeryType = 'insemination']]
 		<<set _eligibility = 1>>
 	<</if>>
+<</capture>>
 <</for>>
 <<if (_eligibility == 0)>>
 	<br>//You have no slaves with potent sperm.//
@@ -28,10 +30,12 @@ __Select an eligible slave to serve as the semen donatrix:__
 
 	<br>
 	<<for _ai = 0; _ai < $tanks.length; _ai++>>
+	<<capture _ai>>
 		<<if $tanks[_ai].balls > 0 && $tanks[_ai].dick > 0 && canBreed($activeSlave, $tanks[_ai])>>
-			<br><<print "[[$tanks[_ai].slaveName|Surgery Degradation][$impregnatrix = $tanks[" + _ai + "], cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), $surgeryType = 'insemination']]">>
+			<br>[[$tanks[_ai].slaveName|Surgery Degradation][$impregnatrix = $tanks[_ai], cashX(forceNeg($surgeryCost), "slaveSurgery", $activeSlave), $surgeryType = 'insemination']]
 			<<set _eligibilityI = 1>>
 		<</if>>
+	<</capture>>
 	<</for>>
 	<<if (_eligibilityI == 0)>>
 		<br>//You have no growing slaves producing sperm.//