:: Abort [nobr]

<<set $nextButton = "Back", $nextLink = "Slave Interact">>
<<set $AS = $activeSlave.ID>>

The remote surgery makes aborting a pregnancy quick and efficient.

<<if getSlave($AS).preg < 4>>
	It was so early in $his pregnancy that the potential mental effects are diminished.
<<else>>
	<<= getSlave($AS).slaveName>> is
	<<if (getSlave($AS).fuckdoll > 0) || (getSlave($AS).fetish == "mindbroken")>>
		completely unmoved by the development.
	<<elseif getSlave($AS).sexualFlaw == "breeder">>
		@@.red;fundamentally broken.@@ $His entire concept of self and sexuality was wrapped up in the life growing within $him, and now it is gone.
		<<set getSlave($AS).fetish = "mindbroken", getSlave($AS).behavioralQuirk = "none", getSlave($AS).behavioralFlaw = "none", getSlave($AS).sexualQuirk = "none", getSlave($AS).sexualFlaw = "none", getSlave($AS).devotion = 0, getSlave($AS).trust = 0>>
	<<elseif getSlave($AS).devotion < -50>>
		@@.mediumorchid;filled with violent, consuming hatred.@@ Even though $he knew $his baby was destined for a slave orphanage, it seems $he cared for it and views you as its killer. $He is @@.gold;terrified of your power@@ over $his body.
		<<set getSlave($AS).trust -= 10, getSlave($AS).devotion -= 25>>
	<<elseif getSlave($AS).devotion < -20>>
		@@.mediumorchid;afflicted by desperate, inconsolable sobbing.@@ Even though $he knew $his baby was destined for a slave orphanage, it seems $he cared for it. $He is @@.gold;terrified of your power@@ over $his body.
		<<set getSlave($AS).trust -= 10, getSlave($AS).devotion -= 10>>
	<<elseif getSlave($AS).fetish == "pregnancy">>
		@@.mediumorchid;filled with a deep sorrow.@@ To a pregnancy fetishist, having a pregnancy end like this hurts far worse than birth ever would. $He is @@.gold;terrified of a repeat performance.@@
		<<set _fetishModifier = getSlave($AS).fetishStrength/2>>
		<<set getSlave($AS).devotion -= 1*_fetishModifier, getSlave($AS).trust -= 1*_fetishModifier>>
	<<elseif getSlave($AS).devotion <= 20>>
		@@.mediumorchid;consumed by muted weeping and enduring sorrow.@@ Even though $he knew $his baby was destined for a slave orphanage, it seems $he cared for it. $He is @@.gold;terrified of your power@@ over $his body.
		<<set getSlave($AS).trust -= 10, getSlave($AS).devotion -= 5>>
	<<elseif getSlave($AS).devotion <= 50>>
		dully obedient. $He has been broken to slave life so thoroughly that even this is neither surprising nor affecting. $He is @@.gold;terrified of your power@@ over $his body.
		<<set getSlave($AS).trust -= 10>>
	<<else>>
		@@.hotpink;pleased by this stark development,@@ since $he is so attentive to your will. $He also expects $he'll be able to fuck better now.
		<<set getSlave($AS).devotion += 4>>
	<</if>>
<</if>>

<<if getSlave($AS).abortionTat > -1>>
	<<set getSlave($AS).abortionTat++>>
	The temporary tattoo of a child has been replaced with $his <<= ordinalSuffix(getSlave($AS).abortionTat)>> crossed out infant.
	<<run cashX(forceNeg($modCost), "slaveMod", getSlave($AS))>>
<</if>>

<<if lastPregRule(getSlave($AS),$defaultRules)>><<set getSlave($AS).preg = -1>><<else>><<set getSlave($AS).preg = 0>><</if>>

<<set $reservedChildren = FetusGlobalReserveCount("incubator")>>
<<set $reservedChildrenNursery = FetusGlobalReserveCount("nursery")>>

<<run TerminatePregnancy(getSlave($AS))>>
<<set getSlave($AS).counter.abortions++>>
<<set $abortionsTotal++>>

src/npc/interaction/passage/abort.tw