Add a link to send to incubator after birth

src/uncategorized/seBirth.tw

@@ -943,6 +943,17 @@ Childbirth has @@.lime;stretched out $possessive vagina.@@
 			<</replace>>
 		<</link>> 
 		//Will cost <<print cashFormat(500)>> weekly//
+		
+		<<if $tanks.length < $incubator>>
+			| <<link $incubatorNameCaps>>
+				<<replace `"#" + _dispositionId`>>
+					<<set $slaves[$i].reservedChildren = _count>>
+					You have decided to send the child<<if _count > 1>>ren<</if>> to $incubatorName, to be grown and eventually trained as <<if _count == 1>>a <</if>>new slave<<if _count > 1>>s<</if>>.
+					<<set $slaveOrphanageTotal -= _count>>
+					<<seBirthToIncubator>>
+				<</replace>>
+			<</link>>
+		<</if>>
 		<</capture>>
 	<</if>>
 	<</span>>