diff --git a/fixSpellingMistakes2 b/fixSpellingMistakes2
new file mode 100644
index 0000000000000000000000000000000000000000..4e49fa6a4f245e2fbf93da221674b6f2b5756dac
--- /dev/null
+++ b/fixSpellingMistakes2
@@ -0,0 +1,4076 @@
+#!/bin/bash
+if [ ! -d ".git" ]; then
+	exit 0
+fi
+GREP="git grep -lz" 
+$GREP "\babandonned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babandonned\b/abandoned/g" *.tw
+$GREP "\baberation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baberation\b/aberration/g" *.tw
+$GREP "\babilityes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babilityes\b/abilities/g" *.tw
+$GREP "\babilties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babilties\b/abilities/g" *.tw
+$GREP "\babilty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babilty\b/ability/g" *.tw
+$GREP "\babondon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babondon\b/abandon/g" *.tw
+$GREP "\babbout\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babbout\b/about/g" *.tw
+$GREP "\babotu\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babotu\b/about/g" *.tw
+$GREP "\babouta\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babouta\b/about a/g" *.tw
+$GREP "\baboutit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baboutit\b/about it/g" *.tw
+$GREP "\baboutthe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baboutthe\b/about the/g" *.tw
+$GREP "\babscence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babscence\b/absence/g" *.tw
+$GREP "\babondoned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babondoned\b/abandoned/g" *.tw
+$GREP "\babondoning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babondoning\b/abandoning/g" *.tw
+$GREP "\babondons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babondons\b/abandons/g" *.tw
+$GREP "\baborigene\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baborigene\b/aborigine/g" *.tw
+$GREP "\baccesories\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccesories\b/accessories/g" *.tw
+$GREP "\baccidant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccidant\b/accident/g" *.tw
+$GREP "\babortificant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babortificant\b/abortifacient/g" *.tw
+$GREP "\babreviate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babreviate\b/abbreviate/g" *.tw
+$GREP "\babreviated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babreviated\b/abbreviated/g" *.tw
+$GREP "\babreviation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babreviation\b/abbreviation/g" *.tw
+$GREP "\babritrary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babritrary\b/arbitrary/g" *.tw
+$GREP "\babsail\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babsail\b/abseil/g" *.tw
+$GREP "\babsailing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babsailing\b/abseiling/g" *.tw
+$GREP "\babsense\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babsense\b/absence/g" *.tw
+$GREP "\babsolutly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babsolutly\b/absolutely/g" *.tw
+$GREP "\babsorbsion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babsorbsion\b/absorption/g" *.tw
+$GREP "\babsorbtion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babsorbtion\b/absorption/g" *.tw
+$GREP "\babudance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babudance\b/abundance/g" *.tw
+$GREP "\babundacies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babundacies\b/abundances/g" *.tw
+$GREP "\babundancies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babundancies\b/abundances/g" *.tw
+$GREP "\babundunt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babundunt\b/abundant/g" *.tw
+$GREP "\babutts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\babutts\b/abuts/g" *.tw
+$GREP "\bacadamy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacadamy\b/academy/g" *.tw
+$GREP "\bacadmic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacadmic\b/academic/g" *.tw
+$GREP "\baccademic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccademic\b/academic/g" *.tw
+$GREP "\baccademy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccademy\b/academy/g" *.tw
+$GREP "\bacccused\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacccused\b/accused/g" *.tw
+$GREP "\baccelleration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccelleration\b/acceleration/g" *.tw
+$GREP "\bacceptence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacceptence\b/acceptance/g" *.tw
+$GREP "\bacceptible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacceptible\b/acceptable/g" *.tw
+$GREP "\baccessable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccessable\b/accessible/g" *.tw
+$GREP "\bacident\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacident\b/accident/g" *.tw
+$GREP "\baccidentaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccidentaly\b/accidentally/g" *.tw
+$GREP "\baccidently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccidently\b/accidentally/g" *.tw
+$GREP "\bacclimitization\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacclimitization\b/acclimatization/g" *.tw
+$GREP "\baccomadate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomadate\b/accommodate/g" *.tw
+$GREP "\baccomadated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomadated\b/accommodated/g" *.tw
+$GREP "\baccomadates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomadates\b/accommodates/g" *.tw
+$GREP "\baccomadating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomadating\b/accommodating/g" *.tw
+$GREP "\baccomadation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomadation\b/accommodation/g" *.tw
+$GREP "\baccomadations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomadations\b/accommodations/g" *.tw
+$GREP "\baccomdate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomdate\b/accommodate/g" *.tw
+$GREP "\baccomodate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomodate\b/accommodate/g" *.tw
+$GREP "\baccomodated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomodated\b/accommodated/g" *.tw
+$GREP "\baccomodates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomodates\b/accommodates/g" *.tw
+$GREP "\baccomodating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomodating\b/accommodating/g" *.tw
+$GREP "\baccomodation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomodation\b/accommodation/g" *.tw
+$GREP "\baccomodations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccomodations\b/accommodations/g" *.tw
+$GREP "\baccompanyed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccompanyed\b/accompanied/g" *.tw
+$GREP "\baccordeon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccordeon\b/accordion/g" *.tw
+$GREP "\baccordian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccordian\b/accordion/g" *.tw
+$GREP "\baccoring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccoring\b/according/g" *.tw
+$GREP "\baccoustic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccoustic\b/acoustic/g" *.tw
+$GREP "\baccquainted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccquainted\b/acquainted/g" *.tw
+$GREP "\baccrediation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccrediation\b/accreditation/g" *.tw
+$GREP "\baccredidation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccredidation\b/accreditation/g" *.tw
+$GREP "\baccross\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccross\b/across/g" *.tw
+$GREP "\baccussed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baccussed\b/accused/g" *.tw
+$GREP "\bacedemic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacedemic\b/academic/g" *.tw
+$GREP "\bacheive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheive\b/achieve/g" *.tw
+$GREP "\bacheived\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheived\b/achieved/g" *.tw
+$GREP "\bacheivement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheivement\b/achievement/g" *.tw
+$GREP "\bacheivements\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheivements\b/achievements/g" *.tw
+$GREP "\bacheives\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheives\b/achieves/g" *.tw
+$GREP "\bacheiving\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheiving\b/achieving/g" *.tw
+$GREP "\bacheivment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheivment\b/achievement/g" *.tw
+$GREP "\bacheivments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacheivments\b/achievements/g" *.tw
+$GREP "\bachievment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bachievment\b/achievement/g" *.tw
+$GREP "\bachievments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bachievments\b/achievements/g" *.tw
+$GREP "\bachivement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bachivement\b/achievement/g" *.tw
+$GREP "\bachivements\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bachivements\b/achievements/g" *.tw
+$GREP "\backnowldeged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\backnowldeged\b/acknowledged/g" *.tw
+$GREP "\backnowledgeing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\backnowledgeing\b/acknowledging/g" *.tw
+$GREP "\bacommodate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacommodate\b/accommodate/g" *.tw
+$GREP "\bacomplish\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacomplish\b/accomplish/g" *.tw
+$GREP "\bacomplished\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacomplished\b/accomplished/g" *.tw
+$GREP "\bacomplishment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacomplishment\b/accomplishment/g" *.tw
+$GREP "\bacomplishments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacomplishments\b/accomplishments/g" *.tw
+$GREP "\bacording\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacording\b/according/g" *.tw
+$GREP "\bacordingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacordingly\b/accordingly/g" *.tw
+$GREP "\bacquaintence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacquaintence\b/acquaintance/g" *.tw
+$GREP "\bacquaintences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacquaintences\b/acquaintances/g" *.tw
+$GREP "\bacquiantence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacquiantence\b/acquaintance/g" *.tw
+$GREP "\bacquiantences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacquiantences\b/acquaintances/g" *.tw
+$GREP "\bacquited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacquited\b/acquitted/g" *.tw
+$GREP "\bactivites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bactivites\b/activities/g" *.tw
+$GREP "\bactivly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bactivly\b/actively/g" *.tw
+$GREP "\bactualy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bactualy\b/actually/g" *.tw
+$GREP "\bacuracy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacuracy\b/accuracy/g" *.tw
+$GREP "\bacused\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacused\b/accused/g" *.tw
+$GREP "\bacustom\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacustom\b/accustom/g" *.tw
+$GREP "\bacustommed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bacustommed\b/accustomed/g" *.tw
+$GREP "\badavanced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badavanced\b/advanced/g" *.tw
+$GREP "\badbandon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badbandon\b/abandon/g" *.tw
+$GREP "\baddional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddional\b/additional/g" *.tw
+$GREP "\baddionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddionally\b/additionally/g" *.tw
+$GREP "\badditinally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badditinally\b/additionally/g" *.tw
+$GREP "\badditionaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badditionaly\b/additionally/g" *.tw
+$GREP "\badditonal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badditonal\b/additional/g" *.tw
+$GREP "\badditonally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badditonally\b/additionally/g" *.tw
+$GREP "\baddmission\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddmission\b/admission/g" *.tw
+$GREP "\baddopt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddopt\b/adopt/g" *.tw
+$GREP "\baddopted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddopted\b/adopted/g" *.tw
+$GREP "\baddoptive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddoptive\b/adoptive/g" *.tw
+$GREP "\baddresable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddresable\b/addressable/g" *.tw
+$GREP "\baddresed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddresed\b/addressed/g" *.tw
+$GREP "\baddresing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddresing\b/addressing/g" *.tw
+$GREP "\baddressess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddressess\b/addresses/g" *.tw
+$GREP "\baddtion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddtion\b/addition/g" *.tw
+$GREP "\baddtional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baddtional\b/additional/g" *.tw
+$GREP "\badecuate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badecuate\b/adequate/g" *.tw
+$GREP "\badequit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badequit\b/adequate/g" *.tw
+$GREP "\badhearing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badhearing\b/adhering/g" *.tw
+$GREP "\badherance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badherance\b/adherence/g" *.tw
+$GREP "\badmendment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badmendment\b/amendment/g" *.tw
+$GREP "\badmininistrative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badmininistrative\b/administrative/g" *.tw
+$GREP "\badminstered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badminstered\b/administered/g" *.tw
+$GREP "\badminstrate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badminstrate\b/administrate/g" *.tw
+$GREP "\badminstration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badminstration\b/administration/g" *.tw
+$GREP "\badminstrative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badminstrative\b/administrative/g" *.tw
+$GREP "\badminstrator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badminstrator\b/administrator/g" *.tw
+$GREP "\badmissability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badmissability\b/admissibility/g" *.tw
+$GREP "\badmissable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badmissable\b/admissible/g" *.tw
+$GREP "\badmited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badmited\b/admitted/g" *.tw
+$GREP "\badmitedly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badmitedly\b/admittedly/g" *.tw
+$GREP "\badn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badn\b/and/g" *.tw
+$GREP "\badolecent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badolecent\b/adolescent/g" *.tw
+$GREP "\badquire\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badquire\b/acquire/g" *.tw
+$GREP "\badquired\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badquired\b/acquired/g" *.tw
+$GREP "\badquires\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badquires\b/acquires/g" *.tw
+$GREP "\badquiring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badquiring\b/acquiring/g" *.tw
+$GREP "\badres\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badres\b/address/g" *.tw
+$GREP "\badresable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badresable\b/addressable/g" *.tw
+$GREP "\badresing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badresing\b/addressing/g" *.tw
+$GREP "\badress\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badress\b/address/g" *.tw
+$GREP "\badressable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badressable\b/addressable/g" *.tw
+$GREP "\badressed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badressed\b/addressed/g" *.tw
+$GREP "\badventrous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badventrous\b/adventurous/g" *.tw
+$GREP "\badvertisment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badvertisment\b/advertisement/g" *.tw
+$GREP "\badvertisments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badvertisments\b/advertisements/g" *.tw
+$GREP "\badvesary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badvesary\b/adversary/g" *.tw
+$GREP "\badviced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\badviced\b/advised/g" *.tw
+$GREP "\baeriel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baeriel\b/aerial/g" *.tw
+$GREP "\baeriels\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baeriels\b/aerials/g" *.tw
+$GREP "\bafair\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bafair\b/affair/g" *.tw
+$GREP "\bafficianados\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bafficianados\b/aficionados/g" *.tw
+$GREP "\bafficionado\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bafficionado\b/aficionado/g" *.tw
+$GREP "\bafficionados\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bafficionados\b/aficionados/g" *.tw
+$GREP "\baffilate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baffilate\b/affiliate/g" *.tw
+$GREP "\baffilliate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baffilliate\b/affiliate/g" *.tw
+$GREP "\baforememtioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baforememtioned\b/aforementioned/g" *.tw
+$GREP "\bagainnst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagainnst\b/against/g" *.tw
+$GREP "\bagains\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagains\b/against/g" *.tw
+$GREP "\bagaisnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagaisnt\b/against/g" *.tw
+$GREP "\baganist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baganist\b/against/g" *.tw
+$GREP "\baggaravates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baggaravates\b/aggravates/g" *.tw
+$GREP "\baggreed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baggreed\b/agreed/g" *.tw
+$GREP "\baggreement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baggreement\b/agreement/g" *.tw
+$GREP "\baggregious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baggregious\b/egregious/g" *.tw
+$GREP "\baggresive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baggresive\b/aggressive/g" *.tw
+$GREP "\bagian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagian\b/again/g" *.tw
+$GREP "\bagianst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagianst\b/against/g" *.tw
+$GREP "\bagin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagin\b/again/g" *.tw
+$GREP "\baginst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baginst\b/against/g" *.tw
+$GREP "\bagravate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagravate\b/aggravate/g" *.tw
+$GREP "\bagre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagre\b/agree/g" *.tw
+$GREP "\bagred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagred\b/agreed/g" *.tw
+$GREP "\bagreeement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagreeement\b/agreement/g" *.tw
+$GREP "\bagreemnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagreemnt\b/agreement/g" *.tw
+$GREP "\bagregate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagregate\b/aggregate/g" *.tw
+$GREP "\bagregates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagregates\b/aggregates/g" *.tw
+$GREP "\bagreing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagreing\b/agreeing/g" *.tw
+$GREP "\bagression\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagression\b/aggression/g" *.tw
+$GREP "\bagressive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagressive\b/aggressive/g" *.tw
+$GREP "\bagressively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagressively\b/aggressively/g" *.tw
+$GREP "\bagressor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagressor\b/aggressor/g" *.tw
+$GREP "\bagricultue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagricultue\b/agriculture/g" *.tw
+$GREP "\bagriculure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagriculure\b/agriculture/g" *.tw
+$GREP "\bagricuture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagricuture\b/agriculture/g" *.tw
+$GREP "\bagrieved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bagrieved\b/aggrieved/g" *.tw
+$GREP "\bahev\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bahev\b/have/g" *.tw
+$GREP "\bahppen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bahppen\b/happen/g" *.tw
+$GREP "\bahve\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bahve\b/have/g" *.tw
+$GREP "\baicraft\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baicraft\b/aircraft/g" *.tw
+$GREP "\baiport\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baiport\b/airport/g" *.tw
+$GREP "\bairbourne\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bairbourne\b/airborne/g" *.tw
+$GREP "\baircaft\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baircaft\b/aircraft/g" *.tw
+$GREP "\baircrafts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baircrafts\b/aircraft/g" *.tw
+$GREP "\baircrafts'\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baircrafts'\b/aircraft's/g" *.tw
+$GREP "\bairporta\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bairporta\b/airports/g" *.tw
+$GREP "\bairrcraft\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bairrcraft\b/aircraft/g" *.tw
+$GREP "\baisian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baisian\b/asian/g" *.tw
+$GREP "\balbiet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balbiet\b/albeit/g" *.tw
+$GREP "\balchohol\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balchohol\b/alcohol/g" *.tw
+$GREP "\balchoholic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balchoholic\b/alcoholic/g" *.tw
+$GREP "\balchol\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balchol\b/alcohol/g" *.tw
+$GREP "\balcholic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balcholic\b/alcoholic/g" *.tw
+$GREP "\balcohal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balcohal\b/alcohol/g" *.tw
+$GREP "\balcoholical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balcoholical\b/alcoholic/g" *.tw
+$GREP "\baledge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baledge\b/allege/g" *.tw
+$GREP "\baledged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baledged\b/alleged/g" *.tw
+$GREP "\baledges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baledges\b/alleges/g" *.tw
+$GREP "\balege\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balege\b/allege/g" *.tw
+$GREP "\baleged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baleged\b/alleged/g" *.tw
+$GREP "\balegience\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balegience\b/allegiance/g" *.tw
+$GREP "\balgebraical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balgebraical\b/algebraic/g" *.tw
+$GREP "\balgorhitms\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balgorhitms\b/algorithms/g" *.tw
+$GREP "\balgoritm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balgoritm\b/algorithm/g" *.tw
+$GREP "\balgoritms\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balgoritms\b/algorithms/g" *.tw
+$GREP "\balientating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balientating\b/alienating/g" *.tw
+$GREP "\balledge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balledge\b/allege/g" *.tw
+$GREP "\balledged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balledged\b/alleged/g" *.tw
+$GREP "\balledgedly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balledgedly\b/allegedly/g" *.tw
+$GREP "\balledges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balledges\b/alleges/g" *.tw
+$GREP "\ballegedely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballegedely\b/allegedly/g" *.tw
+$GREP "\ballegedy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballegedy\b/allegedly/g" *.tw
+$GREP "\ballegely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballegely\b/allegedly/g" *.tw
+$GREP "\ballegence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballegence\b/allegiance/g" *.tw
+$GREP "\ballegience\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballegience\b/allegiance/g" *.tw
+$GREP "\ballign\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballign\b/align/g" *.tw
+$GREP "\balligned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balligned\b/aligned/g" *.tw
+$GREP "\balliviate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balliviate\b/alleviate/g" *.tw
+$GREP "\ballopone\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballopone\b/allophone/g" *.tw
+$GREP "\ballopones\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballopones\b/allophones/g" *.tw
+$GREP "\ballready\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballready\b/already/g" *.tw
+$GREP "\ballthough\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\ballthough\b/although/g" *.tw
+$GREP "\balltime\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balltime\b/all-time/g" *.tw
+$GREP "\balltogether\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balltogether\b/altogether/g" *.tw
+$GREP "\balmsot\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balmsot\b/almost/g" *.tw
+$GREP "\balochol\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balochol\b/alcohol/g" *.tw
+$GREP "\balomst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balomst\b/almost/g" *.tw
+$GREP "\balotted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balotted\b/allotted/g" *.tw
+$GREP "\balowed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balowed\b/allowed/g" *.tw
+$GREP "\balowing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balowing\b/allowing/g" *.tw
+$GREP "\balreayd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balreayd\b/already/g" *.tw
+$GREP "\balse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balse\b/else/g" *.tw
+$GREP "\balsot\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balsot\b/also/g" *.tw
+$GREP "\balternitives\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balternitives\b/alternatives/g" *.tw
+$GREP "\balthought\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balthought\b/although/g" *.tw
+$GREP "\baltough\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baltough\b/although/g" *.tw
+$GREP "\balwasy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balwasy\b/always/g" *.tw
+$GREP "\balwyas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\balwyas\b/always/g" *.tw
+$GREP "\bamalgomated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamalgomated\b/amalgamated/g" *.tw
+$GREP "\bamatuer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamatuer\b/amateur/g" *.tw
+$GREP "\bamendmant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamendmant\b/amendment/g" *.tw
+$GREP "\bAmercia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bAmercia\b/America/g" *.tw
+$GREP "\bamerliorate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamerliorate\b/ameliorate/g" *.tw
+$GREP "\bamke\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamke\b/make/g" *.tw
+$GREP "\bamking\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamking\b/making/g" *.tw
+$GREP "\bammend\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bammend\b/amend/g" *.tw
+$GREP "\bammended\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bammended\b/amended/g" *.tw
+$GREP "\bammendment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bammendment\b/amendment/g" *.tw
+$GREP "\bammendments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bammendments\b/amendments/g" *.tw
+$GREP "\bammount\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bammount\b/amount/g" *.tw
+$GREP "\bammused\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bammused\b/amused/g" *.tw
+$GREP "\bamoung\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamoung\b/among/g" *.tw
+$GREP "\bamoungst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamoungst\b/amongst/g" *.tw
+$GREP "\bamung\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamung\b/among/g" *.tw
+$GREP "\bamunition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bamunition\b/ammunition/g" *.tw
+$GREP "\banalagous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banalagous\b/analogous/g" *.tw
+$GREP "\banalitic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banalitic\b/analytic/g" *.tw
+$GREP "\banalogeous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banalogeous\b/analogous/g" *.tw
+$GREP "\banarchim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banarchim\b/anarchism/g" *.tw
+$GREP "\banarchistm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banarchistm\b/anarchism/g" *.tw
+$GREP "\banbd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banbd\b/and/g" *.tw
+$GREP "\bancestory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bancestory\b/ancestry/g" *.tw
+$GREP "\bancilliary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bancilliary\b/ancillary/g" *.tw
+$GREP "\bandd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bandd\b/and/g" *.tw
+$GREP "\bandrogenous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bandrogenous\b/androgynous/g" *.tw
+$GREP "\bandrogeny\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bandrogeny\b/androgyny/g" *.tw
+$GREP "\banihilation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banihilation\b/annihilation/g" *.tw
+$GREP "\baniversary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baniversary\b/anniversary/g" *.tw
+$GREP "\bannoint\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannoint\b/anoint/g" *.tw
+$GREP "\bannointed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannointed\b/anointed/g" *.tw
+$GREP "\bannointing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannointing\b/anointing/g" *.tw
+$GREP "\bannoints\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannoints\b/anoints/g" *.tw
+$GREP "\bannouced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannouced\b/announced/g" *.tw
+$GREP "\bannualy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannualy\b/annually/g" *.tw
+$GREP "\bannuled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bannuled\b/annulled/g" *.tw
+$GREP "\banohter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banohter\b/another/g" *.tw
+$GREP "\banomolies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banomolies\b/anomalies/g" *.tw
+$GREP "\banomolous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banomolous\b/anomalous/g" *.tw
+$GREP "\banomoly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banomoly\b/anomaly/g" *.tw
+$GREP "\banonimity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banonimity\b/anonymity/g" *.tw
+$GREP "\banounced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banounced\b/announced/g" *.tw
+$GREP "\banouncement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banouncement\b/announcement/g" *.tw
+$GREP "\bansalisation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bansalisation\b/nasalisation/g" *.tw
+$GREP "\bansalization\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bansalization\b/nasalization/g" *.tw
+$GREP "\bansestors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bansestors\b/ancestors/g" *.tw
+$GREP "\bantartic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bantartic\b/antarctic/g" *.tw
+$GREP "\banthromorphization\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banthromorphization\b/anthropomorphization/g" *.tw
+$GREP "\banthropolgist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banthropolgist\b/anthropologist/g" *.tw
+$GREP "\banthropolgy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banthropolgy\b/anthropology/g" *.tw
+$GREP "\bantiapartheid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bantiapartheid\b/anti-apartheid/g" *.tw
+$GREP "\banual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banual\b/annual/g" *.tw
+$GREP "\banulled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banulled\b/annulled/g" *.tw
+$GREP "\banwsered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banwsered\b/answered/g" *.tw
+$GREP "\banyhwere\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banyhwere\b/anywhere/g" *.tw
+$GREP "\banyother\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banyother\b/any other/g" *.tw
+$GREP "\banytying\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\banytying\b/anything/g" *.tw
+$GREP "\baparent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baparent\b/apparent/g" *.tw
+$GREP "\baparment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baparment\b/apartment/g" *.tw
+$GREP "\baplication\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baplication\b/application/g" *.tw
+$GREP "\baplied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baplied\b/applied/g" *.tw
+$GREP "\bapolegetics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapolegetics\b/apologetics/g" *.tw
+$GREP "\bapparant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapparant\b/apparent/g" *.tw
+$GREP "\bapparantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapparantly\b/apparently/g" *.tw
+$GREP "\bappart\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappart\b/apart/g" *.tw
+$GREP "\bappartment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappartment\b/apartment/g" *.tw
+$GREP "\bappartments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappartments\b/apartments/g" *.tw
+$GREP "\bappeareance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappeareance\b/appearance/g" *.tw
+$GREP "\bappearence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappearence\b/appearance/g" *.tw
+$GREP "\bappearences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappearences\b/appearances/g" *.tw
+$GREP "\bapperance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapperance\b/appearance/g" *.tw
+$GREP "\bapperances\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapperances\b/appearances/g" *.tw
+$GREP "\bappereance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappereance\b/appearance/g" *.tw
+$GREP "\bappereances\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappereances\b/appearances/g" *.tw
+$GREP "\bapplicaiton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapplicaiton\b/application/g" *.tw
+$GREP "\bapplicaitons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapplicaitons\b/applications/g" *.tw
+$GREP "\bappologies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappologies\b/apologies/g" *.tw
+$GREP "\bappology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappology\b/apology/g" *.tw
+$GREP "\bapprearance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapprearance\b/appearance/g" *.tw
+$GREP "\bapprieciate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapprieciate\b/appreciate/g" *.tw
+$GREP "\bapproachs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapproachs\b/approaches/g" *.tw
+$GREP "\bappropiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappropiate\b/appropriate/g" *.tw
+$GREP "\bappropraite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappropraite\b/appropriate/g" *.tw
+$GREP "\bappropropiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bappropropiate\b/appropriate/g" *.tw
+$GREP "\bapproproximate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapproproximate\b/approximate/g" *.tw
+$GREP "\bapproxamately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapproxamately\b/approximately/g" *.tw
+$GREP "\bapproxiately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapproxiately\b/approximately/g" *.tw
+$GREP "\bapproximitely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapproximitely\b/approximately/g" *.tw
+$GREP "\baprehensive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baprehensive\b/apprehensive/g" *.tw
+$GREP "\bapropriate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bapropriate\b/appropriate/g" *.tw
+$GREP "\baproval\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baproval\b/approval/g" *.tw
+$GREP "\baproximate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baproximate\b/approximate/g" *.tw
+$GREP "\baproximately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baproximately\b/approximately/g" *.tw
+$GREP "\baquaduct\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquaduct\b/aqueduct/g" *.tw
+$GREP "\baquaintance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquaintance\b/acquaintance/g" *.tw
+$GREP "\baquainted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquainted\b/acquainted/g" *.tw
+$GREP "\baquiantance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquiantance\b/acquaintance/g" *.tw
+$GREP "\baquire\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquire\b/acquire/g" *.tw
+$GREP "\baquired\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquired\b/acquired/g" *.tw
+$GREP "\baquiring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquiring\b/acquiring/g" *.tw
+$GREP "\baquisition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquisition\b/acquisition/g" *.tw
+$GREP "\baquitted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baquitted\b/acquitted/g" *.tw
+$GREP "\baranged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baranged\b/arranged/g" *.tw
+$GREP "\barangement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barangement\b/arrangement/g" *.tw
+$GREP "\barbitarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barbitarily\b/arbitrarily/g" *.tw
+$GREP "\barbitary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barbitary\b/arbitrary/g" *.tw
+$GREP "\barchaelogical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchaelogical\b/archaeological/g" *.tw
+$GREP "\barchaelogists\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchaelogists\b/archaeologists/g" *.tw
+$GREP "\barchaelogy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchaelogy\b/archaeology/g" *.tw
+$GREP "\barchetect\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchetect\b/architect/g" *.tw
+$GREP "\barchetects\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchetects\b/architects/g" *.tw
+$GREP "\barchetectural\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchetectural\b/architectural/g" *.tw
+$GREP "\barchetecturally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchetecturally\b/architecturally/g" *.tw
+$GREP "\barchetecture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchetecture\b/architecture/g" *.tw
+$GREP "\barchiac\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchiac\b/archaic/g" *.tw
+$GREP "\barchictect\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchictect\b/architect/g" *.tw
+$GREP "\barchimedian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchimedian\b/archimedean/g" *.tw
+$GREP "\barchitecht\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchitecht\b/architect/g" *.tw
+$GREP "\barchitechturally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchitechturally\b/architecturally/g" *.tw
+$GREP "\barchitechture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchitechture\b/architecture/g" *.tw
+$GREP "\barchitechtures\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchitechtures\b/architectures/g" *.tw
+$GREP "\barchitectual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchitectual\b/architectural/g" *.tw
+$GREP "\barchtype\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchtype\b/archetype/g" *.tw
+$GREP "\barchtypes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barchtypes\b/archetypes/g" *.tw
+$GREP "\baready\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baready\b/already/g" *.tw
+$GREP "\bareodynamics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bareodynamics\b/aerodynamics/g" *.tw
+$GREP "\bargubly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bargubly\b/arguably/g" *.tw
+$GREP "\barguement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barguement\b/argument/g" *.tw
+$GREP "\barguements\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barguements\b/arguments/g" *.tw
+$GREP "\barised\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barised\b/arose/g" *.tw
+$GREP "\barival\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barival\b/arrival/g" *.tw
+$GREP "\barmamant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barmamant\b/armament/g" *.tw
+$GREP "\barmistace\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barmistace\b/armistice/g" *.tw
+$GREP "\barogant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barogant\b/arrogant/g" *.tw
+$GREP "\barogent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barogent\b/arrogant/g" *.tw
+$GREP "\baroud\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baroud\b/around/g" *.tw
+$GREP "\barrangment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barrangment\b/arrangement/g" *.tw
+$GREP "\barrangments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barrangments\b/arrangements/g" *.tw
+$GREP "\barrengement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barrengement\b/arrangement/g" *.tw
+$GREP "\barrengements\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barrengements\b/arrangements/g" *.tw
+$GREP "\barround\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barround\b/around/g" *.tw
+$GREP "\bartcile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bartcile\b/article/g" *.tw
+$GREP "\bartical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bartical\b/article/g" *.tw
+$GREP "\bartice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bartice\b/article/g" *.tw
+$GREP "\barticel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barticel\b/article/g" *.tw
+$GREP "\bartifical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bartifical\b/artificial/g" *.tw
+$GREP "\bartifically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bartifically\b/artificially/g" *.tw
+$GREP "\bartillary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bartillary\b/artillery/g" *.tw
+$GREP "\barund\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\barund\b/around/g" *.tw
+$GREP "\basetic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basetic\b/ascetic/g" *.tw
+$GREP "\basfar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basfar\b/as far/g" *.tw
+$GREP "\basign\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basign\b/assign/g" *.tw
+$GREP "\baslo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baslo\b/also/g" *.tw
+$GREP "\basociated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basociated\b/associated/g" *.tw
+$GREP "\basorbed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basorbed\b/absorbed/g" *.tw
+$GREP "\basphyxation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basphyxation\b/asphyxiation/g" *.tw
+$GREP "\bassasin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasin\b/assassin/g" *.tw
+$GREP "\bassasinate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasinate\b/assassinate/g" *.tw
+$GREP "\bassasinated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasinated\b/assassinated/g" *.tw
+$GREP "\bassasinates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasinates\b/assassinates/g" *.tw
+$GREP "\bassasination\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasination\b/assassination/g" *.tw
+$GREP "\bassasinations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasinations\b/assassinations/g" *.tw
+$GREP "\bassasined\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasined\b/assassinated/g" *.tw
+$GREP "\bassasins\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassasins\b/assassins/g" *.tw
+$GREP "\bassassintation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassassintation\b/assassination/g" *.tw
+$GREP "\bassemple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassemple\b/assemble/g" *.tw
+$GREP "\bassertation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassertation\b/assertion/g" *.tw
+$GREP "\basside\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basside\b/aside/g" *.tw
+$GREP "\bassisnate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassisnate\b/assassinate/g" *.tw
+$GREP "\bassit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassit\b/assist/g" *.tw
+$GREP "\bassitant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassitant\b/assistant/g" *.tw
+$GREP "\bassocation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassocation\b/association/g" *.tw
+$GREP "\bassoicate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassoicate\b/associate/g" *.tw
+$GREP "\bassoicated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassoicated\b/associated/g" *.tw
+$GREP "\bassoicates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassoicates\b/associates/g" *.tw
+$GREP "\bassosication\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassosication\b/assassination/g" *.tw
+$GREP "\basssassans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basssassans\b/assassins/g" *.tw
+$GREP "\bassualt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassualt\b/assault/g" *.tw
+$GREP "\bassualted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassualted\b/assaulted/g" *.tw
+$GREP "\bassymetric\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassymetric\b/asymmetric/g" *.tw
+$GREP "\bassymetrical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bassymetrical\b/asymmetrical/g" *.tw
+$GREP "\basteriod\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basteriod\b/asteroid/g" *.tw
+$GREP "\basthetic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basthetic\b/aesthetic/g" *.tw
+$GREP "\basthetical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basthetical\b/aesthetical/g" *.tw
+$GREP "\basthetically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basthetically\b/aesthetically/g" *.tw
+$GREP "\basume\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\basume\b/assume/g" *.tw
+$GREP "\baswell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baswell\b/as well/g" *.tw
+$GREP "\batain\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batain\b/attain/g" *.tw
+$GREP "\batempting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batempting\b/attempting/g" *.tw
+$GREP "\batheistical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batheistical\b/atheistic/g" *.tw
+$GREP "\bathenean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bathenean\b/athenian/g" *.tw
+$GREP "\batheneans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batheneans\b/athenians/g" *.tw
+$GREP "\bathiesm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bathiesm\b/atheism/g" *.tw
+$GREP "\bathiest\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bathiest\b/atheist/g" *.tw
+$GREP "\batorney\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batorney\b/attorney/g" *.tw
+$GREP "\batribute\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batribute\b/attribute/g" *.tw
+$GREP "\batributed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batributed\b/attributed/g" *.tw
+$GREP "\batributes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\batributes\b/attributes/g" *.tw
+$GREP "\battemp\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battemp\b/attempt/g" *.tw
+$GREP "\battemped\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battemped\b/attempted/g" *.tw
+$GREP "\battemt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battemt\b/attempt/g" *.tw
+$GREP "\battemted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battemted\b/attempted/g" *.tw
+$GREP "\battemting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battemting\b/attempting/g" *.tw
+$GREP "\battemts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battemts\b/attempts/g" *.tw
+$GREP "\battendence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battendence\b/attendance/g" *.tw
+$GREP "\battendent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battendent\b/attendant/g" *.tw
+$GREP "\battendents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battendents\b/attendants/g" *.tw
+$GREP "\battened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battened\b/attended/g" *.tw
+$GREP "\battension\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battension\b/attention/g" *.tw
+$GREP "\battitide\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battitide\b/attitude/g" *.tw
+$GREP "\battributred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battributred\b/attributed/g" *.tw
+$GREP "\battrocities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\battrocities\b/atrocities/g" *.tw
+$GREP "\baudeince\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baudeince\b/audience/g" *.tw
+$GREP "\bauromated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauromated\b/automated/g" *.tw
+$GREP "\baustrailia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baustrailia\b/Australia/g" *.tw
+$GREP "\baustrailian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baustrailian\b/Australian/g" *.tw
+$GREP "\bauther\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauther\b/author/g" *.tw
+$GREP "\bauthobiographic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthobiographic\b/autobiographic/g" *.tw
+$GREP "\bauthobiography\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthobiography\b/autobiography/g" *.tw
+$GREP "\bauthorative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthorative\b/authoritative/g" *.tw
+$GREP "\bauthorites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthorites\b/authorities/g" *.tw
+$GREP "\bauthorithy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthorithy\b/authority/g" *.tw
+$GREP "\bauthoritiers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthoritiers\b/authorities/g" *.tw
+$GREP "\bauthoritive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthoritive\b/authoritative/g" *.tw
+$GREP "\bauthrorities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauthrorities\b/authorities/g" *.tw
+$GREP "\bautochtonous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautochtonous\b/autochthonous/g" *.tw
+$GREP "\bautoctonous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautoctonous\b/autochthonous/g" *.tw
+$GREP "\bautomaticly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautomaticly\b/automatically/g" *.tw
+$GREP "\bautomibile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautomibile\b/automobile/g" *.tw
+$GREP "\bautomonomous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautomonomous\b/autonomous/g" *.tw
+$GREP "\bautor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautor\b/author/g" *.tw
+$GREP "\bautority\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bautority\b/authority/g" *.tw
+$GREP "\bauxilary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauxilary\b/auxiliary/g" *.tw
+$GREP "\bauxillaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauxillaries\b/auxiliaries/g" *.tw
+$GREP "\bauxillary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauxillary\b/auxiliary/g" *.tw
+$GREP "\bauxilliaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauxilliaries\b/auxiliaries/g" *.tw
+$GREP "\bauxilliary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bauxilliary\b/auxiliary/g" *.tw
+$GREP "\bavailabe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavailabe\b/available/g" *.tw
+$GREP "\bavailablity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavailablity\b/availability/g" *.tw
+$GREP "\bavailaible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavailaible\b/available/g" *.tw
+$GREP "\bavailble\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavailble\b/available/g" *.tw
+$GREP "\bavailiable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavailiable\b/available/g" *.tw
+$GREP "\bavailible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavailible\b/available/g" *.tw
+$GREP "\bavalable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavalable\b/available/g" *.tw
+$GREP "\bavalance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavalance\b/avalanche/g" *.tw
+$GREP "\bavaliable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavaliable\b/available/g" *.tw
+$GREP "\bavation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavation\b/aviation/g" *.tw
+$GREP "\bavengence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavengence\b/a vengeance/g" *.tw
+$GREP "\baverageed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\baverageed\b/averaged/g" *.tw
+$GREP "\bavilable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bavilable\b/available/g" *.tw
+$GREP "\bawared\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bawared\b/awarded/g" *.tw
+$GREP "\bawya\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bawya\b/away/g" *.tw
+$GREP "\bbaceause\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbaceause\b/because/g" *.tw
+$GREP "\bbackgorund\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbackgorund\b/background/g" *.tw
+$GREP "\bbackrounds\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbackrounds\b/backgrounds/g" *.tw
+$GREP "\bbakc\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbakc\b/back/g" *.tw
+$GREP "\bbanannas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbanannas\b/bananas/g" *.tw
+$GREP "\bbandwith\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbandwith\b/bandwidth/g" *.tw
+$GREP "\bbankrupcy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbankrupcy\b/bankruptcy/g" *.tw
+$GREP "\bbanruptcy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbanruptcy\b/bankruptcy/g" *.tw
+$GREP "\bbasicaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbasicaly\b/basically/g" *.tw
+$GREP "\bbasicly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbasicly\b/basically/g" *.tw
+$GREP "\bbcak\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbcak\b/back/g" *.tw
+$GREP "\bbeachead\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeachead\b/beachhead/g" *.tw
+$GREP "\bbeacuse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeacuse\b/because/g" *.tw
+$GREP "\bbeastiality\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeastiality\b/bestiality/g" *.tw
+$GREP "\bbeatiful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeatiful\b/beautiful/g" *.tw
+$GREP "\bbeaurocracy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeaurocracy\b/bureaucracy/g" *.tw
+$GREP "\bbeaurocratic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeaurocratic\b/bureaucratic/g" *.tw
+$GREP "\bbeautyfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeautyfull\b/beautiful/g" *.tw
+$GREP "\bbecamae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbecamae\b/became/g" *.tw
+$GREP "\bbecasue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbecasue\b/because/g" *.tw
+$GREP "\bbeccause\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeccause\b/because/g" *.tw
+$GREP "\bbecomeing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbecomeing\b/becoming/g" *.tw
+$GREP "\bbecomming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbecomming\b/becoming/g" *.tw
+$GREP "\bbecouse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbecouse\b/because/g" *.tw
+$GREP "\bbecuase\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbecuase\b/because/g" *.tw
+$GREP "\bbedore\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbedore\b/before/g" *.tw
+$GREP "\bbeeing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeeing\b/being/g" *.tw
+$GREP "\bbefoer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbefoer\b/before/g" *.tw
+$GREP "\bbegginer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbegginer\b/beginner/g" *.tw
+$GREP "\bbegginers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbegginers\b/beginners/g" *.tw
+$GREP "\bbeggining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeggining\b/beginning/g" *.tw
+$GREP "\bbegginings\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbegginings\b/beginnings/g" *.tw
+$GREP "\bbeggins\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeggins\b/begins/g" *.tw
+$GREP "\bbegining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbegining\b/beginning/g" *.tw
+$GREP "\bbeginnig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeginnig\b/beginning/g" *.tw
+$GREP "\bbeleagured\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeleagured\b/beleaguered/g" *.tw
+$GREP "\bbeleif\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeleif\b/belief/g" *.tw
+$GREP "\bbeleive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeleive\b/believe/g" *.tw
+$GREP "\bbeleived\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeleived\b/believed/g" *.tw
+$GREP "\bbeleives\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeleives\b/believes/g" *.tw
+$GREP "\bbeleiving\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeleiving\b/believing/g" *.tw
+$GREP "\bbeligum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeligum\b/belgium/g" *.tw
+$GREP "\bbelive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbelive\b/believe/g" *.tw
+$GREP "\bbelligerant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbelligerant\b/belligerent/g" *.tw
+$GREP "\bbellweather\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbellweather\b/bellwether/g" *.tw
+$GREP "\bbemusemnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbemusemnt\b/bemusement/g" *.tw
+$GREP "\bbeneficary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeneficary\b/beneficiary/g" *.tw
+$GREP "\bbeng\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeng\b/being/g" *.tw
+$GREP "\bbenificial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbenificial\b/beneficial/g" *.tw
+$GREP "\bbenifit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbenifit\b/benefit/g" *.tw
+$GREP "\bbenifits\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbenifits\b/benefits/g" *.tw
+$GREP "\bbergamont\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbergamont\b/bergamot/g" *.tw
+$GREP "\bBernouilli\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBernouilli\b/Bernoulli/g" *.tw
+$GREP "\bbeseige\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeseige\b/besiege/g" *.tw
+$GREP "\bbeseiged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeseiged\b/besieged/g" *.tw
+$GREP "\bbeseiging\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeseiging\b/besieging/g" *.tw
+$GREP "\bbeteen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeteen\b/between/g" *.tw
+$GREP "\bbetwen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbetwen\b/between/g" *.tw
+$GREP "\bbeween\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbeween\b/between/g" *.tw
+$GREP "\bbewteen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbewteen\b/between/g" *.tw
+$GREP "\bbigining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbigining\b/beginning/g" *.tw
+$GREP "\bbiginning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbiginning\b/beginning/g" *.tw
+$GREP "\bbilateraly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbilateraly\b/bilaterally/g" *.tw
+$GREP "\bbillingualism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbillingualism\b/bilingualism/g" *.tw
+$GREP "\bbinominal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbinominal\b/binomial/g" *.tw
+$GREP "\bbizzare\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbizzare\b/bizarre/g" *.tw
+$GREP "\bblaim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bblaim\b/blame/g" *.tw
+$GREP "\bblaimed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bblaimed\b/blamed/g" *.tw
+$GREP "\bblessure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bblessure\b/blessing/g" *.tw
+$GREP "\bBlitzkreig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBlitzkreig\b/Blitzkrieg/g" *.tw
+$GREP "\bbodydbuilder\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbodydbuilder\b/bodybuilder/g" *.tw
+$GREP "\bbombardement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbombardement\b/bombardment/g" *.tw
+$GREP "\bbombarment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbombarment\b/bombardment/g" *.tw
+$GREP "\bbondary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbondary\b/boundary/g" *.tw
+$GREP "\bBonnano\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBonnano\b/Bonanno/g" *.tw
+$GREP "\bboook\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bboook\b/book/g" *.tw
+$GREP "\bborke\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bborke\b/broke/g" *.tw
+$GREP "\bboundry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bboundry\b/boundary/g" *.tw
+$GREP "\bbouyancy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbouyancy\b/buoyancy/g" *.tw
+$GREP "\bbouyant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbouyant\b/buoyant/g" *.tw
+$GREP "\bboyant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bboyant\b/buoyant/g" *.tw
+$GREP "\bbradcast\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbradcast\b/broadcast/g" *.tw
+$GREP "\bBrasillian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBrasillian\b/Brazilian/g" *.tw
+$GREP "\bbreakthough\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbreakthough\b/breakthrough/g" *.tw
+$GREP "\bbreakthroughts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbreakthroughts\b/breakthroughs/g" *.tw
+$GREP "\bbreif\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbreif\b/brief/g" *.tw
+$GREP "\bbreifly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbreifly\b/briefly/g" *.tw
+$GREP "\bbrethen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbrethen\b/brethren/g" *.tw
+$GREP "\bbretheren\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbretheren\b/brethren/g" *.tw
+$GREP "\bbriliant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbriliant\b/brilliant/g" *.tw
+$GREP "\bbrillant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbrillant\b/brilliant/g" *.tw
+$GREP "\bbrimestone\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbrimestone\b/brimstone/g" *.tw
+$GREP "\bBritian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBritian\b/Britain/g" *.tw
+$GREP "\bBrittish\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBrittish\b/British/g" *.tw
+$GREP "\bbroacasted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbroacasted\b/broadcast/g" *.tw
+$GREP "\bbroadacasting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbroadacasting\b/broadcasting/g" *.tw
+$GREP "\bbroady\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbroady\b/broadly/g" *.tw
+$GREP "\bBuddah\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBuddah\b/Buddha/g" *.tw
+$GREP "\bBuddist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bBuddist\b/Buddhist/g" *.tw
+$GREP "\bbuisness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbuisness\b/business/g" *.tw
+$GREP "\bbuisnessman\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbuisnessman\b/businessman/g" *.tw
+$GREP "\bbuoancy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbuoancy\b/buoyancy/g" *.tw
+$GREP "\bburried\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bburried\b/buried/g" *.tw
+$GREP "\bbusines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbusines\b/business/g" *.tw
+$GREP "\bbusness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbusness\b/business/g" *.tw
+$GREP "\bbussiness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bbussiness\b/business/g" *.tw
+$GREP "\bcaculater\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaculater\b/calculator/g" *.tw
+$GREP "\bcacuses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcacuses\b/caucuses/g" *.tw
+$GREP "\bcahracters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcahracters\b/characters/g" *.tw
+$GREP "\bcalaber\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalaber\b/caliber/g" *.tw
+$GREP "\bcalculater\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalculater\b/calculator/g" *.tw
+$GREP "\bcalculs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalculs\b/calculus/g" *.tw
+$GREP "\bcalenders\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalenders\b/calendars/g" *.tw
+$GREP "\bcaligraphy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaligraphy\b/calligraphy/g" *.tw
+$GREP "\bcaluclate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaluclate\b/calculate/g" *.tw
+$GREP "\bcaluclated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaluclated\b/calculated/g" *.tw
+$GREP "\bcaluculate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaluculate\b/calculate/g" *.tw
+$GREP "\bcaluculated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaluculated\b/calculated/g" *.tw
+$GREP "\bcalulate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalulate\b/calculate/g" *.tw
+$GREP "\bcalulated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalulated\b/calculated/g" *.tw
+$GREP "\bcalulater\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcalulater\b/calculator/g" *.tw
+$GREP "\bCambrige\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCambrige\b/Cambridge/g" *.tw
+$GREP "\bcamoflage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcamoflage\b/camouflage/g" *.tw
+$GREP "\bcampagin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcampagin\b/campaign/g" *.tw
+$GREP "\bcampain\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcampain\b/campaign/g" *.tw
+$GREP "\bcampains\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcampains\b/campaigns/g" *.tw
+$GREP "\bcandadate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcandadate\b/candidate/g" *.tw
+$GREP "\bcandiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcandiate\b/candidate/g" *.tw
+$GREP "\bcandidiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcandidiate\b/candidate/g" *.tw
+$GREP "\bcannister\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcannister\b/canister/g" *.tw
+$GREP "\bcannisters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcannisters\b/canisters/g" *.tw
+$GREP "\bcannnot\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcannnot\b/cannot/g" *.tw
+$GREP "\bcannonical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcannonical\b/canonical/g" *.tw
+$GREP "\bcannotation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcannotation\b/connotation/g" *.tw
+$GREP "\bcannotations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcannotations\b/connotations/g" *.tw
+$GREP "\bcaost\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaost\b/coast/g" *.tw
+$GREP "\bcaperbility\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaperbility\b/capability/g" *.tw
+$GREP "\bCapetown\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCapetown\b/Cape Town/g" *.tw
+$GREP "\bcapible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcapible\b/capable/g" *.tw
+$GREP "\bcaptial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaptial\b/capital/g" *.tw
+$GREP "\bcaptued\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaptued\b/captured/g" *.tw
+$GREP "\bcapturd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcapturd\b/captured/g" *.tw
+$GREP "\bcarachter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarachter\b/character/g" *.tw
+$GREP "\bcaracterized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaracterized\b/characterized/g" *.tw
+$GREP "\bcarefull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarefull\b/careful/g" *.tw
+$GREP "\bcareing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcareing\b/caring/g" *.tw
+$GREP "\bcarismatic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarismatic\b/charismatic/g" *.tw
+$GREP "\bCarmalite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarmalite\b/Carmelite/g" *.tw
+$GREP "\bCarnagie\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarnagie\b/Carnegie/g" *.tw
+$GREP "\bCarnagie-Mellon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarnagie-Mellon\b/Carnegie-Mellon/g" *.tw
+$GREP "\bCarnigie\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarnigie\b/Carnegie/g" *.tw
+$GREP "\bCarnigie-Mellon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarnigie-Mellon\b/Carnegie-Mellon/g" *.tw
+$GREP "\bcarreer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarreer\b/career/g" *.tw
+$GREP "\bcarrers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarrers\b/careers/g" *.tw
+$GREP "\bCarribbean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarribbean\b/Caribbean/g" *.tw
+$GREP "\bCarribean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarribean\b/Caribbean/g" *.tw
+$GREP "\bcarryng\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarryng\b/carrying/g" *.tw
+$GREP "\bcartdridge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcartdridge\b/cartridge/g" *.tw
+$GREP "\bCarthagian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCarthagian\b/Carthaginian/g" *.tw
+$GREP "\bcarthographer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcarthographer\b/cartographer/g" *.tw
+$GREP "\bcartilege\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcartilege\b/cartilage/g" *.tw
+$GREP "\bcartilidge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcartilidge\b/cartilage/g" *.tw
+$GREP "\bcartrige\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcartrige\b/cartridge/g" *.tw
+$GREP "\bcasette\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasette\b/cassette/g" *.tw
+$GREP "\bcasion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasion\b/caisson/g" *.tw
+$GREP "\bcassawory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcassawory\b/cassowary/g" *.tw
+$GREP "\bcassowarry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcassowarry\b/cassowary/g" *.tw
+$GREP "\bcasue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasue\b/cause/g" *.tw
+$GREP "\bcasued\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasued\b/caused/g" *.tw
+$GREP "\bcasues\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasues\b/causes/g" *.tw
+$GREP "\bcasuing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasuing\b/causing/g" *.tw
+$GREP "\bcasulaties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasulaties\b/casualties/g" *.tw
+$GREP "\bcasulaty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcasulaty\b/casualty/g" *.tw
+$GREP "\bcatagories\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatagories\b/categories/g" *.tw
+$GREP "\bcatagorized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatagorized\b/categorized/g" *.tw
+$GREP "\bcatagory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatagory\b/category/g" *.tw
+$GREP "\bcatapillar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatapillar\b/caterpillar/g" *.tw
+$GREP "\bcatapillars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatapillars\b/caterpillars/g" *.tw
+$GREP "\bcatapiller\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatapiller\b/caterpillar/g" *.tw
+$GREP "\bcatapillers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatapillers\b/caterpillars/g" *.tw
+$GREP "\bcatepillar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatepillar\b/caterpillar/g" *.tw
+$GREP "\bcatepillars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatepillars\b/caterpillars/g" *.tw
+$GREP "\bcatergorize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatergorize\b/categorize/g" *.tw
+$GREP "\bcatergorized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatergorized\b/categorized/g" *.tw
+$GREP "\bcaterpilar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaterpilar\b/caterpillar/g" *.tw
+$GREP "\bcaterpilars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaterpilars\b/caterpillars/g" *.tw
+$GREP "\bcaterpiller\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaterpiller\b/caterpillar/g" *.tw
+$GREP "\bcaterpillers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcaterpillers\b/caterpillars/g" *.tw
+$GREP "\bcathlic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcathlic\b/catholic/g" *.tw
+$GREP "\bcatholocism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatholocism\b/catholicism/g" *.tw
+$GREP "\bcatterpilar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatterpilar\b/caterpillar/g" *.tw
+$GREP "\bcatterpilars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatterpilars\b/caterpillars/g" *.tw
+$GREP "\bcatterpillar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatterpillar\b/caterpillar/g" *.tw
+$GREP "\bcatterpillars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcatterpillars\b/caterpillars/g" *.tw
+$GREP "\bcattleship\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcattleship\b/battleship/g" *.tw
+$GREP "\bcausalities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcausalities\b/casualties/g" *.tw
+$GREP "\bCeasar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCeasar\b/Caesar/g" *.tw
+$GREP "\bCelcius\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCelcius\b/Celsius/g" *.tw
+$GREP "\bcellpading\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcellpading\b/cellpadding/g" *.tw
+$GREP "\bcementary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcementary\b/cemetery/g" *.tw
+$GREP "\bcemetarey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcemetarey\b/cemetery/g" *.tw
+$GREP "\bcemetaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcemetaries\b/cemeteries/g" *.tw
+$GREP "\bcemetary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcemetary\b/cemetery/g" *.tw
+$GREP "\bcencus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcencus\b/census/g" *.tw
+$GREP "\bcententenial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcententenial\b/centennial/g" *.tw
+$GREP "\bcentruies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcentruies\b/centuries/g" *.tw
+$GREP "\bcentruy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcentruy\b/century/g" *.tw
+$GREP "\bcentuties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcentuties\b/centuries/g" *.tw
+$GREP "\bcentuty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcentuty\b/century/g" *.tw
+$GREP "\bcerimonial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcerimonial\b/ceremonial/g" *.tw
+$GREP "\bcerimonies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcerimonies\b/ceremonies/g" *.tw
+$GREP "\bcerimonious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcerimonious\b/ceremonious/g" *.tw
+$GREP "\bcerimony\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcerimony\b/ceremony/g" *.tw
+$GREP "\bceromony\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bceromony\b/ceremony/g" *.tw
+$GREP "\bcertainity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcertainity\b/certainty/g" *.tw
+$GREP "\bcertian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcertian\b/certain/g" *.tw
+$GREP "\bchalenging\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchalenging\b/challenging/g" *.tw
+$GREP "\bchallange\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchallange\b/challenge/g" *.tw
+$GREP "\bchallanged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchallanged\b/challenged/g" *.tw
+$GREP "\bchallege\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchallege\b/challenge/g" *.tw
+$GREP "\bChampange\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bChampange\b/Champagne/g" *.tw
+$GREP "\bchangable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchangable\b/changeable/g" *.tw
+$GREP "\bcharachter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharachter\b/character/g" *.tw
+$GREP "\bcharachters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharachters\b/characters/g" *.tw
+$GREP "\bcharactersistic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharactersistic\b/characteristic/g" *.tw
+$GREP "\bcharactor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharactor\b/character/g" *.tw
+$GREP "\bcharactors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharactors\b/characters/g" *.tw
+$GREP "\bcharasmatic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharasmatic\b/charismatic/g" *.tw
+$GREP "\bcharaterized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharaterized\b/characterized/g" *.tw
+$GREP "\bchariman\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchariman\b/chairman/g" *.tw
+$GREP "\bcharistics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcharistics\b/characteristics/g" *.tw
+$GREP "\bcheif\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcheif\b/chief/g" *.tw
+$GREP "\bcheifs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcheifs\b/chiefs/g" *.tw
+$GREP "\bchemcial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchemcial\b/chemical/g" *.tw
+$GREP "\bchemcially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchemcially\b/chemically/g" *.tw
+$GREP "\bchemestry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchemestry\b/chemistry/g" *.tw
+$GREP "\bchemicaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchemicaly\b/chemically/g" *.tw
+$GREP "\bchildbird\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchildbird\b/childbirth/g" *.tw
+$GREP "\bchilden\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchilden\b/children/g" *.tw
+$GREP "\bchoclate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchoclate\b/chocolate/g" *.tw
+$GREP "\bchoosen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchoosen\b/chosen/g" *.tw
+$GREP "\bchracter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchracter\b/character/g" *.tw
+$GREP "\bchuch\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchuch\b/church/g" *.tw
+$GREP "\bchurchs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bchurchs\b/churches/g" *.tw
+$GREP "\bCincinatti\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCincinatti\b/Cincinnati/g" *.tw
+$GREP "\bCincinnatti\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCincinnatti\b/Cincinnati/g" *.tw
+$GREP "\bcirculaton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcirculaton\b/circulation/g" *.tw
+$GREP "\bcircumsicion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcircumsicion\b/circumcision/g" *.tw
+$GREP "\bcircut\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcircut\b/circuit/g" *.tw
+$GREP "\bciricuit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bciricuit\b/circuit/g" *.tw
+$GREP "\bciriculum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bciriculum\b/curriculum/g" *.tw
+$GREP "\bcivillian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcivillian\b/civilian/g" *.tw
+$GREP "\bclaer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclaer\b/clear/g" *.tw
+$GREP "\bclaerer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclaerer\b/clearer/g" *.tw
+$GREP "\bclaerly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclaerly\b/clearly/g" *.tw
+$GREP "\bclaimes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclaimes\b/claims/g" *.tw
+$GREP "\bclas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclas\b/class/g" *.tw
+$GREP "\bclasic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclasic\b/classic/g" *.tw
+$GREP "\bclasical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclasical\b/classical/g" *.tw
+$GREP "\bclasically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclasically\b/classically/g" *.tw
+$GREP "\bcleareance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcleareance\b/clearance/g" *.tw
+$GREP "\bclincial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclincial\b/clinical/g" *.tw
+$GREP "\bclinicaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bclinicaly\b/clinically/g" *.tw
+$GREP "\bcmo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcmo\b/com/g" *.tw
+$GREP "\bcmoputer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcmoputer\b/computer/g" *.tw
+$GREP "\bco-incided\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bco-incided\b/coincided/g" *.tw
+$GREP "\bCoca Cola\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bCoca Cola\b/Coca-Cola/g" *.tw
+$GREP "\bcoctail\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoctail\b/cocktail/g" *.tw
+$GREP "\bcoform\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoform\b/conform/g" *.tw
+$GREP "\bcognizent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcognizent\b/cognizant/g" *.tw
+$GREP "\bcoincedentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoincedentally\b/coincidentally/g" *.tw
+$GREP "\bcolaborations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcolaborations\b/collaborations/g" *.tw
+$GREP "\bcolateral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcolateral\b/collateral/g" *.tw
+$GREP "\bcolelctive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcolelctive\b/collective/g" *.tw
+$GREP "\bcollaberative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollaberative\b/collaborative/g" *.tw
+$GREP "\bcollecton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollecton\b/collection/g" *.tw
+$GREP "\bcollegue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollegue\b/colleague/g" *.tw
+$GREP "\bcollegues\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollegues\b/colleagues/g" *.tw
+$GREP "\bcollonade\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollonade\b/colonnade/g" *.tw
+$GREP "\bcollonies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollonies\b/colonies/g" *.tw
+$GREP "\bcollony\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollony\b/colony/g" *.tw
+$GREP "\bcollosal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcollosal\b/colossal/g" *.tw
+$GREP "\bcolonizators\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcolonizators\b/colonizers/g" *.tw
+$GREP "\bcomando\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomando\b/commando/g" *.tw
+$GREP "\bcomandos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomandos\b/commandos/g" *.tw
+$GREP "\bcomany\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomany\b/company/g" *.tw
+$GREP "\bcomapany\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomapany\b/company/g" *.tw
+$GREP "\bcomback\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomback\b/comeback/g" *.tw
+$GREP "\bcombanations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcombanations\b/combinations/g" *.tw
+$GREP "\bcombinatins\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcombinatins\b/combinations/g" *.tw
+$GREP "\bcombusion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcombusion\b/combustion/g" *.tw
+$GREP "\bcomdemnation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomdemnation\b/condemnation/g" *.tw
+$GREP "\bcomemmorates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomemmorates\b/commemorates/g" *.tw
+$GREP "\bcomemoretion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomemoretion\b/commemoration/g" *.tw
+$GREP "\bcomision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomision\b/commission/g" *.tw
+$GREP "\bcomisioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomisioned\b/commissioned/g" *.tw
+$GREP "\bcomisioner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomisioner\b/commissioner/g" *.tw
+$GREP "\bcomisioning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomisioning\b/commissioning/g" *.tw
+$GREP "\bcomisions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomisions\b/commissions/g" *.tw
+$GREP "\bcomission\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomission\b/commission/g" *.tw
+$GREP "\bcomissioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomissioned\b/commissioned/g" *.tw
+$GREP "\bcomissioner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomissioner\b/commissioner/g" *.tw
+$GREP "\bcomissioning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomissioning\b/commissioning/g" *.tw
+$GREP "\bcomissions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomissions\b/commissions/g" *.tw
+$GREP "\bcomited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomited\b/committed/g" *.tw
+$GREP "\bcomiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomiting\b/committing/g" *.tw
+$GREP "\bcomitted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomitted\b/committed/g" *.tw
+$GREP "\bcomittee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomittee\b/committee/g" *.tw
+$GREP "\bcomitting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomitting\b/committing/g" *.tw
+$GREP "\bcommandoes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommandoes\b/commandos/g" *.tw
+$GREP "\bcommedic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommedic\b/comedic/g" *.tw
+$GREP "\bcommemerative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommemerative\b/commemorative/g" *.tw
+$GREP "\bcommemmorate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommemmorate\b/commemorate/g" *.tw
+$GREP "\bcommemmorating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommemmorating\b/commemorating/g" *.tw
+$GREP "\bcommerical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommerical\b/commercial/g" *.tw
+$GREP "\bcommerically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommerically\b/commercially/g" *.tw
+$GREP "\bcommericial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommericial\b/commercial/g" *.tw
+$GREP "\bcommericially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommericially\b/commercially/g" *.tw
+$GREP "\bcommerorative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommerorative\b/commemorative/g" *.tw
+$GREP "\bcomming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomming\b/coming/g" *.tw
+$GREP "\bcomminication\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomminication\b/communication/g" *.tw
+$GREP "\bcommision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommision\b/commission/g" *.tw
+$GREP "\bcommisioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommisioned\b/commissioned/g" *.tw
+$GREP "\bcommisioner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommisioner\b/commissioner/g" *.tw
+$GREP "\bcommisioning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommisioning\b/commissioning/g" *.tw
+$GREP "\bcommisions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommisions\b/commissions/g" *.tw
+$GREP "\bcommited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommited\b/committed/g" *.tw
+$GREP "\bcommitee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommitee\b/committee/g" *.tw
+$GREP "\bcommiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommiting\b/committing/g" *.tw
+$GREP "\bcommitte\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommitte\b/committee/g" *.tw
+$GREP "\bcommittment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommittment\b/commitment/g" *.tw
+$GREP "\bcommittments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommittments\b/commitments/g" *.tw
+$GREP "\bcommmemorated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommmemorated\b/commemorated/g" *.tw
+$GREP "\bcommongly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommongly\b/commonly/g" *.tw
+$GREP "\bcommonweath\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommonweath\b/commonwealth/g" *.tw
+$GREP "\bcommuications\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommuications\b/communications/g" *.tw
+$GREP "\bcommuinications\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommuinications\b/communications/g" *.tw
+$GREP "\bcommunciation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommunciation\b/communication/g" *.tw
+$GREP "\bcommuniation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommuniation\b/communication/g" *.tw
+$GREP "\bcommunites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcommunites\b/communities/g" *.tw
+$GREP "\bcompability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompability\b/compatibility/g" *.tw
+$GREP "\bcomparision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomparision\b/comparison/g" *.tw
+$GREP "\bcomparisions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomparisions\b/comparisons/g" *.tw
+$GREP "\bcomparitive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomparitive\b/comparative/g" *.tw
+$GREP "\bcomparitively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomparitively\b/comparatively/g" *.tw
+$GREP "\bcompatabilities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatabilities\b/compatibilities/g" *.tw
+$GREP "\bcompatability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatability\b/compatibility/g" *.tw
+$GREP "\bcompatable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatable\b/compatible/g" *.tw
+$GREP "\bcompatablities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatablities\b/compatibilities/g" *.tw
+$GREP "\bcompatablity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatablity\b/compatibility/g" *.tw
+$GREP "\bcompatiable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatiable\b/compatible/g" *.tw
+$GREP "\bcompatiblities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatiblities\b/compatibilities/g" *.tw
+$GREP "\bcompatiblity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompatiblity\b/compatibility/g" *.tw
+$GREP "\bcompeitions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompeitions\b/competitions/g" *.tw
+$GREP "\bcompensantion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompensantion\b/compensation/g" *.tw
+$GREP "\bcompetance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompetance\b/competence/g" *.tw
+$GREP "\bcompetant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompetant\b/competent/g" *.tw
+$GREP "\bcompetative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompetative\b/competitive/g" *.tw
+$GREP "\bcompetitiion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompetitiion\b/competition/g" *.tw
+$GREP "\bcompetive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompetive\b/competitive/g" *.tw
+$GREP "\bcompetiveness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompetiveness\b/competitiveness/g" *.tw
+$GREP "\bcomphrehensive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomphrehensive\b/comprehensive/g" *.tw
+$GREP "\bcompitent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompitent\b/competent/g" *.tw
+$GREP "\bcompletedthe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompletedthe\b/completed the/g" *.tw
+$GREP "\bcompletelyl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompletelyl\b/completely/g" *.tw
+$GREP "\bcompletetion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompletetion\b/completion/g" *.tw
+$GREP "\bcomplier\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomplier\b/compiler/g" *.tw
+$GREP "\bcomponant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomponant\b/component/g" *.tw
+$GREP "\bcomprable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomprable\b/comparable/g" *.tw
+$GREP "\bcomprimise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomprimise\b/compromise/g" *.tw
+$GREP "\bcompulsary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompulsary\b/compulsory/g" *.tw
+$GREP "\bcompulsery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcompulsery\b/compulsory/g" *.tw
+$GREP "\bcomputarized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcomputarized\b/computerized/g" *.tw
+$GREP "\bconcensus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcensus\b/consensus/g" *.tw
+$GREP "\bconcider\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcider\b/consider/g" *.tw
+$GREP "\bconcidered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcidered\b/considered/g" *.tw
+$GREP "\bconcidering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcidering\b/considering/g" *.tw
+$GREP "\bconciders\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconciders\b/considers/g" *.tw
+$GREP "\bconcieted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcieted\b/conceited/g" *.tw
+$GREP "\bconcieved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcieved\b/conceived/g" *.tw
+$GREP "\bconcious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconcious\b/conscious/g" *.tw
+$GREP "\bconciously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconciously\b/consciously/g" *.tw
+$GREP "\bconciousness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconciousness\b/consciousness/g" *.tw
+$GREP "\bcondamned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcondamned\b/condemned/g" *.tw
+$GREP "\bcondemmed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcondemmed\b/condemned/g" *.tw
+$GREP "\bcondidtion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcondidtion\b/condition/g" *.tw
+$GREP "\bcondidtions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcondidtions\b/conditions/g" *.tw
+$GREP "\bconditionsof\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconditionsof\b/conditions of/g" *.tw
+$GREP "\bconected\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconected\b/connected/g" *.tw
+$GREP "\bconection\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconection\b/connection/g" *.tw
+$GREP "\bconesencus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconesencus\b/consensus/g" *.tw
+$GREP "\bconfidental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconfidental\b/confidential/g" *.tw
+$GREP "\bconfidentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconfidentally\b/confidentially/g" *.tw
+$GREP "\bconfids\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconfids\b/confides/g" *.tw
+$GREP "\bconfigureable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconfigureable\b/configurable/g" *.tw
+$GREP "\bconfortable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconfortable\b/comfortable/g" *.tw
+$GREP "\bcongradulations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcongradulations\b/congratulations/g" *.tw
+$GREP "\bcongresional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcongresional\b/congressional/g" *.tw
+$GREP "\bconived\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconived\b/connived/g" *.tw
+$GREP "\bconjecutre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconjecutre\b/conjecture/g" *.tw
+$GREP "\bconjuction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconjuction\b/conjunction/g" *.tw
+$GREP "\bConneticut\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bConneticut\b/Connecticut/g" *.tw
+$GREP "\bconotations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconotations\b/connotations/g" *.tw
+$GREP "\bconquerd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconquerd\b/conquered/g" *.tw
+$GREP "\bconquerer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconquerer\b/conqueror/g" *.tw
+$GREP "\bconquerers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconquerers\b/conquerors/g" *.tw
+$GREP "\bconqured\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconqured\b/conquered/g" *.tw
+$GREP "\bconscent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconscent\b/consent/g" *.tw
+$GREP "\bconsciouness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsciouness\b/consciousness/g" *.tw
+$GREP "\bconsdider\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsdider\b/consider/g" *.tw
+$GREP "\bconsdidered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsdidered\b/considered/g" *.tw
+$GREP "\bconsdiered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsdiered\b/considered/g" *.tw
+$GREP "\bconsectutive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsectutive\b/consecutive/g" *.tw
+$GREP "\bconsenquently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsenquently\b/consequently/g" *.tw
+$GREP "\bconsentrate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsentrate\b/concentrate/g" *.tw
+$GREP "\bconsentrated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsentrated\b/concentrated/g" *.tw
+$GREP "\bconsentrates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsentrates\b/concentrates/g" *.tw
+$GREP "\bconsept\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsept\b/concept/g" *.tw
+$GREP "\bconsequentually\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsequentually\b/consequently/g" *.tw
+$GREP "\bconsequeseces\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsequeseces\b/consequences/g" *.tw
+$GREP "\bconsern\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsern\b/concern/g" *.tw
+$GREP "\bconserned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconserned\b/concerned/g" *.tw
+$GREP "\bconserning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconserning\b/concerning/g" *.tw
+$GREP "\bconservitive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconservitive\b/conservative/g" *.tw
+$GREP "\bconsiciousness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsiciousness\b/consciousness/g" *.tw
+$GREP "\bconsicousness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsicousness\b/consciousness/g" *.tw
+$GREP "\bconsiderd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsiderd\b/considered/g" *.tw
+$GREP "\bconsideres\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsideres\b/considered/g" *.tw
+$GREP "\bconsious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsious\b/conscious/g" *.tw
+$GREP "\bconsistant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsistant\b/consistent/g" *.tw
+$GREP "\bconsistantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsistantly\b/consistently/g" *.tw
+$GREP "\bconsituencies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsituencies\b/constituencies/g" *.tw
+$GREP "\bconsituency\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsituency\b/constituency/g" *.tw
+$GREP "\bconsituted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsituted\b/constituted/g" *.tw
+$GREP "\bconsitution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsitution\b/constitution/g" *.tw
+$GREP "\bconsitutional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsitutional\b/constitutional/g" *.tw
+$GREP "\bconsolodate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsolodate\b/consolidate/g" *.tw
+$GREP "\bconsolodated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsolodated\b/consolidated/g" *.tw
+$GREP "\bconsonent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsonent\b/consonant/g" *.tw
+$GREP "\bconsonents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsonents\b/consonants/g" *.tw
+$GREP "\bconsorcium\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsorcium\b/consortium/g" *.tw
+$GREP "\bconspiracys\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconspiracys\b/conspiracies/g" *.tw
+$GREP "\bconspiriator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconspiriator\b/conspirator/g" *.tw
+$GREP "\bconstaints\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstaints\b/constraints/g" *.tw
+$GREP "\bconstanly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstanly\b/constantly/g" *.tw
+$GREP "\bconstarnation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstarnation\b/consternation/g" *.tw
+$GREP "\bconstatn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstatn\b/constant/g" *.tw
+$GREP "\bconstinually\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstinually\b/continually/g" *.tw
+$GREP "\bconstituant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstituant\b/constituent/g" *.tw
+$GREP "\bconstituants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstituants\b/constituents/g" *.tw
+$GREP "\bconstituion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstituion\b/constitution/g" *.tw
+$GREP "\bconstituional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstituional\b/constitutional/g" *.tw
+$GREP "\bconsttruction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsttruction\b/construction/g" *.tw
+$GREP "\bconstuction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconstuction\b/construction/g" *.tw
+$GREP "\bcontstruction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontstruction\b/construction/g" *.tw
+$GREP "\bconsulant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsulant\b/consultant/g" *.tw
+$GREP "\bconsumate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsumate\b/consummate/g" *.tw
+$GREP "\bconsumated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconsumated\b/consummated/g" *.tw
+$GREP "\bcontaiminate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontaiminate\b/contaminate/g" *.tw
+$GREP "\bcontaines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontaines\b/contains/g" *.tw
+$GREP "\bcontamporaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontamporaries\b/contemporaries/g" *.tw
+$GREP "\bcontamporary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontamporary\b/contemporary/g" *.tw
+$GREP "\bcontempoary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontempoary\b/contemporary/g" *.tw
+$GREP "\bcontemporaneus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontemporaneus\b/contemporaneous/g" *.tw
+$GREP "\bcontempory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontempory\b/contemporary/g" *.tw
+$GREP "\bcontendor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontendor\b/contender/g" *.tw
+$GREP "\bcontian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontian\b/contain/g" *.tw
+$GREP "\bcontians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontians\b/contains/g" *.tw
+$GREP "\bcontibute\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontibute\b/contribute/g" *.tw
+$GREP "\bcontibuted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontibuted\b/contributed/g" *.tw
+$GREP "\bcontibutes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontibutes\b/contributes/g" *.tw
+$GREP "\bcontigent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontigent\b/contingent/g" *.tw
+$GREP "\bcontined\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontined\b/continued/g" *.tw
+$GREP "\bcontinential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontinential\b/continental/g" *.tw
+$GREP "\bcontinous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontinous\b/continuous/g" *.tw
+$GREP "\bcontinously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontinously\b/continuously/g" *.tw
+$GREP "\bcontinueing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontinueing\b/continuing/g" *.tw
+$GREP "\bcontravercial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontravercial\b/controversial/g" *.tw
+$GREP "\bcontraversy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontraversy\b/controversy/g" *.tw
+$GREP "\bcontributer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontributer\b/contributor/g" *.tw
+$GREP "\bcontributers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontributers\b/contributors/g" *.tw
+$GREP "\bcontritutions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontritutions\b/contributions/g" *.tw
+$GREP "\bcontroled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontroled\b/controlled/g" *.tw
+$GREP "\bcontroling\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontroling\b/controlling/g" *.tw
+$GREP "\bcontroll\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontroll\b/control/g" *.tw
+$GREP "\bcontrolls\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontrolls\b/controls/g" *.tw
+$GREP "\bcontrovercial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontrovercial\b/controversial/g" *.tw
+$GREP "\bcontrovercy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontrovercy\b/controversy/g" *.tw
+$GREP "\bcontroveries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontroveries\b/controversies/g" *.tw
+$GREP "\bcontroversal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontroversal\b/controversial/g" *.tw
+$GREP "\bcontroversey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontroversey\b/controversy/g" *.tw
+$GREP "\bcontrovertial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontrovertial\b/controversial/g" *.tw
+$GREP "\bcontrovery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontrovery\b/controversy/g" *.tw
+$GREP "\bcontruction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcontruction\b/construction/g" *.tw
+$GREP "\bconveinent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconveinent\b/convenient/g" *.tw
+$GREP "\bconvenant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconvenant\b/covenant/g" *.tw
+$GREP "\bconvential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconvential\b/conventional/g" *.tw
+$GREP "\bconvertables\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconvertables\b/convertibles/g" *.tw
+$GREP "\bconvertion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconvertion\b/conversion/g" *.tw
+$GREP "\bconviced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconviced\b/convinced/g" *.tw
+$GREP "\bconvienient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bconvienient\b/convenient/g" *.tw
+$GREP "\bcoordiantion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoordiantion\b/coordination/g" *.tw
+$GREP "\bcoorperations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoorperations\b/corporations/g" *.tw
+$GREP "\bcopmetitors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcopmetitors\b/competitors/g" *.tw
+$GREP "\bcoputer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoputer\b/computer/g" *.tw
+$GREP "\bcopywrite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcopywrite\b/copyright/g" *.tw
+$GREP "\bcoridal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoridal\b/cordial/g" *.tw
+$GREP "\bcornmitted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcornmitted\b/committed/g" *.tw
+$GREP "\bcorosion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorosion\b/corrosion/g" *.tw
+$GREP "\bcorparate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorparate\b/corporate/g" *.tw
+$GREP "\bcorperations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorperations\b/corporations/g" *.tw
+$GREP "\bcorrecters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrecters\b/correctors/g" *.tw
+$GREP "\bcorreponding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorreponding\b/corresponding/g" *.tw
+$GREP "\bcorreposding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorreposding\b/corresponding/g" *.tw
+$GREP "\bcorrespondant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrespondant\b/correspondent/g" *.tw
+$GREP "\bcorrespondants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrespondants\b/correspondents/g" *.tw
+$GREP "\bcorridoors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorridoors\b/corridors/g" *.tw
+$GREP "\bcorrispond\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrispond\b/correspond/g" *.tw
+$GREP "\bcorrispondant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrispondant\b/correspondent/g" *.tw
+$GREP "\bcorrispondants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrispondants\b/correspondents/g" *.tw
+$GREP "\bcorrisponded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrisponded\b/corresponded/g" *.tw
+$GREP "\bcorrisponding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrisponding\b/corresponding/g" *.tw
+$GREP "\bcorrisponds\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcorrisponds\b/corresponds/g" *.tw
+$GREP "\bcostitution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcostitution\b/constitution/g" *.tw
+$GREP "\bcoucil\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcoucil\b/council/g" *.tw
+$GREP "\bcounries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcounries\b/countries/g" *.tw
+$GREP "\bcountains\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcountains\b/contains/g" *.tw
+$GREP "\bcountires\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcountires\b/countries/g" *.tw
+$GREP "\bcreaeted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcreaeted\b/created/g" *.tw
+$GREP "\bcreche\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcreche\b/crèche/g" *.tw
+$GREP "\bcreedence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcreedence\b/credence/g" *.tw
+$GREP "\bcritereon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcritereon\b/criterion/g" *.tw
+$GREP "\bcriterias\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcriterias\b/criteria/g" *.tw
+$GREP "\bcriticists\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcriticists\b/critics/g" *.tw
+$GREP "\bcritisising\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcritisising\b/criticising/g" *.tw
+$GREP "\bcritisism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcritisism\b/criticism/g" *.tw
+$GREP "\bcritisisms\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcritisisms\b/criticisms/g" *.tw
+$GREP "\bcritized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcritized\b/criticized/g" *.tw
+$GREP "\bcritizing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcritizing\b/criticizing/g" *.tw
+$GREP "\bcrockodiles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrockodiles\b/crocodiles/g" *.tw
+$GREP "\bcrowm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrowm\b/crown/g" *.tw
+$GREP "\bcrtical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrtical\b/critical/g" *.tw
+$GREP "\bcrticised\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrticised\b/criticised/g" *.tw
+$GREP "\bcrucifiction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrucifiction\b/crucifixion/g" *.tw
+$GREP "\bcrusies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrusies\b/cruises/g" *.tw
+$GREP "\bcrutial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrutial\b/crucial/g" *.tw
+$GREP "\bcrystalisation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcrystalisation\b/crystallisation/g" *.tw
+$GREP "\bculiminating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bculiminating\b/culminating/g" *.tw
+$GREP "\bcumulatative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcumulatative\b/cumulative/g" *.tw
+$GREP "\bcurch\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcurch\b/church/g" *.tw
+$GREP "\bcurcuit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcurcuit\b/circuit/g" *.tw
+$GREP "\bcurrenly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcurrenly\b/currently/g" *.tw
+$GREP "\bcurriculem\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcurriculem\b/curriculum/g" *.tw
+$GREP "\bcxan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcxan\b/cyan/g" *.tw
+$GREP "\bcyclinder\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bcyclinder\b/cylinder/g" *.tw
+$GREP "\bdacquiri\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdacquiri\b/daiquiri/g" *.tw
+$GREP "\bdaed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdaed\b/dead/g" *.tw
+$GREP "\bdalmation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdalmation\b/dalmatian/g" *.tw
+$GREP "\bdamenor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdamenor\b/demeanor/g" *.tw
+$GREP "\bdammage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdammage\b/damage/g" *.tw
+$GREP "\bDardenelles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bDardenelles\b/Dardanelles/g" *.tw
+$GREP "\bdaugher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdaugher\b/daughter/g" *.tw
+$GREP "\bdebateable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdebateable\b/debatable/g" *.tw
+$GREP "\bdecendant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecendant\b/descendant/g" *.tw
+$GREP "\bdecendants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecendants\b/descendants/g" *.tw
+$GREP "\bdecendent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecendent\b/descendant/g" *.tw
+$GREP "\bdecendents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecendents\b/descendants/g" *.tw
+$GREP "\bdecideable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecideable\b/decidable/g" *.tw
+$GREP "\bdecidely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecidely\b/decidedly/g" *.tw
+$GREP "\bdecieved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecieved\b/deceived/g" *.tw
+$GREP "\bdecison\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecison\b/decision/g" *.tw
+$GREP "\bdecomissioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecomissioned\b/decommissioned/g" *.tw
+$GREP "\bdecomposit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecomposit\b/decompose/g" *.tw
+$GREP "\bdecomposited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecomposited\b/decomposed/g" *.tw
+$GREP "\bdecompositing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecompositing\b/decomposing/g" *.tw
+$GREP "\bdecomposits\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecomposits\b/decomposes/g" *.tw
+$GREP "\bdecress\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecress\b/decrees/g" *.tw
+$GREP "\bdecribe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecribe\b/describe/g" *.tw
+$GREP "\bdecribed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecribed\b/described/g" *.tw
+$GREP "\bdecribes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecribes\b/describes/g" *.tw
+$GREP "\bdecribing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdecribing\b/describing/g" *.tw
+$GREP "\bdectect\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdectect\b/detect/g" *.tw
+$GREP "\bdefendent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefendent\b/defendant/g" *.tw
+$GREP "\bdefendents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefendents\b/defendants/g" *.tw
+$GREP "\bdeffensively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeffensively\b/defensively/g" *.tw
+$GREP "\bdeffine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeffine\b/define/g" *.tw
+$GREP "\bdeffined\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeffined\b/defined/g" *.tw
+$GREP "\bdefinance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinance\b/defiance/g" *.tw
+$GREP "\bdefinate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinate\b/definite/g" *.tw
+$GREP "\bdefinately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinately\b/definitely/g" *.tw
+$GREP "\bdefinatly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinatly\b/definitely/g" *.tw
+$GREP "\bdefinetly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinetly\b/definitely/g" *.tw
+$GREP "\bdefinining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinining\b/defining/g" *.tw
+$GREP "\bdefinit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinit\b/definite/g" *.tw
+$GREP "\bdefinitly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefinitly\b/definitely/g" *.tw
+$GREP "\bdefiniton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefiniton\b/definition/g" *.tw
+$GREP "\bdefintion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdefintion\b/definition/g" *.tw
+$GREP "\bdegrate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdegrate\b/degrade/g" *.tw
+$GREP "\bdelagates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdelagates\b/delegates/g" *.tw
+$GREP "\bdelapidated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdelapidated\b/dilapidated/g" *.tw
+$GREP "\bdelerious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdelerious\b/delirious/g" *.tw
+$GREP "\bdelevopment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdelevopment\b/development/g" *.tw
+$GREP "\bdeliberatly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeliberatly\b/deliberately/g" *.tw
+$GREP "\bdelusionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdelusionally\b/delusively/g" *.tw
+$GREP "\bdemenor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdemenor\b/demeanor/g" *.tw
+$GREP "\bdemographical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdemographical\b/demographic/g" *.tw
+$GREP "\bdemolision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdemolision\b/demolition/g" *.tw
+$GREP "\bdemorcracy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdemorcracy\b/democracy/g" *.tw
+$GREP "\bdemostration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdemostration\b/demonstration/g" *.tw
+$GREP "\bdenegrating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdenegrating\b/denigrating/g" *.tw
+$GREP "\bdensly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdensly\b/densely/g" *.tw
+$GREP "\bdeparment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeparment\b/department/g" *.tw
+$GREP "\bdeparmental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeparmental\b/departmental/g" *.tw
+$GREP "\bdeparments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeparments\b/departments/g" *.tw
+$GREP "\bdependance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdependance\b/dependence/g" *.tw
+$GREP "\bdependancy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdependancy\b/dependency/g" *.tw
+$GREP "\bderiviated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bderiviated\b/derived/g" *.tw
+$GREP "\bderivitive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bderivitive\b/derivative/g" *.tw
+$GREP "\bderogitory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bderogitory\b/derogatory/g" *.tw
+$GREP "\bdescendands\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescendands\b/descendants/g" *.tw
+$GREP "\bdescibed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescibed\b/described/g" *.tw
+$GREP "\bdescision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescision\b/decision/g" *.tw
+$GREP "\bdescisions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescisions\b/decisions/g" *.tw
+$GREP "\bdescriibes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescriibes\b/describes/g" *.tw
+$GREP "\bdescripters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescripters\b/descriptors/g" *.tw
+$GREP "\bdescripton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescripton\b/description/g" *.tw
+$GREP "\bdesctruction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesctruction\b/destruction/g" *.tw
+$GREP "\bdescuss\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdescuss\b/discuss/g" *.tw
+$GREP "\bdesgined\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesgined\b/designed/g" *.tw
+$GREP "\bdeside\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeside\b/decide/g" *.tw
+$GREP "\bdesigining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesigining\b/designing/g" *.tw
+$GREP "\bdesinations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesinations\b/destinations/g" *.tw
+$GREP "\bdesintegrated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesintegrated\b/disintegrated/g" *.tw
+$GREP "\bdesintegration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesintegration\b/disintegration/g" *.tw
+$GREP "\bdesireable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesireable\b/desirable/g" *.tw
+$GREP "\bdesitned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesitned\b/destined/g" *.tw
+$GREP "\bdesktiop\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesktiop\b/desktop/g" *.tw
+$GREP "\bdesorder\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesorder\b/disorder/g" *.tw
+$GREP "\bdesoriented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdesoriented\b/disoriented/g" *.tw
+$GREP "\bdespict\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdespict\b/depict/g" *.tw
+$GREP "\bdespiration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdespiration\b/desperation/g" *.tw
+$GREP "\bdessicated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdessicated\b/desiccated/g" *.tw
+$GREP "\bdessigned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdessigned\b/designed/g" *.tw
+$GREP "\bdestablized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdestablized\b/destabilized/g" *.tw
+$GREP "\bdestory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdestory\b/destroy/g" *.tw
+$GREP "\bdetailled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdetailled\b/detailed/g" *.tw
+$GREP "\bdetatched\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdetatched\b/detached/g" *.tw
+$GREP "\bdeteoriated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeteoriated\b/deteriorated/g" *.tw
+$GREP "\bdeteriate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeteriate\b/deteriorate/g" *.tw
+$GREP "\bdeterioriating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeterioriating\b/deteriorating/g" *.tw
+$GREP "\bdeterminining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdeterminining\b/determining/g" *.tw
+$GREP "\bdetremental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdetremental\b/detrimental/g" *.tw
+$GREP "\bdevasted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevasted\b/devastated/g" *.tw
+$GREP "\bdevelope\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevelope\b/develop/g" *.tw
+$GREP "\bdevelopement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevelopement\b/development/g" *.tw
+$GREP "\bdevelopped\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevelopped\b/developed/g" *.tw
+$GREP "\bdevelpment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevelpment\b/development/g" *.tw
+$GREP "\bdevels\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevels\b/delves/g" *.tw
+$GREP "\bdevestated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevestated\b/devastated/g" *.tw
+$GREP "\bdevestating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevestating\b/devastating/g" *.tw
+$GREP "\bdevide\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevide\b/divide/g" *.tw
+$GREP "\bdevided\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevided\b/divided/g" *.tw
+$GREP "\bdevistating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevistating\b/devastating/g" *.tw
+$GREP "\bdevolopement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdevolopement\b/development/g" *.tw
+$GREP "\bdiablical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiablical\b/diabolical/g" *.tw
+$GREP "\bdiamons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiamons\b/diamonds/g" *.tw
+$GREP "\bdiaster\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiaster\b/disaster/g" *.tw
+$GREP "\bdichtomy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdichtomy\b/dichotomy/g" *.tw
+$GREP "\bdiconnects\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiconnects\b/disconnects/g" *.tw
+$GREP "\bdicover\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdicover\b/discover/g" *.tw
+$GREP "\bdicovered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdicovered\b/discovered/g" *.tw
+$GREP "\bdicovering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdicovering\b/discovering/g" *.tw
+$GREP "\bdicovers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdicovers\b/discovers/g" *.tw
+$GREP "\bdicovery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdicovery\b/discovery/g" *.tw
+$GREP "\bdictionarys\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdictionarys\b/dictionaries/g" *.tw
+$GREP "\bdicussed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdicussed\b/discussed/g" *.tw
+$GREP "\bdidnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdidnt\b/didn't/g" *.tw
+$GREP "\bdieties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdieties\b/deities/g" *.tw
+$GREP "\bdiety\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiety\b/deity/g" *.tw
+$GREP "\bdiferent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiferent\b/different/g" *.tw
+$GREP "\bdiferrent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiferrent\b/different/g" *.tw
+$GREP "\bdifferentiatiations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdifferentiatiations\b/differentiations/g" *.tw
+$GREP "\bdiffernt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiffernt\b/different/g" *.tw
+$GREP "\bdifficulity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdifficulity\b/difficulty/g" *.tw
+$GREP "\bdiffrent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiffrent\b/different/g" *.tw
+$GREP "\bdificulties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdificulties\b/difficulties/g" *.tw
+$GREP "\bdificulty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdificulty\b/difficulty/g" *.tw
+$GREP "\bdimenions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdimenions\b/dimensions/g" *.tw
+$GREP "\bdimention\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdimention\b/dimension/g" *.tw
+$GREP "\bdimentional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdimentional\b/dimensional/g" *.tw
+$GREP "\bdimentions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdimentions\b/dimensions/g" *.tw
+$GREP "\bdimesnional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdimesnional\b/dimensional/g" *.tw
+$GREP "\bdiminuitive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiminuitive\b/diminutive/g" *.tw
+$GREP "\bdimunitive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdimunitive\b/diminutive/g" *.tw
+$GREP "\bdiosese\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiosese\b/diocese/g" *.tw
+$GREP "\bdiphtong\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiphtong\b/diphthong/g" *.tw
+$GREP "\bdiphtongs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiphtongs\b/diphthongs/g" *.tw
+$GREP "\bdiplomancy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiplomancy\b/diplomacy/g" *.tw
+$GREP "\bdipthong\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdipthong\b/diphthong/g" *.tw
+$GREP "\bdipthongs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdipthongs\b/diphthongs/g" *.tw
+$GREP "\bdirectoty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdirectoty\b/directory/g" *.tw
+$GREP "\bdirived\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdirived\b/derived/g" *.tw
+$GREP "\bdisagreeed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisagreeed\b/disagreed/g" *.tw
+$GREP "\bdisapeared\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisapeared\b/disappeared/g" *.tw
+$GREP "\bdisapointing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisapointing\b/disappointing/g" *.tw
+$GREP "\bdisappearred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisappearred\b/disappeared/g" *.tw
+$GREP "\bdisaproval\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisaproval\b/disapproval/g" *.tw
+$GREP "\bdisasterous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisasterous\b/disastrous/g" *.tw
+$GREP "\bdisatisfaction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisatisfaction\b/dissatisfaction/g" *.tw
+$GREP "\bdisatisfied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisatisfied\b/dissatisfied/g" *.tw
+$GREP "\bdisatrous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisatrous\b/disastrous/g" *.tw
+$GREP "\bdiscontentment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiscontentment\b/discontent/g" *.tw
+$GREP "\bdiscribe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiscribe\b/describe/g" *.tw
+$GREP "\bdiscribed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiscribed\b/described/g" *.tw
+$GREP "\bdiscribes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiscribes\b/describes/g" *.tw
+$GREP "\bdiscribing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdiscribing\b/describing/g" *.tw
+$GREP "\bdisctinction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisctinction\b/distinction/g" *.tw
+$GREP "\bdisctinctive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisctinctive\b/distinctive/g" *.tw
+$GREP "\bdisemination\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisemination\b/dissemination/g" *.tw
+$GREP "\bdisenchanged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisenchanged\b/disenchanted/g" *.tw
+$GREP "\bdisiplined\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisiplined\b/disciplined/g" *.tw
+$GREP "\bdisobediance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisobediance\b/disobedience/g" *.tw
+$GREP "\bdisobediant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisobediant\b/disobedient/g" *.tw
+$GREP "\bdisolved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisolved\b/dissolved/g" *.tw
+$GREP "\bdisover\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisover\b/discover/g" *.tw
+$GREP "\bdispair\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispair\b/despair/g" *.tw
+$GREP "\bdisparingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisparingly\b/disparagingly/g" *.tw
+$GREP "\bdispence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispence\b/dispense/g" *.tw
+$GREP "\bdispenced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispenced\b/dispensed/g" *.tw
+$GREP "\bdispencing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispencing\b/dispensing/g" *.tw
+$GREP "\bdispicable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispicable\b/despicable/g" *.tw
+$GREP "\bdispite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispite\b/despite/g" *.tw
+$GREP "\bdispostion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdispostion\b/disposition/g" *.tw
+$GREP "\bdisproportiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisproportiate\b/disproportionate/g" *.tw
+$GREP "\bdisputandem\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisputandem\b/disputandum/g" *.tw
+$GREP "\bdisricts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdisricts\b/districts/g" *.tw
+$GREP "\bdissagreement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissagreement\b/disagreement/g" *.tw
+$GREP "\bdissapear\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissapear\b/disappear/g" *.tw
+$GREP "\bdissapearance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissapearance\b/disappearance/g" *.tw
+$GREP "\bdissapeared\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissapeared\b/disappeared/g" *.tw
+$GREP "\bdissapearing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissapearing\b/disappearing/g" *.tw
+$GREP "\bdissapears\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissapears\b/disappears/g" *.tw
+$GREP "\bdissappear\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissappear\b/disappear/g" *.tw
+$GREP "\bdissappears\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissappears\b/disappears/g" *.tw
+$GREP "\bdissappointed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissappointed\b/disappointed/g" *.tw
+$GREP "\bdissarray\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissarray\b/disarray/g" *.tw
+$GREP "\bdissobediance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissobediance\b/disobedience/g" *.tw
+$GREP "\bdissobediant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissobediant\b/disobedient/g" *.tw
+$GREP "\bdissobedience\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissobedience\b/disobedience/g" *.tw
+$GREP "\bdissobedient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdissobedient\b/disobedient/g" *.tw
+$GREP "\bdistiction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistiction\b/distinction/g" *.tw
+$GREP "\bdistingish\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistingish\b/distinguish/g" *.tw
+$GREP "\bdistingished\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistingished\b/distinguished/g" *.tw
+$GREP "\bdistingishes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistingishes\b/distinguishes/g" *.tw
+$GREP "\bdistingishing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistingishing\b/distinguishing/g" *.tw
+$GREP "\bdistingquished\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistingquished\b/distinguished/g" *.tw
+$GREP "\bdistrubution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistrubution\b/distribution/g" *.tw
+$GREP "\bdistruction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistruction\b/destruction/g" *.tw
+$GREP "\bdistructive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdistructive\b/destructive/g" *.tw
+$GREP "\bditributed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bditributed\b/distributed/g" *.tw
+$GREP "\bdivice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdivice\b/device/g" *.tw
+$GREP "\bdivinition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdivinition\b/divination/g" *.tw
+$GREP "\bdivison\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdivison\b/division/g" *.tw
+$GREP "\bdivisons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdivisons\b/divisions/g" *.tw
+$GREP "\bdum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdum\b/dumb/g" *.tw
+$GREP "\bdoccument\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoccument\b/document/g" *.tw
+$GREP "\bdoccumented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoccumented\b/documented/g" *.tw
+$GREP "\bdoccuments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoccuments\b/documents/g" *.tw
+$GREP "\bdocrines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdocrines\b/doctrines/g" *.tw
+$GREP "\bdoctines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoctines\b/doctrines/g" *.tw
+$GREP "\bdocumenatry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdocumenatry\b/documentary/g" *.tw
+$GREP "\bdoens\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoens\b/does/g" *.tw
+$GREP "\bdoesnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoesnt\b/doesn't/g" *.tw
+$GREP "\bdoign\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoign\b/doing/g" *.tw
+$GREP "\bdominaton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdominaton\b/domination/g" *.tw
+$GREP "\bdominent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdominent\b/dominant/g" *.tw
+$GREP "\bdominiant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdominiant\b/dominant/g" *.tw
+$GREP "\bdonig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdonig\b/doing/g" *.tw
+$GREP "\bdosen't\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdosen't\b/doesn't/g" *.tw
+$GREP "\bdoulbe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdoulbe\b/double/g" *.tw
+$GREP "\bdowloads\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdowloads\b/downloads/g" *.tw
+$GREP "\bdramtic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdramtic\b/dramatic/g" *.tw
+$GREP "\bdraughtman\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdraughtman\b/draughtsman/g" *.tw
+$GREP "\bDravadian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bDravadian\b/Dravidian/g" *.tw
+$GREP "\bdreasm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdreasm\b/dreams/g" *.tw
+$GREP "\bdriectly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdriectly\b/directly/g" *.tw
+$GREP "\bdrnik\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdrnik\b/drink/g" *.tw
+$GREP "\bdruming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdruming\b/drumming/g" *.tw
+$GREP "\bdrummless\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdrummless\b/drumless/g" *.tw
+$GREP "\bdupicate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdupicate\b/duplicate/g" *.tw
+$GREP "\bdurig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdurig\b/during/g" *.tw
+$GREP "\bdurring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdurring\b/during/g" *.tw
+$GREP "\bduting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bduting\b/during/g" *.tw
+$GREP "\bdyas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bdyas\b/dryas/g" *.tw
+$GREP "\beahc\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beahc\b/each/g" *.tw
+$GREP "\bealier\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bealier\b/earlier/g" *.tw
+$GREP "\bearlies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bearlies\b/earliest/g" *.tw
+$GREP "\bearnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bearnt\b/earned/g" *.tw
+$GREP "\becclectic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\becclectic\b/eclectic/g" *.tw
+$GREP "\beceonomy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beceonomy\b/economy/g" *.tw
+$GREP "\becidious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\becidious\b/deciduous/g" *.tw
+$GREP "\beclispe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beclispe\b/eclipse/g" *.tw
+$GREP "\becomonic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\becomonic\b/economic/g" *.tw
+$GREP "\bect\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bect\b/etc/g" *.tw
+$GREP "\beearly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beearly\b/early/g" *.tw
+$GREP "\befel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\befel\b/evil/g" *.tw
+$GREP "\beffeciency\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beffeciency\b/efficiency/g" *.tw
+$GREP "\beffecient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beffecient\b/efficient/g" *.tw
+$GREP "\beffeciently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beffeciently\b/efficiently/g" *.tw
+$GREP "\befficency\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\befficency\b/efficiency/g" *.tw
+$GREP "\befficent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\befficent\b/efficient/g" *.tw
+$GREP "\befficently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\befficently\b/efficiently/g" *.tw
+$GREP "\beffulence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beffulence\b/effluence/g" *.tw
+$GREP "\beiter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beiter\b/either/g" *.tw
+$GREP "\belction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belction\b/election/g" *.tw
+$GREP "\belectrial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belectrial\b/electrical/g" *.tw
+$GREP "\belectricly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belectricly\b/electrically/g" *.tw
+$GREP "\belectricty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belectricty\b/electricity/g" *.tw
+$GREP "\belementay\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belementay\b/elementary/g" *.tw
+$GREP "\beleminated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beleminated\b/eliminated/g" *.tw
+$GREP "\beleminating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beleminating\b/eliminating/g" *.tw
+$GREP "\beles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beles\b/eels/g" *.tw
+$GREP "\beletricity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beletricity\b/electricity/g" *.tw
+$GREP "\belicided\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belicided\b/elicited/g" *.tw
+$GREP "\beligable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beligable\b/eligible/g" *.tw
+$GREP "\belimentary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belimentary\b/elementary/g" *.tw
+$GREP "\bellected\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bellected\b/elected/g" *.tw
+$GREP "\belphant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\belphant\b/elephant/g" *.tw
+$GREP "\bembarass\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarass\b/embarrass/g" *.tw
+$GREP "\bembarassed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarassed\b/embarrassed/g" *.tw
+$GREP "\bembarassing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarassing\b/embarrassing/g" *.tw
+$GREP "\bembarassment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarassment\b/embarrassment/g" *.tw
+$GREP "\bembargos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembargos\b/embargoes/g" *.tw
+$GREP "\bembarras\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarras\b/embarrass/g" *.tw
+$GREP "\bembarrased\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarrased\b/embarrassed/g" *.tw
+$GREP "\bembarrasing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarrasing\b/embarrassing/g" *.tw
+$GREP "\bembarrasment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembarrasment\b/embarrassment/g" *.tw
+$GREP "\bembezelled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bembezelled\b/embezzled/g" *.tw
+$GREP "\bemblamatic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemblamatic\b/emblematic/g" *.tw
+$GREP "\beminate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beminate\b/emanate/g" *.tw
+$GREP "\beminated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beminated\b/emanated/g" *.tw
+$GREP "\bemision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemision\b/emission/g" *.tw
+$GREP "\bemited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemited\b/emitted/g" *.tw
+$GREP "\bemiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemiting\b/emitting/g" *.tw
+$GREP "\bemmediately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmediately\b/immediately/g" *.tw
+$GREP "\bemminently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemminently\b/eminently/g" *.tw
+$GREP "\bemmisaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmisaries\b/emissaries/g" *.tw
+$GREP "\bemmisarries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmisarries\b/emissaries/g" *.tw
+$GREP "\bemmisarry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmisarry\b/emissary/g" *.tw
+$GREP "\bemmisary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmisary\b/emissary/g" *.tw
+$GREP "\bemmision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmision\b/emission/g" *.tw
+$GREP "\bemmisions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmisions\b/emissions/g" *.tw
+$GREP "\bemmited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmited\b/emitted/g" *.tw
+$GREP "\bemmiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmiting\b/emitting/g" *.tw
+$GREP "\bemmitted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmitted\b/emitted/g" *.tw
+$GREP "\bemmitting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemmitting\b/emitting/g" *.tw
+$GREP "\bemnity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemnity\b/enmity/g" *.tw
+$GREP "\bemperical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemperical\b/empirical/g" *.tw
+$GREP "\bemphaised\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemphaised\b/emphasised/g" *.tw
+$GREP "\bemphsis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemphsis\b/emphasis/g" *.tw
+$GREP "\bemphysyma\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemphysyma\b/emphysema/g" *.tw
+$GREP "\bemporer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemporer\b/emperor/g" *.tw
+$GREP "\bemprisoned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bemprisoned\b/imprisoned/g" *.tw
+$GREP "\benameld\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benameld\b/enameled/g" *.tw
+$GREP "\benchancement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benchancement\b/enhancement/g" *.tw
+$GREP "\bencouraing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bencouraing\b/encouraging/g" *.tw
+$GREP "\bencryptiion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bencryptiion\b/encryption/g" *.tw
+$GREP "\bencylopedia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bencylopedia\b/encyclopedia/g" *.tw
+$GREP "\bendevors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bendevors\b/endeavors/g" *.tw
+$GREP "\bendevour\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bendevour\b/endeavour/g" *.tw
+$GREP "\bendig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bendig\b/ending/g" *.tw
+$GREP "\bendolithes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bendolithes\b/endoliths/g" *.tw
+$GREP "\benduce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benduce\b/induce/g" *.tw
+$GREP "\bened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bened\b/need/g" *.tw
+$GREP "\benforceing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benforceing\b/enforcing/g" *.tw
+$GREP "\bengagment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bengagment\b/engagement/g" *.tw
+$GREP "\bengeneer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bengeneer\b/engineer/g" *.tw
+$GREP "\bengeneering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bengeneering\b/engineering/g" *.tw
+$GREP "\bengieneer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bengieneer\b/engineer/g" *.tw
+$GREP "\bengieneers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bengieneers\b/engineers/g" *.tw
+$GREP "\benlargment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benlargment\b/enlargement/g" *.tw
+$GREP "\benlargments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benlargments\b/enlargements/g" *.tw
+$GREP "\benourmous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benourmous\b/enormous/g" *.tw
+$GREP "\benourmously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benourmously\b/enormously/g" *.tw
+$GREP "\bensconsed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bensconsed\b/ensconced/g" *.tw
+$GREP "\bentaglements\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bentaglements\b/entanglements/g" *.tw
+$GREP "\benteratinment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benteratinment\b/entertainment/g" *.tw
+$GREP "\benthusiatic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benthusiatic\b/enthusiastic/g" *.tw
+$GREP "\bentitity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bentitity\b/entity/g" *.tw
+$GREP "\bentitlied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bentitlied\b/entitled/g" *.tw
+$GREP "\bentrepeneur\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bentrepeneur\b/entrepreneur/g" *.tw
+$GREP "\bentrepeneurs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bentrepeneurs\b/entrepreneurs/g" *.tw
+$GREP "\benviorment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviorment\b/environment/g" *.tw
+$GREP "\benviormental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviormental\b/environmental/g" *.tw
+$GREP "\benviormentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviormentally\b/environmentally/g" *.tw
+$GREP "\benviorments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviorments\b/environments/g" *.tw
+$GREP "\benviornment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviornment\b/environment/g" *.tw
+$GREP "\benviornmental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviornmental\b/environmental/g" *.tw
+$GREP "\benviornmentalist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviornmentalist\b/environmentalist/g" *.tw
+$GREP "\benviornmentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviornmentally\b/environmentally/g" *.tw
+$GREP "\benviornments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviornments\b/environments/g" *.tw
+$GREP "\benviroment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviroment\b/environment/g" *.tw
+$GREP "\benviromental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviromental\b/environmental/g" *.tw
+$GREP "\benviromentalist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviromentalist\b/environmentalist/g" *.tw
+$GREP "\benviromentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviromentally\b/environmentally/g" *.tw
+$GREP "\benviroments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benviroments\b/environments/g" *.tw
+$GREP "\benvolutionary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benvolutionary\b/evolutionary/g" *.tw
+$GREP "\benvrionments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benvrionments\b/environments/g" *.tw
+$GREP "\benxt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\benxt\b/next/g" *.tw
+$GREP "\bepidsodes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bepidsodes\b/episodes/g" *.tw
+$GREP "\bepsiode\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bepsiode\b/episode/g" *.tw
+$GREP "\bequialent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequialent\b/equivalent/g" *.tw
+$GREP "\bequilibium\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequilibium\b/equilibrium/g" *.tw
+$GREP "\bequilibrum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequilibrum\b/equilibrium/g" *.tw
+$GREP "\bequiped\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequiped\b/equipped/g" *.tw
+$GREP "\bequippment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequippment\b/equipment/g" *.tw
+$GREP "\bequitorial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequitorial\b/equatorial/g" *.tw
+$GREP "\bequivelant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequivelant\b/equivalent/g" *.tw
+$GREP "\bequivelent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequivelent\b/equivalent/g" *.tw
+$GREP "\bequivilant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequivilant\b/equivalent/g" *.tw
+$GREP "\bequivilent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequivilent\b/equivalent/g" *.tw
+$GREP "\bequivlalent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bequivlalent\b/equivalent/g" *.tw
+$GREP "\beratic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beratic\b/erratic/g" *.tw
+$GREP "\beratically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beratically\b/erratically/g" *.tw
+$GREP "\beraticly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beraticly\b/erratically/g" *.tw
+$GREP "\berrupted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\berrupted\b/erupted/g" *.tw
+$GREP "\besential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\besential\b/essential/g" *.tw
+$GREP "\besitmated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\besitmated\b/estimated/g" *.tw
+$GREP "\besle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\besle\b/else/g" *.tw
+$GREP "\bespecialy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bespecialy\b/especially/g" *.tw
+$GREP "\bessencial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bessencial\b/essential/g" *.tw
+$GREP "\bessense\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bessense\b/essence/g" *.tw
+$GREP "\bessentail\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bessentail\b/essential/g" *.tw
+$GREP "\bessentialy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bessentialy\b/essentially/g" *.tw
+$GREP "\bessentual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bessentual\b/essential/g" *.tw
+$GREP "\bessesital\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bessesital\b/essential/g" *.tw
+$GREP "\bestabishes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bestabishes\b/establishes/g" *.tw
+$GREP "\bestablising\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bestablising\b/establishing/g" *.tw
+$GREP "\bethnocentricm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bethnocentricm\b/ethnocentrism/g" *.tw
+$GREP "\bEuropian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bEuropian\b/European/g" *.tw
+$GREP "\bEuropians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bEuropians\b/Europeans/g" *.tw
+$GREP "\bEurpean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bEurpean\b/European/g" *.tw
+$GREP "\bEurpoean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bEurpoean\b/European/g" *.tw
+$GREP "\bevenhtually\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bevenhtually\b/eventually/g" *.tw
+$GREP "\beventally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beventally\b/eventually/g" *.tw
+$GREP "\beventhough\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beventhough\b/even though/g" *.tw
+$GREP "\beventially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beventially\b/eventually/g" *.tw
+$GREP "\beventualy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beventualy\b/eventually/g" *.tw
+$GREP "\beverthing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beverthing\b/everything/g" *.tw
+$GREP "\beverytime\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beverytime\b/every time/g" *.tw
+$GREP "\beveryting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beveryting\b/everything/g" *.tw
+$GREP "\beveyr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\beveyr\b/every/g" *.tw
+$GREP "\bevidentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bevidentally\b/evidently/g" *.tw
+$GREP "\bexagerate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerate\b/exaggerate/g" *.tw
+$GREP "\bexagerated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerated\b/exaggerated/g" *.tw
+$GREP "\bexagerates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerates\b/exaggerates/g" *.tw
+$GREP "\bexagerating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerating\b/exaggerating/g" *.tw
+$GREP "\bexagerrate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerrate\b/exaggerate/g" *.tw
+$GREP "\bexagerrated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerrated\b/exaggerated/g" *.tw
+$GREP "\bexagerrates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerrates\b/exaggerates/g" *.tw
+$GREP "\bexagerrating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexagerrating\b/exaggerating/g" *.tw
+$GREP "\bexaminated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexaminated\b/examined/g" *.tw
+$GREP "\bexampt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexampt\b/exempt/g" *.tw
+$GREP "\bexapansion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexapansion\b/expansion/g" *.tw
+$GREP "\bexcact\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcact\b/exact/g" *.tw
+$GREP "\bexcange\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcange\b/exchange/g" *.tw
+$GREP "\bexcecute\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcecute\b/execute/g" *.tw
+$GREP "\bexcecuted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcecuted\b/executed/g" *.tw
+$GREP "\bexcecutes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcecutes\b/executes/g" *.tw
+$GREP "\bexcecuting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcecuting\b/executing/g" *.tw
+$GREP "\bexcecution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcecution\b/execution/g" *.tw
+$GREP "\bexcedded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcedded\b/exceeded/g" *.tw
+$GREP "\bexcelent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcelent\b/excellent/g" *.tw
+$GREP "\bexcell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcell\b/excel/g" *.tw
+$GREP "\bexcellance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcellance\b/excellence/g" *.tw
+$GREP "\bexcellant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcellant\b/excellent/g" *.tw
+$GREP "\bexcells\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcells\b/excels/g" *.tw
+$GREP "\bexcercise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcercise\b/exercise/g" *.tw
+$GREP "\bexchanching\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexchanching\b/exchanging/g" *.tw
+$GREP "\bexcisted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexcisted\b/existed/g" *.tw
+$GREP "\bexculsivly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexculsivly\b/exclusively/g" *.tw
+$GREP "\bexecising\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexecising\b/exercising/g" *.tw
+$GREP "\bexection\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexection\b/execution/g" *.tw
+$GREP "\bexectued\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexectued\b/executed/g" *.tw
+$GREP "\bexeedingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexeedingly\b/exceedingly/g" *.tw
+$GREP "\bexelent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexelent\b/excellent/g" *.tw
+$GREP "\bexellent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexellent\b/excellent/g" *.tw
+$GREP "\bexemple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexemple\b/example/g" *.tw
+$GREP "\bexept\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexept\b/except/g" *.tw
+$GREP "\bexeptional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexeptional\b/exceptional/g" *.tw
+$GREP "\bexerbate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexerbate\b/exacerbate/g" *.tw
+$GREP "\bexerbated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexerbated\b/exacerbated/g" *.tw
+$GREP "\bexerciese\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexerciese\b/exercises/g" *.tw
+$GREP "\bexerpt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexerpt\b/excerpt/g" *.tw
+$GREP "\bexerpts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexerpts\b/excerpts/g" *.tw
+$GREP "\bexersize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexersize\b/exercise/g" *.tw
+$GREP "\bexerternal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexerternal\b/external/g" *.tw
+$GREP "\bexhalted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexhalted\b/exalted/g" *.tw
+$GREP "\bexhibtion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexhibtion\b/exhibition/g" *.tw
+$GREP "\bexibition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexibition\b/exhibition/g" *.tw
+$GREP "\bexibitions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexibitions\b/exhibitions/g" *.tw
+$GREP "\bexicting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexicting\b/exciting/g" *.tw
+$GREP "\bexinct\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexinct\b/extinct/g" *.tw
+$GREP "\bexistance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexistance\b/existence/g" *.tw
+$GREP "\bexistant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexistant\b/existent/g" *.tw
+$GREP "\bexistince\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexistince\b/existence/g" *.tw
+$GREP "\bexliled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexliled\b/exiled/g" *.tw
+$GREP "\bexludes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexludes\b/excludes/g" *.tw
+$GREP "\bexmaple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexmaple\b/example/g" *.tw
+$GREP "\bexonorate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexonorate\b/exonerate/g" *.tw
+$GREP "\bexoskelaton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexoskelaton\b/exoskeleton/g" *.tw
+$GREP "\bexpalin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpalin\b/explain/g" *.tw
+$GREP "\bexpatriot\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpatriot\b/expatriate/g" *.tw
+$GREP "\bexpeced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpeced\b/expected/g" *.tw
+$GREP "\bexpecially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpecially\b/especially/g" *.tw
+$GREP "\bexpeditonary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpeditonary\b/expeditionary/g" *.tw
+$GREP "\bexpeiments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpeiments\b/experiments/g" *.tw
+$GREP "\bexpell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpell\b/expel/g" *.tw
+$GREP "\bexpells\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpells\b/expels/g" *.tw
+$GREP "\bexperiance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexperiance\b/experience/g" *.tw
+$GREP "\bexperianced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexperianced\b/experienced/g" *.tw
+$GREP "\bexpiditions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpiditions\b/expeditions/g" *.tw
+$GREP "\bexpierence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpierence\b/experience/g" *.tw
+$GREP "\bexplaination\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexplaination\b/explanation/g" *.tw
+$GREP "\bexplaning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexplaning\b/explaining/g" *.tw
+$GREP "\bexplictly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexplictly\b/explicitly/g" *.tw
+$GREP "\bexploititive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexploititive\b/exploitative/g" *.tw
+$GREP "\bexplotation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexplotation\b/exploitation/g" *.tw
+$GREP "\bexpropiated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpropiated\b/expropriated/g" *.tw
+$GREP "\bexpropiation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexpropiation\b/expropriation/g" *.tw
+$GREP "\bexressed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bexressed\b/expressed/g" *.tw
+$GREP "\bextemely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextemely\b/extremely/g" *.tw
+$GREP "\bextention\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextention\b/extension/g" *.tw
+$GREP "\bextentions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextentions\b/extensions/g" *.tw
+$GREP "\bextered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextered\b/exerted/g" *.tw
+$GREP "\bextermist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextermist\b/extremist/g" *.tw
+$GREP "\bextradiction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextradiction\b/extradition/g" *.tw
+$GREP "\bextraterrestial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextraterrestial\b/extraterrestrial/g" *.tw
+$GREP "\bextraterrestials\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextraterrestials\b/extraterrestrials/g" *.tw
+$GREP "\bextravagent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextravagent\b/extravagant/g" *.tw
+$GREP "\bextrememly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextrememly\b/extremely/g" *.tw
+$GREP "\bextremeophile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextremeophile\b/extremophile/g" *.tw
+$GREP "\bextremly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextremly\b/extremely/g" *.tw
+$GREP "\bextrordinarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextrordinarily\b/extraordinarily/g" *.tw
+$GREP "\bextrordinary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bextrordinary\b/extraordinary/g" *.tw
+$GREP "\bfaciliate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfaciliate\b/facilitate/g" *.tw
+$GREP "\bfaciliated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfaciliated\b/facilitated/g" *.tw
+$GREP "\bfaciliates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfaciliates\b/facilitates/g" *.tw
+$GREP "\bfacilites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfacilites\b/facilities/g" *.tw
+$GREP "\bfacillitate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfacillitate\b/facilitate/g" *.tw
+$GREP "\bfacinated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfacinated\b/fascinated/g" *.tw
+$GREP "\bfacist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfacist\b/fascist/g" *.tw
+$GREP "\bfamiles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfamiles\b/families/g" *.tw
+$GREP "\bfamilliar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfamilliar\b/familiar/g" *.tw
+$GREP "\bfamoust\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfamoust\b/famous/g" *.tw
+$GREP "\bfanatism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfanatism\b/fanaticism/g" *.tw
+$GREP "\bFarenheit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFarenheit\b/Fahrenheit/g" *.tw
+$GREP "\bfatc\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfatc\b/fact/g" *.tw
+$GREP "\bfaught\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfaught\b/fought/g" *.tw
+$GREP "\bfavoutrable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfavoutrable\b/favourable/g" *.tw
+$GREP "\bfeasable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfeasable\b/feasible/g" *.tw
+$GREP "\bFebuary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFebuary\b/February/g" *.tw
+$GREP "\bFeburary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFeburary\b/February/g" *.tw
+$GREP "\bfedreally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfedreally\b/federally/g" *.tw
+$GREP "\bfemminist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfemminist\b/feminist/g" *.tw
+$GREP "\bferomone\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bferomone\b/pheromone/g" *.tw
+$GREP "\bfertily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfertily\b/fertility/g" *.tw
+$GREP "\bfianite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfianite\b/finite/g" *.tw
+$GREP "\bfianlly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfianlly\b/finally/g" *.tw
+$GREP "\bficticious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bficticious\b/fictitious/g" *.tw
+$GREP "\bfictious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfictious\b/fictitious/g" *.tw
+$GREP "\bfidn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfidn\b/find/g" *.tw
+$GREP "\bfiercly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfiercly\b/fiercely/g" *.tw
+$GREP "\bfightings\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfightings\b/fighting/g" *.tw
+$GREP "\bfiliament\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfiliament\b/filament/g" *.tw
+$GREP "\bfimilies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfimilies\b/families/g" *.tw
+$GREP "\bfinacial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfinacial\b/financial/g" *.tw
+$GREP "\bfinaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfinaly\b/finally/g" *.tw
+$GREP "\bfinancialy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfinancialy\b/financially/g" *.tw
+$GREP "\bfirends\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfirends\b/friends/g" *.tw
+$GREP "\bfisionable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfisionable\b/fissionable/g" *.tw
+$GREP "\bflamable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bflamable\b/flammable/g" *.tw
+$GREP "\bflawess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bflawess\b/flawless/g" *.tw
+$GREP "\bFlemmish\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFlemmish\b/Flemish/g" *.tw
+$GREP "\bflorescent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bflorescent\b/fluorescent/g" *.tw
+$GREP "\bflourescent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bflourescent\b/fluorescent/g" *.tw
+$GREP "\bflourine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bflourine\b/fluorine/g" *.tw
+$GREP "\bfluorish\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfluorish\b/flourish/g" *.tw
+$GREP "\bflourishment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bflourishment\b/flourishing/g" *.tw
+$GREP "\bfollwoing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfollwoing\b/following/g" *.tw
+$GREP "\bfolowing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfolowing\b/following/g" *.tw
+$GREP "\bfomed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfomed\b/formed/g" *.tw
+$GREP "\bfonetic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfonetic\b/phonetic/g" *.tw
+$GREP "\bfontrier\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfontrier\b/fontier/g" *.tw
+$GREP "\bfoootball\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfoootball\b/football/g" *.tw
+$GREP "\bforbad\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforbad\b/forbade/g" *.tw
+$GREP "\bforbiden\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforbiden\b/forbidden/g" *.tw
+$GREP "\bforeward\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforeward\b/foreword/g" *.tw
+$GREP "\bforfiet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforfiet\b/forfeit/g" *.tw
+$GREP "\bforhead\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforhead\b/forehead/g" *.tw
+$GREP "\bforiegn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforiegn\b/foreign/g" *.tw
+$GREP "\bFormalhaut\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFormalhaut\b/Fomalhaut/g" *.tw
+$GREP "\bformallize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bformallize\b/formalize/g" *.tw
+$GREP "\bformallized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bformallized\b/formalized/g" *.tw
+$GREP "\bformelly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bformelly\b/formerly/g" *.tw
+$GREP "\bformidible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bformidible\b/formidable/g" *.tw
+$GREP "\bformost\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bformost\b/foremost/g" *.tw
+$GREP "\bforsaw\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforsaw\b/foresaw/g" *.tw
+$GREP "\bforseeable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforseeable\b/foreseeable/g" *.tw
+$GREP "\bfortelling\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfortelling\b/foretelling/g" *.tw
+$GREP "\bforunner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bforunner\b/forerunner/g" *.tw
+$GREP "\bfoucs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfoucs\b/focus/g" *.tw
+$GREP "\bfoudn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfoudn\b/found/g" *.tw
+$GREP "\bfougth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfougth\b/fought/g" *.tw
+$GREP "\bfoundaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfoundaries\b/foundries/g" *.tw
+$GREP "\bfoundary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfoundary\b/foundry/g" *.tw
+$GREP "\bFoundland\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFoundland\b/Newfoundland/g" *.tw
+$GREP "\bfourties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfourties\b/forties/g" *.tw
+$GREP "\bfourty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfourty\b/forty/g" *.tw
+$GREP "\bfouth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfouth\b/fourth/g" *.tw
+$GREP "\bfoward\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfoward\b/forward/g" *.tw
+$GREP "\bFransiscan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFransiscan\b/Franciscan/g" *.tw
+$GREP "\bFransiscans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bFransiscans\b/Franciscans/g" *.tw
+$GREP "\bfreind\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfreind\b/friend/g" *.tw
+$GREP "\bfreindly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfreindly\b/friendly/g" *.tw
+$GREP "\bfrequentily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfrequentily\b/frequently/g" *.tw
+$GREP "\bfrome\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfrome\b/from/g" *.tw
+$GREP "\bfromed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfromed\b/formed/g" *.tw
+$GREP "\bfroniter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfroniter\b/frontier/g" *.tw
+$GREP "\bfucntion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfucntion\b/function/g" *.tw
+$GREP "\bfucntioning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfucntioning\b/functioning/g" *.tw
+$GREP "\bfufill\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfufill\b/fulfill/g" *.tw
+$GREP "\bfufilled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfufilled\b/fulfilled/g" *.tw
+$GREP "\bfulfiled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfulfiled\b/fulfilled/g" *.tw
+$GREP "\bfullfill\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfullfill\b/fulfill/g" *.tw
+$GREP "\bfullfilled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfullfilled\b/fulfilled/g" *.tw
+$GREP "\bfundametal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfundametal\b/fundamental/g" *.tw
+$GREP "\bfundametals\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfundametals\b/fundamentals/g" *.tw
+$GREP "\bfunguses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfunguses\b/fungi/g" *.tw
+$GREP "\bfuntion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfuntion\b/function/g" *.tw
+$GREP "\bfuruther\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfuruther\b/further/g" *.tw
+$GREP "\bfuther\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfuther\b/further/g" *.tw
+$GREP "\bfuthermore\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bfuthermore\b/furthermore/g" *.tw
+$GREP "\bgalatic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgalatic\b/galactic/g" *.tw
+$GREP "\bGalations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGalations\b/Galatians/g" *.tw
+$GREP "\bgallaxies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgallaxies\b/galaxies/g" *.tw
+$GREP "\bgalvinized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgalvinized\b/galvanized/g" *.tw
+$GREP "\bGameboy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGameboy\b/Game Boy/g" *.tw
+$GREP "\bganerate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bganerate\b/generate/g" *.tw
+$GREP "\bganes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bganes\b/games/g" *.tw
+$GREP "\bganster\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bganster\b/gangster/g" *.tw
+$GREP "\bgarantee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgarantee\b/guarantee/g" *.tw
+$GREP "\bgaranteed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgaranteed\b/guaranteed/g" *.tw
+$GREP "\bgarantees\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgarantees\b/guarantees/g" *.tw
+$GREP "\bgardai\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgardai\b/gardaí/g" *.tw
+$GREP "\bgarnison\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgarnison\b/garrison/g" *.tw
+$GREP "\bgauarana\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgauarana\b/guaraná/g" *.tw
+$GREP "\bgaurantee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgaurantee\b/guarantee/g" *.tw
+$GREP "\bgauranteed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgauranteed\b/guaranteed/g" *.tw
+$GREP "\bgaurantees\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgaurantees\b/guarantees/g" *.tw
+$GREP "\bgaurentee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgaurentee\b/guarantee/g" *.tw
+$GREP "\bgaurenteed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgaurenteed\b/guaranteed/g" *.tw
+$GREP "\bgaurentees\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgaurentees\b/guarantees/g" *.tw
+$GREP "\bgeneological\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeneological\b/genealogical/g" *.tw
+$GREP "\bgeneologies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeneologies\b/genealogies/g" *.tw
+$GREP "\bgeneology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeneology\b/genealogy/g" *.tw
+$GREP "\bgeneraly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeneraly\b/generally/g" *.tw
+$GREP "\bgeneratting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeneratting\b/generating/g" *.tw
+$GREP "\bgenialia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgenialia\b/genitalia/g" *.tw
+$GREP "\bgeographicial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeographicial\b/geographical/g" *.tw
+$GREP "\bgeometrician\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeometrician\b/geometer/g" *.tw
+$GREP "\bgeometricians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgeometricians\b/geometers/g" *.tw
+$GREP "\bgerat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgerat\b/great/g" *.tw
+$GREP "\bGhandi\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGhandi\b/Gandhi/g" *.tw
+$GREP "\bglamourous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bglamourous\b/glamorous/g" *.tw
+$GREP "\bglight\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bglight\b/flight/g" *.tw
+$GREP "\bgnawwed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgnawwed\b/gnawed/g" *.tw
+$GREP "\bgodess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgodess\b/goddess/g" *.tw
+$GREP "\bgodesses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgodesses\b/goddesses/g" *.tw
+$GREP "\bGodounov\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGodounov\b/Godunov/g" *.tw
+$GREP "\bgoign\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgoign\b/going/g" *.tw
+$GREP "\bgonig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgonig\b/going/g" *.tw
+$GREP "\bGothenberg\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGothenberg\b/Gothenburg/g" *.tw
+$GREP "\bGottleib\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGottleib\b/Gottlieb/g" *.tw
+$GREP "\bgouvener\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgouvener\b/governor/g" *.tw
+$GREP "\bgovement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovement\b/government/g" *.tw
+$GREP "\bgovenment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovenment\b/government/g" *.tw
+$GREP "\bgovenrment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovenrment\b/government/g" *.tw
+$GREP "\bgoverance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgoverance\b/governance/g" *.tw
+$GREP "\bgoverment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgoverment\b/government/g" *.tw
+$GREP "\bgovermental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovermental\b/governmental/g" *.tw
+$GREP "\bgoverner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgoverner\b/governor/g" *.tw
+$GREP "\bgovernmnet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovernmnet\b/government/g" *.tw
+$GREP "\bgovorment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovorment\b/government/g" *.tw
+$GREP "\bgovormental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovormental\b/governmental/g" *.tw
+$GREP "\bgovornment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgovornment\b/government/g" *.tw
+$GREP "\bgracefull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgracefull\b/graceful/g" *.tw
+$GREP "\bgraet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgraet\b/great/g" *.tw
+$GREP "\bgrafitti\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgrafitti\b/graffiti/g" *.tw
+$GREP "\bgramatically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgramatically\b/grammatically/g" *.tw
+$GREP "\bgrammaticaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgrammaticaly\b/grammatically/g" *.tw
+$GREP "\bgrammer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgrammer\b/grammar/g" *.tw
+$GREP "\bgrat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgrat\b/great/g" *.tw
+$GREP "\bgratuitious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgratuitious\b/gratuitous/g" *.tw
+$GREP "\bgreatful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgreatful\b/grateful/g" *.tw
+$GREP "\bgreatfully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgreatfully\b/gratefully/g" *.tw
+$GREP "\bgreif\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgreif\b/grief/g" *.tw
+$GREP "\bgridles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgridles\b/griddles/g" *.tw
+$GREP "\bgropu\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgropu\b/group/g" *.tw
+$GREP "\bgrwo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgrwo\b/grow/g" *.tw
+$GREP "\bguage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguage\b/gauge/g" *.tw
+$GREP "\bguarentee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguarentee\b/guarantee/g" *.tw
+$GREP "\bguarenteed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguarenteed\b/guaranteed/g" *.tw
+$GREP "\bguarentees\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguarentees\b/guarantees/g" *.tw
+$GREP "\bGuatamala\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGuatamala\b/Guatemala/g" *.tw
+$GREP "\bGuatamalan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGuatamalan\b/Guatemalan/g" *.tw
+$GREP "\bguerrila\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguerrila\b/guerrilla/g" *.tw
+$GREP "\bguerrilas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguerrilas\b/guerrillas/g" *.tw
+$GREP "\bguidence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguidence\b/guidance/g" *.tw
+$GREP "\bGuilia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGuilia\b/Giulia/g" *.tw
+$GREP "\bGuilio\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGuilio\b/Giulio/g" *.tw
+$GREP "\bGuiness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGuiness\b/Guinness/g" *.tw
+$GREP "\bGuiseppe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bGuiseppe\b/Giuseppe/g" *.tw
+$GREP "\bgunanine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgunanine\b/guanine/g" *.tw
+$GREP "\bgurantee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgurantee\b/guarantee/g" *.tw
+$GREP "\bguranteed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguranteed\b/guaranteed/g" *.tw
+$GREP "\bgurantees\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgurantees\b/guarantees/g" *.tw
+$GREP "\bguttaral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bguttaral\b/guttural/g" *.tw
+$GREP "\bgutteral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bgutteral\b/guttural/g" *.tw
+$GREP "\bhabaeus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhabaeus\b/habeas/g" *.tw
+$GREP "\bhabeus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhabeus\b/habeas/g" *.tw
+$GREP "\bHabsbourg\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bHabsbourg\b/Habsburg/g" *.tw
+$GREP "\bhaemorrage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhaemorrage\b/haemorrhage/g" *.tw
+$GREP "\bhalarious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhalarious\b/hilarious/g" *.tw
+$GREP "\bhalp\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhalp\b/help/g" *.tw
+$GREP "\bhapen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhapen\b/happen/g" *.tw
+$GREP "\bhapened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhapened\b/happened/g" *.tw
+$GREP "\bhapening\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhapening\b/happening/g" *.tw
+$GREP "\bhappend\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhappend\b/happened/g" *.tw
+$GREP "\bhappended\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhappended\b/happened/g" *.tw
+$GREP "\bhappenned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhappenned\b/happened/g" *.tw
+$GREP "\bharased\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharased\b/harassed/g" *.tw
+$GREP "\bharases\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharases\b/harasses/g" *.tw
+$GREP "\bharasment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharasment\b/harassment/g" *.tw
+$GREP "\bharasments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharasments\b/harassments/g" *.tw
+$GREP "\bharassement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharassement\b/harassment/g" *.tw
+$GREP "\bharras\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharras\b/harass/g" *.tw
+$GREP "\bharrased\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrased\b/harassed/g" *.tw
+$GREP "\bharrases\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrases\b/harasses/g" *.tw
+$GREP "\bharrasing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrasing\b/harassing/g" *.tw
+$GREP "\bharrasment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrasment\b/harassment/g" *.tw
+$GREP "\bharrasments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrasments\b/harassments/g" *.tw
+$GREP "\bharrassed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrassed\b/harassed/g" *.tw
+$GREP "\bharrasses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrasses\b/harassed/g" *.tw
+$GREP "\bharrassing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrassing\b/harassing/g" *.tw
+$GREP "\bharrassment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrassment\b/harassment/g" *.tw
+$GREP "\bharrassments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bharrassments\b/harassments/g" *.tw
+$GREP "\bhasnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhasnt\b/hasn't/g" *.tw
+$GREP "\bHatian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bHatian\b/Haitian/g" *.tw
+$GREP "\bhaviest\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhaviest\b/heaviest/g" *.tw
+$GREP "\bheadquarer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheadquarer\b/headquarter/g" *.tw
+$GREP "\bheadquater\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheadquater\b/headquarter/g" *.tw
+$GREP "\bheadquatered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheadquatered\b/headquartered/g" *.tw
+$GREP "\bheadquaters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheadquaters\b/headquarters/g" *.tw
+$GREP "\bhealthercare\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhealthercare\b/healthcare/g" *.tw
+$GREP "\bheared\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheared\b/heard/g" *.tw
+$GREP "\bheathy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheathy\b/healthy/g" *.tw
+$GREP "\bHeidelburg\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bHeidelburg\b/Heidelberg/g" *.tw
+$GREP "\bheigher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheigher\b/higher/g" *.tw
+$GREP "\bheirarchy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheirarchy\b/hierarchy/g" *.tw
+$GREP "\bheiroglyphics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheiroglyphics\b/hieroglyphics/g" *.tw
+$GREP "\bhelment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhelment\b/helmet/g" *.tw
+$GREP "\bhelpfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhelpfull\b/helpful/g" *.tw
+$GREP "\bhelpped\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhelpped\b/helped/g" *.tw
+$GREP "\bhemmorhage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhemmorhage\b/hemorrhage/g" *.tw
+$GREP "\bheridity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheridity\b/heredity/g" *.tw
+$GREP "\bheroe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheroe\b/hero/g" *.tw
+$GREP "\bheros\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheros\b/heroes/g" *.tw
+$GREP "\bhertiage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhertiage\b/heritage/g" *.tw
+$GREP "\bhertzs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhertzs\b/hertz/g" *.tw
+$GREP "\bhesistant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhesistant\b/hesitant/g" *.tw
+$GREP "\bheterogenous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bheterogenous\b/heterogeneous/g" *.tw
+$GREP "\bhieght\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhieght\b/height/g" *.tw
+$GREP "\bhierachical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhierachical\b/hierarchical/g" *.tw
+$GREP "\bhierachies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhierachies\b/hierarchies/g" *.tw
+$GREP "\bhierachy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhierachy\b/hierarchy/g" *.tw
+$GREP "\bhierarcical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhierarcical\b/hierarchical/g" *.tw
+$GREP "\bhierarcy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhierarcy\b/hierarchy/g" *.tw
+$GREP "\bhieroglph\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhieroglph\b/hieroglyph/g" *.tw
+$GREP "\bhieroglphs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhieroglphs\b/hieroglyphs/g" *.tw
+$GREP "\bhiger\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhiger\b/higher/g" *.tw
+$GREP "\bhigest\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhigest\b/highest/g" *.tw
+$GREP "\bhigway\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhigway\b/highway/g" *.tw
+$GREP "\bhillarious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhillarious\b/hilarious/g" *.tw
+$GREP "\bhimselv\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhimselv\b/himself/g" *.tw
+$GREP "\bhinderance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhinderance\b/hindrance/g" *.tw
+$GREP "\bhinderence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhinderence\b/hindrance/g" *.tw
+$GREP "\bhindrence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhindrence\b/hindrance/g" *.tw
+$GREP "\bhipopotamus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhipopotamus\b/hippopotamus/g" *.tw
+$GREP "\bhismelf\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhismelf\b/himself/g" *.tw
+$GREP "\bhistocompatability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhistocompatability\b/histocompatibility/g" *.tw
+$GREP "\bhistoricians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhistoricians\b/historians/g" *.tw
+$GREP "\bhitsingles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhitsingles\b/hit singles/g" *.tw
+$GREP "\bholf\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bholf\b/hold/g" *.tw
+$GREP "\bholliday\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bholliday\b/holiday/g" *.tw
+$GREP "\bhomestate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhomestate\b/home state/g" *.tw
+$GREP "\bhomogeneize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhomogeneize\b/homogenize/g" *.tw
+$GREP "\bhomogeneized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhomogeneized\b/homogenized/g" *.tw
+$GREP "\bhonory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhonory\b/honorary/g" *.tw
+$GREP "\bhorrifing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhorrifing\b/horrifying/g" *.tw
+$GREP "\bhosited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhosited\b/hoisted/g" *.tw
+$GREP "\bhospitible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhospitible\b/hospitable/g" *.tw
+$GREP "\bhounour\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhounour\b/honour/g" *.tw
+$GREP "\bhowver\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhowver\b/however/g" *.tw
+$GREP "\bhsitorians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhsitorians\b/historians/g" *.tw
+$GREP "\bhstory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhstory\b/history/g" *.tw
+$GREP "\bhtey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhtey\b/they/g" *.tw
+$GREP "\bhtikn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhtikn\b/think/g" *.tw
+$GREP "\bhting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhting\b/thing/g" *.tw
+$GREP "\bhtink\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhtink\b/think/g" *.tw
+$GREP "\bhtis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhtis\b/this/g" *.tw
+$GREP "\bhuminoid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhuminoid\b/humanoid/g" *.tw
+$GREP "\bhumoural\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhumoural\b/humoral/g" *.tw
+$GREP "\bhumurous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhumurous\b/humorous/g" *.tw
+$GREP "\bhusban\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhusban\b/husband/g" *.tw
+$GREP "\bhvae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhvae\b/have/g" *.tw
+$GREP "\bhvaing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhvaing\b/having/g" *.tw
+$GREP "\bhwihc\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhwihc\b/which/g" *.tw
+$GREP "\bhwile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhwile\b/while/g" *.tw
+$GREP "\bhwole\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhwole\b/whole/g" *.tw
+$GREP "\bhydogen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhydogen\b/hydrogen/g" *.tw
+$GREP "\bhydropile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhydropile\b/hydrophile/g" *.tw
+$GREP "\bhydropilic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhydropilic\b/hydrophilic/g" *.tw
+$GREP "\bhydropobe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhydropobe\b/hydrophobe/g" *.tw
+$GREP "\bhydropobic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhydropobic\b/hydrophobic/g" *.tw
+$GREP "\bhygeine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhygeine\b/hygiene/g" *.tw
+$GREP "\bhyjack\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhyjack\b/hijack/g" *.tw
+$GREP "\bhyjacking\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhyjacking\b/hijacking/g" *.tw
+$GREP "\bhypocracy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhypocracy\b/hypocrisy/g" *.tw
+$GREP "\bhypocrasy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhypocrasy\b/hypocrisy/g" *.tw
+$GREP "\bhypocricy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhypocricy\b/hypocrisy/g" *.tw
+$GREP "\bhypocrit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhypocrit\b/hypocrite/g" *.tw
+$GREP "\bhypocrits\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bhypocrits\b/hypocrites/g" *.tw
+$GREP "\biconclastic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biconclastic\b/iconoclastic/g" *.tw
+$GREP "\bidaeidae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidaeidae\b/idea/g" *.tw
+$GREP "\bidaes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidaes\b/ideas/g" *.tw
+$GREP "\bidealogies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidealogies\b/ideologies/g" *.tw
+$GREP "\bidealogy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidealogy\b/ideology/g" *.tw
+$GREP "\bidenticial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidenticial\b/identical/g" *.tw
+$GREP "\bidentifers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidentifers\b/identifiers/g" *.tw
+$GREP "\bideosyncratic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bideosyncratic\b/idiosyncratic/g" *.tw
+$GREP "\bidiosyncracy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bidiosyncracy\b/idiosyncrasy/g" *.tw
+$GREP "\bIhaca\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bIhaca\b/Ithaca/g" *.tw
+$GREP "\billegimacy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\billegimacy\b/illegitimacy/g" *.tw
+$GREP "\billegitmate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\billegitmate\b/illegitimate/g" *.tw
+$GREP "\billess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\billess\b/illness/g" *.tw
+$GREP "\billiegal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\billiegal\b/illegal/g" *.tw
+$GREP "\billution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\billution\b/illusion/g" *.tw
+$GREP "\bilness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bilness\b/illness/g" *.tw
+$GREP "\bilogical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bilogical\b/illogical/g" *.tw
+$GREP "\bimagenary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimagenary\b/imaginary/g" *.tw
+$GREP "\bimagin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimagin\b/imagine/g" *.tw
+$GREP "\bimcomplete\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimcomplete\b/incomplete/g" *.tw
+$GREP "\bimediately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimediately\b/immediately/g" *.tw
+$GREP "\bimense\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimense\b/immense/g" *.tw
+$GREP "\bimmediatley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmediatley\b/immediately/g" *.tw
+$GREP "\bimmediatly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmediatly\b/immediately/g" *.tw
+$GREP "\bimmidately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmidately\b/immediately/g" *.tw
+$GREP "\bimmidiately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmidiately\b/immediately/g" *.tw
+$GREP "\bimmitate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmitate\b/imitate/g" *.tw
+$GREP "\bimmitated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmitated\b/imitated/g" *.tw
+$GREP "\bimmitating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmitating\b/imitating/g" *.tw
+$GREP "\bimmitator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmitator\b/imitator/g" *.tw
+$GREP "\bimmunosupressant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimmunosupressant\b/immunosuppressant/g" *.tw
+$GREP "\bimpecabbly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimpecabbly\b/impeccably/g" *.tw
+$GREP "\bimpedence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimpedence\b/impedance/g" *.tw
+$GREP "\bimplamenting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimplamenting\b/implementing/g" *.tw
+$GREP "\bimpliment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimpliment\b/implement/g" *.tw
+$GREP "\bimplimented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimplimented\b/implemented/g" *.tw
+$GREP "\bimploys\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimploys\b/employs/g" *.tw
+$GREP "\bimportamt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimportamt\b/important/g" *.tw
+$GREP "\bimpressario\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimpressario\b/impresario/g" *.tw
+$GREP "\bimprioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimprioned\b/imprisoned/g" *.tw
+$GREP "\bimprisonned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimprisonned\b/imprisoned/g" *.tw
+$GREP "\bimprovision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimprovision\b/improvisation/g" *.tw
+$GREP "\bimprovments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bimprovments\b/improvements/g" *.tw
+$GREP "\binablility\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binablility\b/inability/g" *.tw
+$GREP "\binaccessable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binaccessable\b/inaccessible/g" *.tw
+$GREP "\binadiquate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binadiquate\b/inadequate/g" *.tw
+$GREP "\binadquate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binadquate\b/inadequate/g" *.tw
+$GREP "\binadvertant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binadvertant\b/inadvertent/g" *.tw
+$GREP "\binadvertantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binadvertantly\b/inadvertently/g" *.tw
+$GREP "\binagurated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binagurated\b/inaugurated/g" *.tw
+$GREP "\binaguration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binaguration\b/inauguration/g" *.tw
+$GREP "\binappropiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binappropiate\b/inappropriate/g" *.tw
+$GREP "\binaugures\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binaugures\b/inaugurates/g" *.tw
+$GREP "\binbalance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binbalance\b/imbalance/g" *.tw
+$GREP "\binbalanced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binbalanced\b/imbalanced/g" *.tw
+$GREP "\binbetween\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binbetween\b/between/g" *.tw
+$GREP "\bincarcirated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincarcirated\b/incarcerated/g" *.tw
+$GREP "\bincidentially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincidentially\b/incidentally/g" *.tw
+$GREP "\bincidently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincidently\b/incidentally/g" *.tw
+$GREP "\binclreased\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binclreased\b/increased/g" *.tw
+$GREP "\binclud\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binclud\b/include/g" *.tw
+$GREP "\bincludng\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincludng\b/including/g" *.tw
+$GREP "\bincompatabilities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatabilities\b/incompatibilities/g" *.tw
+$GREP "\bincompatability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatability\b/incompatibility/g" *.tw
+$GREP "\bincompatable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatable\b/incompatible/g" *.tw
+$GREP "\bincompatablities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatablities\b/incompatibilities/g" *.tw
+$GREP "\bincompatablity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatablity\b/incompatibility/g" *.tw
+$GREP "\bincompatiblities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatiblities\b/incompatibilities/g" *.tw
+$GREP "\bincompatiblity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompatiblity\b/incompatibility/g" *.tw
+$GREP "\bincompetance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompetance\b/incompetence/g" *.tw
+$GREP "\bincompetant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincompetant\b/incompetent/g" *.tw
+$GREP "\bincomptable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincomptable\b/incompatible/g" *.tw
+$GREP "\bincomptetent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincomptetent\b/incompetent/g" *.tw
+$GREP "\binconsistant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binconsistant\b/inconsistent/g" *.tw
+$GREP "\bincoroporated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincoroporated\b/incorporated/g" *.tw
+$GREP "\bincorperation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincorperation\b/incorporation/g" *.tw
+$GREP "\bincorportaed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincorportaed\b/incorporated/g" *.tw
+$GREP "\bincorprates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincorprates\b/incorporates/g" *.tw
+$GREP "\bincorruptable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincorruptable\b/incorruptible/g" *.tw
+$GREP "\bincramentally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincramentally\b/incrementally/g" *.tw
+$GREP "\bincreadible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincreadible\b/incredible/g" *.tw
+$GREP "\bincredable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincredable\b/incredible/g" *.tw
+$GREP "\binctroduce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binctroduce\b/introduce/g" *.tw
+$GREP "\binctroduced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binctroduced\b/introduced/g" *.tw
+$GREP "\bincuding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincuding\b/including/g" *.tw
+$GREP "\bincunabla\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bincunabla\b/incunabula/g" *.tw
+$GREP "\bindefinately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindefinately\b/indefinitely/g" *.tw
+$GREP "\bindefineable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindefineable\b/undefinable/g" *.tw
+$GREP "\bindefinitly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindefinitly\b/indefinitely/g" *.tw
+$GREP "\bindentical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindentical\b/identical/g" *.tw
+$GREP "\bindepedantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindepedantly\b/independently/g" *.tw
+$GREP "\bindepedence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindepedence\b/independence/g" *.tw
+$GREP "\bindependance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindependance\b/independence/g" *.tw
+$GREP "\bindependant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindependant\b/independent/g" *.tw
+$GREP "\bindependantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindependantly\b/independently/g" *.tw
+$GREP "\bindependece\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindependece\b/independence/g" *.tw
+$GREP "\bindependendet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindependendet\b/independent/g" *.tw
+$GREP "\bindespensable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindespensable\b/indispensable/g" *.tw
+$GREP "\bindespensible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindespensible\b/indispensable/g" *.tw
+$GREP "\bindictement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindictement\b/indictment/g" *.tw
+$GREP "\bindigineous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindigineous\b/indigenous/g" *.tw
+$GREP "\bindipendence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindipendence\b/independence/g" *.tw
+$GREP "\bindipendent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindipendent\b/independent/g" *.tw
+$GREP "\bindipendently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindipendently\b/independently/g" *.tw
+$GREP "\bindispensible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindispensible\b/indispensable/g" *.tw
+$GREP "\bindisputible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindisputible\b/indisputable/g" *.tw
+$GREP "\bindisputibly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindisputibly\b/indisputably/g" *.tw
+$GREP "\bindite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindite\b/indict/g" *.tw
+$GREP "\bindividualy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindividualy\b/individually/g" *.tw
+$GREP "\bindpendent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindpendent\b/independent/g" *.tw
+$GREP "\bindpendently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindpendently\b/independently/g" *.tw
+$GREP "\bindulgue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindulgue\b/indulge/g" *.tw
+$GREP "\bindutrial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindutrial\b/industrial/g" *.tw
+$GREP "\bindviduals\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bindviduals\b/individuals/g" *.tw
+$GREP "\binefficienty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binefficienty\b/inefficiently/g" *.tw
+$GREP "\binevatible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binevatible\b/inevitable/g" *.tw
+$GREP "\binevitible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binevitible\b/inevitable/g" *.tw
+$GREP "\binevititably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binevititably\b/inevitably/g" *.tw
+$GREP "\binfalability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfalability\b/infallibility/g" *.tw
+$GREP "\binfallable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfallable\b/infallible/g" *.tw
+$GREP "\binfectuous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfectuous\b/infectious/g" *.tw
+$GREP "\binfered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfered\b/inferred/g" *.tw
+$GREP "\binfilitrate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfilitrate\b/infiltrate/g" *.tw
+$GREP "\binfilitrated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfilitrated\b/infiltrated/g" *.tw
+$GREP "\binfilitration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfilitration\b/infiltration/g" *.tw
+$GREP "\binfinit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfinit\b/infinite/g" *.tw
+$GREP "\binflamation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binflamation\b/inflammation/g" *.tw
+$GREP "\binfluencial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfluencial\b/influential/g" *.tw
+$GREP "\binfluented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfluented\b/influenced/g" *.tw
+$GREP "\binfomation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfomation\b/information/g" *.tw
+$GREP "\binformtion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binformtion\b/information/g" *.tw
+$GREP "\binfrantryman\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfrantryman\b/infantryman/g" *.tw
+$GREP "\binfrigement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binfrigement\b/infringement/g" *.tw
+$GREP "\bingenius\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bingenius\b/ingenious/g" *.tw
+$GREP "\bingreediants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bingreediants\b/ingredients/g" *.tw
+$GREP "\binhabitans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binhabitans\b/inhabitants/g" *.tw
+$GREP "\binherantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binherantly\b/inherently/g" *.tw
+$GREP "\binheritence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binheritence\b/inheritance/g" *.tw
+$GREP "\binital\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binital\b/initial/g" *.tw
+$GREP "\binitally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binitally\b/initially/g" *.tw
+$GREP "\binitation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binitation\b/initiation/g" *.tw
+$GREP "\binitiaitive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binitiaitive\b/initiative/g" *.tw
+$GREP "\binlcuding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binlcuding\b/including/g" *.tw
+$GREP "\binmigrant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binmigrant\b/immigrant/g" *.tw
+$GREP "\binmigrants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binmigrants\b/immigrants/g" *.tw
+$GREP "\binnoculated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binnoculated\b/inoculated/g" *.tw
+$GREP "\binocence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binocence\b/innocence/g" *.tw
+$GREP "\binofficial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binofficial\b/unofficial/g" *.tw
+$GREP "\binot\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binot\b/into/g" *.tw
+$GREP "\binpeach\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binpeach\b/impeach/g" *.tw
+$GREP "\binpending\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binpending\b/impending/g" *.tw
+$GREP "\binpenetrable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binpenetrable\b/impenetrable/g" *.tw
+$GREP "\binpolite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binpolite\b/impolite/g" *.tw
+$GREP "\binprisonment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binprisonment\b/imprisonment/g" *.tw
+$GREP "\binproving\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binproving\b/improving/g" *.tw
+$GREP "\binsectiverous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binsectiverous\b/insectivorous/g" *.tw
+$GREP "\binsensative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binsensative\b/insensitive/g" *.tw
+$GREP "\binseperable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binseperable\b/inseparable/g" *.tw
+$GREP "\binsistance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binsistance\b/insistence/g" *.tw
+$GREP "\binsitution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binsitution\b/institution/g" *.tw
+$GREP "\binsitutions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binsitutions\b/institutions/g" *.tw
+$GREP "\binstade\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstade\b/instead/g" *.tw
+$GREP "\binstatance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstatance\b/instance/g" *.tw
+$GREP "\binstitue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstitue\b/institute/g" *.tw
+$GREP "\binstuction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstuction\b/instruction/g" *.tw
+$GREP "\binstuments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstuments\b/instruments/g" *.tw
+$GREP "\binstutionalized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstutionalized\b/institutionalized/g" *.tw
+$GREP "\binstutions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binstutions\b/intuitions/g" *.tw
+$GREP "\binsurence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binsurence\b/insurance/g" *.tw
+$GREP "\bintelectual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintelectual\b/intellectual/g" *.tw
+$GREP "\binteligence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binteligence\b/intelligence/g" *.tw
+$GREP "\binteligent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binteligent\b/intelligent/g" *.tw
+$GREP "\bintenational\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintenational\b/international/g" *.tw
+$GREP "\bintepretation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintepretation\b/interpretation/g" *.tw
+$GREP "\bintepretator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintepretator\b/interpretor/g" *.tw
+$GREP "\binterational\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterational\b/international/g" *.tw
+$GREP "\binterchangable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterchangable\b/interchangeable/g" *.tw
+$GREP "\binterchangably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterchangably\b/interchangeably/g" *.tw
+$GREP "\bintercontinential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintercontinential\b/intercontinental/g" *.tw
+$GREP "\bintercontinetal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintercontinetal\b/intercontinental/g" *.tw
+$GREP "\binterelated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterelated\b/interrelated/g" *.tw
+$GREP "\binterferance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterferance\b/interference/g" *.tw
+$GREP "\binterfereing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterfereing\b/interfering/g" *.tw
+$GREP "\bintergrated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintergrated\b/integrated/g" *.tw
+$GREP "\bintergration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintergration\b/integration/g" *.tw
+$GREP "\binterm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterm\b/interim/g" *.tw
+$GREP "\binternation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binternation\b/international/g" *.tw
+$GREP "\binterpet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterpet\b/interpret/g" *.tw
+$GREP "\binterrim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterrim\b/interim/g" *.tw
+$GREP "\binterrugum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterrugum\b/interregnum/g" *.tw
+$GREP "\bintertaining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintertaining\b/entertaining/g" *.tw
+$GREP "\binterupt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binterupt\b/interrupt/g" *.tw
+$GREP "\bintervines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintervines\b/intervenes/g" *.tw
+$GREP "\bintevene\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintevene\b/intervene/g" *.tw
+$GREP "\bintial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintial\b/initial/g" *.tw
+$GREP "\bintially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintially\b/initially/g" *.tw
+$GREP "\bintrduced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintrduced\b/introduced/g" *.tw
+$GREP "\bintrest\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintrest\b/interest/g" *.tw
+$GREP "\bintrodued\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintrodued\b/introduced/g" *.tw
+$GREP "\bintruduced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintruduced\b/introduced/g" *.tw
+$GREP "\bintrument\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintrument\b/instrument/g" *.tw
+$GREP "\bintrumental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintrumental\b/instrumental/g" *.tw
+$GREP "\bintruments\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintruments\b/instruments/g" *.tw
+$GREP "\bintrusted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintrusted\b/entrusted/g" *.tw
+$GREP "\bintutive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintutive\b/intuitive/g" *.tw
+$GREP "\bintutively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bintutively\b/intuitively/g" *.tw
+$GREP "\binudstry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binudstry\b/industry/g" *.tw
+$GREP "\binventer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binventer\b/inventor/g" *.tw
+$GREP "\binvertibrates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binvertibrates\b/invertebrates/g" *.tw
+$GREP "\binvestingate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binvestingate\b/investigate/g" *.tw
+$GREP "\binvolvment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\binvolvment\b/involvement/g" *.tw
+$GREP "\birelevent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\birelevent\b/irrelevant/g" *.tw
+$GREP "\biresistable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biresistable\b/irresistible/g" *.tw
+$GREP "\biresistably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biresistably\b/irresistibly/g" *.tw
+$GREP "\biresistible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biresistible\b/irresistible/g" *.tw
+$GREP "\biresistibly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biresistibly\b/irresistibly/g" *.tw
+$GREP "\biritable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biritable\b/irritable/g" *.tw
+$GREP "\biritated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biritated\b/irritated/g" *.tw
+$GREP "\bironicly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bironicly\b/ironically/g" *.tw
+$GREP "\birregardless\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\birregardless\b/regardless/g" *.tw
+$GREP "\birrelevent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\birrelevent\b/irrelevant/g" *.tw
+$GREP "\birreplacable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\birreplacable\b/irreplaceable/g" *.tw
+$GREP "\birresistable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\birresistable\b/irresistible/g" *.tw
+$GREP "\birresistably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\birresistably\b/irresistibly/g" *.tw
+$GREP "\bisnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bisnt\b/isn't/g" *.tw
+$GREP "\bIsraelies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bIsraelies\b/Israelis/g" *.tw
+$GREP "\bissueing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bissueing\b/issuing/g" *.tw
+$GREP "\bitnroduced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bitnroduced\b/introduced/g" *.tw
+$GREP "\biunior\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biunior\b/junior/g" *.tw
+$GREP "\biwll\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biwll\b/will/g" *.tw
+$GREP "\biwth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\biwth\b/with/g" *.tw
+$GREP "\bJanurary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJanurary\b/January/g" *.tw
+$GREP "\bJanuray\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJanuray\b/January/g" *.tw
+$GREP "\bJapanes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJapanes\b/Japanese/g" *.tw
+$GREP "\bjaques\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjaques\b/jacques/g" *.tw
+$GREP "\bjeapardy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjeapardy\b/jeopardy/g" *.tw
+$GREP "\bjewllery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjewllery\b/jewellery/g" *.tw
+$GREP "\bJohanine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJohanine\b/Johannine/g" *.tw
+$GREP "\bjorunal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjorunal\b/journal/g" *.tw
+$GREP "\bJospeh\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJospeh\b/Joseph/g" *.tw
+$GREP "\bjouney\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjouney\b/journey/g" *.tw
+$GREP "\bjournied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjournied\b/journeyed/g" *.tw
+$GREP "\bjournies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjournies\b/journeys/g" *.tw
+$GREP "\bjstu\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjstu\b/just/g" *.tw
+$GREP "\bjsut\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjsut\b/just/g" *.tw
+$GREP "\bJuadaism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJuadaism\b/Judaism/g" *.tw
+$GREP "\bJuadism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bJuadism\b/Judaism/g" *.tw
+$GREP "\bjudical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjudical\b/judicial/g" *.tw
+$GREP "\bjudisuary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjudisuary\b/judiciary/g" *.tw
+$GREP "\bjuducial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjuducial\b/judicial/g" *.tw
+$GREP "\bjuristiction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjuristiction\b/jurisdiction/g" *.tw
+$GREP "\bjuristictions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bjuristictions\b/jurisdictions/g" *.tw
+$GREP "\bkindergarden\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bkindergarden\b/kindergarten/g" *.tw
+$GREP "\bklenex\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bklenex\b/kleenex/g" *.tw
+$GREP "\bknifes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bknifes\b/knives/g" *.tw
+$GREP "\bknive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bknive\b/knife/g" *.tw
+$GREP "\bknowlege\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bknowlege\b/knowledge/g" *.tw
+$GREP "\bknowlegeable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bknowlegeable\b/knowledgeable/g" *.tw
+$GREP "\bknwo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bknwo\b/know/g" *.tw
+$GREP "\bknwos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bknwos\b/knows/g" *.tw
+$GREP "\bkonw\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bkonw\b/know/g" *.tw
+$GREP "\bkonws\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bkonws\b/knows/g" *.tw
+$GREP "\bkwno\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bkwno\b/know/g" *.tw
+$GREP "\blabratory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blabratory\b/laboratory/g" *.tw
+$GREP "\blaguage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blaguage\b/language/g" *.tw
+$GREP "\blaguages\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blaguages\b/languages/g" *.tw
+$GREP "\blarg\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blarg\b/large/g" *.tw
+$GREP "\blargst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blargst\b/largest/g" *.tw
+$GREP "\blarrry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blarrry\b/larry/g" *.tw
+$GREP "\blastr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blastr\b/last/g" *.tw
+$GREP "\blattitude\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blattitude\b/latitude/g" *.tw
+$GREP "\blaunhed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blaunhed\b/launched/g" *.tw
+$GREP "\blavae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blavae\b/larvae/g" *.tw
+$GREP "\blayed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blayed\b/laid/g" *.tw
+$GREP "\blazyness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blazyness\b/laziness/g" *.tw
+$GREP "\bleage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bleage\b/league/g" *.tw
+$GREP "\bleathal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bleathal\b/lethal/g" *.tw
+$GREP "\blefted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blefted\b/left/g" *.tw
+$GREP "\blegitamate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blegitamate\b/legitimate/g" *.tw
+$GREP "\blegitmate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blegitmate\b/legitimate/g" *.tw
+$GREP "\bleibnitz\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bleibnitz\b/leibniz/g" *.tw
+$GREP "\blenght\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blenght\b/length/g" *.tw
+$GREP "\bleran\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bleran\b/learn/g" *.tw
+$GREP "\blerans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blerans\b/learns/g" *.tw
+$GREP "\bleutenant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bleutenant\b/lieutenant/g" *.tw
+$GREP "\blevetate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blevetate\b/levitate/g" *.tw
+$GREP "\blevetated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blevetated\b/levitated/g" *.tw
+$GREP "\blevetates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blevetates\b/levitates/g" *.tw
+$GREP "\blevetating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blevetating\b/levitating/g" *.tw
+$GREP "\blevle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blevle\b/level/g" *.tw
+$GREP "\bliasion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliasion\b/liaison/g" *.tw
+$GREP "\bliason\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliason\b/liaison/g" *.tw
+$GREP "\bliasons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliasons\b/liaisons/g" *.tw
+$GREP "\blibary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blibary\b/library/g" *.tw
+$GREP "\blibell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blibell\b/libel/g" *.tw
+$GREP "\blibguistic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blibguistic\b/linguistic/g" *.tw
+$GREP "\blibguistics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blibguistics\b/linguistics/g" *.tw
+$GREP "\blibitarianisn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blibitarianisn\b/libertarianism/g" *.tw
+$GREP "\blieing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blieing\b/lying/g" *.tw
+$GREP "\bliek\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliek\b/like/g" *.tw
+$GREP "\bliekd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliekd\b/liked/g" *.tw
+$GREP "\bliesure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliesure\b/leisure/g" *.tw
+$GREP "\blieuenant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blieuenant\b/lieutenant/g" *.tw
+$GREP "\blieved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blieved\b/lived/g" *.tw
+$GREP "\bliftime\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliftime\b/lifetime/g" *.tw
+$GREP "\blightyear\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blightyear\b/light year/g" *.tw
+$GREP "\blightyears\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blightyears\b/light years/g" *.tw
+$GREP "\blikelyhood\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blikelyhood\b/likelihood/g" *.tw
+$GREP "\blinnaena\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blinnaena\b/linnaean/g" *.tw
+$GREP "\blippizaner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blippizaner\b/lipizzaner/g" *.tw
+$GREP "\bliquify\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliquify\b/liquefy/g" *.tw
+$GREP "\blistners\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blistners\b/listeners/g" *.tw
+$GREP "\blitature\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blitature\b/literature/g" *.tw
+$GREP "\bliteraly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliteraly\b/literally/g" *.tw
+$GREP "\bliterture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliterture\b/literature/g" *.tw
+$GREP "\blittel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blittel\b/little/g" *.tw
+$GREP "\blitterally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blitterally\b/literally/g" *.tw
+$GREP "\bliuke\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bliuke\b/like/g" *.tw
+$GREP "\blivley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blivley\b/lively/g" *.tw
+$GREP "\blmits\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blmits\b/limits/g" *.tw
+$GREP "\bloev\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bloev\b/love/g" *.tw
+$GREP "\blonelyness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blonelyness\b/loneliness/g" *.tw
+$GREP "\blongitudonal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blongitudonal\b/longitudinal/g" *.tw
+$GREP "\blonley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blonley\b/lonely/g" *.tw
+$GREP "\bloosing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bloosing\b/losing/g" *.tw
+$GREP "\blotharingen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blotharingen\b/lothringen/g" *.tw
+$GREP "\blsat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blsat\b/last/g" *.tw
+$GREP "\blukid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blukid\b/likud/g" *.tw
+$GREP "\blveo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blveo\b/love/g" *.tw
+$GREP "\blvoe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\blvoe\b/love/g" *.tw
+$GREP "\bLybia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bLybia\b/Libya/g" *.tw
+$GREP "\bmackeral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmackeral\b/mackerel/g" *.tw
+$GREP "\bmagasine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmagasine\b/magazine/g" *.tw
+$GREP "\bmagizine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmagizine\b/magazine/g" *.tw
+$GREP "\bmagisine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmagisine\b/magazine/g" *.tw
+$GREP "\bmagincian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmagincian\b/magician/g" *.tw
+$GREP "\bmagnificient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmagnificient\b/magnificent/g" *.tw
+$GREP "\bmagolia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmagolia\b/magnolia/g" *.tw
+$GREP "\bmailny\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmailny\b/mainly/g" *.tw
+$GREP "\bmaintainance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaintainance\b/maintenance/g" *.tw
+$GREP "\bmaintainence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaintainence\b/maintenance/g" *.tw
+$GREP "\bmaintance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaintance\b/maintenance/g" *.tw
+$GREP "\bmaintenence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaintenence\b/maintenance/g" *.tw
+$GREP "\bmaintinaing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaintinaing\b/maintaining/g" *.tw
+$GREP "\bmaintioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaintioned\b/mentioned/g" *.tw
+$GREP "\bmajoroty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmajoroty\b/majority/g" *.tw
+$GREP "\bmakse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmakse\b/makes/g" *.tw
+$GREP "\bMalcom\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMalcom\b/Malcolm/g" *.tw
+$GREP "\bmaltesian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaltesian\b/Maltese/g" *.tw
+$GREP "\bmamal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmamal\b/mammal/g" *.tw
+$GREP "\bmamalian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmamalian\b/mammalian/g" *.tw
+$GREP "\bmanagment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanagment\b/management/g" *.tw
+$GREP "\bmaneouvre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaneouvre\b/manoeuvre/g" *.tw
+$GREP "\bmaneouvred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaneouvred\b/manoeuvred/g" *.tw
+$GREP "\bmaneouvres\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaneouvres\b/manoeuvres/g" *.tw
+$GREP "\bmaneouvring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmaneouvring\b/manoeuvring/g" *.tw
+$GREP "\bmanisfestations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanisfestations\b/manifestations/g" *.tw
+$GREP "\bmanoeuverability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanoeuverability\b/maneuverability/g" *.tw
+$GREP "\bmantained\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmantained\b/maintained/g" *.tw
+$GREP "\bmanufacturedd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanufacturedd\b/manufactured/g" *.tw
+$GREP "\bmanufature\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanufature\b/manufacture/g" *.tw
+$GREP "\bmanufatured\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanufatured\b/manufactured/g" *.tw
+$GREP "\bmanufaturing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanufaturing\b/manufacturing/g" *.tw
+$GREP "\bmanuver\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmanuver\b/maneuver/g" *.tw
+$GREP "\bmariage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmariage\b/marriage/g" *.tw
+$GREP "\bmarjority\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarjority\b/majority/g" *.tw
+$GREP "\bmarkes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarkes\b/marks/g" *.tw
+$GREP "\bmarketting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarketting\b/marketing/g" *.tw
+$GREP "\bmarmelade\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarmelade\b/marmalade/g" *.tw
+$GREP "\bmarrage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarrage\b/marriage/g" *.tw
+$GREP "\bmarraige\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarraige\b/marriage/g" *.tw
+$GREP "\bmarrtyred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarrtyred\b/martyred/g" *.tw
+$GREP "\bmarryied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmarryied\b/married/g" *.tw
+$GREP "\bMassachussets\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMassachussets\b/Massachusetts/g" *.tw
+$GREP "\bMassachussetts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMassachussetts\b/Massachusetts/g" *.tw
+$GREP "\bmassmedia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmassmedia\b/mass media/g" *.tw
+$GREP "\bmasterbation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmasterbation\b/masturbation/g" *.tw
+$GREP "\bmataphysical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmataphysical\b/metaphysical/g" *.tw
+$GREP "\bmateralists\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmateralists\b/materialist/g" *.tw
+$GREP "\bmathamatics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmathamatics\b/mathematics/g" *.tw
+$GREP "\bmathematican\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmathematican\b/mathematician/g" *.tw
+$GREP "\bmathematicas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmathematicas\b/mathematics/g" *.tw
+$GREP "\bmatheticians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmatheticians\b/mathematicians/g" *.tw
+$GREP "\bmathmatically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmathmatically\b/mathematically/g" *.tw
+$GREP "\bmathmatician\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmathmatician\b/mathematician/g" *.tw
+$GREP "\bmathmaticians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmathmaticians\b/mathematicians/g" *.tw
+$GREP "\bmccarthyst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmccarthyst\b/mccarthyist/g" *.tw
+$GREP "\bmchanics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmchanics\b/mechanics/g" *.tw
+$GREP "\bmeaninng\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmeaninng\b/meaning/g" *.tw
+$GREP "\bmechandise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmechandise\b/merchandise/g" *.tw
+$GREP "\bmedacine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmedacine\b/medicine/g" *.tw
+$GREP "\bmedeival\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmedeival\b/medieval/g" *.tw
+$GREP "\bmedevial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmedevial\b/medieval/g" *.tw
+$GREP "\bmediciney\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmediciney\b/mediciny/g" *.tw
+$GREP "\bmedievel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmedievel\b/medieval/g" *.tw
+$GREP "\bmediterainnean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmediterainnean\b/mediterranean/g" *.tw
+$GREP "\bMediteranean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMediteranean\b/Mediterranean/g" *.tw
+$GREP "\bmeerkrat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmeerkrat\b/meerkat/g" *.tw
+$GREP "\bmelieux\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmelieux\b/milieux/g" *.tw
+$GREP "\bmembranaphone\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmembranaphone\b/membranophone/g" *.tw
+$GREP "\bmemeber\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmemeber\b/member/g" *.tw
+$GREP "\bmenally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmenally\b/mentally/g" *.tw
+$GREP "\bmercentile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmercentile\b/mercantile/g" *.tw
+$GREP "\bmessanger\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmessanger\b/messenger/g" *.tw
+$GREP "\bmessenging\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmessenging\b/messaging/g" *.tw
+$GREP "\bmetalic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmetalic\b/metallic/g" *.tw
+$GREP "\bmetalurgic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmetalurgic\b/metallurgic/g" *.tw
+$GREP "\bmetalurgical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmetalurgical\b/metallurgical/g" *.tw
+$GREP "\bmetalurgy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmetalurgy\b/metallurgy/g" *.tw
+$GREP "\bmetamorphysis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmetamorphysis\b/metamorphosis/g" *.tw
+$GREP "\bmetaphoricial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmetaphoricial\b/metaphorical/g" *.tw
+$GREP "\bmeterologist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmeterologist\b/meteorologist/g" *.tw
+$GREP "\bmeterology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmeterology\b/meteorology/g" *.tw
+$GREP "\bmethaphor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmethaphor\b/metaphor/g" *.tw
+$GREP "\bmethaphors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmethaphors\b/metaphors/g" *.tw
+$GREP "\bMichagan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMichagan\b/Michigan/g" *.tw
+$GREP "\bmicoscopy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmicoscopy\b/microscopy/g" *.tw
+$GREP "\bmidwifes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmidwifes\b/midwives/g" *.tw
+$GREP "\bmileau\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmileau\b/milieu/g" *.tw
+$GREP "\bmilennia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmilennia\b/millennia/g" *.tw
+$GREP "\bmilennium\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmilennium\b/millennium/g" *.tw
+$GREP "\bmileu\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmileu\b/milieu/g" *.tw
+$GREP "\bmiliary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiliary\b/military/g" *.tw
+$GREP "\bmiligram\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiligram\b/milligram/g" *.tw
+$GREP "\bmilion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmilion\b/million/g" *.tw
+$GREP "\bmiliraty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiliraty\b/military/g" *.tw
+$GREP "\bmillenia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillenia\b/millennia/g" *.tw
+$GREP "\bmillenial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillenial\b/millennial/g" *.tw
+$GREP "\bmillenialism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillenialism\b/millennialism/g" *.tw
+$GREP "\bmillenium\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillenium\b/millennium/g" *.tw
+$GREP "\bmillepede\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillepede\b/millipede/g" *.tw
+$GREP "\bmillioniare\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillioniare\b/millionaire/g" *.tw
+$GREP "\bmillitant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillitant\b/militant/g" *.tw
+$GREP "\bmillitary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillitary\b/military/g" *.tw
+$GREP "\bmillon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmillon\b/million/g" *.tw
+$GREP "\bmiltary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiltary\b/military/g" *.tw
+$GREP "\bminature\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bminature\b/miniature/g" *.tw
+$GREP "\bminerial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bminerial\b/mineral/g" *.tw
+$GREP "\bministery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bministery\b/ministry/g" *.tw
+$GREP "\bminsitry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bminsitry\b/ministry/g" *.tw
+$GREP "\bminstries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bminstries\b/ministries/g" *.tw
+$GREP "\bminstry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bminstry\b/ministry/g" *.tw
+$GREP "\bminumum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bminumum\b/minimum/g" *.tw
+$GREP "\bmirrorred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmirrorred\b/mirrored/g" *.tw
+$GREP "\bmiscelaneous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiscelaneous\b/miscellaneous/g" *.tw
+$GREP "\bmiscellanious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiscellanious\b/miscellaneous/g" *.tw
+$GREP "\bmiscellanous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmiscellanous\b/miscellaneous/g" *.tw
+$GREP "\bmischeivous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmischeivous\b/mischievous/g" *.tw
+$GREP "\bmischevious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmischevious\b/mischievous/g" *.tw
+$GREP "\bmischievious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmischievious\b/mischievous/g" *.tw
+$GREP "\bmisdameanor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisdameanor\b/misdemeanor/g" *.tw
+$GREP "\bmisdameanors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisdameanors\b/misdemeanors/g" *.tw
+$GREP "\bmisdemenor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisdemenor\b/misdemeanor/g" *.tw
+$GREP "\bmisdemenors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisdemenors\b/misdemeanors/g" *.tw
+$GREP "\bmisfourtunes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisfourtunes\b/misfortunes/g" *.tw
+$GREP "\bmisile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisile\b/missile/g" *.tw
+$GREP "\bMisouri\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMisouri\b/Missouri/g" *.tw
+$GREP "\bmispell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmispell\b/misspell/g" *.tw
+$GREP "\bmispelled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmispelled\b/misspelled/g" *.tw
+$GREP "\bmispelling\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmispelling\b/misspelling/g" *.tw
+$GREP "\bmissen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmissen\b/mizzen/g" *.tw
+$GREP "\bMissisipi\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMissisipi\b/Mississippi/g" *.tw
+$GREP "\bMissisippi\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMissisippi\b/Mississippi/g" *.tw
+$GREP "\bmissle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmissle\b/missile/g" *.tw
+$GREP "\bmissonary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmissonary\b/missionary/g" *.tw
+$GREP "\bmisterious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisterious\b/mysterious/g" *.tw
+$GREP "\bmistery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmistery\b/mystery/g" *.tw
+$GREP "\bmisteryous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmisteryous\b/mysterious/g" *.tw
+$GREP "\bmkae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmkae\b/make/g" *.tw
+$GREP "\bmkaes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmkaes\b/makes/g" *.tw
+$GREP "\bmkaing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmkaing\b/making/g" *.tw
+$GREP "\bmkea\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmkea\b/make/g" *.tw
+$GREP "\bmoderm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmoderm\b/modem/g" *.tw
+$GREP "\bmodle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmodle\b/model/g" *.tw
+$GREP "\bmoent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmoent\b/moment/g" *.tw
+$GREP "\bmoeny\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmoeny\b/money/g" *.tw
+$GREP "\bmohammedans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmohammedans\b/muslims/g" *.tw
+$GREP "\bmoil\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmoil\b/mohel/g" *.tw
+$GREP "\bmoil\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmoil\b/soil/g" *.tw
+$GREP "\bmoleclues\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmoleclues\b/molecules/g" *.tw
+$GREP "\bmomento\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmomento\b/memento/g" *.tw
+$GREP "\bmonestaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmonestaries\b/monasteries/g" *.tw
+$GREP "\bmonickers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmonickers\b/monikers/g" *.tw
+$GREP "\bmonolite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmonolite\b/monolithic/g" *.tw
+$GREP "\bmontains\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmontains\b/mountains/g" *.tw
+$GREP "\bmontanous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmontanous\b/mountainous/g" *.tw
+$GREP "\bMontnana\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMontnana\b/Montana/g" *.tw
+$GREP "\bmonts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmonts\b/months/g" *.tw
+$GREP "\bmontypic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmontypic\b/monotypic/g" *.tw
+$GREP "\bmorgage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmorgage\b/mortgage/g" *.tw
+$GREP "\bMorisette\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMorisette\b/Morissette/g" *.tw
+$GREP "\bMorrisette\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMorrisette\b/Morissette/g" *.tw
+$GREP "\bmorroccan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmorroccan\b/moroccan/g" *.tw
+$GREP "\bmorrocco\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmorrocco\b/morocco/g" *.tw
+$GREP "\bmorroco\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmorroco\b/morocco/g" *.tw
+$GREP "\bmortage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmortage\b/mortgage/g" *.tw
+$GREP "\bmosture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmosture\b/moisture/g" *.tw
+$GREP "\bmotiviated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmotiviated\b/motivated/g" *.tw
+$GREP "\bmounth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmounth\b/month/g" *.tw
+$GREP "\bmovei\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmovei\b/movie/g" *.tw
+$GREP "\bmovment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmovment\b/movement/g" *.tw
+$GREP "\bmroe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmroe\b/more/g" *.tw
+$GREP "\bmucuous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmucuous\b/mucous/g" *.tw
+$GREP "\bmuder\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuder\b/murder/g" *.tw
+$GREP "\bmudering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmudering\b/murdering/g" *.tw
+$GREP "\bmuhammadan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuhammadan\b/muslim/g" *.tw
+$GREP "\bmulticultralism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmulticultralism\b/multiculturalism/g" *.tw
+$GREP "\bmultipled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmultipled\b/multiplied/g" *.tw
+$GREP "\bmultiplers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmultiplers\b/multipliers/g" *.tw
+$GREP "\bmunbers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmunbers\b/numbers/g" *.tw
+$GREP "\bmuncipalities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuncipalities\b/municipalities/g" *.tw
+$GREP "\bmuncipality\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuncipality\b/municipality/g" *.tw
+$GREP "\bmunnicipality\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmunnicipality\b/municipality/g" *.tw
+$GREP "\bmuscial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuscial\b/musical/g" *.tw
+$GREP "\bmuscician\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuscician\b/musician/g" *.tw
+$GREP "\bmuscicians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmuscicians\b/musicians/g" *.tw
+$GREP "\bmutiliated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmutiliated\b/mutilated/g" *.tw
+$GREP "\bmyraid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmyraid\b/myriad/g" *.tw
+$GREP "\bmysef\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmysef\b/myself/g" *.tw
+$GREP "\bmysogynist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmysogynist\b/misogynist/g" *.tw
+$GREP "\bmysogyny\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmysogyny\b/misogyny/g" *.tw
+$GREP "\bmysterous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bmysterous\b/mysterious/g" *.tw
+$GREP "\bMythraic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bMythraic\b/Mithraic/g" *.tw
+$GREP "\bnaieve\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnaieve\b/naive/g" *.tw
+$GREP "\bNaploeon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNaploeon\b/Napoleon/g" *.tw
+$GREP "\bNapolean\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNapolean\b/Napoleon/g" *.tw
+$GREP "\bNapoleonian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNapoleonian\b/Napoleonic/g" *.tw
+$GREP "\bnaturaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnaturaly\b/naturally/g" *.tw
+$GREP "\bnaturely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnaturely\b/naturally/g" *.tw
+$GREP "\bnaturual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnaturual\b/natural/g" *.tw
+$GREP "\bnaturually\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnaturually\b/naturally/g" *.tw
+$GREP "\bNazereth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNazereth\b/Nazareth/g" *.tw
+$GREP "\bneccesarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneccesarily\b/necessarily/g" *.tw
+$GREP "\bneccesary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneccesary\b/necessary/g" *.tw
+$GREP "\bneccessarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneccessarily\b/necessarily/g" *.tw
+$GREP "\bneccessary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneccessary\b/necessary/g" *.tw
+$GREP "\bneccessities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneccessities\b/necessities/g" *.tw
+$GREP "\bnecesarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnecesarily\b/necessarily/g" *.tw
+$GREP "\bnecesary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnecesary\b/necessary/g" *.tw
+$GREP "\bnecessiate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnecessiate\b/necessitate/g" *.tw
+$GREP "\bneglible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneglible\b/negligible/g" *.tw
+$GREP "\bnegligable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnegligable\b/negligible/g" *.tw
+$GREP "\bnegociate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnegociate\b/negotiate/g" *.tw
+$GREP "\bnegociation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnegociation\b/negotiation/g" *.tw
+$GREP "\bnegociations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnegociations\b/negotiations/g" *.tw
+$GREP "\bnegotation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnegotation\b/negotiation/g" *.tw
+$GREP "\bneigborhood\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneigborhood\b/neighborhood/g" *.tw
+$GREP "\bneigbourhood\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneigbourhood\b/neighbourhood/g" *.tw
+$GREP "\bneolitic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneolitic\b/neolithic/g" *.tw
+$GREP "\bnessasarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnessasarily\b/necessarily/g" *.tw
+$GREP "\bnessecary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnessecary\b/necessary/g" *.tw
+$GREP "\bnestin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnestin\b/nesting/g" *.tw
+$GREP "\bneverthless\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bneverthless\b/nevertheless/g" *.tw
+$GREP "\bnewletters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnewletters\b/newsletters/g" *.tw
+$GREP "\bnickle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnickle\b/nickel/g" *.tw
+$GREP "\bnightfa;;\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnightfa;;\b/nightfall/g" *.tw
+$GREP "\bnightime\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnightime\b/nighttime/g" *.tw
+$GREP "\bnineth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnineth\b/ninth/g" *.tw
+$GREP "\bninteenth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bninteenth\b/nineteenth/g" *.tw
+$GREP "\bninties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bninties\b/1990s/g" *.tw
+$GREP "\bninty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bninty\b/ninety/g" *.tw
+$GREP "\bnkow\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnkow\b/know/g" *.tw
+$GREP "\bnkwo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnkwo\b/know/g" *.tw
+$GREP "\bnmae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnmae\b/name/g" *.tw
+$GREP "\bnoncombatents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoncombatents\b/noncombatants/g" *.tw
+$GREP "\bnonsence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnonsence\b/nonsense/g" *.tw
+$GREP "\bnontheless\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnontheless\b/nonetheless/g" *.tw
+$GREP "\bnoone\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoone\b/no one/g" *.tw
+$GREP "\bnorhern\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnorhern\b/northern/g" *.tw
+$GREP "\bnorthen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnorthen\b/northern/g" *.tw
+$GREP "\bnorthereastern\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnorthereastern\b/northeastern/g" *.tw
+$GREP "\bnotabley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnotabley\b/notably/g" *.tw
+$GREP "\bnoteable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoteable\b/notable/g" *.tw
+$GREP "\bnoteably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoteably\b/notably/g" *.tw
+$GREP "\bnoteriety\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoteriety\b/notoriety/g" *.tw
+$GREP "\bnoth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoth\b/north/g" *.tw
+$GREP "\bnothern\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnothern\b/northern/g" *.tw
+$GREP "\bnoticable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoticable\b/noticeable/g" *.tw
+$GREP "\bnoticably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoticably\b/noticeably/g" *.tw
+$GREP "\bnoticeing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoticeing\b/noticing/g" *.tw
+$GREP "\bnoticible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoticible\b/noticeable/g" *.tw
+$GREP "\bnotwhithstanding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnotwhithstanding\b/notwithstanding/g" *.tw
+$GREP "\bnoveau\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnoveau\b/nouveau/g" *.tw
+$GREP "\bNovermber\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNovermber\b/November/g" *.tw
+$GREP "\bnowdays\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnowdays\b/nowadays/g" *.tw
+$GREP "\bnowe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnowe\b/now/g" *.tw
+$GREP "\bnto\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnto\b/not/g" *.tw
+$GREP "\bnucular\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnucular\b/nuclear/g" *.tw
+$GREP "\bnuculear\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnuculear\b/nuclear/g" *.tw
+$GREP "\bnuisanse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnuisanse\b/nuisance/g" *.tw
+$GREP "\bNullabour\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNullabour\b/Nullarbor/g" *.tw
+$GREP "\bnumberous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnumberous\b/numerous/g" *.tw
+$GREP "\bNuremburg\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bNuremburg\b/Nuremberg/g" *.tw
+$GREP "\bnusance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnusance\b/nuisance/g" *.tw
+$GREP "\bnutritent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnutritent\b/nutrient/g" *.tw
+$GREP "\bnutritents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnutritents\b/nutrients/g" *.tw
+$GREP "\bnuturing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bnuturing\b/nurturing/g" *.tw
+$GREP "\bobediance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobediance\b/obedience/g" *.tw
+$GREP "\bobediant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobediant\b/obedient/g" *.tw
+$GREP "\bobession\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobession\b/obsession/g" *.tw
+$GREP "\bobssessed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobssessed\b/obsessed/g" *.tw
+$GREP "\bobstacal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobstacal\b/obstacle/g" *.tw
+$GREP "\bobstancles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobstancles\b/obstacles/g" *.tw
+$GREP "\bobstruced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bobstruced\b/obstructed/g" *.tw
+$GREP "\bocasion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocasion\b/occasion/g" *.tw
+$GREP "\bocasional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocasional\b/occasional/g" *.tw
+$GREP "\bocasionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocasionally\b/occasionally/g" *.tw
+$GREP "\bocasionaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocasionaly\b/occasionally/g" *.tw
+$GREP "\bocasioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocasioned\b/occasioned/g" *.tw
+$GREP "\bocasions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocasions\b/occasions/g" *.tw
+$GREP "\bocassion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocassion\b/occasion/g" *.tw
+$GREP "\bocassional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocassional\b/occasional/g" *.tw
+$GREP "\bocassionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocassionally\b/occasionally/g" *.tw
+$GREP "\bocassionaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocassionaly\b/occasionally/g" *.tw
+$GREP "\bocassioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocassioned\b/occasioned/g" *.tw
+$GREP "\bocassions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocassions\b/occasions/g" *.tw
+$GREP "\boccaison\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccaison\b/occasion/g" *.tw
+$GREP "\boccassion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccassion\b/occasion/g" *.tw
+$GREP "\boccassional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccassional\b/occasional/g" *.tw
+$GREP "\boccassionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccassionally\b/occasionally/g" *.tw
+$GREP "\boccassionaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccassionaly\b/occasionally/g" *.tw
+$GREP "\boccassioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccassioned\b/occasioned/g" *.tw
+$GREP "\boccassions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccassions\b/occasions/g" *.tw
+$GREP "\boccationally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccationally\b/occasionally/g" *.tw
+$GREP "\boccour\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccour\b/occur/g" *.tw
+$GREP "\boccurance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurance\b/occurrence/g" *.tw
+$GREP "\boccurances\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurances\b/occurrences/g" *.tw
+$GREP "\boccured\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccured\b/occurred/g" *.tw
+$GREP "\boccurence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurence\b/occurrence/g" *.tw
+$GREP "\boccurences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurences\b/occurrences/g" *.tw
+$GREP "\boccuring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccuring\b/occurring/g" *.tw
+$GREP "\boccurr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurr\b/occur/g" *.tw
+$GREP "\boccurrance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurrance\b/occurrence/g" *.tw
+$GREP "\boccurrances\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boccurrances\b/occurrences/g" *.tw
+$GREP "\boctohedra\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boctohedra\b/octahedra/g" *.tw
+$GREP "\boctohedral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boctohedral\b/octahedral/g" *.tw
+$GREP "\boctohedron\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boctohedron\b/octahedron/g" *.tw
+$GREP "\bocuntries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocuntries\b/countries/g" *.tw
+$GREP "\bocuntry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocuntry\b/country/g" *.tw
+$GREP "\bocurr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocurr\b/occur/g" *.tw
+$GREP "\bocurrance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocurrance\b/occurrence/g" *.tw
+$GREP "\bocurred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocurred\b/occurred/g" *.tw
+$GREP "\bocurrence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bocurrence\b/occurrence/g" *.tw
+$GREP "\boffcers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boffcers\b/officers/g" *.tw
+$GREP "\boffcially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boffcially\b/officially/g" *.tw
+$GREP "\boffereings\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boffereings\b/offerings/g" *.tw
+$GREP "\boffical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boffical\b/official/g" *.tw
+$GREP "\boffically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boffically\b/officially/g" *.tw
+$GREP "\bofficals\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bofficals\b/officials/g" *.tw
+$GREP "\bofficaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bofficaly\b/officially/g" *.tw
+$GREP "\bofficialy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bofficialy\b/officially/g" *.tw
+$GREP "\boffred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boffred\b/offered/g" *.tw
+$GREP "\boftenly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boftenly\b/often/g" *.tw
+$GREP "\bomision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomision\b/omission/g" *.tw
+$GREP "\bomited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomited\b/omitted/g" *.tw
+$GREP "\bomiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomiting\b/omitting/g" *.tw
+$GREP "\bomlette\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomlette\b/omelette/g" *.tw
+$GREP "\bommision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bommision\b/omission/g" *.tw
+$GREP "\bommited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bommited\b/omitted/g" *.tw
+$GREP "\bommiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bommiting\b/omitting/g" *.tw
+$GREP "\bommitted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bommitted\b/omitted/g" *.tw
+$GREP "\bommitting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bommitting\b/omitting/g" *.tw
+$GREP "\bomniverous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomniverous\b/omnivorous/g" *.tw
+$GREP "\bomniverously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomniverously\b/omnivorously/g" *.tw
+$GREP "\bomre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bomre\b/more/g" *.tw
+$GREP "\bonyl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bonyl\b/only/g" *.tw
+$GREP "\bopeness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopeness\b/openness/g" *.tw
+$GREP "\boponent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boponent\b/opponent/g" *.tw
+$GREP "\boportunity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boportunity\b/opportunity/g" *.tw
+$GREP "\bopose\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopose\b/oppose/g" *.tw
+$GREP "\boposite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boposite\b/opposite/g" *.tw
+$GREP "\boposition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boposition\b/opposition/g" *.tw
+$GREP "\boppenly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boppenly\b/openly/g" *.tw
+$GREP "\boppinion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boppinion\b/opinion/g" *.tw
+$GREP "\bopponant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopponant\b/opponent/g" *.tw
+$GREP "\boppononent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boppononent\b/opponent/g" *.tw
+$GREP "\boppositition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boppositition\b/opposition/g" *.tw
+$GREP "\boppossed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boppossed\b/opposed/g" *.tw
+$GREP "\bopprotunity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopprotunity\b/opportunity/g" *.tw
+$GREP "\bopression\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopression\b/oppression/g" *.tw
+$GREP "\bopressive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopressive\b/oppressive/g" *.tw
+$GREP "\bopthalmic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopthalmic\b/ophthalmic/g" *.tw
+$GREP "\bopthalmologist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopthalmologist\b/ophthalmologist/g" *.tw
+$GREP "\bopthalmology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopthalmology\b/ophthalmology/g" *.tw
+$GREP "\bopthamologist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bopthamologist\b/ophthalmologist/g" *.tw
+$GREP "\boptmizations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boptmizations\b/optimizations/g" *.tw
+$GREP "\boptomism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boptomism\b/optimism/g" *.tw
+$GREP "\borded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borded\b/ordered/g" *.tw
+$GREP "\borganim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borganim\b/organism/g" *.tw
+$GREP "\borganistion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borganistion\b/organisation/g" *.tw
+$GREP "\borganiztion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borganiztion\b/organization/g" *.tw
+$GREP "\borginal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borginal\b/original/g" *.tw
+$GREP "\borginally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borginally\b/originally/g" *.tw
+$GREP "\borginize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borginize\b/organise/g" *.tw
+$GREP "\boridinarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boridinarily\b/ordinarily/g" *.tw
+$GREP "\boriganaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boriganaly\b/originally/g" *.tw
+$GREP "\boriginaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boriginaly\b/originally/g" *.tw
+$GREP "\boriginially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boriginially\b/originally/g" *.tw
+$GREP "\boriginnally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boriginnally\b/originally/g" *.tw
+$GREP "\borigional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borigional\b/original/g" *.tw
+$GREP "\borignally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borignally\b/originally/g" *.tw
+$GREP "\borignially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\borignially\b/originally/g" *.tw
+$GREP "\botehr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\botehr\b/other/g" *.tw
+$GREP "\boublisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boublisher\b/publisher/g" *.tw
+$GREP "\bouevre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bouevre\b/oeuvre/g" *.tw
+$GREP "\boustanding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boustanding\b/outstanding/g" *.tw
+$GREP "\bovershaddowed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bovershaddowed\b/overshadowed/g" *.tw
+$GREP "\boverthere\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boverthere\b/over there/g" *.tw
+$GREP "\boverwelming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boverwelming\b/overwhelming/g" *.tw
+$GREP "\boverwheliming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boverwheliming\b/overwhelming/g" *.tw
+$GREP "\bowrk\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bowrk\b/work/g" *.tw
+$GREP "\bowudl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bowudl\b/would/g" *.tw
+$GREP "\boxigen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boxigen\b/oxygen/g" *.tw
+$GREP "\boximoron\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\boximoron\b/oxymoron/g" *.tw
+$GREP "\bp0enis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bp0enis\b/penis/g" *.tw
+$GREP "\bpaide\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpaide\b/paid/g" *.tw
+$GREP "\bpaitience\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpaitience\b/patience/g" *.tw
+$GREP "\bpaleolitic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpaleolitic\b/paleolithic/g" *.tw
+$GREP "\bpaliamentarian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpaliamentarian\b/parliamentarian/g" *.tw
+$GREP "\bPalistian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPalistian\b/Palestinian/g" *.tw
+$GREP "\bPalistinian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPalistinian\b/Palestinian/g" *.tw
+$GREP "\bPalistinians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPalistinians\b/Palestinians/g" *.tw
+$GREP "\bpallete\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpallete\b/palette/g" *.tw
+$GREP "\bpamflet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpamflet\b/pamphlet/g" *.tw
+$GREP "\bpamplet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpamplet\b/pamphlet/g" *.tw
+$GREP "\bpantomine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpantomine\b/pantomime/g" *.tw
+$GREP "\bPapanicalou\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPapanicalou\b/Papanicolaou/g" *.tw
+$GREP "\bparalel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparalel\b/parallel/g" *.tw
+$GREP "\bparalell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparalell\b/parallel/g" *.tw
+$GREP "\bparalelly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparalelly\b/parallelly/g" *.tw
+$GREP "\bparalely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparalely\b/parallelly/g" *.tw
+$GREP "\bparallely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparallely\b/parallelly/g" *.tw
+$GREP "\bparanthesis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparanthesis\b/parenthesis/g" *.tw
+$GREP "\bparaphenalia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparaphenalia\b/paraphernalia/g" *.tw
+$GREP "\bparellels\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparellels\b/parallels/g" *.tw
+$GREP "\bparisitic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparisitic\b/parasitic/g" *.tw
+$GREP "\bparituclar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparituclar\b/particular/g" *.tw
+$GREP "\bparliment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparliment\b/parliament/g" *.tw
+$GREP "\bparrakeets\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparrakeets\b/parakeets/g" *.tw
+$GREP "\bparralel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparralel\b/parallel/g" *.tw
+$GREP "\bparrallel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparrallel\b/parallel/g" *.tw
+$GREP "\bparrallell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparrallell\b/parallel/g" *.tw
+$GREP "\bparrallelly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparrallelly\b/parallelly/g" *.tw
+$GREP "\bparrallely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparrallely\b/parallelly/g" *.tw
+$GREP "\bpartialy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpartialy\b/partially/g" *.tw
+$GREP "\bparticually\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparticually\b/particularly/g" *.tw
+$GREP "\bparticualr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparticualr\b/particular/g" *.tw
+$GREP "\bparticuarly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparticuarly\b/particularly/g" *.tw
+$GREP "\bparticularily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparticularily\b/particularly/g" *.tw
+$GREP "\bparticulary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bparticulary\b/particularly/g" *.tw
+$GREP "\bpary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpary\b/party/g" *.tw
+$GREP "\bpased\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpased\b/passed/g" *.tw
+$GREP "\bpasengers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpasengers\b/passengers/g" *.tw
+$GREP "\bpasserbys\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpasserbys\b/passersby/g" *.tw
+$GREP "\bpasttime\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpasttime\b/pastime/g" *.tw
+$GREP "\bpastural\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpastural\b/pastoral/g" *.tw
+$GREP "\bpaticular\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpaticular\b/particular/g" *.tw
+$GREP "\bpattented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpattented\b/patented/g" *.tw
+$GREP "\bpavillion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpavillion\b/pavilion/g" *.tw
+$GREP "\bpayed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpayed\b/paid/g" *.tw
+$GREP "\bpblisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpblisher\b/publisher/g" *.tw
+$GREP "\bpbulisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpbulisher\b/publisher/g" *.tw
+$GREP "\bpeacefuland\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeacefuland\b/peaceful and/g" *.tw
+$GREP "\bpeageant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeageant\b/pageant/g" *.tw
+$GREP "\bpeaple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeaple\b/people/g" *.tw
+$GREP "\bpeaples\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeaples\b/peoples/g" *.tw
+$GREP "\bpeculure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeculure\b/peculiar/g" *.tw
+$GREP "\bpedestrain\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpedestrain\b/pedestrian/g" *.tw
+$GREP "\bpeformed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeformed\b/performed/g" *.tw
+$GREP "\bpeice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeice\b/piece/g" *.tw
+$GREP "\bPeloponnes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPeloponnes\b/Peloponnesus/g" *.tw
+$GREP "\bpenatly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpenatly\b/penalty/g" *.tw
+$GREP "\bpenerator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpenerator\b/penetrator/g" *.tw
+$GREP "\bpenisula\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpenisula\b/peninsula/g" *.tw
+$GREP "\bpenisular\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpenisular\b/peninsular/g" *.tw
+$GREP "\bpenninsula\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpenninsula\b/peninsula/g" *.tw
+$GREP "\bpenninsular\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpenninsular\b/peninsular/g" *.tw
+$GREP "\bpennisula\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpennisula\b/peninsula/g" *.tw
+$GREP "\bPennyslvania\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPennyslvania\b/Pennsylvania/g" *.tw
+$GREP "\bpensle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpensle\b/pencil/g" *.tw
+$GREP "\bpensinula\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpensinula\b/peninsula/g" *.tw
+$GREP "\bpeom\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeom\b/poem/g" *.tw
+$GREP "\bpeoms\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeoms\b/poems/g" *.tw
+$GREP "\bpeopel\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeopel\b/people/g" *.tw
+$GREP "\bpeopels\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeopels\b/peoples/g" *.tw
+$GREP "\bpeotry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpeotry\b/poetry/g" *.tw
+$GREP "\bperade\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperade\b/parade/g" *.tw
+$GREP "\bpercepted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpercepted\b/perceived/g" *.tw
+$GREP "\bpercieve\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpercieve\b/perceive/g" *.tw
+$GREP "\bpercieved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpercieved\b/perceived/g" *.tw
+$GREP "\bperenially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperenially\b/perennially/g" *.tw
+$GREP "\bperfomance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperfomance\b/performance/g" *.tw
+$GREP "\bperfomers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperfomers\b/performers/g" *.tw
+$GREP "\bperformence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperformence\b/performance/g" *.tw
+$GREP "\bperhasp\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperhasp\b/perhaps/g" *.tw
+$GREP "\bperheaps\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperheaps\b/perhaps/g" *.tw
+$GREP "\bperhpas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperhpas\b/perhaps/g" *.tw
+$GREP "\bperipathetic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperipathetic\b/peripatetic/g" *.tw
+$GREP "\bperistent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperistent\b/persistent/g" *.tw
+$GREP "\bperjery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperjery\b/perjury/g" *.tw
+$GREP "\bperjorative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperjorative\b/pejorative/g" *.tw
+$GREP "\bpermanant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpermanant\b/permanent/g" *.tw
+$GREP "\bpermenant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpermenant\b/permanent/g" *.tw
+$GREP "\bpermenantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpermenantly\b/permanently/g" *.tw
+$GREP "\bpermissable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpermissable\b/permissible/g" *.tw
+$GREP "\bperogative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperogative\b/prerogative/g" *.tw
+$GREP "\bperonal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperonal\b/personal/g" *.tw
+$GREP "\bperpertrated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperpertrated\b/perpetrated/g" *.tw
+$GREP "\bperosnality\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperosnality\b/personality/g" *.tw
+$GREP "\bperphas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperphas\b/perhaps/g" *.tw
+$GREP "\bperpindicular\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperpindicular\b/perpendicular/g" *.tw
+$GREP "\bpersan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersan\b/person/g" *.tw
+$GREP "\bperseverence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bperseverence\b/perseverance/g" *.tw
+$GREP "\bpersistance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersistance\b/persistence/g" *.tw
+$GREP "\bpersistant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersistant\b/persistent/g" *.tw
+$GREP "\bpersonell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersonell\b/personnel/g" *.tw
+$GREP "\bpersonnell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersonnell\b/personnel/g" *.tw
+$GREP "\bpersuded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersuded\b/persuaded/g" *.tw
+$GREP "\bpersue\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersue\b/pursue/g" *.tw
+$GREP "\bpersued\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersued\b/pursued/g" *.tw
+$GREP "\bpersuing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersuing\b/pursuing/g" *.tw
+$GREP "\bpersuit\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersuit\b/pursuit/g" *.tw
+$GREP "\bpersuits\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpersuits\b/pursuits/g" *.tw
+$GREP "\bpertubation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpertubation\b/perturbation/g" *.tw
+$GREP "\bpertubations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpertubations\b/perturbations/g" *.tw
+$GREP "\bpessiary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpessiary\b/pessary/g" *.tw
+$GREP "\bpetetion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpetetion\b/petition/g" *.tw
+$GREP "\bPharoah\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPharoah\b/Pharaoh/g" *.tw
+$GREP "\bphenomenom\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphenomenom\b/phenomenon/g" *.tw
+$GREP "\bphenomenonal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphenomenonal\b/phenomenal/g" *.tw
+$GREP "\bphenomenonly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphenomenonly\b/phenomenally/g" *.tw
+$GREP "\bphenomonenon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphenomonenon\b/phenomenon/g" *.tw
+$GREP "\bphenomonon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphenomonon\b/phenomenon/g" *.tw
+$GREP "\bphenonmena\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphenonmena\b/phenomena/g" *.tw
+$GREP "\bPhilipines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPhilipines\b/Philippines/g" *.tw
+$GREP "\bphilisopher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphilisopher\b/philosopher/g" *.tw
+$GREP "\bphilisophical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphilisophical\b/philosophical/g" *.tw
+$GREP "\bphilisophy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphilisophy\b/philosophy/g" *.tw
+$GREP "\bPhillipine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPhillipine\b/Philippine/g" *.tw
+$GREP "\bPhillipines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPhillipines\b/Philippines/g" *.tw
+$GREP "\bPhillippines\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPhillippines\b/Philippines/g" *.tw
+$GREP "\bphillosophically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphillosophically\b/philosophically/g" *.tw
+$GREP "\bphilospher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphilospher\b/philosopher/g" *.tw
+$GREP "\bphilosphies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphilosphies\b/philosophies/g" *.tw
+$GREP "\bphilosphy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphilosphy\b/philosophy/g" *.tw
+$GREP "\bPhonecian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPhonecian\b/Phoenecian/g" *.tw
+$GREP "\bphongraph\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphongraph\b/phonograph/g" *.tw
+$GREP "\bphylosophical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphylosophical\b/philosophical/g" *.tw
+$GREP "\bphysicaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bphysicaly\b/physically/g" *.tw
+$GREP "\bpiblisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpiblisher\b/publisher/g" *.tw
+$GREP "\bpich\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpich\b/pitch/g" *.tw
+$GREP "\bpilgrimmage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpilgrimmage\b/pilgrimage/g" *.tw
+$GREP "\bpilgrimmages\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpilgrimmages\b/pilgrimages/g" *.tw
+$GREP "\bpinapple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpinapple\b/pineapple/g" *.tw
+$GREP "\bpinnaple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpinnaple\b/pineapple/g" *.tw
+$GREP "\bpinoneered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpinoneered\b/pioneered/g" *.tw
+$GREP "\bplagarism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplagarism\b/plagiarism/g" *.tw
+$GREP "\bplanation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplanation\b/plantation/g" *.tw
+$GREP "\bplaned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplaned\b/planned/g" *.tw
+$GREP "\bplantiff\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplantiff\b/plaintiff/g" *.tw
+$GREP "\bplateu\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplateu\b/plateau/g" *.tw
+$GREP "\bplausable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplausable\b/plausible/g" *.tw
+$GREP "\bplayright\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplayright\b/playwright/g" *.tw
+$GREP "\bplaywrite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplaywrite\b/playwright/g" *.tw
+$GREP "\bplaywrites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplaywrites\b/playwrights/g" *.tw
+$GREP "\bpleasent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpleasent\b/pleasant/g" *.tw
+$GREP "\bplebicite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplebicite\b/plebiscite/g" *.tw
+$GREP "\bplesant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bplesant\b/pleasant/g" *.tw
+$GREP "\bpoenis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoenis\b/penis/g" *.tw
+$GREP "\bpoeoples\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoeoples\b/peoples/g" *.tw
+$GREP "\bpoety\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoety\b/poetry/g" *.tw
+$GREP "\bpoisin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoisin\b/poison/g" *.tw
+$GREP "\bpolical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolical\b/political/g" *.tw
+$GREP "\bpolinator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolinator\b/pollinator/g" *.tw
+$GREP "\bpolinators\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolinators\b/pollinators/g" *.tw
+$GREP "\bpolitican\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolitican\b/politician/g" *.tw
+$GREP "\bpoliticans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoliticans\b/politicians/g" *.tw
+$GREP "\bpoltical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoltical\b/political/g" *.tw
+$GREP "\bpolute\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolute\b/pollute/g" *.tw
+$GREP "\bpoluted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoluted\b/polluted/g" *.tw
+$GREP "\bpolutes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolutes\b/pollutes/g" *.tw
+$GREP "\bpoluting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoluting\b/polluting/g" *.tw
+$GREP "\bpolution\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolution\b/pollution/g" *.tw
+$GREP "\bpolyphonyic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolyphonyic\b/polyphonic/g" *.tw
+$GREP "\bpolysaccaride\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolysaccaride\b/polysaccharide/g" *.tw
+$GREP "\bpolysaccharid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpolysaccharid\b/polysaccharide/g" *.tw
+$GREP "\bpomegranite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpomegranite\b/pomegranate/g" *.tw
+$GREP "\bpomotion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpomotion\b/promotion/g" *.tw
+$GREP "\bpoportional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoportional\b/proportional/g" *.tw
+$GREP "\bpopoulation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpopoulation\b/population/g" *.tw
+$GREP "\bpopularaty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpopularaty\b/popularity/g" *.tw
+$GREP "\bpopulare\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpopulare\b/popular/g" *.tw
+$GREP "\bpopuler\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpopuler\b/popular/g" *.tw
+$GREP "\bporshan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bporshan\b/portion/g" *.tw
+$GREP "\bporshon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bporshon\b/portion/g" *.tw
+$GREP "\bportait\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bportait\b/portrait/g" *.tw
+$GREP "\bportayed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bportayed\b/portrayed/g" *.tw
+$GREP "\bportraing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bportraing\b/portraying/g" *.tw
+$GREP "\bPortugese\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPortugese\b/Portuguese/g" *.tw
+$GREP "\bportuguease\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bportuguease\b/portuguese/g" *.tw
+$GREP "\bportugues\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bportugues\b/Portuguese/g" *.tw
+$GREP "\bposess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposess\b/possess/g" *.tw
+$GREP "\bposessed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposessed\b/possessed/g" *.tw
+$GREP "\bposesses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposesses\b/possesses/g" *.tw
+$GREP "\bposessing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposessing\b/possessing/g" *.tw
+$GREP "\bposession\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposession\b/possession/g" *.tw
+$GREP "\bposessions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposessions\b/possessions/g" *.tw
+$GREP "\bposion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposion\b/poison/g" *.tw
+$GREP "\bpossable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossable\b/possible/g" *.tw
+$GREP "\bpossably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossably\b/possibly/g" *.tw
+$GREP "\bposseses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposseses\b/possesses/g" *.tw
+$GREP "\bpossesing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossesing\b/possessing/g" *.tw
+$GREP "\bpossesion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossesion\b/possession/g" *.tw
+$GREP "\bpossessess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossessess\b/possesses/g" *.tw
+$GREP "\bpossibile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossibile\b/possible/g" *.tw
+$GREP "\bpossibilty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossibilty\b/possibility/g" *.tw
+$GREP "\bpossiblility\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossiblility\b/possibility/g" *.tw
+$GREP "\bpossiblilty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossiblilty\b/possibility/g" *.tw
+$GREP "\bpossiblities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossiblities\b/possibilities/g" *.tw
+$GREP "\bpossiblity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossiblity\b/possibility/g" *.tw
+$GREP "\bpossition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpossition\b/position/g" *.tw
+$GREP "\bPostdam\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPostdam\b/Potsdam/g" *.tw
+$GREP "\bposthomous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bposthomous\b/posthumous/g" *.tw
+$GREP "\bpostion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpostion\b/position/g" *.tw
+$GREP "\bpostive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpostive\b/positive/g" *.tw
+$GREP "\bpotatos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpotatos\b/potatoes/g" *.tw
+$GREP "\bpotrait\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpotrait\b/portrait/g" *.tw
+$GREP "\bpotrayed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpotrayed\b/portrayed/g" *.tw
+$GREP "\bpoulations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoulations\b/populations/g" *.tw
+$GREP "\bpoverful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoverful\b/powerful/g" *.tw
+$GREP "\bpoweful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpoweful\b/powerful/g" *.tw
+$GREP "\bpowerfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpowerfull\b/powerful/g" *.tw
+$GREP "\bppublisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bppublisher\b/publisher/g" *.tw
+$GREP "\bpractial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpractial\b/practical/g" *.tw
+$GREP "\bpractially\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpractially\b/practically/g" *.tw
+$GREP "\bpracticaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpracticaly\b/practically/g" *.tw
+$GREP "\bpracticioner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpracticioner\b/practitioner/g" *.tw
+$GREP "\bpracticioners\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpracticioners\b/practitioners/g" *.tw
+$GREP "\bpracticly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpracticly\b/practically/g" *.tw
+$GREP "\bpractioner\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpractioner\b/practitioner/g" *.tw
+$GREP "\bpractioners\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpractioners\b/practitioners/g" *.tw
+$GREP "\bprairy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprairy\b/prairie/g" *.tw
+$GREP "\bprarie\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprarie\b/prairie/g" *.tw
+$GREP "\bpraries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpraries\b/prairies/g" *.tw
+$GREP "\bpratice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpratice\b/practice/g" *.tw
+$GREP "\bpreample\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreample\b/preamble/g" *.tw
+$GREP "\bprecedessor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprecedessor\b/predecessor/g" *.tw
+$GREP "\bpreceed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreceed\b/precede/g" *.tw
+$GREP "\bpreceeded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreceeded\b/preceded/g" *.tw
+$GREP "\bpreceeding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreceeding\b/preceding/g" *.tw
+$GREP "\bpreceeds\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreceeds\b/precedes/g" *.tw
+$GREP "\bprecentage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprecentage\b/percentage/g" *.tw
+$GREP "\bprecice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprecice\b/precise/g" *.tw
+$GREP "\bprecisly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprecisly\b/precisely/g" *.tw
+$GREP "\bprecurser\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprecurser\b/precursor/g" *.tw
+$GREP "\bpredecesors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpredecesors\b/predecessors/g" *.tw
+$GREP "\bpredicatble\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpredicatble\b/predictable/g" *.tw
+$GREP "\bpredicitons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpredicitons\b/predictions/g" *.tw
+$GREP "\bpredomiantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpredomiantly\b/predominately/g" *.tw
+$GREP "\bprefered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprefered\b/preferred/g" *.tw
+$GREP "\bprefering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprefering\b/preferring/g" *.tw
+$GREP "\bpreferrably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreferrably\b/preferably/g" *.tw
+$GREP "\bpregancies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpregancies\b/pregnancies/g" *.tw
+$GREP "\bpreiod\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreiod\b/period/g" *.tw
+$GREP "\bpreliferation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreliferation\b/proliferation/g" *.tw
+$GREP "\bpremeire\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpremeire\b/premiere/g" *.tw
+$GREP "\bpremeired\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpremeired\b/premiered/g" *.tw
+$GREP "\bpremillenial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpremillenial\b/premillennial/g" *.tw
+$GREP "\bpreminence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreminence\b/preeminence/g" *.tw
+$GREP "\bpremission\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpremission\b/permission/g" *.tw
+$GREP "\bPremonasterians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPremonasterians\b/Premonstratensians/g" *.tw
+$GREP "\bpreocupation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreocupation\b/preoccupation/g" *.tw
+$GREP "\bprepair\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprepair\b/prepare/g" *.tw
+$GREP "\bprepartion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprepartion\b/preparation/g" *.tw
+$GREP "\bprepatory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprepatory\b/preparatory/g" *.tw
+$GREP "\bpreperation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreperation\b/preparation/g" *.tw
+$GREP "\bpreperations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreperations\b/preparations/g" *.tw
+$GREP "\bpreriod\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreriod\b/period/g" *.tw
+$GREP "\bpresedential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresedential\b/presidential/g" *.tw
+$GREP "\bpresense\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresense\b/presence/g" *.tw
+$GREP "\bpresidenital\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresidenital\b/presidential/g" *.tw
+$GREP "\bpresidental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresidental\b/presidential/g" *.tw
+$GREP "\bpresitgious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresitgious\b/prestigious/g" *.tw
+$GREP "\bprespective\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprespective\b/perspective/g" *.tw
+$GREP "\bprestigeous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprestigeous\b/prestigious/g" *.tw
+$GREP "\bprestigous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprestigous\b/prestigious/g" *.tw
+$GREP "\bpresumabely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresumabely\b/presumably/g" *.tw
+$GREP "\bpresumibly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpresumibly\b/presumably/g" *.tw
+$GREP "\bpretection\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpretection\b/protection/g" *.tw
+$GREP "\bprevelant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprevelant\b/prevalent/g" *.tw
+$GREP "\bpreverse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpreverse\b/perverse/g" *.tw
+$GREP "\bprevivous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprevivous\b/previous/g" *.tw
+$GREP "\bpricipal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpricipal\b/principal/g" *.tw
+$GREP "\bpriciple\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriciple\b/principle/g" *.tw
+$GREP "\bpriestood\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriestood\b/priesthood/g" *.tw
+$GREP "\bprimarly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprimarly\b/primarily/g" *.tw
+$GREP "\bprimative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprimative\b/primitive/g" *.tw
+$GREP "\bprimatively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprimatively\b/primitively/g" *.tw
+$GREP "\bprimatives\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprimatives\b/primitives/g" *.tw
+$GREP "\bprimordal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprimordal\b/primordial/g" *.tw
+$GREP "\bprinciplaity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprinciplaity\b/principality/g" *.tw
+$GREP "\bprincipaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprincipaly\b/principality/g" *.tw
+$GREP "\bprincipial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprincipial\b/principal/g" *.tw
+$GREP "\bprinciply\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprinciply\b/principally/g" *.tw
+$GREP "\bprinicipal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprinicipal\b/principal/g" *.tw
+$GREP "\bprivalege\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivalege\b/privilege/g" *.tw
+$GREP "\bprivaleges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivaleges\b/privileges/g" *.tw
+$GREP "\bpriveledges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriveledges\b/privileges/g" *.tw
+$GREP "\bprivelege\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivelege\b/privilege/g" *.tw
+$GREP "\bpriveleged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriveleged\b/privileged/g" *.tw
+$GREP "\bpriveleges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriveleges\b/privileges/g" *.tw
+$GREP "\bprivelige\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivelige\b/privilege/g" *.tw
+$GREP "\bpriveliged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriveliged\b/privileged/g" *.tw
+$GREP "\bpriveliges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriveliges\b/privileges/g" *.tw
+$GREP "\bprivelleges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivelleges\b/privileges/g" *.tw
+$GREP "\bprivilage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivilage\b/privilege/g" *.tw
+$GREP "\bpriviledge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriviledge\b/privilege/g" *.tw
+$GREP "\bpriviledges\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpriviledges\b/privileges/g" *.tw
+$GREP "\bprivledge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivledge\b/privilege/g" *.tw
+$GREP "\bprivte\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprivte\b/private/g" *.tw
+$GREP "\bprobabilaty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprobabilaty\b/probability/g" *.tw
+$GREP "\bprobablistic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprobablistic\b/probabilistic/g" *.tw
+$GREP "\bprobablly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprobablly\b/probably/g" *.tw
+$GREP "\bprobalibity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprobalibity\b/probability/g" *.tw
+$GREP "\bprobaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprobaly\b/probably/g" *.tw
+$GREP "\bprobelm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprobelm\b/problem/g" *.tw
+$GREP "\bproccess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproccess\b/process/g" *.tw
+$GREP "\bproccessing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproccessing\b/processing/g" *.tw
+$GREP "\bprocedger\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprocedger\b/procedure/g" *.tw
+$GREP "\bprocedings\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprocedings\b/proceedings/g" *.tw
+$GREP "\bproceedure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproceedure\b/procedure/g" *.tw
+$GREP "\bproces\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproces\b/process/g" *.tw
+$GREP "\bprocesser\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprocesser\b/processor/g" *.tw
+$GREP "\bproclaimation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproclaimation\b/proclamation/g" *.tw
+$GREP "\bproclamed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproclamed\b/proclaimed/g" *.tw
+$GREP "\bproclaming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproclaming\b/proclaiming/g" *.tw
+$GREP "\bproclomation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproclomation\b/proclamation/g" *.tw
+$GREP "\bprofesor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprofesor\b/professor/g" *.tw
+$GREP "\bprofesser\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprofesser\b/professor/g" *.tw
+$GREP "\bproffesed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproffesed\b/professed/g" *.tw
+$GREP "\bproffesion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproffesion\b/profession/g" *.tw
+$GREP "\bproffesional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproffesional\b/professional/g" *.tw
+$GREP "\bproffesor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproffesor\b/professor/g" *.tw
+$GREP "\bprofilic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprofilic\b/prolific/g" *.tw
+$GREP "\bprogessed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprogessed\b/progressed/g" *.tw
+$GREP "\bprogidy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprogidy\b/prodigy/g" *.tw
+$GREP "\bprogramable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprogramable\b/programmable/g" *.tw
+$GREP "\bprohabition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprohabition\b/prohibition/g" *.tw
+$GREP "\bprologomena\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprologomena\b/prolegomena/g" *.tw
+$GREP "\bprominance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprominance\b/prominence/g" *.tw
+$GREP "\bprominant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprominant\b/prominent/g" *.tw
+$GREP "\bprominantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprominantly\b/prominently/g" *.tw
+$GREP "\bpromiscous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpromiscous\b/promiscuous/g" *.tw
+$GREP "\bpromotted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpromotted\b/promoted/g" *.tw
+$GREP "\bpronomial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpronomial\b/pronominal/g" *.tw
+$GREP "\bpronouced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpronouced\b/pronounced/g" *.tw
+$GREP "\bpronounched\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpronounched\b/pronounced/g" *.tw
+$GREP "\bpronounciation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpronounciation\b/pronunciation/g" *.tw
+$GREP "\bproove\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproove\b/prove/g" *.tw
+$GREP "\bprooved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprooved\b/proved/g" *.tw
+$GREP "\bprophacy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprophacy\b/prophecy/g" *.tw
+$GREP "\bpropietary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropietary\b/proprietary/g" *.tw
+$GREP "\bpropmted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropmted\b/prompted/g" *.tw
+$GREP "\bpropoganda\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropoganda\b/propaganda/g" *.tw
+$GREP "\bpropogate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropogate\b/propagate/g" *.tw
+$GREP "\bpropogates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropogates\b/propagates/g" *.tw
+$GREP "\bpropogation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropogation\b/propagation/g" *.tw
+$GREP "\bpropostion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropostion\b/proposition/g" *.tw
+$GREP "\bpropotions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropotions\b/proportions/g" *.tw
+$GREP "\bpropper\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropper\b/proper/g" *.tw
+$GREP "\bpropperly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpropperly\b/properly/g" *.tw
+$GREP "\bproprietory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproprietory\b/proprietary/g" *.tw
+$GREP "\bproseletyzing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproseletyzing\b/proselytizing/g" *.tw
+$GREP "\bprotaganist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotaganist\b/protagonist/g" *.tw
+$GREP "\bprotaganists\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotaganists\b/protagonists/g" *.tw
+$GREP "\bprotocal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotocal\b/protocol/g" *.tw
+$GREP "\bprotoganist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotoganist\b/protagonist/g" *.tw
+$GREP "\bprotrayed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotrayed\b/portrayed/g" *.tw
+$GREP "\bprotruberance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotruberance\b/protuberance/g" *.tw
+$GREP "\bprotruberances\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprotruberances\b/protuberances/g" *.tw
+$GREP "\bprouncements\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprouncements\b/pronouncements/g" *.tw
+$GREP "\bprovacative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprovacative\b/provocative/g" *.tw
+$GREP "\bprovded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprovded\b/provided/g" *.tw
+$GREP "\bprovicial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprovicial\b/provincial/g" *.tw
+$GREP "\bprovinicial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprovinicial\b/provincial/g" *.tw
+$GREP "\bprovisiosn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprovisiosn\b/provision/g" *.tw
+$GREP "\bprovisonal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bprovisonal\b/provisional/g" *.tw
+$GREP "\bproximty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bproximty\b/proximity/g" *.tw
+$GREP "\bpseudononymous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpseudononymous\b/pseudonymous/g" *.tw
+$GREP "\bpseudonyn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpseudonyn\b/pseudonym/g" *.tw
+$GREP "\bpsuedo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpsuedo\b/pseudo/g" *.tw
+$GREP "\bpsycology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpsycology\b/psychology/g" *.tw
+$GREP "\bpsyhic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpsyhic\b/psychic/g" *.tw
+$GREP "\bpubilsher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpubilsher\b/publisher/g" *.tw
+$GREP "\bpubisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpubisher\b/publisher/g" *.tw
+$GREP "\bpubliaher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpubliaher\b/publisher/g" *.tw
+$GREP "\bpublically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublically\b/publicly/g" *.tw
+$GREP "\bpublicaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublicaly\b/publicly/g" *.tw
+$GREP "\bpublicher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublicher\b/publisher/g" *.tw
+$GREP "\bpublihser\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublihser\b/publisher/g" *.tw
+$GREP "\bpublisehr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublisehr\b/publisher/g" *.tw
+$GREP "\bpubliser\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpubliser\b/publisher/g" *.tw
+$GREP "\bpublisger\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublisger\b/publisher/g" *.tw
+$GREP "\bpublisheed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublisheed\b/published/g" *.tw
+$GREP "\bpublisherr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublisherr\b/publisher/g" *.tw
+$GREP "\bpublishher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublishher\b/publisher/g" *.tw
+$GREP "\bpublishor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublishor\b/publisher/g" *.tw
+$GREP "\bpublishre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublishre\b/publisher/g" *.tw
+$GREP "\bpublissher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublissher\b/publisher/g" *.tw
+$GREP "\bpubllisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpubllisher\b/publisher/g" *.tw
+$GREP "\bpublsiher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublsiher\b/publisher/g" *.tw
+$GREP "\bpublusher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpublusher\b/publisher/g" *.tw
+$GREP "\bpuchasing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpuchasing\b/purchasing/g" *.tw
+$GREP "\bPucini\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPucini\b/Puccini/g" *.tw
+$GREP "\bPuertorrican\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPuertorrican\b/Puerto Rican/g" *.tw
+$GREP "\bPuertorricans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bPuertorricans\b/Puerto Ricans/g" *.tw
+$GREP "\bpulisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpulisher\b/publisher/g" *.tw
+$GREP "\bpumkin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpumkin\b/pumpkin/g" *.tw
+$GREP "\bpuplisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpuplisher\b/publisher/g" *.tw
+$GREP "\bpuritannical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpuritannical\b/puritanical/g" *.tw
+$GREP "\bpurposedly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpurposedly\b/purposely/g" *.tw
+$GREP "\bpurpotedly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpurpotedly\b/purportedly/g" *.tw
+$GREP "\bpursuade\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpursuade\b/persuade/g" *.tw
+$GREP "\bpursuaded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpursuaded\b/persuaded/g" *.tw
+$GREP "\bpursuades\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpursuades\b/persuades/g" *.tw
+$GREP "\bpususading\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpususading\b/persuading/g" *.tw
+$GREP "\bputing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bputing\b/putting/g" *.tw
+$GREP "\bpwoer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpwoer\b/power/g" *.tw
+$GREP "\bpyscic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bpyscic\b/psychic/g" *.tw
+$GREP "\bquantaty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquantaty\b/quantity/g" *.tw
+$GREP "\bquantitiy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquantitiy\b/quantity/g" *.tw
+$GREP "\bquarantaine\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquarantaine\b/quarantine/g" *.tw
+$GREP "\bQueenland\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bQueenland\b/Queensland/g" *.tw
+$GREP "\bquestonable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquestonable\b/questionable/g" *.tw
+$GREP "\bquicklyu\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquicklyu\b/quickly/g" *.tw
+$GREP "\bquinessential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquinessential\b/quintessential/g" *.tw
+$GREP "\bquitted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquitted\b/quit/g" *.tw
+$GREP "\bquizes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bquizes\b/quizzes/g" *.tw
+$GREP "\brabinnical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brabinnical\b/rabbinical/g" *.tw
+$GREP "\bracaus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bracaus\b/raucous/g" *.tw
+$GREP "\bradiactive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bradiactive\b/radioactive/g" *.tw
+$GREP "\bradify\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bradify\b/ratify/g" *.tw
+$GREP "\braelly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\braelly\b/really/g" *.tw
+$GREP "\brarified\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brarified\b/rarefied/g" *.tw
+$GREP "\breaccurring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breaccurring\b/recurring/g" *.tw
+$GREP "\breacing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breacing\b/reaching/g" *.tw
+$GREP "\breacll\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breacll\b/recall/g" *.tw
+$GREP "\breadmition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breadmition\b/readmission/g" *.tw
+$GREP "\brealitvely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brealitvely\b/relatively/g" *.tw
+$GREP "\brealsitic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brealsitic\b/realistic/g" *.tw
+$GREP "\brealtions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brealtions\b/relations/g" *.tw
+$GREP "\brealy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brealy\b/really/g" *.tw
+$GREP "\brealyl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brealyl\b/really/g" *.tw
+$GREP "\breasearch\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breasearch\b/research/g" *.tw
+$GREP "\brebiulding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brebiulding\b/rebuilding/g" *.tw
+$GREP "\brebllions\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brebllions\b/rebellions/g" *.tw
+$GREP "\brebounce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brebounce\b/rebound/g" *.tw
+$GREP "\breccomend\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccomend\b/recommend/g" *.tw
+$GREP "\breccomendations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccomendations\b/recommendations/g" *.tw
+$GREP "\breccomended\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccomended\b/recommended/g" *.tw
+$GREP "\breccomending\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccomending\b/recommending/g" *.tw
+$GREP "\breccommend\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccommend\b/recommend/g" *.tw
+$GREP "\breccommended\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccommended\b/recommended/g" *.tw
+$GREP "\breccommending\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccommending\b/recommending/g" *.tw
+$GREP "\breccuring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breccuring\b/recurring/g" *.tw
+$GREP "\breceeded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breceeded\b/receded/g" *.tw
+$GREP "\breceeding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breceeding\b/receding/g" *.tw
+$GREP "\breceivedfrom\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breceivedfrom\b/received from/g" *.tw
+$GREP "\brecepient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecepient\b/recipient/g" *.tw
+$GREP "\brecepients\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecepients\b/recipients/g" *.tw
+$GREP "\breceving\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breceving\b/receiving/g" *.tw
+$GREP "\brechargable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brechargable\b/rechargeable/g" *.tw
+$GREP "\breched\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breched\b/reached/g" *.tw
+$GREP "\brecide\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecide\b/reside/g" *.tw
+$GREP "\brecided\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecided\b/resided/g" *.tw
+$GREP "\brecident\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecident\b/resident/g" *.tw
+$GREP "\brecidents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecidents\b/residents/g" *.tw
+$GREP "\breciding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breciding\b/residing/g" *.tw
+$GREP "\breciepents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breciepents\b/recipients/g" *.tw
+$GREP "\breciept\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breciept\b/receipt/g" *.tw
+$GREP "\brecieve\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecieve\b/receive/g" *.tw
+$GREP "\brecieved\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecieved\b/received/g" *.tw
+$GREP "\breciever\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breciever\b/receiver/g" *.tw
+$GREP "\brecievers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecievers\b/receivers/g" *.tw
+$GREP "\brecieves\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecieves\b/receives/g" *.tw
+$GREP "\brecieving\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecieving\b/receiving/g" *.tw
+$GREP "\brecipiant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecipiant\b/recipient/g" *.tw
+$GREP "\brecipiants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecipiants\b/recipients/g" *.tw
+$GREP "\brecived\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecived\b/received/g" *.tw
+$GREP "\brecivership\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecivership\b/receivership/g" *.tw
+$GREP "\brecogise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecogise\b/recognise/g" *.tw
+$GREP "\brecogize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecogize\b/recognize/g" *.tw
+$GREP "\brecomend\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecomend\b/recommend/g" *.tw
+$GREP "\brecomended\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecomended\b/recommended/g" *.tw
+$GREP "\brecomending\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecomending\b/recommending/g" *.tw
+$GREP "\brecomends\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecomends\b/recommends/g" *.tw
+$GREP "\brecommedations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecommedations\b/recommendations/g" *.tw
+$GREP "\brecompence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecompence\b/recompense/g" *.tw
+$GREP "\breconaissance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breconaissance\b/reconnaissance/g" *.tw
+$GREP "\breconcilation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breconcilation\b/reconciliation/g" *.tw
+$GREP "\breconized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breconized\b/recognized/g" *.tw
+$GREP "\breconnaisance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breconnaisance\b/reconnaissance/g" *.tw
+$GREP "\breconnaissence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breconnaissence\b/reconnaissance/g" *.tw
+$GREP "\brecontructed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecontructed\b/reconstructed/g" *.tw
+$GREP "\brecordproducer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecordproducer\b/record producer/g" *.tw
+$GREP "\brecquired\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecquired\b/required/g" *.tw
+$GREP "\brecrational\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecrational\b/recreational/g" *.tw
+$GREP "\brecrod\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecrod\b/record/g" *.tw
+$GREP "\brecuiting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecuiting\b/recruiting/g" *.tw
+$GREP "\brecuring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecuring\b/recurring/g" *.tw
+$GREP "\brecurrance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brecurrance\b/recurrence/g" *.tw
+$GREP "\brediculous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brediculous\b/ridiculous/g" *.tw
+$GREP "\breedeming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breedeming\b/redeeming/g" *.tw
+$GREP "\breenforced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breenforced\b/reinforced/g" *.tw
+$GREP "\brefect\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefect\b/reflect/g" *.tw
+$GREP "\brefedendum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefedendum\b/referendum/g" *.tw
+$GREP "\breferal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferal\b/referral/g" *.tw
+$GREP "\breferece\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferece\b/reference/g" *.tw
+$GREP "\brefereces\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefereces\b/references/g" *.tw
+$GREP "\brefered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefered\b/referred/g" *.tw
+$GREP "\breferemce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferemce\b/reference/g" *.tw
+$GREP "\breferemces\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferemces\b/references/g" *.tw
+$GREP "\breferencs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferencs\b/references/g" *.tw
+$GREP "\breferenece\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferenece\b/reference/g" *.tw
+$GREP "\brefereneced\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefereneced\b/referenced/g" *.tw
+$GREP "\brefereneces\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefereneces\b/references/g" *.tw
+$GREP "\breferiang\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferiang\b/referring/g" *.tw
+$GREP "\brefering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefering\b/referring/g" *.tw
+$GREP "\brefernce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefernce\b/reference/g" *.tw
+$GREP "\brefernce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefernce\b/references/g" *.tw
+$GREP "\brefernces\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefernces\b/references/g" *.tw
+$GREP "\breferrence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferrence\b/reference/g" *.tw
+$GREP "\breferrences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferrences\b/references/g" *.tw
+$GREP "\breferrs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breferrs\b/refers/g" *.tw
+$GREP "\breffered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breffered\b/referred/g" *.tw
+$GREP "\brefference\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefference\b/reference/g" *.tw
+$GREP "\breffering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breffering\b/referring/g" *.tw
+$GREP "\brefrence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefrence\b/reference/g" *.tw
+$GREP "\brefrences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefrences\b/references/g" *.tw
+$GREP "\brefrers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefrers\b/refers/g" *.tw
+$GREP "\brefridgeration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefridgeration\b/refrigeration/g" *.tw
+$GREP "\brefridgerator\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefridgerator\b/refrigerator/g" *.tw
+$GREP "\brefromist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefromist\b/reformist/g" *.tw
+$GREP "\brefusla\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brefusla\b/refusal/g" *.tw
+$GREP "\bregardes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bregardes\b/regards/g" *.tw
+$GREP "\bregluar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bregluar\b/regular/g" *.tw
+$GREP "\breguarly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breguarly\b/regularly/g" *.tw
+$GREP "\bregulaion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bregulaion\b/regulation/g" *.tw
+$GREP "\bregulaotrs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bregulaotrs\b/regulators/g" *.tw
+$GREP "\bregularily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bregularily\b/regularly/g" *.tw
+$GREP "\brehersal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brehersal\b/rehearsal/g" *.tw
+$GREP "\breicarnation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breicarnation\b/reincarnation/g" *.tw
+$GREP "\breigining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breigining\b/reigning/g" *.tw
+$GREP "\breknown\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breknown\b/renown/g" *.tw
+$GREP "\breknowned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breknowned\b/renowned/g" *.tw
+$GREP "\brela\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brela\b/real/g" *.tw
+$GREP "\brelaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelaly\b/really/g" *.tw
+$GREP "\brelatiopnship\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelatiopnship\b/relationship/g" *.tw
+$GREP "\brelativly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelativly\b/relatively/g" *.tw
+$GREP "\brelected\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelected\b/reelected/g" *.tw
+$GREP "\breleive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breleive\b/relieve/g" *.tw
+$GREP "\breleived\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breleived\b/relieved/g" *.tw
+$GREP "\breleiver\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breleiver\b/reliever/g" *.tw
+$GREP "\breleses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breleses\b/releases/g" *.tw
+$GREP "\brelevence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelevence\b/relevance/g" *.tw
+$GREP "\brelevent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelevent\b/relevant/g" *.tw
+$GREP "\breliablity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breliablity\b/reliability/g" *.tw
+$GREP "\brelient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelient\b/reliant/g" *.tw
+$GREP "\breligeous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breligeous\b/religious/g" *.tw
+$GREP "\breligous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breligous\b/religious/g" *.tw
+$GREP "\breligously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breligously\b/religiously/g" *.tw
+$GREP "\brelinqushment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelinqushment\b/relinquishment/g" *.tw
+$GREP "\brelitavely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelitavely\b/relatively/g" *.tw
+$GREP "\brelpacement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brelpacement\b/replacement/g" *.tw
+$GREP "\bremaing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bremaing\b/remaining/g" *.tw
+$GREP "\bremeber\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bremeber\b/remember/g" *.tw
+$GREP "\brememberable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brememberable\b/memorable/g" *.tw
+$GREP "\brememberance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brememberance\b/remembrance/g" *.tw
+$GREP "\bremembrence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bremembrence\b/remembrance/g" *.tw
+$GREP "\bremenant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bremenant\b/remnant/g" *.tw
+$GREP "\bremenicent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bremenicent\b/reminiscent/g" *.tw
+$GREP "\breminent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breminent\b/remnant/g" *.tw
+$GREP "\breminescent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breminescent\b/reminiscent/g" *.tw
+$GREP "\breminscent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breminscent\b/reminiscent/g" *.tw
+$GREP "\breminsicent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breminsicent\b/reminiscent/g" *.tw
+$GREP "\brendevous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brendevous\b/rendezvous/g" *.tw
+$GREP "\brendezous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brendezous\b/rendezvous/g" *.tw
+$GREP "\brenedered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brenedered\b/rende/g" *.tw
+$GREP "\brenewl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brenewl\b/renewal/g" *.tw
+$GREP "\brennovate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brennovate\b/renovate/g" *.tw
+$GREP "\brennovated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brennovated\b/renovated/g" *.tw
+$GREP "\brennovating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brennovating\b/renovating/g" *.tw
+$GREP "\brennovation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brennovation\b/renovation/g" *.tw
+$GREP "\brentors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brentors\b/renters/g" *.tw
+$GREP "\breoccurrence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breoccurrence\b/recurrence/g" *.tw
+$GREP "\breorganision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breorganision\b/reorganisation/g" *.tw
+$GREP "\brepblic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepblic\b/republic/g" *.tw
+$GREP "\brepblican\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepblican\b/republican/g" *.tw
+$GREP "\brepblicans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepblicans\b/republicans/g" *.tw
+$GREP "\brepblics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepblics\b/republics/g" *.tw
+$GREP "\brepectively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepectively\b/respectively/g" *.tw
+$GREP "\brepeition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepeition\b/repetition/g" *.tw
+$GREP "\brepentence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepentence\b/repentance/g" *.tw
+$GREP "\brepentent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepentent\b/repentant/g" *.tw
+$GREP "\brepeteadly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepeteadly\b/repeatedly/g" *.tw
+$GREP "\brepetion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepetion\b/repetition/g" *.tw
+$GREP "\brepid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepid\b/rapid/g" *.tw
+$GREP "\breponse\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breponse\b/response/g" *.tw
+$GREP "\breponsible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breponsible\b/responsible/g" *.tw
+$GREP "\breportadly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breportadly\b/reportedly/g" *.tw
+$GREP "\brepresantative\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepresantative\b/representative/g" *.tw
+$GREP "\brepresentive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepresentive\b/representative/g" *.tw
+$GREP "\brepresentives\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepresentives\b/representatives/g" *.tw
+$GREP "\breproducable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breproducable\b/reproducible/g" *.tw
+$GREP "\breprtoire\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breprtoire\b/repertoire/g" *.tw
+$GREP "\brepsectively\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepsectively\b/respectively/g" *.tw
+$GREP "\breptition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breptition\b/repetition/g" *.tw
+$GREP "\brepubic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepubic\b/republic/g" *.tw
+$GREP "\brepubican\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepubican\b/republican/g" *.tw
+$GREP "\brepubicans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepubicans\b/republicans/g" *.tw
+$GREP "\brepubics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepubics\b/republics/g" *.tw
+$GREP "\brepubli\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepubli\b/republic/g" *.tw
+$GREP "\brepublian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepublian\b/republican/g" *.tw
+$GREP "\brepublians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepublians\b/republicans/g" *.tw
+$GREP "\brepublis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepublis\b/republics/g" *.tw
+$GREP "\brepulic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepulic\b/republic/g" *.tw
+$GREP "\brepulican\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepulican\b/republican/g" *.tw
+$GREP "\brepulicans\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepulicans\b/republicans/g" *.tw
+$GREP "\brepulics\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brepulics\b/republics/g" *.tw
+$GREP "\brequirment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brequirment\b/requirement/g" *.tw
+$GREP "\brequred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brequred\b/required/g" *.tw
+$GREP "\bresaurant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresaurant\b/restaurant/g" *.tw
+$GREP "\bresembelance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresembelance\b/resemblance/g" *.tw
+$GREP "\bresembes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresembes\b/resembles/g" *.tw
+$GREP "\bresemblence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresemblence\b/resemblance/g" *.tw
+$GREP "\bresevoir\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresevoir\b/reservoir/g" *.tw
+$GREP "\bresidental\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresidental\b/residential/g" *.tw
+$GREP "\bresignement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresignement\b/resignment/g" *.tw
+$GREP "\bresistable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresistable\b/resistible/g" *.tw
+$GREP "\bresistence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresistence\b/resistance/g" *.tw
+$GREP "\bresistent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresistent\b/resistant/g" *.tw
+$GREP "\brespectivly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brespectivly\b/respectively/g" *.tw
+$GREP "\bresponce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponce\b/response/g" *.tw
+$GREP "\bresponibilities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponibilities\b/responsibilities/g" *.tw
+$GREP "\bresponisble\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponisble\b/responsible/g" *.tw
+$GREP "\bresponnsibilty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponnsibilty\b/responsibility/g" *.tw
+$GREP "\bresponsability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponsability\b/responsibility/g" *.tw
+$GREP "\bresponsibile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponsibile\b/responsible/g" *.tw
+$GREP "\bresponsibilites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponsibilites\b/responsibilities/g" *.tw
+$GREP "\bresponsiblities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponsiblities\b/responsibilities/g" *.tw
+$GREP "\bresponsiblity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresponsiblity\b/responsibility/g" *.tw
+$GREP "\bressemblance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressemblance\b/resemblance/g" *.tw
+$GREP "\bressemble\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressemble\b/resemble/g" *.tw
+$GREP "\bressembled\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressembled\b/resembled/g" *.tw
+$GREP "\bressemblence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressemblence\b/resemblance/g" *.tw
+$GREP "\bressembling\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressembling\b/resembling/g" *.tw
+$GREP "\bresssurecting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresssurecting\b/resurrecting/g" *.tw
+$GREP "\bressurect\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressurect\b/resurrect/g" *.tw
+$GREP "\bressurected\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressurected\b/resurrected/g" *.tw
+$GREP "\bressurection\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressurection\b/resurrection/g" *.tw
+$GREP "\bressurrection\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bressurrection\b/resurrection/g" *.tw
+$GREP "\brestarant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestarant\b/restaurant/g" *.tw
+$GREP "\brestarants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestarants\b/restaurants/g" *.tw
+$GREP "\brestaraunt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestaraunt\b/restaurant/g" *.tw
+$GREP "\brestaraunteur\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestaraunteur\b/restaurateur/g" *.tw
+$GREP "\brestaraunteurs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestaraunteurs\b/restaurateurs/g" *.tw
+$GREP "\brestaraunts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestaraunts\b/restaurants/g" *.tw
+$GREP "\brestauranteurs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestauranteurs\b/restaurateurs/g" *.tw
+$GREP "\brestauration\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestauration\b/restoration/g" *.tw
+$GREP "\brestauraunt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brestauraunt\b/restaurant/g" *.tw
+$GREP "\bresteraunt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresteraunt\b/restaurant/g" *.tw
+$GREP "\bresteraunts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresteraunts\b/restaurants/g" *.tw
+$GREP "\bresticted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresticted\b/restricted/g" *.tw
+$GREP "\bresturant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresturant\b/restaurant/g" *.tw
+$GREP "\bresturants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresturants\b/restaurants/g" *.tw
+$GREP "\bresturaunt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresturaunt\b/restaurant/g" *.tw
+$GREP "\bresturaunts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresturaunts\b/restaurants/g" *.tw
+$GREP "\bresurecting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bresurecting\b/resurrecting/g" *.tw
+$GREP "\bretalitated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bretalitated\b/retaliated/g" *.tw
+$GREP "\bretalitation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bretalitation\b/retaliation/g" *.tw
+$GREP "\bretreive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bretreive\b/retrieve/g" *.tw
+$GREP "\breturnd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breturnd\b/returned/g" *.tw
+$GREP "\brevaluated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brevaluated\b/reevaluated/g" *.tw
+$GREP "\breveiw\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breveiw\b/review/g" *.tw
+$GREP "\breveral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breveral\b/reversal/g" *.tw
+$GREP "\breversable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\breversable\b/reversible/g" *.tw
+$GREP "\brevolutionar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brevolutionar\b/revolutionary/g" *.tw
+$GREP "\brewitten\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brewitten\b/rewritten/g" *.tw
+$GREP "\brewriet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brewriet\b/rewrite/g" *.tw
+$GREP "\brference\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brference\b/reference/g" *.tw
+$GREP "\brferences\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brferences\b/references/g" *.tw
+$GREP "\brhymme\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brhymme\b/rhyme/g" *.tw
+$GREP "\brhythem\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brhythem\b/rhythm/g" *.tw
+$GREP "\brhythim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brhythim\b/rhythm/g" *.tw
+$GREP "\brhytmic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brhytmic\b/rhythmic/g" *.tw
+$GREP "\brigourous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brigourous\b/rigorous/g" *.tw
+$GREP "\brininging\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brininging\b/ringing/g" *.tw
+$GREP "\bRockerfeller\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bRockerfeller\b/Rockefeller/g" *.tw
+$GREP "\brococco\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brococco\b/rococo/g" *.tw
+$GREP "\brocord\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brocord\b/record/g" *.tw
+$GREP "\broomate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\broomate\b/roommate/g" *.tw
+$GREP "\brougly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brougly\b/roughly/g" *.tw
+$GREP "\brucuperate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brucuperate\b/recuperate/g" *.tw
+$GREP "\brudimentatry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brudimentatry\b/rudimentary/g" *.tw
+$GREP "\brulle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brulle\b/rule/g" *.tw
+$GREP "\bruning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bruning\b/running/g" *.tw
+$GREP "\brunnung\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brunnung\b/running/g" *.tw
+$GREP "\brussina\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brussina\b/Russian/g" *.tw
+$GREP "\bRussion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bRussion\b/Russian/g" *.tw
+$GREP "\brwite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brwite\b/write/g" *.tw
+$GREP "\brythem\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brythem\b/rhythm/g" *.tw
+$GREP "\brythim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brythim\b/rhythm/g" *.tw
+$GREP "\brythm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brythm\b/rhythm/g" *.tw
+$GREP "\brythmic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brythmic\b/rhythmic/g" *.tw
+$GREP "\brythyms\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\brythyms\b/rhythms/g" *.tw
+$GREP "\bsacrafice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsacrafice\b/sacrifice/g" *.tw
+$GREP "\bsacreligious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsacreligious\b/sacrilegious/g" *.tw
+$GREP "\bSacremento\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSacremento\b/Sacramento/g" *.tw
+$GREP "\bsacrifical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsacrifical\b/sacrificial/g" *.tw
+$GREP "\bsaftey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsaftey\b/safety/g" *.tw
+$GREP "\bsafty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsafty\b/safety/g" *.tw
+$GREP "\bsalery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsalery\b/salary/g" *.tw
+$GREP "\bsanctionning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsanctionning\b/sanctioning/g" *.tw
+$GREP "\bsandwhich\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsandwhich\b/sandwich/g" *.tw
+$GREP "\bSanhedrim\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSanhedrim\b/Sanhedrin/g" *.tw
+$GREP "\bsantioned\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsantioned\b/sanctioned/g" *.tw
+$GREP "\bsargant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsargant\b/sergeant/g" *.tw
+$GREP "\bsargeant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsargeant\b/sergeant/g" *.tw
+$GREP "\bsatelite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsatelite\b/satellite/g" *.tw
+$GREP "\bsatelites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsatelites\b/satellites/g" *.tw
+$GREP "\bSaterday\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSaterday\b/Saturday/g" *.tw
+$GREP "\bSaterdays\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSaterdays\b/Saturdays/g" *.tw
+$GREP "\bsatisfactority\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsatisfactority\b/satisfactorily/g" *.tw
+$GREP "\bsatric\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsatric\b/satiric/g" *.tw
+$GREP "\bsatrical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsatrical\b/satirical/g" *.tw
+$GREP "\bsatrically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsatrically\b/satirically/g" *.tw
+$GREP "\bsattelite\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsattelite\b/satellite/g" *.tw
+$GREP "\bsattelites\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsattelites\b/satellites/g" *.tw
+$GREP "\bsaught\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsaught\b/sought/g" *.tw
+$GREP "\bsaveing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsaveing\b/saving/g" *.tw
+$GREP "\bsaxaphone\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsaxaphone\b/saxophone/g" *.tw
+$GREP "\bscaleable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscaleable\b/scalable/g" *.tw
+$GREP "\bscandanavia\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscandanavia\b/Scandinavia/g" *.tw
+$GREP "\bscaricity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscaricity\b/scarcity/g" *.tw
+$GREP "\bscavanged\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscavanged\b/scavenged/g" *.tw
+$GREP "\bschedual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bschedual\b/schedule/g" *.tw
+$GREP "\bscholarhip\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscholarhip\b/scholarship/g" *.tw
+$GREP "\bscientfic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscientfic\b/scientific/g" *.tw
+$GREP "\bscientifc\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscientifc\b/scientific/g" *.tw
+$GREP "\bscientis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscientis\b/scientist/g" *.tw
+$GREP "\bscince\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscince\b/science/g" *.tw
+$GREP "\bscinece\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscinece\b/science/g" *.tw
+$GREP "\bscirpt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscirpt\b/script/g" *.tw
+$GREP "\bscoll\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscoll\b/scroll/g" *.tw
+$GREP "\bscreenwrighter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscreenwrighter\b/screenwriter/g" *.tw
+$GREP "\bscrutinity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscrutinity\b/scrutiny/g" *.tw
+$GREP "\bscuptures\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bscuptures\b/sculptures/g" *.tw
+$GREP "\bseach\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseach\b/search/g" *.tw
+$GREP "\bseached\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseached\b/searched/g" *.tw
+$GREP "\bseaches\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseaches\b/searches/g" *.tw
+$GREP "\bsecratary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsecratary\b/secretary/g" *.tw
+$GREP "\bsecretery\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsecretery\b/secretary/g" *.tw
+$GREP "\bsedereal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsedereal\b/sidereal/g" *.tw
+$GREP "\bseeked\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseeked\b/sought/g" *.tw
+$GREP "\bsegementation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsegementation\b/segmentation/g" *.tw
+$GREP "\bseguoys\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseguoys\b/segues/g" *.tw
+$GREP "\bseige\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseige\b/siege/g" *.tw
+$GREP "\bseing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseing\b/seeing/g" *.tw
+$GREP "\bseinor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseinor\b/senior/g" *.tw
+$GREP "\bseldomly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseldomly\b/seldom/g" *.tw
+$GREP "\bsenarios\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsenarios\b/scenarios/g" *.tw
+$GREP "\bsenstive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsenstive\b/sensitive/g" *.tw
+$GREP "\bsensure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsensure\b/censure/g" *.tw
+$GREP "\bseperate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperate\b/separate/g" *.tw
+$GREP "\bseperated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperated\b/separated/g" *.tw
+$GREP "\bseperately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperately\b/separately/g" *.tw
+$GREP "\bseperates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperates\b/separates/g" *.tw
+$GREP "\bseperating\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperating\b/separating/g" *.tw
+$GREP "\bseperation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperation\b/separation/g" *.tw
+$GREP "\bseperatism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperatism\b/separatism/g" *.tw
+$GREP "\bseperatist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseperatist\b/separatist/g" *.tw
+$GREP "\bsepina\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsepina\b/subpoena/g" *.tw
+$GREP "\bsergent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsergent\b/sergeant/g" *.tw
+$GREP "\bsettelement\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsettelement\b/settlement/g" *.tw
+$GREP "\bsettlment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsettlment\b/settlement/g" *.tw
+$GREP "\bsevereal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsevereal\b/several/g" *.tw
+$GREP "\bseverley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseverley\b/severely/g" *.tw
+$GREP "\bseverly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bseverly\b/severely/g" *.tw
+$GREP "\bsevice\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsevice\b/service/g" *.tw
+$GREP "\bshadasloo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshadasloo\b/shadaloo/g" *.tw
+$GREP "\bshaddow\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshaddow\b/shadow/g" *.tw
+$GREP "\bshadoloo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshadoloo\b/shadaloo/g" *.tw
+$GREP "\bsheild\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsheild\b/shield/g" *.tw
+$GREP "\bsherif\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsherif\b/sheriff/g" *.tw
+$GREP "\bshineing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshineing\b/shining/g" *.tw
+$GREP "\bshiped\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshiped\b/shipped/g" *.tw
+$GREP "\bshiping\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshiping\b/shipping/g" *.tw
+$GREP "\bshopkeeepers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshopkeeepers\b/shopkeepers/g" *.tw
+$GREP "\bshorly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshorly\b/shortly/g" *.tw
+$GREP "\bshortwhile\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshortwhile\b/short while/g" *.tw
+$GREP "\bshoudl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshoudl\b/should/g" *.tw
+$GREP "\bshouldnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshouldnt\b/should not/g" *.tw
+$GREP "\bshreak\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshreak\b/shriek/g" *.tw
+$GREP "\bshrinked\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bshrinked\b/shrunk/g" *.tw
+$GREP "\bsicne\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsicne\b/since/g" *.tw
+$GREP "\bsideral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsideral\b/sidereal/g" *.tw
+$GREP "\bsiezure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsiezure\b/seizure/g" *.tw
+$GREP "\bsiezures\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsiezures\b/seizures/g" *.tw
+$GREP "\bsiginificant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsiginificant\b/significant/g" *.tw
+$GREP "\bsignficant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignficant\b/significant/g" *.tw
+$GREP "\bsignficiant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignficiant\b/significant/g" *.tw
+$GREP "\bsignfies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignfies\b/signifies/g" *.tw
+$GREP "\bsignifantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignifantly\b/significantly/g" *.tw
+$GREP "\bsignificently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignificently\b/significantly/g" *.tw
+$GREP "\bsignifigant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignifigant\b/significant/g" *.tw
+$GREP "\bsignifigantly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignifigantly\b/significantly/g" *.tw
+$GREP "\bsignitories\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignitories\b/signatories/g" *.tw
+$GREP "\bsignitory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsignitory\b/signatory/g" *.tw
+$GREP "\bsimilarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimilarily\b/similarly/g" *.tw
+$GREP "\bsimiliar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimiliar\b/similar/g" *.tw
+$GREP "\bsimiliarity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimiliarity\b/similarity/g" *.tw
+$GREP "\bsimiliarly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimiliarly\b/similarly/g" *.tw
+$GREP "\bsimmilar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimmilar\b/similar/g" *.tw
+$GREP "\bsimpley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimpley\b/simply/g" *.tw
+$GREP "\bsimplier\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimplier\b/simpler/g" *.tw
+$GREP "\bsimultanous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimultanous\b/simultaneous/g" *.tw
+$GREP "\bsimultanously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsimultanously\b/simultaneously/g" *.tw
+$GREP "\bsincerley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsincerley\b/sincerely/g" *.tw
+$GREP "\bsingsog\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsingsog\b/singsong/g" *.tw
+$GREP "\bSionist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSionist\b/Zionist/g" *.tw
+$GREP "\bSionists\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSionists\b/Zionists/g" *.tw
+$GREP "\bSixtin\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSixtin\b/Sistine/g" *.tw
+$GREP "\bSkagerak\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bSkagerak\b/Skagerrak/g" *.tw
+$GREP "\bskateing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bskateing\b/skating/g" *.tw
+$GREP "\bslaugterhouses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bslaugterhouses\b/slaughterhouses/g" *.tw
+$GREP "\bslighly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bslighly\b/slightly/g" *.tw
+$GREP "\bslippy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bslippy\b/slippery/g" *.tw
+$GREP "\bslowy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bslowy\b/slowly/g" *.tw
+$GREP "\bsmae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsmae\b/same/g" *.tw
+$GREP "\bsmealting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsmealting\b/smelting/g" *.tw
+$GREP "\bsmoe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsmoe\b/some/g" *.tw
+$GREP "\bsneeks\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsneeks\b/sneaks/g" *.tw
+$GREP "\bsnese\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsnese\b/sneeze/g" *.tw
+$GREP "\bsocalism\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsocalism\b/socialism/g" *.tw
+$GREP "\bsocities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsocities\b/societies/g" *.tw
+$GREP "\bsoem\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoem\b/some/g" *.tw
+$GREP "\bsofware\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsofware\b/software/g" *.tw
+$GREP "\bsohw\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsohw\b/show/g" *.tw
+$GREP "\bsoilders\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoilders\b/soldiers/g" *.tw
+$GREP "\bsolatary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsolatary\b/solitary/g" *.tw
+$GREP "\bsoley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoley\b/solely/g" *.tw
+$GREP "\bsoliders\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoliders\b/soldiers/g" *.tw
+$GREP "\bsoliliquy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoliliquy\b/soliloquy/g" *.tw
+$GREP "\bsoluable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoluable\b/soluble/g" *.tw
+$GREP "\bsomene\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsomene\b/someone/g" *.tw
+$GREP "\bsomtimes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsomtimes\b/sometimes/g" *.tw
+$GREP "\bsomwhere\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsomwhere\b/somewhere/g" *.tw
+$GREP "\bsophicated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsophicated\b/sophisticated/g" *.tw
+$GREP "\bsophmore\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsophmore\b/sophomore/g" *.tw
+$GREP "\bsorceror\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsorceror\b/sorcerer/g" *.tw
+$GREP "\bsorrounding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsorrounding\b/surrounding/g" *.tw
+$GREP "\bsotry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsotry\b/story/g" *.tw
+$GREP "\bsoudn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoudn\b/sound/g" *.tw
+$GREP "\bsoudns\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoudns\b/sounds/g" *.tw
+$GREP "\bsountrack\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsountrack\b/soundtrack/g" *.tw
+$GREP "\bsourth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsourth\b/south/g" *.tw
+$GREP "\bsourthern\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsourthern\b/southern/g" *.tw
+$GREP "\bsouvenier\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsouvenier\b/souvenir/g" *.tw
+$GREP "\bsouveniers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsouveniers\b/souvenirs/g" *.tw
+$GREP "\bsoveits\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoveits\b/soviets/g" *.tw
+$GREP "\bsovereignity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsovereignity\b/sovereignty/g" *.tw
+$GREP "\bsoverign\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoverign\b/sovereign/g" *.tw
+$GREP "\bsoverignity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoverignity\b/sovereignty/g" *.tw
+$GREP "\bsoverignty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsoverignty\b/sovereignty/g" *.tw
+$GREP "\bspainish\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspainish\b/Spanish/g" *.tw
+$GREP "\bspeach\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspeach\b/speech/g" *.tw
+$GREP "\bspecfic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspecfic\b/specific/g" *.tw
+$GREP "\bspecifiying\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspecifiying\b/specifying/g" *.tw
+$GREP "\bspeciman\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspeciman\b/specimen/g" *.tw
+$GREP "\bspectauclar\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspectauclar\b/spectacular/g" *.tw
+$GREP "\bspectaulars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspectaulars\b/spectaculars/g" *.tw
+$GREP "\bspectum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspectum\b/spectrum/g" *.tw
+$GREP "\bspeices\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspeices\b/species/g" *.tw
+$GREP "\bspendour\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspendour\b/splendour/g" *.tw
+$GREP "\bspermatozoan\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspermatozoan\b/spermatozoon/g" *.tw
+$GREP "\bspoace\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspoace\b/space/g" *.tw
+$GREP "\bsponser\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsponser\b/sponsor/g" *.tw
+$GREP "\bsponsered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsponsered\b/sponsored/g" *.tw
+$GREP "\bspontanous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspontanous\b/spontaneous/g" *.tw
+$GREP "\bsponzored\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsponzored\b/sponsored/g" *.tw
+$GREP "\bspoonfulls\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspoonfulls\b/spoonfuls/g" *.tw
+$GREP "\bsppeches\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsppeches\b/speeches/g" *.tw
+$GREP "\bspreaded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspreaded\b/spread/g" *.tw
+$GREP "\bsprech\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsprech\b/speech/g" *.tw
+$GREP "\bspred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspred\b/spread/g" *.tw
+$GREP "\bspriritual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspriritual\b/spiritual/g" *.tw
+$GREP "\bspritual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bspritual\b/spiritual/g" *.tw
+$GREP "\bsqaure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsqaure\b/square/g" *.tw
+$GREP "\bstablility\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstablility\b/stability/g" *.tw
+$GREP "\bstainlees\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstainlees\b/stainless/g" *.tw
+$GREP "\bstaion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstaion\b/station/g" *.tw
+$GREP "\bstandars\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstandars\b/standards/g" *.tw
+$GREP "\bstange\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstange\b/strange/g" *.tw
+$GREP "\bstartegic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstartegic\b/strategic/g" *.tw
+$GREP "\bstartegies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstartegies\b/strategies/g" *.tw
+$GREP "\bstartegy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstartegy\b/strategy/g" *.tw
+$GREP "\bstateman\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstateman\b/statesman/g" *.tw
+$GREP "\bstatememts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstatememts\b/statements/g" *.tw
+$GREP "\bstatment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstatment\b/statement/g" *.tw
+$GREP "\bsteriods\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsteriods\b/steroids/g" *.tw
+$GREP "\bsterotypes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsterotypes\b/stereotypes/g" *.tw
+$GREP "\bstilus\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstilus\b/stylus/g" *.tw
+$GREP "\bstingent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstingent\b/stringent/g" *.tw
+$GREP "\bstiring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstiring\b/stirring/g" *.tw
+$GREP "\bstirrs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstirrs\b/stirs/g" *.tw
+$GREP "\bstlye\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstlye\b/style/g" *.tw
+$GREP "\bstomache\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstomache\b/stomach/g" *.tw
+$GREP "\bstong\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstong\b/strong/g" *.tw
+$GREP "\bstopry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstopry\b/story/g" *.tw
+$GREP "\bstoreis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstoreis\b/stories/g" *.tw
+$GREP "\bstorise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstorise\b/stories/g" *.tw
+$GREP "\bstornegst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstornegst\b/strongest/g" *.tw
+$GREP "\bstoyr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstoyr\b/story/g" *.tw
+$GREP "\bstpo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstpo\b/stop/g" *.tw
+$GREP "\bstradegies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstradegies\b/strategies/g" *.tw
+$GREP "\bstradegy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstradegy\b/strategy/g" *.tw
+$GREP "\bstratagically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstratagically\b/strategically/g" *.tw
+$GREP "\bstreemlining\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstreemlining\b/streamlining/g" *.tw
+$GREP "\bstregth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstregth\b/strength/g" *.tw
+$GREP "\bstrenghen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenghen\b/strengthen/g" *.tw
+$GREP "\bstrenghened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenghened\b/strengthened/g" *.tw
+$GREP "\bstrenghening\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenghening\b/strengthening/g" *.tw
+$GREP "\bstrenght\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenght\b/strength/g" *.tw
+$GREP "\bstrenghten\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenghten\b/strengthen/g" *.tw
+$GREP "\bstrenghtened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenghtened\b/strengthened/g" *.tw
+$GREP "\bstrenghtening\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenghtening\b/strengthening/g" *.tw
+$GREP "\bstrengtened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrengtened\b/strengthened/g" *.tw
+$GREP "\bstrenous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrenous\b/strenuous/g" *.tw
+$GREP "\bstrictist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrictist\b/strictest/g" *.tw
+$GREP "\bstrikely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrikely\b/strikingly/g" *.tw
+$GREP "\bstrnad\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstrnad\b/strand/g" *.tw
+$GREP "\bstructual\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstructual\b/structural/g" *.tw
+$GREP "\bstubborness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstubborness\b/stubbornness/g" *.tw
+$GREP "\bstucture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstucture\b/structure/g" *.tw
+$GREP "\bstuctured\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstuctured\b/structured/g" *.tw
+$GREP "\bstuddy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstuddy\b/study/g" *.tw
+$GREP "\bstuding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstuding\b/studying/g" *.tw
+$GREP "\bstuggling\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bstuggling\b/struggling/g" *.tw
+$GREP "\bsturcture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsturcture\b/structure/g" *.tw
+$GREP "\bsubcatagories\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubcatagories\b/subcategories/g" *.tw
+$GREP "\bsubcatagory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubcatagory\b/subcategory/g" *.tw
+$GREP "\bsubconsiously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubconsiously\b/subconsciously/g" *.tw
+$GREP "\bsubjudgation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubjudgation\b/subjugation/g" *.tw
+$GREP "\bsubmachne\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubmachne\b/submachine/g" *.tw
+$GREP "\bsubpecies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubpecies\b/subspecies/g" *.tw
+$GREP "\bsubsidary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubsidary\b/subsidiary/g" *.tw
+$GREP "\bsubsiduary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubsiduary\b/subsidiary/g" *.tw
+$GREP "\bsubsquent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubsquent\b/subsequent/g" *.tw
+$GREP "\bsubsquently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubsquently\b/subsequently/g" *.tw
+$GREP "\bsubstace\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstace\b/substance/g" *.tw
+$GREP "\bsubstancial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstancial\b/substantial/g" *.tw
+$GREP "\bsubstatial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstatial\b/substantial/g" *.tw
+$GREP "\bsubstituded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstituded\b/substituted/g" *.tw
+$GREP "\bsubstract\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstract\b/subtract/g" *.tw
+$GREP "\bsubstracted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstracted\b/subtracted/g" *.tw
+$GREP "\bsubstracting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstracting\b/subtracting/g" *.tw
+$GREP "\bsubstraction\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstraction\b/subtraction/g" *.tw
+$GREP "\bsubstracts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubstracts\b/subtracts/g" *.tw
+$GREP "\bsubtances\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubtances\b/substances/g" *.tw
+$GREP "\bsubterranian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsubterranian\b/subterranean/g" *.tw
+$GREP "\bsuburburban\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuburburban\b/suburban/g" *.tw
+$GREP "\bsuccceeded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccceeded\b/succeeded/g" *.tw
+$GREP "\bsucccesses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucccesses\b/successes/g" *.tw
+$GREP "\bsuccedded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccedded\b/succeeded/g" *.tw
+$GREP "\bsucceded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucceded\b/succeeded/g" *.tw
+$GREP "\bsucceds\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucceds\b/succeeds/g" *.tw
+$GREP "\bsuccesful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccesful\b/successful/g" *.tw
+$GREP "\bsuccesfully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccesfully\b/successfully/g" *.tw
+$GREP "\bsuccesfuly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccesfuly\b/successfully/g" *.tw
+$GREP "\bsuccesion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccesion\b/succession/g" *.tw
+$GREP "\bsuccesive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccesive\b/successive/g" *.tw
+$GREP "\bsuccessfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccessfull\b/successful/g" *.tw
+$GREP "\bsuccessully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccessully\b/successfully/g" *.tw
+$GREP "\bsuccsess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccsess\b/success/g" *.tw
+$GREP "\bsuccsessfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuccsessfull\b/successful/g" *.tw
+$GREP "\bsuceed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuceed\b/succeed/g" *.tw
+$GREP "\bsuceeded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuceeded\b/succeeded/g" *.tw
+$GREP "\bsuceeding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuceeding\b/succeeding/g" *.tw
+$GREP "\bsuceeds\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuceeds\b/succeeds/g" *.tw
+$GREP "\bsucesful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucesful\b/successful/g" *.tw
+$GREP "\bsucesfully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucesfully\b/successfully/g" *.tw
+$GREP "\bsucesfuly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucesfuly\b/successfully/g" *.tw
+$GREP "\bsucesion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucesion\b/succession/g" *.tw
+$GREP "\bsucess\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucess\b/success/g" *.tw
+$GREP "\bsucesses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucesses\b/successes/g" *.tw
+$GREP "\bsucessful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessful\b/successful/g" *.tw
+$GREP "\bsucessfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessfull\b/successful/g" *.tw
+$GREP "\bsucessfully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessfully\b/successfully/g" *.tw
+$GREP "\bsucessfuly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessfuly\b/successfully/g" *.tw
+$GREP "\bsucession\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucession\b/succession/g" *.tw
+$GREP "\bsucessive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessive\b/successive/g" *.tw
+$GREP "\bsucessor\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessor\b/successor/g" *.tw
+$GREP "\bsucessot\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucessot\b/successor/g" *.tw
+$GREP "\bsucide\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucide\b/suicide/g" *.tw
+$GREP "\bsucidial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsucidial\b/suicidal/g" *.tw
+$GREP "\bsudent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsudent\b/student/g" *.tw
+$GREP "\bsudents\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsudents\b/students/g" *.tw
+$GREP "\bsufferage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsufferage\b/suffrage/g" *.tw
+$GREP "\bsufferred\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsufferred\b/suffered/g" *.tw
+$GREP "\bsufferring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsufferring\b/suffering/g" *.tw
+$GREP "\bsufficent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsufficent\b/sufficient/g" *.tw
+$GREP "\bsufficently\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsufficently\b/sufficiently/g" *.tw
+$GREP "\bsumary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsumary\b/summary/g" *.tw
+$GREP "\bsunglases\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsunglases\b/sunglasses/g" *.tw
+$GREP "\bsuop\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuop\b/soup/g" *.tw
+$GREP "\bsuperceeded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuperceeded\b/superseded/g" *.tw
+$GREP "\bsuperintendant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuperintendant\b/superintendent/g" *.tw
+$GREP "\bsuphisticated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuphisticated\b/sophisticated/g" *.tw
+$GREP "\bsuplimented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuplimented\b/supplemented/g" *.tw
+$GREP "\bsupose\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupose\b/suppose/g" *.tw
+$GREP "\bsuposed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuposed\b/supposed/g" *.tw
+$GREP "\bsuposedly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuposedly\b/supposedly/g" *.tw
+$GREP "\bsuposes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuposes\b/supposes/g" *.tw
+$GREP "\bsuposing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuposing\b/supposing/g" *.tw
+$GREP "\bsupplamented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupplamented\b/supplemented/g" *.tw
+$GREP "\bsuppliementing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuppliementing\b/supplementing/g" *.tw
+$GREP "\bsuppoed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuppoed\b/supposed/g" *.tw
+$GREP "\bsupposingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupposingly\b/supposedly/g" *.tw
+$GREP "\bsuppy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuppy\b/supply/g" *.tw
+$GREP "\bsuprassing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprassing\b/surpassing/g" *.tw
+$GREP "\bsupress\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupress\b/suppress/g" *.tw
+$GREP "\bsupressed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupressed\b/suppressed/g" *.tw
+$GREP "\bsupresses\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupresses\b/suppresses/g" *.tw
+$GREP "\bsupressing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsupressing\b/suppressing/g" *.tw
+$GREP "\bsuprise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprise\b/surprise/g" *.tw
+$GREP "\bsuprised\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprised\b/surprised/g" *.tw
+$GREP "\bsuprising\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprising\b/surprising/g" *.tw
+$GREP "\bsuprisingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprisingly\b/surprisingly/g" *.tw
+$GREP "\bsuprize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprize\b/surprise/g" *.tw
+$GREP "\bsuprized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprized\b/surprised/g" *.tw
+$GREP "\bsuprizing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprizing\b/surprising/g" *.tw
+$GREP "\bsuprizingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuprizingly\b/surprisingly/g" *.tw
+$GREP "\bsurfce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurfce\b/surface/g" *.tw
+$GREP "\bsuround\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuround\b/surround/g" *.tw
+$GREP "\bsurounded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurounded\b/surrounded/g" *.tw
+$GREP "\bsurounding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurounding\b/surrounding/g" *.tw
+$GREP "\bsuroundings\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuroundings\b/surroundings/g" *.tw
+$GREP "\bsurounds\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurounds\b/surrounds/g" *.tw
+$GREP "\bsurplanted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurplanted\b/supplanted/g" *.tw
+$GREP "\bsurpress\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurpress\b/suppress/g" *.tw
+$GREP "\bsurpressed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurpressed\b/suppressed/g" *.tw
+$GREP "\bsurprize\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurprize\b/surprise/g" *.tw
+$GREP "\bsurprized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurprized\b/surprised/g" *.tw
+$GREP "\bsurprizing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurprizing\b/surprising/g" *.tw
+$GREP "\bsurprizingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurprizingly\b/surprisingly/g" *.tw
+$GREP "\bsurrepetitious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurrepetitious\b/surreptitious/g" *.tw
+$GREP "\bsurrepetitiously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurrepetitiously\b/surreptitiously/g" *.tw
+$GREP "\bsurreptious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurreptious\b/surreptitious/g" *.tw
+$GREP "\bsurreptiously\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurreptiously\b/surreptitiously/g" *.tw
+$GREP "\bsurronded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurronded\b/surrounded/g" *.tw
+$GREP "\bsurrouded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurrouded\b/surrounded/g" *.tw
+$GREP "\bsurrouding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurrouding\b/surrounding/g" *.tw
+$GREP "\bsurrundering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurrundering\b/surrendering/g" *.tw
+$GREP "\bsurveilence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurveilence\b/surveillance/g" *.tw
+$GREP "\bsurveill\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurveill\b/surveil/g" *.tw
+$GREP "\bsurveyer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurveyer\b/surveyor/g" *.tw
+$GREP "\bsurviver\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurviver\b/survivor/g" *.tw
+$GREP "\bsurvivers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurvivers\b/survivors/g" *.tw
+$GREP "\bsurvivied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsurvivied\b/survived/g" *.tw
+$GREP "\bsuseptable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuseptable\b/susceptible/g" *.tw
+$GREP "\bsuseptible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuseptible\b/susceptible/g" *.tw
+$GREP "\bsuspention\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsuspention\b/suspension/g" *.tw
+$GREP "\bswaer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bswaer\b/swear/g" *.tw
+$GREP "\bswaers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bswaers\b/swears/g" *.tw
+$GREP "\bswepth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bswepth\b/swept/g" *.tw
+$GREP "\bswiming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bswiming\b/swimming/g" *.tw
+$GREP "\bsyas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsyas\b/says/g" *.tw
+$GREP "\bsymetrical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsymetrical\b/symmetrical/g" *.tw
+$GREP "\bsymetrically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsymetrically\b/symmetrically/g" *.tw
+$GREP "\bsymetry\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsymetry\b/symmetry/g" *.tw
+$GREP "\bsymettric\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsymettric\b/symmetric/g" *.tw
+$GREP "\bsymmetral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsymmetral\b/symmetric/g" *.tw
+$GREP "\bsymmetricaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsymmetricaly\b/symmetrically/g" *.tw
+$GREP "\bsynagouge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsynagouge\b/synagogue/g" *.tw
+$GREP "\bsyncronization\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsyncronization\b/synchronization/g" *.tw
+$GREP "\bsynonomous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsynonomous\b/synonymous/g" *.tw
+$GREP "\bsynonymns\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsynonymns\b/synonyms/g" *.tw
+$GREP "\bsynphony\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsynphony\b/symphony/g" *.tw
+$GREP "\bsyphyllis\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsyphyllis\b/syphilis/g" *.tw
+$GREP "\bsypmtoms\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsypmtoms\b/symptoms/g" *.tw
+$GREP "\bsyrap\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsyrap\b/syrup/g" *.tw
+$GREP "\bsysmatically\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsysmatically\b/systematically/g" *.tw
+$GREP "\bsytem\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsytem\b/system/g" *.tw
+$GREP "\bsytle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bsytle\b/style/g" *.tw
+$GREP "\btabacco\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btabacco\b/tobacco/g" *.tw
+$GREP "\btahn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btahn\b/than/g" *.tw
+$GREP "\btaht\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btaht\b/that/g" *.tw
+$GREP "\btalekd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btalekd\b/talked/g" *.tw
+$GREP "\btargetted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btargetted\b/targeted/g" *.tw
+$GREP "\btargetting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btargetting\b/targeting/g" *.tw
+$GREP "\btast\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btast\b/taste/g" *.tw
+$GREP "\btath\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btath\b/that/g" *.tw
+$GREP "\btatoo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btatoo\b/tattoo/g" *.tw
+$GREP "\btattooes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btattooes\b/tattoos/g" *.tw
+$GREP "\btaxanomic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btaxanomic\b/taxonomic/g" *.tw
+$GREP "\btaxanomy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btaxanomy\b/taxonomy/g" *.tw
+$GREP "\bteached\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bteached\b/taught/g" *.tw
+$GREP "\btechician\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btechician\b/technician/g" *.tw
+$GREP "\btechicians\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btechicians\b/technicians/g" *.tw
+$GREP "\btechiniques\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btechiniques\b/techniques/g" *.tw
+$GREP "\btechnitian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btechnitian\b/technician/g" *.tw
+$GREP "\btechnnology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btechnnology\b/technology/g" *.tw
+$GREP "\btechnolgy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btechnolgy\b/technology/g" *.tw
+$GREP "\bteh\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bteh\b/the/g" *.tw
+$GREP "\btehy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btehy\b/they/g" *.tw
+$GREP "\btelelevision\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btelelevision\b/television/g" *.tw
+$GREP "\btelevsion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btelevsion\b/television/g" *.tw
+$GREP "\btelphony\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btelphony\b/telephony/g" *.tw
+$GREP "\btemerature\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btemerature\b/temperature/g" *.tw
+$GREP "\btempalte\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btempalte\b/template/g" *.tw
+$GREP "\btempaltes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btempaltes\b/templates/g" *.tw
+$GREP "\btemparate\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btemparate\b/temperate/g" *.tw
+$GREP "\btemperarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btemperarily\b/temporarily/g" *.tw
+$GREP "\btemperment\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btemperment\b/temperament/g" *.tw
+$GREP "\btempertaure\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btempertaure\b/temperature/g" *.tw
+$GREP "\btemperture\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btemperture\b/temperature/g" *.tw
+$GREP "\btemprary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btemprary\b/temporary/g" *.tw
+$GREP "\btenacle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btenacle\b/tentacle/g" *.tw
+$GREP "\btenacles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btenacles\b/tentacles/g" *.tw
+$GREP "\btendacy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btendacy\b/tendency/g" *.tw
+$GREP "\btendancies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btendancies\b/tendencies/g" *.tw
+$GREP "\btendancy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btendancy\b/tendency/g" *.tw
+$GREP "\btennisplayer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btennisplayer\b/tennis player/g" *.tw
+$GREP "\btepmorarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btepmorarily\b/temporarily/g" *.tw
+$GREP "\bterrestial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bterrestial\b/terrestrial/g" *.tw
+$GREP "\bterriories\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bterriories\b/territories/g" *.tw
+$GREP "\bterriory\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bterriory\b/territory/g" *.tw
+$GREP "\bterritorist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bterritorist\b/terrorist/g" *.tw
+$GREP "\bterritoy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bterritoy\b/territory/g" *.tw
+$GREP "\bterroist\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bterroist\b/terrorist/g" *.tw
+$GREP "\btesticlular\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btesticlular\b/testicular/g" *.tw
+$GREP "\btestomony\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btestomony\b/testimony/g" *.tw
+$GREP "\btghe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btghe\b/the/g" *.tw
+$GREP "\btheather\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btheather\b/theater/g" *.tw
+$GREP "\btheese\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btheese\b/these/g" *.tw
+$GREP "\btheif\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btheif\b/thief/g" *.tw
+$GREP "\btheives\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btheives\b/thieves/g" *.tw
+$GREP "\bthemselfs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthemselfs\b/themselves/g" *.tw
+$GREP "\bthemslves\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthemslves\b/themselves/g" *.tw
+$GREP "\btherafter\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btherafter\b/thereafter/g" *.tw
+$GREP "\btherby\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btherby\b/thereby/g" *.tw
+$GREP "\btheri\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btheri\b/their/g" *.tw
+$GREP "\btheyre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btheyre\b/they're/g" *.tw
+$GREP "\bthgat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthgat\b/that/g" *.tw
+$GREP "\bthge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthge\b/the/g" *.tw
+$GREP "\bthier\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthier\b/their/g" *.tw
+$GREP "\bthign\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthign\b/thing/g" *.tw
+$GREP "\bthigns\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthigns\b/things/g" *.tw
+$GREP "\bthigsn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthigsn\b/things/g" *.tw
+$GREP "\bthikn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthikn\b/think/g" *.tw
+$GREP "\bthikns\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthikns\b/thinks/g" *.tw
+$GREP "\bthiunk\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthiunk\b/think/g" *.tw
+$GREP "\bthn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthn\b/then/g" *.tw
+$GREP "\bthna\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthna\b/than/g" *.tw
+$GREP "\bthne\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthne\b/then/g" *.tw
+$GREP "\bthnig\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthnig\b/thing/g" *.tw
+$GREP "\bthnigs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthnigs\b/things/g" *.tw
+$GREP "\bthoughout\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthoughout\b/throughout/g" *.tw
+$GREP "\bthreatend\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthreatend\b/threatened/g" *.tw
+$GREP "\bthreatning\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthreatning\b/threatening/g" *.tw
+$GREP "\bthreee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthreee\b/three/g" *.tw
+$GREP "\bthreshhold\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthreshhold\b/threshold/g" *.tw
+$GREP "\bthrid\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthrid\b/third/g" *.tw
+$GREP "\bthrorough\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthrorough\b/thorough/g" *.tw
+$GREP "\bthroughly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthroughly\b/thoroughly/g" *.tw
+$GREP "\bthrougout\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthrougout\b/throughout/g" *.tw
+$GREP "\bthru\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthru\b/through/g" *.tw
+$GREP "\bthsi\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthsi\b/this/g" *.tw
+$GREP "\bthsoe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthsoe\b/those/g" *.tw
+$GREP "\bthta\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthta\b/that/g" *.tw
+$GREP "\bthyat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bthyat\b/that/g" *.tw
+$GREP "\btihkn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btihkn\b/think/g" *.tw
+$GREP "\btihs\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btihs\b/this/g" *.tw
+$GREP "\btimne\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btimne\b/time/g" *.tw
+$GREP "\btje\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btje\b/the/g" *.tw
+$GREP "\btjhe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btjhe\b/the/g" *.tw
+$GREP "\btjpanishad\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btjpanishad\b/upanishad/g" *.tw
+$GREP "\btkae\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btkae\b/take/g" *.tw
+$GREP "\btkaes\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btkaes\b/takes/g" *.tw
+$GREP "\btkaing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btkaing\b/taking/g" *.tw
+$GREP "\btlaking\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btlaking\b/talking/g" *.tw
+$GREP "\btobbaco\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btobbaco\b/tobacco/g" *.tw
+$GREP "\btodays\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btodays\b/today's/g" *.tw
+$GREP "\btodya\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btodya\b/today/g" *.tw
+$GREP "\btoghether\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btoghether\b/together/g" *.tw
+$GREP "\btoke\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btoke\b/took/g" *.tw
+$GREP "\btolerence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btolerence\b/tolerance/g" *.tw
+$GREP "\bTolkein\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bTolkein\b/Tolkien/g" *.tw
+$GREP "\btomatos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btomatos\b/tomatoes/g" *.tw
+$GREP "\btommorow\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btommorow\b/tomorrow/g" *.tw
+$GREP "\btommorrow\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btommorrow\b/tomorrow/g" *.tw
+$GREP "\btongiht\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btongiht\b/tonight/g" *.tw
+$GREP "\btoriodal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btoriodal\b/toroidal/g" *.tw
+$GREP "\btormenters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btormenters\b/tormentors/g" *.tw
+$GREP "\btornadoe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btornadoe\b/tornado/g" *.tw
+$GREP "\btorpeados\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btorpeados\b/torpedoes/g" *.tw
+$GREP "\btorpedos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btorpedos\b/torpedoes/g" *.tw
+$GREP "\btortise \b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btortise \b/tortoise/g" *.tw
+$GREP "\btothe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btothe\b/to the/g" *.tw
+$GREP "\btoubles\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btoubles\b/troubles/g" *.tw
+$GREP "\btounge\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btounge\b/tongue/g" *.tw
+$GREP "\btowords\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btowords\b/towards/g" *.tw
+$GREP "\btowrad\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btowrad\b/toward/g" *.tw
+$GREP "\btradionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btradionally\b/traditionally/g" *.tw
+$GREP "\btraditionaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btraditionaly\b/traditionally/g" *.tw
+$GREP "\btraditionnal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btraditionnal\b/traditional/g" *.tw
+$GREP "\btraditition\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btraditition\b/tradition/g" *.tw
+$GREP "\btradtionally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btradtionally\b/traditionally/g" *.tw
+$GREP "\btrafficed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btrafficed\b/trafficked/g" *.tw
+$GREP "\btrafficing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btrafficing\b/trafficking/g" *.tw
+$GREP "\btrafic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btrafic\b/traffic/g" *.tw
+$GREP "\btrancendent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btrancendent\b/transcendent/g" *.tw
+$GREP "\btrancending\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btrancending\b/transcending/g" *.tw
+$GREP "\btranform\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranform\b/transform/g" *.tw
+$GREP "\btranformed\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranformed\b/transformed/g" *.tw
+$GREP "\btranscendance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranscendance\b/transcendence/g" *.tw
+$GREP "\btranscendant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranscendant\b/transcendent/g" *.tw
+$GREP "\btranscendentational\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranscendentational\b/transcendental/g" *.tw
+$GREP "\btransending\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransending\b/transcending/g" *.tw
+$GREP "\btransesxuals\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransesxuals\b/transsexuals/g" *.tw
+$GREP "\btransfered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransfered\b/transferred/g" *.tw
+$GREP "\btransfering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransfering\b/transferring/g" *.tw
+$GREP "\btransformaton\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransformaton\b/transformation/g" *.tw
+$GREP "\btransistion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransistion\b/transition/g" *.tw
+$GREP "\btranslater\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranslater\b/translator/g" *.tw
+$GREP "\btranslaters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btranslaters\b/translators/g" *.tw
+$GREP "\btransmissable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransmissable\b/transmissible/g" *.tw
+$GREP "\btransporation\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btransporation\b/transportation/g" *.tw
+$GREP "\btremelo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btremelo\b/tremolo/g" *.tw
+$GREP "\btremelos\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btremelos\b/tremolos/g" *.tw
+$GREP "\btriguered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btriguered\b/triggered/g" *.tw
+$GREP "\btriology\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btriology\b/trilogy/g" *.tw
+$GREP "\btroling\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btroling\b/trolling/g" *.tw
+$GREP "\btroup\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btroup\b/troupe/g" *.tw
+$GREP "\btruely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btruely\b/truly/g" *.tw
+$GREP "\btrustworthyness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btrustworthyness\b/trustworthiness/g" *.tw
+$GREP "\bTuscon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bTuscon\b/Tucson/g" *.tw
+$GREP "\btust\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btust\b/trust/g" *.tw
+$GREP "\btwelth\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btwelth\b/twelfth/g" *.tw
+$GREP "\btwon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btwon\b/town/g" *.tw
+$GREP "\btwpo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btwpo\b/two/g" *.tw
+$GREP "\btyhat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btyhat\b/that/g" *.tw
+$GREP "\btyhe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btyhe\b/they/g" *.tw
+$GREP "\btypcial\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btypcial\b/typical/g" *.tw
+$GREP "\btypicaly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btypicaly\b/typically/g" *.tw
+$GREP "\btyranies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btyranies\b/tyrannies/g" *.tw
+$GREP "\btyrany\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btyrany\b/tyranny/g" *.tw
+$GREP "\btyrranies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btyrranies\b/tyrannies/g" *.tw
+$GREP "\btyrrany\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\btyrrany\b/tyranny/g" *.tw
+$GREP "\bubiquitious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bubiquitious\b/ubiquitous/g" *.tw
+$GREP "\bublisher\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bublisher\b/publisher/g" *.tw
+$GREP "\buise\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buise\b/use/g" *.tw
+$GREP "\bUkranian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bUkranian\b/Ukrainian/g" *.tw
+$GREP "\bultimely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bultimely\b/ultimately/g" *.tw
+$GREP "\bunacompanied\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunacompanied\b/unaccompanied/g" *.tw
+$GREP "\bunahppy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunahppy\b/unhappy/g" *.tw
+$GREP "\bunanymous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunanymous\b/unanimous/g" *.tw
+$GREP "\bunathorised\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunathorised\b/unauthorised/g" *.tw
+$GREP "\bunavailible\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunavailible\b/unavailable/g" *.tw
+$GREP "\bunballance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunballance\b/unbalance/g" *.tw
+$GREP "\bunbeknowst\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunbeknowst\b/unbeknownst/g" *.tw
+$GREP "\bunbeleivable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunbeleivable\b/unbelievable/g" *.tw
+$GREP "\buncertainity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buncertainity\b/uncertainty/g" *.tw
+$GREP "\bunchallengable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunchallengable\b/unchallengeable/g" *.tw
+$GREP "\bunchangable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunchangable\b/unchangeable/g" *.tw
+$GREP "\buncompetive\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buncompetive\b/uncompetitive/g" *.tw
+$GREP "\bunconcious\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunconcious\b/unconscious/g" *.tw
+$GREP "\bunconciousness\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunconciousness\b/unconsciousness/g" *.tw
+$GREP "\bunconfortability\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunconfortability\b/discomfort/g" *.tw
+$GREP "\buncontitutional\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buncontitutional\b/unconstitutional/g" *.tw
+$GREP "\bunconvential\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunconvential\b/unconventional/g" *.tw
+$GREP "\bundecideable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bundecideable\b/undecidable/g" *.tw
+$GREP "\bunderstoon\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunderstoon\b/understood/g" *.tw
+$GREP "\bundesireable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bundesireable\b/undesirable/g" *.tw
+$GREP "\bundetecable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bundetecable\b/undetectable/g" *.tw
+$GREP "\bundoubtely\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bundoubtely\b/undoubtedly/g" *.tw
+$GREP "\bundreground\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bundreground\b/underground/g" *.tw
+$GREP "\buneccesary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buneccesary\b/unnecessary/g" *.tw
+$GREP "\bunecessary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunecessary\b/unnecessary/g" *.tw
+$GREP "\bunequalities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunequalities\b/inequalities/g" *.tw
+$GREP "\bunforseen\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunforseen\b/unforeseen/g" *.tw
+$GREP "\bunforetunately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunforetunately\b/unfortunately/g" *.tw
+$GREP "\bunforgetable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunforgetable\b/unforgettable/g" *.tw
+$GREP "\bunforgiveable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunforgiveable\b/unforgivable/g" *.tw
+$GREP "\bunfortunatley\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunfortunatley\b/unfortunately/g" *.tw
+$GREP "\bunfortunatly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunfortunatly\b/unfortunately/g" *.tw
+$GREP "\bunfourtunately\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunfourtunately\b/unfortunately/g" *.tw
+$GREP "\bunihabited\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunihabited\b/uninhabited/g" *.tw
+$GREP "\bunilateraly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunilateraly\b/unilaterally/g" *.tw
+$GREP "\bunilatreal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunilatreal\b/unilateral/g" *.tw
+$GREP "\bunilatreally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunilatreally\b/unilaterally/g" *.tw
+$GREP "\buninterruped\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buninterruped\b/uninterrupted/g" *.tw
+$GREP "\buninterupted\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buninterupted\b/uninterrupted/g" *.tw
+$GREP "\bUnitesStates\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bUnitesStates\b/UnitedStates/g" *.tw
+$GREP "\buniveral\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buniveral\b/universal/g" *.tw
+$GREP "\buniveristies\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buniveristies\b/universities/g" *.tw
+$GREP "\buniveristy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buniveristy\b/university/g" *.tw
+$GREP "\buniverity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buniverity\b/university/g" *.tw
+$GREP "\buniverstiy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buniverstiy\b/university/g" *.tw
+$GREP "\bunivesities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunivesities\b/universities/g" *.tw
+$GREP "\bunivesity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunivesity\b/university/g" *.tw
+$GREP "\bunkown\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunkown\b/unknown/g" *.tw
+$GREP "\bunlikey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunlikey\b/unlikely/g" *.tw
+$GREP "\bunmistakeably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunmistakeably\b/unmistakably/g" *.tw
+$GREP "\bunneccesarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunneccesarily\b/unnecessarily/g" *.tw
+$GREP "\bunneccesary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunneccesary\b/unnecessary/g" *.tw
+$GREP "\bunneccessarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunneccessarily\b/unnecessarily/g" *.tw
+$GREP "\bunneccessary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunneccessary\b/unnecessary/g" *.tw
+$GREP "\bunnecesarily\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunnecesarily\b/unnecessarily/g" *.tw
+$GREP "\bunnecesary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunnecesary\b/unnecessary/g" *.tw
+$GREP "\bunoffical\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunoffical\b/unofficial/g" *.tw
+$GREP "\bunoperational\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunoperational\b/nonoperational/g" *.tw
+$GREP "\bunoticeable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunoticeable\b/unnoticeable/g" *.tw
+$GREP "\bunplease\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunplease\b/displease/g" *.tw
+$GREP "\bunplesant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunplesant\b/unpleasant/g" *.tw
+$GREP "\bunprecendented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunprecendented\b/unprecedented/g" *.tw
+$GREP "\bunprecidented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunprecidented\b/unprecedented/g" *.tw
+$GREP "\bunrepentent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunrepentent\b/unrepentant/g" *.tw
+$GREP "\bunrepetant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunrepetant\b/unrepentant/g" *.tw
+$GREP "\bunrepetent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunrepetent\b/unrepentant/g" *.tw
+$GREP "\bunsubstanciated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsubstanciated\b/unsubstantiated/g" *.tw
+$GREP "\bunsuccesful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuccesful\b/unsuccessful/g" *.tw
+$GREP "\bunsuccesfully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuccesfully\b/unsuccessfully/g" *.tw
+$GREP "\bunsuccessfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuccessfull\b/unsuccessful/g" *.tw
+$GREP "\bunsucesful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsucesful\b/unsuccessful/g" *.tw
+$GREP "\bunsucesfuly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsucesfuly\b/unsuccessfully/g" *.tw
+$GREP "\bunsucessful\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsucessful\b/unsuccessful/g" *.tw
+$GREP "\bunsucessfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsucessfull\b/unsuccessful/g" *.tw
+$GREP "\bunsucessfully\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsucessfully\b/unsuccessfully/g" *.tw
+$GREP "\bunsuprised\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuprised\b/unsurprised/g" *.tw
+$GREP "\bunsuprising\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuprising\b/unsurprising/g" *.tw
+$GREP "\bunsuprisingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuprisingly\b/unsurprisingly/g" *.tw
+$GREP "\bunsuprized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuprized\b/unsurprised/g" *.tw
+$GREP "\bunsuprizing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuprizing\b/unsurprising/g" *.tw
+$GREP "\bunsuprizingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsuprizingly\b/unsurprisingly/g" *.tw
+$GREP "\bunsurprized\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsurprized\b/unsurprised/g" *.tw
+$GREP "\bunsurprizing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsurprizing\b/unsurprising/g" *.tw
+$GREP "\bunsurprizingly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunsurprizingly\b/unsurprisingly/g" *.tw
+$GREP "\buntill\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buntill\b/until/g" *.tw
+$GREP "\buntranslateable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buntranslateable\b/untranslatable/g" *.tw
+$GREP "\bunuseable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunuseable\b/unusable/g" *.tw
+$GREP "\bunusuable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunusuable\b/unusable/g" *.tw
+$GREP "\bunviersity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunviersity\b/university/g" *.tw
+$GREP "\bunwarrented\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunwarrented\b/unwarranted/g" *.tw
+$GREP "\bunweildly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunweildly\b/unwieldy/g" *.tw
+$GREP "\bunwieldly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bunwieldly\b/unwieldy/g" *.tw
+$GREP "\bupcomming\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bupcomming\b/upcoming/g" *.tw
+$GREP "\bupgradded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bupgradded\b/upgraded/g" *.tw
+$GREP "\bupto\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bupto\b/up to/g" *.tw
+$GREP "\busally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\busally\b/usually/g" *.tw
+$GREP "\buseage\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buseage\b/usage/g" *.tw
+$GREP "\busefull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\busefull\b/useful/g" *.tw
+$GREP "\busefuly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\busefuly\b/usefully/g" *.tw
+$GREP "\buseing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\buseing\b/using/g" *.tw
+$GREP "\busualy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\busualy\b/usually/g" *.tw
+$GREP "\bususally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bususally\b/usually/g" *.tw
+$GREP "\bvaccum\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaccum\b/vacuum/g" *.tw
+$GREP "\bvaccume\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaccume\b/vacuum/g" *.tw
+$GREP "\bvacinity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvacinity\b/vicinity/g" *.tw
+$GREP "\bvaguaries\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaguaries\b/vagaries/g" *.tw
+$GREP "\bvaieties\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaieties\b/varieties/g" *.tw
+$GREP "\bvailidty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvailidty\b/validity/g" *.tw
+$GREP "\bvaletta\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaletta\b/valletta/g" *.tw
+$GREP "\bvaluble\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaluble\b/valuable/g" *.tw
+$GREP "\bvalueable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvalueable\b/valuable/g" *.tw
+$GREP "\bvarations\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvarations\b/variations/g" *.tw
+$GREP "\bvarient\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvarient\b/variant/g" *.tw
+$GREP "\bvariey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvariey\b/variety/g" *.tw
+$GREP "\bvaring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvaring\b/varying/g" *.tw
+$GREP "\bvarities\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvarities\b/varieties/g" *.tw
+$GREP "\bvarity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvarity\b/variety/g" *.tw
+$GREP "\bvasall\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvasall\b/vassal/g" *.tw
+$GREP "\bvasalls\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvasalls\b/vassals/g" *.tw
+$GREP "\bvegatarian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvegatarian\b/vegetarian/g" *.tw
+$GREP "\bvegitable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvegitable\b/vegetable/g" *.tw
+$GREP "\bvegitables\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvegitables\b/vegetables/g" *.tw
+$GREP "\bvegtable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvegtable\b/vegetable/g" *.tw
+$GREP "\bvehicule\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvehicule\b/vehicle/g" *.tw
+$GREP "\bvell\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvell\b/well/g" *.tw
+$GREP "\bvenemous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvenemous\b/venomous/g" *.tw
+$GREP "\bvengance\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvengance\b/vengeance/g" *.tw
+$GREP "\bvengence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvengence\b/vengeance/g" *.tw
+$GREP "\bverfication\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bverfication\b/verification/g" *.tw
+$GREP "\bverison\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bverison\b/version/g" *.tw
+$GREP "\bverisons\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bverisons\b/versions/g" *.tw
+$GREP "\bvermillion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvermillion\b/vermilion/g" *.tw
+$GREP "\bversitilaty\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bversitilaty\b/versatility/g" *.tw
+$GREP "\bversitlity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bversitlity\b/versatility/g" *.tw
+$GREP "\bvetween\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvetween\b/between/g" *.tw
+$GREP "\bveyr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bveyr\b/very/g" *.tw
+$GREP "\bvigilence\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvigilence\b/vigilance/g" *.tw
+$GREP "\bvigourous\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvigourous\b/vigorous/g" *.tw
+$GREP "\bvillian\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvillian\b/villain/g" *.tw
+$GREP "\bvillification\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvillification\b/vilification/g" *.tw
+$GREP "\bvillify\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvillify\b/vilify/g" *.tw
+$GREP "\bvincinity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvincinity\b/vicinity/g" *.tw
+$GREP "\bviolentce\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bviolentce\b/violence/g" *.tw
+$GREP "\bvirtualy\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvirtualy\b/virtually/g" *.tw
+$GREP "\bvirutal\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvirutal\b/virtual/g" *.tw
+$GREP "\bvirutally\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvirutally\b/virtually/g" *.tw
+$GREP "\bvisable\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvisable\b/visible/g" *.tw
+$GREP "\bvisably\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvisably\b/visibly/g" *.tw
+$GREP "\bvisting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvisting\b/visiting/g" *.tw
+$GREP "\bvistors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvistors\b/visitors/g" *.tw
+$GREP "\bvitories\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvitories\b/victories/g" *.tw
+$GREP "\bvolcanoe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolcanoe\b/volcano/g" *.tw
+$GREP "\bvoleyball\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvoleyball\b/volleyball/g" *.tw
+$GREP "\bvolontary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolontary\b/voluntary/g" *.tw
+$GREP "\bvolonteer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolonteer\b/volunteer/g" *.tw
+$GREP "\bvolonteered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolonteered\b/volunteered/g" *.tw
+$GREP "\bvolonteering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolonteering\b/volunteering/g" *.tw
+$GREP "\bvolonteers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolonteers\b/volunteers/g" *.tw
+$GREP "\bvolounteer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolounteer\b/volunteer/g" *.tw
+$GREP "\bvolounteered\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolounteered\b/volunteered/g" *.tw
+$GREP "\bvolounteering\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolounteering\b/volunteering/g" *.tw
+$GREP "\bvolounteers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolounteers\b/volunteers/g" *.tw
+$GREP "\bvolumne\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvolumne\b/volume/g" *.tw
+$GREP "\bvreity\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvreity\b/variety/g" *.tw
+$GREP "\bvrey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvrey\b/very/g" *.tw
+$GREP "\bvriety\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvriety\b/variety/g" *.tw
+$GREP "\bvulnerablility\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvulnerablility\b/vulnerability/g" *.tw
+$GREP "\bvyer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvyer\b/very/g" *.tw
+$GREP "\bvyre\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bvyre\b/very/g" *.tw
+$GREP "\bwaht\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwaht\b/what/g" *.tw
+$GREP "\bwarantee\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwarantee\b/warranty/g" *.tw
+$GREP "\bwardobe\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwardobe\b/wardrobe/g" *.tw
+$GREP "\bwarrent\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwarrent\b/warrant/g" *.tw
+$GREP "\bwarrriors\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwarrriors\b/warriors/g" *.tw
+$GREP "\bwasnt\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwasnt\b/wasn't/g" *.tw
+$GREP "\bwass\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwass\b/was/g" *.tw
+$GREP "\bwatn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwatn\b/want/g" *.tw
+$GREP "\bwayword\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwayword\b/wayward/g" *.tw
+$GREP "\bweaponary\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bweaponary\b/weaponry/g" *.tw
+$GREP "\bweas\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bweas\b/was/g" *.tw
+$GREP "\bwehn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwehn\b/when/g" *.tw
+$GREP "\bweilded\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bweilded\b/wielded/g" *.tw
+$GREP "\bwendsay\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwendsay\b/Wednesday/g" *.tw
+$GREP "\bwensday\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwensday\b/Wednesday/g" *.tw
+$GREP "\bwereabouts\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwereabouts\b/whereabouts/g" *.tw
+$GREP "\bwhant\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhant\b/want/g" *.tw
+$GREP "\bwhants\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhants\b/wants/g" *.tw
+$GREP "\bwhcih\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhcih\b/which/g" *.tw
+$GREP "\bwheras\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwheras\b/whereas/g" *.tw
+$GREP "\bwherease\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwherease\b/whereas/g" *.tw
+$GREP "\bwhereever\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhereever\b/wherever/g" *.tw
+$GREP "\bwhic\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhic\b/which/g" *.tw
+$GREP "\bwhihc\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhihc\b/which/g" *.tw
+$GREP "\bwhith\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhith\b/with/g" *.tw
+$GREP "\bwhlch\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhlch\b/which/g" *.tw
+$GREP "\bwhn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhn\b/when/g" *.tw
+$GREP "\bwholey\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwholey\b/wholly/g" *.tw
+$GREP "\bwhta\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhta\b/what/g" *.tw
+$GREP "\bwhther\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwhther\b/whether/g" *.tw
+$GREP "\bwidesread\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwidesread\b/widespread/g" *.tw
+$GREP "\bwief\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwief\b/wife/g" *.tw
+$GREP "\bwierd\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwierd\b/weird/g" *.tw
+$GREP "\bwiew\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwiew\b/view/g" *.tw
+$GREP "\bwih\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwih\b/with/g" *.tw
+$GREP "\bwiht\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwiht\b/with/g" *.tw
+$GREP "\bwille\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwille\b/will/g" *.tw
+$GREP "\bwillk\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwillk\b/will/g" *.tw
+$GREP "\bwillingless\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwillingless\b/willingness/g" *.tw
+$GREP "\bwirting\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwirting\b/writing/g" *.tw
+$GREP "\bwitheld\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwitheld\b/withheld/g" *.tw
+$GREP "\bwithh\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwithh\b/with/g" *.tw
+$GREP "\bwithing\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwithing\b/within/g" *.tw
+$GREP "\bwithold\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwithold\b/withhold/g" *.tw
+$GREP "\bwitht\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwitht\b/with/g" *.tw
+$GREP "\bwitn\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwitn\b/with/g" *.tw
+$GREP "\bwiull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwiull\b/will/g" *.tw
+$GREP "\bwnat\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwnat\b/want/g" *.tw
+$GREP "\bwnated\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwnated\b/wanted/g" *.tw
+$GREP "\bwnats\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwnats\b/wants/g" *.tw
+$GREP "\bwohle\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwohle\b/whole/g" *.tw
+$GREP "\bwokr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwokr\b/work/g" *.tw
+$GREP "\bwokring\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwokring\b/working/g" *.tw
+$GREP "\bwonderfull\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwonderfull\b/wonderful/g" *.tw
+$GREP "\bwordlwide\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwordlwide\b/worldwide/g" *.tw
+$GREP "\bworkststion\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bworkststion\b/workstation/g" *.tw
+$GREP "\bworls\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bworls\b/world/g" *.tw
+$GREP "\bworstened\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bworstened\b/worsened/g" *.tw
+$GREP "\bwoudl\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwoudl\b/would/g" *.tw
+$GREP "\bwresters\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwresters\b/wrestlers/g" *.tw
+$GREP "\bwriet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwriet\b/write/g" *.tw
+$GREP "\bwriten\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwriten\b/written/g" *.tw
+$GREP "\bwroet\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwroet\b/wrote/g" *.tw
+$GREP "\bwrok\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwrok\b/work/g" *.tw
+$GREP "\bwroking\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwroking\b/working/g" *.tw
+$GREP "\bwtih\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwtih\b/with/g" *.tw
+$GREP "\bwupport\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bwupport\b/support/g" *.tw
+$GREP "\bxenophoby\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bxenophoby\b/xenophobia/g" *.tw
+$GREP "\byaching\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byaching\b/yachting/g" *.tw
+$GREP "\byaer\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byaer\b/year/g" *.tw
+$GREP "\byaerly\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byaerly\b/yearly/g" *.tw
+$GREP "\byaers\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byaers\b/years/g" *.tw
+$GREP "\byatch\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byatch\b/yacht/g" *.tw
+$GREP "\byearm\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byearm\b/year/g" *.tw
+$GREP "\byeasr\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byeasr\b/years/g" *.tw
+$GREP "\byeild\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byeild\b/yield/g" *.tw
+$GREP "\byeilding\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byeilding\b/yielding/g" *.tw
+$GREP "\byera\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byera\b/year/g" *.tw
+$GREP "\byrea\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byrea\b/year/g" *.tw
+$GREP "\byeras\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byeras\b/years/g" *.tw
+$GREP "\byersa\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byersa\b/years/g" *.tw
+$GREP "\byotube\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byotube\b/youtube/g" *.tw
+$GREP "\byouseff\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byouseff\b/yousef/g" *.tw
+$GREP "\byouself\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byouself\b/yourself/g" *.tw
+$GREP "\bytou\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bytou\b/you/g" *.tw
+$GREP "\byuo\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\byuo\b/you/g" *.tw
+$GREP "\bzeebra\b" -- src/ | xargs -0 perl -i -pE "BEGIN{ @ARGV = map glob, @ARGV } s/\bzeebra\b/zebra/g" *.tw
+find . -name "*.tw.bak" -type f -print0 | xargs -0 /bin/rm -f
\ No newline at end of file
diff --git a/slave variables documentation - Pregmod.txt b/slave variables documentation - Pregmod.txt
index 65e5d667df706ad40f734cb56eddced201435793..5c09f221a8b7a3c3f395725821b88a3ba4d0284d 100644
--- a/slave variables documentation - Pregmod.txt	
+++ b/slave variables documentation - Pregmod.txt	
@@ -1307,7 +1307,9 @@ prostate:
 
 does the slave have a prosate?
 0 - no
-1 - yes
+1 - normal
+2 - hyperstimulated +20%
+3 - modified hyperstimulated +50%
 
 balls:*
 
@@ -2162,12 +2164,6 @@ In a eugenics society, this slave is a designated breeder.
 1 - yes
 0 - no
 
-postateImplant:
-
-Slave has a prostate implant to generate 20% more semen.
-1 - true
-0 - false
-
 underArmHColor:
 
 underArmHStyle:
@@ -2290,7 +2286,7 @@ How to set up your own hero slave.
 
 -The default slave template used:
 
-	<<set $activeSlave = {slaveName: "blank", birthName: "blank", genes: "XX", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", origEye: "brown", eyewear: "none", origHColor: "brown", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, PLimb: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, prostate: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules: "restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0, intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customTitle: "", customTitleLisp: "", rudeTitle: 0, customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, bellyPain: 0, cervixImplant: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, scars: 0, breedingMark: 0, prostateImplant: 0, underArmHStyle: "waxed", bodySwap: 0, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0, pregControl: "none", readyLimbs: [], ageAdjust: 0, bald: 0, origBodyOwner: "", death: "", hormoneBalance: 0}>>
+	<<set $activeSlave = {slaveName: "blank", birthName: "blank", genes: "XX", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", origEye: "brown", eyewear: "none", origHColor: "brown", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, PLimb: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, prostate: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules: "restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0, intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customTitle: "", customTitleLisp: "", rudeTitle: 0, customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, bellyPain: 0, cervixImplant: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, scars: 0, breedingMark: 0, underArmHStyle: "waxed", bodySwap: 0, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0, pregControl: "none", readyLimbs: [], ageAdjust: 0, bald: 0, origBodyOwner: "", death: "", hormoneBalance: 0}>>
 
 Making your slave; add their name to the following, then go down the documentation adding in your changes.
 -each variable must be seperated from the last by a comma followed by a space
diff --git a/src/cheats/mod_EditArcologyCheat.tw b/src/cheats/mod_EditArcologyCheat.tw
index 16c177833d69a7278c74ca6b798ead2fb1e964ca..c7137df199ff34da52b174cf776947e9ad80ed6f 100644
--- a/src/cheats/mod_EditArcologyCheat.tw
+++ b/src/cheats/mod_EditArcologyCheat.tw
@@ -403,19 +403,21 @@ __Player Character__
 	Your arcology has no neighbors.
 <</if>>
 
-<<if $arcologies.length < 8>>
+<<if $arcologies.length <= 8>>
 <<link "Add neighbor">>
-	<<set $seed = ["north", "northeast", "east", "southeast", "south", "southwest", "west", "northwest"]>>
-	<<set $activeArcology = {name: "Arcology X-", direction: "north", government: "an individual", honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor:0, FSSupremacist: "unset", FSSupremacistRace: 0, FSSubjugationist: "unset", FSSubjugationistRace: 0, FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", FSRepopulationFocus: "unset", FSRestart: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
-
-	<<if $arcologies.length < 4>>
-		<<set $activeArcology.name += $arcologies.length>>
+	<<set _seed = ["north", "northeast", "east", "southeast", "south", "southwest", "west", "northwest"]>>
+	<<for _eca = 0; _eca < $arcologies.length; _eca++>>
+		<<set _seed.delete($arcologies[_eca].direction)>> /* remove directions already in use */
+	<</for>>
+	<<set _govtypes = ["elected officials", "a committee", "an oligarchy", "an individual", "a corporation", "direct democracy"]>>
+	<<set $activeArcology = {name: "Arcology X-", direction: _seed.random(), government: _govtypes.random(), honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor:0, FSSupremacist: "unset", FSSupremacistRace: 0, FSSubjugationist: "unset", FSSubjugationistRace: 0, FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", FSRepopulationFocus: "unset", FSRestart: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
+
+	<<if $arcologies.length < 4>> /* X-4 is reserved for player's arcology, so X-1 is available */
+		<<set $activeArcology.name += ($arcologies.length)>>
 	<<else>>
 		<<set $activeArcology.name += ($arcologies.length+1)>>
 	<</if>>
 
-	<<set $activeArcology.direction = $seed.pluck()>>
-	<<set $activeArcology.government = random(0,5)>>
 	<<set $activeArcology.prosperity += random(-20,20)>>
 	<<set $activeArcology.ownership += random(-10,0)>>
 	<<set $activeArcology.minority += random(-5,5)>>
@@ -427,17 +429,17 @@ __Player Character__
 
 <br>
 <<set $averageProsperity = 0, _seed = 0>>
-<<for $i = 0; $i < $arcologies.length; $i++>>
-	<<set $averageProsperity += $arcologies[$i].prosperity, _seed++>>
+<<for _eca = 0; _eca < $arcologies.length; _eca++>>
+	<<set $averageProsperity += $arcologies[_eca].prosperity, _seed++>>
 <</for>>
 <<set $averageProsperity = $averageProsperity/_seed>>
 
 <<for $i = 0; $i < $arcologies.length; $i++>>
 	<<if $arcologies[$i].direction != 0>>
-	<<include "Neighbor Description">>
+		<<include "Neighbor Description">> /* uses $arcologies[$i] */
 	<</if>>
 
 	<<if $i != 0>>
-	<<print "[[Remove neighbor|MOD_Edit Arcology Cheat][$arcologies.pluck( [" + $i + "], [" + $i + "] )]]">>
+		<<print "[[Remove neighbor|MOD_Edit Arcology Cheat][$arcologies.deleteAt(" + $i + ")]]">>
 	<</if>>
 <</for>>
diff --git a/src/cheats/mod_EditSlaveCheat.tw b/src/cheats/mod_EditSlaveCheat.tw
index 73c0e46f70d0ff08974d0fcbf31225fff68fce9d..191f933f6a08807367117350c9aece2d5d57d258 100644
--- a/src/cheats/mod_EditSlaveCheat.tw
+++ b/src/cheats/mod_EditSlaveCheat.tw
@@ -843,10 +843,12 @@ Monstrous.
 
 <br>
 
-''Prostate (0: no prostate, 1:prostate):'' $activeSlave.prostate
+''Prostate (0: no prostate, 1:prostate, 2:hyperactive, 3:hyperactive-modified):'' $activeSlave.prostate
 <br>
 <<radiobutton "$activeSlave.prostate" 0>> No prostate
 <<radiobutton "$activeSlave.prostate" 1>> Prostate
+<<radiobutton "$activeSlave.prostate" 2>> Hyperactive prostate
+<<radiobutton "$activeSlave.prostate" 3>> Hyperactive modified prostate
 
 <br><br>
 
diff --git a/src/events/intro/initNationalities.tw b/src/events/intro/initNationalities.tw
index 6e0fd6188090fb844ae88e47ea8f2ff2e852e6af..3fecffec98bcdbec07c1dfd05579333ff38977da 100644
--- a/src/events/intro/initNationalities.tw
+++ b/src/events/intro/initNationalities.tw
@@ -351,15 +351,16 @@
 
 <<set $minimumSlaveCost = 3000>>
 <<set $enduringRep = $rep>>
-<<set $oldCash = $cash>>
 
 <<set $arcologies = []>>
 <<set $leaders = []>>
 
-<<set $seed = ["north", "northeast", "east", "southeast", "south", "southwest", "west", "northwest"]>>
+<<set _seed = ["north", "northeast", "east", "southeast", "south", "southwest", "west", "northwest"]>>
+<<set _govtypes = ["elected officials", "a committee", "an oligarchy", "an individual", "a corporation", "direct democracy"]>>
+	
 <<set $neighboringArcologies = Math.clamp($neighboringArcologies, 0, 8)>>
 <<for $i = 0; $i <= $neighboringArcologies; $i++>>
-	<<set $activeArcology = {name: "Arcology X-", direction: "north", government: "an individual", leaderID: 0, honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor: 0, FSSupremacist: "unset", FSSubjugationist: "unset", FSRestart: "unset", FSRepopulationFocus: "unset", FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", FSGenderRadicalistResearch: 0, FSGenderFundamentalistResearch: 0, FSPaternalistResearch: 0, FSDegradationistResearch: 0, FSBodyPuristResearch: 0, FSTransformationFetishistResearch: 0, FSYouthPreferentialistResearch: 0, FSMaturityPreferentialistResearch: 0, FSSlimnessEnthusiastResearch: 0, FSAssetExpansionistResearch: 0, FSPastoralistResearch: 0, FSPhysicalIdealistResearch: 0, FSRepopulationFocusResearch: 0, FSRestartResearch: 0, embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
+	<<set $activeArcology = {name: "Arcology X-", direction: "north", government: "an individual", leaderID: 0, honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor: 0, FSSupremacist: "unset", FSSubjugationist: "unset", FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0, FSRestart: "unset", FSRepopulationFocus: "unset", FSGenderRadicalistResearch: 0, FSGenderFundamentalistResearch: 0, FSPaternalistResearch: 0, FSDegradationistResearch: 0, FSBodyPuristResearch: 0, FSTransformationFetishistResearch: 0, FSYouthPreferentialistResearch: 0, FSMaturityPreferentialistResearch: 0, FSSlimnessEnthusiastResearch: 0, FSAssetExpansionistResearch: 0, FSPastoralistResearch: 0, FSPhysicalIdealistResearch: 0, FSRepopulationFocusResearch: 0, FSRestartResearch: 0}>>
 	<<if $i == 0>>
 		<<set $activeArcology.direction = 0>>
 		<<set $activeArcology.name = "Arcology X-4">>
@@ -423,13 +424,13 @@
 			<</if>>
 		<</if>>
 	<<else>>
-		<<if $i > 4>>
-			<<set $activeArcology.name = $activeArcology.name+$i>>
+		<<if $i < 4>> /* X-4 is reserved for player's arcology, so X-1 is available */
+			<<set $activeArcology.name = $activeArcology.name+($i)>>
 		<<else>>
 			<<set $activeArcology.name = $activeArcology.name+($i+1)>>
 		<</if>>
-		<<set $activeArcology.direction = $seed.pluck()>>
-		<<set $activeArcology.government = random(0,5)>>
+		<<set $activeArcology.direction = _seed.pluck()>>
+		<<set $activeArcology.government = _govtypes.random()>>
 		<<set $activeArcology.prosperity += random(-20,20)>>
 		<<set $activeArcology.ownership += random(-10,0)>>
 		<<set $activeArcology.minority += random(-5,5)>>
diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index d8cd0d8f1cdb59b87da158f777f7f80b395c77af..90d91169772863b15d08e29e93065b12600ef0db 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -500,7 +500,7 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $FSSpending = 0>>
 <<set $FSLockinLevel = 100>>
 <<set $applyLaw = 0>>
-<<set $FSPromenade = {Subjugationist: 0, Supremacist: 0, GenderRadicalist: 0, GenderFundamentalist: 0, Paternalist: 0, Degradationist: 0, BodyPurist: 0, TransformationFetishist: 0, YouthPreferentialist: 0, MaturityPreferentialist: 0, SlimnessEnthusiast: 0, AssetExpansionist: 0, Pastoralist: 0, PhysicalIdealist: 0, ChattelReligionist: 0, RomanRevivalist: 0, AztecRevivalist: 0, EgyptianRevivalist: 0, EdoRevivalist: 0, ArabianRevivalist: 0, ChineseRevivalist: 0, Repopulationist: 0, Eugenics: 0}>>
+<<set $FSPromenade = {Subjugationist: 0, Supremacist: 0, GenderRadicalist: 0, GenderFundamentalist: 0, Paternalist: 0, Degradationist: 0, BodyPurist: 0, TransformationFetishist: 0, YouthPreferentialist: 0, MaturityPreferentialist: 0, SlimnessEnthusiast: 0, AssetExpansionist: 0, Pastoralist: 0, PhysicalIdealist: 0, ChattelReligionist: 0, AztecRevivalist: 0, RomanRevivalist: 0, EgyptianRevivalist: 0, EdoRevivalist: 0, ArabianRevivalist: 0, ChineseRevivalist: 0, Repopulationist: 0, Eugenics: 0}>>
 
 <<set $corpAnnounced = 0>>
 <<set $corpIncorporated = 0>>
@@ -756,6 +756,7 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $superFertilityDrugs = 0>>
 <<set $bellyImplants = 0>>
 <<set $cervixImplants = 0>>
+<<set $prostateImplants = 0>>
 <<set $prostheticsUpgrade = 0>>
 
 <<set $surgeryUpgrade = 0>>
@@ -1242,6 +1243,8 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $badNames = 0>> /* I have issues getting arrays to initialize otherwise */
 <<set $badNames = ["Dipshit", "Asshole", "Cunt", "Whore", "Dick", "Pussy", "Slaver", "Assfucker", "Sodomite", "Rapist", "Spoiler", "Ruiner", "Ass", "Fucker", "Trash", "Traitor", "Cocksucker", "Dicksucker", "Ass Kisser", "Ass Licker", "Bitch", "Jerk", "Fuckface", "Prick", "Creep", "Retard", "Dumbass", "DumbFuck", "Douchebag"]>>
 
+<<set $modestClothes = ["conservative clothing", "a toga", "a huipil", "a slutty qipao", "restrictive latex", "cutoffs and a t-shirt", "battledress", "a penitent nuns habit", "a slave gown", "slutty business attire", "nice business attire", "a comfortable bodysuit", "a leotard", "a bunny outfit", "a nice nurse outfit", "a slutty nurse outfit", "a schoolgirl outfit", "a hijab and abaya", "a kimono", "a nice maid outfit", "a slutty maid outfit", "a ball gown", "a halter top dress", "a mini dress", "a latex catsuit", "a military uniform", "a maternity dress"]>>
+
 <<set $niceWeather = []>>
 <<set $weatherToday = {name: "Sunny", severity: 1}>>
 <<set $niceWeather.push($weatherToday)>>
diff --git a/src/js/storyJS.tw b/src/js/storyJS.tw
index 4aba8af4e58484822579e5a447973b1de7aac652..dc10049672d2c2a4c129607fd21be97f5b6dccaf 100644
--- a/src/js/storyJS.tw
+++ b/src/js/storyJS.tw
@@ -749,6 +749,8 @@ window.isSlaveAvailable = function(slave) {
 		return false;
 	} else if (slave.assignment == "live with your agent") {
 		return false;
+	} else if (slave.assignment == "be confined in the arcade") {
+		return false;
 	} else if (slave.assignment == "work in the dairy" && DairyRestraintsSetting >= 2) {
 		return false;
 	} else {
@@ -1071,6 +1073,10 @@ window.lastLactationSurgeryRule = function(slave, rules) {
 	return lastSurgeryRuleFor(slave, rules, "lactation");
 }
 
+window.lastProstateSurgeryRule = function(slave, rules) {
+	return lastSurgeryRuleFor(slave, rules, "prostate");
+}
+
 window.lastLipSurgeryRule = function(slave, rules) {
 	return lastSurgeryRuleFor(slave, rules, "lips");
 };
@@ -1140,9 +1146,6 @@ window.cumAmount = function(slave) {
 		} else {
 			cum = ((slave.balls*2.5)+1)
 		}
-		if (slave.prostateImplant == 1) {
-			cum *= 1.2
-		}
 		if (slave.diet == "cum production") {
 			cum *= 1.2
 		}
@@ -1151,7 +1154,13 @@ window.cumAmount = function(slave) {
 		if (slave.scrotum == 0) {
 			cum *= 0.8
 		}
-		if (slave.devotion > 50) {
+		if (slave.prostate == 0) {
+			cum *= 0.2 // being generous here
+		} else if (slave.prostate == 2) {
+			cum *= 1.2
+		} else if (slave.prostate == 3) {
+			cum *= 1.5
+		}		if (slave.devotion > 50) {
 			cum += (cum*(slave.devotion/100))
 		} else if (slave.devotion < -50) {
 			cum += (cum*(slave.devotion/100))
@@ -1161,9 +1170,6 @@ window.cumAmount = function(slave) {
 		} else if (slave.health < -50) {
 			cum += (cum*(slave.health/50))
 		}
-		if (slave.prostate == 0) {
-			cum *= 0.2 // being generous here
-		}
 		cum = Math.trunc(cum)
 		cum = Math.clamp(cum,1,1000000000000000000)
 		return cum
diff --git a/src/npc/asDump.tw b/src/npc/asDump.tw
index 5dad90d2c64eade8f507e837b812229d15042496..13a4975ac793642fda1cee69892ab5c218d962d8 100644
--- a/src/npc/asDump.tw
+++ b/src/npc/asDump.tw
@@ -1,12 +1,48 @@
-:: AS Dump [silently]
-
-<<set _SL = $slaves.length, _ID = $activeSlave.ID>>
-<<for _i = 0; _i < _SL; _i++>>
-	<<if _ID == $slaves[_i].ID>><<break>><</if>>
-<</for>>
-<<if _i < _SL>>
-	<<set $slaves[_i] = $activeSlave>>
-<<elseif def $activeSlave.slaveName>>
-	<<AddSlave $activeSlave>>
+:: AS Dump
+
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
+
+	@@.red;ERROR:@@  AS Dump, activeSlave invalid, returnTo is '$returnTo', previous passage was '<<print previous()>>'. Please report this.
+
+	<<link "Continue">><<goto $returnTo>><</link>> | [[Go Back|previous()]]
+
+<<else>>
+
+	<<silently>>
+
+	<<set _SL = $slaves.length, _ID = $activeSlave.ID>>
+
+	<<if $i >= 0 && $i < _SL && $slaves[$i].ID == _ID>> /* shortcut if $i is already pointing to this slave */
+		<<set $slaves[$i] = $activeSlave>>
+	<<else>>
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; })>> /* find $i if exists */
+		<<if $i == -1>> /* not found, so new slave */
+			<<AddSlave $activeSlave>>
+		<<else>>
+			<<set $slaves[$i] = $activeSlave>>
+		<</if>>
+	<</if>>
+
+	<<switch _ID>>
+		<<case $HeadGirl.ID>><<set $HeadGirl = $activeSlave>>
+		<<case $Recruiter.ID>><<set $Recruiter = $activeSlave>>
+		<<case $Bodyguard.ID>><<set $Bodyguard = $activeSlave>>
+		<<case $Madam.ID>><<set $Madam = $activeSlave>>
+		<<case $DJ.ID>><<set $DJ = $activeSlave>>
+		<<case $Milkmaid.ID>><<set $Milkmaid = $activeSlave>>
+		<<case $Schoolteacher.ID>><<set $Schoolteacher = $activeSlave>>
+		<<case $Attendant.ID>><<set $Attendant = $activeSlave>>
+		<<case $Nurse.ID>><<set $Nurse = $activeSlave>>
+		<<case $Stewardess.ID>><<set $Stewardess = $activeSlave>>
+		<<case $Wardeness.ID>><<set $Wardeness = $activeSlave>>
+		<<case $Concubine.ID>><<set $Concubine = $activeSlave>>
+		<<case $Collectrix.ID>><<set $Collectrix = $activeSlave>>
+	<</switch>>
+
+	<</silently>>
+
+	<<goto $returnTo>>
+
 <</if>>
-<<goto $returnTo>>
+
+
diff --git a/src/npc/descriptions/fAnus.tw b/src/npc/descriptions/fAnus.tw
index e90df745e8ea2330f1d5a0717b23278285c6c18f..b77b4740c9d172557abb6b41fd74fe277bb1fabf 100644
--- a/src/npc/descriptions/fAnus.tw
+++ b/src/npc/descriptions/fAnus.tw
@@ -114,7 +114,13 @@ Her anus is invitingly bleached,
 	<</if>>
 	She gets aroused despite her discomfort with anal, though she doesn't orgasm.
 <<else>>
-	<<if ($activeSlave.amp != 1)>>She kneels on the couch<<else>>You lay her on the couch<</if>> with her <<if $seeRace == 1>>$activeSlave.race <</if>>butt facing you, back strongly arched to angle her rectum for more comfortable anal coupling<<if ($PC.dick == 0)>>; you don a strap-on and rub a little lubricant into her rear<</if>>. You take your time and fuck her butthole for a good long while. <<if ($activeSlave.anus == 1)>>Her ass is so tight that she has to concentrate on relaxing for you.<<elseif ($activeSlave.anus == 2)>>Her experienced ass feels great.<<else>>Her asspussy is so loose you can pound it as hard as you like.<</if>> She rubs her <<if ($activeSlave.amp == 1)>>body against you as much as she can manage<<elseif ($activeSlave.dick != 0) && ($activeSlave.hormones < 1) && ($activeSlave.balls != 0)>>hardon<<elseif ($activeSlave.dick != 0)>>soft dick<<elseif ($activeSlave.vaginalAccessory == "chastity belt")>>nipples<<elseif ($activeSlave.clit > 2)>>huge, stiff clit<<else>>clit<</if>>, and brings herself to orgasm before you. <<if ($PC.dick == 0)>>The sight of her gasping and shaking her way through an anal orgasm brings you to climax yourself, and you shove yourself against the strap-on harness with enough force to give the slave's sensitized hole a final brutal stretching.<<else>>Her orgasmic rectal spasms squeeze your cock and you blow your load inside her ass.<</if>>
+	<<if ($activeSlave.amp != 1)>>She kneels on the couch<<else>>You lay her on the couch<</if>> with her <<if $seeRace == 1>>$activeSlave.race <</if>>butt facing you, back strongly arched to angle her rectum for more comfortable anal coupling.
+	<<if $activeSlave.amp != 1 && $activeSlave.prostate > 1 && $activeSlave.dick > 3>>
+		<<if $PC.dick == 0>>While you don a strap-on, she<<else>>She<</if>> shoves her slavering dick down and around towards her ass and squeezes it, pushing a lot of her precum out to lube her own asshole.
+	<<else>>
+		<<if $PC.dick == 0>>You don a strap-on and let some saliva fall onto its head<<else>>You let some saliva fall onto your dickhead<</if>> before penetrating her.
+	<</if>>
+	You take your time and fuck her butthole for a good long while. <<if ($activeSlave.anus == 1)>>Her ass is so tight that she has to concentrate on relaxing for you.<<elseif ($activeSlave.anus == 2)>>Her experienced ass feels great.<<else>>Her asspussy is so loose you can pound it as hard as you like.<</if>> She rubs her <<if ($activeSlave.amp == 1)>>body against you as much as she can manage<<elseif ($activeSlave.dick != 0) && ($activeSlave.hormones < 1) && ($activeSlave.balls != 0)>>hardon<<elseif ($activeSlave.dick != 0)>>soft dick<<elseif ($activeSlave.vaginalAccessory == "chastity belt")>>nipples<<elseif ($activeSlave.clit > 2)>>huge, stiff clit<<else>>clit<</if>>, and brings herself to orgasm before you. <<if ($PC.dick == 0)>>The sight of her gasping and shaking her way through an anal orgasm brings you to climax yourself, and you shove yourself against the strap-on harness with enough force to give the slave's sensitized hole a final brutal stretching.<<else>>Her orgasmic rectal spasms squeeze your cock and you blow your load inside her ass.<</if>>
 <</if>>
 
 <<if ($activeSlave.preg > 10)>>
diff --git a/src/npc/exportSlave.tw b/src/npc/exportSlave.tw
index d9237310690e29938897bb0602072fd82265aee0..36a3cc01c73574d46885f0518d7e546657f25f20 100644
--- a/src/npc/exportSlave.tw
+++ b/src/npc/exportSlave.tw
@@ -1,18 +1,11 @@
 :: Export Slave [nobr]
 
-
-
-<<set $nextButton = "Continue">>
-<<set $nextLink = "Slave Interact">>
+<<set $nextButton = "Continue", $nextLink = "Slave Interact">>
 
 //Copy the following block of code for importing//
 
 <br><br>
 
-
-<<set _birthWeek = random(0,51)>>
-
-
 <<if (ndef $activeSlave.currentRules) || ($activeSlave.currentRules.length < 1)>><<set _currentRules = "[]">><<else>><<set _currentRules = "$activeSlave.currentRules">><</if>>
 
-slaveName: "$activeSlave.slaveName", birthName: "$activeSlave.birthName", weekAcquired: 1, origin: "$activeSlave.origin", career: "$activeSlave.career", ID: $activeSlave.ID, pornFame: $activeSlave.pornFame, pornFameSpending: $activeSlave.pornFameSpending, prestige: $activeSlave.prestige, prestigeDesc: "$activeSlave.prestigeDesc", recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: _birthWeek, age: $activeSlave.age, ageImplant: $activeSlave.ageImplant, health: $activeSlave.health, minorInjury: 0, trust: $activeSlave.trust, oldTrust: $activeSlave.trust, devotion: $activeSlave.devotion, oldDevotion: $activeSlave.devotion, weight: $activeSlave.weight, muscles: $activeSlave.muscles, height: $activeSlave.height, heightImplant: $activeSlave.heightImplant, nationality: "$activeSlave.nationality", race: "$activeSlave.race", markings: "none", eyes: 1, eyeColor: "$activeSlave.eyeColor", eyewear: "none", hColor: "$activeSlave.hColor", pubicHColor: "$activeSlave.pubicHColor", skin: "$activeSlave.skin", hLength: $activeSlave.hLength, hStyle: "$activeSlave.hStyle", pubicHStyle: "$activeSlave.pubicHStyle", waist: $activeSlave.waist, corsetPiercing: 0, amp: $activeSlave.amp, heels: $activeSlave.heels, voice: $activeSlave.voice, voiceImplant: $activeSlave.voiceImplant, accent: $activeSlave.accent, shoulders: $activeSlave.shoulders, shouldersImplant: $activeSlave.shouldersImplant, boobs: $activeSlave.boobs, boobsImplant: $activeSlave.boobsImplant, boobsImplantType: $activeSlave.boobsImplantType, boobShape: "normal", nipples: "$activeSlave.nipples",  nipplesPiercing: $activeSlave.nipplesPiercing, areolae: $activeSlave.areolae, areolaePiercing: $activeSlave.areolaePiercing, boobsTat: "$activeSlave.boobsTat", lactation: $activeSlave.lactation, lactationAdaptation: 0, milk: 0, cum: 0, hips: $activeSlave.hips, hipsImplant: $activeSlave.hipsImplant, butt: $activeSlave.butt, buttImplant: $activeSlave.buttImplant, buttImplantType: $activeSlave.buttImplantType, buttTat: "$activeSlave.buttTat", face: $activeSlave.face, faceImplant: $activeSlave.faceImplant, faceShape: "normal", lips: $activeSlave.lips, lipsImplant: $activeSlave.lipsImplant, lipsPiercing: $activeSlave.lipsPiercing, lipsTat: "$activeSlave.lipsTat", teeth: "$activeSlave.teeth", tonguePiercing: $activeSlave.tonguePiercing, vagina: $activeSlave.vagina, vaginaLube: $activeSlave.vaginaLube, vaginaPiercing: $activeSlave.vaginaPiercing, vaginaTat: "$activeSlave.vaginaTat", preg: $activeSlave.preg, pregSource: 0, pregType: 0, labor: 0, births: $activeSlave.births, cSec: 0, bellyAccessory: "none", labia: $activeSlave.labia, clit: $activeSlave.clit, clitPiercing: $activeSlave.clitPiercing, clitSetting: "$activeSlave.clitSetting", foreskin: 0, anus: $activeSlave.anus, dick: $activeSlave.dick, analArea: 1, dickPiercing: $activeSlave.dickPiercing, dickTat: "$activeSlave.dickTat", balls: $activeSlave.balls, scrotum: 0, ovaries: $activeSlave.ovaries, anusPiercing: $activeSlave.anusPiercing, anusTat: "$activeSlave.anusTat", makeup: $activeSlave.makeup, nails: $activeSlave.nails, brand: "$activeSlave.brand", brandLocation: "$activeSlave.brandLocation", earPiercing: $activeSlave.earPiercing, nosePiercing: $activeSlave.nosePiercing, eyebrowPiercing: $activeSlave.eyebrowPiercing, navelPiercing: $activeSlave.navelPiercing, shouldersTat: "$activeSlave.shouldersTat", armsTat: "$activeSlave.armsTat", legsTat: "$activeSlave.legsTat", backTat: "$activeSlave.backTat", stampTat: "$activeSlave.stampTat", vaginalSkill: $activeSlave.vaginalSkill, oralSkill: $activeSlave.oralSkill, analSkill: $activeSlave.analSkill, whoreSkill: $activeSlave.whoreSkill, entertainSkill: $activeSlave.entertainSkill, combatSkill: $activeSlave.combatSkill, livingRules: "$activeSlave.livingRules", speechRules: "$activeSlave.speechRules", releaseRules: "$activeSlave.releaseRules", relationshipRules: "$activeSlave.relationshipRules", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "$activeSlave.diet", dietCum: $activeSlave.dietCum, dietMilk: $activeSlave.dietMilk, tired: 0, hormones: 0, drugs: "$activeSlave.drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: $activeSlave.addict, fuckdoll: $activeSlave.fuckdoll, choosesOwnClothes: 0, clothes: "$activeSlave.clothes", collar: "$activeSlave.collar", shoes: "$activeSlave.shoes", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: $activeSlave.intelligence,  intelligenceImplant: $activeSlave.intelligenceImplant, energy: $activeSlave.energy, attrXX: $activeSlave.attrXX, attrXY: $activeSlave.attrXY, attrKnown: $activeSlave.attrKnown, fetish: "$activeSlave.fetish", fetishStrength: $activeSlave.fetishStrength, fetishKnown: $activeSlave.fetishKnown, behavioralFlaw: "$activeSlave.behavioralFlaw", behavioralQuirk: "none", sexualFlaw: "$activeSlave.sexualFlaw", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "$activeSlave.customTat", customLabel: "", customDesc: "$activeSlave.customDesc", customImage: 0, currentRules: _currentRules
+slaveName: "$activeSlave.slaveName", birthName: "$activeSlave.birthName", weekAcquired: 1, origin: "$activeSlave.origin", career: "$activeSlave.career", ID: $activeSlave.ID, pornFame: $activeSlave.pornFame, pornFameSpending: $activeSlave.pornFameSpending, prestige: $activeSlave.prestige, prestigeDesc: "$activeSlave.prestigeDesc", recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: $activeSlave.birthWeek, age: $activeSlave.age, ageImplant: $activeSlave.ageImplant, health: $activeSlave.health, minorInjury: 0, trust: $activeSlave.trust, oldTrust: $activeSlave.trust, devotion: $activeSlave.devotion, oldDevotion: $activeSlave.devotion, weight: $activeSlave.weight, muscles: $activeSlave.muscles, height: $activeSlave.height, heightImplant: $activeSlave.heightImplant, nationality: "$activeSlave.nationality", race: "$activeSlave.race", markings: "none", eyes: 1, eyeColor: "$activeSlave.eyeColor", eyewear: "none", hColor: "$activeSlave.hColor", pubicHColor: "$activeSlave.pubicHColor", skin: "$activeSlave.skin", hLength: $activeSlave.hLength, hStyle: "$activeSlave.hStyle", pubicHStyle: "$activeSlave.pubicHStyle", waist: $activeSlave.waist, corsetPiercing: 0, amp: $activeSlave.amp, heels: $activeSlave.heels, voice: $activeSlave.voice, voiceImplant: $activeSlave.voiceImplant, accent: $activeSlave.accent, shoulders: $activeSlave.shoulders, shouldersImplant: $activeSlave.shouldersImplant, boobs: $activeSlave.boobs, boobsImplant: $activeSlave.boobsImplant, boobsImplantType: $activeSlave.boobsImplantType, boobShape: "normal", nipples: "$activeSlave.nipples",  nipplesPiercing: $activeSlave.nipplesPiercing, areolae: $activeSlave.areolae, areolaePiercing: $activeSlave.areolaePiercing, boobsTat: "$activeSlave.boobsTat", lactation: $activeSlave.lactation, lactationAdaptation: 0, milk: 0, cum: 0, hips: $activeSlave.hips, hipsImplant: $activeSlave.hipsImplant, butt: $activeSlave.butt, buttImplant: $activeSlave.buttImplant, buttImplantType: $activeSlave.buttImplantType, buttTat: "$activeSlave.buttTat", face: $activeSlave.face, faceImplant: $activeSlave.faceImplant, faceShape: "normal", lips: $activeSlave.lips, lipsImplant: $activeSlave.lipsImplant, lipsPiercing: $activeSlave.lipsPiercing, lipsTat: "$activeSlave.lipsTat", teeth: "$activeSlave.teeth", tonguePiercing: $activeSlave.tonguePiercing, vagina: $activeSlave.vagina, vaginaLube: $activeSlave.vaginaLube, vaginaPiercing: $activeSlave.vaginaPiercing, vaginaTat: "$activeSlave.vaginaTat", preg: $activeSlave.preg, pregSource: 0, pregType: 0, labor: 0, births: $activeSlave.births, cSec: 0, bellyAccessory: "none", labia: $activeSlave.labia, clit: $activeSlave.clit, clitPiercing: $activeSlave.clitPiercing, clitSetting: "$activeSlave.clitSetting", foreskin: 0, anus: $activeSlave.anus, dick: $activeSlave.dick, analArea: 1, dickPiercing: $activeSlave.dickPiercing, dickTat: "$activeSlave.dickTat", balls: $activeSlave.balls, scrotum: 0, ovaries: $activeSlave.ovaries, anusPiercing: $activeSlave.anusPiercing, anusTat: "$activeSlave.anusTat", makeup: $activeSlave.makeup, nails: $activeSlave.nails, brand: "$activeSlave.brand", brandLocation: "$activeSlave.brandLocation", earPiercing: $activeSlave.earPiercing, nosePiercing: $activeSlave.nosePiercing, eyebrowPiercing: $activeSlave.eyebrowPiercing, navelPiercing: $activeSlave.navelPiercing, shouldersTat: "$activeSlave.shouldersTat", armsTat: "$activeSlave.armsTat", legsTat: "$activeSlave.legsTat", backTat: "$activeSlave.backTat", stampTat: "$activeSlave.stampTat", vaginalSkill: $activeSlave.vaginalSkill, oralSkill: $activeSlave.oralSkill, analSkill: $activeSlave.analSkill, whoreSkill: $activeSlave.whoreSkill, entertainSkill: $activeSlave.entertainSkill, combatSkill: $activeSlave.combatSkill, livingRules: "$activeSlave.livingRules", speechRules: "$activeSlave.speechRules", releaseRules: "$activeSlave.releaseRules", relationshipRules: "$activeSlave.relationshipRules", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "$activeSlave.diet", dietCum: $activeSlave.dietCum, dietMilk: $activeSlave.dietMilk, tired: 0, hormones: 0, drugs: "$activeSlave.drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: $activeSlave.addict, fuckdoll: $activeSlave.fuckdoll, choosesOwnClothes: 0, clothes: "$activeSlave.clothes", collar: "$activeSlave.collar", shoes: "$activeSlave.shoes", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: $activeSlave.intelligence,  intelligenceImplant: $activeSlave.intelligenceImplant, energy: $activeSlave.energy, attrXX: $activeSlave.attrXX, attrXY: $activeSlave.attrXY, attrKnown: $activeSlave.attrKnown, fetish: "$activeSlave.fetish", fetishStrength: $activeSlave.fetishStrength, fetishKnown: $activeSlave.fetishKnown, behavioralFlaw: "$activeSlave.behavioralFlaw", behavioralQuirk: "none", sexualFlaw: "$activeSlave.sexualFlaw", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "$activeSlave.customTat", customLabel: "", customDesc: "$activeSlave.customDesc", customImage: 0, currentRules: _currentRules, actualAge: $activeSlave.actualAge, visualAge: $activeSlave.visualAge, physicalAge: $activeSlave.physicalAge, bellyTat: "$activeSlave.bellyTat", induce: 0, mpreg: $activeSlave.mpreg, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: $activeSlave.bellyImplant, bellySag: $activeSlave.bellySage, bellyPain: 0, cervixImplant: $activeSlave.cervixImplant, birthsTotal: $activeSlave.birthsTotal, pubertyXX: $activeSlave.pubertyXX, pubertyAgeXX: $activeSlave.pubertyAgeXX, pubertyXY: $activeSlave.pubertyXY, pubertyAgeXY: $activeSlave.pubertyAgeXY, scars: $activeSlave.scars, breedingMark: 0, underArmHStyle: "waxed", underArmHColor: "$activeSlave.underArmHColor", bodySwap: $activeSlave.bodySwap, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "$activeSlave.ballType", eggType: "$activeSlave.eggType", reservedChildren: 0, choosesOwnChastity: 0, pregControl: "none", readyLimbs: [], ageAdjust: $activeSlave.ageAdjust, bald: $activeSlave.bald, origBodyOwner: "", death: "", hormoneBalance: $activeSlave.hormoneBalance
diff --git a/src/npc/fAbuse.tw b/src/npc/fAbuse.tw
index 686bfe63cddaf77bae397c1a3b2e848105b600b3..a05d63e53a3f59f28994fb0de0f229b055ca8de3 100644
--- a/src/npc/fAbuse.tw
+++ b/src/npc/fAbuse.tw
@@ -1,6 +1,5 @@
-:: FAbuse
+:: FAbuse [nobr]
 
-<<nobr>>
 <<if ($activeSlave.ID == $Bodyguard.ID)>>
 <<if ($activeSlave.fetish == "masochist") && ($activeSlave.fetishKnown == 1) && ($activeSlave.fetishStrength > 95)>>
 	Knowing how much your bodyguard likes being hurt, you decide to reward her in her own particular way.
@@ -159,9 +158,9 @@
 <</if>> 
 
 <<if ($PC.dick == 1)>>
-	<<if ($activeSlave.amp isnot 1) && ($activeSlave.clothes !== "no clothing")>>While she strips, your<<else>>Your<</if>>your stiffening cock rises<<if $PC.vagina == 1>>, revealing your pussy and<</if>> earning
+	<<if ($activeSlave.amp != 1) && ($activeSlave.clothes !== "no clothing")>>While she strips, your<<else>>Your<</if>>your stiffening cock rises<<if $PC.vagina == 1>>, revealing your pussy and<</if>> earning
 <<else>>
-	<<if ($activeSlave.amp isnot 1) && ($activeSlave.clothes !== "no clothing")>>While she strips, you<<else>>You<</if>> don a cruelly large strap-on, earning
+	<<if ($activeSlave.amp != 1) && ($activeSlave.clothes !== "no clothing")>>While she strips, you<<else>>You<</if>> don a cruelly large strap-on, earning
 <</if>>
 <<if ($activeSlave.fetish == "masochist") && ($activeSlave.fetishKnown == 1) && ($activeSlave.fetishStrength > 60)>>
 	a shy look
@@ -364,11 +363,6 @@ Even though she's in a somewhat bad shape, she still jumps back to her feet and
 <</if>>
 
 <<if passage() !== "Slave Interact">>
-<<for _i = 0; _i lt $slaves.length; _i++>>
-	<<if $slaves[_i].ID == $activeSlave.ID>>
-	<<set $slaves[_i] = $activeSlave>>
-	<<break>>
-	<</if>>
-<</for>>
+	<<set $nextLink = "AS Dump">>
 <</if>>
-<</nobr>>\
+
diff --git a/src/npc/fFeelings.tw b/src/npc/fFeelings.tw
index e19b3e7d3a1bc819225a46ca62db9a00b11f2c22..fa078063626f4d2f113565d3d66e9275bf9e9ab8 100644
--- a/src/npc/fFeelings.tw
+++ b/src/npc/fFeelings.tw
@@ -833,62 +833,57 @@ My favorite part of my body i<<s>>
 <</if>>
 
 <<if ($activeSlave.relationship > 0)>>
-<<set _SL = $slaves.length>>
-<<for _j = 0; _j < _SL; _j++>>
-	<<if $slaves[_j].ID == $activeSlave.relationshipTarget>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $activeSlave.relationshipTarget; })>>
 	<<if $activeSlave.relationship <= 2>>
-		I really like <<s>>eeing $slaves[_j].slaveName every day, she'<<s>> a good friend." She blushes. "<<S>>he'<<s>> kind of hot, too.
+		I really like <<s>>eeing $slaves[$partner].slaveName every day, she'<<s>> a good friend." She blushes. "<<S>>he'<<s>> kind of hot, too.
 	<<elseif $activeSlave.relationship <= 3>>
-		I really like <<s>>eeing $slaves[_j].slaveName every day, she's a good friend -" She blushes. "- even when we're not fucking.
+		I really like <<s>>eeing $slaves[$partner].slaveName every day, she's a good friend -" She blushes. "- even when we're not fucking.
 	<<elseif $activeSlave.relationship <= 4>>
-		I really love $slaves[_j].slaveName." She blushes. "Thank you for letting u<<s>> be together, <<Master>>.
+		I really love $slaves[$partner].slaveName." She blushes. "Thank you for letting u<<s>> be together, <<Master>>.
 	<<else>>
-		I'm <<s>>o happy with $slaves[_j].slaveName." She blushes. "Thank you for her, <<Master>>.
+		I'm <<s>>o happy with $slaves[$partner].slaveName." She blushes. "Thank you for her, <<Master>>.
 	<</if>>
 	<<if $activeSlave.relationship >= 3>>
-		<<if $activeSlave.mother == $slaves[_j].ID>>
+		<<if $activeSlave.mother == $slaves[$partner].ID>>
 			"I - I'm fucking my mother," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he's <<s>>uch a hot MILF, I can't <<s>>top.
-		<<elseif $activeSlave.father == $slaves[_j].ID>>
+		<<elseif $activeSlave.father == $slaves[$partnerj].ID>>
 			I - I'm fucking my father," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he knows <<s>>o much about penetration, I can't <<s>>top.
-		<<elseif $slaves[_j].mother == $activeSlave.ID>>
+		<<elseif $slaves[$partner].mother == $activeSlave.ID>>
 			I - I'm fucking my daughter," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he ha<<s>> <<s>>uch a hot little body, I can't <<s>>top.
-		<<elseif $slaves[_j].father == $activeSlave.ID>>
+		<<elseif $slaves[$partner].father == $activeSlave.ID>>
 			I - I'm fucking my daughter," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he ha<<s>> <<s>>uch a hot little body. <<S>>he looks <<s>>o much like her mother, I can't <<s>>top.
-		<<elseif areSisters($activeSlave, $slaves[_j]) == 1>>
+		<<elseif areSisters($activeSlave, $slaves[$partner]) == 1>>
 			I - I'm fucking my twin <<s>>ister," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he'<<s>> <<s>>o hot, I can't <<s>>top.
-		<<elseif areSisters($activeSlave, $slaves[_j]) == 2>>
+		<<elseif areSisters($activeSlave, $slaves[$partner]) == 2>>
 			I - I'm fucking my <<s>>ister," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he'<<s>> <<s>>o hot, I can't <<s>>top.
-		<<elseif areSisters($activeSlave, $slaves[_j]) == 3>>
+		<<elseif areSisters($activeSlave, $slaves[$partner]) == 3>>
 			I - I'm fucking my half-<<s>>ister," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<s>>he's <<s>>o hot, I can't <<s>>top.
-		<<elseif ($activeSlave.relation != 0) && ($slaves[_j].ID is $activeSlave.relationTarget)>>
+		<<elseif ($activeSlave.relation != 0) && ($slaves[$partner].ID is $activeSlave.relationTarget)>>
 			I - I'm fucking my <<if ($activeSlave.relation == "mother")>>daughter<<elseif ($activeSlave.relation == "daughter")>>mother<<else>>$activeSlave.relation<</if>>," she bursts out, blushing even harder. "It'<<s>> <<s>>o fucking wrong, but <<if ($activeSlave.relation == "mother")>><<s>>he has <<s>>uch a hot little body<<elseif ($activeSlave.relation == "daughter")>><<s>>he'<<s>> <<s>>uch a hot MILF<<else>><<s>>he'<<s>> <<s>>o hot<</if>>, I can't <<s>>top.
-		<<elseif ($activeSlave.actualAge + 14) < $slaves[_j].actualAge>>
+		<<elseif ($activeSlave.actualAge + 14) < $slaves[$partner].actualAge>>
 			<<S>>he'<<s>> old enough to be my mother." She looks down, blushing a little harder. "But I'm lucky, <<s>>he'<<s>> <<s>>uch a hot MILF.
-		<<elseif ($activeSlave.actualAge - 14) > $slaves[_j].actualAge>>
+		<<elseif ($activeSlave.actualAge - 14) > $slaves[$partner].actualAge>>
 			<<S>>he'<<s>> young enough to be my daughter." She looks down, blushing a little harder. "But I love her hot young body.
 		<</if>>
-		<<if (($activeSlave.actualAge - 5) > $slaves[_j].actualAge) && (20 > $slaves[_j].actualAge)>>
+		<<if (($activeSlave.actualAge - 5) > $slaves[$partner].actualAge) && (20 > $slaves[$partner].actualAge)>>
 			She'<<s>> a little immature at time<<s>>, but having <<s>>ex with a teenager i<<s>> so awe<<s>>ome, it'<<s>> worth it.
 		<</if>>
-		<<if $slaves[_j].amp != 0>>
-		<<if $slaves[_j].amp == -1>>
+		<<if $slaves[$partner].amp != 0>>
+		<<if $slaves[$partner].amp == -1>>
 			I really do like her P-Limbs. They're a little awkward, and kind of cold, but <<if _lisping == 1>>that'th jutht how she ith<<else>>that's just how she is<</if>>.
-		<<elseif $slaves[_j].amp == -2>>
+		<<elseif $slaves[$partner].amp == -2>>
 			And, um." She giggles. "She<<if _lisping == 1>>hath vibe fingerth. Tho that'th awethome<<else>>has vibe fingers. So that's awesome<</if>>.
-		<<elseif $slaves[_j].amp == -3>>
+		<<elseif $slaves[$partner].amp == -3>>
 			I really like her P-Limbs. They're very pretty, but kind of cold. <<if _lisping == 1>>That'th jutht how she ith<<else>>That's just how she is<</if>>.
-		<<elseif $slaves[_j].amp == -4>>
+		<<elseif $slaves[$partner].amp == -4>>
 			Her P-Limbs do <<s>>care me a little, <<s>>ometime<<s>>. Though of course she di<<s>>able<<s>> the weapon<<s>> when we're together." She giggles. "Though I did get her to extend her blades on<<c>>e, so I could ki<<ss>> them for luck.
-		<<elseif $slaves[_j].amp == -5>>
+		<<elseif $slaves[$partner].amp == -5>>
 			Her P-Limbs do look cool and I like how <<s>>trong they can make her but they <<s>>care me a little, <<s>>ometime<<s>>. Though of cour<<s>>e she disable<<s>> the weapon<<s>> when we're together." She giggles. "She ha<<s>> vibe fingers, <<s>>o that'<<s>> awe<<s>>ome.
 		<<else>>
 			She's an amputee, of course, <<s>>o that'<<s>> a little <<s>>ad.
 		<</if>>
 		<</if>>
 	<</if>>
-	<<break>>
-	<</if>>
-<</for>>
 <<elseif ($activeSlave.relationship == -3)>>
 	Of cour<<s>>e, I'm your wife, <<Master>>." She laughs. "Not exactly traditional married life, but I'll do my be<<s>>t to help redefine it.
 <<elseif ($activeSlave.relationship == -2)>>
diff --git a/src/npc/fKiss.tw b/src/npc/fKiss.tw
index 679cdc91df28b759be95b4ea4e0cf4ed9baa0ccf..05dd0298cde00e27d7cc42322321f76151894bd5 100644
--- a/src/npc/fKiss.tw
+++ b/src/npc/fKiss.tw
@@ -1,6 +1,4 @@
-:: FKiss
-
-<<nobr>>
+:: FKiss [nobr]
 
 You tell $activeSlave.slaveName to
 <<if ($activeSlave.collar == "dildo gag")>>
@@ -72,4 +70,3 @@ Then, you gently raise her <<if $activeSlave.face > 95>>heartrendingly beautiful
 	She reflexively turns her head away from you, but you catch her jaw and kiss her harder. Spluttering, she flees backwards, but you tip forward with her and pin her against your desk, plundering her mouth without mercy. She wriggles desperately, but her struggles slowly subside as she realizes that you're not taking this any farther. When you bore of it and pull away, she stares at you in utter incomprehension. <<if (($activeSlave.amp == 1) && (canTalk($activeSlave) == false))>>Her eyes demand an answer: is that it?<<elseif canTalk($activeSlave) == false>>She signs irritably, asking whether that's it.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>She splutters, "Ith that it, <<Master>>!?"<<else>>She splutters, "Is that it, <<Master>><</if>>
 <</if>>
 
-<</nobr>>
diff --git a/src/npc/fPCImpreg.tw b/src/npc/fPCImpreg.tw
index 19373b92433f2d5f3a68c0f4543da91fdc3b6bd1..d6d6d594117d59b26bdd75acf0ace4dc7cd457ce 100644
--- a/src/npc/fPCImpreg.tw
+++ b/src/npc/fPCImpreg.tw
@@ -1,15 +1,11 @@
-:: FPCImpreg
-
-<<nobr>>
+:: FPCImpreg [nobr]
 
 <<set _bonus = random(6,20)>>
 
 <<if $activeSlave.mpreg == 1>>
-<<set $activeSlave.analCount += _bonus+1>>
-<<set $analTotal += _bonus+1>>
+<<set $activeSlave.analCount += _bonus+1, $analTotal += _bonus+1>>
 <<else>>
-<<set $activeSlave.vaginalCount += _bonus+1>>
-<<set $vaginalTotal += _bonus+1>>
+<<set $activeSlave.vaginalCount += _bonus+1, $vaginalTotal += _bonus+1>>
 <</if>>
 
 You call her over so you can
@@ -69,7 +65,6 @@ You call her over so you can
 <<elseif ($activeSlave.fetish == "pregnancy") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
 	She cries with joy and presents her fertile <<if $activeSlave.mpreg == 1>>asshole<<else>>pussy<</if>> for breeding. She sobs with happiness when she feels your hot seed. She spends the rest of the day considering her own stomach with pride. This new connection with <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>her master<<else>>her mistress<</if>> @@.hotpink;increases her devotion to you.@@
 	<<set  $activeSlave.devotion += 10>>
-
 <<elseif ($activeSlave.devotion > 20) && ($activeSlave.vagina == 0)>>
 	She accepts your orders without comment and presents her virgin <<if $activeSlave.mpreg == 1>>asshole<<else>>pussy<</if>> for fertilization. She gasps in shock when she feels your hot seed. She spends the rest of the day struggling with roiling emotions. Since she is already well broken, this new connection with <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>her master<<else>>her mistress<</if>> @@.hotpink;increases her devotion to you.@@ @@.lime;Her <<if $activeSlave.mpreg == 1>>asshole<<else>>pussy<</if>> has been broken in, and there's a good chance she's pregnant.@@
 	<<if $activeSlave.mpreg == 1>>
@@ -119,7 +114,7 @@ You call her over so you can
 You repeat this ritual throughout the week, ensuring that $activeSlave.slaveName is carrying your child.
 
 <<if random(1,100) >= 1>>
-	<<set $activeSlave.preg = 1>>
+	<<set $activeSlave.preg = 1, $activeSlave.pregSource = -1>>
 	<<if ($activeSlave.drugs == "super fertility drugs")>>
 		<<if (($masterSuitePregnancyFertilitySupplements == 1) && (($activeSlave.assignment == "serve in the master suite") || ($activeSlave.ID == $Concubine.ID)))>>
 			<<if ($activeSlave.hormones == 2)>>
@@ -151,7 +146,6 @@ You repeat this ritual throughout the week, ensuring that $activeSlave.slaveName
 	<<else>>
 		<<set $activeSlave.pregType = either(1, 1, 1, 1, 1, 1, 1, 1, 1, 2)>>
 	<</if>>
-<<set $activeSlave.pregSource = -1>>
 <</if>>
 
 
@@ -175,4 +169,3 @@ You repeat this ritual throughout the week, ensuring that $activeSlave.slaveName
 	<<set $arcologies[0].FSGenderFundamentalist += 0.05*$FSSingleSlaveRep>>
 <</if>>
 
-<</nobr>>
diff --git a/src/npc/fRelation.tw b/src/npc/fRelation.tw
index 1a30159b16d44f05bcc0413f288bd31615de0d54..164cb455e43a142c9f01168bdff2ad865588d018 100644
--- a/src/npc/fRelation.tw
+++ b/src/npc/fRelation.tw
@@ -1,152 +1,111 @@
-:: FRelation
+:: FRelation [nobr]
 
-<<nobr>>
 <<if ($partner == "mother")>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<if $activeSlave.mother == $slaves[_i].ID>>
-			<<set $partner = $slaves[_i], _activeSlaveRel = "daughter", _partnerRel = "mother">>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $activeSlave.mother; })>>
+	<<set _activeSlaveRel = "daughter", _partnerRel = "mother">>
 <<elseif ($partner == "father")>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<if $activeSlave.father == $slaves[_i].ID>>
-			<<set $partner = $slaves[_i], _activeSlaveRel = "daughter", _partnerRel = "father">>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $activeSlave.father; })>>
+	<<set _activeSlaveRel = "daughter", _partnerRel = "father">>
 <<elseif ($partner == "daughter")>>
 	<<set $partner = randomAvailableDaughter($activeSlave)>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<if $partner.ID == $slaves[_i].ID>> /*incompatibility fix*/
-			<<break>>
-		<</if>>
-	<</for>>
-	<<if $activeSlave.ID == $partner.father>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $partner.ID; })>>
+	<<if $activeSlave.ID == $slaves[$partner].father>>
 		<<set _activeSlaveRel = "father", _partnerRel = "daughter">>
-	<<elseif $activeSlave.ID == $partner.mother>>
+	<<elseif $activeSlave.ID == $slaves[$partner].mother>>
 		<<set _activeSlaveRel = "mother", _partnerRel = "daughter">>
 	<</if>>
 <<elseif ($partner == "sister")>>
 	<<set $partner = randomAvailableSister($activeSlave)>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<if $partner.ID == $slaves[_i].ID>> /*incompatibility fix*/
-			<<break>>
-		<</if>>
-	<</for>>
-	<<if areSisters($activeSlave, $partner) == 3>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $partner.ID; })>>
+	<<if areSisters($activeSlave, $slaves[$partner]) == 3>>
 		<<set _activeSlaveRel = "half-sister", _partnerRel = "half-sister">>
-	<<elseif areSisters($activeSlave, $partner) == 2>>
+	<<elseif areSisters($activeSlave, $slaves[$partner]) == 2>>
 		<<set _activeSlaveRel = "sister", _partnerRel = "sister">>
-	<<elseif areSisters($activeSlave, $partner) == 1>>
+	<<elseif areSisters($activeSlave, $slaves[$partner]) == 1>>
 		<<set _activeSlaveRel = "twin", _partnerRel = "twin">>
 	<</if>>
 <<elseif ($partner == "relation")>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-	<<if $slaves[_i].ID == $activeSlave.relationTarget>>
-		<<set $partner = $slaves[_i], _activeSlaveRel = $activeSlave.relation, _partnerRel = $slaves[_i].relation>>
-		<<break>>
-	<</if>>
-	<</for>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $activeSlave.relationTarget; })>>
+	<<set _activeSlaveRel = $activeSlave.relation, _partnerRel = $partner.relation>>
 <<else>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-	<<if $slaves[_i].ID == $activeSlave.relationshipTarget>>
-		<<set $partner = $slaves[_i]>>
-	<<if $activeSlave.relationship <= 1>>
-		<<set _activeSlaveRel = "friend", _partnerRel to "friend">>
-	<<elseif $activeSlave.relationship <= 2>>
-		<<set _activeSlaveRel = "best friend", _partnerRel to "best friend">>
-	<<elseif $activeSlave.relationship <= 3>>
-		<<set _activeSlaveRel = "friend with benefits", _partnerRel to "friend with benefits">>
-	<<elseif $activeSlave.relationship <= 4>>
-		<<set _activeSlaveRel = "lover", _partnerRel to "lover">>
-	<<elseif $activeSlave.relationship > 4>>
-		<<set _activeSlaveRel = "slave wife", _partnerRel to "slave wife">>
-	<</if>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $partner = $slaves.findIndex(function(s) { return s.ID == $activeSlave.relationshipTarget; })>>
+	<<switch $activeSlave.relationship>>
+	<<case 1>>
+		<<set _activeSlaveRel = "friend", _partnerRel = "friend">>
+	<<case 2>>
+		<<set _activeSlaveRel = "best friend", _partnerRel = "best friend">>
+	<<case 3>>
+		<<set _activeSlaveRel = "friend with benefits", _partnerRel = "friend with benefits">>
+	<<case 4>>
+		<<set _activeSlaveRel = "lover", _partnerRel = "lover">>
+	<<case 4>>
+		<<set _activeSlaveRel = "slave wife", _partnerRel = "slave wife">>
+	<</switch>>
 <</if>>
 
-You call both $activeSlave.slaveName and $partner.slaveName to your office.
+You call both $activeSlave.slaveName and $slaves[$partner].slaveName to your office.
 
-<<if canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 50) && ($partner.dick > 0) && ($activeSlave.dick > 0) && ($partner.anus > 0) && ($activeSlave.anus > 0) && ($partner.hormones < 1) && ($activeSlave.hormones < 1) && ($partner.balls !== 0) && ($activeSlave.balls !== 0) && ($PC.dick == 1)>>
-	There are three stiff pricks available. Since $activeSlave.slaveName was already in your office, she goes on the bottom. She lies on the floor, spreads her <<if $seeRace == 1>>$activeSlave.race <</if>>buttocks, relaxes her anus, and then begs her _partnerRel to buttfuck her. $partner.slaveName does, slipping her cock into her _activeSlaveRel's ass. She then stops and waits for you to buttfuck her in turn. It isn't a particularly convenient way to fuck, but it's got the virtue of being uncommon. $partner.slaveName, both fucking and getting fucked, comes in her _activeSlaveRel's rectum first. They switch places so $activeSlave.slaveName can have a turn in the middle, leaving you to finish into $activeSlave.slaveName's already cum-soaked hole.
-	<<set $activeSlave.analCount += 2, $activeSlave.penetrativeCount++, $partner.analCount += 2, $partner.penetrativeCount++, $analTotal += 4, $penetrativeTotal += 2>>
-<<elseif ($partner.devotion - $activeSlave.devotion > 20) && ($partner.devotion <= 50)>>
-	$partner.slaveName is a lot more ready and willing for this than $activeSlave.slaveName, so<<if ($PC.dick == 0)>>while getting into a strap-on, you<</if>> you sit her on the couch and make $activeSlave.slaveName sit on her lap, facing her. In this position, $partner.slaveName can reach around and spread her _activeSlaveRel's <<if $seeRace == 1>>$partner.race <</if>>buttocks for her, controlling her all the while in case she has hesitations about this. $activeSlave.slaveName knows that she's trapped, and lets her _partnerRel hold her ass wide so you can use her. They're face to face, and it's not hard to tell that $activeSlave.slaveName is glaring daggers at $partner.slaveName. You reward $partner.slaveName for her obedience and punish $activeSlave.slaveName for her resistance by forcing her to orally service $partner.slaveName while you finish using $activeSlave.slaveName.
-	<<set $activeSlave.oralCount++, $partner.oralCount++, $oralTotal++>>
+<<if canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 50) && canPenetrate($activeSlave) && canPenetrate($slaves[$partner]) && ($slaves[$partner].anus > 0) && ($activeSlave.anus > 0) && ($PC.dick == 1)>>
+	There are three stiff pricks available. Since $activeSlave.slaveName was already in your office, she goes on the bottom. She lies on the floor, spreads her <<if $seeRace == 1>>$activeSlave.race <</if>>buttocks, relaxes her anus, and then begs her _partnerRel to buttfuck her. $slaves[$partner].slaveName does, slipping her cock into her _activeSlaveRel's ass. She then stops and waits for you to buttfuck her in turn. It isn't a particularly convenient way to fuck, but it's got the virtue of being uncommon. $slaves[$partner].slaveName, both fucking and getting fucked, comes in her _activeSlaveRel's rectum first. They switch places so $activeSlave.slaveName can have a turn in the middle, leaving you to finish into $activeSlave.slaveName's already cum-soaked hole.
+	<<set $activeSlave.analCount += 2, $activeSlave.penetrativeCount++, $slaves[$partner].analCount += 2, $slaves[$partner].penetrativeCount++, $analTotal += 4, $penetrativeTotal += 2>>
+<<elseif ($slaves[$partner].devotion - $activeSlave.devotion > 20) && ($slaves[$partner].devotion <= 50)>>
+	$slaves[$partner].slaveName is a lot more ready and willing for this than $activeSlave.slaveName, so<<if ($PC.dick == 0)>>while getting into a strap-on, you<</if>> you sit her on the couch and make $activeSlave.slaveName sit on her lap, facing her. In this position, $slaves[$partner].slaveName can reach around and spread her _activeSlaveRel's <<if $seeRace == 1>>$slaves[$partner].race <</if>>buttocks for her, controlling her all the while in case she has hesitations about this. $activeSlave.slaveName knows that she's trapped, and lets her _partnerRel hold her ass wide so you can use her. They're face to face, and it's not hard to tell that $activeSlave.slaveName is glaring daggers at $slaves[$partner].slaveName. You reward $slaves[$partner].slaveName for her obedience and punish $activeSlave.slaveName for her resistance by forcing her to orally service $slaves[$partner].slaveName while you finish using $activeSlave.slaveName.
+	<<set $activeSlave.oralCount++, $slaves[$partner].oralCount++, $oralTotal++>>
 	<<BothVCheck>>
-<<elseif ($activeSlave.devotion - $partner.devotion > 20) && ($partner.devotion <= 50)>>
-	$activeSlave.slaveName is a lot more ready and willing for this than $partner.slaveName, so<<if ($PC.dick == 0)>>while getting into a strap-on, you<</if>> you sit her on the couch and make $partner.slaveName sit on her lap, facing her. In this position, $activeSlave.slaveName can reach around and spread her _partnerRel's <<if $seeRace == 1>>$activeSlave.race <</if>>buttocks for her, controlling her all the while in case she has hesitations about this. $partner.slaveName knows that she's trapped, and lets her _activeSlaveRel hold her ass wide so you can use her. They're face to face, and it's not hard to tell that $partner.slaveName is glaring daggers at $activeSlave.slaveName. You reward $activeSlave.slaveName for her obedience and punish $partner.slaveName for her resistance by forcing her to suck $activeSlave.slaveName off while you finish using $partner.slaveName.
-	<<set $activeSlave.oralCount++, $partner.oralCount++, $oralTotal++>>
+<<elseif ($activeSlave.devotion - $slaves[$partner].devotion > 20) && ($slaves[$partner].devotion <= 50)>>
+	$activeSlave.slaveName is a lot more ready and willing for this than $slaves[$partner].slaveName, so<<if ($PC.dick == 0)>>while getting into a strap-on, you<</if>> you sit her on the couch and make $slaves[$partner].slaveName sit on her lap, facing her. In this position, $activeSlave.slaveName can reach around and spread her _partnerRel's <<if $seeRace == 1>>$activeSlave.race <</if>>buttocks for her, controlling her all the while in case she has hesitations about this. $slaves[$partner].slaveName knows that she's trapped, and lets her _activeSlaveRel hold her ass wide so you can use her. They're face to face, and it's not hard to tell that $slaves[$partner].slaveName is glaring daggers at $activeSlave.slaveName. You reward $activeSlave.slaveName for her obedience and punish $slaves[$partner].slaveName for her resistance by forcing her to suck $activeSlave.slaveName off while you finish using $slaves[$partner].slaveName.
+	<<set $activeSlave.oralCount++, $slaves[$partner].oralCount++, $oralTotal++>>
 	<<PartnerVCheck>>
-<<elseif canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 20) && (_activeSlaveRel == "mother")>>
-	$activeSlave.slaveName gives you a little smile when she hears you wish to fuck her and her daughter $partner.slaveName<<if ($PC.dick == 0)>> and sees your strap-on<</if>>. On your direction, $activeSlave.slaveName sits on the couch. When $partner.slaveName enters, her mother spreads her arms and tells her to sit on her lap. $partner.slaveName gets the idea and straddles her so they're face to face. You take $partner.slaveName from behind; she gasps as she feels her mother's hands stimulate her from the front. They make out shamelessly while you take your pleasure. When you finish, $activeSlave.slaveName lies down on the couch so $partner.slaveName can ride her <<if $seeRace == 1>>$activeSlave.race <</if>>face. As she sucks the cum out of her daughter's sopping fuckhole, $partner.slaveName sucks you hard again. In the mood for something harder this time, you jam yourself into the older $activeSlave.slaveName. $partner.slaveName gets off $activeSlave.slaveName's face so she can offer herself for fondling and groping while you pound $activeSlave.slaveName. After you're done, $partner.slaveName returns her mother's affection and gives her some gentle oral as the older slave lies there exhausted.
-	<<set $activeSlave.oralCount += 2, $partner.oralCount += 2, $oralTotal += 2>>
+<<elseif canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 20) && (_activeSlaveRel == "mother")>>
+	$activeSlave.slaveName gives you a little smile when she hears you wish to fuck her and her daughter $slaves[$partner].slaveName<<if ($PC.dick == 0)>> and sees your strap-on<</if>>. On your direction, $activeSlave.slaveName sits on the couch. When $slaves[$partner].slaveName enters, her mother spreads her arms and tells her to sit on her lap. $slaves[$partner].slaveName gets the idea and straddles her so they're face to face. You take $slaves[$partner].slaveName from behind; she gasps as she feels her mother's hands stimulate her from the front. They make out shamelessly while you take your pleasure. When you finish, $activeSlave.slaveName lies down on the couch so $slaves[$partner].slaveName can ride her <<if $seeRace == 1>>$activeSlave.race <</if>>face. As she sucks the cum out of her daughter's sopping fuckhole, $slaves[$partner].slaveName sucks you hard again. In the mood for something harder this time, you jam yourself into the older $activeSlave.slaveName. $slaves[$partner].slaveName gets off $activeSlave.slaveName's face so she can offer herself for fondling and groping while you pound $activeSlave.slaveName. After you're done, $slaves[$partner].slaveName returns her mother's affection and gives her some gentle oral as the older slave lies there exhausted.
+	<<set $activeSlave.oralCount += 2, $slaves[$partner].oralCount += 2, $oralTotal += 2>>
 	<<BothVCheck>>
 	<<PartnerVCheck>>
-<<elseif canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 20) && (_activeSlaveRel == "father")>>
-	$activeSlave.slaveName gives you a little smile when she hears you wish to fuck her and her daughter $partner.slaveName<<if ($PC.dick is 0)>> and sees your strap-on<</if>>. On your direction, $activeSlave.slaveName sits on the couch. When $partner.slaveName enters, her father spreads her arms and tells her to sit on her lap. $partner.slaveName gets the idea and straddles her so they're face to face. You take $partner.slaveName from behind; she gasps as she feels her father's hands stimulate her from the front. They make out shamelessly while you take your pleasure. When you finish, $activeSlave.slaveName lies down on the couch so $partner.slaveName can ride her <<if $seeRace == 1>>$activeSlave.race <</if>>face. As she sucks the cum out of her daughter's sopping fuckhole, $partner.slaveName sucks you hard again. In the mood for something harder this time, you jam yourself into the older $activeSlave.slaveName. $partner.slaveName gets off $activeSlave.slaveName's face so she can offer herself for fondling and groping while you pound $activeSlave.slaveName. After you're done, $partner.slaveName returns her father's affection and gives her some gentle oral as the older slave lies there exhausted.
-	<<set $activeSlave.oralCount += 2, $partner.oralCount += 2, $oralTotal += 2>>
+<<elseif canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 20) && (_activeSlaveRel == "father")>>
+	$activeSlave.slaveName gives you a little smile when she hears you wish to fuck her and her daughter $slaves[$partner].slaveName<<if ($PC.dick is 0)>> and sees your strap-on<</if>>. On your direction, $activeSlave.slaveName sits on the couch. When $slaves[$partner].slaveName enters, her father spreads her arms and tells her to sit on her lap. $slaves[$partner].slaveName gets the idea and straddles her so they're face to face. You take $slaves[$partner].slaveName from behind; she gasps as she feels her father's hands stimulate her from the front. They make out shamelessly while you take your pleasure. When you finish, $activeSlave.slaveName lies down on the couch so $slaves[$partner].slaveName can ride her <<if $seeRace == 1>>$activeSlave.race <</if>>face. As she sucks the cum out of her daughter's sopping fuckhole, $slaves[$partner].slaveName sucks you hard again. In the mood for something harder this time, you jam yourself into the older $activeSlave.slaveName. $slaves[$partner].slaveName gets off $activeSlave.slaveName's face so she can offer herself for fondling and groping while you pound $activeSlave.slaveName. After you're done, $slaves[$partner].slaveName returns her father's affection and gives her some gentle oral as the older slave lies there exhausted.
+	<<set $activeSlave.oralCount += 2, $slaves[$partner].oralCount += 2, $oralTotal += 2>>
 	<<BothVCheck>>
 	<<PartnerVCheck>>
-<<elseif canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 20) && (_activeSlaveRel == "daughter")>>
-	$activeSlave.slaveName is enthusiastic when she hears you order $partner.slaveName to come over. Her total immersion in sexual slavery has clearly uncovered a willingness to get very close to her mother. You<<if ($PC.dick == 0)>> don a strap-on,<</if>> lie on the floor and instruct $partner.slaveName to ride you. She complies, and finds her daughter $activeSlave.slaveName <<if ($partner.dick > 0)>>stroking her cock while she humps her <<if $seeRace == 1>>$activeSlave.race <</if>>butt up and down on your cock.<<else>>licking her anus while she humps herself up and down on your cock.<</if>> Your use of $partner.slaveName's mature body is the focus. She finds herself caught up in a miasma of sexual pleasure and perversion, moaning and blushing as your <<if ($PC.dick == 0)>>strap-on and fingers<<else>>cock<</if>> and $partner.slaveName's mouth tour her body. When you finish in her <<if ($partner.dick > 0)>>asshole, her daughter hastens to lavish attention on her mother's well fucked, cum filled butt.<<else>>pussy, her daughter hastens to lavish attention on her mother's well fucked, cum filled cunt.<</if>>
+<<elseif canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 20) && (_activeSlaveRel == "daughter")>>
+	$activeSlave.slaveName is enthusiastic when she hears you order $slaves[$partner].slaveName to come over. Her total immersion in sexual slavery has clearly uncovered a willingness to get very close to her mother. You<<if ($PC.dick == 0)>> don a strap-on,<</if>> lie on the floor and instruct $slaves[$partner].slaveName to ride you. She complies, and finds her daughter $activeSlave.slaveName <<if ($slaves[$partner].dick > 0)>>stroking her cock while she humps her <<if $seeRace == 1>>$activeSlave.race <</if>>butt up and down on your cock.<<else>>licking her anus while she humps herself up and down on your cock.<</if>> Your use of $slaves[$partner].slaveName's mature body is the focus. She finds herself caught up in a miasma of sexual pleasure and perversion, moaning and blushing as your <<if ($PC.dick == 0)>>strap-on and fingers<<else>>cock<</if>> and $slaves[$partner].slaveName's mouth tour her body. When you finish in her <<if ($slaves[$partner].dick > 0)>>asshole, her daughter hastens to lavish attention on her mother's well fucked, cum filled butt.<<else>>pussy, her daughter hastens to lavish attention on her mother's well fucked, cum filled cunt.<</if>>
 	<<PartnerVCheck>>
-<<elseif ($activeSlave.vaginalAccessory !== "chastity belt") && ($partner.vaginalAccessory !== "chastity belt") && canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 50) && (_activeSlaveRel == "twin")>>
-	$activeSlave.slaveName and $partner.slaveName are such devoted sex slaves that they've long since lost any hesitations about their partnership, and generally approach sex as though their bodies were interchangeable. (This means that they almost never masturbate, for one thing, preferring to have sex with each other, instead.) Giggling and kissing each other, they eagerly kneel before your chair and give you simultaneous oral sex, making an effort to play with their symmetry. They kiss around your <<if ($PC.dick == 0)>>pussy<<else>>cock, making a complete seal around you with their lips<</if>>, one on each side. Then they jump up on your desk and press their <<if ($activeSlave.dick > 0) && ($partner.dick > 0)>>cocks<<elseif ($activeSlave.dick > 0) || ($partner.dick > 0)>>cock and pussy<<else>>pussies<</if>> against one another<<if ($PC.dick == 0)>> while you don a strap-on<</if>>, spreading their legs to offer you everything. You switch back and forth, with the twin you're not in rubbing and grinding against her sister, until both of $partner.slaveName and $activeSlave.slaveName are lying on the desk<<if ($PC.dick == 1)>> with cum dripping out of them<</if>>, making out tiredly.
-	<<set $partner.oralCount++, $activeSlave.oralCount++, $oralTotal++>>
+<<elseif canDoVaginal($activeSlave) && canDoVaginal($slaves[$partner]) && canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 50) && (_activeSlaveRel == "twin")>>
+	$activeSlave.slaveName and $slaves[$partner].slaveName are such devoted sex slaves that they've long since lost any hesitations about their partnership, and generally approach sex as though their bodies were interchangeable. (This means that they almost never masturbate, for one thing, preferring to have sex with each other, instead.) Giggling and kissing each other, they eagerly kneel before your chair and give you simultaneous oral sex, making an effort to play with their symmetry. They kiss around your <<if ($PC.dick == 0)>>pussy<<else>>cock, making a complete seal around you with their lips<</if>>, one on each side. Then they jump up on your desk and press their <<if ($activeSlave.dick > 0) && ($slaves[$partner].dick > 0)>>cocks<<elseif ($activeSlave.dick > 0) || ($slaves[$partner].dick > 0)>>cock and pussy<<else>>pussies<</if>> against one another<<if ($PC.dick == 0)>> while you don a strap-on<</if>>, spreading their legs to offer you everything. You switch back and forth, with the twin you're not in rubbing and grinding against her sister, until both of $slaves[$partner].slaveName and $activeSlave.slaveName are lying on the desk<<if ($PC.dick == 1)>> with cum dripping out of them<</if>>, making out tiredly.
+	<<set $slaves[$partner].oralCount++, $activeSlave.oralCount++, $oralTotal++>>
 	<<BothVCheck>>
 	<<PartnerVCheck>>
-<<elseif canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 20) && (_activeSlaveRel == "sister")>>
-	You call $activeSlave.slaveName's sister $partner.slaveName in for some incestuous fun, but see no reason to wait for her. When she arrives, it's to the sight of $activeSlave.slaveName sitting on the couch with her legs spread with you <<if ($activeSlave.vagina > -1)>>gently fucking her pussy<<else>>using her asshole<</if>><<if ($PC.dick == 0)>> with a strap-on<</if>>. You pull out and order $partner.slaveName to orally service her sister. She gets down before the spreadeagled slave girl to get to work. After watching $activeSlave.slaveName enjoy the attention for a while, you move behind the busy $partner.slaveName and pull her into a good position so you can fuck her while she sucks. After a few thrusts, $activeSlave.slaveName's eyes roll back. <<if ($activeSlave.voice == 0) || ($activeSlave.accent >= 3)>>She gestures that it feels really good when you make her sister moan into her.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Oh <<Master>>," she lisps, "it feelth tho good when thee moanth into me!"<<else>>"Oh <<Master>>," she squeals, "it feels great when you make her moan into me!"<</if>>
-	<<set $partner.oralCount++, $activeSlave.oralCount++, $oralTotal++>>
+<<elseif canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 20) && (_activeSlaveRel == "sister")>>
+	You call $activeSlave.slaveName's sister $slaves[$partner].slaveName in for some incestuous fun, but see no reason to wait for her. When she arrives, it's to the sight of $activeSlave.slaveName sitting on the couch with her legs spread with you <<if ($activeSlave.vagina > -1)>>gently fucking her pussy<<else>>using her asshole<</if>><<if ($PC.dick == 0)>> with a strap-on<</if>>. You pull out and order $slaves[$partner].slaveName to orally service her sister. She gets down before the spreadeagled slave girl to get to work. After watching $activeSlave.slaveName enjoy the attention for a while, you move behind the busy $slaves[$partner].slaveName and pull her into a good position so you can fuck her while she sucks. After a few thrusts, $activeSlave.slaveName's eyes roll back. <<if ($activeSlave.voice == 0) || ($activeSlave.accent >= 3)>>She gestures that it feels really good when you make her sister moan into her.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Oh <<Master>>," she lisps, "it feelth tho good when thee moanth into me!"<<else>>"Oh <<Master>>," she squeals, "it feels great when you make her moan into me!"<</if>>
+	<<set $slaves[$partner].oralCount++, $activeSlave.oralCount++, $oralTotal++>>
 	<<BothVCheck>>
 	<<PartnerVCheck>>
-<<elseif canWalk($activeSlave) && canWalk($partner) && ($activeSlave.devotion > 50) && ($partner.devotion > 20) && (_activeSlaveRel == "half-sister")>>
-	You call $activeSlave.slaveName's half-sister $partner.slaveName in for some incestuous fun, but see no reason to wait for her. When she arrives, it's to the sight of $activeSlave.slaveName sitting on the couch with her legs spread with you <<if ($activeSlave.vagina > -1)>>gently fucking her pussy<<else>>using her asshole<</if>><<if ($PC.dick == 0)>> with a strap-on<</if>>. You pull out and order $partner.slaveName to orally service her half-sister. She gets down before the spreadeagled slave girl to get to work. After watching $activeSlave.slaveName enjoy the attention for a while, you move behind the busy $partner.slaveName and pull her into a good position so you can fuck her while she sucks. After a few thrusts, $activeSlave.slaveName's eyes roll back. <<if ($activeSlave.voice == 0) || ($activeSlave.accent >= 3)>>She gestures that it feels really good when you make her sister moan into her.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Oh <<Master>>," she lisps, "it feelth tho good when thee moanth into me!"<<else>>"Oh <<Master>>," she squeals, "it feels great when you make her moan into me!"<</if>>
-	<<set $partner.oralCount++, $activeSlave.oralCount++, $oralTotal++>>
+<<elseif canWalk($activeSlave) && canWalk($slaves[$partner]) && ($activeSlave.devotion > 50) && ($slaves[$partner].devotion > 20) && (_activeSlaveRel == "half-sister")>>
+	You call $activeSlave.slaveName's half-sister $slaves[$partner].slaveName in for some incestuous fun, but see no reason to wait for her. When she arrives, it's to the sight of $activeSlave.slaveName sitting on the couch with her legs spread with you <<if ($activeSlave.vagina > -1)>>gently fucking her pussy<<else>>using her asshole<</if>><<if ($PC.dick == 0)>> with a strap-on<</if>>. You pull out and order $slaves[$partner].slaveName to orally service her half-sister. She gets down before the spreadeagled slave girl to get to work. After watching $activeSlave.slaveName enjoy the attention for a while, you move behind the busy $slaves[$partner].slaveName and pull her into a good position so you can fuck her while she sucks. After a few thrusts, $activeSlave.slaveName's eyes roll back. <<if ($activeSlave.voice == 0) || ($activeSlave.accent >= 3)>>She gestures that it feels really good when you make her sister moan into her.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Oh <<Master>>," she lisps, "it feelth tho good when thee moanth into me!"<<else>>"Oh <<Master>>," she squeals, "it feels great when you make her moan into me!"<</if>>
+	<<set $slaves[$partner].oralCount++, $activeSlave.oralCount++, $oralTotal++>>
 	<<BothVCheck>>
 	<<PartnerVCheck>>
 <<elseif (_activeSlaveRel == "twin") || (_activeSlaveRel == "daughter") || (_activeSlaveRel == "mother") || (_activeSlaveRel == "father") || (_activeSlaveRel == "sister") || (_activeSlaveRel == "half-sister")>>
-	Since between them they aren't able to enthusiastically perform an incestuous threesome, you simply line $activeSlave.slaveName and $partner.slaveName up next to one another on the couch next to your desk,<<if ($PC.dick == 0)>> don a strap-on,<</if>> and fuck <<if $seeRace == 1>>$activeSlave.race holes <</if>>at will. Whenever a hole begins to pall you just switch to another. $activeSlave.slaveName tries hard to ignore the fact that she's getting fucked next to her _partnerRel, and $partner.slaveName pretends the cock getting shoved into her isn't slick from her _activeSlaveRel's fuckhole.
+	Since between them they aren't able to enthusiastically perform an incestuous threesome, you simply line $activeSlave.slaveName and $slaves[$partner].slaveName up next to one another on the couch next to your desk,<<if ($PC.dick == 0)>> don a strap-on,<</if>> and fuck <<if $seeRace == 1>>$activeSlave.race holes <</if>>at will. Whenever a hole begins to pall you just switch to another. $activeSlave.slaveName tries hard to ignore the fact that she's getting fucked next to her _partnerRel, and $slaves[$partner].slaveName pretends the cock getting shoved into her isn't slick from her _activeSlaveRel's fuckhole.
 	<<BothVCheck>>
 	<<PartnerVCheck>>
-<<elseif ((_activeSlaveRel == "friend") || (_activeSlaveRel == "best friend")) && ($activeSlave.devotion > 20) && ($partner.devotion > 20)>>
-	$activeSlave.slaveName and $partner.slaveName line up next to one another on the couch next to your desk<<if ($PC.dick == 0)>> while you don a strap-on,<</if>> and offer you their holes. They're just friends, but they're sex slaves and they see nothing wrong with enjoying sex with you, together. They keep up a constant stream of giggling, gasping, and smiling as each of them in turn feels a cock, warm and wet from her friend's body, transferred into her. Each of them does her best to help the other do well, even manually stimulating her friend when necessary<<if ($PC.boobs > 0)>> and spinning around to lavish attention on your nipples<</if>>.
+<<elseif ((_activeSlaveRel == "friend") || (_activeSlaveRel == "best friend")) && ($activeSlave.devotion > 20) && ($slaves[$partner].devotion > 20)>>
+	$activeSlave.slaveName and $slaves[$partner].slaveName line up next to one another on the couch next to your desk<<if ($PC.dick == 0)>> while you don a strap-on,<</if>> and offer you their holes. They're just friends, but they're sex slaves and they see nothing wrong with enjoying sex with you, together. They keep up a constant stream of giggling, gasping, and smiling as each of them in turn feels a cock, warm and wet from her friend's body, transferred into her. Each of them does her best to help the other do well, even manually stimulating her friend when necessary<<if ($PC.boobs > 0)>> and spinning around to lavish attention on your nipples<</if>>.
 	<<BothVCheck>>
 	<<PartnerVCheck>>
-<<elseif ((_activeSlaveRel == "friend with benefits") || (_activeSlaveRel == "lover") || (_activeSlaveRel == "slave wife")) && ($activeSlave.devotion > 20) && ($partner.devotion > 20)>>
-	$activeSlave.slaveName and $partner.slaveName eagerly repair to the couch and arrange themselves face to face so they can make out and enjoy each other's bodies as you enjoy theirs. You decide not to set up an elaborate threesome, and just <<if ($PC.dick == 0)>>engage in a little tribadism with<<else>>fuck<</if>> whatever hole catches your eye next. They rarely break their intimate kissing, forming between the two of them a loving entity on the couch with all sorts of interesting parts to experience. They're sex slaves, and you're fucking them, but they're also lovers who are very comfortable in each others' arms, kissing, fondling each other, and <<if ($PC.dick == 0)>>enjoying your pussy loving<<else>>taking your dick<</if>>.
+<<elseif ((_activeSlaveRel == "friend with benefits") || (_activeSlaveRel == "lover") || (_activeSlaveRel == "slave wife")) && ($activeSlave.devotion > 20) && ($slaves[$partner].devotion > 20)>>
+	$activeSlave.slaveName and $slaves[$partner].slaveName eagerly repair to the couch and arrange themselves face to face so they can make out and enjoy each other's bodies as you enjoy theirs. You decide not to set up an elaborate threesome, and just <<if ($PC.dick == 0)>>engage in a little tribadism with<<else>>fuck<</if>> whatever hole catches your eye next. They rarely break their intimate kissing, forming between the two of them a loving entity on the couch with all sorts of interesting parts to experience. They're sex slaves, and you're fucking them, but they're also lovers who are very comfortable in each others' arms, kissing, fondling each other, and <<if ($PC.dick == 0)>>enjoying your pussy loving<<else>>taking your dick<</if>>.
 	<<BothVCheck>>
 	<<PartnerVCheck>>
 <<else>>
-	Since between them they aren't able to enthusiastically perform a threesome, you simply line $activeSlave.slaveName and $partner.slaveName up next to one another on the couch next to your desk, and fuck <<if $seeRace == 1>>$activeSlave.race holes <</if>>at will. Whenever a hole begins to pall you just switch to another. $activeSlave.slaveName tries hard to ignore the fact that she's getting fucked next to her _partnerRel, and $partner.slaveName pretends the <<if ($PC.dick == 0)>>strap-on<<else>>cock<</if>> getting shoved into her isn't slick from her _activeSlaveRel's fuckhole.
+	Since between them they aren't able to enthusiastically perform a threesome, you simply line $activeSlave.slaveName and $slaves[$partner].slaveName up next to one another on the couch next to your desk, and fuck <<if $seeRace == 1>>$activeSlave.race holes <</if>>at will. Whenever a hole begins to pall you just switch to another. $activeSlave.slaveName tries hard to ignore the fact that she's getting fucked next to her _partnerRel, and $slaves[$partner].slaveName pretends the <<if ($PC.dick == 0)>>strap-on<<else>>cock<</if>> getting shoved into her isn't slick from her _activeSlaveRel's fuckhole.
 	<<BothVCheck>>
 	<<PartnerVCheck>>
 <</if>>
 
-<<if $slaves[_i].ID == $partner.ID>>
-	<<set $slaves[_i] = $partner>>
-<<else>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-	<<if $slaves[_i].ID == $partner.ID>>
-		<<set $slaves[_i] = $partner>>
-		<<break>>
-	<</if>>
-	<</for>>
-<</if>>
 <<if passage() !== "Slave Interact">>
-<<for _i = 0; _i < $slaves.length; _i++>>
-<<if $slaves[_i].ID == $activeSlave.ID>>
-	<<set $slaves[_i] = $activeSlave>>
-	<<break>>
+	<<set $nextLink = "AS Dump">>
 <</if>>
-<</for>>
-<</if>>
-<<set $partner = "">>
+
+<<set $partner = 0>>
 <<set $relation = "">>
 <<set $relationType = "">>
-<<set $relationID = "">>
-<</nobr>>
diff --git a/src/npc/fRival.tw b/src/npc/fRival.tw
index 780e958084d2726cebdcf126c128d6f0e2b2a0c9..9aba3c746929bca6f3491c1709daed2184ca65c2 100644
--- a/src/npc/fRival.tw
+++ b/src/npc/fRival.tw
@@ -1,78 +1,56 @@
-:: FRival
+:: FRival [nobr]
 
-<<nobr>>
-<<for _i = 0; _i < $slaves.length; _i++>>
-	<<if $slaves[_i].ID == $activeSlave.rivalryTarget>>
-		<<set _rival = $slaves[_i]>>
-		<<break>>
-	<</if>>
-<</for>>
-You call $activeSlave.slaveName to your office and let her know you'll be abusing _rival.slaveName together.
+<<set $partner = $slaves.findIndex(function(s) { return s.ID == $activeSlave.rivalryTarget; })>>
+
+You call $activeSlave.slaveName to your office and let her know you'll be abusing $slaves[$partner].slaveName together.
 
 <<if ($activeSlave.fetish == "sadist") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
 	She looks overjoyed at the prospect of getting to hurt someone.
 <</if>>
 
-_rival.slaveName sees $activeSlave.slaveName as she enters and looks worried.
+$slaves[$partner].slaveName sees $activeSlave.slaveName as she enters and looks worried.
 
-<<if (_rival.anus == 0) && (_rival.vagina < 0)>>
-	Since she's a sissy bitch and an anal virgin, you tell her to bend over and <<if ($PC.dick == 0)>>give you head<<else>>suck your dick<</if>>. She does, and once she's working away, you tell $activeSlave.slaveName to come over and start spanking. _rival.slaveName begins to lift her head as though to protest, so you shove her back down onto your <<if ($PC.dick == 0)>>pussy<<else>>cock<</if>>, gagging and struggling. $activeSlave.slaveName administers a series of cruel slaps to the quivering <<if $seeRace == 1>>_rival.race <</if>>buttocks in front of her, making your victim yell delightfully into your <<if ($PC.dick == 0)>>womanhood<<else>>member<</if>>. After a short time $activeSlave.slaveName decides to be even crueler, and begins to 'miss' frequently, hitting _rival.slaveName's limp dick instead of her ass.
-	<<set _rival.oralCount++, $oralTotal++>>
-<<elseif (_rival.anus == 0) && (_rival.vagina == 0)>>
-	Since she's a virgin, you tell her to bend over and <<if ($PC.dick == 0)>>give you head<<else>>suck your dick<</if>>. She does, and once she's working away, you tell $activeSlave.slaveName to come over and start spanking. _rival.slaveName begins to lift her head as though to protest, so you shove her back down onto your <<if ($PC.dick == 0)>>pussy<<else>>cock<</if>>, gagging and struggling. $activeSlave.slaveName administers a series of cruel slaps to the quivering <<if $seeRace == 1>>_rival.race <</if>>buttocks in front of her, making your victim yell delightfully into your <<if ($PC.dick == 0)>>womanhood<<else>>member<</if>>. After a short time $activeSlave.slaveName decides to be even crueler, and begins to 'miss' frequently, hitting _rival.slaveName's poor pussy instead of her ass.
-	<<set _rival.oralCount++, $oralTotal++>>
-<<elseif (_rival.anus == 0) && (_rival.vagina > 0) && ($activeSlave.dick > 0) && ($activeSlave.balls > 0) && ($activeSlave.hormones < 1) && ($activeSlave.dickAccessory !== "chastity")>>
-	You tell her to bend over and <<if ($PC.dick == 0)>>give you head<<else>>suck your dick<</if>>. She does, and once she's working away, you tell $activeSlave.slaveName to use the bitch. _rival.slaveName begins to lift her head as though to protest, so you shove her back down onto your <<if ($PC.dick == 0)>>pussy<<else>>cock<</if>>, gagging and struggling. $activeSlave.slaveName lands a slap on the <<if $seeRace == 1>>_rival.race <</if>>butt in front of her as she lines her turgid dick up with _rival.slaveName's pussy. She sinks in with a sigh and begins to enjoy herself, using slaps and pinches to ensure that of the two slaves, the fun is entirely on her side.
-	<<set _rival.vaginalCount++, _rival.oralCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $oralTotal++, $penetrativeTotal++>>
-<<elseif (_rival.anus == 0) && (_rival.vagina > 0) && ($activeSlave.dick > 0)>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing away from you. She does, not without trepidation, which increases when you hold her securely in place. Once she's humping away, you tell $activeSlave.slaveName to use her face. $activeSlave.slaveName comes over slowly, unsure what to do with the offer since her dick is so useless. She forces _rival.slaveName's face against her useless member anyway. After a bit of this, $activeSlave.slaveName, clearly unsatisfied, turns around and rides _rival.slaveName with her ass instead. _rival.slaveName tries to avoid orally servicing her rival's asshole, but you hold her in place and $activeSlave.slaveName sighs in contentment.
-	<<set _rival.oralCount++, _rival.vaginalCount++, $activeSlave.oralCount++, $vaginalTotal++, $oralTotal += 2>>
-<<elseif (_rival.anus == 0) && (_rival.vagina > 0)>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing away from you. She does, not without trepidation, which increases when you hold her securely in place. Once she's humping away, you tell $activeSlave.slaveName to ride her face. $activeSlave.slaveName comes over, gently rubbing her pussy. She forces _rival.slaveName's face against her slick cunt, ignoring her reluctance. _rival.slaveName eventually realizes that she's better off getting it over with, and applies her tongue as best she can.
-	<<set _rival.oralCount++, _rival.vaginalCount++, $activeSlave.oralCount++, $vaginalTotal++, $oralTotal += 2>>
-<<elseif (_rival.anus > 0) && (_rival.vagina < 0) && ($activeSlave.dick > 0) && ($activeSlave.balls > 0) && ($activeSlave.hormones < 1) && $activeSlave.dickAccessory !== ("chastity")>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She lowers her butthole down onto your cock, not without trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard, not certain what you mean. To make it clear, you hook a single finger up into poor _rival.slaveName's rectum alongside <<if ($PC.dick == 0)>>the fake phallus<<else>>your dick<</if>>. It takes $activeSlave.slaveName a while to jam her cock up the struggling and sobbing _rival.slaveName's anus. Of the three phalli present, _rival.slaveName's is the only one that's soft as she cries her way through a brutal double anal rape.
-	<<set _rival.analCount++, $activeSlave.penetrativeCount++, $analTotal++, $penetrativeTotal++>>
-<<elseif (_rival.anus > 0) && (_rival.vagina == 0) && ($activeSlave.dick > 0) && ($activeSlave.balls > 0) && ($activeSlave.hormones < 1) && $activeSlave.dickAccessory !== ("chastity")>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>> anally, facing you. She lowers her butthole down onto your cock, not without trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard, not certain what you mean. To make it clear, you hook a single finger up into poor _rival.slaveName's rectum alongside <<if ($PC.dick == 0)>>the fake phallus<<else>>your dick<</if>>. It takes $activeSlave.slaveName a while to jam her cock up the struggling and sobbing _rival.slaveName's anus. _rival.slaveName buys continued vaginal virginity by taking a brutal double anal rape.
-	<<set _rival.analCount++, $activeSlave.penetrativeCount++, $analTotal++, $penetrativeTotal++>>
-<<elseif (_rival.anus > 0) && (_rival.vagina < 1) && ($activeSlave.dick > 0)>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>> anally, facing away from you. She does, not without trepidation, which increases when you hold her securely in place as you pump yourself in and out of her asshole. You tell $activeSlave.slaveName to ride her face. $activeSlave.slaveName comes over slowly, unsure what to do with the offer since her dick is so useless. She forces _rival.slaveName's face against her useless member anyway. After a bit of this, $activeSlave.slaveName, clearly unsatisfied, turns around and rides _rival.slaveName with her ass instead. _rival.slaveName tries to avoid orally servicing her rival's asshole, but you hold her in place and $activeSlave.slaveName sighs in contentment.
-	<<set _rival.analCount++, _rival.oralCount++, $activeSlave.oralCount++, $analTotal++, $oralTotal += 2>>
-<<elseif (_rival.anus > 0) && (_rival.vagina < 1)>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>> anally, facing away from you. She does, not without trepidation, which increases when you hold her securely in place as you pump yourself in and out of her asshole. You tell $activeSlave.slaveName to ride her face. $activeSlave.slaveName comes over, gently rubbing her pussy. She forces _rival.slaveName's face against her slick cunt, ignoring her reluctance. _rival.slaveName eventually realizes that she's better off getting it over with, and applies her tongue as best she can.
-	<<set _rival.oralCount++, _rival.analCount++, $activeSlave.oralCount++, $analTotal++, $oralTotal += 2>>
-<<elseif (_rival.anus > 0) && (_rival.vagina > 0) && ($activeSlave.dick > 0) && ($activeSlave.balls > 0) && ($activeSlave.hormones < 1) && $activeSlave.dickAccessory !== ("chastity")>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She does, with some trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard. You squeeze _rival.slaveName's buttocks together and then spread them again, forcing her anus to wink invitingly. You stop _rival.slaveName's abortive humping and hold her hips in place while $activeSlave.slaveName gets her cock up her ass. Once she's set, off the two of you go, with poor _rival.slaveName gasping and grimacing as she gets it rough in both holes.
-	<<set _rival.vaginalCount++, _rival.analCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $analTotal++, $penetrativeTotal++>>
-<<elseif (_rival.anus > 0) && (_rival.vagina > 0) && ($activeSlave.dick > 0)>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She does, with some trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard, not certain what you mean, since her cock is useless. To make it clear, you push two fingers into _rival.slaveName's butt, finger fucking her asshole until $activeSlave.slaveName takes over. Once she's set, off the two of you go, with poor _rival.slaveName gasping and grimacing as she gets it rough in both holes. $activeSlave.slaveName uses as many fingers as she can, always at least one more than _rival.slaveName would like.
-	<<set _rival.vaginalCount++, _rival.analCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $analTotal++, $penetrativeTotal++>>
-<<elseif (_rival.anus > 0) && (_rival.vagina > 0)>>
-	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She does, with some trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you, indicating a strap-on for slave use, on a side shelf. $activeSlave.slaveName hurries into it and comes over. You stop _rival.slaveName's abortive humping and hold her hips in place while $activeSlave.slaveName gets her fake cock up her ass. Once she's set, off the two of you go, with poor _rival.slaveName gasping and grimacing as she gets it rough in both holes. $activeSlave.slaveName murmurs calumnies in _rival.slaveName's ear, pinches her nipples, and generally adds humiliation above and beyond being double penetrated by her owner and her rival.
-	<<set _rival.vaginalCount++, _rival.analCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $analTotal++, $penetrativeTotal++>>
+<<if ($slaves[$partner].anus == 0) && ($slaves[$partner].vagina < 0)>>
+	Since she's a sissy bitch and an anal virgin, you tell her to bend over and <<if ($PC.dick == 0)>>give you head<<else>>suck your dick<</if>>. She does, and once she's working away, you tell $activeSlave.slaveName to come over and start spanking. $slaves[$partner].slaveName begins to lift her head as though to protest, so you shove her back down onto your <<if ($PC.dick == 0)>>pussy<<else>>cock<</if>>, gagging and struggling. $activeSlave.slaveName administers a series of cruel slaps to the quivering <<if $seeRace == 1>>$slaves[$partner].race <</if>>buttocks in front of her, making your victim yell delightfully into your <<if ($PC.dick == 0)>>womanhood<<else>>member<</if>>. After a short time $activeSlave.slaveName decides to be even crueler, and begins to 'miss' frequently, hitting $slaves[$partner].slaveName's limp dick instead of her ass.
+	<<set $slaves[$partner].oralCount++, $oralTotal++>>
+<<elseif ($slaves[$partner].anus == 0) && ($slaves[$partner].vagina == 0)>>
+	Since she's a virgin, you tell her to bend over and <<if ($PC.dick == 0)>>give you head<<else>>suck your dick<</if>>. She does, and once she's working away, you tell $activeSlave.slaveName to come over and start spanking. $slaves[$partner].slaveName begins to lift her head as though to protest, so you shove her back down onto your <<if ($PC.dick == 0)>>pussy<<else>>cock<</if>>, gagging and struggling. $activeSlave.slaveName administers a series of cruel slaps to the quivering <<if $seeRace == 1>>$slaves[$partner].race <</if>>buttocks in front of her, making your victim yell delightfully into your <<if ($PC.dick == 0)>>womanhood<<else>>member<</if>>. After a short time $activeSlave.slaveName decides to be even crueler, and begins to 'miss' frequently, hitting $slaves[$partner].slaveName's poor pussy instead of her ass.
+	<<set $slaves[$partner].oralCount++, $oralTotal++>>
+<<elseif ($slaves[$partner].anus == 0) && ($slaves[$partner].vagina > 0) && canPenetrate($activeSlave)>>
+	You tell her to bend over and <<if ($PC.dick == 0)>>give you head<<else>>suck your dick<</if>>. She does, and once she's working away, you tell $activeSlave.slaveName to use the bitch. $slaves[$partner].slaveName begins to lift her head as though to protest, so you shove her back down onto your <<if ($PC.dick == 0)>>pussy<<else>>cock<</if>>, gagging and struggling. $activeSlave.slaveName lands a slap on the <<if $seeRace == 1>>$slaves[$partner].race <</if>>butt in front of her as she lines her turgid dick up with $slaves[$partner].slaveName's pussy. She sinks in with a sigh and begins to enjoy herself, using slaps and pinches to ensure that of the two slaves, the fun is entirely on her side.
+	<<set $slaves[$partner].vaginalCount++, $slaves[$partner].oralCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $oralTotal++, $penetrativeTotal++>>
+<<elseif ($slaves[$partner].anus == 0) && ($slaves[$partner].vagina > 0) && ($activeSlave.dick > 0)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing away from you. She does, not without trepidation, which increases when you hold her securely in place. Once she's humping away, you tell $activeSlave.slaveName to use her face. $activeSlave.slaveName comes over slowly, unsure what to do with the offer since her dick is so useless. She forces $slaves[$partner].slaveName's face against her useless member anyway. After a bit of this, $activeSlave.slaveName, clearly unsatisfied, turns around and rides $slaves[$partner].slaveName with her ass instead. $slaves[$partner].slaveName tries to avoid orally servicing her rival's asshole, but you hold her in place and $activeSlave.slaveName sighs in contentment.
+	<<set $slaves[$partner].oralCount++, $slaves[$partner].vaginalCount++, $activeSlave.oralCount++, $vaginalTotal++, $oralTotal += 2>>
+<<elseif ($slaves[$partner].anus == 0) && ($slaves[$partner].vagina > 0)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing away from you. She does, not without trepidation, which increases when you hold her securely in place. Once she's humping away, you tell $activeSlave.slaveName to ride her face. $activeSlave.slaveName comes over, gently rubbing her pussy. She forces $slaves[$partner].slaveName's face against her slick cunt, ignoring her reluctance. $slaves[$partner].slaveName eventually realizes that she's better off getting it over with, and applies her tongue as best she can.
+	<<set $slaves[$partner].oralCount++, $slaves[$partner].vaginalCount++, $activeSlave.oralCount++, $vaginalTotal++, $oralTotal += 2>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina < 0) && canPenetrate($activeSlave)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She lowers her butthole down onto your cock, not without trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard, not certain what you mean. To make it clear, you hook a single finger up into poor $slaves[$partner].slaveName's rectum alongside <<if ($PC.dick == 0)>>the fake phallus<<else>>your dick<</if>>. It takes $activeSlave.slaveName a while to jam her cock up the struggling and sobbing $slaves[$partner].slaveName's anus. Of the three phalli present, $slaves[$partner].slaveName's is the only one that's soft as she cries her way through a brutal double anal rape.
+	<<set $slaves[$partner].analCount++, $activeSlave.penetrativeCount++, $analTotal++, $penetrativeTotal++>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina == 0) && canPenetrate($activeSlave)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>> anally, facing you. She lowers her butthole down onto your cock, not without trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard, not certain what you mean. To make it clear, you hook a single finger up into poor $slaves[$partner].slaveName's rectum alongside <<if ($PC.dick == 0)>>the fake phallus<<else>>your dick<</if>>. It takes $activeSlave.slaveName a while to jam her cock up the struggling and sobbing $slaves[$partner].slaveName's anus. $slaves[$partner].slaveName buys continued vaginal virginity by taking a brutal double anal rape.
+	<<set $slaves[$partner].analCount++, $activeSlave.penetrativeCount++, $analTotal++, $penetrativeTotal++>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina < 1) && ($activeSlave.dick > 0)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>> anally, facing away from you. She does, not without trepidation, which increases when you hold her securely in place as you pump yourself in and out of her asshole. You tell $activeSlave.slaveName to ride her face. $activeSlave.slaveName comes over slowly, unsure what to do with the offer since her dick is so useless. She forces $slaves[$partner].slaveName's face against her useless member anyway. After a bit of this, $activeSlave.slaveName, clearly unsatisfied, turns around and rides $slaves[$partner].slaveName with her ass instead. $slaves[$partner].slaveName tries to avoid orally servicing her rival's asshole, but you hold her in place and $activeSlave.slaveName sighs in contentment.
+	<<set $slaves[$partner].analCount++, $slaves[$partner].oralCount++, $activeSlave.oralCount++, $analTotal++, $oralTotal += 2>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina < 1)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>> anally, facing away from you. She does, not without trepidation, which increases when you hold her securely in place as you pump yourself in and out of her asshole. You tell $activeSlave.slaveName to ride her face. $activeSlave.slaveName comes over, gently rubbing her pussy. She forces $slaves[$partner].slaveName's face against her slick cunt, ignoring her reluctance. $slaves[$partner].slaveName eventually realizes that she's better off getting it over with, and applies her tongue as best she can.
+	<<set $slaves[$partner].oralCount++, $slaves[$partner].analCount++, $activeSlave.oralCount++, $analTotal++, $oralTotal += 2>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina > 0) && canPenetrate($activeSlave)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She does, with some trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard. You squeeze $slaves[$partner].slaveName's buttocks together and then spread them again, forcing her anus to wink invitingly. You stop $slaves[$partner].slaveName's abortive humping and hold her hips in place while $activeSlave.slaveName gets her cock up her ass. Once she's set, off the two of you go, with poor $slaves[$partner].slaveName gasping and grimacing as she gets it rough in both holes.
+	<<set $slaves[$partner].vaginalCount++, $slaves[$partner].analCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $analTotal++, $penetrativeTotal++>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina > 0) && ($activeSlave.dick > 0)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She does, with some trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you. $activeSlave.slaveName comes over, stroking herself hard, not certain what you mean, since her cock is useless. To make it clear, you push two fingers into $slaves[$partner].slaveName's butt, finger fucking her asshole until $activeSlave.slaveName takes over. Once she's set, off the two of you go, with poor $slaves[$partner].slaveName gasping and grimacing as she gets it rough in both holes. $activeSlave.slaveName uses as many fingers as she can, always at least one more than $slaves[$partner].slaveName would like.
+	<<set $slaves[$partner].vaginalCount++, $slaves[$partner].analCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $analTotal++, $penetrativeTotal++>>
+<<elseif ($slaves[$partner].anus > 0) && ($slaves[$partner].vagina > 0)>>
+	You <<if ($PC.dick == 0)>>step into a strap-on and tell her to ride it<<else>>tell her to ride your dick<</if>>, facing you. She does, with some trepidation, which increases when you reach behind her and spread her buttocks as wide as they'll go. With her pinned, you tell $activeSlave.slaveName to come over and join you, indicating a strap-on for slave use, on a side shelf. $activeSlave.slaveName hurries into it and comes over. You stop $slaves[$partner].slaveName's abortive humping and hold her hips in place while $activeSlave.slaveName gets her fake cock up her ass. Once she's set, off the two of you go, with poor $slaves[$partner].slaveName gasping and grimacing as she gets it rough in both holes. $activeSlave.slaveName murmurs calumnies in $slaves[$partner].slaveName's ear, pinches her nipples, and generally adds humiliation above and beyond being double penetrated by her owner and her rival.
+	<<set $slaves[$partner].vaginalCount++, $slaves[$partner].analCount++, $activeSlave.penetrativeCount++, $vaginalTotal++, $analTotal++, $penetrativeTotal++>>
 <<else>>
 	Unforeseen combination of rival stats; yell at FC Dev to write a scene for these slaves.
 <</if>>
 
-<<if $slaves[_i].ID == _rival.ID>>
-	<<set $slaves[_i] = _rival>>
-<<else>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<if $slaves[_i].ID == _rival.ID>>
-		<<set $slaves[_i] = _rival>>
-		<<break>>
-		<</if>>
-	<</for>>
-<</if>>
 <<if passage() !== "Slave Interact">>
-  <<for _i = 0; _i < $slaves.length; _i++>>
-	  <<if $slaves[_i].ID == $activeSlave.ID>>
-	  <<set $slaves[_i] = $activeSlave>>
-	  <<break>>
-	  <</if>>
-  <</for>>
+	<<set $nextLink = "AS Dump">>
 <</if>>
-<<set _rival = null>>
 
-<</nobr>>\
diff --git a/src/npc/fSlaveImpreg.tw b/src/npc/fSlaveImpreg.tw
index a364dda359d2cbc306df92c5666f583816152e0a..7726e1a901d45bf461248b0099c9bff284e046aa 100644
--- a/src/npc/fSlaveImpreg.tw
+++ b/src/npc/fSlaveImpreg.tw
@@ -1,34 +1,22 @@
-:: FSlaveImpreg
+:: FSlaveImpreg [nobr]
 
-<<nobr>>
-
-<<set $nextButton = "Back">>
-<<set $nextLink = "Slave Interact">>
-
-<<set $impregnatrix = 0>>
-<<set $eligibility = 0>>
+<<set $nextButton = "Back", $nextLink = "Slave Interact", $impregnatrix = 0, $eligibility = 0>>
 
 //$activeSlave.slaveName is fertile; now you must select a slave with both a penis and potent testicles.//
 
-<</nobr>>
+<br><br>
 
 __Select an eligible slave to serve as the semen donatrix:__
-<<for $i = 0; $i < $slaves.length; $i++>>\
-	<<if ($slaves[$i].dick > 0)>>\
-	<<if ($slaves[$i].balls > 0)>>\
-	<<if ($slaves[$i].pubertyXY == 1)>>\
-	<<if canBreed($activeSlave, $slaves[$i])>>\
-	<<if ($slaves[$i].dickAccessory != "chastity")>>\
-	<<if ($slaves[$i].ID != $activeSlave.ID)>>\
-		<<print "[[$slaves[$i].slaveName|FSlaveImpreg Consummate][$impregnatrix = $slaves[" + $i + "]]]">>
-		<<set $eligibility = 1>>\
-	<</if>>\
-	<</if>>\
-	<</if>>\
-	<</if>>\
-	<</if>>\
-	<</if>>\
-<</for>>\
-<<if ($eligibility == 0)>>\
+
+<br><br>
+
+<<for $i = 0; $i < $slaves.length; $i++>>
+	<<if ($slaves[$i].ID != $activeSlave.ID) && canImpreg($activeSlave, $slaves[$i])>>
+		<br><<print "[[$slaves[$i].slaveName|FSlaveImpreg Consummate][$impregnatrix = $slaves[" + $i + "], $i = " + $i + "]]">>
+		<<set $eligibility = 1>>
+	<</if>>
+<</for>>
+<<if ($eligibility == 0)>>
 	//You have no slaves capable of inseminating others.//
-<</if>>\
+<</if>>
+
diff --git a/src/npc/fSlaveImpregConsummate.tw b/src/npc/fSlaveImpregConsummate.tw
index af0f34b98abc4354ebd5ffffb5b86390a1fae49f..dda3b8aff1e21bd91cedc9da193c788f06dfcb60 100644
--- a/src/npc/fSlaveImpregConsummate.tw
+++ b/src/npc/fSlaveImpregConsummate.tw
@@ -1,17 +1,9 @@
-:: FSlaveImpreg Consummate
-
-<<nobr>>
+:: FSlaveImpreg Consummate [nobr]
 
 The first necessary step is to prepare the donatrix.
 
-<<set _penCountBonus = random(6,20)>>
-<<set _analCountBonus = _penCountBonus>>
-<<set _vagCountBonus = _penCountBonus>>
-
-<<set $activeSlave.penetrativeCount += _penCountBonus+1>>
-<<set $penetrativeTotal += _penCountBonus+1>>
-<<set $activeSlave.analCount += 1>>
-<<set $analTotal += 1>>
+<<set _penCountBonus = random(6,20), _analCountBonus = _penCountBonus, _vagCountBonus = _penCountBonus>>
+<<set $activeSlave.penetrativeCount += _penCountBonus+1, $penetrativeTotal += _penCountBonus+1, $activeSlave.analCount += 1, $analTotal += 1>>
 
 <<if ($impregnatrix.fetish == "pregnancy") && ($impregnatrix.fetishKnown == 1) && ($impregnatrix.fetishStrength > 60) && ($impregnatrix.devotion >= -20)>>
 	This is very easy, since $impregnatrix.slaveName has an impregnation fetish.
@@ -59,9 +51,7 @@ The first necessary step is to prepare the donatrix.
 
 <</if>>
 
-<</nobr>>
-
-<<nobr>>
+<br><br>
 
 Next, you see to $activeSlave.slaveName.
 
@@ -134,7 +124,7 @@ Next, you see to $activeSlave.slaveName.
 <</if>>
 
 <<if random(1,100) >= 1>>
-	<<set $activeSlave.preg = 1>>
+	<<set $activeSlave.preg = 1, $activeSlave.pregSource = $impregnatrix.ID>>
 	<<if ($activeSlave.drugs == "super fertility drugs")>>
 		<<if (($masterSuitePregnancyFertilitySupplements == 1) && (($activeSlave.assignment == "serve in the master suite") || ($activeSlave.ID == $Concubine.ID)))>>
 			<<if ($activeSlave.hormones == 2)>>
@@ -166,7 +156,6 @@ Next, you see to $activeSlave.slaveName.
 	<<else>>
 		<<set $activeSlave.pregType = either(1, 1, 1, 1, 1, 1, 1, 1, 1, 2)>>
 	<</if>>
-<<set $activeSlave.pregSource = $impregnatrix.ID>>
 <</if>>
 
 <br><br>
@@ -258,9 +247,7 @@ Throughout the week, you keep $activeSlave.slaveName's <<if $activeSlave.mpreg =
 	<<set $arcologies[0].FSGenderFundamentalist += 0.05*$FSSingleSlaveRep>>
 <</if>>
 
-<</nobr>>
-
-<<nobr>>
+<br><br>
 
 You prepare the necessary file on their possible offspring. Upon birth, it will be remanded to a slave orphanage to be raised to the age of $fertilityAge and then sold, but its likely appearance and traits are already worth noting.
 
@@ -340,11 +327,5 @@ $activeSlave.slaveName and $impregnatrix.slaveName are likely to produce
 	slave with a decent ass.
 <</if>>
 
-<</nobr>>
+<<set $slaves[$i] = $impregnatrix>> /* save changes -- $i is already set to the index of the impregnatrix by fSlaveImpreg */
 
-<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $impregnatrix.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $impregnatrix>>
-		<<break>>
-	<</if>>
-<</for>>
diff --git a/src/npc/importSlave.tw b/src/npc/importSlave.tw
index 286505708b89af081a9ab7a8a20a811d58351ce7..411dcd863b40846be40f5e26d22f666c4d530f88 100644
--- a/src/npc/importSlave.tw
+++ b/src/npc/importSlave.tw
@@ -1,9 +1,6 @@
 :: Import Slave [nobr]
 
-
-
-<<set $nextButton = "Continue">>
-<<set $nextLink = "Slave Interact">>
+<<set $nextButton = "Continue", $nextLink = "Slave Interact">>
 
 //Paste the code into the text box and click Apply//
 
@@ -35,3 +32,4 @@
 <<link "Continue">>
 	<<goto "Slave Interact">>
 <</link>>
+
diff --git a/src/npc/removeActiveSlave.tw b/src/npc/removeActiveSlave.tw
index e5f4a868939a2625803656f25572df94f4c76dd8..bb29d538c0acd8679d3046c2338ba1e3f258aad6 100644
--- a/src/npc/removeActiveSlave.tw
+++ b/src/npc/removeActiveSlave.tw
@@ -5,11 +5,7 @@
 <<if (def $i) && ($i < _SL) && ($slaves[$i].ID == _ID)>>
 	<<set _x = $i>>
 <<else>>
-	<<for _x = 0; _x < _SL; _x++>>
-		<<if _ID == $slaves[_x].ID>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _x = $slaves.findIndex(function(s) { return s.ID == _ID; })>>
 <</if>>
 
 <<if _ID == $PC.pregSource>>
@@ -37,7 +33,7 @@
 	<</if>>
 <</if>>
 
-<<if _x < _SL>>
+<<if _x >= 0 && _x < _SL>>
 	<<for _y = 0; _y < _SL; _y++>>
 		<<if _ID == $slaves[_y].pregSource>>
 			<<set $slaves[_y].pregSource = 0>>
diff --git a/src/npc/startingGirls/startingGirls.tw b/src/npc/startingGirls/startingGirls.tw
index e2b94fa2529fe499e9615013b7dcbf1ac271ed89..280df6f8b84782dd938168840125f6d8587bd249 100644
--- a/src/npc/startingGirls/startingGirls.tw
+++ b/src/npc/startingGirls/startingGirls.tw
@@ -1385,18 +1385,18 @@ Her nationality is $activeSlave.nationality.
 
 <br><br>__Start over by selecting a nationality:__
 
-<<for _i = 0; _i < $basenationalities.length; _i++>>
-<<set _nation = $basenationalities[_i]>>
-
-<<print "
-<<link _nation>>
-	<<set $fixedNationality = $basenationalities[" + _i + "]>>
-	<<StartingGirlsWorkaround>>
-	<<StartingGirlsRefresh>>
-	<<SaleDescription>>
-<</link>>
-">>
-<<if _i < $basenationalities.length-1>>
-|
-<</if>>
+<<for _sg = 0; _sg < $basenationalities.length; _sg++>>
+	<<set _nation = $basenationalities[_sg]>>
+
+	<<print "
+	<<link _nation>>
+		<<set $fixedNationality = $basenationalities[" + _sg + "]>>
+		<<StartingGirlsWorkaround>>
+		<<StartingGirlsRefresh>>
+		<<SaleDescription>>
+	<</link>>
+	">>
+	<<if _sg < $basenationalities.length-1>>
+	|
+	<</if>>
 <</for>>
diff --git a/src/npc/takeoverTarget.tw b/src/npc/takeoverTarget.tw
index 5b4dfce4eaab89433b1cd7a93a4dc4e1b44600dc..eee9eecfeca663d1930613a9d3c9f78237881ae5 100644
--- a/src/npc/takeoverTarget.tw
+++ b/src/npc/takeoverTarget.tw
@@ -1,7 +1,6 @@
 :: Takeover Target [nobr]
 
-<<set $ui = "start">>
-<<set $showBodyMods = 1>>
+<<set $ui = "start", $showBodyMods = 1>>
 
 Before you deploy the <<if $PC.rumor == "wealth">>financial reserves that<<elseif $PC.rumor == "diligence">>carefully constructed plan that<<elseif $PC.rumor == "force">>mercenaries and <<if $continent == "Europe">>//maskirovka//<<else>>cover plan<</if>> that<<elseif $PC.rumor == "social engineering">>clever social manipulation that<<else>>optimistic plan you hope<</if>> will allow you to take over an arcology, you need to select a target. There are a number of vulnerable arcologies that you could <<if $PC.rumor == "wealth">>attempt a hostile takeover of<<elseif $PC.rumor == "diligence">>work to take over<<elseif $PC.rumor == "force">>attack<<elseif $PC.rumor == "social engineering">>infiltrate<<else>>aspire to take over<</if>> with a reasonable chance of success. Free Cities are volatile places, even compared to the troubled state of the rest of the world. There are always arcologies whose owners are on the brink of failure, and you could target one of them.
 <<if $PC.career == "arcology owner">>(Since you've @@.springgreen;owned an arcology before,@@ you identify more potential target arcologies than a novice might.)<</if>>
diff --git a/src/pregmod/newChildIntro.tw b/src/pregmod/newChildIntro.tw
index f3a72fef99e08cf13b3b1de3a5634f7ec3da7573..f5a4e1f13cd8f1ca0e285c46a33a9560b7ed789a 100644
--- a/src/pregmod/newChildIntro.tw
+++ b/src/pregmod/newChildIntro.tw
@@ -1,6 +1,6 @@
 :: New Child Intro [nobr]
 
-<<set $showEncyclopedia = 1>><<set $encyclopedia = "">>
+<<set $showEncyclopedia = 0>>
 
 <<SlaveTitle $activeSlave>>
 
diff --git a/src/pregmod/personalNotes.tw b/src/pregmod/personalNotes.tw
index 49acfc6c97b33bfa2d9f7abb2cbd9cb1d9d6732e..bd589e49eca54198d1fa83aba618a15350cac1ea 100644
--- a/src/pregmod/personalNotes.tw
+++ b/src/pregmod/personalNotes.tw
@@ -1,6 +1,6 @@
 :: Personal Notes [nobr]
 
-<<if $useTabs>>__Personal Notes__<</if>>
+<<if $useTabs == 0>>__Personal Notes__<</if>>
 <br>
 <<if ($playerAging != 0)>>Your birthday is <<if $PC.birthWeek is 51>>next week<<if $playerAging == 2>>; you'll be turning <<print $PC.actualAge+1>><</if>><<else>>in <<print 52-$PC.birthWeek>> weeks<</if>>.<</if>>
 <<if $PC.career == "servant">>
diff --git a/src/pregmod/reLegendaryWomb.tw b/src/pregmod/reLegendaryWomb.tw
index 441bbd771b15057a39e21b0af6aea66f75456b99..2e10b5978c19099cda3aa72a3430814609fc85ae 100644
--- a/src/pregmod/reLegendaryWomb.tw
+++ b/src/pregmod/reLegendaryWomb.tw
@@ -1,16 +1,10 @@
-:: RE legendary womb 
+:: RE legendary womb [nobr]
  
-<<nobr>>
-
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check", _SL = $slaves.length>>
 
 <<if $legendaryFacility == 1>>
-	<<for $i = 0; $i < _SL; $i++>>
-		<<if $legendaryWombID == $slaves[$i].ID>>
-			<<set $activeSlave = $slaves[$i]>>
-		<</if>>
-	<</for>>
-	<<if $i >= _SL>> /* not found - reset variable and stop event */
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $legendaryWombID; })>>
+	<<if (ndef $activeSlave)>> /* not found - reset variable and stop event */
 		<<set $legendaryWombID = 0>>
 		<<goto "RIE Eligibility Check">>
 	<</if>>
@@ -20,17 +14,20 @@
 
 <<set $activeSlave.devotion += 4>>
 
-<</nobr>>\
-\
+
 <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> is an incredible mother. She's given birth to numbers that would have been considered absurd in the days when drug treatments were limited by consent. A nascent organization will be holding a pageant for pregnant slaves tomorrow, and since they're aware you keep breeders, they've sent you an invitation to enter a heavily pregnant slave to be judged.
 
+<br><br>
+
 This is a rare opportunity. The idea of pregnancy pageant isn't new but it is undeniably going to atract attention, so the pagent is likely to draw some serious press. Were $activeSlave.slaveName to win, she would probably be remembered for a long time as a special mother.
-\
+
+<br><br>
+
 <span id="result">
 <<link "Fairly enter her in the pregnancy pageant">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<if random(1,100) > 90>>
 		<<replace "#result">>
 		$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. It's likely there was some bribery behind the scenes, but her heavy belly and creative positions win the day. Against all odds she is named best in show, and will be @@.green;remembered@@ as a breeder of the highest pedigree. As her owner, your reputation has @@.green;also increased.@@
@@ -47,10 +44,10 @@ This is a rare opportunity. The idea of pregnancy pageant isn't new but it is un
 		<</replace>>
 	<</if>>
 <</link>>
-<<link "Spend ¤5000 bribing the judges">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+<br><<link "Spend ¤5000 bribing the judges">>
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<if random(1,100) > 50>>
 		<<replace "#result">>
 		$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. Several of the judges cannot resist giving you a wink as they look her over. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as a breeder of the highest pedigree. As her owner, your reputation has @@.green;also increased.@@
@@ -69,10 +66,10 @@ This is a rare opportunity. The idea of pregnancy pageant isn't new but it is un
 		<</replace>>
 	<</if>>
 <</link>>
-<<link "Spend ¤10000 bribing the judges and sabotaging the competition">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+<br><<link "Spend ¤10000 bribing the judges and sabotaging the competition">>
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<if random(1,100) > 10>>
 		<<replace "#result">>
 		$activeSlave.slaveName is shown in public, closely inspected by the judging committee, and then asked to demonstrate how to pleasure a man while so heavily pregnant. After she's put through her paces, the most unfortunate series of accidents somehow befalls her fellow mothers. One is taken ill, another seems drugged, and another went into labor and gave birth, disqualifying her. $activeSlave.slaveName is unsurprisingly named best in show, and will be @@.green;remembered@@ as a breeder of the highest pedigree. As her owner, your reputation has @@.green;also increased.@@
diff --git a/src/pregmod/widgets/pregmodWidgets.tw b/src/pregmod/widgets/pregmodWidgets.tw
index 0bfd0bdaf92f48fd30555dcfd3e849ba94a3c1f0..80733fcd2a4f36eca394d4021530e60915365c34 100644
--- a/src/pregmod/widgets/pregmodWidgets.tw
+++ b/src/pregmod/widgets/pregmodWidgets.tw
@@ -79,8 +79,8 @@
 <<if ndef $args[0].underArmHStyle>>
 	<<set $args[0].underArmHStyle = "waxed">>
 <</if>>
-<<if ndef $args[0].prostateImplant>>
-	<<set $args[0].prostateImplant = 0>>
+<<if def $args[0].prostateImplant>>
+	<<set $args[0].prostate = 3>>
 <</if>>
 <<if ndef $args[0].bodySwap>>
 	<<set $args[0].bodySwap = 0>>
diff --git a/src/uncategorized/#README-includes.txt b/src/uncategorized/#README-includes.txt
new file mode 100644
index 0000000000000000000000000000000000000000..a907ef30a41a1c83b7d8d801700986a379f4c562
--- /dev/null
+++ b/src/uncategorized/#README-includes.txt
@@ -0,0 +1,75 @@
+all .tw passages that are included from other passages via the <<include>> macro should be stored in this folder or its subfolders for organizational purposes
+
+for these included passages, it is not safe to assume that a temporary variable (starting with underscore _ character) will be confined in scope to that file alone
+
+when passages are included by other passages, any variables that they set will override variables in the calling passage, so extra care should be taken in these passages if they use $i, _i, _j or other common variable names to ensure that callers are not expecting those variables to be unchanged after the include
+
+
+all sa... passages
+
+arcologyDescription
+arcologyOpinion
+neighborDescription
+officeDescription
+
+surgeryDegradation
+
+weekly
+
+	persBusiness
+	rulesAssistantReport
+	securityForceEOWReport
+
+penthouse
+
+	fullReport
+	penthouseReport
+
+neighbors
+
+	neighborsDevelopment
+	neighborsFSAdoption
+
+facilities
+
+	arcadeReport
+	brothelReport
+	cellblockReport
+	clinicReport
+	clubReport
+	dairyReport
+	labReport
+	masterSuiteReport
+	schoolroomReport
+	servantsQuartersReport
+	spaReport
+
+economics
+
+	corporationDevelopments
+	marketsReport
+
+npc
+	degradingName
+	fAbuse
+	fFeelings
+	fKiss
+	fPCImpreg
+	fRelation
+	fRival
+	fSlaveImpreg
+	fSlaveImpregConsummate
+	generateNewSlave
+	generateXXSlave
+	generateXYSlave
+	hgApplication
+	lawCompliance
+	longSlaveDescription
+	newSlaveIntro
+	removeActiveSlave
+	slaveSummary
+
+init
+
+	initRules
+	backwardsCompatibility
diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index c2ea28f556100de65880a68be41382e0e38e4cbe..9c005bf5f911fdd800d0c7927fdbbbdc5208b05d 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -40,8 +40,8 @@
 <</if>>
 
 <<if ndef $arcologies[0].FSAztechRevivalist>>
-	<<for _i = 0; _i < $arcologies.length; _i++>>
-		<<set $arcologies[_i].FSAztecRevivalist = "unset", $arcologies[_i].FSAztecRevivalistDecoration = 0>>
+	<<for _bci = 0; _bci < $arcologies.length; _bci++>>
+		<<set $arcologies[_bci].FSAztecRevivalist = "unset", $arcologies[_bci].FSAztecRevivalistDecoration = 0>>
 	<</for>>
 	<<set $arcologies[0].FSAztecRevivalistLaw = 0, $arcologies[0].FSAztecRevivalistSMR = 0>>
 <</if>>
@@ -100,12 +100,12 @@
 	<<set $AS = {type: "Manufacturing", ownership: 1}>><<set $sectors.push($AS)>>
 	<<set $AS = {type: "Manufacturing", ownership: 1}>><<set $sectors.push($AS)>>
 	<<set $AS = {type: "Manufacturing", ownership: 1}>><<set $sectors.push($AS)>>
-	<<for _i = 0; _i < 12; _i++>>
+	<<for _bci = 0; _bci < 12; _bci++>>
 		<<set _j = random(5,28)>>
 		<<if $sectors[_j].ownership == 1>>
 			<<set $sectors[_j].ownership = 0>>
 		<<else>>
-			<<set _i-->>
+			<<set _bci-->>
 		<</if>>
 	<</for>>
 <</if>>
@@ -126,99 +126,99 @@
 	<<set $sectors[27].type = "Dairy", $sectors[27].ownership = 1>>
 <</if>>
 
-<<for _i = 0; _i < $defaultRules.length; _i++>>
+<<for _bci = 0; _bci < $defaultRules.length; _bci++>>
 
-    <<if ndef $defaultRules[_i].condition>>
-        <<set _activation = $defaultRules[_i].activation>>
+    <<if ndef $defaultRules[_bci].condition>>
+        <<set _activation = $defaultRules[_bci].activation>>
         <<if _activation == "sex drive">>
             <<set _activation = "energy">>
         <</if>>
 
         <<if _activation == "none">>
-            <<set $defaultRules[_i].condition = {id: "false"}>>
+            <<set $defaultRules[_bci].condition = {id: "false"}>>
         <<elseif _activation == "always">>
-            <<set $defaultRules[_i].condition = {id: "true"}>>
+            <<set $defaultRules[_bci].condition = {id: "true"}>>
 
-        <<elseif _activation == "custom" && (def $defaultRules[_i].customActivationText)>>
-            <<set $defaultRules[_i].condition = parseCondition($defaultRules[_i].customActivationText).expr>>
-
-        <<elseif $defaultRules[_i].thresholdLower != "none" && $defaultRules[_i].thresholdUpper != "none">>
-            <<set $defaultRules[_i].condition = {
+        <<elseif $defaultRules[_bci].thresholdLower != "none" && $defaultRules[_bci].thresholdUpper != "none">>
+            <<set $defaultRules[_bci].condition = {
                 id: "&&",
                 first: {
-                    id: $defaultRules[_i].eqUpper ? "<=" : "<",
+                    id: $defaultRules[_bci].eqUpper ? "<=" : "<",
                     first: {id: "(name)", name: _activation},
-                    second: {id: "(number)", value: $defaultRules[_i].thresholdUpper}
+                    second: {id: "(number)", value: $defaultRules[_bci].thresholdUpper}
                 },
                 second: {
-                    id: $defaultRules[_i].eqLower ? ">=" : ">",
+                    id: $defaultRules[_bci].eqLower ? ">=" : ">",
                     first: {id: "(name)", name: _activation},
-                    second: {id: "(number)", value: $defaultRules[_i].thresholdLower},
+                    second: {id: "(number)", value: $defaultRules[_bci].thresholdLower},
                 },
             }>>
 
-        <<elseif $defaultRules[_i].thresholdLower != "none">>
-            <<set $defaultRules[_i].condition = {
-                id: $defaultRules[_i].eqLower ? ">=" : ">",
+        <<elseif $defaultRules[_bci].thresholdLower != "none">>
+            <<set $defaultRules[_bci].condition = {
+                id: $defaultRules[_bci].eqLower ? ">=" : ">",
                 first: {id: "(name)", name: _activation},
-                second: {id: "(number)", value: $defaultRules[_i].thresholdLower},
+                second: {id: "(number)", value: $defaultRules[_bci].thresholdLower},
             }>>
 
-        <<elseif $defaultRules[_i].thresholdUpper != "none">>
-            <<set $defaultRules[_i].condition = {
-                id: $defaultRules[_i].eqUpper ? "<=" : "<",
+        <<elseif $defaultRules[_bci].thresholdUpper != "none">>
+            <<set $defaultRules[_bci].condition = {
+                id: $defaultRules[_bci].eqUpper ? "<=" : "<",
                 first: {id: "(name)", name: _activation},
-                second: {id: "(number)", value: $defaultRules[_i].thresholdUpper},
+                second: {id: "(number)", value: $defaultRules[_bci].thresholdUpper},
             }>>
 
         <<else>>
             /% both thresholds are "none", same as activation being none
-            <<set $defaultRules[_i].condition = {id: "false"}>>
+            <<set $defaultRules[_bci].condition = {id: "false"}>>
         <</if>>
     <</if>>
 
-	<<if ndef $defaultRules[_i].standardReward>>
-		<<set $defaultRules[_i].standardReward = "no default setting">>
+	<<if ndef $defaultRules[_bci].standardReward>>
+		<<set $defaultRules[_bci].standardReward = "no default setting">>
+	<</if>>
+	<<if ndef $defaultRules[_bci].standardPunishment>>
+		<<set $defaultRules[_bci].standardPunishment = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].standardPunishment>>
-		<<set $defaultRules[_i].standardPunishment = "no default setting">>
+	<<if ndef $defaultRules[_bci].aVirginAccessory>>
+		<<set $defaultRules[_bci].aVirginAccessory = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].aVirginAccessory>>
-		<<set $defaultRules[_i].aVirginAccessory = "no default setting">>
+	<<if ndef $defaultRules[_bci].aVirginDickAccessory>>
+		<<set $defaultRules[_bci].aVirginDickAccessory = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].aVirginDickAccessory>>
-		<<set $defaultRules[_i].aVirginDickAccessory = "no default setting">>
+	<<if ndef $defaultRules[_bci].aVirginButtplug>>
+		<<set $defaultRules[_bci].aVirginButtplug = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].aVirginButtplug>>
-		<<set $defaultRules[_i].aVirginButtplug = "no default setting">>
+	<<if ndef $defaultRules[_bci].surgery>>
+		<<set $defaultRules[_bci].surgery = {lactation: "no default setting", cosmetic: 0, accent: "no default setting", shoulders: "no default setting", shouldersImplant: "no default setting", boobs: "no default setting", hips: "no default setting", hipsImplant: "no default setting", butt: "no default setting", faceShape: "no default setting", lips: "no default setting", holes: 0}>>
 	<</if>>
-	<<if ndef $defaultRules[_i].surgery>>
-		<<set $defaultRules[_i].surgery = {lactation: "no default setting", cosmetic: 0, accent: "no default setting", shoulders: "no default setting", shouldersImplant: "no default setting", boobs: "no default setting", hips: "no default setting", hipsImplant: "no default setting", butt: "no default setting", faceShape: "no default setting", lips: "no default setting", holes: 0}>>
+	<<if ndef $defaultRules[_bci].surgery.prostate>>
+		<<set $defaultRules[_i].surgery.prostate = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].dietMilk>>
-		<<set $defaultRules[_i].dietMilk = 0>>
+	<<if ndef $defaultRules[_bci].dietMilk>>
+		<<set $defaultRules[_bci].dietMilk = 0>>
 	<</if>>
-	<<if ndef $defaultRules[_i].dietCum>>
-		<<set $defaultRules[_i].dietCum = 0>>
+	<<if ndef $defaultRules[_bci].dietCum>>
+		<<set $defaultRules[_bci].dietCum = 0>>
 	<</if>>
-	<<if ndef $defaultRules[_i].clitSettingXY>>
-		<<set $defaultRules[_i].clitSettingXY = "no default setting">>
+	<<if ndef $defaultRules[_bci].clitSettingXY>>
+		<<set $defaultRules[_bci].clitSettingXY = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].clitSettingXX>>
-		<<set $defaultRules[_i].clitSettingXX = "no default setting">>
+	<<if ndef $defaultRules[_bci].clitSettingXX>>
+		<<set $defaultRules[_bci].clitSettingXX = "no default setting">>
 	<</if>>
-	<<if ndef $defaultRules[_i].clitSettingEnergy>>
-		<<set $defaultRules[_i].clitSettingEnergy = "no default setting">>
+	<<if ndef $defaultRules[_bci].clitSettingEnergy>>
+		<<set $defaultRules[_bci].clitSettingEnergy = "no default setting">>
 	<</if>>
-	<<switch $defaultRules[_i].clitSetting>>
+	<<switch $defaultRules[_bci].clitSetting>>
 	<<case "all">>
-		<<set $defaultRules[_i].clitSetting = "no default setting", $defaultRules[_i].clitSettingXY = 100, $defaultRules[_i].clitSettingXX = 100, $defaultRules[_i].clitSettingEnergy = 100>>
+		<<set $defaultRules[_bci].clitSetting = "no default setting", $defaultRules[_bci].clitSettingXY = 100, $defaultRules[_bci].clitSettingXX = 100, $defaultRules[_bci].clitSettingEnergy = 100>>
 	<<case "none">>
-		<<set $defaultRules[_i].clitSetting = "no default setting", $defaultRules[_i].clitSettingXY = 0, $defaultRules[_i].clitSettingXX = 0, $defaultRules[_i].clitSettingEnergy = 0>>
+		<<set $defaultRules[_bci].clitSetting = "no default setting", $defaultRules[_bci].clitSettingXY = 0, $defaultRules[_bci].clitSettingXX = 0, $defaultRules[_bci].clitSettingEnergy = 0>>
 	<<case "men">>
-		<<set $defaultRules[_i].clitSetting = "no default setting", $defaultRules[_i].clitSettingXY = 100>>
+		<<set $defaultRules[_bci].clitSetting = "no default setting", $defaultRules[_bci].clitSettingXY = 100>>
 	<<case "women">>
-		<<set $defaultRules[_i].clitSetting = "no default setting", $defaultRules[_i].clitSettingXX = 100>>
+		<<set $defaultRules[_bci].clitSetting = "no default setting", $defaultRules[_bci].clitSettingXX = 100>>
 	<</switch>>
 <</for>>
 
@@ -563,9 +563,9 @@
 	<<set $arcologies[0].FSChineseRevivalistLaw to 0>>
 <</if>>
 
-<<for _i to 1; _i < $arcologies.length; _i++>>
-	<<if ndef $arcologies[_i].FSNull>>
-		<<set $arcologies[_i].FSNull to "unset">>
+<<for _bci to 1; _bci < $arcologies.length; _bci++>>
+	<<if ndef $arcologies[_bci].FSNull>>
+		<<set $arcologies[_bci].FSNull to "unset">>
 	<</if>>
 <</for>>
 
@@ -1278,8 +1278,8 @@ Done!
 
 <br><br>
 Setting missing slave variables:
-<<for _i to 0; _i < $slaves.length; _i++>>
-<<set _Slave to $slaves[_i]>>
+<<for _bci to 0; _bci < $slaves.length; _bci++>>
+<<set _Slave to $slaves[_bci]>>
 
 <<PMODinit _Slave>>
 
@@ -1880,7 +1880,7 @@ Setting missing slave variables:
 	<<set _Slave.origHColor = _Slave.hColor>>
 <</if>>
 
-<<set $slaves[_i] to _Slave>>
+<<set $slaves[_bci] to _Slave>>
 <</for>>
 
 <<if ndef $slavesOriginal>>
diff --git a/src/uncategorized/PESS.tw b/src/uncategorized/PESS.tw
index 81e4621c20b99f6dadcc2276aa4dbb8a190b7b79..6d7451a578d083ba3ec74a695b8aa04e1570680e 100644
--- a/src/uncategorized/PESS.tw
+++ b/src/uncategorized/PESS.tw
@@ -1,34 +1,16 @@
 :: PESS [nobr]
 
-<<switch $PESSevent>>
-  <<case "madam strategy">>
-	<<set $activeSlave = $Madam.ID>>
-  <<case "DJ publicity">>
-	<<set $activeSlave = $DJ.ID>>
-  <<case "tired milkmaid" "tired collectrix">>
-	<<set $activeSlave = $Milkmaid.ID>>
-  <<case "loving concubine">>
-	<<set $activeSlave = $Concubine.ID>>
-  <<case "bodyguard bedtime">>
-	<<set $activeSlave = $Bodyguard.ID>>
-  <<case "worried headgirl" "loving headgirl" "headgirl dickgirl" "worshipful impregnatrix">>
-	<<set $activeSlave = $HeadGirl.ID>>
-	<<set $j = $slaves.length-1>>
-<</switch>>
-<<for $i = 0; $i < $slaves.length; $i++>>
-  <<if $activeSlave == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-  <</if>>
-<</for>>
-
-<<if $activeSlave == 0>>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
+  <<set $activeSlave = $eventSlave>>
   <<if $cheatMode == 1>>
-	''A random single slave leadership event would have been selected from the following:''
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
+	''A random single slave event would have been selected from the following:''
 	<br>
 	<<for _i = 0; _i < $PESSevent.length; _i++>>
 		<<print "[[$PESSevent[_i]|PESS][$PESSevent = $PESSevent[" + _i + "]]]">>
 		<br>
 	<</for>>
+	<br><br>[[Go Back to Random Nonindividual Event|Random Nonindividual Event][$eventSlave = 0]]
   <<else>>
 	<<set $PESSevent = $PESSevent.random()>>
 	<<goto "PESS">>
@@ -37,6 +19,23 @@
 
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check">>
 
+/* special leadership events can be rolled on any eventSlave */
+<<switch $PESSevent>>
+  <<case "madam strategy">>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $Madam.ID; })>>
+  <<case "DJ publicity">>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $DJ.ID; })>>
+  <<case "tired milkmaid" "tired collectrix">>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $Milkmaid.ID; })>>
+  <<case "loving concubine">>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $Concubine.ID; })>>
+  <<case "bodyguard bedtime">>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $Bodyguard.ID; })>>
+  <<case "loving headgirl" "headgirl dickgirl" "worried headgirl" "worshipful impregnatrix">>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $HeadGirl.ID; })>>
+	<<set $j = $slaves.findIndex(function(s) { return s.ID != $HeadGirl.ID && s.devotion < 20; })>>
+<</switch>>
+
 /* 000-250-006 */
 /* <<if $seeImages == 1>><<SlaveArt $activeSlave 2 0>><</if>> */
 <<if $seeImages == 1>>
@@ -85,17 +84,9 @@ Your Head Girl <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Desc
 As the two of you stand there watching, strings of red lights begin to trace lines up into the sky. The guns are manually aimed, to go by their jerky arcs of fire, and they're hopelessly ineffective. Their target comes and goes, unseen and unheard at this distance, the only evidence of its passage a flash of light from the target area followed by a low thump that takes a long time to reach you. The commotion is outside the Free City your arcology is part of, and is of little concern: just a minor dispute of the kind becoming more and more common outside your island of safety and security.
 <br><br>
 You notice a warmth at your side. $activeSlave.slaveName has edged a bit closer to you, and shivers as you glance at her. She crosses her arms <<if $activeSlave.boobs > 3000>>under her massive tits, lifting them a bit as she snuggles her arms into the warm cavern they create against her stomach<<elseif $activeSlave.boobs > 1000>>over her big boobs, pressing them a bit flatter against her chest as she hugs herself<<elseif $activeSlave.boobs > 400>>over her breasts, pressing them against her chest as she hugs herself<<else>>over her chest, hugging her own shoulders and rocking back and forth a little<</if>>.
-<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-	"It'th very bad out there, ithn't it, <<Master>>."
-<<else>>
-	"It's very bad out there, isn't it, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>."
-<</if>>
+<<Enunciate $activeSlave>>"It'<<s>> very bad out there, i<<s>>n't it, <<Master>>."
 It isn't really a question, but you nod. "I'm glad I'm here with you," she continues, "and I would be even if I didn't love you." She nestles in closer to you, <<if $activeSlave.height >= 185>>the tall <<if $activeSlave.physicalAge > 30>>woman<<else>>girl<</if>>'s shoulder brushing against yours<<elseif $activeSlave.hips > 1>>her broad, motherly hips brushing against your thigh<<else>>the shorter <<if $activeSlave.physicalAge > 30>>woman<<else>>girl<</if>> fitting neatly against your side<</if>>.
-<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
-	"<<Master>>, I don't know if the other girlth know how lucky they are, to be thafe here."
-<<else>>
-	"<<Master>>, I don't know if the other girls know how lucky they are, to be safe here."
-<</if>>
+"<<Master>>, I don't know if the other girl<<s>> know how lucky they are, to be <<s>>afe here."
 
 <<case "loving headgirl">>
 
@@ -105,7 +96,7 @@ The business is brief and inconsequential, but it's good to speak with her. When
 
 <<case "headgirl dickgirl">>
 
-<span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink = passage(), $eventDescription = 1]]">></span>, despite being a loyal and sexually receptive slave girl, still has a virile cock. She certainly isn't shy about using it in pursuit of her head girl duties. $slaves[$j].slaveName has apparently committed some minor sin, and is now being made to pay. $activeSlave.slaveName has her lying on her back on a table with her helpless <<if $seeRace == 1>>$slaves[$j].race <</if>>throat serving as a hole for $activeSlave.slaveName to fuck <<if $seeRace == 1>>with her $activeSlave.race cock <</if>>while $activeSlave.slaveName rains light slaps on poor $slaves[$j].slaveName's nipples, breasts, and <<if ($slaves[$j].preg < -2)>>limp dick<<elseif ($slaves[$j].dick > 0)>>dick<<elseif ($slaves[$j].clit > 0)>>big clit<<else>>mons<</if>>. All the while, your head girl expounds on $slaves[$j].slaveName's shortcomings and the ways in which she must apply herself to better serve you.
+<span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink = passage(), $eventDescription = 1]]">></span>, despite being a loyal and sexually receptive slave girl, still has a virile cock. She certainly isn't shy about using it in pursuit of her head girl duties. $slaves[$j].slaveName has apparently committed some minor sin, and is now being made to pay. $activeSlave.slaveName has her lying on her back on a table with her helpless <<if $seeRace == 1>>$slaves[$j].race <</if>>throat serving as a hole for $activeSlave.slaveName to fuck <<if $seeRace == 1>>with her $activeSlave.race cock <</if>>while $activeSlave.slaveName rains light slaps on poor $slaves[$j].slaveName's nipples, breasts, and <<if ($slaves[$j].dick > 0) && !canAchieveErection($slaves[$j])>>limp dick<<elseif ($slaves[$j].dick > 0)>>defenseless dick<<elseif ($slaves[$j].clit > 0)>>big clit<<else>>mons<</if>>. All the while, your head girl expounds on $slaves[$j].slaveName's shortcomings and the ways in which she must apply herself to better serve you.
 
 <<case "worshipful impregnatrix">>
 
@@ -124,7 +115,7 @@ When you've finished your task, you raise your eyes to examine her. She's standi
 She sees you examining at her, and looks back at you submissively, too tired to do much else.
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad PESS event $PESSevent
 <</switch>>
 
 <br><br>
@@ -138,12 +129,7 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#result">>
 	You call $activeSlave.slaveName up to your office; she enters with the clear anticipation of being thrown over your desk, but instead finds herself sitting across it from you, taking part in a three-way strategy session between you and $assistantName. The three of you carefully review the sexual advantages and disadvantages of each of her whores. She is @@.hotpink;properly deferential,@@ but definitely has insight to offer about how many of them satisfy customers. With her input, you put together a plan to @@.green;address@@ their deficiencies with instruction and hands-on correction.
 	<<set $activeSlave.devotion += 4>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
+	<<for $i = 0; $i < _SL; $i++>>
 		<<if $slaves[$i].assignment == "work in the brothel">>
 		<<if $slaves[$i].oralSkill < 100>>
 			<<set $slaves[$i].oralSkill += 5>>
@@ -161,12 +147,7 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#result">>
 	You call $activeSlave.slaveName up to your office; she enters with the clear anticipation of being thrown over your desk, but instead finds herself sitting across it from you, taking part in a three-way inventory review with you and $assistantName. The three of you carefully review the appearance of each of her whores. She is @@.hotpink;properly deferential,@@ but definitely has insight to offer about how many of them appeal to customers. With her input, you put together a plan to @@.limegreen;correct@@ their deficiencies when they can be pulled out of a shift for a quick surgical improvement.
 	<<set $activeSlave.devotion += 4>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
+	<<for $i = 0; $i < _SL; $i++>>
 		<<if $slaves[$i].assignment == "work in the brothel">>
 		<<if $slaves[$i].boobs < 400>>
 			<<set $slaves[$i].boobs += 200>>
@@ -205,11 +186,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<set $cash -= 1000>>
 	<<set $rep += 500>>
 	<<set $activeSlave.devotion += 4>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>> //This option will cost ¤1000//
 <br><<link "Keep her to yourself for a week">>
@@ -219,11 +195,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<set $activeSlave.devotion += 4>>
 	<<set $activeSlave.trust += 4>>
 	<<set $rep += 100>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 <<if $activeSlave.prestige == 0>>
@@ -234,11 +205,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<set $cash -= 10000>>
 	<<set $rep += 500>>
 	<<set $activeSlave.prestige = 1>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>> //This option will cost ¤10000//
 <</if>>
@@ -252,12 +218,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<set $activeSlave.devotion += 4>>
 	<<set $activeSlave.analCount += 1>>
 	<<set $analTotal += 1>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $Milkmaid.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<<set $Milkmaid = $activeSlave>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 <br><<link "Help her with her duties">>
@@ -265,12 +225,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#result">>
 	$activeSlave.slaveName is surprised to find you in the collection facility when she gets there the next morning. Since you're already <<if ($PC.dick == 0)>>using a strap-on to fuck<<else>>balls deep in<</if>> a whining milker's ass, she understands immediately that you're there to help. She's @@.hotpink;gratified,@@ and does her best to make sure you have a good time. With so many slaves physically restrained to make their backdoors available, it's hard not to. $activeSlave.slaveName does her best to use a slave next to you so she can be available for extra amusement at all times as the two of you sodomize away.
 	<<set $activeSlave.devotion += 4>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $Milkmaid.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<<set $Milkmaid = $activeSlave>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 
@@ -281,11 +235,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#result">>
 	When she hears you enter $dairyName, she turns to you for instructions, but you wordlessly dismiss her back to her stretching. She gets back to it, but is surprised to find her shoulders seized by your powerful hands. She shivers helplessly as you knead her knotted muscles, whimpering with near-orgasmic delight as she feels the day's aches ground away under your grip. When you're done with her, she touches her toes and then smoothly rises to stretch with her hands over her head, groaning with sheer pleasure at the feeling. <<if canTalk($activeSlave) == false>>She thanks you profusely with gestures, and then hesitantly asks if you'd like to use her body.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Thank you <<Master>>," she lisps. "Would - would you like to uthe me now?"<<else>>"Thank you <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she murmurs. "Would - would you like to use my body, now?"<</if>> You shake your head kindly and place a kiss on her forehead before continuing with your evening. As she watches you go, she suppresses @@.hotpink;another shiver.@@
 	<<set $activeSlave.devotion += 4>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 <br><<link "Share a milk bath with her">>
@@ -295,11 +244,6 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<set $activeSlave.trust += 4>>
 	<<set $activeSlave.oralCount += 1>>
 	<<set $oralTotal += 1>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 
@@ -355,35 +299,46 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	Of course, $activeSlave.slaveName promptly obeys your order that she come up and join you in bed. After you have gone to sleep, however, she does not feel that she can sleep herself, since she is no longer blocking the door. She spends the rest of the night in sleepless watch, agonizing over this disruption of her protection of your person. @@.mediumorchid;She is confused and unhappy.@@
 	<<set $activeSlave.devotion -= 5>>
 	<</replace>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $activeSlave.ID>>
-	<<set $slaves[$i] = $activeSlave>><<break>><<break>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $Bodyguard.ID>>
-	<<set $Bodyguard = $slaves[$i]>>
-	<</if>>
-	<</for>>
 <</link>>
-<br><<link "Commend and reward her the next morning">> //This will take virginity//
+<br><<link "Commend and reward her the next morning">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-	The next morning, you sit at your desk to do business as usual, and $activeSlave.slaveName takes up station just behind your left shoulder. You thank her for her vigilance as she does. She looks almost confused to be thanked for doing her proper duty, so you settle on a more direct method of communicating your closeness to her. <<if $activeSlave.vaginalAccessory == "chastity belt">>Since she's wearing chastity, you take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving sex with her until she's climaxed twice.<<elseif $activeSlave.hormones > 0>>Since she's doped up on hormones, you take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving anal sex with her until she's climaxed twice.<<elseif ($activeSlave.dick > 0) && ($activeSlave.dickAccessory == "chastity")>>Since she's a caged dickgirl, you take her out onto the balcony, arm an extra security system so she can relax, and use her anus until she's exhausted.<<elseif ($activeSlave.dick > 0) && ($activeSlave.balls == 0)>>Since she's a gelding, you take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving anal sex with her until she's climaxed twice.<<elseif canAchieveErection($activeSlave)>>Since she's a virile slave, you take her and another slave out onto the balcony, arm an extra security system so she can relax, and set the other slave to orally servicing her erect member. Meanwhile, you have gentle, loving anal sex with her until she's climaxed twice.<<else>>You take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving sex with her until she's climaxed twice, once to your gentle massaging of her mons while you fuck her, and once to hard rubbing of her pussy while you have enthusiastic anal sex.<</if>> @@.hotpink;She is grateful@@ that you allowed her to relax in this way and @@.mediumaquamarine;respects your judgment@@ in how you set things up.
-	<<BothVCheck 2 1>>
+	The next morning, you sit at your desk to do business as usual, and $activeSlave.slaveName takes up station just behind your left shoulder. You thank her for her vigilance as she does. She looks almost confused to be thanked for doing her proper duty, so you settle on a more direct method of communicating your closeness to her.
+	<<if ($activeSlave.vagina == 0) && !canDoVaginal($activeSlave)>>
+		Since she's wearing chastity, you take her out onto the balcony, arm an extra security system so she can relax, remove her protection, and have gentle, loving sex with her until she's climaxed twice.
+		<<set $activeSlave.vaginalAccessory = "none">>
+		<<VaginalVCheck 1>>
+	<<elseif ($activeSlave.anus == 0) && !canDoAnal($activeSlave)>>
+		Since she's wearing chastity, you take her out onto the balcony, arm an extra security system so she can relax, remove her protection, and have gentle, loving anal sex with her until she's climaxed twice.
+		<<set $activeSlave.vaginalAccessory = "none">>
+		<<set $activeSlave.dickAccessory = "none">>
+		<<AnalVCheck 1>>
+	<<elseif !canDoVaginal($activeSlave) && !canDoAnal($activeSlave)>>
+		You take her out onto the balcony, arm an extra security system so she can relax, and firmly massage her neck and shoulders to work out all the tension.
+	<<elseif ($activeSlave.vagina == 0)>>
+		You take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving sex with her until she's climaxed twice, once to your gentle massaging of her mons while you fuck her, and once to hard rubbing of her pussy while you have enthusiastic anal sex.
+		<<BothVCheck 2 1>>
+	<<elseif canDoAnal($activeSlave)>>
+		<<if $activeSlave.hormones > 0>>
+			Since she's doped up on hormones, you take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving anal sex with her until she's climaxed twice.
+		<<elseif ($activeSlave.dick > 0) && ($activeSlave.dickAccessory == "chastity" || $activeSlave.dickAccessory == "combined chastity")>>
+			Since she's a caged dickgirl, you take her out onto the balcony, arm an extra security system so she can relax, and use her anus until she's exhausted.
+		<<elseif ($activeSlave.dick > 0) && ($activeSlave.balls == 0)>>
+			Since she's a gelding, you take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving anal sex with her until she's climaxed twice.
+		<<elseif canAchieveErection($activeSlave)>>
+			Since she's a virile slave, you take her and another slave out onto the balcony, arm an extra security system so she can relax, and set the other slave to orally servicing her erect member. Meanwhile, you have gentle, loving anal sex with her until she's climaxed twice.
+		<<else>>
+			You take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving anal sex with her until she's climaxed twice.
+		<</if>>
+		<<AnalVCheck 1>>
+	<<else>>
+		You take her out onto the balcony, arm an extra security system so she can relax, and have gentle, loving sex with her until she's climaxed twice, once to your gentle massaging of her mons while you fuck her, and once to hard rubbing of her pussy while you have enthusiastic anal sex.
+		<<BothVCheck 2 1>>
+	<</if>>
+	@@.hotpink;She is grateful@@ that you allowed her to relax in this way and @@.mediumaquamarine;respects your judgment@@ in how you set things up.
 	<<set $activeSlave.devotion += 4>>
 	<<set $activeSlave.trust += 4>>
 	<</replace>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $activeSlave.ID>>
-	<<set $slaves[$i] = $activeSlave>><<break>><<break>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $Bodyguard.ID>>
-	<<set $Bodyguard = $slaves[$i]>>
-	<</if>>
-	<</for>>
 <</link>><<if ($activeSlave.anus == 0) || ($activeSlave.vagina == 0)>> //This option will take virginity//<</if>>
 
 <<case "worried headgirl">>
@@ -392,7 +347,7 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
 	You tell her that you're sure she'll let them know, since she understands the situation and knows them all well. Her <<if $activeSlave.visualAge > 35>>mature<<elseif $activeSlave.face > 40>>lovely<<else>>attentive<</if>> face flicks <<if $activeSlave.height >= 185>>over<<else>>up<</if>> to look at you, @@.hotpink;her $activeSlave.eyeColor eyes glittering at the compliment.@@ "Thank you, <<Master>>," she murmurs. There's another flash on the horizon, followed by a series of smaller flashes and a low, slowly growing glow as secondaries go off and start a fire. $activeSlave.slaveName seems affected, a certain amount of moisture gathering in her eyes, but she turns away to return to her duties when it becomes clear that you intend to keep watching for a while, and aren't going to have sex with her right this minute. She does her best to communicate the new reality to those of your slaves who are obedient enough to understand the truth: though they are slaves, @@.mediumaquamarine;there is safety to be found in slavery.@@
-	<<for $i to 0; $i < $slaves.length; $i++>>
+	<<for $i = 0; $i < _SL; $i++>>
 		<<if $slaves[$i].devotion > 20>>
 		<<set $slaves[$i].trust += 1>>
 		<</if>>
@@ -423,26 +378,26 @@ She sees you examining at her, and looks back at you submissively, too tired to
 <</link>>
 <br><<link "Pull her in to keep you company as you work">>
 	<<replace "#result">>
-	She giggles happily as you seize her $activeSlave.skin wrist and pull her down to the floor. She nestles under your desk, between your legs to serve you with her mouth for a while, gently playing with her <<if ($HeadGirl.vagina > -1) && ($HeadGirl.dick > 0)>>wonderfully strange bits<<elseif ($HeadGirl.dickAccessory == "chastity") && ($HeadGirl.dick > 0)>>anus<<elseif (($HeadGirl.hormones > 0) || ($HeadGirl.balls == 0)) && ($HeadGirl.dick > 0)>>limp dick<<elseif ($HeadGirl.dick > 0)>>dick<<elseif ($HeadGirl.clit > 0)>>big clit<<else>>cunt<</if>> and moaning into you. She's down there for a long time, so long that you climax twice. The third time she softly sucks you <<if ($PC.dick == 0)>>to full arousal<<else>>hard<</if>>, it naturally takes a bit longer. When done, she slithers up into your lap without obscuring your work, stroking you lightly with a hand the whole time - a miracle of dexterity. She gently runs her hips over your crotch a few times, giving <<if ($PC.dick == 0)>>you<<else>>your dickhead<</if>> a nice tactile tour of everything she has to offer, <<if ($PC.dick == 0)>>before gently turning around to wrap her legs around you and rub herself against you until you climax a third time.<<else>>before gently lowering her butt onto your cock with a sigh. Her devoted ass brings you to orgasm a third time, and instead of getting up and off your softening dick, she just relaxes into you and bends herself backward so she can nibble your neck and whisper her adoration into your ear.<</if>> It would be hard for her to get much more trusting of you, @@.mediumaquamarine;but she does.@@
+	She giggles happily as you seize her $activeSlave.skin wrist and pull her down to the floor. She nestles under your desk, between your legs to serve you with her mouth for a while, gently playing with her <<if canDoVaginal($activeSlave) && canPenetrate($activeSlave)>>wonderfully strange bits<<elseif canDoAnal($activeSlave)>>anus<<elseif ($activeSlave.dick > 0) && !canAchieveErection($activeSlave)>>limp cock<<elseif ($activeSlave.dick > 0)>>hard cock<<elseif ($activeSlave.clit > 0)>>huge, hard clit<<elseif ($activeSlave.vagina > -1)>>soaking-wet cunt<<else>>nipples<</if>> and moaning into you. She's down there for a long time, so long that you climax twice. The third time she softly sucks you <<if ($PC.dick == 0)>>to full arousal<<else>>hard<</if>>, it naturally takes a bit longer. When done, she slithers up into your lap without obscuring your work, stroking you lightly with a hand the whole time - a miracle of dexterity. She gently runs her hips over your crotch a few times, giving <<if ($PC.dick == 0)>>you<<else>>your dickhead<</if>> a nice tactile tour of everything she has to offer, <<if ($PC.dick == 0)>>before gently turning around to wrap her legs around you and rub herself against you until you climax a third time.<<else>>before gently lowering her butt onto your cock with a sigh. Her devoted ass brings you to orgasm a third time, and instead of getting up and off your softening dick, she just relaxes into you and bends herself backward so she can nibble your neck and whisper her adoration into your ear.<</if>> It would be hard for her to get much more trusting of you, @@.mediumaquamarine;but she does.@@
 	<<set $activeSlave.trust += 4>>
 	<<set $activeSlave.oralCount += 1>>
 	<<set $oralTotal += 1>>
 	<<AnalVCheck>>
 	<</replace>>
 <</link>> <<if $activeSlave.anus == 0>>//This will take anal virginity//<</if>>
-<<if $slaves[$j].anus > 0>>
-<br><<link "Victimize something together">>
-	<<replace "#result">>
-	She giggles happily as you seize her $activeSlave.skin wrist and pull her towards where your other slaves are mostly already asleep. She jokingly points out $slaves[$j].slaveName, fast asleep. You nod, and $activeSlave.slaveName pounces. $slaves[$j].slaveName wakes in terror and confusion to find her head and neck pinned in a leg-lock that holds her mouth hard against $activeSlave.slaveName's <<if ($activeSlave.dickAccessory == "chastity")>>anus<<elseif ($activeSlave.vagina > -1) && ($activeSlave.dick > 0)>>cock and cunt<<elseif ($activeSlave.balls < 1) && ($activeSlave.dick > 0)>>limp cock<<elseif ($activeSlave.preg < -2) && ($activeSlave.dick > 0)>>limp cock and useless balls<<elseif ($activeSlave.dick > 0)>>cock and balls<<elseif ($activeSlave.clit > 0)>>huge, hard clit<<elseif ($activeSlave.vagina == -1)>>soft perineum<<else>>soaking-wet cunt<</if>>. $slaves[$j].slaveName only manages one kick of her legs before you pin them and ram yourself up her butt. Her howl of protest, directed against $activeSlave.slaveName's privates, sends a shiver through your Head Girl. <<if ($activeSlave.lips > 70)>>"Oh pleathe make her moan, <<Master>>," she lisps through her huge lips.<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>"Oh pleathe make her moan, <<Master>>," she lisps through her face full of piercings.<<else>>"I love it when you make <<Master>>," she groans.<</if>> Poor $slaves[$j].slaveName's asshole takes quite a beating before $activeSlave.slaveName finally convulses with @@.hotpink;naughty pleasure.@@ Meanwhile, all around the nighttime rape, slaves have been woken by $slaves[$j].slaveName's struggles. They realize how completely your Head Girl has @@.hotpink;involved herself in your sexual pursuits@@ and lie as still as they can.
-	<<set $activeSlave.oralCount += 1>>
-	<<set $oralTotal += 1>>
-	<<set $slaves[$j].analCount += 1>>
-	<<set $analTotal += 1>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<set $slaves[$i].devotion += 4>>
-	<</for>>
-	<</replace>>
-<</link>>
+<<if $j >= 0 && canDoAnal($slaves[$j])>> /* $j will be -1 if no eligible victim was found */
+	<br><<link "Victimize something together">>
+		<<replace "#result">>
+		She giggles happily as you seize her $activeSlave.skin wrist and pull her towards where your other slaves are mostly already asleep. She jokingly points out $slaves[$j].slaveName, fast asleep. You nod, and $activeSlave.slaveName pounces. $slaves[$j].slaveName wakes in terror and confusion to find her head and neck pinned in a leg-lock that holds her mouth hard against $activeSlave.slaveName's <<if canDoAnal($activeSlave)>>anus<<elseif canDoVaginal($activeSlave) && canPenetrate($activeSlave)>>cock and cunt<<elseif ($activeSlave.dick > 0) && !canAchieveErection($activeSlave)>>limp cock<<elseif ($activeSlave.dick > 0) && ($activeSlave.balls > 0) && ($activeSlave.scrotum > 0)>>cock and balls<<elseif ($activeSlave.clit > 0)>>huge, hard clit<<elseif !canDoVaginal($activeSlave)>>soft perineum<<else>>soaking-wet cunt<</if>>. $slaves[$j].slaveName only manages one kick of her legs before you pin them and ram yourself up her butt. Her howl of protest, directed against $activeSlave.slaveName's privates, sends a shiver through your Head Girl. <<if ($activeSlave.lips > 70)>>"Oh pleathe make her moan, <<Master>>," she lisps through her huge lips.<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>"Oh pleathe make her moan, <<Master>>," she lisps through her face full of piercings.<<else>>"I love it when you make her moan, <<Master>>," she groans.<</if>> Poor $slaves[$j].slaveName's asshole takes quite a beating before $activeSlave.slaveName finally convulses with @@.hotpink;naughty pleasure.@@ Meanwhile, all around the nighttime rape, slaves have been woken by $slaves[$j].slaveName's struggles. They realize how completely your Head Girl has @@.hotpink;involved herself in your sexual pursuits@@ and @@.gold;lie as still as they can.@@
+		<<set $activeSlave.oralCount += 1>>
+		<<set $oralTotal += 1>>
+		<<set $slaves[$j].analCount += 1>>
+		<<set $analTotal += 1>>
+		<<for $i = 0; $i < _SL; $i++>>
+			<<set $slaves[$i].devotion += 4, $slaves[$i].trust -= 4>>
+		<</for>>
+		<</replace>>
+	<</link>>
 <</if>>
 
 <<case "headgirl dickgirl">>
@@ -451,9 +406,9 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
 	As you walk into the room to offer $activeSlave.slaveName some positive reinforcement, she groans, arches her back, and shoots her load down $slaves[$j].slaveName's retching <<if $seeRace == 1>>$slaves[$j].race <</if>>throat. $activeSlave.slaveName immediately greets you with perfect decorum, despite her recent orgasm, and delivers $slaves[$j].slaveName an agonizing flick to the ear when she does not, in $activeSlave.slaveName's opinion, follow suit with sufficient speed. You inform $activeSlave.slaveName that she is a fine Head Girl, and that if she continues to apply herself she will bring credit to you as a slave owner. She looks a little surprised, but thanks you correctly. It is only due to the arcology's monitoring system that you know that, as you turn your back and go, a single tear escapes from her eye and rolls down her pretty <<if $seeRace == 1>>$activeSlave.race <</if>>cheek. In the coming week, no shirker is safe from her wrath. @@.hotpink;Every single slave in your penthouse has become better broken to your will.@@
-	<<set $slaves[$slaves.length-1].oralCount += 1>>
+	<<set $slaves[$j].oralCount += 1>>
 	<<set $oralTotal += 1>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
+	<<for $i = 0; $i < _SL; $i++>>
 	<<if $slaves[$i].assignmentVisible == 1>>
 	<<set $slaves[$i].devotion += 2>>
 	<</if>>
@@ -464,8 +419,8 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
 	The next time you see $activeSlave.slaveName, you ask what $slaves[$j].slaveName did. It seems she did not complete her assigned duty with sufficient speed, and compounded her sin by talking back to $activeSlave.slaveName when she pointed this out. You observe that if she continues to fail to clean, she can do it with her tongue; and that if she continues to fail to be polite, she can clean $activeSlave.slaveName's <<if $seeRace == 1>>$activeSlave.race <</if>>body with her tongue. Your head girl nods her understanding with a grin. This is one week @@.hotpink;the disobedient bitch won't soon forget.@@
-	<<set $slaves[$slaves.length-1].devotion += 15>>
-	<<set $slaves[$slaves.length-1].oralCount += 5>>
+	<<set $slaves[$j].devotion += 15>>
+	<<set $slaves[$j].oralCount += 5>>
 	<<set $oralTotal += 5>>
 	<</replace>>
 <</link>>
@@ -495,7 +450,7 @@ She sees you examining at her, and looks back at you submissively, too tired to
 		<<set $analTotal += 1>>
 	<</if>>
 	<<set $activeSlave.devotion += 5>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
+	<<for $i = 0; $i < _SL; $i++>>
 		<<if $slaves[$i].assignmentVisible == 1>>
 			<<set $slaves[$i].devotion += 2>>
 		<</if>>
@@ -507,7 +462,7 @@ She sees you examining at her, and looks back at you submissively, too tired to
 	<<replace "#result">>
 	You stand up, give her a kiss, and sit down on the couch, pulling her into your lap. Her <<if $activeSlave.butt > 8>>monstrous ass rests heavily on<<elseif $activeSlave.muscles > 30>>heavily muscled ass is hard against<<elseif $activeSlave.weight > 10>>plush bottom is soft against<<elseif $activeSlave.muscles > 10>>toned butt is firm against<<elseif $activeSlave.butt > 3>>healthy butt is soft against<<else>>cute bottom is firm against<</if>> your toned thighs. She wiggles herself against you briefly, as though to gently remind you she's available without demanding anything, and then snuggles her $activeSlave.skin face into your neck. You run a hand <<if $activeSlave.hLength == 0>>across her bald head<<elseif $activeSlave.hLength < 10>>through her short hair<<else>>through her $activeSlave.hColor hair<</if>>, producing a shiver of pleasure as your fingers massage her scalp. As you cuddle with your Head Girl, you praise her hard work, and tell her that the next generation of sex slaves in the Free Cities will owe a lot to her. They'll learn from her leadership, of course, but they'll also have her genes. She stiffens a little, and there's a slight moisture against your skin as tears begin to run down her cheeks. She cranes her neck up and @@.hotpink;kisses you rapturously.@@ She seems to have absorbed a bit of your vision for the future, and over the next couple of days she takes special care to make sure the slaves in your penthouse @@.mediumaquamarine;know their place in the new world you're building.@@
 	<<set $activeSlave.devotion += 5>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
+	<<for $i = 0; $i < _SL; $i++>>
 		<<if $slaves[$i].assignmentVisible == 1>>
 			<<set $slaves[$i].trust += 2>>
 		<</if>>
@@ -516,9 +471,13 @@ She sees you examining at her, and looks back at you submissively, too tired to
 <</link>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad PESS event $PESSevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
+
 </span>
 
 <</if>> /* CLOSES EVENT SELECTION */
diff --git a/src/uncategorized/PETS.tw b/src/uncategorized/PETS.tw
index 9b537051a315d587eb92cc1da46370a0b92f9671..b765af541e6867a0e493c1b8021536a95397fd00 100644
--- a/src/uncategorized/PETS.tw
+++ b/src/uncategorized/PETS.tw
@@ -1,61 +1,37 @@
 :: PETS [nobr]
 
-<<switch $PETSevent>>
-  <<case "nurse molestation">>
-	<<set $activeSlave = $Nurse>>
-	<<set $subSlave = $nurseMolestationSubIDs.random()>>
-  <<case "stewardess beating">>
-	<<set $activeSlave = $Stewardess>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].assignment == "work as a servant">>
-			<<set $subSlave = $slaves[$i].ID>><<break>>
-		<</if>>
-	<</for>>
-  <<case "aggressive schoolteacher">>
-	<<set $activeSlave = $Schoolteacher>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].assignment == "learn in the schoolroom">>
-			<<set $subSlave = $slaves[$i].ID>><<break>>
-		<</if>>
-	<</for>>
-  <<case "abusive wardeness">>
-	<<set $activeSlave = $Wardeness>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].assignment == "be confined in the cellblock">>
-			<<set $subSlave = $slaves[$i].ID>><<break>>
-		<</if>>
-	<</for>>
-  <<case "comforting attendant">>
-	<<set $activeSlave = $Attendant>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].assignment == "rest in the spa">>
-			<<set $subSlave = $slaves[$i].ID>><<break>>
-		<</if>>
-	<</for>>
-<</switch>>
-
-<<if $activeSlave == 0>>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
+  <<set $activeSlave = $eventSlave>>
   <<if $cheatMode == 1>>
-	''A random leadership interaction event would have been selected from the following:''
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
+	''A random two slave event would have been selected from the following:''
 	<br>
 	<<for _i = 0; _i < $PETSevent.length; _i++>>
 		<<print "[[$PETSevent[_i]|PETS][$PETSevent = $PETSevent[" + _i + "]]]">>
 		<br>
 	<</for>>
+	<br><br>[[Go Back to Random Nonindividual Event|Random Nonindividual Event][$eventSlave = 0]]
   <<else>>
 	<<set $PETSevent = $PETSevent.random()>>
 	<<goto "PETS">>
   <</if>>
 <<else>>
 
-<<for $i = 0; $i < $slaves.length; $i++>>
-  <<if $slaves[$i].ID == $subSlave>>
-	<<set $subSlave = $slaves[$i]>>
-  <</if>>
-<</for>>
-
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check">>
 
+<<switch $PETSevent>>
+  <<case "nurse molestation">>
+	<<set $activeSlave = $Nurse, $subSlave = $slaves.find(function(s) { return s.anus != 0 && s.assignment == "get treatment in the clinic"; })>>
+  <<case "stewardess beating">>
+	<<set $activeSlave = $Stewardess, $subSlave = $slaves.find(function(s) { return s.assignment == "work as a servant"; })>>
+  <<case "aggressive schoolteacher">>
+	<<set $activeSlave = $Schoolteacher, $subSlave = $slaves.find(function(s) { return s.assignment == "learn in the schoolroom"; })>>
+  <<case "abusive wardeness">>
+	<<set $activeSlave = $Wardeness, $subSlave = $slaves.find(function(s) { return s.assignment == "be confined in the cellblock"; })>>
+  <<case "comforting attendant">>
+	<<set $activeSlave = $Attendant, $subSlave = $slaves.find(function(s) { return s.assignment == "rest in the spa"; })>>
+<</switch>>
+
 <<SlaveTitle $activeSlave>>
 
 /* 000-250-006 */
@@ -112,7 +88,7 @@ As you pass the entrance to the hall of cells where <span id="name"><<print "[[$
 You decide to knit up care's raveled sleeve with a break in the spa. You have your own bath, of course, but the female company is always nice even if you aren't actively using the spa's resting inhabitants. The steam in the warm pool room is turned up very high, and you can hardly see. As you lower yourself into the warm water, you see <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink = passage(), $eventDescription = 1]]">></span> across from you, sitting in the water against the pool wall. She's holding $subSlave.slaveName in her arms, rubbing a comforting hand up and down her back and murmuring into her ear. $subSlave.slaveName has her head <<if ($activeSlave.boobs > 2000)>>almost hidden between $activeSlave.slaveName's massive tits<<elseif ($activeSlave.boobs > 1000)>>between $activeSlave.slaveName's huge boobs<<elseif ($activeSlave.boobs > 300)>>between $activeSlave.slaveName's breasts<<else>>against $activeSlave.slaveName's flat chest<</if>>, but it's a nonsexual embrace. You can't hear what $activeSlave.slaveName is saying, but it's clearly comforting; $subSlave.slaveName has a happy little smile on her face and has her eyes closed in relaxation.
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad PETS event $PETSevent
 <</switch>>
 
 <br><br>
@@ -394,9 +370,13 @@ You decide to knit up care's raveled sleeve with a break in the spa. You have yo
 <</link>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad PETS event $PETSevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
+
 </span>
 
 <</if>> /* CLOSES EVENT SELECTION */
diff --git a/src/uncategorized/RECI.tw b/src/uncategorized/RECI.tw
index c93485414bc4ad43a55253af5cb16eb83f09caa7..a081049e01d8ef4fdaa413a3837e694ad85217a5 100644
--- a/src/uncategorized/RECI.tw
+++ b/src/uncategorized/RECI.tw
@@ -1,14 +1,16 @@
 :: RECI [nobr]
 
-<<if $activeSlave == 0>>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
   <<set $activeSlave = $eventSlave>>
   <<if $cheatMode == 1>>
-	''A random checkin event would have been selected from the following:''
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
+	''A random check-in event would have been selected from the following:''
 	<br>
 	<<for _i = 0; _i < $RECIevent.length; _i++>>
 		<<print "[[$RECIevent[_i]|RECI][$RECIevent = $RECIevent[" + _i + "]]]">>
 		<br>
 	<</for>>
+	<br><br>[[Go Back to Random Individual Event|Random Individual Event][$activeSlave = 0]]
   <<else>>
 	<<set $RECIevent = $RECIevent.random()>>
 	<<goto "RECI">>
@@ -335,7 +337,7 @@ She looks pensive, and goes through two false starts before she clears her throa
 <</if>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RECI event $RECIevent
 <</switch>>
 
 <br><br>
@@ -665,9 +667,13 @@ She looks pensive, and goes through two false starts before she clears her throa
 <</link>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RECI event $RECIevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
+
 </span>
 
 <</if>> /* CLOSES EVENT SELECTION */
diff --git a/src/uncategorized/REFI.tw b/src/uncategorized/REFI.tw
index 00ac729759a1a48cacb9de9c270d029c31c9d714..30b96238700fefcc6555c97fdbf510ee304aa9da 100644
--- a/src/uncategorized/REFI.tw
+++ b/src/uncategorized/REFI.tw
@@ -2,73 +2,39 @@
 
 <<switch $REFIevent>>
   <<case "masochist">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $masochistInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $masochistInterestTargetID; })>>
   <<case "pregnancy">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $pregnancyInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $pregnancyInterestTargetID; })>>
   <<case "boobs">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $boobsInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $boobsInterestTargetID; })>>
   <<case "submissive">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $submissiveInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $submissiveInterestTargetID; })>>
   <<case "buttslut">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $buttslutInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $buttslutInterestTargetID; })>>
   <<case "cumslut">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $cumslutInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $cumslutInterestTargetID; })>>
   <<case "humiliation">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $humiliationInterestTargetID == $slaves[$i].ID>>
-	<<set $activeSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-	<</for>>
-  <</switch>>
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $humiliationInterestTargetID; })>>
+<</switch>>
 
-<<if $activeSlave == 0>>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
+  <<set $activeSlave = $eventSlave>>
   <<if $cheatMode == 1>>
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
 	''A random fetish interest event would have been selected from the following:''
 	<br>
 	<<for _i = 0; _i < $REFIevent.length; _i++>>
 		<<print "[[$REFIevent[_i]|REFI][$REFIevent = $REFIevent[" + _i + "]]]">>
 		<br>
 	<</for>>
+	<br><br>[[Go Back to Random Nonindividual Event|Random Nonindividual Event][$eventSlave = 0]]
   <<else>>
 	<<set $REFIevent = $REFIevent.random()>>
 	<<goto "REFI">>
   <</if>>
 <<else>>
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "AS Dump">>
-<<set $returnTo = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check">>
 
 <<SlaveTitle $activeSlave>>
 
@@ -273,7 +239,7 @@ You have $subSlave.slaveName pinned up against a railing on a balcony that overl
 $activeSlave.slaveName hesitates before explaining herself, and the $desc is obviously aroused: <<if ($activeSlave.dick > 0) && ($activeSlave.dickAccessory == "chastity")>>she's got a string of precum leaking out of her chastity cage<<elseif ($activeSlave.dick > 0) && ($activeSlave.hormones > 0)>>though her hormone-filled body can't get her dick hard any more, she's got a string of precum coming off her member<<elseif ($activeSlave.dick > 0) && ($activeSlave.balls == 0)>>though her gelded body can't get her dick hard any more, she's got a string of precum coming off her limp member<<elseif $activeSlave.dick > 4>>her gigantic cock is standing out like a mast<<elseif $activeSlave.dick > 2>>she's sporting an impressive erection<<elseif $activeSlave.dick > 0>>her little penis is rock hard<<elseif $activeSlave.clit > 0>>her large clit is visibly engorged<<else>>her nipples are hard and there's a sheen on her pussylips<</if>>. There was a glint of envy in her eyes when she saw $subSlave.slaveName's satisfaction at being publicly used. It should be possible to either encourage this fascination with humiliation or steer her away from it for now.
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad REFI event $REFIevent
 <</switch>>
 
 <br><br>
@@ -441,9 +407,13 @@ $activeSlave.slaveName hesitates before explaining herself, and the $desc is obv
 <</link>><<if ($activeSlave.anus == 0) || ($activeSlave.vagina == 0)>> //This option will take virginity//<</if>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad REFI event $REFIevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
+
 </span>
 
 <</if>> /* CLOSES EVENT SELECTION */
diff --git a/src/uncategorized/RESS.tw b/src/uncategorized/RESS.tw
index cb5466dd54bd6a78ee223a8c6e0ef35c8ee971b7..1bc29f06c7fc2c6c19ffa74b738d6701bbe90fdc 100644
--- a/src/uncategorized/RESS.tw
+++ b/src/uncategorized/RESS.tw
@@ -1,14 +1,16 @@
 :: RESS [nobr]
 
-<<if $activeSlave == 0>>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
   <<set $activeSlave = $eventSlave>>
   <<if $cheatMode == 1>>
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
 	''A random single slave event would have been selected from the following:''
 	<br>
 	<<for _i = 0; _i < $RESSevent.length; _i++>>
 		<<print "[[$RESSevent[_i]|RESS][$RESSevent = $RESSevent[" + _i + "]]]">>
 		<br>
 	<</for>>
+	<br><br>[[Go Back to Random Individual Event|Random Individual Event][$activeSlave = 0]]
   <<else>>
 	<<set $RESSevent = $RESSevent.random()>>
 	<<goto "RESS">>
@@ -1805,7 +1807,7 @@ up to the tops of her thighs, but that's all she can manage. The wardrobe includ
 <</if>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RESS event $RESSevent
 <</switch>>
 
 <br><br>
@@ -8830,9 +8832,13 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 <</link>>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RESS event $RESSevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
+
 </span>
 
 <</if>> /* CLOSES EVENT SELECTION */
diff --git a/src/uncategorized/RESSTR.tw b/src/uncategorized/RESSTR.tw
index 371ff16768510b3a6d87eb01b6bc19f22a6d45d7..23ecbe6723de39501437de060b2ff8b43094963b 100644
--- a/src/uncategorized/RESSTR.tw
+++ b/src/uncategorized/RESSTR.tw
@@ -1,9 +1,23 @@
 :: RESSTR [nobr]
 
-<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Next Week">>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
+  <<set $activeSlave = $eventSlave>>
+  <<if $cheatMode == 1>>
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
+	''A random event would have been selected from the following:''
+	<br>
+	<<for _i = 0; _i < $RESSTRevent.length; _i++>>
+		<<print "[[$RESSTRevent[_i]|RESSTR][$RESSTRevent = $RESSTRevent[" + _i + "]]]">>
+		<br>
+	<</for>>
+	<br><br>[[Go Back to Random Individual Event|Random Individual Event][$activeSlave = 0]]
+  <<else>>
+	<<set $RESSTRevent = $RESSTRevent.random()>>
+	<<goto "RESSTR">>
+  <</if>>
+<<else>>
 
-<<set $RESSTRevent = $RESSTRevent.random()>>
-<<set $activeSlave = $eventSlave>>
+<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Next Week">>
 
 /* 000-250-006 */
 /* <<if $seeImages == 1>><<SlaveArt $activeSlave 2 0>><</if>> */
@@ -257,8 +271,23 @@ She sits back up and rubs her hands down her lower back on either side, sighing
 	"Good morning, <<Master>>," she <<say>>s properly, doing her best to be good. She watches you closely, ready to obey any command you might give her.
 <</if>>
 
+<<case "modest clothes">>
+
+Near the end of her weekly inspection, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> asks you a question. The inspection happens to have been at the start of her day, and after you're done with her, she'll be heading off to get dressed. She's naked for inspection, of course,
+<<if $activeSlave.fetishKnown && $activeSlave.fetish == "humiliation">>which has the humiliation fetishist $desc decently aroused<<else>>but she's a good $desc, and she trusts you, so she has no problem at all with being seen nude<</if>>. In fact, that's what she asks you about.
+<br><br>
+"<<Master>>," she <<say>>s, "may I plea<<s>>e wear <<s>>omething a little more revealing, ju<<s>>t for today?" She <<if $activeSlave.trust > 95>>trusts you completely, enough to have confidence that you'll understand she isn't<<else>>bites her lip, realizing that she might have come across as<</if>> questioning you. "The $activeSlave.clothes are nice," she <<if $activeSlave.trust > 95>>allows<<else>>hurries to add<</if>>.
+<<if $activeSlave.fetishKnown && $activeSlave.fetish == "humiliation">>"They're not really embara<<ss>>ing, though. It would be <<s>>o <<s>>exy to be, um, falling out of my clothe<<s>>.
+<<elseif $activeSlave.fetishKnown && $activeSlave.fetish == "buttslut">>"But they cover my a<<ss>>hole.
+<<elseif $activeSlave.fetishKnown && $activeSlave.fetish == "boobs">>"But they cover my boob<<s>>.
+<<elseif $activeSlave.assignment == "whore">>"I like being a pro<<s>>titute, <<Master>>. It'd be fun to try looking like a total whore.
+<<elseif $activeSlave.assignment == "serve the public">>"I like being a public <<s>>lut, <<Master>>. It'd be fun to really flaunt it.
+<<else>>"It'd be fun to wear <<s>>omething naughty though.
+<</if>>
+May I plea<<s>>e try out <<s>>omething <<s>>kimpier today?"
+
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RESSTR event $RESSTRevent
 <</switch>>
 
 <br><br>
@@ -700,7 +729,7 @@ She sits back up and rubs her hands down her lower back on either side, sighing
 <br><<link "Drink from her">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-	Her eyes widen with surprise when you kneel down in front of her. She begins to straighten, to face you, but you place a <<if $PC.title == 1>>strong<<else>>feminine<</if>> hand on her chest, right between her breasts, and keep her leaning backward. Then, without any preamble, you take her right breast in both of your hands, bend forward, and take her nipple into your mouth. She gasps, <<say>>s "Oh, <<Master>>," quietly, and then begins to moan as you begin to suck powerfully,
+	Her eyes widen with surprise when you kneel down in front of her. She begins to straighten, to face you, but you place a <<if $PC.title == 1>>strong<<else>>feminine<</if>> hand on her chest, right between her breasts, and keep her leaning backward. Then, without any preamble, you take her right breast in both of your hands, bend forward, and take her nipple into your mouth. She gasps, <<say>>s "Oh, <<Master>>" quietly, and then begins to moan as you begin to suck powerfully,
 	<<switch $activeSlave.nipples>>
 	<<case "tiny">>drawing her tiny nipple entirely into your mouth.
 	<<case "puffy">>engorging her soft, puffy nipple until it fills your mouth.
@@ -716,9 +745,83 @@ She sits back up and rubs her hands down her lower back on either side, sighing
 <</link>>
 <</if>>
 
+<<case "modest clothes">>
+
+<<link "No">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+	You tell her no. She's a good enough slave that making a simple request and having you return a straightforward negative without punishment @@.mediumaquamarine;makes her just slightly more trusting.@@ It's nice for her to be allowed to ask things.
+	<<set $activeSlave.trust += 2>>
+	<</replace>>
+<</link>>
+<br><<link "Show her how much you like her usual outfit">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+	You tell her to go get dressed as usual. Her face falls a little, but there was no condemnation in her tone, and she hurries off, <<if $activeSlave.dick > 6>>monstrous cock dangling<<elseif $activeSlave.scrotum > 4>>big balls dangling<<elseif $activeSlave.preg > 15>>as fast as her swollen belly will allow<<elseif $activeSlave.boobsImplant>>fake tits bouncing<<elseif $activeSlave.butt > 4>>her big booty jiggling<<elseif $activeSlave.boobs > 2000>>udders jiggling<<else>>giving you a nice view of her naked rear<</if>>. She returns quickly, in her proper $activeSlave.clothes. You tell her that you like how she looks, and that she's pretty. She wasn't expecting such a blunt compliment, and her $activeSlave.eyeColor eyes flick down to the ground for a moment as she blushes. "T-thank you, <<Master>>," she stutters.
+	<br><br>
+	You add that she looks so good that she had better take her nice clean $activeSlave.clothes off again, because
+	<<if canDoVaginal($activeSlave) && $activeSlave.vagina != 0>>
+		you're going to <<if $PC.dick>>fuck<<else>>trib<</if>> her senseless.
+		<<set $activeSlave.vaginalCount += 1, $vaginalTotal += 1>>
+	<<elseif canDoAnal($activeSlave) && $activeSlave.anus != 0>>
+		you're going to fuck her butt<<if $activeSlave.balls>> until she cums<</if>>.
+		<<set $activeSlave.analCount += 1, $analTotal += 1>>
+	<<else>>
+		she's going to <<if $PC.dick>>suck your dick until you cover her in cum<<else>>eat you out until she's got your pussyjuice running down her chin<</if>>.
+		<<set $activeSlave.oralCount += 1, $oralTotal += 1>>
+	<</if>>
+	She giggles at the sudden lewdness, and quickly strips naked again, complimented and @@.hotpink;eager to be used.@@
+	<<set $activeSlave.devotion += 5>>
+	<</replace>>
+<</link>>
+<br><<link "Put her in a string bikini">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+	You tell her that the wardrobe's sorting system will present her with a new outfit, just for today. She's to go try it on and come right back, to see how it fits. "Thanks, <<Master>>!" she <<say>>s brightly, and hurries off to see what's in store for her. She might be a slave and a $desc but girls everywhere love trying on new clothes. She makes an entrance when she comes back, spinning around to show off. She's wearing the briefest possible string bikini. The top, rather than having patches of material to cover her nipples, forms a string triangle around them, framing them but not covering them. The bottom is a single string in front, <<if $activeSlave.dick>>which looks rather sad and alone, pushed aside by her dick as it is<<elseif $activeSlave.labia>>and it's embraced completely by her generous pussylips<<else>>and it threatens to disappear inside her pussylips<</if>>. "Thi<<s>> feel<<s>> <<s>>o hot, <<Master>>," she <<say>>s, and
+	<<if $activeSlave.fetishKnown && $activeSlave.fetish == "humiliation">>
+		blushes cutely. She looks up at you, sees the way you're staring at her, and hangs her head, blushing even harder.
+	<<elseif $activeSlave.fetishKnown && $activeSlave.fetish == "buttslut">>
+		turns around again, bending a little and cocking her hips to show off the way the string between her buttocks totally fails to conceal her <<if $activeSlave.anus > 2>>huge soft asspussy<<elseif $activeSlave.anus > 1>>nice butthole<<else>>tight little anus<</if>>.
+	<<elseif $activeSlave.fetishKnown && $activeSlave.fetish == "boobs">>
+		bounces her <<if $activeSlave.boobsImplant>>fake tits<<elseif $activeSlave.boobs > 8000>>earthshattering tits<<elseif $activeSlave.boobs > 2000>>huge boobs<<elseif $activeSlave.boobs > 400>>boobs<<else>>petite chest<</if>>. Giggling, she bounces harder, and her nipples escape from her top, such as it is.
+	<<elseif $activeSlave.assignment == "whore" || $activeSlave.assignment == "serve the public">>
+		sneaks a hand under the string around her waist, tugging her bottom up <<if $activeSlave.vagina != -1>>until the string between her legs is pulled up into the entrance of her womanhood<<else>>and turning sideways to suggest her ass<</if>>. "Guy<<s>>'ll <<if $activeSlave.assignment == "whore">>pay money for<<else>>line up to fuck<</if>> thi<<s>>," she giggles.
+	<<else>>
+		bounces a little, smiling. "I'm ba<<s>>ically naked," she giggles. "Today i<<s>> going to be fun. The other girl<<s>>'ll be jealou<<s>> you wanted me to look <<s>>o <<s>>lutty. Love you, <<Master>>."
+	<</if>>
+	She's happy you indulged her, and @@.mediumaquamarine;satisfied that you think she's cute@@ enough to have around (practically) nude.
+	<<set $activeSlave.trust += 5>>
+	<</replace>>
+<</link>>
+<br><<link "Force uncomfortable straps on her">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+	You tell her that the wardrobe's sorting system will present her with a new outfit, just for today. She's to go try it on and come right back, to see how it fits. "Thanks, <<Master>>!" she <<say>>s brightly, and hurries off to see what's in store for her. She might be a slave and a $desc but girls everywhere love trying on new clothes. She's wrong to be so enthusiastic. She comes obediently back, wearing a set of cruelly uncomfortable leather straps in the general shape of a bikini, but much tighter and more restrictive. It isn't at all what she was expecting, but she did her best to obey. She's @@.gold;tightened her own straps down@@ until they're just short of cutting off circulation, in an obvious effort to please you. You ask her how she likes her outfit. "It'<<s>> ni<<c>>e, <<Master>>," she <<say>>s, but she sounds a little sad.
+	<<if $activeSlave.fetishKnown && $activeSlave.fetish == "humiliation">>
+		"I'm ju<<s>>t a worthle<<ss>> humiliation <<s>>lut. I love having steel ring<<s>> around my hole<<s>> like thi<<s>>," she adds.
+	<<elseif $activeSlave.fetishKnown && $activeSlave.fetish == "buttslut">>
+		She turns to show you her asshole, framed by a steel ring that spreads her buttocks to keep it nice and defenseless. "I know my backpu<<ss>>y'<<s>> the be<<s>>t thing about me," she adds.
+	<<elseif $activeSlave.fetishKnown && $activeSlave.fetish == "boobs">>
+		She does her best to thrust out her chest, making the straps creak. "I know I'm, I'm ju<<s>>t, ju<<s>>t a pair of boob<<s>>," she adds.
+	<<elseif $activeSlave.assignment == "whore" || $activeSlave.assignment == "serve the public">>
+		She hangs her head. "I feel like a worthle<<ss>> <<if $activeSlave.assignment == "whore">>whore<<else>>bitch<</if>>," she adds. "Gue<<ss>> I am."
+	<<else>>
+		She indicates the steel rings that frame her holes and keep them defenseless. "I know I'm ju<<s>>t a collection of fuckhole<<s>>," she adds.
+	<</if>>
+	She sounds like she's trying to convince herself, but her @@.hotpink;abasement us not feigned.@@
+	<<set $activeSlave.devotion += 5, $activeSlave.trust -= 5>>
+	<</replace>>
+<</link>>
+
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RESSTR event $RESSTRevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
+
 </span>
 
+<</if>> /* CLOSES EVENT SELECTION */
+
diff --git a/src/uncategorized/RETS.tw b/src/uncategorized/RETS.tw
index 3812448fe1fe6c048ffcb662101cc0ae9628c852..4e52a6c252ac922e0869dc6f222a1e2720b34191 100644
--- a/src/uncategorized/RETS.tw
+++ b/src/uncategorized/RETS.tw
@@ -1,23 +1,23 @@
 :: RETS [nobr]
 
-<<if $activeSlave == 0>>
+<<if (ndef $activeSlave) || ($activeSlave == 0)>>
   <<set $activeSlave = $eventSlave>>
   <<if $cheatMode == 1>>
+	<<set $nextButton = "Back", $nextLink = "Nonrandom Event", $returnTo = "Nonrandom Event">> /* if user just clicks spacebar */
 	''A random two slave event would have been selected from the following:''
 	<br>
 	<<for _i = 0; _i < $RETSevent.length; _i++>>
 		<<print "[[$RETSevent[_i]|RETS][$RETSevent = $RETSevent[" + _i + "]]]">>
 		<br>
 	<</for>>
+	<br><br>[[Go Back to Random Individual Event|Random Individual Event][$activeSlave = 0]]
   <<else>>
 	<<set $RETSevent = $RETSevent.random()>>
 	<<goto "RETS">>
   <</if>>
 <<else>>
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "AS Dump">>
-<<set $returnTo = "Next Week">>
+<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Next Week">>
 
 <<switch $RETSevent>>
 
@@ -105,7 +105,7 @@
 <<case "top exhaustion">>
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RETS event $RETSevent
 <</switch>>
 
 <<SlaveTitle $activeSlave>>
@@ -639,7 +639,7 @@ Being the <<if $activeSlave.relationship > 4>>wife<<else>>lover<</if>> of a lust
 Mere moments after you absorb this arresting scene, $RERelationshipSlave.slaveName thrusts <<if canAchieveErection($RERelationshipSlave)>>her cock<<else>>the strap-on<</if>> all the way inside $activeSlave.slaveName's <<if $seed == 1>>ass<<else>>womanhood<</if>> and shudders, <<if canAchieveErection($RERelationshipSlave)>>filling it with her cum<<else>>orgasming<</if>>. Then she collapses, utterly spent. $activeSlave.slaveName <<if canAchieveErection($RERelationshipSlave)>>gasps at the sensation of the ejaculate shooting into her body<<else>>smiles a little wider as she feels $activeSlave.slaveName's muscles tense with climax<</if>>, and then grunts a little as $RERelationshipSlave.slaveName lies down on top of her.<<if $RERelationshipSlave.boobs > 5000>> The enormous weight of her lover's boobs squashes her.<</if>><<if $RERelationshipSlave.preg > 20>> Her pregnancy pushing <<if $activeSlave.preg > 20>>against her own<<else>>into her middle<</if>>.<</if>> After a few seconds, she wiggles her hips a little as a wordless question. The sensation <<if canAchieveErection($RERelationshipSlave)>>against $activeSlave.slaveName's softening, overstimulated member<<else>>is transmitted through the phallus and its harness to $activeSlave.slaveName's overstimulated clit, and this<</if>> makes the exhausted slave on top quiver, eliciting a giggle from the slave underneath her. "I love you, $RERelationshipSlave.slaveName," she whispers, and receives a mumbled "I love you too" in breathy response, right next to her ear.
 
 <<default>>
-	ERROR: bad event
+	<br>ERROR: bad RETS event $RETSevent
 <</switch>>
 
 <br><br>
@@ -1363,7 +1363,7 @@ Mere moments after you absorb this arresting scene, $RERelationshipSlave.slaveNa
 		<<SimpleVCheck>>
 	<<case "pregnancy">>
 		<<if $activeSlave.preg > 10>>
-			massaging the pregnant sluts belly as you fuck her.
+			massaging the pregnant slut's belly as you fuck her.
 		<<else>>
 			pushing the impregnation slut into a corner and pretending you're knocking her up.
 		<</if>>
@@ -1396,9 +1396,12 @@ Mere moments after you absorb this arresting scene, $RERelationshipSlave.slaveNa
 <</link>>
 
 <<default>>
-	ERROR: bad event
+	ERROR: RETS event $RETSevent
 <</switch>>
 
+<<if $cheatMode == 1>>
+	<br><br>DEBUG: &nbsp;&nbsp;&nbsp;&nbsp;[[Go back to Nonrandom Event|Nonrandom Event][$activeSlave = 0, $eventSlave = 0]]
+<</if>>
 
 </span>
 
diff --git a/src/uncategorized/REresistantmotherdaughter.tw b/src/uncategorized/REresistantmotherdaughter.tw
index 50700ccd4566550e652ad746b7d22839abb7b585..ca28d8f0a11e61cfe1836d65b0f0553615b8940c 100644
--- a/src/uncategorized/REresistantmotherdaughter.tw
+++ b/src/uncategorized/REresistantmotherdaughter.tw
@@ -1,7 +1,9 @@
 :: RE resistant mother daughter [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check">>
+
+<<set $i = $slaves.findIndex(function(s) { return s.ID == $mother.ID; })>>
+<<set $j = $slaves.findIndex(function(s) { return s.ID == $daughter.ID; })>>
 
 $mother.slaveName and her daughter are both having trouble getting acclimated to your ownership, with their obedience suffering as a result. Though neither of them have done anything particular egregious lately, their combined list of minor transgressions is reaching a point where rendering punishment on the two would not be seen as unfair. By happenstance they come before you for inspection one after the other. Though they certainly see each other naked frequently around the penthouse, neither seems particularly comfortable around the other when nudity is involved. While you finish $mother.slaveName's inspection, her daughter fidgets uneasily even while trying to mimic the posture and appearance of an obedient slave. It occurs to you that the current situation presents an opportunity to do //something// about this resistant mother daughter pair.
 
@@ -11,34 +13,25 @@ $mother.slaveName and her daughter are both having trouble getting acclimated to
 	<<replace "#result">>
 	Though neither of the two vehemently protests your decision to have them both join you in bed, furtive uneasy glances are exchanged between the two. Since they're already naked, they clamber onto your bed before you and reluctantly kneel facing each other, leaving enough space between them for you and for them to avert their eyes to avoid the other's nakedness. They clearly assume you would start by using one of them, so they're quite taken aback when you remain standing at the edge of the bed and suggest that $mother.slaveName play with her daughter. $daughter.slaveName awkwardly flounders a little as her mother's hands roam about her body, but does not reel back from the intimate touching. In time you instruct $daughter.slaveName to pleasure her mother, but still decline to join the incestuous union unfolding on your sheets. You extend the foreplay for hours, bringing both mother and daughter to such a state of naked arousal that they begin grinding against each other uninhibitedly. They are both so desperate for release that they do not object when you finally decide to join them, instead eagerly moving to include you in their coupling. What started with $daughter.slaveName awkwardly kneeling unmoving while her mother sucked her nipples ends with $daughter.slaveName on all fours getting fucked by you while orally pleasuring $mother.slaveName. You gaze over at $mother.slaveName and she moans and licks her lips enticingly back at you as $daughter.slaveName moans into her fuckhole.
 	@@.mediumaquamarine;They have both become more trusting of you.@@
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $daughter.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust += 4>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set $slaves[$i].analCount += 1>>
-			<<set $analTotal += 1>>
-		<<elseif canDoVaginal($slaves[$i])>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<</if>>
-		<<set $slaves[$i].oralCount += 1>>
-		<<set $oralTotal += 1>>
+
+	<<set $slaves[$i].trust += 4, $slaves[$j].trust += 4, $slaves[$i].oralCount += 1, $slaves[$j].oralCount += 1, $oralTotal += 2>>
+	
+	<<if canDoAnal($slaves[$j])>>
+		<<set $slaves[$j].analCount += 1>>
+		<<set $analTotal += 1>>
+	<<elseif canDoVaginal($slaves[$j])>>
+		<<set $slaves[$j].vaginalCount += 1>>
+		<<set $vaginalTotal += 1>>
 	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $mother.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust += 4>>
-		<<if canDoAnal($slaves[$i])>>
+
+	<<if canDoAnal($slaves[$i])>>
 		<<set $slaves[$i].analCount += 1>>
 		<<set $analTotal += 1>>
-		<<elseif canDoVaginal($slaves[$i])>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<</if>>
-		<<set $slaves[$i].oralCount += 1>>
-		<<set $oralTotal += 1>>
+	<<elseif canDoVaginal($slaves[$i])>>
+		<<set $slaves[$i].vaginalCount += 1>>
+		<<set $vaginalTotal += 1>>
 	<</if>>
-	<</for>>
+
 	<</replace>>
 <</link>>
 <br><<link "Make an example of the mother">>
@@ -47,19 +40,10 @@ $mother.slaveName and her daughter are both having trouble getting acclimated to
 	<br><br>
 	When you eventually finish your merciless assrape of $mother.slaveName, her body is covered in bruises, marks and handprints. A testament to $daughter.slaveName's inability to keep her silence as you brutalized her mother. You leave your office wordlessly to attend to other matters, while behind you $daughter.slaveName gazes forlornly at the gibbering mess you have reduced her mother to.
 	Your severe punishment of her mother has encouraged $daughter.slaveName to @@.gold;fear you@@. $mother.slaveName has been fucked into @@.hotpink;submission@@ but your savage treatment has caused her to @@.red;hate buttsex.@@
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $daughter.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust -= 10>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $mother.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].devotion += 4>>
-		<<set $slaves[$i].analCount += 1>>
-		<<set $analTotal += 1>>
-		<<set $slaves[$i].sexualFlaw = "hates anal">>
-	<</if>>
-	<</for>>
+
+	<<set $slaves[$j].trust -= 10>>
+	<<set $slaves[$i].devotion += 4, $slaves[$i].analCount += 1, $analTotal += 1, $slaves[$i].sexualFlaw = "hates anal">>
+
 	<</replace>>
 <</link>>
 </span>
diff --git a/src/uncategorized/addCustomDescriptors.tw b/src/uncategorized/addCustomDescriptors.tw
index efe4a28f52e5ff053aa34f6b2bb03e2b86e7376a..dd6b706cd5a533ce3ee00a73f54ac798c0574e4b 100644
--- a/src/uncategorized/addCustomDescriptors.tw
+++ b/src/uncategorized/addCustomDescriptors.tw
@@ -1,6 +1,6 @@
 :: Add custom descriptors [nobr]
 
-<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Main">>
+<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Slave Interact">>
 
 <<set $oldName = $activeSlave.slaveName>>
 You may enter custom descriptors for your slave's hair color, hair style, tattoos, or anything else here. After typing, press enter to commit your change. These custom descriptors will appear in descriptions of your slave, but will have no gameplay effect. Changing them is free.
diff --git a/src/uncategorized/arcadeReport.tw b/src/uncategorized/arcadeReport.tw
index 71d22dc6ef504c91441674033ee0f2f5b2173060..666136bc6590fc3694e0dc203e1917f8a142d32d 100644
--- a/src/uncategorized/arcadeReport.tw
+++ b/src/uncategorized/arcadeReport.tw
@@ -1,65 +1,59 @@
 :: Arcade Report [nobr]
 
-<<set _DL = $ArcadeiIDs.length, $arcadeSlaves = _DL>>
+<<set _DL = $ArcadeiIDs.length, $arcadeSlaves = _DL, _SL = $slaves.length, _cockmilked = 0, _milked = 0, _profits = 0, _oldCash = $cash, $boobsImplanted = 0, $prostatesImplanted = 0>>
 
-<<if $arcadeSlaves > 0>>
-	<<set _cockmilked = 0, _implanted = 0, _milked = 0,  _profits = 0, _SL = $slaves.length>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($arcadeSlaves > 1)>>''There are $arcadeSlaves inmates confined in $arcadeName.''<<else>>''There is one inmate confined in $arcadeName.''<</if>>
-	<<if ($arcologies[0].FSDegradationist > 20)>>
-	<<if $arcologies[0].FSDegradationistLaw == 1>>
-		The tenants located near the arcade don't mind having it nearby, even though the crowd of menial slaves waiting their turn spills out into the hallway, 24 hours a day.
-	<<else>>
-		The tenants located near the arcade don't mind having it nearby.
-	<</if>>
-	<<elseif ($arcologies[0].FSPaternalist > 20)>>
-		Many of the better tenants located near the arcade consider it an @@.red;intolerable@@ establishment to have nearby.
-	<<else>>
-		Some of the better tenants located near the arcade consider it an @@.red;obnoxious@@ establishment to have nearby.
-	<</if>>
-	<<if $arcadeDecoration != "standard">>
-		<br>&nbsp;&nbsp;&nbsp;&nbsp;$arcadeNameCaps's customers enjoy @@.green;getting off in $arcadeDecoration surroundings.@@
+<<for _dI = 0; _dI < _DL; _dI++>>
+	<<set $i = $ArcadeiIDs[_dI].Index, _ID = $ArcadeiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $ArcadeiIDs[_dI].Index = $i>>
 	<</if>>
-
-	<<SlaveSort $ArcadeiIDs>>
-	<<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $ArcadeiIDs[_dI].Index, _ID = $ArcadeiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $ArcadeiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-		<<if (_ID == $slaves[_i].ID)>>
-			/% Correct the Index %/
-			<<set $ArcadeiIDs[_dI].Index = _i>>
-			<<break>>
-		<</if>>
-		<</for>>
-	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "be confined in the arcade">>
-		<<set $ArcadeiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "be confined in the arcade">>
+		<<set $ArcadeiIDs.deleteAt(_dI), _dI--, _DL--, $arcadeSlaves-->>
 		<<continue>>
 	<</if>>
-	/% Onward bound as normal %/
-	<<set $oldCash = $cash, $i = _i>>
+<</for>>
+<<SlaveSort $ArcadeiIDs>>
+
+&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL > 1)>>''There are _DL inmates confined in $arcadeName.''<<else>>''There is one inmate confined in $arcadeName.''<</if>>
+<<if ($arcologies[0].FSDegradationist > 20)>>
+<<if $arcologies[0].FSDegradationistLaw == 1>>
+	The tenants located near the arcade don't mind having it nearby, even though the crowd of menial slaves waiting their turn spills out into the hallway, 24 hours a day.
+<<else>>
+	The tenants located near the arcade don't mind having it nearby.
+<</if>>
+<<elseif ($arcologies[0].FSPaternalist > 20)>>
+	Many of the better tenants located near the arcade consider it an @@.red;intolerable@@ establishment to have nearby.
+<<else>>
+	Some of the better tenants located near the arcade consider it an @@.red;obnoxious@@ establishment to have nearby.
+<</if>>
+<<if $arcadeDecoration != "standard">>
+	<br>&nbsp;&nbsp;&nbsp;&nbsp;$arcadeNameCaps's customers enjoy @@.green;getting off in $arcadeDecoration surroundings.@@
+<</if>>
+
+<<for _dI = 0; _dI < _DL; _dI++>>
+	<<set $i = $ArcadeiIDs[_dI].Index>>
 
 	/* Perform facility based rule changes */
-	<<set $slaves[_i].clothes = "no clothing">>
+	<<set $slaves[$i].clothes = "no clothing">>
 	<<if ($arcadeUpgradeInjectors == 1)>>
-		<<if ($slaves[_i].health > -60)>>
-			<<set $slaves[_i].health -= 10>>
-		<<elseif ($slaves[_i].health > -80)>>
-			<<set $slaves[_i].health -= 2>>
+		<<if ($slaves[$i].health > -60)>>
+			<<set $slaves[$i].health -= 10>>
+		<<elseif ($slaves[$i].health > -80)>>
+			<<set $slaves[$i].health -= 2>>
 		<<else>>
-			<<set $slaves[_i].health -= 1>>
+			<<set $slaves[$i].health -= 1>>
 		<</if>>
-		<<set $slaves[_i].aphrodisiacs = 2, $slaves[_i].devotion -= 5, $slaves[_i].trust -= 10>>
+		<<set $slaves[$i].aphrodisiacs = 2, $slaves[$i].devotion -= 5, $slaves[$i].trust -= 10>>
 	<<else>>
-		<<if ($slaves[_i].health < -60)>>
-			<<set $slaves[_i].health += 20>>
-		<<elseif ($slaves[_i].health < 10)>>
-			<<set $slaves[_i].health += 10>>
-		<<elseif ($slaves[_i].health > 20)>>
-			<<set $slaves[_i].health -= 10>>
+		<<if ($slaves[$i].health < -60)>>
+			<<set $slaves[$i].health += 20>>
+		<<elseif ($slaves[$i].health < 10)>>
+			<<set $slaves[$i].health += 10>>
+		<<elseif ($slaves[$i].health > 20)>>
+			<<set $slaves[$i].health -= 10>>
 		<</if>>
-		<<set $slaves[_i].trust -= 5>>
+		<<set $slaves[$i].trust -= 5>>
 	<</if>>
 
 	<<if $showEWD != 0>>
@@ -85,36 +79,41 @@
 		<</silently>>
 	<</if>>
 	<<if ($arcadeUpgradeCollectors > 0)>>
-	<<if ($slaves[_i].lactation < 2)>>
-		<<set $slaves[_i].lactation = 2, $slaves[_i].health -= 10, $cash -= $surgeryCost, _implanted++>>
-	<<elseif ($slaves[_i].lactation > 0) || ($slaves[_i].balls > 0)>>
-		<<if $showEWD != 0>>
-			<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA get milked">>
-		<<else>>
-			<<silently>><<include "SA get milked">><</silently>>
-		<</if>>
-		<<if ($slaves[_i].boobs < 2000)>>
-			<<set $slaves[_i].boobs += 100>>
-		<<elseif ($slaves[_i].boobs < 5000)>>
-			<<set $slaves[_i].boobs += 50>>
-		<<elseif ($slaves[_i].boobs < 10000)>>
-			<<set $slaves[_i].boobs += 25>>
-		<</if>>
-		<<if ($slaves[_i].balls > 0) && ($slaves[_i].balls < 6) && (random(1,100) > (40+(10*$slaves[_i].balls)))>>
-			<<set $slaves[_i].balls++>>
-		<</if>>
-		<<if ($slaves[_i].dick > 0) && ($slaves[_i].dick < 6) && (random(1,100) > (40+(10*$slaves[_i].dick)))>>
-			<<set $slaves[_i].dick++>>
-		<</if>>
-		<<if ($slaves[_i].lactation > 0)>>
-			<<set _milked++>>
-		<</if>>
-		<<if ($slaves[_i].balls > 0)>>
-			<<set _cockmilked++>>
+		<<if ($slaves[$i].lactation < 2)>>
+			<<set $slaves[$i].lactation = 2, $slaves[$i].health -= 10, $cash -= $surgeryCost, $boobsImplanted++>>
+    <<elseif $slaves[$i].prostate == 1>>
+      <<set $slaves[$i].prostate = 2, $slaves[$i].health -= 10, $cash -= $surgeryCost, $prostatesImplanted++>>
+		<<elseif ($slaves[$i].lactation > 0) || ($slaves[$i].balls > 0)>>
+			<<if $showEWD != 0>>
+				<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA get milked">>
+			<<else>>
+				<<silently>><<include "SA get milked">><</silently>>
+			<</if>>
+			<<if ($slaves[$i].boobs < 2000)>>
+				<<set $slaves[$i].boobs += 100>>
+			<<elseif ($slaves[$i].boobs < 5000)>>
+				<<set $slaves[$i].boobs += 50>>
+			<<elseif ($slaves[$i].boobs < 10000)>>
+				<<set $slaves[$i].boobs += 25>>
+			<</if>>
+			<<if ($slaves[$i].balls > 0) && ($slaves[$i].balls < 6) && (random(1,100) > (40+(10*$slaves[$i].balls)))>>
+				<<set $slaves[$i].balls++>>
+			<</if>>
+			<<if ($slaves[$i].dick > 0) && ($slaves[$i].dick < 6) && (random(1,100) > (40+(10*$slaves[$i].dick)))>>
+				<<set $slaves[$i].dick++>>
+			<</if>>
+			<<if ($slaves[$i].lactation > 0)>>
+				<<set _milked++>>
+			<</if>>
+			<<if ($slaves[$i].balls > 0)>>
+				<<set _cockmilked++>>
+			<</if>>
 		<</if>>
 	<</if>>
+	<<if ($slaves[$i].inflation > 0)>>
+		<<set $slaves[$i].inflation = 0, $slaves[$i].inflationType = "none", $slaves[$i].inflationMethod = 0, $slaves[$i].milkSource = 0>>
 	<</if>>
-	<<set _profits += $cash-$oldCash>>
+	<<set _profits += $cash-_oldCash>>
 	<<if $showEWD != 0>>
 		<br>&nbsp;&nbsp;&nbsp;
 		<<include "SA drugs">>
@@ -133,17 +132,31 @@
 		<<include "SA devotion">>
 		<</silently>>
 	<</if>>
-	<</for>>
+<</for>>
+
+<<if _DL > 0>>
 	<br><br>&nbsp;&nbsp;&nbsp;
 	<<if _milked == 1>>
 		One of them is lactating and spends her time in $arcadeName being simultaneously milked and fucked.
 	<<elseif _milked > 1>>
 		_milked of them are lactating and spend their time in $arcadeName being simultaneously milked and fucked.
 	<</if>>
-	<<if _implanted == 1>>
-		One of them was not lactating, so she was implanted with long-acting lactation inducing drugs, and it costs @@.red;¤$surgeryCost@@.
-	<<elseif _implanted > 1>>
-		_implanted of them were not lactating, so they were implanted with long-acting lactation inducing drugs, and they cost @@.red;¤<<print $surgeryCost*_implanted>>@@.
+  
+	<<if $boobsImplanted>>
+		<<if $boobsImplanted == 1>>
+			One of them was not lactating, so she was
+		<<else>>
+			$boobsImplanted of them were not lactating, so they were 
+		<</if>>
+		implanted with long-acting lactation inducing drugs, costing @@.red;¤<<print $surgeryCost*$boobsImplanted>>.@@
+	<</if>>
+	<<if $prostatesImplanted>>
+		<<if $prostatesImplanted == 1>>
+			One of them was not producing the maxiumum possible amout of precum, so she was
+		<<else>>
+			$prostatesImplanted of them were not producing the maxiumum possible amout of precum, so they were 
+		<</if>>
+		implanted with long-acting prostate stimulation drugs, costing @@.red;¤<<print $surgeryCost*$prostatesImplanted>>.@@
 	<</if>>
 	<<if _cockmilked == 1>>
 		One of them retains testicles and is brutally cockmilked as she is used.
@@ -151,47 +164,49 @@
 		_cockmilked of them retain testicles and are brutally cockmilked as they are used.
 	<</if>>
 	The arcade makes you @@.yellowgreen;¤_profits@@ this week.
-
 	<<if ($arcologies[0].FSDegradationist > 20)>>
 	<<elseif ($arcologies[0].FSPaternalist > 20)>>
 		<<set $repGain -= Math.trunc(_profits/20)>>
 	<<else>>
 		<<set $repGain -= Math.trunc(_profits/100)>>
 	<</if>>
+<</if>>
 
-	<<if ($arcadeUpgradeFuckdolls == 1) && ($arcade < $arcadeSlaves)>>
-		<<set $activeSlave = 0, _Age = -1, _FD = -1, _MB = -1, _Con = -1>>
-		<<for _dI = 0; _dI < _DL; _dI++>>
-			<<set _i = $ArcadeiIDs[_dI].Index>>
-			<<if ($slaves[_i].fetish == "mindbroken")>>
-				<<if ($slaves[_i].fuckdoll == 0)>>
-					<<if ($slaves[_i].physicalAge > 35)>>
-						<<set _Age = _i>>
-						<<break>>
-					<<elseif _FD == -1>>
-						<<set _FD = _i>>
-					<</if>>
-				<<elseif _MB == -1>>
-					<<set _MB = _i>>
+<<if ($arcadeUpgradeFuckdolls == 1) && (_DL > $arcade)>>
+	<<set $activeSlave = 0, _Age = -1, _FD = -1, _MB = -1, _Con = -1>>
+	<<for _dI = 0; _dI < _DL; _dI++>>
+		<<set $i = $ArcadeiIDs[_dI].Index>>
+		<<if ($slaves[$i].fetish == "mindbroken")>>
+			<<if ($slaves[$i].fuckdoll == 0)>>
+				<<if ($slaves[$i].physicalAge > 35)>>
+					<<set _Age = $i>>
+					<<break>>
+				<<elseif _FD == -1>>
+					<<set _FD = $i>>
 				<</if>>
-			<<elseif _Con == -1>>
-				<<set _Con = _i>>
+			<<elseif _MB == -1>>
+				<<set _MB = $i>>
 			<</if>>
-		<</for>>
-		<<if _Age > -1>>
-			<<set $activeSlave = $slaves[_Age]>>
-		<<elseif _FD > -1>>
-			<<set $activeSlave = $slaves[_FD]>>
-		<<elseif _MB > -1>>
-			<<set $activeSlave = $slaves[_MB]>>
-		<<elseif _Con > -1>>
-			<<set $activeSlave = $slaves[_Con]>>
-		<</if>>
-		<br>&nbsp;&nbsp;&nbsp;&nbsp;$activeSlave.slaveName is low-quality and surplus to the needs of the arcade, so she has been converted into a Fuckdoll.
-		<<include "Remove activeSlave">>
-		<<if $activeSlave == 0>> /% if not zero then technically there was an error INVALID SLAVE %/
-			<<set $fuckdolls++>>
+		<<elseif _Con == -1>>
+			<<set _Con = $i>>
 		<</if>>
+	<</for>>
+	<<if _Age > -1>>
+		<<set $activeSlave = $slaves[_Age]>>
+	<<elseif _FD > -1>>
+		<<set $activeSlave = $slaves[_FD]>>
+	<<elseif _MB > -1>>
+		<<set $activeSlave = $slaves[_MB]>>
+	<<elseif _Con > -1>>
+		<<set $activeSlave = $slaves[_Con]>>
+	<</if>>
+	<br>&nbsp;&nbsp;&nbsp;&nbsp;$activeSlave.slaveName is low-quality and surplus to the needs of the arcade, so she has been converted into a Fuckdoll.
+	<<include "Remove activeSlave">>
+	<<if $activeSlave == 0>> /% if not zero then technically there was an error INVALID SLAVE %/
+		<<set $fuckdolls++, _SL-->>
 	<</if>>
-	<br><br>
 <</if>>
+
+<<if _DL > 0>>
+	<br><br>
+<</if>>
\ No newline at end of file
diff --git a/src/uncategorized/arcmgmt.tw b/src/uncategorized/arcmgmt.tw
index ea99cf8e9f961ba06b2405c844f009a8d83ebca6..30f90a79e7966a8558763d8952f7c950d795f881 100644
--- a/src/uncategorized/arcmgmt.tw
+++ b/src/uncategorized/arcmgmt.tw
@@ -1,6 +1,6 @@
 :: Arcology Management [nobr]
 
-<<if $useTabs>>__Arcology Management__<</if>>
+<<if $useTabs == 0>>__Arcology Management__<</if>>
 <br>
 
 <<set _flux = random(20,40)>>
diff --git a/src/uncategorized/autosurgerySettings.tw b/src/uncategorized/autosurgerySettings.tw
index a2add72966d4178be256828632e20e647ec98ff0..79cfaae88cf67d7880a480aff751cdc822788b3a 100644
--- a/src/uncategorized/autosurgerySettings.tw
+++ b/src/uncategorized/autosurgerySettings.tw
@@ -8,7 +8,7 @@
 
 <br><br>
 
-Lactation inducing drugs implants:
+Lactation drug implants:
 <span id = "lactation">
 <<if ($currentRule.surgery.lactation == "no default setting")>>
 	''no default setting.''
@@ -23,7 +23,7 @@ Lactation inducing drugs implants:
 <<if ($currentRule.surgery.lactation !== "no default setting")>>
 	<<link "No default setting">>
 		<<set $currentRule.surgery.lactation = "no default setting">>
-		<<RASurgeryChangeLacation>>
+		<<RASurgeryChangeLactation>>
 	<</link>> |
 <<else>>
 	No default setting |
@@ -31,7 +31,7 @@ Lactation inducing drugs implants:
 <<if ($currentRule.surgery.lactation !== 0)>>
 	<<link "Removed">>
 		<<set $currentRule.surgery.lactation = 0>>
-		<<RASurgeryChangeLacation>>
+		<<RASurgeryChangeLactation>>
 	<</link>> |
 <<else>>
 	Removed |
@@ -39,13 +39,55 @@ Lactation inducing drugs implants:
 <<if ($currentRule.surgery.lactation !== 1)>>
 	<<link "Implanted">>
 		<<set $currentRule.surgery.lactation = 1>>
-		<<RASurgeryChangeLacation>>
+		<<RASurgeryChangeLactation>>
 	<</link>>
 <<else>>
 	Implanted
 <</if>>
 </span>
 
+<<if $seeDicks || $makeDicks>>
+<br><br>
+
+Prostate production enhancing drug implants:
+<span id = "prostate">
+<<if ($currentRule.surgery.prostate == "no default setting")>>
+	''no default setting.''
+<<elseif ($currentRule.surgery.prostate == 1)>>
+	''implanted.''
+<<else>>
+	''implants will be removed.''
+<</if>>
+
+<br>
+
+<<if ($currentRule.surgery.prostate !== "no default setting")>>
+	<<link "No default setting">>
+		<<set $currentRule.surgery.prostate = "no default setting">>
+		<<RASurgeryChangeProstate>>
+	<</link>> |
+<<else>>
+	No default setting |
+<</if>>
+<<if ($currentRule.surgery.prostate !== 0)>>
+	<<link "Removed">>
+		<<set $currentRule.surgery.prostate = 0>>
+		<<RASurgeryChangeProstate>>
+	<</link>> |
+<<else>>
+	Removed |
+<</if>>
+<<if ($currentRule.surgery.prostate !== 1)>>
+	<<link "Implanted">>
+		<<set $currentRule.surgery.prostate = 1>>
+		<<RASurgeryChangeProstate>>
+	<</link>>
+<<else>>
+	Implanted
+<</if>>
+</span>
+<</if>>
+
 <br><br>
 
 Cosmetic surgery:
diff --git a/src/uncategorized/brothelReport.tw b/src/uncategorized/brothelReport.tw
index 303d4c520b1236bec79c55aedad9170aaab79bee..2d8ad0be660e74353337e42dd71fd21182646141 100644
--- a/src/uncategorized/brothelReport.tw
+++ b/src/uncategorized/brothelReport.tw
@@ -3,7 +3,7 @@
 <span id="brothelstats">
 </span>
 
-<<set $implanted = 0, $legendaryWhoreID = 0, $madamCashBonus = 0, $modded = 0, $old = 0, $pure = 0, $slim = 0, $stacked = 0, $unmodded = 0, $XX = 0, $XY = 0, $young = 0, _FLsFetish = 0, _profits = 0, _SL = $slaves.length, _FLs = -1, _DL = $BrothiIDs.length, $brothelSlaves = _DL>>
+<<set _DL = $BrothiIDs.length, $brothelSlaves = _DL, _SL = $slaves.length, $implanted = 0, $legendaryWhoreID = 0, $madamCashBonus = 0, $modded = 0, $old = 0, $pure = 0, $slim = 0, $stacked = 0, $unmodded = 0, $XX = 0, $XY = 0, $young = 0, _FLsFetish = 0, _profits = 0>>
 
 <<set $legendaryWombID = 0, $pregYes to 0, $pregNo to 0>>
 
@@ -11,30 +11,21 @@
 <<set $facility = $facility || {}, $facility.brothel = initFacilityStatistics($facility.brothel)>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $BrothiIDs[_dI].Index, _ID = $BrothiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $BrothiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if (_ID == $slaves[_i].ID)>>
-				/% Correct the Index %/
-				<<set $BrothiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $BrothiIDs[_dI].Index, _ID = $BrothiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $BrothiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "work in the brothel">>
-		<<set $BrothiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "work in the brothel">>
+		<<set $BrothiIDs.deleteAt(_dI), _dI--, _DL--, $brothelSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
 <<SlaveSort $BrothiIDs>>
 
 <<if ($Madam != 0)>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-	<<if ($slaves[_FLs].ID == $Madam.ID)>>
-		<<break>>
-	<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Madam.ID; })>>
+
 	<<if ($slaves[_FLs].health < -80)>>
 		<<set $slaves[_FLs].health += 20>>
 	<<elseif $slaves[_FLs].health < -40>>
@@ -64,7 +55,7 @@
 	<</if>>
 	/% Make sure we have registered living expenses as for any other slave %/
 	<<run getSlaveStatisticData($Madam, $facility.brothel)>>
-	<<set $Madam = $slaves[_FLs], $i = _FLs>>
+	<<set $Madam = $slaves[_FLs]>>
 	&nbsp;&nbsp;&nbsp;&nbsp;$Madam.slaveName is serving as the Madam.
 	<<if $Madam.relationship == -3>>
 		As your wife, she does her best to attract attention to your brothel.
@@ -107,96 +98,97 @@
 		<<set $madamCashBonus += 0.05>>
 	<</if>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $BrothiIDs[_dI].Index>>
-		<<if $Madam.rivalryTarget == $slaves[_i].ID>>
+		<<set $i = $BrothiIDs[_dI].Index>>
+		<<if $Madam.rivalryTarget == $slaves[$i].ID>>
 			She forces her <<if $Madam.rivalry == 1>>growing rival<<elseif $Madam.rivalry == 2>>rival<<elseif $Madam.rivalry == 3>>bitter rival<</if>>, to service all the men in the brothel.
-			<<set $slaves[_i].devotion -= 2, $slaves[_i].trust -= 2>>
-			<<if canDoVaginal($slaves[_i])>>
-				<<set $slaves[_i].vaginalCount += 10, $vaginalTotal += 10>>
-				<<if $slaves[_i].publicCount>><<set $slaves[_i].publicCount += 10>><<else>><<set $slaves[_i].publicCount = 10>><</if>>
+			<<set $slaves[$i].devotion -= 2, $slaves[$i].trust -= 2>>
+			<<if canDoVaginal($slaves[$i])>>
+				<<set $slaves[$i].vaginalCount += 10, $vaginalTotal += 10>>
+				<<if $slaves[$i].publicCount>><<set $slaves[$i].publicCount += 10>><<else>><<set $slaves[$i].publicCount = 10>><</if>>
 			<</if>>
-			<<if canDoAnal($slaves[_i])>>
-				<<set $slaves[_i].analCount += 10, $analTotal += 10>>
-				<<if $slaves[_i].publicCount>><<set $slaves[_i].publicCount += 10>><<else>><<set $slaves[_i].publicCount = 10>><</if>>
+			<<if canDoAnal($slaves[$i])>>
+				<<set $slaves[$i].analCount += 10, $analTotal += 10>>
+				<<if $slaves[$i].publicCount>><<set $slaves[$i].publicCount += 10>><<else>><<set $slaves[$i].publicCount = 10>><</if>>
 			<</if>>
-			<<set $slaves[_i].oralCount += 10, $oralTotal += 10>>
-			<<if $slaves[_i].publicCount>><<set $slaves[_i].publicCount += 10>><<else>><<set $slaves[_i].publicCount = 10>><</if>>
+			<<set $slaves[$i].oralCount += 10, $oralTotal += 10>>
+			<<if $slaves[$i].publicCount>><<set $slaves[$i].publicCount += 10>><<else>><<set $slaves[$i].publicCount = 10>><</if>>
 			<<if random(1,100) > 65>>
-				<<set $slaves[_FLs].rivalry++, $Madam.rivalry++, $slaves[_i].rivalry++>>
+				<<set $slaves[_FLs].rivalry++, $Madam.rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Madam.relationshipTarget == $slaves[_i].ID>>
-			She dotes over her <<if $Madam.relationship == 1>>friend<<elseif $Madam.relationship == 2>>best friend<<elseif $Madam.relationship == 3>>friend with benefits<<elseif $Madam.relationship == 4>>lover<<elseif $Madam.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, making sure she is safe, but unfortunately driving potential costumers away from her.
-			<<set $slaves[_i].devotion++, $madamCashBonus -= 0.05>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Madam.ID || $slaves[_i].father == $Madam.ID>>
-				She pays special attention to her daughter, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-				<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
-			<<elseif $slaves[_i].ID == $Madam.mother>>
-				She pays special attention to her mother, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-				<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
-			<<elseif $slaves[_i].ID == $Madam.father>>
-				She pays special attention to her father, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-				<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
-			<<elseif areSisters($slaves[_i], $Madam) == 1>>
-				She pays special attention to her twin sister, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-				<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
-			<<elseif areSisters($slaves[_i], $Madam) == 2>>
-				She pays special attention to her sister, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-				<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
-			<<elseif areSisters($slaves[_i], $Madam) == 3>>
-				She pays special attention to her half-sister, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-				<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
+		<<elseif $Madam.relationshipTarget == $slaves[$i].ID>>
+			She dotes over her <<if $Madam.relationship == 1>>friend<<elseif $Madam.relationship == 2>>best friend<<elseif $Madam.relationship == 3>>friend with benefits<<elseif $Madam.relationship == 4>>lover<<elseif $Madam.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, making sure she is safe, but unfortunately driving potential costumers away from her.
+			<<set $slaves[$i].devotion++, $madamCashBonus -= 0.05>>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Madam.ID || $slaves[$i].father == $Madam.ID>>
+				She pays special attention to her daughter, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+				<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
+			<<elseif $slaves[$i].ID == $Madam.mother>>
+				She pays special attention to her mother, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+				<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
+			<<elseif $slaves[$i].ID == $Madam.father>>
+				She pays special attention to her father, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+				<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
+			<<elseif areSisters($slaves[$i], $Madam) == 1>>
+				She pays special attention to her twin sister, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+				<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
+			<<elseif areSisters($slaves[$i], $Madam) == 2>>
+				She pays special attention to her sister, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+				<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
+			<<elseif areSisters($slaves[$i], $Madam) == 3>>
+				She pays special attention to her half-sister, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+				<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
 			<</if>>
-		<<elseif $Madam.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She pays special attention to her $slaves[_i].relation, $slaves[_i].slaveName, making sure she is treated well and showing off her skills.
-			<<set $slaves[_i].trust++, $madamCashBonus += 0.05>>
+		<<elseif $Madam.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She pays special attention to her $slaves[$i].relation, $slaves[$i].slaveName, making sure she is treated well and showing off her skills.
+			<<set $slaves[$i].trust++, $madamCashBonus += 0.05>>
 		<</if>>
-		<<if $slaves[_i].prestigeDesc == "She is a famed Free Cities whore, and commands top prices.">>
-			She makes sure to promote $slaves[_i].slaveName, the famed whore, in order to capitalize on her popularity.
+		<<if $slaves[$i].prestigeDesc == "She is a famed Free Cities whore, and commands top prices.">>
+			She makes sure to promote $slaves[$i].slaveName, the famed whore, in order to capitalize on her popularity.
 			<<set $madamCashBonus += 0.15>>
-		<<elseif $slaves[_i].prestigeDesc == "She is a famed Free Cities slut, and can please anyone.">>
-			She makes sure to promote $slaves[_i].slaveName, the famed entertainer, in order to capitalize on her popularity.
+		<<elseif $slaves[$i].prestigeDesc == "She is a famed Free Cities slut, and can please anyone.">>
+			She makes sure to promote $slaves[$i].slaveName, the famed entertainer, in order to capitalize on her popularity.
 			<<set $madamCashBonus += 0.15>>
-		<<elseif $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a dairy cow.">>
-			She makes sure to massage $slaves[_i].slaveName's huge breasts to get the milk flowing before enticing clients to suckle and play with her.
+		<<elseif $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a dairy cow.">>
+			She makes sure to massage $slaves[$i].slaveName's huge breasts to get the milk flowing before enticing clients to suckle and play with her.
 			<<set $madamCashBonus += 0.10>>
-		<<elseif $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a cockmilker.">>
-			She shows off $slaves[_i].slaveName's copious loads by putting a condom over her dick and teasing her till she bursts it. The show draws multiple clients that want to play with her oversized junk and messy orgasms.
+		<<elseif $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a cockmilker.">>
+			She shows off $slaves[$i].slaveName's copious loads by putting a condom over her dick and teasing her till she bursts it. The show draws multiple clients that want to play with her oversized junk and messy orgasms.
 			<<set $madamCashBonus += 0.15>>
-		<<elseif $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a breeder." && $slaves[$i].preg > 10>>
-			She makes sure $slaves[_i].slaveName's growing pregnancy is well taken care of, even if it means driving away potential customers away when the mother-to-be needs a rest.
+		<<elseif $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a breeder." && $slaves[$i].preg > 10>>
+			She makes sure $slaves[$i].slaveName's growing pregnancy is well taken care of, even if it means driving away potential customers away when the mother-to-be needs a rest.
 			<<set $madamCashBonus -= 0.05>>
-		<<elseif $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a breeder.">>
-			She makes sure to play off $slaves[_i].slaveName's fame and fertility by enticing potential customers to be the one to claim her womb by filling it with their child.
+		<<elseif $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a breeder.">>
+			She makes sure to play off $slaves[$i].slaveName's fame and fertility by enticing potential customers to be the one to claim her womb by filling it with their child.
 			<<set $madamCashBonus += 0.15>>
 		<</if>>
 	<</for>>
 
-	<<set $oldCash = $cash>>
-	<<if ($brothelSlaves < 5)>>
+	<<set _oldCash = $cash>>
+	<<if (_DL < 5)>>
 		<<set $slavesGettingHelp = 0>>
 		<<if $universalRulesFacilityWork == 1>>
-			<<for _i = 0; _i < _SL; _i++>>
-				<<if ($slaves[_i].assignment == "whore")>>
+			<<for $i = 0; $i < _SL; $i++>>
+				<<if ($slaves[$i].assignment == "whore")>>
 					<<set $slavesGettingHelp++>>
 				<</if>>
 			<</for>>
 		<</if>>
-		<<if ($brothelSlaves+$slavesGettingHelp < 5)>>
+		<<if (_DL+$slavesGettingHelp < 5)>>
+			<<set $i = _FLs>> /* apply following SA passages to facility leader */
 			<<if $showEWD != 0>>
 				<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA whore">>
 			<<else>>
 				<<silently>><<include "SA whore">><</silently>>
 			<</if>>
-			<<set _seed = $cash-$oldCash, $cash += Math.trunc(0.5*_seed), _seed = Math.trunc(1.5*_seed), _profits += _seed>>
+			<<set _seed = $cash-_oldCash, $cash += Math.trunc(0.5*_seed), _seed = Math.trunc(1.5*_seed), _profits += _seed>>
 			<br>&nbsp;&nbsp;&nbsp;&nbsp;Since she doesn't have enough whores to manage to keep her busy, she sees $beauty customers herself (<<print Math.trunc($beauty/7)>> a day), earning you @@.yellowgreen;¤_seed@@. She can charge more for her time, since many citizens find it erotic to fuck the Madam.
 		<</if>>
 	<</if>>
-	<<if ($brothelSlaves > 0)>><br><br><</if>>
+	<<if (_DL > 0)>><br><br><</if>>
 <</if>>
 
-<<if ($brothelSlaves > 0)>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if $brothelSlaves != 1>>''There are $brothelSlaves slave whores working out of $brothelName.''<<else>>''There is one slave whore working out of $brothelName.''<</if>>
+<<if (_DL > 0)>>
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if _DL != 1>>''There are _DL slave whores working out of $brothelName.''<<else>>''There is one slave whore working out of $brothelName.''<</if>>
 <</if>>
 
 <<if $Madam != 0>>
@@ -233,23 +225,23 @@
 	<<set $Madam = $slaves[_FLs]>>
 <</if>>
 
-<<if ($brothelSlaves > 0)>>
+<<if (_DL > 0)>>
 	<<set _healthBonus = 0, _aphrod = 0>>
 	<<if ($brothelUpgradeDrugs == 1)>>
 		<<set _healthBonus += 3, _aphrod = 2>>
 	<</if>>
-	<<set $oldCash = $cash>>
+	<<set _oldCash = $cash>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $BrothiIDs[_dI].Index, $i = _i>>
-		<<if ($legendaryWombID == 0) && ($slaves[_i].amp != 1) && ($slaves[_i].preg > 30) && ($slaves[_i].pregType < 50) && ($slaves[_i].eggType == "human") && ($slaves[_i].births > 10) && ($slaves[_i].devotion > 50) && ($slaves[_i].prestige == 0)>>
-			<<set $legendaryWombID = $slaves[_i].ID>>
+		<<set $i = $BrothiIDs[_dI].Index>>
+		<<if ($legendaryWombID == 0) && ($slaves[$i].amp != 1) && ($slaves[$i].preg > 30) && ($slaves[$i].pregType < 50) && ($slaves[$i].eggType == "human") && ($slaves[$i].births > 10) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
+			<<set $legendaryWombID = $slaves[$i].ID>>
 		<</if>>
-		<<if ($legendaryWhoreID == 0) && ($slaves[_i].whoreSkill >= 100) && ($slaves[_i].devotion > 50) && ($slaves[_i].prestige == 0)>>
-			<<set $legendaryWhoreID = $slaves[_i].ID>>
+		<<if ($legendaryWhoreID == 0) && ($slaves[$i].whoreSkill >= 100) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
+			<<set $legendaryWhoreID = $slaves[$i].ID>>
 		<</if>>
 
 		/* Perform facility based rule changes */
-		<<set $slaves[_i].health += _healthBonus, $slaves[_i].aphrodisiacs = _aphrod>>
+		<<set $slaves[$i].health += _healthBonus, $slaves[$i].aphrodisiacs = _aphrod>>
 
 		<<if $showEWD != 0>>
 			<br><br>
@@ -291,24 +283,24 @@
 		<<if $brothelAdsSpending != 0>>
 			<<set _seed = 0>>
 			<<if $brothelAdsStacked == 1>>
-				<<if ($slaves[_i].butt > 4) && ($slaves[_i].boobs > 800)>>
+				<<if ($slaves[$i].butt > 4) && ($slaves[$i].boobs > 800)>>
 					<<set _seed++>>
 				<</if>>
 			<<elseif $brothelAdsStacked == -1>>
-				<<if ($slaves[_i].boobs < 500) && ($slaves[_i].butt < 3) && ($slaves[_i].weight <= 10) && ($slaves[_i].muscles <= 95)>>
+				<<if ($slaves[$i].boobs < 500) && ($slaves[$i].butt < 3) && ($slaves[$i].weight <= 10) && ($slaves[$i].muscles <= 95)>>
 					<<set _seed++>>
 				<</if>>
 			<</if>>
-			<<set _PierceC = ($slaves[_i].lipsPiercing + $slaves[_i].nipplesPiercing + $slaves[_i].vaginaPiercing + $slaves[_i].clitPiercing + $slaves[_i].anusPiercing + $slaves[_i].earPiercing + $slaves[_i].eyebrowPiercing + $slaves[_i].nosePiercing + $slaves[_i].navelPiercing)>>
+			<<set _PierceC = ($slaves[$i].lipsPiercing + $slaves[$i].nipplesPiercing + $slaves[$i].vaginaPiercing + $slaves[$i].clitPiercing + $slaves[$i].anusPiercing + $slaves[$i].earPiercing + $slaves[$i].eyebrowPiercing + $slaves[$i].nosePiercing + $slaves[$i].navelPiercing)>>
 			<<if $brothelAdsModded == 1>>
 				<<if (_PierceC > 8)>>
-					<<if ($slaves[_i].lipsTat != 0) && ($slaves[_i].buttTat != 0) && ($slaves[_i].anusTat != 0) && ($slaves[_i].vaginaTat != 0) && ($slaves[_i].boobsTat != 0)>>
+					<<if ($slaves[$i].lipsTat != 0) && ($slaves[$i].buttTat != 0) && ($slaves[$i].anusTat != 0) && ($slaves[$i].vaginaTat != 0) && ($slaves[$i].boobsTat != 0)>>
 						<<set _seed++>>
 					<</if>>
 				<</if>>
 			<<elseif $brothelAdsModded == -1>>
 				<<if (_PierceC < 3)>>
-					<<if ($slaves[_i].lipsTat == 0) && ($slaves[_i].buttTat == 0) && ($slaves[_i].vaginaTat == 0) && ($slaves[_i].boobsTat == 0)>>
+					<<if ($slaves[$i].lipsTat == 0) && ($slaves[$i].buttTat == 0) && ($slaves[$i].vaginaTat == 0) && ($slaves[$i].boobsTat == 0)>>
 						<<set _seed++>>
 					<</if>>
 				<</if>>
@@ -323,138 +315,138 @@
 				<</if>>
 			<</if>>
 			<<if $brothelAdsImplanted == 1>>
-				<<if ($slaves[_i].boobsImplant > 0) && ($slaves[_i].buttImplant > 0) && ($slaves[_i].waist > 0) && ($slaves[_i].lipsImplant > 0) && ($slaves[$i].bellyImplant > 0)>>
+				<<if ($slaves[$i].boobsImplant > 0) && ($slaves[$i].buttImplant > 0) && ($slaves[$i].waist > 0) && ($slaves[$i].lipsImplant > 0) && ($slaves[$i].bellyImplant > 0)>>
 					<<set _seed++>>
 				<</if>>
 			<<elseif $brothelAdsImplanted == -1>>
-				<<if ($slaves[_i].boobsImplant == 0) && ($slaves[_i].buttImplant == 0) && ($slaves[_i].waist < 2) && ($slaves[_i].lipsImplant == 0) && ($slaves[_i].faceImplant < 2) &&  ($slaves[$i].bellyImplant == 0)>>
+				<<if ($slaves[$i].boobsImplant == 0) && ($slaves[$i].buttImplant == 0) && ($slaves[$i].waist < 2) && ($slaves[$i].lipsImplant == 0) && ($slaves[$i].faceImplant < 2) &&  ($slaves[$i].bellyImplant == 0)>>
 					<<set _seed++>>
 				<</if>>
 			<</if>>
 			<<if $brothelAdsOld == 1>>
-				<<if ($slaves[_i].physicalAge >= 30)>>
+				<<if ($slaves[$i].physicalAge >= 30)>>
 					<<set _seed++>>
 				<</if>>
 			<<elseif $brothelAdsOld == -1>>
-				<<if ($slaves[_i].physicalAge < 30) && ($slaves[_i].physicalAge >= 18)>>
+				<<if ($slaves[$i].physicalAge < 30) && ($slaves[$i].physicalAge >= 18)>>
 					<<set _seed++>>
 				<</if>>
 			<<elseif $brothelAdsOld == -2>>
-				<<if ($slaves[_i].physicalAge <= 18) && ($slaves[_i].physicalAge >= 13)>>
+				<<if ($slaves[$i].physicalAge <= 18) && ($slaves[$i].physicalAge >= 13)>>
 					<<set $seed++>>
 				<</if>>
 			<<elseif $brothelAdsOld == -3>>
-				<<if ($slaves[_i].physicalAge < 13)>>
+				<<if ($slaves[$i].physicalAge < 13)>>
 					<<set $seed++>>
 				<</if>>
 			<</if>>
 			<<if $brothelAdsXX == 1>>
-				<<if ($slaves[_i].dick == 0)>>
+				<<if ($slaves[$i].dick == 0)>>
 					<<set _seed++>>
 				<</if>>
 			<<elseif $brothelAdsXX == -1>>
-				<<if ($slaves[_i].dick > 0)>>
+				<<if ($slaves[$i].dick > 0)>>
 					<<set _seed++>>
 				<</if>>
 			<</if>>
 			<<if _seed > 0>>
 				<<set _adsIncome = _seed * random(50,60) * Math.trunc($brothelAdsSpending/1000)>>
-				<<set $cash += _adsIncome , getSlaveStatisticData($slaves[_i], $facility.brothel).adsIncome += _adsIncome>>
+				<<set $cash += _adsIncome , getSlaveStatisticData($slaves[$i], $facility.brothel).adsIncome += _adsIncome>>
 			<<else>>
 				<<set _adsIncome = random(50,60) * Math.trunc($brothelAdsSpending/1000)>>
-				<<set $cash += _adsIncome, getSlaveStatisticData($slaves[_i], $facility.brothel).adsIncome += _adsIncome>>
+				<<set $cash += _adsIncome, getSlaveStatisticData($slaves[$i], $facility.brothel).adsIncome += _adsIncome>>
 			<</if>>
 		<</if>>
-		<<if ($slaves[_i].health < -80)>>
-			<<set $slaves[_i].health += 20>>
-		<<elseif $slaves[_i].health < -40>>
-			<<set $slaves[_i].health += 15>>
-		<<elseif $slaves[_i].health < 0>>
-			<<set $slaves[_i].health += 10>>
-		<<elseif $slaves[_i].health < 90>>
-			<<set $slaves[_i].health += 7>>
+		<<if ($slaves[$i].health < -80)>>
+			<<set $slaves[$i].health += 20>>
+		<<elseif $slaves[$i].health < -40>>
+			<<set $slaves[$i].health += 15>>
+		<<elseif $slaves[$i].health < 0>>
+			<<set $slaves[$i].health += 10>>
+		<<elseif $slaves[$i].health < 90>>
+			<<set $slaves[$i].health += 7>>
 		<</if>>
-		<<if ($slaves[_i].devotion <= 20) && ($slaves[_i].trust > -20)>>
-			<<set $slaves[_i].devotion -= 5, $slaves[_i].trust -= 5>>
-		<<elseif ($slaves[_i].devotion < 45)>>
-			<<set $slaves[_i].devotion += 4>>
-		<<elseif ($slaves[_i].devotion >= 50)>>
-			<<set $slaves[_i].devotion -= 4>>
+		<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust > -20)>>
+			<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
+		<<elseif ($slaves[$i].devotion < 45)>>
+			<<set $slaves[$i].devotion += 4>>
+		<<elseif ($slaves[$i].devotion >= 50)>>
+			<<set $slaves[$i].devotion -= 4>>
 		<</if>>
-		<<if ($slaves[_i].trust < 30)>>
-			<<set $slaves[_i].trust += 5>>
+		<<if ($slaves[$i].trust < 30)>>
+			<<set $slaves[$i].trust += 5>>
 		<</if>>
-		<<if $slaves[_i].energy > 40 && $slaves[_i].energy < 95>>
-			<<set $slaves[_i].energy++>>
+		<<if $slaves[$i].energy > 40 && $slaves[$i].energy < 95>>
+			<<set $slaves[$i].energy++>>
 		<</if>>
 	<</for>>
-	<<set _profits += $cash-$oldCash, $oldCash = $cash, _possibleBonuses = 0, _brothelBonuses = 0>>
+	<<set _profits += $cash-_oldCash, _oldCash = $cash, _possibleBonuses = 0, _brothelBonuses = 0>>
 
 	<br><br>&nbsp;&nbsp;&nbsp;
 	<<if $brothelAdsSpending != 0>>
 		An ad campaign is supporting business there, and whores that match it make more ¤.
 	<</if>>
 	<<if ($arcologies[0].FSAssetExpansionist == "unset") && ($arcologies[0].FSSlimnessEnthusiast == "unset")>>
-	<<if ($brothelAdsSpending == 0) || ($brothelAdsStacked == 0)>>
-		<<set _possibleBonuses++>>
-		<<if ($slim > 0) && ($stacked > 0) && (Math.abs($slim-$stacked) <= ($brothelSlaves/3))>>
-		<<set _adsIncome = $brothelSlaves*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
-		The brothel offers a @@.yellowgreen;wide@@ variety of slim and stacked slaves.
+		<<if ($brothelAdsSpending == 0) || ($brothelAdsStacked == 0)>>
+			<<set _possibleBonuses++>>
+			<<if ($slim > 0) && ($stacked > 0) && (Math.abs($slim-$stacked) <= (_DL/3))>>
+				<<set _adsIncome = _DL*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
+				The brothel offers a @@.yellowgreen;wide@@ variety of slim and stacked slaves.
+			<</if>>
 		<</if>>
 	<</if>>
-	<</if>>
 	<<if ($arcologies[0].FSRepopulationFocus == "unset") && ($arcologies[0].FSRestart == "unset")>>
 	<<if ($brothelAdsSpending == 0) || ($brothelAdsPreg == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($pregYes > 0) && ($pregNo > 0) && (Math.abs($pregYes-$pregNo) <= ($brothelSlaves/3))>>
-		<<set _adsIncome = $brothelSlaves*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
-		The brothel offers a @@.yellowgreen;wide@@ variety of slaves with big bellies and slaves with flat bellies.
-		<</if>>
+			<<if ($pregYes > 0) && ($pregNo > 0) && (Math.abs($pregYes-$pregNo) <= (_DL/3))>>
+				<<set _adsIncome = _DL*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
+				The brothel offers a @@.yellowgreen;wide@@ variety of slaves with big bellies and slaves with flat bellies.
+			<</if>>
 	<</if>>
 	<</if>>
 	<<if ($arcologies[0].FSDegradationist == "unset") && ($arcologies[0].FSBodyPurist == "unset")>>
-	<<if ($brothelAdsSpending == 0) || ($brothelAdsModded == 0)>>
-		<<set _possibleBonuses++>>
-		<<if ($modded > 0) && ($unmodded > 0) && (Math.abs($modded-$unmodded) <= ($brothelSlaves/3))>>
-		<<set _adsIncome = $brothelSlaves*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
-		The brothel offers a @@.yellowgreen;both@@ heavily pierced and tattooed slaves and slaves with more natural bodies.
+		<<if ($brothelAdsSpending == 0) || ($brothelAdsModded == 0)>>
+			<<set _possibleBonuses++>>
+			<<if ($modded > 0) && ($unmodded > 0) && (Math.abs($modded-$unmodded) <= (_DL/3))>>
+				<<set _adsIncome = _DL*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
+				The brothel offers a @@.yellowgreen;both@@ heavily pierced and tattooed slaves and slaves with more natural bodies.
+			<</if>>
 		<</if>>
 	<</if>>
-	<</if>>
 	<<if ($arcologies[0].FSTransformationFetishist == "unset") && ($arcologies[0].FSBodyPurist == "unset")>>
-	<<if ($brothelAdsSpending == 0) || ($brothelAdsImplanted == 0)>>
-		<<set _possibleBonuses++>>
-		<<if ($implanted > 0) && ($pure > 0) && (Math.abs($implanted-$pure) <= ($brothelSlaves/3))>>
-		<<set _adsIncome = $brothelSlaves*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
-		The brothel offers @@.yellowgreen;both@@ all-natural girls, and slaves whose beauty has been improved by surgical means.
+		<<if ($brothelAdsSpending == 0) || ($brothelAdsImplanted == 0)>>
+			<<set _possibleBonuses++>>
+			<<if ($implanted > 0) && ($pure > 0) && (Math.abs($implanted-$pure) <= (_DL/3))>>
+				<<set _adsIncome = _DL*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
+				The brothel offers @@.yellowgreen;both@@ all-natural girls, and slaves whose beauty has been improved by surgical means.
+			<</if>>
 		<</if>>
 	<</if>>
-	<</if>>
 	<<if $seeDicks != 0>>
-	<<if ($brothelAdsSpending == 0) || ($brothelAdsXX == 0)>>
-		<<set _possibleBonuses++>>
-		<<if ($XX > 0) && ($XY > 0) && (Math.abs($XX-$XY) <= ($brothelSlaves/3))>>
-		<<set _adsIncome = $brothelSlaves*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
-		The brothel offers a @@.yellowgreen;mix@@ of whores that can appeal to varied tastes in genitalia.
+		<<if ($brothelAdsSpending == 0) || ($brothelAdsXX == 0)>>
+			<<set _possibleBonuses++>>
+			<<if ($XX > 0) && ($XY > 0) && (Math.abs($XX-$XY) <= (_DL/3))>>
+				<<set _adsIncome = _DL*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
+				The brothel offers a @@.yellowgreen;mix@@ of whores that can appeal to varied tastes in genitalia.
+			<</if>>
 		<</if>>
 	<</if>>
-	<</if>>
 	<<if ($arcologies[0].FSMaturityPreferentialist == "unset") && ($arcologies[0].FSYouthPreferentialist == "unset")>>
-	<<if ($brothelAdsSpending == 0) || ($brothelAdsOld == 0)>>
-		<<set _possibleBonuses++>>
-		<<if ($young > 0) && ($old > 0) && (Math.abs($young-$old) <= ($brothelSlaves/3))>>
-		<<set _adsIncome = $brothelSlaves*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
-		The brothel offers girls @@.yellowgreen;both@@ young and mature.
+		<<if ($brothelAdsSpending == 0) || ($brothelAdsOld == 0)>>
+			<<set _possibleBonuses++>>
+			<<if ($young > 0) && ($old > 0) && (Math.abs($young-$old) <= (_DL/3))>>
+				<<set _adsIncome = _DL*random(20,30), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome, _brothelBonuses++>>
+				The brothel offers girls @@.yellowgreen;both@@ young and mature.
+			<</if>>
 		<</if>>
 	<</if>>
-	<</if>>
 
 	<<if (_possibleBonuses > 0) && (_brothelBonuses >= _possibleBonuses)>>
-		<<set _adsIncome = $brothelSlaves*random(40,60), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome>>
+		<<set _adsIncome = _DL*random(40,60), $cash += _adsIncome, $facility.brothel.adsIncome += _adsIncome>>
 		There is a ''@@.yellowgreen;perfect variety@@'' of slave whores working in the brothel.
 	<</if>>
 
-	<<set _profits += $cash-$oldCash>>
+	<<set _profits += $cash-_oldCash>>
 	<!-- Record statistics gathering -->
 	<<script>>
 		var b = State.variables.facility.brothel;
@@ -488,6 +480,7 @@
 		<</replace>>
 	<</timed>>
 <</if>>
-<<if $brothelSlaves || $Madam>>
+
+<<if _DL > 0 || $Madam != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/cellblockReport.tw b/src/uncategorized/cellblockReport.tw
index a09c65cf8da1e19fd81fbcc5e0c8526b7ff1b0a6..312d273a98a1cffb93c1998efb2f4e6581e375d5 100644
--- a/src/uncategorized/cellblockReport.tw
+++ b/src/uncategorized/cellblockReport.tw
@@ -1,21 +1,15 @@
 :: Cellblock Report [nobr]
 
-<<set _brokenSlaves = 0, _idleBonus = 0, _softenedQuirks = 0, _trustMalus = 0, _FLsFetish = 0, _DL = $CellBiIDs.length, $cellblockSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $CellBiIDs.length, $cellblockSlaves = _DL, _SL = $slaves.length, _brokenSlaves = 0, _idleBonus = 0, _softenedQuirks = 0, _trustMalus = 0, _FLsFetish = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $CellBiIDs[_dI].Index, _ID = $CellBiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $CellBiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if (_ID == $slaves[_i].ID)>>
-				/% Correct the Index %/
-				<<set $CellBiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $CellBiIDs[_dI].Index, _ID = $CellBiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $CellBiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "be confined in the cellblock">>
-		<<set $CellBiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "be confined in the cellblock">>
+		<<set $CellBiIDs.deleteAt(_dI), _dI--, _DL--, $cellblockSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
@@ -28,11 +22,8 @@
 <</if>>
 
 <<if ($Wardeness != 0)>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if ($slaves[_FLs].ID == $Wardeness.ID)>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Wardeness.ID; })>>
+
 	<<if ($slaves[_FLs].health < -80)>>
 		<<set $slaves[_FLs].health += 20>>
 	<<elseif ($slaves[_FLs].health < -40)>>
@@ -61,11 +52,11 @@
 			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
 		<</if>>
 	<</if>>
-	<<set $Wardeness = $slaves[_FLs], $i = _FLs>>
+	<<set $Wardeness = $slaves[_FLs]>>
 	<<if ($Wardeness.energy > 95) || ($Wardeness.fetish == "sadist")>>
 		<<set _devBonus++, _trustMalus++, _idleBonus++>>
 	<</if>>
-	&nbsp;&nbsp;&nbsp;&nbsp;$Wardeness.slaveName is serving as the wardeness.
+	&nbsp;&nbsp;&nbsp;&nbsp;$Wardeness.slaveName is serving as the Wardeness.
 	<<if $Wardeness.relationship == -3>>
 		<<set _devBonus++, _trustMalus++, _idleBonus++>>
 		As your wife, she tries her best to break the disobedient slaves to your will.
@@ -101,54 +92,54 @@
 		Her devotion to you is so absolute that she sees breaking bitches for your service as a noble calling.
 	<</if>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $CellBiIDs[_dI].Index>>
-		<<if $Wardeness.rivalryTarget == $slaves[_i].ID>>
-			She greatly enjoys breaking her <<if $Wardeness.rivalry == 1>>growing rival<<elseif $Wardeness.rivalry == 2>>rival<<elseif $Wardeness.rivalry == 3>>bitter rival<</if>>, $slaves[_i].slaveName's will.
-			<<set $slaves[_i].devotion++, $slaves[_i].trust -= 3>>
+		<<set $i = $CellBiIDs[_dI].Index>>
+		<<if $Wardeness.rivalryTarget == $slaves[$i].ID>>
+			She greatly enjoys breaking her <<if $Wardeness.rivalry == 1>>growing rival<<elseif $Wardeness.rivalry == 2>>rival<<elseif $Wardeness.rivalry == 3>>bitter rival<</if>>, $slaves[$i].slaveName's will.
+			<<set $slaves[$i].devotion++, $slaves[$i].trust -= 3>>
 			<<if random(1,100) > 30>>
-				<<set $Wardeness.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
+				<<set $Wardeness.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Wardeness.relationshipTarget == $slaves[_i].ID>>
-			She hates having to break her <<if $Wardeness.relationship == 1>>friend<<elseif $Wardeness.relationship == 2>>best friend<<elseif $Wardeness.relationship == 3>>friend with benefits<<elseif $Wardeness.relationship == 4>>lover<<elseif $Wardeness.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, but her devotion to you wins out in the end.
-			<<set $slaves[_i].devotion++, $slaves[_i].trust -= 3>>
+		<<elseif $Wardeness.relationshipTarget == $slaves[$i].ID>>
+			She hates having to break her <<if $Wardeness.relationship == 1>>friend<<elseif $Wardeness.relationship == 2>>best friend<<elseif $Wardeness.relationship == 3>>friend with benefits<<elseif $Wardeness.relationship == 4>>lover<<elseif $Wardeness.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, but her devotion to you wins out in the end.
+			<<set $slaves[$i].devotion++, $slaves[$i].trust -= 3>>
 			<<if random(1,100) >= 50>>
-				Her and $slaves[_i].slaveName's relationship has been shattered by these events.
-				<<set $Wardeness.relationship = 0, $Wardeness.relationshipTarget = 0, $slaves[_FLs].relationship = 0, $slaves[_FLs].relationshipTarget = 0, $slaves[_i].relationship = 0, $slaves[_i].relationshipTarget = 0>>
+				Her and $slaves[$i].slaveName's relationship has been shattered by these events.
+				<<set $Wardeness.relationship = 0, $Wardeness.relationshipTarget = 0, $slaves[_FLs].relationship = 0, $slaves[_FLs].relationshipTarget = 0, $slaves[$i].relationship = 0, $slaves[$i].relationshipTarget = 0>>
 			<</if>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Wardeness.ID || $slaves[_i].father == $Wardeness.ID>>
-				She spares no mercy for her daughter, $slaves[_i].slaveName, making sure she understands her place.
-				<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
-			<<elseif $slaves[_i].ID == $Wardeness.mother>>
-				She spares no mercy for her mother, $slaves[_i].slaveName, making sure she understands her place.
-				<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
-			<<elseif $slaves[_i].ID == $Wardeness.father>>
-				She spares no mercy for her father, $slaves[_i].slaveName, making sure she understands her place.
-				<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
-			<<elseif areSisters($slaves[_i], $Wardeness) == 1>>
-				She spares no mercy for her twin sister, $slaves[_i].slaveName, making sure she understands her place.
-				<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
-			<<elseif areSisters($slaves[_i], $Wardeness) == 2>>
-				She spares no mercy for her sister, $slaves[_i].slaveName, making sure she understands her place.
-				<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
-			<<elseif areSisters($slaves[_i], $Wardeness) == 3>>
-				She spares no mercy for her half-sister, $slaves[_i].slaveName, making sure she understands her place.
-				<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Wardeness.ID || $slaves[$i].father == $Wardeness.ID>>
+				She spares no mercy for her daughter, $slaves[$i].slaveName, making sure she understands her place.
+				<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
+			<<elseif $slaves[$i].ID == $Wardeness.mother>>
+				She spares no mercy for her mother, $slaves[$i].slaveName, making sure she understands her place.
+				<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
+			<<elseif $slaves[$i].ID == $Wardeness.father>>
+				She spares no mercy for her father, $slaves[$i].slaveName, making sure she understands her place.
+				<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
+			<<elseif areSisters($slaves[$i], $Wardeness) == 1>>
+				She spares no mercy for her twin sister, $slaves[$i].slaveName, making sure she understands her place.
+				<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
+			<<elseif areSisters($slaves[$i], $Wardeness) == 2>>
+				She spares no mercy for her sister, $slaves[$i].slaveName, making sure she understands her place.
+				<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
+			<<elseif areSisters($slaves[$i], $Wardeness) == 3>>
+				She spares no mercy for her half-sister, $slaves[$i].slaveName, making sure she understands her place.
+				<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
 			<</if>>
-		<<elseif $Wardeness.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She spares no mercy for her $slaves[_i].relation, $slaves[_i].slaveName, making sure she understands her place.
-			<<set $slaves[_i].devotion++, $slaves[_i].trust-->>
+		<<elseif $Wardeness.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She spares no mercy for her $slaves[$i].relation, $slaves[$i].slaveName, making sure she understands her place.
+			<<set $slaves[$i].devotion++, $slaves[$i].trust-->>
 		<</if>>
 	<</for>>
-	<<if ($cellblockSlaves < $cellblock)>>
-		<<set _seed = random(1,10)+(($cellblock-$cellblockSlaves)*(random(150,170)+(_idleBonus*10))), $cash += _seed>>
+	<<if (_DL < 5)>>
+		<<set _seed = random(1,10)+((5-_DL)*(random(150,170)+(_idleBonus*10))), $cash += _seed>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;Since she doesn't have enough prisoners to manage to keep her busy, she works on citizens' slaves, earning @@.yellowgreen;¤_seed.@@
 	<</if>>
-	<<if ($cellblockSlaves > 0)>><br><br><</if>>
+	<<if (_DL > 0)>><br><br><</if>>
 <</if>>
 
-<<if ($cellblockSlaves > 0)>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($cellblockSlaves == 1)>>''One slave is being confined in $cellblockName until she is willing to obey.''<<else>>''$cellblockSlaves slaves are being confined in $cellblockName until they are willing to obey.''<</if>>
+<<if (_DL > 0)>>
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL == 1)>>''One slave is being confined in $cellblockName until she is willing to obey.''<<else>>''_DL slaves are being confined in $cellblockName until they are willing to obey.''<</if>>
 <</if>>
 
 <<if ($Wardeness != 0)>>
@@ -186,82 +177,82 @@
 <</if>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $CellBiIDs[_dI].Index, $i = _i>>
-	<<if ($slaves[_i].devotion <= 20)>>
-		<<if ($slaves[_i].trust > -20)>>
-			<<set $slaves[_i].devotion -= 4, $slaves[_i].trust -= 4>>
+	<<set $i = $CellBiIDs[_dI].Index>>
+	<<if ($slaves[$i].devotion <= 20)>>
+		<<if ($slaves[$i].trust > -20)>>
+			<<set $slaves[$i].devotion -= 4, $slaves[$i].trust -= 4>>
 		<<else>>
-			<<set $slaves[_i].devotion++>>
+			<<set $slaves[$i].devotion++>>
 		<</if>>
 	<</if>>
 	<<if $cellblockUpgrade == 1>>
-		<<if ($slaves[_i].behavioralFlaw != "none") && ($slaves[_i].behavioralQuirk == "none")>>
-			<<switch $slaves[_i].behavioralFlaw>>
+		<<if ($slaves[$i].behavioralFlaw != "none") && ($slaves[$i].behavioralQuirk == "none")>>
+			<<switch $slaves[$i].behavioralFlaw>>
 			<<case "arrogant">>
-				<<set $slaves[_i].behavioralQuirk = "confident", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "confident", _softenedQuirks++>>
 			<<case "bitchy">>
-				<<set $slaves[_i].behavioralQuirk = "cutting", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "cutting", _softenedQuirks++>>
 			<<case "odd">>
-				<<set $slaves[_i].behavioralQuirk = "funny", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "funny", _softenedQuirks++>>
 			<<case "hates men">>
-				<<set $slaves[_i].behavioralQuirk = "adores women", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "adores women", _softenedQuirks++>>
 			<<case "hates women">>
-				<<set $slaves[_i].behavioralQuirk = "adores men", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "adores men", _softenedQuirks++>>
 			<<case "gluttonous">>
-				<<set $slaves[_i].behavioralQuirk = "fitness", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "fitness", _softenedQuirks++>>
 			<<case "anorexic">>
-				<<set $slaves[_i].behavioralQuirk = "insecure", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "insecure", _softenedQuirks++>>
 			<<case "devout">>
-				<<set $slaves[_i].behavioralQuirk = "sinful", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "sinful", _softenedQuirks++>>
 			<<case "liberated">>
-				<<set $slaves[_i].behavioralQuirk = "advocate", _softenedQuirks++>>
+				<<set $slaves[$i].behavioralQuirk = "advocate", _softenedQuirks++>>
 			<</switch>>
-			<<set $slaves[_i].behavioralFlaw = "none", $slaves[_i].devotion -= 10>>
-		<<elseif ($slaves[_i].sexualFlaw != "none") && ($slaves[_i].sexualQuirk == "none")>>
-			<<switch $slaves[_i].sexualFlaw>>
+			<<set $slaves[$i].behavioralFlaw = "none", $slaves[$i].devotion -= 10>>
+		<<elseif ($slaves[$i].sexualFlaw != "none") && ($slaves[$i].sexualQuirk == "none")>>
+			<<switch $slaves[$i].sexualFlaw>>
 			<<case "hates oral">>
-				<<set $slaves[_i].sexualQuirk = "gagfuck queen", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "gagfuck queen", _softenedQuirks++>>
 			<<case "hates anal">>
-				<<set $slaves[_i].sexualQuirk = "painal queen", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "painal queen", _softenedQuirks++>>
 			<<case "hates penetration">>
-				<<set $slaves[_i].sexualQuirk = "strugglefuck queen", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "strugglefuck queen", _softenedQuirks++>>
 			<<case "shamefast">>
-				<<set $slaves[_i].sexualQuirk = "tease", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "tease", _softenedQuirks++>>
 			<<case "idealistic">>
-				<<set $slaves[_i].sexualQuirk = "romantic", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "romantic", _softenedQuirks++>>
 			<<case "repressed">>
-				<<set $slaves[_i].sexualQuirk = "perverted", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "perverted", _softenedQuirks++>>
 			<<case "apathetic">>
-				<<set $slaves[_i].sexualQuirk = "caring", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "caring", _softenedQuirks++>>
 			<<case "crude">>
-				<<set $slaves[_i].sexualQuirk = "unflinching", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "unflinching", _softenedQuirks++>>
 			<<case "judgemental">>
-				<<set $slaves[_i].sexualQuirk = "size queen", _softenedQuirks++>>
+				<<set $slaves[$i].sexualQuirk = "size queen", _softenedQuirks++>>
 			<</switch>>
-			<<set $slaves[_i].sexualFlaw = "none", $slaves[_i].devotion -= 10>>
+			<<set $slaves[$i].sexualFlaw = "none", $slaves[$i].devotion -= 10>>
 		<</if>>
 	<</if>>
-	<<set $slaves[_i].devotion += _devBonus, $slaves[_i].trust -= _trustMalus>>
-	<<if ($Wardeness != 0) && ($Wardeness.sexualFlaw == "malicious") && ($slaves[_i].energy >= 2)>>
-		<<set $slaves[_i].energy -= 2>>
+	<<set $slaves[$i].devotion += _devBonus, $slaves[$i].trust -= _trustMalus>>
+	<<if ($Wardeness != 0) && ($Wardeness.sexualFlaw == "malicious") && ($slaves[$i].energy >= 2)>>
+		<<set $slaves[$i].energy -= 2>>
 	<</if>>
-	<<if ($slaves[_i].health < -80)>>
-		<<set $slaves[_i].health += 20>>
-	<<elseif ($slaves[_i].health < -40)>>
-		<<set $slaves[_i].health += 15>>
-	<<elseif ($slaves[_i].health < 0)>>
-		<<set $slaves[_i].health += 10>>
-	<<elseif ($slaves[_i].health < 40)>>
-		<<set $slaves[_i].health += 7>>
-	<<elseif ($slaves[_i].health < 100)>>
-		<<set $slaves[_i].health += 3>>
+	<<if ($slaves[$i].health < -80)>>
+		<<set $slaves[$i].health += 20>>
+	<<elseif ($slaves[$i].health < -40)>>
+		<<set $slaves[$i].health += 15>>
+	<<elseif ($slaves[$i].health < 0)>>
+		<<set $slaves[$i].health += 10>>
+	<<elseif ($slaves[$i].health < 40)>>
+		<<set $slaves[$i].health += 7>>
+	<<elseif ($slaves[$i].health < 100)>>
+		<<set $slaves[$i].health += 3>>
 	<</if>>
 	<<if $showEWD != 0>>
 		<br><br>
 		/* 000-250-006 */
 		<<if $seeImages == 1 && $imageChoice == 0>>
 		<div class="imageRef tinyImg">
-			<<SlaveArt $slaves[_i] 0 0>>
+			<<SlaveArt $slaves[$i] 0 0>>
 		</div>
 		<</if>>
 		/* 000-250-006 */
@@ -313,6 +304,6 @@
 		<</if>>
 	<</if>>
 <</if>>
-<<if $cellblockSlaves || $Wardeness>>
+<<if _DL > 0 || $Wardeness != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/clinicReport.tw b/src/uncategorized/clinicReport.tw
index dd35f3154006729a727688d99bba29224ee970c9..6c8386fa0793556f3177f601892859ff6d097ec2 100644
--- a/src/uncategorized/clinicReport.tw
+++ b/src/uncategorized/clinicReport.tw
@@ -1,21 +1,15 @@
 :: Clinic Report [nobr]
 
-<<set _healthBonus = 0, _idleBonus = 0, _FLsFetish = 0, _restedSlaves = 0, _DL = $CliniciIDs.length, $clinicSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $CliniciIDs.length, $clinicSlaves = _DL, _SL = $slaves.length, _healthBonus = 0, _idleBonus = 0, _FLsFetish = 0, _restedSlaves = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $CliniciIDs[_dI].Index, _ID = $CliniciIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $CliniciIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if _ID == $slaves[_i].ID>>
-				/% Correct the Index %/
-				<<set $CliniciIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $CliniciIDs[_dI].Index, _ID = $CliniciIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $CliniciIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "get treatment in the clinic">>
-		<<set $CliniciIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "get treatment in the clinic">>
+		<<set $CliniciIDs.deleteAt(_dI), _dI--, _DL--, $clinicSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
@@ -28,11 +22,8 @@
 <</if>>
 
 <<if $Nurse != 0>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if $slaves[_FLs].ID == $Nurse.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Nurse.ID; })>>
+
 	<<if ($slaves[_FLs].health < 100)>>
 		<<set $slaves[_FLs].health += 20>>
 	<</if>>
@@ -55,7 +46,7 @@
 			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
 		<</if>>
 	<</if>>
-	<<set $Nurse = $slaves[_FLs], $i = _FLs>>
+	<<set $Nurse = $slaves[_FLs]>>
 	&nbsp;&nbsp;&nbsp;&nbsp;$Nurse.slaveName is serving as the clinical nurse.
 	<<if $Nurse.relationship == -3>>
 		She does her best to be a caring and nurturing wife.
@@ -90,50 +81,50 @@
 		<<set _healthBonus++>>
 	<</if>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $CliniciIDs[_dI].Index>>
-		<<if $Nurse.rivalryTarget == $slaves[_i].ID>>
-			She purposefully neglects the needs of her <<if $Nurse.rivalry == 1>>growing rival<<elseif $Nurse.rivalry == 2>>rival<<elseif $Nurse.rivalry == 3>>bitter rival<</if>>, $slaves[_i].slaveName, hindering her recovery and deepening their dislike for each other.
-			<<set $slaves[_i].devotion--, $slaves[_i].trust--, $slaves[_i].health -= 3>>
+		<<set $i = $CliniciIDs[_dI].Index>>
+		<<if $Nurse.rivalryTarget == $slaves[$i].ID>>
+			She purposefully neglects the needs of her <<if $Nurse.rivalry == 1>>growing rival<<elseif $Nurse.rivalry == 2>>rival<<elseif $Nurse.rivalry == 3>>bitter rival<</if>>, $slaves[$i].slaveName, hindering her recovery and deepening their dislike for each other.
+			<<set $slaves[$i].devotion--, $slaves[$i].trust--, $slaves[$i].health -= 3>>
 			<<if random(1,100) > 65>>
-				<<set $Nurse.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
+				<<set $Nurse.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Nurse.relationshipTarget == $slaves[_i].ID>>
-			She dedicates most of her attention to her <<if $Nurse.relationship == 1>>friend<<elseif $Nurse.relationship == 2>>best friend<<elseif $Nurse.relationship == 3>>friend with benefits<<elseif $Nurse.relationship == 4>>lover<<elseif $Nurse.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, making sure she has everything she needs and more.  This lavish attention detracts from her overall effectiveness.
-			<<set _idleBonus -= 3, $slaves[_i].devotion++, $slaves[_i].trust++, $slaves[_i].health += 3>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Nurse.ID || $slaves[_i].father == $Nurse.ID>>
-				She makes sure to spend extra time caring for her daughter, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif $slaves[_i].ID == $Nurse.mother>>
-				She makes sure to spend extra time caring for her mother, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif $slaves[_i].ID == $Nurse.father>>
-				She makes sure to spend extra time caring for her father, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif areSisters($slaves[_i], $Nurse) == 1>>
-				She makes sure to spend extra time caring for her twin sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif areSisters($slaves[_i], $Nurse) == 2>>
-				She makes sure to spend extra time caring for her sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif areSisters($slaves[_i], $Nurse) == 3>>
-				She makes sure to spend extra time caring for her half-sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
+		<<elseif $Nurse.relationshipTarget == $slaves[$i].ID>>
+			She dedicates most of her attention to her <<if $Nurse.relationship == 1>>friend<<elseif $Nurse.relationship == 2>>best friend<<elseif $Nurse.relationship == 3>>friend with benefits<<elseif $Nurse.relationship == 4>>lover<<elseif $Nurse.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, making sure she has everything she needs and more.  This lavish attention detracts from her overall effectiveness.
+			<<set _idleBonus -= 3, $slaves[$i].devotion++, $slaves[$i].trust++, $slaves[$i].health += 3>>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Nurse.ID || $slaves[$i].father == $Nurse.ID>>
+				She makes sure to spend extra time caring for her daughter, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif $slaves[$i].ID == $Nurse.mother>>
+				She makes sure to spend extra time caring for her mother, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif $slaves[$i].ID == $Nurse.father>>
+				She makes sure to spend extra time caring for her father, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif areSisters($slaves[$i], $Nurse) == 1>>
+				She makes sure to spend extra time caring for her twin sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif areSisters($slaves[$i], $Nurse) == 2>>
+				She makes sure to spend extra time caring for her sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif areSisters($slaves[$i], $Nurse) == 3>>
+				She makes sure to spend extra time caring for her half-sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
 			<</if>>
-		<<elseif $Nurse.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She makes sure to spend extra time caring for her $slaves[_i].relation, $slaves[_i].slaveName.
-			<<set $slaves[_i].trust++, $slaves[_i].health++>>
+		<<elseif $Nurse.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She makes sure to spend extra time caring for her $slaves[$i].relation, $slaves[$i].slaveName.
+			<<set $slaves[$i].trust++, $slaves[$i].health++>>
 		<</if>>
-		<<switch $slaves[_i].prestigeDesc>>
+		<<switch $slaves[$i].prestigeDesc>>
 		<<case "She is a famed Free Cities whore, and commands top prices.">>
-			She does her best to aid the famous whore, $slaves[_i].slaveName, making sure to pay special attention to her worn holes.
-			<<set $slaves[_i].health += 2>>
+			She does her best to aid the famous whore, $slaves[$i].slaveName, making sure to pay special attention to her worn holes.
+			<<set $slaves[$i].health += 2>>
 		<<case "She is a famed Free Cities slut, and can please anyone.">>
-			She does her best to aid the famous entertainer, $slaves[_i].slaveName, making sure she can show off as soon as possible.
-			<<set $slaves[_i].health += 2>>
+			She does her best to aid the famous entertainer, $slaves[$i].slaveName, making sure she can show off as soon as possible.
+			<<set $slaves[$i].health += 2>>
 		<<case "She is remembered for winning best in show as a cockmilker.">>
-			She does her best to aid the dribbling $slaves[_i].slaveName, paying special attention to her huge cock and balls as well as making sure to milk her erect dick hourly.
-			<<set $slaves[_i].health += 4>>
+			She does her best to aid the dribbling $slaves[$i].slaveName, paying special attention to her huge cock and balls as well as making sure to milk her erect dick hourly.
+			<<set $slaves[$i].health += 4>>
 			<<if (random(1,100) > 65) && (($Nurse.fetish == "none") || ($Nurse.fetish == "cumslut"))>>
 				<<if $Nurse.fetish == "none">>
 					<<set $Nurse.fetish = "cumslut", $slaves[_FLs].fetish = "cumslut">>
@@ -142,8 +133,8 @@
 				<</if>>
 			<</if>>
 		<<case "She is remembered for winning best in show as a dairy cow.">>
-			She does her best to aid the leaking $slaves[_i].slaveName, paying special attention to her huge breasts as well as making sure to milk her hourly.
-			<<set $slaves[_i].health += 4>>
+			She does her best to aid the leaking $slaves[$i].slaveName, paying special attention to her huge breasts as well as making sure to milk her hourly.
+			<<set $slaves[$i].health += 4>>
 			<<if (random(1,100) > 65) && (($Nurse.fetish == "none") || ($Nurse.fetish == "boobs"))>>
 				<<if $Nurse.fetish == "none">>
 					<<set $Nurse.fetish = "boobs", $slaves[_FLs].fetish = "boobs">>
@@ -153,53 +144,53 @@
 			<</if>>
 		<<case "She is remembered for winning best in show as a breeder.">>
 			<<if $slaves[$i].preg > 10>>
-				She does her best to aid the pregnant $slaves[_i].slaveName, paying special attention to her swollen belly and the welfare of the life within.
-				<<set $slaves[_i].health += 6>>
+				She does her best to aid the pregnant $slaves[$i].slaveName, paying special attention to her swollen belly and the welfare of the life within.
+				<<set $slaves[$i].health += 6>>
 			<<else>>
-				She does her best to aid the breeder $slaves[_i].slaveName, paying special attention to her fertility and reproductive organs.
-				<<set $slaves[_i].health += 4>>
+				She does her best to aid the breeder $slaves[$i].slaveName, paying special attention to her fertility and reproductive organs.
+				<<set $slaves[$i].health += 4>>
 			<</if>>
 		<</switch>>
-		<<if $slaves[_i].bellyImplant > 0 && $clinicInflateBelly == 1>>
-			<br>''@@.pink;$slaves[_i].slaveName@@'' spent a lot of time during the week under IV-like stands with bags of inert filler steadily flowing into her belly implant, slowly pushing her belly further and further out. Careful attention, along with several drug injections, were used to make sure her body was able to safely adjust to the implant's rapid growth.
-			<<set $slaves[_i].bellyImplant += 1000, $slaves[_i].health -= 10>>
-			<<if ($slaves[_i].devotion > 50)>>
-				<<set $slaves[_i].devotion += 4, $slaves[_i].trust += 3>>
-			<<elseif ($slaves[_i].devotion >= -20)>>
-				<<set $slaves[_i].trust -= 5>>
+		<<if $slaves[$i].bellyImplant > 0 && $clinicInflateBelly == 1>>
+			<br>''@@.pink;$slaves[$i].slaveName@@'' spent a lot of time during the week under IV-like stands with bags of inert filler steadily flowing into her belly implant, slowly pushing her belly further and further out. Careful attention, along with several drug injections, were used to make sure her body was able to safely adjust to the implant's rapid growth.
+			<<set $slaves[$i].bellyImplant += 1000, $slaves[$i].health -= 10>>
+			<<if ($slaves[$i].devotion > 50)>>
+				<<set $slaves[$i].devotion += 4, $slaves[$i].trust += 3>>
+			<<elseif ($slaves[$i].devotion >= -20)>>
+				<<set $slaves[$i].trust -= 5>>
 			<<else>>
-				<<set $slaves[_i].devotion -= 5, $slaves[_i].trust -= 10>>
+				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 10>>
 			<</if>>
-			<<if $slaves[_i].bellyImplant > ($arcologies[0].FSTransformationFetishistResearch ? 40000 : 10000)>>
-				<<set $slaves[_i].bellyImplant = ($arcologies[0].FSTransformationFetishistResearch ? 40000 : 10000)>>
+			<<if $slaves[$i].bellyImplant > ($arcologies[0].FSTransformationFetishistResearch ? 40000 : 10000)>>
+				<<set $slaves[$i].bellyImplant = ($arcologies[0].FSTransformationFetishistResearch ? 40000 : 10000)>>
 				She is filled to the maximum that her body can stand.
 			<</if>>
 		<</if>>
-		<<if $slaves[_i].preg >= 1 && $slaves[_i].preg < 31 && $slaves[_i].pregControl == "speed up">>
-			<br>''@@.pink;$slaves[_i].slaveName@@'' spends most of her time on bedrest being filled with rapid gestation agents and concentrated slave food. All she can do is <<if $slaves[_i].amp != 1 && canSee($slaves[_i])>>watch and feel her belly pushing further and further out with life<<elseif $slaves[_i].amp != 1>>watch her belly bulging further and further out with life<<elseif !canSee($slaves[_i])>>feel her belly pushing further and further out with life beneath her fingers<<else>>feel the every growing pressure inside her abdomen<</if>>. Careful attention, along with numerous drug injections, are used to make sure her body is able to safely adjust to her pregnancy's rapid growth.
-			<<set $slaves[_i].health -= 10>>
-			<<if ($slaves[_i].devotion > 50)>>
-				<<set $slaves[_i].devotion += 2, $slaves[_i].trust += 1>>
-			<<elseif ($slaves[_i].devotion >= -20)>>
-				<<set $slaves[_i].trust -= 5>>
+		<<if $slaves[$i].preg >= 1 && $slaves[$i].preg < 31 && $slaves[$i].pregControl == "speed up">>
+			<br>''@@.pink;$slaves[$i].slaveName@@'' spends most of her time on bedrest being filled with rapid gestation agents and concentrated slave food. All she can do is <<if $slaves[$i].amp != 1 && canSee($slaves[$i])>>watch and feel her belly pushing further and further out with life<<elseif $slaves[$i].amp != 1>>watch her belly bulging further and further out with life<<elseif !canSee($slaves[$i])>>feel her belly pushing further and further out with life beneath her fingers<<else>>feel the every growing pressure inside her abdomen<</if>>. Careful attention, along with numerous drug injections, are used to make sure her body is able to safely adjust to her pregnancy's rapid growth.
+			<<set $slaves[$i].health -= 10>>
+			<<if ($slaves[$i].devotion > 50)>>
+				<<set $slaves[$i].devotion += 2, $slaves[$i].trust += 1>>
+			<<elseif ($slaves[$i].devotion >= -20)>>
+				<<set $slaves[$i].trust -= 5>>
 			<<else>>
-				<<set $slaves[_i].devotion -= 5, $slaves[_i].trust -= 10>>
+				<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 10>>
 			<</if>>
-			<<if $slaves[_i].preg >= 31 && $slaves[_i].pregControl == "speed up">>
-				<<set $slaves[_i].pregControl = "none">>
-				''@@.pink;$slaves[_i].slaveName's@@'' child is ready to pop out of her womb, ''@@.yellow;her course of rapid gestation agents is finished''.
+			<<if $slaves[$i].preg >= 31 && $slaves[$i].pregControl == "speed up">>
+				<<set $slaves[$i].pregControl = "none">>
+				''@@.pink;$slaves[$i].slaveName's@@'' child is ready to pop out of her womb, ''@@.yellow;her course of rapid gestation agents is finished''.
 			<</if>>
 		<</if>>
 	<</for>>
-	<<if ($clinicSlaves < $clinic)>>
-		<<set _seed = random(1,10)+(($clinic-$clinicSlaves)*(random(150,170)+(_idleBonus*10))), $cash += _seed>>
+	<<if (_DL < $clinic)>>
+		<<set _seed = random(1,10)+(($clinic-_DL)*(random(150,170)+(_idleBonus*10))), $cash += _seed>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;Since she doesn't have enough girls to occupy all her time, the clinic takes in citizens' slaves on a contract basis and she helps them too, earning @@.yellowgreen;¤_seed.@@
 	<</if>>
-	<<if ($clinicSlaves > 0)>><br><br><</if>>
+	<<if (_DL > 0)>><br><br><</if>>
 <</if>>
 
-<<if ($clinicSlaves > 0)>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($clinicSlaves == 1)>>''There is one slave receiving treatment in the clinic.''<<else>>''There are $clinicSlaves slaves receiving treatment in the clinic.''<</if>>
+<<if (_DL > 0)>>
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL == 1)>>''There is one slave receiving treatment in the clinic.''<<else>>''There are _DL slaves receiving treatment in the clinic.''<</if>>
 <</if>>
 
 <<if ($Nurse != 0)>>
@@ -237,34 +228,34 @@
 <</if>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $CliniciIDs[_dI].Index, $i = _i>>
-	<<if $slaves[_i].devotion < 45>>
-		<<set $slaves[_i].devotion += 4>>
+	<<set $i = $CliniciIDs[_dI].Index>>
+	<<if $slaves[$i].devotion < 45>>
+		<<set $slaves[$i].devotion += 4>>
 	<</if>>
-	<<set $slaves[_i].devotion += _devBonus>>
-	<<if $slaves[_i].trust < 45>>
-		<<set $slaves[_i].trust += 4>>
+	<<set $slaves[$i].devotion += _devBonus>>
+	<<if $slaves[$i].trust < 45>>
+		<<set $slaves[$i].trust += 4>>
 	<</if>>
-	<<if $slaves[_i].health < 90>>
-		<<set $slaves[_i].health += 10 + ($curativeUpgrade * 10) + _healthBonus>>
+	<<if $slaves[$i].health < 90>>
+		<<set $slaves[$i].health += 10 + ($curativeUpgrade * 10) + _healthBonus>>
 	<</if>>
-	<<if ($Nurse != 0) && ($clinicSpeedGestation == 1) && ($slaves[_i].preg > 0)>>
-		<<set $slaves[_i].pregControl = "speed up">>
+	<<if ($Nurse != 0) && ($clinicSpeedGestation == 1) && ($slaves[$i].preg > 0)>>
+		<<set $slaves[$i].pregControl = "speed up">>
 	<</if>>
-	<<if ($Nurse != 0) && ($slaves[_i].chem > 10) && ($clinicUpgradeFilters == 1)>>
-		<<set $slaves[_i].chem -= 5 + (50 * $clinicUpgradePurge)>>
-		<<if $clinicUpgradePurge == 1 && $slaves[_i].health > -50>>
-			<<set $slaves[_i].health = -50>>
+	<<if ($Nurse != 0) && ($slaves[$i].chem > 10) && ($clinicUpgradeFilters == 1)>>
+		<<set $slaves[$i].chem -= 5 + (50 * $clinicUpgradePurge)>>
+		<<if $clinicUpgradePurge == 1 && $slaves[$i].health > -50>>
+			<<set $slaves[$i].health = -50>>
 		<</if>>
-		<<set $slaves[_i].chem = Math.max($slaves[_i].chem, 0)>>
+		<<set $slaves[$i].chem = Math.max($slaves[$i].chem, 0)>>
 	<</if>>
-	<<if ($slaves[_i].health <= 40)>>
-	<<elseif ($Nurse != 0) && ($slaves[_i].chem > 15) && ($clinicUpgradeFilters == 1)>>
-	<<elseif ($Nurse != 0) && ($slaves[_i].preg >= 1) && ($clinicSpeedGestation >= 0 || $slaves[_i].pregControl == "speed up")>>
-	<<elseif ($Nurse != 0) && ($clinicInflateBelly > 0) && ($slaves[_i].bellyImplant >= 100) && ($slaves[$i].bellyImplant <= ($arcologies[0].FSTransformationFetishistResearch ? 40000 : 10000))>>
+	<<if ($slaves[$i].health <= 40)>>
+	<<elseif ($Nurse != 0) && ($slaves[$i].chem > 15) && ($clinicUpgradeFilters == 1)>>
+	<<elseif ($Nurse != 0) && ($slaves[$i].preg >= 1) && ($clinicSpeedGestation >= 0 || $slaves[$i].pregControl == "speed up")>>
+	<<elseif ($Nurse != 0) && ($clinicInflateBelly > 0) && ($slaves[$i].bellyImplant >= 100) && ($slaves[$i].bellyImplant <= ($arcologies[0].FSTransformationFetishistResearch ? 40000 : 10000))>>
 	<<else>>
-		<br><br>''__@@.pink;$slaves[_i].slaveName@@__'' has been returned to health<<if ($Nurse != 0) && ($clinicUpgradeFilters == 1)>> and purity<</if>>, so @@.yellow;her assignment has defaulted to rest.@@
-		<<removeJob $slaves[_i] "get treatment in the clinic">>
+		<br><br>''__@@.pink;$slaves[$i].slaveName@@__'' has been returned to health<<if ($Nurse != 0) && ($clinicUpgradeFilters == 1)>> and purity<</if>>, so @@.yellow;her assignment has defaulted to rest.@@
+		<<removeJob $slaves[$i] "get treatment in the clinic">>
 		<<set _restedSlaves++, _dI--, _DL-->>
 		<<continue>>
 	<</if>>
@@ -318,6 +309,6 @@
 		$clinicNameCaps's $clinicDecoration atmosphere @@.hotpink;had an impact on <<if _restedSlaves == 1>>her while she<<else>>them while they<</if>>@@ were getting treatment.
 	<</if>>
 <</if>>
-<<if $clinicSlaves || $Nurse>>
+<<if _DL > 0 || $Nurse != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/clubReport.tw b/src/uncategorized/clubReport.tw
index 5d36b1d1085667808c106783807b34087242094e..6a0d12de2b065840e00226194dcc036cfbde5369 100644
--- a/src/uncategorized/clubReport.tw
+++ b/src/uncategorized/clubReport.tw
@@ -1,33 +1,24 @@
 :: Club Report [nobr]
 
-<<set $clubBonuses = 0, $DJRepBonus = 0, $implanted = 0, $legendaryEntertainerID = 0, $modded = 0, $old = 0, $pure = 0, $slim = 0, $stacked = 0, $unmodded = 0, $XX = 0, $XY = 0, $young = 0, _FLsFetish = 0, _DL = $ClubiIDs.length, $clubSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $ClubiIDs.length, $clubSlaves = _DL, _SL = $slaves.length, $clubBonuses = 0, $DJRepBonus = 0, $implanted = 0, $legendaryEntertainerID = 0, $modded = 0, $old = 0, $pure = 0, $slim = 0, $stacked = 0, $unmodded = 0, $XX = 0, $XY = 0, $young = 0, _FLsFetish = 0>>
 <<set $legendaryWombID = 0, $pregYes = 0, $pregNo = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $ClubiIDs[_dI].Index, _ID = $ClubiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $ClubiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if _ID == $slaves[_i].ID>>
-				/% Correct the Index %/
-				<<set $ClubiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $ClubiIDs[_dI].Index, _ID = $ClubiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $ClubiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "serve in the club">>
-		<<set $ClubiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "serve in the club">>
+		<<set $ClubiIDs.deleteAt(_dI), _dI--, _DL--, $clubSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
 <<SlaveSort $ClubiIDs>>
 
 <<if $DJ != 0>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if $slaves[_FLs].ID == $DJ.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $DJ.ID; })>>
+
 	<<if ($slaves[_FLs].health < -80)>>
 		<<set $slaves[_FLs].health += 20>>
 	<<elseif $slaves[_FLs].health < -40>>
@@ -55,7 +46,7 @@
 			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
 		<</if>>
 	<</if>>
-	<<set $DJ = $slaves[_FLs], $i = _FLs>>
+	<<set $DJ = $slaves[_FLs]>>
 	&nbsp;&nbsp;&nbsp;&nbsp;$DJ.slaveName is performing as the DJ.
 	<<if $DJ.relationship == -3>>
 		She tries her best to be your energetic, cheerful wife.
@@ -101,17 +92,17 @@
 		She has musical experience from her life before she was a slave, a grounding that gives her tracks actual depth.
 		<<set $DJRepBonus += 0.05>>
 	<</if>>
-	<<set $i = _FLs>>
-	<<if ($clubSlaves < 10)>>
+	<<if (_DL < 10)>>
 		<<set $slavesGettingHelp = 0>>
 		<<if $universalRulesFacilityWork == 1>>
-			<<for _i = 0; _i < _SL; _i++>>
-				<<if ($slaves[_i].assignment == "serve the public")>>
+			<<for $i = 0; $i < _SL; $i++>>
+				<<if ($slaves[$i].assignment == "serve the public")>>
 					<<set $slavesGettingHelp++>>
 				<</if>>
 			<</for>>
 		<</if>>
-		<<if ($clubSlaves+$slavesGettingHelp < 10)>>
+		<<if (_DL+$slavesGettingHelp < 10)>>
+			<<set $i = _FLs>> /* apply following SA passages to facility leader */
 			<<if ($legendaryEntertainerID == 0) && ($slaves[_FLs].prestige == 0) && ($slaves[_FLs].entertainSkill >= 100) && ($slaves[_FLs].devotion > 50)>>
 				<<set $legendaryEntertainerID = $slaves[_FLs].ID>>
 			<</if>>
@@ -124,12 +115,12 @@
 			<br>&nbsp;&nbsp;&nbsp;&nbsp;Since she doesn't have enough sluts in $clubName to make it worthwhile for her to be on stage 24/7, she spends her extra time slutting it up herself. She has sex with $beauty citizens, @@.green;pleasing them immensely,@@ since it's more appealing to fuck the DJ than some club slut.
 		<</if>>
 	<</if>>
-	<<if ($clubSlaves > 0)>><br><br><</if>>
+	<<if (_DL > 0)>><br><br><</if>>
 <</if>>
 
-<<if ($clubSlaves > 0)>>
+<<if (_DL > 0)>>
 	<<set _possibleBonuses = 0>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($clubSlaves != 1)>>''The $clubSlaves slaves pleasing citizens in $clubName''<<else>>''The one slave pleasing citizens in $clubName''<</if>> worked hard to @@.green;increase your reputation@@ this week.
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL != 1)>>''The _DL slaves pleasing citizens in $clubName''<<else>>''The one slave pleasing citizens in $clubName''<</if>> worked hard to @@.green;increase your reputation@@ this week.
 <</if>>
 
 <<if ($DJ != 0)>>
@@ -166,35 +157,35 @@
 	<<set $DJ = $slaves[_FLs]>>
 <</if>>
 
-<<if ($clubSlaves > 0)>>
+<<if (_DL > 0)>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $ClubiIDs[_dI].Index, $i = _i>>
-		<<if ($legendaryEntertainerID == 0) && ($slaves[_i].prestige == 0) && ($slaves[_i].entertainSkill >= 100) && ($slaves[_i].devotion > 50) && ($slaves[_i].prestige == 0)>>
-			<<set $legendaryEntertainerID = $slaves[_i].ID>>
+		<<set $i = $ClubiIDs[_dI].Index>>
+		<<if ($legendaryEntertainerID == 0) && ($slaves[$i].prestige == 0) && ($slaves[$i].entertainSkill >= 100) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
+			<<set $legendaryEntertainerID = $slaves[$i].ID>>
 		<</if>>
-		<<if ($legendaryWombID == 0) && ($slaves[_i].amp != 1) && ($slaves[_i].preg > 30) && ($slaves[_i].pregType < 50) && ($slaves[_i].eggType == "human") && ($slaves[_i].births > 10) && ($slaves[_i].devotion > 50) && ($slaves[_i].prestige == 0)>>
-			<<set $legendaryWombID = $slaves[_i].ID>>
+		<<if ($legendaryWombID == 0) && ($slaves[$i].amp != 1) && ($slaves[$i].preg > 30) && ($slaves[$i].pregType < 50) && ($slaves[$i].eggType == "human") && ($slaves[$i].births > 10) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
+			<<set $legendaryWombID = $slaves[$i].ID>>
 		<</if>>
-		<<if ($slaves[_i].devotion <= 20) && ($slaves[_i].trust > -20)>>
-			<<set $slaves[_i].devotion -= 5, $slaves[_i].trust -= 5>>
-		<<elseif ($slaves[_i].devotion < 45)>>
-			<<set $slaves[_i].devotion += 4>>
-		<<elseif ($slaves[_i].devotion >= 50)>>
-			<<set $slaves[_i].devotion -= 4>>
+		<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust > -20)>>
+			<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
+		<<elseif ($slaves[$i].devotion < 45)>>
+			<<set $slaves[$i].devotion += 4>>
+		<<elseif ($slaves[$i].devotion >= 50)>>
+			<<set $slaves[$i].devotion -= 4>>
 		<</if>>
 
-		<<if ($slaves[_i].trust < 30)>>
-			<<set $slaves[_i].trust += 5>>
+		<<if ($slaves[$i].trust < 30)>>
+			<<set $slaves[$i].trust += 5>>
 		<</if>>
 
-		<<if ($slaves[_i].health < -80)>>
-			<<set $slaves[_i].health += 20>>
-		<<elseif ($slaves[_i].health < -40)>>
-			<<set $slaves[_i].health += 15>>
-		<<elseif ($slaves[_i].health < 0)>>
-			<<set $slaves[_i].health += 10>>
-		<<elseif ($slaves[_i].health < 90)>>
-			<<set $slaves[_i].health += 7>>
+		<<if ($slaves[$i].health < -80)>>
+			<<set $slaves[$i].health += 20>>
+		<<elseif ($slaves[$i].health < -40)>>
+			<<set $slaves[$i].health += 15>>
+		<<elseif ($slaves[$i].health < 0)>>
+			<<set $slaves[$i].health += 10>>
+		<<elseif ($slaves[$i].health < 90)>>
+			<<set $slaves[$i].health += 7>>
 		<</if>>
 
 		<<if $showEWD != 0>>
@@ -244,8 +235,8 @@
 	<<if ($arcologies[0].FSAssetExpansionist == "unset") && ($arcologies[0].FSSlimnessEnthusiast == "unset")>>
 	<<if ($clubAdsSpending == 0) || ($clubAdsStacked == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($slim > 0) && ($stacked > 0) && (Math.abs($slim-$stacked) <= ($clubSlaves/3))>>
-		<<set $repGain += $clubSlaves*random(5,10), $clubBonuses++>>
+		<<if ($slim > 0) && ($stacked > 0) && (Math.abs($slim-$stacked) <= (_DL/3))>>
+		<<set $repGain += _DL*random(5,10), $clubBonuses++>>
 		There is a @@.green;wide@@ variety of slim and stacked slaves working the club.
 		<</if>>
 	<</if>>
@@ -253,8 +244,8 @@
 	<<if ($arcologies[0].FSDegradationist == "unset") && ($arcologies[0].FSBodyPurist == "unset")>>
 	<<if ($clubAdsSpending == 0) || ($clubAdsModded == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($modded > 0) && ($unmodded > 0) && (Math.abs($modded-$unmodded) <= ($clubSlaves/3))>>
-		<<set $repGain += $clubSlaves*random(5,10), $clubBonuses++>>
+		<<if ($modded > 0) && ($unmodded > 0) && (Math.abs($modded-$unmodded) <= (_DL/3))>>
+		<<set $repGain += _DL*random(5,10), $clubBonuses++>>
 		There are @@.green;both@@ heavily pierced and tattooed slaves and slaves with more natural bodies filling the club.
 		<</if>>
 	<</if>>
@@ -262,8 +253,8 @@
 	<<if ($arcologies[0].FSTransformationFetishist == "unset") && ($arcologies[0].FSBodyPurist == "unset")>>
 	<<if ($clubAdsSpending == 0) || ($clubAdsImplanted == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($implanted > 0) && ($pure > 0) && (Math.abs($implanted-$pure) <= ($clubSlaves/3))>>
-		<<set $repGain += $clubSlaves*random(5,10), $clubBonuses++>>
+		<<if ($implanted > 0) && ($pure > 0) && (Math.abs($implanted-$pure) <= (_DL/3))>>
+		<<set $repGain += _DL*random(5,10), $clubBonuses++>>
 		Citizens in $clubName can easily find @@.yellowgreen;both@@ all-natural girls, and slaves whose beauty has been improved by surgical means.
 		<</if>>
 	<</if>>
@@ -271,8 +262,8 @@
 	<<if ($seeDicks != 0)>>
 	<<if ($clubAdsSpending == 0) || ($clubAdsXX == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($XX > 0) && ($XY > 0) && (Math.abs($XX-$XY) <= ($clubSlaves/3))>>
-		<<set $repGain += $clubSlaves*random(5,10), $clubBonuses++>>
+		<<if ($XX > 0) && ($XY > 0) && (Math.abs($XX-$XY) <= (_DL/3))>>
+		<<set $repGain += _DL*random(5,10), $clubBonuses++>>
 		The club offers a @@.green;mix@@ of sluts that can appeal to varied tastes in genitalia.
 		<</if>>
 	<</if>>
@@ -280,8 +271,8 @@
 	<<if ($arcologies[0].FSMaturityPreferentialist == "unset") && ($arcologies[0].FSYouthPreferentialist == "unset")>>
 	<<if ($clubAdsSpending == 0) || ($clubAdsOld == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($young > 0) && ($old > 0) && (Math.abs($young-$old) <= ($clubSlaves/3))>>
-		<<set $repGain += $clubSlaves*random(5,10), $clubBonuses++>>
+		<<if ($young > 0) && ($old > 0) && (Math.abs($young-$old) <= (_DL/3))>>
+		<<set $repGain += _DL*random(5,10), $clubBonuses++>>
 		There are girls @@.green;both@@ young and mature in $clubName.
 		<</if>>
 	<</if>>
@@ -289,22 +280,26 @@
 	<<if ($arcologies[0].FSRepopulationFocus == "unset") && ($arcologies[0].FSRestart == "unset")>>
 	<<if ($clubAdsSpending == 0) || ($clubAdsPreg == 0)>>
 		<<set _possibleBonuses++>>
-		<<if ($pregYes > 0) && ($pregNo > 0) && (Math.abs($pregYes-$pregNo) <= ($clubSlaves/3))>>
-		<<set $repGain += $clubSlaves*random(5,10), $clubBonuses++>>
+		<<if ($pregYes > 0) && ($pregNo > 0) && (Math.abs($pregYes-$pregNo) <= (_DL/3))>>
+		<<set $repGain += _DL*random(5,10), $clubBonuses++>>
 		There is a @@.green;wide@@ variety of slaves with swollen, round bellies and flat bellies working the club.
 		<</if>>
 	<</if>>
 	<</if>>
 
 	<<if (_possibleBonuses > 0) && ($clubBonuses >= _possibleBonuses)>>
-		<<set $repGain += $clubSlaves*random(10,15)>>
-		There is a ''@@.green;perfect variety@@'' of slaves serving the public from the club.
+		<<set $repGain += _DL*random(10,15)>>
+		There is a ''@@.green;perfect variety@@'' of slaves serving the public from $clubName.
+	<<else>>
+		$clubNameCaps does not offer enough variety to satisfy all visitors.
 	<</if>>
 	<<if $clubDecoration != "standard">>
 		$clubNameCaps's customers enjoy @@.green;having sex in $clubDecoration surroundings.@@
 	<</if>>
 
 <</if>>
-<<if $clubSlaves || $DJ>>
+
+<<if _DL > 0 || $DJ != 0>>
 	<br><br>
 <</if>>
+
diff --git a/src/uncategorized/completeCatalog.tw b/src/uncategorized/completeCatalog.tw
index 2a26369958a9fe6b1ad953dbff2b3796605040c6..a85846324c5b1a3f1f771ab7ed306241e4cdaaf8 100644
--- a/src/uncategorized/completeCatalog.tw
+++ b/src/uncategorized/completeCatalog.tw
@@ -1,15 +1,15 @@
-:: Complete Catalog
+:: Complete Catalog [nobr]
+
+<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Main">>
 
-<<set $nextButton = "Back to Main">>\
-<<set $nextLink = "Main">>\
-<<set $returnTo = "Main">>\
 //This is the complete catalog of slaves that you can acquire from other slaveowners. Most of these slaves are not for sale, so persuading their owners to part with them will be extremely expensive.//
 
-<<nobr>>
+<br><br>
+
 <<for $i = 0; $i < $heroSlaves.length; $i++>>
-<<print "[[$heroSlaves[$i].slaveName|Complete Catalog][$activeSlave = getHeroSlave($heroSlaves[" + $i + "], $baseHeroSlave)]]">> |
+	<<if $i > 0>> | <</if>>
+	<<print "[[$heroSlaves[$i].slaveName|Complete Catalog][$activeSlave = getHeroSlave($heroSlaves[" + $i + "], $baseHeroSlave)]]">>
 <</for>>
-<</nobr>>
 
 <<set $specialSlavesPriceOverride = 1>>
 <<NationalityToAccent $activeSlave>>
@@ -34,14 +34,20 @@
 		<</for>>
 	<</if>>
 <</if>>
-<<include "Long Slave Description">>\
-<<slaveCost $activeSlave>>\
+
+<br><br>
+
+<<include "Long Slave Description">>
+<<slaveCost $activeSlave>>
 <<set $slaveCost = (10*Math.trunc(($slaveCost/10)*2))>>
 <<if $slaveCost < 40000>>
 	<<set $slaveCost += random(20000,60000)>>
 <</if>>
 <<set $specialSlavesPriceOverride = 0>>
 
+<br><br>
+
 The offered price is ¤<<print $slaveCost>>.
 
-[[Buy her slave contract|New Slave Intro][$cash -= $slaveCost, $activeSlave.weekAcquired = $week,$nextButton = "Continue",$nextLink = "AS Dump",$returnTo = "Main",$specialSlave = 1]]
+[[Buy her slave contract|New Slave Intro][$cash -= $slaveCost, $activeSlave.weekAcquired = $week, $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Main", $specialSlave = 1]]
+
diff --git a/src/uncategorized/corporationDevelopments.tw b/src/uncategorized/corporationDevelopments.tw
index 130f60ed599b26db12f9f68d9889b0b878552e6c..bd5868fd8b962cfdd4d1e4e6b37ccbd7d8417188 100644
--- a/src/uncategorized/corporationDevelopments.tw
+++ b/src/uncategorized/corporationDevelopments.tw
@@ -8,7 +8,7 @@
 <<set _Numsurgical = "ALL">>
 <<set _Numdrug = "ALL">>
 <</if>>
-<<if $useTabs>>__The Corporation__<</if>>
+<<if $useTabs == 0>>__The Corporation__<</if>>
 <br>
 
 <<set _roll = random(1,100)>>
diff --git a/src/uncategorized/costsReport.tw b/src/uncategorized/costsReport.tw
index b27179a0a579803fa5e3cf06d7ea3dc1eab0b404..d63f0caad2c3cc2be41b5209c5b59279e85a321d 100644
--- a/src/uncategorized/costsReport.tw
+++ b/src/uncategorized/costsReport.tw
@@ -1,10 +1,8 @@
-:: Costs Report
+:: Costs Report [nobr]
+
+<<set $nextButton = "Back to Main", $nextLink = "Main">>
 
-<<set $nextButton = "Back to Main">>\
-<<set $nextLink = "Main">>\
-\
 //Your weekly costs are as follows.//
-<<nobr>>
 
 <<if $girls == 3>>
 	Since you are accustomed to luxury, your __personal living expenses__ are ¤<<print ($girls*(250+($economy*500)))>>.
@@ -367,4 +365,3 @@
 	<br>Using your prior experience, you managed to lower your home's upkeep by <<if $personalAttention == "upkeep">><<if $PC.preg >= 20>>20%<<else>>25%<</if>><<else>>10%<</if>>.
 <</if>>
 
-<</nobr>>
diff --git a/src/uncategorized/dairyReport.tw b/src/uncategorized/dairyReport.tw
index 103dba49d0c5ceb4c4a097d4a4f98bcecd4a2bef..cd34ffb8ecfda5fb856ddd83abf3e7f2db51e1f9 100644
--- a/src/uncategorized/dairyReport.tw
+++ b/src/uncategorized/dairyReport.tw
@@ -1,32 +1,25 @@
 :: Dairy Report [nobr]
 
-<<set $bioreactorPerfectedID = 0, $legendaryBallsID = 0, $legendaryCowID = 0, $milkmaidDevotionBonus = 1, $milkmaidHealthBonus = 0, $milkmaidTrustBonus = 1, $milkmaidDevotionThreshold = 45, $milkmaidTrustThreshold = 35, _anusesStretched = 0, _birthers = 0, _births = 0, _cumWeek = 0, _femCumWeek = 0, _FLsFetish = 0, _milkWeek = 0, _balltacular = 0, _boobtacular = 0, _careerForgotten = 0, _chemMinor = 0, _chemSevere = 0, _desterilized = 0, _hatefilled = 0, _horrified = 0, _intelligenceLost = 0, _mindbroken = 0, _profits = 0, _skillsLost = 0, _stupidified = 0, _vaginasStretched = 0, _DL = $DairyiIDs.length, $dairySlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $DairyiIDs.length, $dairySlaves = _DL, _SL = $slaves.length, $bioreactorPerfectedID = 0, $legendaryBallsID = 0, $legendaryCowID = 0, $milkmaidDevotionBonus = 1, $milkmaidHealthBonus = 0, $milkmaidTrustBonus = 1, $milkmaidDevotionThreshold = 45, $milkmaidTrustThreshold = 35, _anusesStretched = 0, _birthers = 0, _births = 0, _cumWeek = 0, _femCumWeek = 0, _FLsFetish = 0, _milkWeek = 0, _balltacular = 0, _boobtacular = 0, _careerForgotten = 0, _chemMinor = 0, _chemSevere = 0, _desterilized = 0, _hatefilled = 0, _horrified = 0, $intelligenceLost = 0, _mindbroken = 0, _profits = 0, _skillsLost = 0, _stupidified = 0, _vaginasStretched = 0>>
+
+<<set _MMWorkout = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $DairyiIDs[_dI].Index, _ID = $DairyiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $DairyiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if _ID == $slaves[_i].ID>>
-				/% Correct the Index %/
-				<<set $DairyiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $DairyiIDs[_dI].Index, _ID = $DairyiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $DairyiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "work in the dairy">>
-		<<set $DairyiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "work in the dairy">>
+		<<set $DairyiIDs.deleteAt(_dI), _dI--, _DL--, $dairySlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
 <<SlaveSort $DairyiIDs>>
 
 <<if ($Milkmaid != 0)>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if $slaves[_FLs].ID == $Milkmaid.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Milkmaid.ID; })>>
+
 	<<if $slaves[_FLs].health < 90>>
 		<<set $slaves[_FLs].curatives = 2>>
 	<<else>>
@@ -65,12 +58,12 @@
 		<<set $milkmaidDevotionBonus += 2, $milkmaidTrustBonus += 2>>
 		She tries her best to be your perfect farmwife.
 	<</if>>
-	<<if ($dairySlaves > 0) && ($milkmaidImpregnates == 1) && (canPenetrate($Milkmaid)) && $Milkmaid.pubertyXY == 1>>
+	<<if (_DL > 0) && ($milkmaidImpregnates == 1) && (canPenetrate($Milkmaid)) && $Milkmaid.pubertyXY == 1>>
 		<<set _milkmaidImpregnated = 0>>
 		<<for _dI = 0; _dI < _DL; _dI++>>
-			<<set _i = $DairyiIDs[_dI].Index>>
-			<<if (canImpreg($slaves[_i], $Milkmaid))>>
-				<<set $slaves[_i].preg = 1, $slaves[_i].pregSource = $Milkmaid.ID, _milkmaidImpregnated++, $slaves[_i].vaginalCount += 10, $vaginalTotal += 10>>
+			<<set $i = $DairyiIDs[_dI].Index>>
+			<<if (canImpreg($slaves[$i], $Milkmaid))>>
+				<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = $Milkmaid.ID, _milkmaidImpregnated++, $slaves[$i].vaginalCount += 10, $vaginalTotal += 10>>
 			<</if>>
 		<</for>>
 		<<if _milkmaidImpregnated > 0>>
@@ -94,45 +87,45 @@
 	<</if>>
 	<<if $dairyRestraintsSetting != 2>> /* how much effort the MM must take to force a slave into a stall */
 		<<for _dI = 0; _dI < _DL; _dI++>>
-			<<set _i = $DairyiIDs[_dI].Index>>
-			<<if $slaves[_i].devotion < 20>>
+			<<set $i = $DairyiIDs[_dI].Index>>
+			<<if $slaves[$i].devotion < 20>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if $slaves[_i].trust < 20>>
+			<<if $slaves[$i].trust < 20>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if $slaves[_i].muscles >= 30>>
+			<<if $slaves[$i].muscles >= 30>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if $slaves[_i].weight >= 70>>
+			<<if $slaves[$i].weight >= 70>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if $slaves[_i].boobs >= 6000>>
+			<<if $slaves[$i].boobs >= 6000>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if $slaves[_i].balls >= 30>>
+			<<if $slaves[$i].balls >= 30>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if bigBellyPreg($slaves[_i])>>
+			<<if bigBellyPreg($slaves[$i])>>
 				<<set _MMWorkout++>>
 			<</if>>
-			<<if !canWalk($slaves[_i])>> /* big bonus if they can't move themselves and are fat as cows */
-				<<if $slaves[_i].weight >= 70>>
+			<<if !canWalk($slaves[$i])>> /* big bonus if they can't move themselves and are fat as cows */
+				<<if $slaves[$i].weight >= 70>>
 					<<set _MMWorkout += 2>>
 				<</if>>
-				<<if $slaves[_i].boobs >= 6000>>
+				<<if $slaves[$i].boobs >= 6000>>
 					<<set _MMWorkout += 2>>
 				<</if>>
-				<<if $slaves[_i].balls >= 30>>
+				<<if $slaves[$i].balls >= 30>>
 					<<set _MMWorkout += 2>>
 				<</if>>
-				<<if bigBellyPreg($slaves[_i])>>
+				<<if bigBellyPreg($slaves[$i])>>
 					<<set _MMWorkout += 2>>
 				<</if>>
 			<</if>>
 		<</for>>
 	<</if>>
-	<<if _MMWorkout > (random(1,100)+$Milkmaid.muscles) && $Milkmaid.muscles < 60>>>
+	<<if (_MMWorkout > random(1,10)) && $Milkmaid.muscles < 60>>>
 		Constantly having to wrestle unruly or aiding heavy cows into their stalls forces her to @@.lime;build muscle.@@
 		<<set $slaves[_FL].muscles++>>
 	<</if>>
@@ -157,8 +150,8 @@
 	<</if>>
 	<<if ($dairyStimulatorsSetting < 2) && ($Milkmaid.dick > 4) && (canPenetrate($Milkmaid))>>
 		<<for _dI = 0; _dI < _DL; _dI++>>
-			<<set _i = $DairyiIDs[_dI].Index>>
-			<<if ($slaves[_i].balls > 0)>>
+			<<set $i = $DairyiIDs[_dI].Index>>
+			<<if ($slaves[$i].balls > 0)>>
 				She uses her turgid cock to give prostate stimulation to slaves that need help ejaculating.
 				<<break>>
 			<</if>>
@@ -166,64 +159,64 @@
 	<</if>>
 	<<set $milkmaidDevotionThreshold += (5*$milkmaidDevotionBonus), $milkmaidTrustThreshold += (5*$milkmaidTrustBonus)>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $DairyiIDs[_dI].Index>>
-		<<if $Milkmaid.rivalryTarget == $slaves[_i].ID>>
-			She either neglects or harasses her <<if $Milkmaid.rivalry == 1>>growing rival<<elseif $Milkmaid.rivalry == 2>>rival<<elseif $Milkmaid.rivalry == 3>>bitter rival<</if>>, $slaves[_i].slaveName, making sure she is unhappy and uncomfortable.
-			<<set $slaves[_i].devotion -= 3, $slaves[_i].trust -= 3>>
+		<<set $i = $DairyiIDs[_dI].Index>>
+		<<if $Milkmaid.rivalryTarget == $slaves[$i].ID>>
+			She either neglects or harasses her <<if $Milkmaid.rivalry == 1>>growing rival<<elseif $Milkmaid.rivalry == 2>>rival<<elseif $Milkmaid.rivalry == 3>>bitter rival<</if>>, $slaves[$i].slaveName, making sure she is unhappy and uncomfortable.
+			<<set $slaves[$i].devotion -= 3, $slaves[$i].trust -= 3>>
 			<<if random(1,100) > 65>>
-				<<set $Milkmaid.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
+				<<set $Milkmaid.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Milkmaid.relationshipTarget == $slaves[_i].ID>>
-			She dotes over her <<if $Milkmaid.relationship == 1>>friend<<elseif $Milkmaid.relationship == 2>>best friend<<elseif $Milkmaid.relationship == 3>>friend with benefits<<elseif $Milkmaid.relationship == 4>>lover<<elseif $Milkmaid.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, making sure she is happy and comfortable.
-			<<set $slaves[_i].devotion++, $slaves[_i].trust++>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Milkmaid.ID || $slaves[_i].father == $Milkmaid.ID>>
-				She pays special attention to her daughter, $slaves[_i].slaveName, making sure she is well kept and happy.
-				<<set $slaves[_i].trust++>>
-			<<elseif $slaves[_i].ID == $Milkmaid.mother>>
-				She pays special attention to her mother, $slaves[_i].slaveName, making sure she is well kept and happy.
-				<<set $slaves[_i].trust++>>
-			<<elseif $slaves[_i].ID == $Milkmaid.father>>
-				She pays special attention to her father, $slaves[_i].slaveName, making sure she is well kept and happy.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Milkmaid) == 1>>
-				She pays special attention to her twin sister, $slaves[_i].slaveName, making sure she is well kept and happy.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Milkmaid) == 2>>
-				She pays special attention to her sister, $slaves[_i].slaveName, making sure she is well kept and happy.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Milkmaid) == 3>>
-				She pays special attention to her half-sister, $slaves[_i].slaveName, making sure she is well kept and happy.
-				<<set $slaves[_i].trust++>>
+		<<elseif $Milkmaid.relationshipTarget == $slaves[$i].ID>>
+			She dotes over her <<if $Milkmaid.relationship == 1>>friend<<elseif $Milkmaid.relationship == 2>>best friend<<elseif $Milkmaid.relationship == 3>>friend with benefits<<elseif $Milkmaid.relationship == 4>>lover<<elseif $Milkmaid.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, making sure she is happy and comfortable.
+			<<set $slaves[$i].devotion++, $slaves[$i].trust++>>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Milkmaid.ID || $slaves[$i].father == $Milkmaid.ID>>
+				She pays special attention to her daughter, $slaves[$i].slaveName, making sure she is well kept and happy.
+				<<set $slaves[$i].trust++>>
+			<<elseif $slaves[$i].ID == $Milkmaid.mother>>
+				She pays special attention to her mother, $slaves[$i].slaveName, making sure she is well kept and happy.
+				<<set $slaves[$i].trust++>>
+			<<elseif $slaves[$i].ID == $Milkmaid.father>>
+				She pays special attention to her father, $slaves[$i].slaveName, making sure she is well kept and happy.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Milkmaid) == 1>>
+				She pays special attention to her twin sister, $slaves[$i].slaveName, making sure she is well kept and happy.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Milkmaid) == 2>>
+				She pays special attention to her sister, $slaves[$i].slaveName, making sure she is well kept and happy.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Milkmaid) == 3>>
+				She pays special attention to her half-sister, $slaves[$i].slaveName, making sure she is well kept and happy.
+				<<set $slaves[$i].trust++>>
 			<</if>>
-		<<elseif $Milkmaid.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She pays special attention to her $slaves[_i].relation, $slaves[_i].slaveName, making sure she is well kept and happy.
-			<<set $slaves[_i].trust++>>
+		<<elseif $Milkmaid.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She pays special attention to her $slaves[$i].relation, $slaves[$i].slaveName, making sure she is well kept and happy.
+			<<set $slaves[$i].trust++>>
 		<</if>>
-		<<if $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a dairy cow.">>
-			She spends extra time with $slaves[_i].slaveName, the well-known cow. $Milkmaid.slaveName is fascinated by her massive $slaves[_i].boobs cc breasts and spends extra time massaging and kneading them to maximize production.
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+		<<if $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a dairy cow.">>
+			She spends extra time with $slaves[$i].slaveName, the well-known cow. $Milkmaid.slaveName is fascinated by her massive $slaves[$i].boobs cc breasts and spends extra time massaging and kneading them to maximize production.
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<</if>>
-		<<if $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a cockmilker.">>
-			She spends extra time with $slaves[_i].slaveName, the massive ejaculating cow.  She can't help but massage the cow's dick and testes to stimulate them further and coax more from them.
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+		<<if $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a cockmilker.">>
+			She spends extra time with $slaves[$i].slaveName, the massive ejaculating cow.  She can't help but massage the cow's dick and testes to stimulate them further and coax more from them.
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<</if>>
-		<<if $slaves[_i].prestigeDesc == "She is remembered for winning best in show as a breeder." && $slaves[_i].preg > 10>>
-			She spends extra time with $slaves[_i].slaveName, the well-known breeder. $Milkmaid.slaveName is fascinated by her growing pregnancy and popular womb. She makes sure her belly and it's occupants are nice and comfortable.
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+		<<if $slaves[$i].prestigeDesc == "She is remembered for winning best in show as a breeder." && $slaves[$i].preg > 10>>
+			She spends extra time with $slaves[$i].slaveName, the well-known breeder. $Milkmaid.slaveName is fascinated by her growing pregnancy and popular womb. She makes sure her belly and it's occupants are nice and comfortable.
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<</if>>
 	<</for>>
 <</if>>
 
 <<set _Tadd = ($bioreactorsXY + $bioreactorsXX + $bioreactorsHerm + $bioreactorsBarren)>>
-<<if ($dairySlaves + _Tadd > 0)>>
+<<if (_DL + _Tadd > 0)>>
 	<<if ($Milkmaid != 0)>><br><br><</if>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($dairySlaves != 1)>>''There are $dairySlaves cows in $dairyName.''<<else>>''There is one cow in $dairyName.''<</if>>
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL != 1)>>''There are _DL cows in $dairyName.''<<else>>''There is one cow in $dairyName.''<</if>>
 	<<if ($dairyRestraintsSetting > 1)>>
 		The facility functions as an industrial slave products factory.
 	<</if>>
 	<<if (_Tadd > 0)>>
-		_Tadd milking machines have permanent biological components, making a total of <<print _Tadd + $dairySlaves>> milk-producing bodies.
+		_Tadd milking machines have permanent biological components, making a total of <<print _Tadd + _DL>> milk-producing bodies.
 	<</if>>
 <</if>>
 
@@ -261,29 +254,29 @@
 	<<set $Milkmaid = $slaves[_FLs]>>
 <</if>>
 
-<<set $oldCash = $cash>>
+<<set _oldCash = $cash>>
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $DairyiIDs[_dI].Index, $i = _i>>
+	<<set $i = $DairyiIDs[_dI].Index>>
 	/* Special attention section */
-	<<if ($legendaryCowID == 0) && ($slaves[_i].lactation > 0) && (($slaves[_i].boobs-$slaves[_i].boobsImplant) > 6000) && ($slaves[_i].devotion > 50) && ($slaves[_i].prestige == 0)>>
-		<<set $legendaryCowID = $slaves[_i].ID>>
+	<<if ($legendaryCowID == 0) && ($slaves[$i].lactation > 0) && (($slaves[$i].boobs-$slaves[$i].boobsImplant) > 6000) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
+		<<set $legendaryCowID = $slaves[$i].ID>>
 	<</if>>
-	<<if ($legendaryBallsID == 0) && ($slaves[_i].balls > 5) && ($slaves[_i].devotion > 50) && ($slaves[_i].prestige == 0)>>
-		<<set $legendaryBallsID = $slaves[_i].ID>>
+	<<if ($legendaryBallsID == 0) && ($slaves[$i].balls > 5) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
+		<<set $legendaryBallsID = $slaves[$i].ID>>
 	<</if>>
 
 	/* Perform facility based rule changes */
-	<<if ($dairySlimMaintain == 0) && ($slaves[_i].weight <= 30)>>
-		<<set $slaves[_i].diet = "fattening">>
-	<<elseif ($slaves[_i].diet == "fattening") || ($dairyRestraintsSetting > 1)>>
-		<<set $slaves[_i].diet = "healthy">>
+	<<if ($dairySlimMaintain == 0) && ($slaves[$i].weight <= 30)>>
+		<<set $slaves[$i].diet = "fattening">>
+	<<elseif ($slaves[$i].diet == "fattening") || ($dairyRestraintsSetting > 1)>>
+		<<set $slaves[$i].diet = "healthy">>
 	<</if>>
 	<<if $dairyRestraintsSetting > 1>>
-		<<set $slaves[_i].collar = "none", $slaves[_i].choosesOwnClothes = 0, $slaves[_i].clothes = "no clothing", $slaves[_i].buttplug = "none", $slaves[_i].vaginalAccessory = "none", $slaves[_i].dickAccessory = "none">>
+		<<set $slaves[$i].collar = "none", $slaves[$i].choosesOwnClothes = 0, $slaves[$i].clothes = "no clothing", $slaves[$i].buttplug = "none", $slaves[$i].vaginalAccessory = "none", $slaves[$i].dickAccessory = "none">>
 	<</if>>
 	<<if $dairyPregSetting > 0>>
-		<<set $reservedChildren -= $slaves[_i].reservedChildren>>
-		<<set $slaves[_i].reservedChildren to 0>>
+		<<set $reservedChildren -= $slaves[$i].reservedChildren>>
+		<<set $slaves[$i].reservedChildren = 0>>
 	<</if>>
 	
 	/* General End of Week effects */
@@ -325,82 +318,85 @@
 	<<set _milkWeek += $milk, _cumWeek += $cum>>
 
 	/* Facility Specific End of Week effects */
-	<<if ($slaves[_i].devotion <= 20) && ($slaves[_i].trust > -20)>>
-		<<set $slaves[_i].devotion -= 5, $slaves[_i].trust -= 5>>
-	<</if>>
-	<<if ($slaves[_i].health < -80)>>
-		<<set $slaves[_i].health += 20>>
-	<<elseif ($slaves[_i].health < -40)>>
-		<<set $slaves[_i].health += 10>>
-	<<elseif ($slaves[_i].health < 0)>>
-		<<set $slaves[_i].health += 7>>
-	<<elseif ($slaves[_i].health < 90)>>
-		<<set $slaves[_i].health += 3>>
-	<</if>>
-	<<if ($slaves[_i].inflation > 0)>>
-		<<set $slaves[_i].inflation = 0, $slaves[_i].inflationType = "none", $slaves[_i].inflationMethod = 0, $slaves[_i].milkSource = 0>>
-	<</if>>
-	<<if ($slaves[_i].lactation > 0) && (($dairySlimMaintain == 0) || ($slaves[_i].boobs > 700))>>
-		<<if ($slaves[_i].boobs < 2000)>>
-			<<set $slaves[_i].boobs += 100>>
-		<<elseif ($slaves[_i].boobs < 5000)>>
-			<<set $slaves[_i].boobs += 50>>
-		<<elseif ($slaves[_i].boobs < 10000)>>
-			<<set $slaves[_i].boobs += 25>>
+	<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust > -20)>>
+		<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
+	<</if>>
+	<<if ($slaves[$i].health < -80)>>
+		<<set $slaves[$i].health += 20>>
+	<<elseif ($slaves[$i].health < -40)>>
+		<<set $slaves[$i].health += 10>>
+	<<elseif ($slaves[$i].health < 0)>>
+		<<set $slaves[$i].health += 7>>
+	<<elseif ($slaves[$i].health < 90)>>
+		<<set $slaves[$i].health += 3>>
+	<</if>>
+	<<if ($slaves[$i].inflation > 0)>>
+		<<set $slaves[$i].inflation = 0, $slaves[$i].inflationType = "none", $slaves[$i].inflationMethod = 0, $slaves[$i].milkSource = 0>>
+	<</if>>
+	<<if ($slaves[$i].lactation > 0) && (($dairySlimMaintain == 0) || ($slaves[$i].boobs > 700))>>
+		<<if ($slaves[$i].boobs < 2000)>>
+			<<set $slaves[$i].boobs += 100>>
+		<<elseif ($slaves[$i].boobs < 5000)>>
+			<<set $slaves[$i].boobs += 50>>
+		<<elseif ($slaves[$i].boobs < 10000)>>
+			<<set $slaves[$i].boobs += 25>>
 		<</if>>
 	<</if>>
 	<<if ($dairyFeedersUpgrade == 1) && ($dairyFeedersSetting > 0)>>
 		<<if ($dairySlimMaintain == 0)>>
-			<<if ($slaves[_i].balls == 0)>>
-				<<set $slaves[_i].hormones = 2>>
+			<<if ($slaves[$i].balls == 0)>>
+				<<set $slaves[$i].hormones = 2>>
 			<</if>>
-			<<if ($slaves[_i].lactation < 2)>>
-				<<set $slaves[_i].lactation = 2, $slaves[_i].health -= 10, $cash -= $surgeryCost>>
+			<<if ($slaves[$i].lactation < 2)>>
+				<<set $slaves[$i].lactation = 2, $slaves[$i].health -= 10, $cash -= $surgeryCost>>
 			<</if>>
 		<</if>>
-		<<if ($slaves[_i].health < 75)>>
-			<<set $slaves[_i].health += 25>>
+		<<if $slaves[$i].prostate == 1>>
+			<<set $slaves[$i].prostate = 2, $slaves[$i].health -= 10, $cash -= $surgeryCost>>
+		<</if>>
+		<<if ($slaves[$i].health < 75)>>
+			<<set $slaves[$i].health += 25>>
 		<<else>>
 			<<if ($dairySlimMaintain == 0)>>
-				<<if ($slaves[_i].boobs < 25000)>>
+				<<if ($slaves[$i].boobs < 25000)>>
 					<<if $arcologies[0].FSAssetExpansionistResearch == 1>>
-						<<if ($slaves[_i].boobs < 2000)>>
-							<<set $slaves[_i].boobs += 500>>
-						<<elseif ($slaves[_i].boobs < 5000)>>
-							<<set $slaves[_i].boobs += 250>>
+						<<if ($slaves[$i].boobs < 2000)>>
+							<<set $slaves[$i].boobs += 500>>
+						<<elseif ($slaves[$i].boobs < 5000)>>
+							<<set $slaves[$i].boobs += 250>>
 						<<else>>
-							<<set $slaves[_i].boobs += 100>>
+							<<set $slaves[$i].boobs += 100>>
 						<</if>>
 					<<else>>
-						<<set $slaves[_i].boobs += 25*Math.trunc(($injectionUpgrade*2)+$dairyFeedersSetting+$dairyRestraintsSetting+((50-$slaves[_i].physicalAge)/4))>>
+						<<set $slaves[$i].boobs += 25*Math.trunc(($injectionUpgrade*2)+$dairyFeedersSetting+$dairyRestraintsSetting+((50-$slaves[$i].physicalAge)/4))>>
 					<</if>>
-					<<if ($slaves[_i].boobs > 14900) && ($slaves[_i].boobs < 15100)>>
+					<<if ($slaves[$i].boobs > 14900) && ($slaves[$i].boobs < 15100)>>
 						<<set _boobtacular++>>
 					<</if>>
 				<<else>>
-					<<set $slaves[_i].boobs = 25000>>
+					<<set $slaves[$i].boobs = 25000>>
 				<</if>>
 			<</if>>
-			<<if ($slaves[_i].balls > 0)>>
+			<<if ($slaves[$i].balls > 0)>>
 				<<if $arcologies[0].FSAssetExpansionistResearch == 1>>
-					<<if ($slaves[_i].balls < 125)>>
-						<<set $slaves[_i].balls++>>
+					<<if ($slaves[$i].balls < 125)>>
+						<<set $slaves[$i].balls++>>
 					<</if>>
-					<<if ($slaves[_i].balls == 125)>>
+					<<if ($slaves[$i].balls == 125)>>
 						<<set _balltacular++>>
 					<</if>>
-				<<elseif ($slaves[_i].balls < 6)>>
-					<<if (random(1,100) > (40+(10*$slaves[_i].dick)-(10*$dairyRestraintsSetting)-($injectionUpgrade*10)))>>
-						<<set $slaves[_i].balls++>>
+				<<elseif ($slaves[$i].balls < 6)>>
+					<<if (random(1,100) > (40+(10*$slaves[$i].dick)-(10*$dairyRestraintsSetting)-($injectionUpgrade*10)))>>
+						<<set $slaves[$i].balls++>>
 					<</if>>
-					<<if ($slaves[_i].balls == 6)>>
+					<<if ($slaves[$i].balls == 6)>>
 						<<set _balltacular++>>
 					<</if>>
 				<</if>>
-				<<if $slaves[_i].dick > 0>>
-					<<if $slaves[_i].dick < 10>>
-						<<if (random(1,100) > (40+(10*$slaves[_i].dick)-(10*$dairyRestraintsSetting)-($injectionUpgrade*10)))>>
-							<<set $slaves[_i].dick++>>
+				<<if $slaves[$i].dick > 0>>
+					<<if $slaves[$i].dick < 10>>
+						<<if (random(1,100) > (40+(10*$slaves[$i].dick)-(10*$dairyRestraintsSetting)-($injectionUpgrade*10)))>>
+							<<set $slaves[$i].dick++>>
 						<</if>>
 					<</if>>
 				<</if>>
@@ -408,61 +404,61 @@
 		<</if>>
 	<</if>> /* closes ($dairyFeedersUpgrade == 1) && ($dairyFeedersSetting > 0) */
 	<<if ($dairyStimulatorsUpgrade == 1)>>
-		<<if ($dairyStimulatorsSetting > 1) && ($slaves[_i].anus < 4)>>
-			<<set $slaves[_i].anus++>>
-			<<if ($slaves[_i].anus == 4)>>
+		<<if ($dairyStimulatorsSetting > 1) && ($slaves[$i].anus < 4)>>
+			<<set $slaves[$i].anus++>>
+			<<if ($slaves[$i].anus == 4)>>
 				<<set _anusesStretched++>>
 			<</if>>
-		<<elseif ($slaves[_i].anus < 3)>>
-			<<set $slaves[_i].anus++>>
+		<<elseif ($slaves[$i].anus < 3)>>
+			<<set $slaves[$i].anus++>>
 		<</if>>
-		<<if ($slaves[_i].health < 60)>>
-			<<set $slaves[_i].health += 20>>
+		<<if ($slaves[$i].health < 60)>>
+			<<set $slaves[$i].health += 20>>
 		<<elseif $dairySlimMaintain == 0>>
-			<<if ($slaves[_i].boobs < 25000)>>
+			<<if ($slaves[$i].boobs < 25000)>>
 				<<if $arcologies[0].FSAssetExpansionistResearch == 1>>
-					<<if ($slaves[_i].boobs < 2000)>>
-						<<set $slaves[_i].boobs += 500>>
-					<<elseif ($slaves[_i].boobs < 5000)>>
-						<<set $slaves[_i].boobs += 250>>
+					<<if ($slaves[$i].boobs < 2000)>>
+						<<set $slaves[$i].boobs += 500>>
+					<<elseif ($slaves[$i].boobs < 5000)>>
+						<<set $slaves[$i].boobs += 250>>
 					<<else>>
-						<<set $slaves[_i].boobs += 100>>
+						<<set $slaves[$i].boobs += 100>>
 					<</if>>
 				<<else>>
-					<<set $slaves[_i].boobs += 25*Math.trunc(($injectionUpgrade*2)+$dairyStimulatorsSetting+$dairyRestraintsSetting+((50-$slaves[_i].physicalAge)/4))>>
+					<<set $slaves[$i].boobs += 25*Math.trunc(($injectionUpgrade*2)+$dairyStimulatorsSetting+$dairyRestraintsSetting+((50-$slaves[$i].physicalAge)/4))>>
 				<</if>>
-				<<if ($slaves[_i].boobs > 14900) && ($slaves[_i].boobs < 15100)>>
+				<<if ($slaves[$i].boobs > 14900) && ($slaves[$i].boobs < 15100)>>
 					<<set _boobtacular++>>
 				<</if>>
 			<<else>>
-				<<set $slaves[_i].boobs = 25000>>
+				<<set $slaves[$i].boobs = 25000>>
 			<</if>>
 		<</if>>
 	<</if>>
 	<<if ($dairyRestraintsSetting > 1)>>
-		<<set $slaves[_i].lactationAdaptation += 1>>
-		<<if ($slaves[_i].fetish == "mindbroken")>>
-			<<if ($slaves[_i].boobs > 24800) && (($slaves[_i].balls > 5) || ($slaves[_i].balls == 0))>>
-				<<set $bioreactorPerfectedID = $slaves[_i].ID>>
+		<<set $slaves[$i].lactationAdaptation += 1>>
+		<<if ($slaves[$i].fetish == "mindbroken")>>
+			<<if ($slaves[$i].boobs > 24800) && (($slaves[$i].balls > 5) || ($slaves[$i].balls == 0))>>
+				<<set $bioreactorPerfectedID = $slaves[$i].ID>>
 			<</if>>
 		<<else>>
-			<<if ($slaves[_i].sexualFlaw != "self hating")>>
-			<<if ($slaves[_i].sexualFlaw != "cum addict") || ($dairyFeedersSetting == 0)>>
-			<<if ($slaves[_i].sexualFlaw != "anal addict") || ($dairyStimulatorsSetting == 0)>>
-			<<if ($slaves[_i].sexualFlaw != "breeder") || ($slaves[_i].preg < 0) || ($dairyPregSetting == 0)>>
+			<<if ($slaves[$i].sexualFlaw != "self hating")>>
+			<<if ($slaves[$i].sexualFlaw != "cum addict") || ($dairyFeedersSetting == 0)>>
+			<<if ($slaves[$i].sexualFlaw != "anal addict") || ($dairyStimulatorsSetting == 0)>>
+			<<if ($slaves[$i].sexualFlaw != "breeder") || ($slaves[$i].preg < 0) || ($dairyPregSetting == 0)>>
 				<<if $dairyStimulatorsSetting > 1>>
-					<<if ($slaves[_i].sexualFlaw != "hates anal") && ($slaves[_i].sexualQuirk != "painal queen")>>
-						<<set $slaves[_i].sexualFlaw = "hates anal">>
+					<<if ($slaves[$i].sexualFlaw != "hates anal") && ($slaves[$i].sexualQuirk != "painal queen")>>
+						<<set $slaves[$i].sexualFlaw = "hates anal">>
 					<</if>>
 				<</if>>
 				<<if $dairyPregSetting > 1>>
-					<<if ($slaves[_i].sexualFlaw != "hates penetration") && ($slaves[_i].sexualQuirk != "strugglefuck queen")>>
-						<<set $slaves[_i].sexualFlaw = "hates penetration">>
+					<<if ($slaves[$i].sexualFlaw != "hates penetration") && ($slaves[$i].sexualQuirk != "strugglefuck queen")>>
+						<<set $slaves[$i].sexualFlaw = "hates penetration">>
 					<</if>>
 				<</if>>
 				<<if $dairyFeedersSetting > 1>>
-					<<if ($slaves[_i].sexualFlaw != "hates oral") && ($slaves[_i].sexualQuirk != "gagfuck queen")>>
-						<<set $slaves[_i].sexualFlaw = "hates oral">>
+					<<if ($slaves[$i].sexualFlaw != "hates oral") && ($slaves[$i].sexualQuirk != "gagfuck queen")>>
+						<<set $slaves[$i].sexualFlaw = "hates oral">>
 					<</if>>
 				<</if>>
 			<</if>>
@@ -470,124 +466,124 @@
 			<</if>>
 			<</if>>
 		<</if>>
-		<<if $slaves[_i].chem > 250>>
+		<<if $slaves[$i].chem > 250>>
 			<<set _chemSevere++>>
-		<<elseif $slaves[_i].chem > 100>>
+		<<elseif $slaves[$i].chem > 100>>
 			<<set _chemMinor++>>
 		<</if>>
 	<</if>>
 	<<if ($dairyStimulatorsSetting + $dairyFeedersSetting + $dairyPregSetting) > 5>>
-		<<if $slaves[_i].devotion <= 95 && $slaves[_i].sexualFlaw != "self hating">>
-			<<if ($slaves[_i].sexualFlaw != "breeder") || ($slaves[_i].preg < 0)>>
-				<<if ($slaves[_i].devotion > -75)>>
-					<<set $slaves[_i].devotion -= 10>>
-					<<if ($slaves[_i].devotion < -65)>>
+		<<if $slaves[$i].devotion <= 95 && $slaves[$i].sexualFlaw != "self hating">>
+			<<if ($slaves[$i].sexualFlaw != "breeder") || ($slaves[$i].preg < 0)>>
+				<<if ($slaves[$i].devotion > -75)>>
+					<<set $slaves[$i].devotion -= 10>>
+					<<if ($slaves[$i].devotion < -65)>>
 						<<set _hatefilled++>>
 					<</if>>
-				<<elseif ($slaves[_i].trust > -75)>>
-					<<set $slaves[_i].trust -= 10>>
-					<<if ($slaves[_i].trust < -65)>>
+				<<elseif ($slaves[$i].trust > -75)>>
+					<<set $slaves[$i].trust -= 10>>
+					<<if ($slaves[$i].trust < -65)>>
 						<<set _horrified++>>
 					<</if>>
-				<<elseif ($slaves[_i].vaginalSkill > 0)>>
-					<<set $slaves[_i].vaginalSkill -= 10, _skillsLost++>>
-				<<elseif ($slaves[_i].oralSkill > 0)>>
-					<<set $slaves[_i].oralSkill -= 10, _skillsLost++>>
-				<<elseif ($slaves[_i].analSkill > 0)>>
-					<<set $slaves[_i].analSkill -= 10, _skillsLost++>>
-				<<elseif ($slaves[_i].career != "a bioreactor")>>
-					<<set $slaves[_i].career = "a bioreactor", _careerForgotten++>>
-				<<elseif ($slaves[_i].intelligence > -1)>>
-					<<set $slaves[_i].intelligence--, _intelligenceLost++>>
-				<<elseif ($slaves[_i].devotion >= -20)>>
-					<<set $slaves[_i].devotion -= 10>>
-				<<elseif ($slaves[_i].trust > -20)>>
-					<<set $slaves[_i].trust -= 10>>
-				<<elseif ($slaves[_i].whoreSkill > 0)>>
-					<<set $slaves[_i].whoreSkill -= 10, _skillsLost++>>
-				<<elseif ($slaves[_i].entertainSkill > 0)>>
-					<<set $slaves[_i].entertainSkill -= 10, _skillsLost++>>
-				<<elseif ($slaves[_i].intelligence > -2)>>
-					<<set $slaves[_i].intelligence--, _stupidified++>>
-				<<elseif ($slaves[_i].fetish != "mindbroken")>>
-					<<set $slaves[_i].fetish = "mindbroken", _mindbroken++>>
+				<<elseif ($slaves[$i].vaginalSkill > 0)>>
+					<<set $slaves[$i].vaginalSkill -= 10, _skillsLost++>>
+				<<elseif ($slaves[$i].oralSkill > 0)>>
+					<<set $slaves[$i].oralSkill -= 10, _skillsLost++>>
+				<<elseif ($slaves[$i].analSkill > 0)>>
+					<<set $slaves[$i].analSkill -= 10, _skillsLost++>>
+				<<elseif ($slaves[$i].career != "a bioreactor")>>
+					<<set $slaves[$i].career = "a bioreactor", _careerForgotten++>>
+				<<elseif ($slaves[$i].intelligence > -1)>>
+					<<set $slaves[$i].intelligence--, _intelligenceLost++>>
+				<<elseif ($slaves[$i].devotion >= -20)>>
+					<<set $slaves[$i].devotion -= 10>>
+				<<elseif ($slaves[$i].trust > -20)>>
+					<<set $slaves[$i].trust -= 10>>
+				<<elseif ($slaves[$i].whoreSkill > 0)>>
+					<<set $slaves[$i].whoreSkill -= 10, _skillsLost++>>
+				<<elseif ($slaves[$i].entertainSkill > 0)>>
+					<<set $slaves[$i].entertainSkill -= 10, _skillsLost++>>
+				<<elseif ($slaves[$i].intelligence > -2)>>
+					<<set $slaves[$i].intelligence--, _stupidified++>>
+				<<elseif ($slaves[$i].fetish != "mindbroken")>>
+					<<set $slaves[$i].fetish = "mindbroken", _mindbroken++>>
 				<</if>>
 			<</if>>
 		<</if>>
-		<<if ($slaves[_i].milk > 1000) && ($slaves[_i].boobs > 12000) && ($slaves[_i].career != "a bioreactor")>>
-			<<set $slaves[_i].career = "a bioreactor", _careerForgotten++>>
+		<<if ($slaves[$i].milk > 1000) && ($slaves[$i].boobs > 12000) && ($slaves[$i].career != "a bioreactor")>>
+			<<set $slaves[$i].career = "a bioreactor", _careerForgotten++>>
 		<</if>>
 		<<if ($arcologies[0].FSBodyPuristLaw == 0) && ($healthyDrugsUpgrade == 0)>>
-			<<set $slaves[_i].chem += 5>>
+			<<set $slaves[$i].chem += 5>>
 		<<else>>
-			<<set $slaves[_i].chem += 2>>
+			<<set $slaves[$i].chem += 2>>
 		<</if>>
 	<<elseif ($dairyStimulatorsSetting + $dairyFeedersSetting + $dairyPregSetting) > 3>>
-		<<if ($slaves[_i].devotion < 75)>>
-			<<if ($slaves[_i].devotion > -75)>>
-				<<set $slaves[_i].devotion -= 5>>
-				<<if ($slaves[_i].devotion < -70)>>
+		<<if ($slaves[$i].devotion < 75)>>
+			<<if ($slaves[$i].devotion > -75)>>
+				<<set $slaves[$i].devotion -= 5>>
+				<<if ($slaves[$i].devotion < -70)>>
 					<<set _hatefilled++>>
 				<</if>>
-			<<elseif ($slaves[_i].trust > -75)>>
-				<<set $slaves[_i].trust -= 5>>
-				<<if ($slaves[_i].trust < -70)>>
+			<<elseif ($slaves[$i].trust > -75)>>
+				<<set $slaves[$i].trust -= 5>>
+				<<if ($slaves[$i].trust < -70)>>
 					<<set _horrified++>>
 				<</if>>
-			<<elseif ($slaves[_i].vaginalSkill >= 20)>>
-				<<set $slaves[_i].vaginalSkill -= 10, _skillsLost++>>
-			<<elseif ($slaves[_i].oralSkill >= 20)>>
-				<<set $slaves[_i].oralSkill -= 10, _skillsLost++>>
-			<<elseif ($slaves[_i].analSkill >= 20)>>
-				<<set $slaves[_i].analSkill -= 10, _skillsLost++>>
-			<<elseif ($slaves[_i].career != "a bioreactor")>>
-				<<set $slaves[_i].career = "a bioreactor", _careerForgotten++>>
-			<<elseif ($slaves[_i].intelligence > -1)>>
-				<<set $slaves[_i].intelligence--, _intelligenceLost++>>
-			<<elseif ($slaves[_i].devotion >= -20)>>
-				<<set $slaves[_i].devotion -= 8>>
-			<<elseif ($slaves[_i].trust > -20)>>
-				<<set $slaves[_i].trust -= 8>>
-			<<elseif ($slaves[_i].whoreSkill >= 20)>>
-				<<set $slaves[_i].whoreSkill -= 10, _skillsLost++>>
-			<<elseif ($slaves[_i].entertainSkill >= 20)>>
-				<<set $slaves[_i].entertainSkill -= 10, _skillsLost++>>
-			<<elseif ($slaves[_i].intelligence > -2)>>
-				<<set $slaves[_i].intelligence--, _stupidified++>>
-			<<elseif ($slaves[_i].fetish != "mindbroken")>>
-				<<set $slaves[_i].fetish = "mindbroken", _mindbroken++>>
+			<<elseif ($slaves[$i].vaginalSkill >= 20)>>
+				<<set $slaves[$i].vaginalSkill -= 10, _skillsLost++>>
+			<<elseif ($slaves[$i].oralSkill >= 20)>>
+				<<set $slaves[$i].oralSkill -= 10, _skillsLost++>>
+			<<elseif ($slaves[$i].analSkill >= 20)>>
+				<<set $slaves[$i].analSkill -= 10, _skillsLost++>>
+			<<elseif ($slaves[$i].career != "a bioreactor")>>
+				<<set $slaves[$i].career = "a bioreactor", _careerForgotten++>>
+			<<elseif ($slaves[$i].intelligence > -1)>>
+				<<set $slaves[$i].intelligence--, $intelligenceLost++>>
+			<<elseif ($slaves[$i].devotion >= -20)>>
+				<<set $slaves[$i].devotion -= 8>>
+			<<elseif ($slaves[$i].trust > -20)>>
+				<<set $slaves[$i].trust -= 8>>
+			<<elseif ($slaves[$i].whoreSkill >= 20)>>
+				<<set $slaves[$i].whoreSkill -= 10, _skillsLost++>>
+			<<elseif ($slaves[$i].entertainSkill >= 20)>>
+				<<set $slaves[$i].entertainSkill -= 10, _skillsLost++>>
+			<<elseif ($slaves[$i].intelligence > -2)>>
+				<<set $slaves[$i].intelligence--, _stupidified++>>
+			<<elseif ($slaves[$i].fetish != "mindbroken")>>
+				<<set $slaves[$i].fetish = "mindbroken", _mindbroken++>>
 			<</if>>
-		<<elseif ($slaves[_i].milk > 1000) && ($slaves[_i].boobs > 12000) && ($slaves[_i].career != "a bioreactor")>>
-			<<set $slaves[_i].career = "a bioreactor", _careerForgotten++>>
+		<<elseif ($slaves[$i].milk > 1000) && ($slaves[$i].boobs > 12000) && ($slaves[$i].career != "a bioreactor")>>
+			<<set $slaves[$i].career = "a bioreactor", _careerForgotten++>>
 		<</if>>
 		<<if ($arcologies[0].FSBodyPuristLaw == 0) && ($healthyDrugsUpgrade == 0)>>
-			<<set $slaves[_i].chem += 2>>
+			<<set $slaves[$i].chem += 2>>
 		<<else>>
-			<<set $slaves[_i].chem++>>
+			<<set $slaves[$i].chem++>>
 		<</if>>
 	<</if>> /* closes ($dairyStimulatorsSetting + $dairyFeedersSetting + $dairyPregSetting) > 5 */
 	<<if ($dairyPregUpgrade == 1) && ($dairyPregSetting > 0)>>
-		<<if ($slaves[_i].ovaries == 1) && ($slaves[_i].vagina > -1)>>
-			<<set _femCumWeek += Math.trunc((70-$slaves[_i].physicalAge)/(30-($slaves[_i].vaginaLube*10)))>>
-			<<if ($slaves[_i].preg == -2)>>
-				<<set $slaves[_i].preg = 0, _desterilized++>>
+		<<if ($slaves[$i].ovaries == 1) && ($slaves[$i].vagina > -1)>>
+			<<set _femCumWeek += Math.trunc((70-$slaves[$i].physicalAge)/(30-($slaves[$i].vaginaLube*10)))>>
+			<<if ($slaves[$i].preg == -2)>>
+				<<set $slaves[$i].preg = 0, _desterilized++>>
 			<</if>>
-			<<if isFertile($slaves[_i])>>
-				<<if $slaves[_i].eggType == "human">>
-					<<set $slaves[_i].preg = 1>>
+			<<if isFertile($slaves[$i])>>
+				<<if $slaves[$i].eggType == "human">>
+					<<set $slaves[$i].preg = 1>>
 					<<if ($dairyPregSetting > 2)>>
-						<<set $slaves[_i].pregType = random(10,29)>>
+						<<set $slaves[$i].pregType = random(10,29)>>
 					<<elseif ($dairyPregSetting > 1)>>
-						<<set $slaves[_i].pregType = random(3,5)>>
+						<<set $slaves[$i].pregType = random(3,5)>>
 					<<else>>
-						<<set $slaves[_i].pregType = either(1, 1, 1, 1, 2, 2, 2, 3, 3, 4)>>
+						<<set $slaves[$i].pregType = either(1, 1, 1, 1, 2, 2, 2, 3, 3, 4)>>
 					<</if>>
-					<<set $slaves[_i].pregSource = -2>>
+					<<set $slaves[$i].pregSource = -2>>
 				<</if>> /*closes eggType */
-				<<if ($slaves[_i].vagina == 0)>>
-					<<set $slaves[_i].vagina++>>
+				<<if ($slaves[$i].vagina == 0)>>
+					<<set $slaves[$i].vagina++>>
 				<</if>>
-			<<elseif ($slaves[_i].preg > 0)>>
+			<<elseif ($slaves[$i].preg > 0)>>
 				<<if ($dairyPregSetting > 2)>>
 					<<set $cash += 100>>
 				<<elseif ($dairyPregSetting > 1)>>
@@ -595,13 +591,13 @@
 				<<else>>
 					<<set $cash += 25>>
 				<</if>>
-				<<if ($dairyPregSetting > 1) && ($slaves[_i].vagina < 4)>>
-					<<set $slaves[_i].vagina++>>
-					<<if ($slaves[_i].vagina == 4)>>
+				<<if ($dairyPregSetting > 1) && ($slaves[$i].vagina < 4)>>
+					<<set $slaves[$i].vagina++>>
+					<<if ($slaves[$i].vagina == 4)>>
 						<<set _vaginasStretched++>>
 					<</if>>
-				<<elseif ($slaves[_i].vagina < 3)>>
-					<<set $slaves[_i].vagina++>>
+				<<elseif ($slaves[$i].vagina < 3)>>
+					<<set $slaves[$i].vagina++>>
 				<</if>>
 			<</if>>
 		<</if>>
@@ -652,7 +648,7 @@
 	<<set $cash -= Math.trunc(((300*($inflatedSlavesCum+8))+random(25,100)))>>
 <</if>>
 
-<<set _profits = $cash-$oldCash>>
+<<set _profits = $cash-_oldCash>>
 <br><br>&nbsp;&nbsp;&nbsp;&nbsp;
 <<if _chemSevere > 1>>
 	_chemSevere cows' productivity is being reduced by the long term effects of industrial use.
@@ -699,9 +695,9 @@
 <<elseif _anusesStretched > 0>>
 	One cow's anus was loosened by machine sodomy, and is now permanently gaped.
 <</if>>
-<<if _intelligenceLost > 1>>
-	_intelligenceLost cows suffered some loss of intelligence due to accumulated mental stress from life attached to a milking machine.
-<<elseif _intelligenceLost > 0>>
+<<if $intelligenceLost > 1>>
+	$intelligenceLost cows suffered some loss of intelligence due to accumulated mental stress from life attached to a milking machine.
+<<elseif $intelligenceLost > 0>>
 	One cow  suffered some loss of intelligence due to accumulated mental stress from life attached to a milking machine.
 <</if>>
 <<if _stupidified > 1>>
@@ -791,26 +787,26 @@ These products sell for @@.yellowgreen;¤_profits@@.
 
 <<if ($createBioreactors == 1) && ($bioreactorPerfectedID != 0)>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $DairyiIDs[_dI].Index>>
-		<<if ($slaves[_i].ID == $bioreactorPerfectedID)>>
-			<br><br>&nbsp;&nbsp;&nbsp;&nbsp;$slaves[_i].slaveName's breasts<<if $slaves[_i].balls > 0>>, balls<</if>><<if $slaves[_i].ovaries == 1>>, belly<</if>>, body, and mind have been completely adapted to synthesize useful products. She has been reclassified as part of the machine she's now permanently attached to. This combination is projected to produce approximately
-			<<if $slaves[_i].balls > 0>><<print 1000*Math.trunc((3*52*(45-$slaves[_i].physicalAge))/1000)>> liters of cum,<</if>>
-			<<if $slaves[_i].ovaries == 1>><<print 100*Math.trunc((52*(45-$slaves[_i].physicalAge))/100)>> liters of vaginal secretions, <<if $dairyPregSetting == 3>><<print 13*(45-$slaves[_i].physicalAge)>><<else>><<print 5*(45-$slaves[_i].physicalAge)>><</if>> slaves,<</if>>
-			and <<print 1000*Math.trunc((300*52*(45-$slaves[_i].physicalAge))/1000)>> liters of milk over a <<print 45-$slaves[_i].physicalAge>> year period before its biological components must be replaced.
-			<<if ($slaves[_i].ovaries == 1)>>
-				<<if ($slaves[_i].balls == 0)>>
+		<<set $i = $DairyiIDs[_dI].Index>>
+		<<if ($slaves[$i].ID == $bioreactorPerfectedID)>>
+			<br><br>&nbsp;&nbsp;&nbsp;&nbsp;$slaves[$i].slaveName's breasts<<if $slaves[$i].balls > 0>>, balls<</if>><<if $slaves[$i].ovaries == 1>>, belly<</if>>, body, and mind have been completely adapted to synthesize useful products. She has been reclassified as part of the machine she's now permanently attached to. This combination is projected to produce approximately
+			<<if $slaves[$i].balls > 0>><<print 1000*Math.trunc((3*52*(45-$slaves[$i].physicalAge))/1000)>> liters of cum,<</if>>
+			<<if $slaves[$i].ovaries == 1>><<print 100*Math.trunc((52*(45-$slaves[$i].physicalAge))/100)>> liters of vaginal secretions, <<if $dairyPregSetting == 3>><<print 13*(45-$slaves[$i].physicalAge)>><<else>><<print 5*(45-$slaves[$i].physicalAge)>><</if>> slaves,<</if>>
+			and <<print 1000*Math.trunc((300*52*(45-$slaves[$i].physicalAge))/1000)>> liters of milk over a <<print 45-$slaves[$i].physicalAge>> year period before its biological components must be replaced.
+			<<if ($slaves[$i].ovaries == 1)>>
+				<<if ($slaves[$i].balls == 0)>>
 					<<set $bioreactorsXX++>>
 				<<else>>
 					<<set $bioreactorsHerm++>>
 				<</if>>
 			<<else>>
-				<<if ($slaves[_i].balls == 0)>>
+				<<if ($slaves[$i].balls == 0)>>
 					<<set $bioreactorsBarren++>>
 				<<else>>
 					<<set $bioreactorsXY++>>
 				<</if>>
 			<</if>>
-			<<set $activeSlave = $slaves[_i]>>
+			<<set $activeSlave = $slaves[$i]>>
 			<<include "Remove activeSlave">>
 			<<break>>
 		<</if>>
@@ -820,6 +816,6 @@ These products sell for @@.yellowgreen;¤_profits@@.
 <<if $dairyDecoration != "standard">>
 	$dairyNameCaps's @@.green;$dairyDecoration style is well known.@@
 <</if>>
-<<if ($dairySlaves + _Tadd) || $Milkmaid>>
+<<if (_DL + _Tadd) > 0 || $Milkmaid != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/dispensary.tw b/src/uncategorized/dispensary.tw
index fa6f9191970b0baf43ed5a09a6a4e06e88d0bc24..c199efa3ffb9f334b91acc0dc94d50745e2dc7e5 100644
--- a/src/uncategorized/dispensary.tw
+++ b/src/uncategorized/dispensary.tw
@@ -1,8 +1,6 @@
 :: Dispensary [nobr]
 
-<<set $nextButton = "Back">>
-<<set $nextLink = "Manage Penthouse">>
-<<set $showEncyclopedia = 1>><<set $encyclopedia = "The Pharmaceutical Fab.">>
+<<set $nextButton = "Back", $nextLink = "Manage Penthouse", $showEncyclopedia = 1, $encyclopedia = "The Pharmaceutical Fab.">>
 
 <<if $dispensaryUpgrade == 0>>
 //The pharmaceutical fabricator is running smoothly. It can cheaply replicate complex medications, and has already cut the cost of drugs for your slaves by a fourth. It can easily produce advanced drugs should you obtain the data necessary to create them.//
@@ -283,7 +281,7 @@ The hormone replacement therapies
 	[[Fund research pregnancy speed control methods|Dispensary][$cash -= 200000*$upgradeMultiplierMedicine, $pregSpeedControl = 1, $clinicSpeedGestation = 0]]
 	//Costs ¤<<print 200000*$upgradeMultiplierMedicine>>//
 	<br>&nbsp;&nbsp;&nbsp;&nbsp;// Fund underground research labs to develop methods for controlling pregnancy progress. //
-<<elseif ($rep > 10000*$upgradeMultiplierMedicine) && $pregSpeedControl != 1>>
+<<elseif ($rep <= 10000*$upgradeMultiplierMedicine) && $pregSpeedControl != 1>>
 	//You lack the reputation required to contact underground research labs to develop methods for controlling pregnancy progress.//
 <<elseif ($pregSpeedControl == 1)>>
 	The fabricator is producing extremely complex gestation control agents. They can be used to control gestation speed, and even suppress labor for some time. //
@@ -294,7 +292,7 @@ The hormone replacement therapies
 	[[Fund research pregnancy speed control methods|Dispensary][$cash -= 200000*$upgradeMultiplierMedicine, $pregSpeedControl = 1, $clinicSpeedGestation = 0]]
 	//Costs ¤<<print 200000*$upgradeMultiplierMedicine>>//
 	<br>&nbsp;&nbsp;&nbsp;&nbsp;// Fund underground research labs to develop methods for controlling pregnancy progress. //
-<<elseif ($rep > 10000*$upgradeMultiplierMedicine) && $pregSpeedControl != 1>>
+<<elseif ($rep <= 10000*$upgradeMultiplierMedicine) && $pregSpeedControl != 1>>
 	//You lack the reputation required to contact underground research labs to develop methods for controlling pregnancy progress.//
 <<elseif ($pregSpeedControl == 1)>>
 	The fabricator is producing extremely complex gestation control agents. They can be used to control gestation speed, and even suppress labor for some time. //
@@ -314,11 +312,9 @@ The hormone replacement therapies
 <<elseif ($bellyImplants > 0)>>
 	The fabricator is capable of crafting fillable abdominal implants.
 <</if>>
-<br><br>
-<</if>>
 
+<br><br>
 
-<<if $ImplantProductionUpgrade == 1>>
 <<if ($bellyImplants == 1) && ($cervixImplants != 1) && ($rep <= 6000*$upgradeMultiplierMedicine)>> /* show only after belly implants already researched */
 	//You lack the reputation to access schematics far experimental cervix filter micropumps for abdominal implants//
 <</if>>
@@ -330,6 +326,21 @@ The hormone replacement therapies
 <<elseif ($cervixImplants > 0)>>
 	The fabricator is capable of crafting cervix filter micropumps for fillable abdominal implants.
 <</if>>
+
+<br><br>
+
+<<if ($prostateImplants != 1) && ($rep <= 3000*$upgradeMultiplierMedicine)>>
+	//You lack the reputation to access plans for stronger prostate implants//
+<</if>>
+
+<<if ($prostateImplants != 1) && ($rep > 3000*$upgradeMultiplierMedicine)>>
+    [[Purchase plans for powerful prostate implants|Dispensary][$cash -= 30000*$upgradeMultiplierMedicine, $prostateImplants = 1]]
+	//Costs ¤<<print 30000*$upgradeMultiplierMedicine>>// 
+    <br>&nbsp;&nbsp;&nbsp;&nbsp;//Will allow the fabrication of a stronger variant of the slow release prostate implants. Beware of leaking and dehydration.//
+<<elseif ($prostateImplants > 0)>>
+	The fabricator is capable of producing more powerful prostate implants.
+<</if>>
+
 <</if>>
 
 <br><br>
diff --git a/src/uncategorized/economics.tw b/src/uncategorized/economics.tw
index 8ad768d1aa24b306b72f500b23669b926eeaf60d..b79f2b6bf557bf159f9ef7262847aefd4409e7f7 100644
--- a/src/uncategorized/economics.tw
+++ b/src/uncategorized/economics.tw
@@ -15,7 +15,7 @@
 
 <br><br>
 
-<<if $useTabs>>
+<<if $useTabs == 0>>
 <<include "Neighbors Development">>
 
 <br><br>
diff --git a/src/uncategorized/fMarry.tw b/src/uncategorized/fMarry.tw
index 4704c9b929af5fa0d994c5a9a55b144b90e95f7a..de17768b051d3aa527f4d3f0c708fd84e6d9bcf1 100644
--- a/src/uncategorized/fMarry.tw
+++ b/src/uncategorized/fMarry.tw
@@ -1,14 +1,9 @@
-:: FMarry
+:: FMarry [nobr]
 
-<<nobr>>
-
-<<set $nextButton = "Back">>
-<<set $nextLink = "Slave Interact">>
+<<set $nextButton = "Back", $nextLink = "Slave Interact", $weddingSlaveID = $activeSlave.ID>>
 <<Enunciate $activeSlave>>
 
-<<set $weddingSlaveID = $activeSlave.ID>>
-
-<<if $activeSlave.relationship > 0>>			
+<<if $activeSlave.relationship > 0>>
 	<<for _m = 0; _m < $slaves.length; _m++>>
 		<<if $activeSlave.relationshipTarget == $slaves[_m].ID>>
 			<<break>>
@@ -319,12 +314,10 @@ You tell $activeSlave.slaveName that you're going to marry her. (A proposal, of
 	<</if>>
 <</if>>
 
-<</nobr>>
-\
+<br>
 <span id="result">
-<<link "Just redesignate her as your slave wife">>
+<br><<link "Just redesignate her as your slave wife">>
 	<<replace "#result">>
-	<<nobr>>
 	You order $assistantName to simply redesignate $activeSlave.slaveName as your slave wife.
 	<<if $assistant == 0>>
 		"Slave redesignated," it responds immediately. The thing is done.
@@ -368,7 +361,7 @@ You tell $activeSlave.slaveName that you're going to marry her. (A proposal, of
 		<</if>>
 		"Done," she says.
 	<</if>>
-	<<if $activeSlave.relationship > 0>>			
+	<<if $activeSlave.relationship > 0>>
 		<<set $activeSlave.relationshipTarget = 0>>
 		<<set $slaves[_m].relationship = 0, $slaves[_m].relationshipTarget = 0>>
 	<</if>>
@@ -419,12 +412,10 @@ You tell $activeSlave.slaveName that you're going to marry her. (A proposal, of
 		<</if>>
 	<</if>>
 	<<set $activeSlave.relationship = -3>>
-	<</nobr>>
 	<</replace>>
 <</link>>
-<<link "Have your assistant marry her to you">>
+<br><<link "Have your assistant marry her to you">>
 	<<replace "#result">>
-	<<nobr>>
 	You order $activeSlave.slaveName to go change into bridal lingerie.
 	<<if _reationType == 0>>
 		<<if canWalk($activeSlave)>>
@@ -580,7 +571,7 @@ You tell $activeSlave.slaveName that you're going to marry her. (A proposal, of
 			slave wife!"
 		<</if>>
 	<</if>>
-	<<if $activeSlave.relationship > 0>>			
+	<<if $activeSlave.relationship > 0>>
 		<<set $activeSlave.relationshipTarget = 0>>
 		<<set $slaves[_m].relationship = 0, $slaves[_m].relationshipTarget = 0>>
 	<</if>>
@@ -631,43 +622,36 @@ You tell $activeSlave.slaveName that you're going to marry her. (A proposal, of
 		<</if>>
 	<</if>>
 	<<set $activeSlave.relationship = -3>>
-	<</nobr>>
 	<</replace>>
 <</link>>
-<<if $cash > 10000>>\
-Invite prominent citizens to a wedding (This will cost ¤10000):
-&nbsp;&nbsp;&nbsp;&nbsp;<<link "Straightforward ceremony">>
+<<if $cash > 10000>>
+<br>Invite prominent citizens to a wedding (This will cost ¤10000):
+<br>&nbsp;&nbsp;&nbsp;&nbsp;<<link "Straightforward ceremony">>
 	<<replace "#result">>
-	<<nobr>>
 	You order $assistantName to invite deserving citizens to a straightforward ceremony for a slave being married to a slaveowner, and to make the arrangement. The wedding will take place during the upcoming week.
 	<<set $weddingPlanned = 1>>
 	<<set $cash -= 10000>>
-	<</nobr>>
 	<</replace>>
 <</link>>
-<<if ($activeSlave.vagina != 0) && ($activeSlave.anus != 0)>>\
-&nbsp;&nbsp;&nbsp;&nbsp;<<link "Orgiastic ceremony">>
+<<if ($activeSlave.vagina != 0) && ($activeSlave.anus != 0)>>
+<br>&nbsp;&nbsp;&nbsp;&nbsp;<<link "Orgiastic ceremony">>
 	<<replace "#result">>
-	<<nobr>>
 	You order $assistantName to invite deserving citizens to an orgiastic ceremony for a slave being married to a slaveowner, and to make the arrangements. The wedding orgy will take place during the upcoming week.
 	<<set $weddingPlanned = 2>>
 	<<set $cash -= 10000>>
-	<</nobr>>
 	<</replace>>
 <</link>> //This will involve the slave having sex with a very large number of citizens//
-<</if>>\
-<<if isFertile($activeSlave) && ($PC.dick == 1)>>\
-&nbsp;&nbsp;&nbsp;&nbsp;<<link "Impregnation ceremony">>
+<</if>>
+<<if isFertile($activeSlave) && ($PC.dick == 1)>>
+<br>&nbsp;&nbsp;&nbsp;&nbsp;<<link "Impregnation ceremony">>
 	<<replace "#result">>
-	<<nobr>>
 	You order $assistantName to invite deserving citizens to a ceremony for a fertile slave being married to a slaveowner, and to make the arrangements. The wedding will take place during the upcoming week.
 	<<set $weddingPlanned = 3>>
 	<<set $cash -= 10000>>
-	<</nobr>>
 	<</replace>>
 <</link>> //This will involve you impregnating the slave//
-<</if>>\
-<<else>>\
+<</if>>
+<<else>>
 //You cannot afford an elaborate ceremony//
-<</if>>\
+<</if>>
 </span>
diff --git a/src/uncategorized/futureSocities.tw b/src/uncategorized/futureSocities.tw
index cf4cbbef04bd24f19c80d32fb84b1748d01ed1d6..528780e1301553124e3be15fedb77255f98fd64c 100644
--- a/src/uncategorized/futureSocities.tw
+++ b/src/uncategorized/futureSocities.tw
@@ -2,7 +2,6 @@
 
 
 <<set $nextButton = "Back", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "The Future of Society">>
-<<set $FSSpending = Math.clamp(Math.trunc($FSSpending/1000)*1000, 0, 10000)>>
 
 <<if ndef $arcologies[0].FSSubjugationist>>
 	<<set $arcologies[0].FSSubjugationist = "unset">>
@@ -427,18 +426,12 @@ You have unlocked
 <</if>>
 possible societal customizations.
 
+<<if $FSSpending > 10000>><<set _warn = 1>><</if>>
+<<set $FSSpending = Number($FSSpending) || 0>>
+<<set $FSSpending = Math.clamp(Math.trunc($FSSpending/1000)*1000, 0, 10000)>>
 You are spending ¤$FSSpending each week to support your societal goals.
-
-<<if $FSSpending > 900>>
-	[[Decrease|Future Society][$FSSpending -= 1000]] |
-<<else>>
-	Decrease |
-<</if>>
-<<if $FSSpending < 10000>>
-	<<link "Increase">><<set $FSSpending += 1000>><<goto "Future Society">><</link>>
-<<else>>
-	Increase
-<</if>>
+<<textbox $FSSpending $FSSpending "Future Societies">>
+<<if _warn>>//Spending more than ¤10000 weekly will be counterproductive//<</if>>
 
 <br>
 <span id="mass">
diff --git a/src/uncategorized/hgApplication.tw b/src/uncategorized/hgApplication.tw
index 2aaa57386ac4bbf5c8aef9c9ad985dd607048c4a..c5e002913f348c53d22643310118e0eacd498a0d 100644
--- a/src/uncategorized/hgApplication.tw
+++ b/src/uncategorized/hgApplication.tw
@@ -352,10 +352,6 @@ In spare moments she teaches $activeSlave.slaveName how to prostitute herself. $
 <</if>>
 <</if>>
 
-<<for $I = 0; $I < $slaves.length; $I++>>
-	<<if $activeSlave.ID == $slaves[$I].ID>>
-	<<set $slaves[$I] = $activeSlave>>
-	<<set $activeSlave = {}>>
-	<<break>>
-	<</if>>
-<</for>>
+<<set _hgtarget = $slaves.findIndex(function(s) { return s.ID == $activeSlave.ID; })>>
+<<set $slaves[_hgtarget] = $activeSlave>> /* save changes */
+
diff --git a/src/uncategorized/longSlaveDescription.tw b/src/uncategorized/longSlaveDescription.tw
index dce58b2d8f0cc8e65fbc933daa3838215a023065..01a0c5ca1c1e90f3be2fac3917fc311e80aaf4d2 100644
--- a/src/uncategorized/longSlaveDescription.tw
+++ b/src/uncategorized/longSlaveDescription.tw
@@ -16,9 +16,9 @@
 
 <<if $activeSlave.pregSource > 0>>
 	<<set _daddy = "partner">>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<if $activeSlave.pregSource == $slaves[_i].ID>>
-			<<set _daddy = $slaves[_i].slaveName>>
+	<<for _lsd = 0; _lsd < $slaves.length; _lsd++>>
+		<<if $activeSlave.pregSource == $slaves[_lsd].ID>>
+			<<set _daddy = $slaves[_lsd].slaveName>>
 			<<break>>
 		<</if>>
 	<</for>>
@@ -78,11 +78,11 @@ is
 <<elseif $eventDescription == 1>>
 	$pronounCap is currently involved in an event, but is assigned to $activeSlave.assignment.
 	<<if $activeSlave.assignment == "be a subordinate slave">>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $activeSlave.subTarget == $activeSlave.ID>>
-		She has been ordered to serve ''@@.pink;$activeSlave.slaveName@@'' specifically.
-		<<break>>
-	<</if>>
+	<<for _lsd = 0; _lsd < $slaves.length; _lsd++>>
+		<<if $activeSlave.subTarget == $slaves[_lsd].ID>>
+			She has been ordered to serve ''@@.pink;$slaves[_lsd].slaveName@@'' specifically.
+			<<break>>
+		<</if>>
 	<</for>>
 	<</if>>
 <<else>>
@@ -174,19 +174,19 @@ She comes to you for an inspection
 <<elseif $activeSlave.relationship == -2>>
 	She is @@.lightgreen;emotionally bound to you;@@ her feelings for you are comparable to those in a healthy, loving relationship.
 <<elseif $activeSlave.relationship != 0>>
-<<for $i = 0; $i < $slaves.length; $i++>>
-<<if $slaves[$i].ID == $activeSlave.relationshipTarget>>
+<<for _lsd = 0; _lsd < $slaves.length; _lsd++>>
+<<if $slaves[_lsd].ID == $activeSlave.relationshipTarget>>
 	She is
 	<<if $activeSlave.relationship <= 1>>
-	@@.lightgreen;friends with $slaves[$i].slaveName;@@ the rules <<if $activeSlave.relationshipRules != "restrictive">>encourage<<else>> discourage<</if>> their relationship.
+	@@.lightgreen;friends with $slaves[_lsd].slaveName;@@ the rules <<if $activeSlave.relationshipRules != "restrictive">>encourage<<else>> discourage<</if>> their relationship.
 	<<elseif $activeSlave.relationship <= 2>>
-	@@.lightgreen;best friends with $slaves[$i].slaveName;@@ the rules <<if $activeSlave.relationshipRules != "restrictive">>encourage<<else>> discourage<</if>> their close relationship.
+	@@.lightgreen;best friends with $slaves[_lsd].slaveName;@@ the rules <<if $activeSlave.relationshipRules != "restrictive">>encourage<<else>> discourage<</if>> their close relationship.
 	<<elseif $activeSlave.relationship <= 3>>
-	@@.lightgreen;$slaves[$i].slaveName's friend with benefits;@@ the rules <<if $activeSlave.relationshipRules == "permissive">>encourage<<else>> discourage<</if>> their sexual relationship.
+	@@.lightgreen;$slaves[_lsd].slaveName's friend with benefits;@@ the rules <<if $activeSlave.relationshipRules == "permissive">>encourage<<else>> discourage<</if>> their sexual relationship.
 	<<elseif $activeSlave.relationship <= 4>>
-	@@.lightgreen;$slaves[$i].slaveName's lover;@@ the rules <<if $activeSlave.relationshipRules == "permissive">>encourage<<else>> discourage<</if>> their passionate relationship.
-	<<elseif $slaves[$i].relationship > 4>>
-	@@.lightgreen;$slaves[$i].slaveName's slave wife;@@ the rules <<if $activeSlave.relationshipRules == "permissive">>encourage<<else>> discourage<</if>> marital bliss.
+	@@.lightgreen;$slaves[_lsd].slaveName's lover;@@ the rules <<if $activeSlave.relationshipRules == "permissive">>encourage<<else>> discourage<</if>> their passionate relationship.
+	<<elseif $slaves[_lsd].relationship > 4>>
+	@@.lightgreen;$slaves[_lsd].slaveName's slave wife;@@ the rules <<if $activeSlave.relationshipRules == "permissive">>encourage<<else>> discourage<</if>> marital bliss.
 	<</if>>
 	<<break>>
 <</if>>
@@ -1305,48 +1305,74 @@ when a dick is pushed inside <<if $activeSlave.vagina >= -1>>either of its lower
 <<Family>>
 
 <<if $activeSlave.relationship >= 3 && totalRelatives($activeSlave) > 0>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $slaves[$i].ID == $activeSlave.relationshipTarget>>
-			<<if $activeSlave.mother == $slaves[$i].ID>>
-				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive mother, $slaves[$i].slaveName.@@
+	<<for _lsd = 0; _lsd < $slaves.length; _lsd++>>
+		<<if $slaves[_lsd].ID == $activeSlave.relationshipTarget>>
+			<<if $activeSlave.mother == $slaves[_lsd].ID>>
+				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive mother, $slaves[_lsd].slaveName.@@
 				<<break>>
-			<<elseif $activeSlave.father == $slaves[$i].ID>>
-				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive father, $slaves[$i].slaveName.@@
+			<<elseif $activeSlave.father == $slaves[_lsd].ID>>
+				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive father, $slaves[_lsd].slaveName.@@
 				<<break>>
-			<<elseif $slaves[$i].mother == $activeSlave.ID || $slaves[$i].father == $activeSlave.ID>>
-				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive daughter, $slaves[$i].slaveName.@@
+			<<elseif $slaves[_lsd].mother == $activeSlave.ID || $slaves[_lsd].father == $activeSlave.ID>>
+				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive daughter, $slaves[_lsd].slaveName.@@
 				<<break>>
-			<<elseif areSisters($activeSlave, $slaves[$i]) == 1>>
-				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive twin, $slaves[$i].slaveName.@@
+			<<elseif areSisters($activeSlave, $slaves[_lsd]) == 1>>
+				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive twin, $slaves[_lsd].slaveName.@@
 				<<break>>
-			<<elseif areSisters($activeSlave, $slaves[$i]) == 2>>
-				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive sister, $slaves[$i].slaveName.@@
+			<<elseif areSisters($activeSlave, $slaves[_lsd]) == 2>>
+				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive sister, $slaves[_lsd].slaveName.@@
 				<<break>>
-			<<elseif areSisters($activeSlave, $slaves[$i]) == 3>>
-				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive half-sister, $slaves[$i].slaveName.@@
+			<<elseif areSisters($activeSlave, $slaves[_lsd]) == 3>>
+				$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive half-sister, $slaves[_lsd].slaveName.@@
 				<<break>>
 			<</if>>
 		<</if>>
 	<</for>>
 <</if>>
-<<if $activeSlave.relationship <= -2 && ($activeSlave.mother == -1 || $activeSlave.father == -1)>>
-	<<if $activeSlave.mother == -1>>
-		$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive mother, you.@@
-	<<elseif $activeSlave.father == -1>>
-		$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive father, you.@@
+<<if $activeSlave.relationship <= -2>>
+	<<if ($activeSlave.mother == -1 || $activeSlave.father == -1)>>
+		<<if $activeSlave.mother == -1>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive mother, you.@@
+		<<elseif $activeSlave.father == -1>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive father, you.@@
+		<</if>>
+	<<elseif $PC.mother == $activeSlave.ID || $PC.father == $activeSlave.ID>>
+		<<if $PC.title == 1>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive son, you.@@
+		<<elseif $PC.title == 0>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive daughter, you.@@
+		<</if>>
+	<<elseif areSisters($PC, $activeSlave) == 1>>
+		<<if $PC.title == 1>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive twin sister, you.@@
+		<<elseif $PC.title == 0>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive twin brother, you.@@
+		<</if>>
+	<<elseif areSisters($PC, $activeSlave) == 2>>
+		<<if $PC.title == 1>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive brother, you.@@
+		<<elseif $PC.title == 0>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive sister, you.@@
+		<</if>>
+	<<elseif areSisters($PC, $activeSlave) == 3>>
+		<<if $PC.title == 1>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive half-brother, you.@@
+		<<elseif $PC.title == 0>>
+			$pronounCap is in an @@.lightgreen;incestuous relationship with $possessive half-sister, you.@@
+		<</if>>
 	<</if>>
 <</if>>
 
 <<else>>
 
 <<if $activeSlave.relation != 0>>
-  <<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $activeSlave.relationTarget>>
-		<<if ($slaves[$i].ID == $activeSlave.relationshipTarget) && ($activeSlave.relationship >= 3)>>
-			$pronounCap is @@.lightgreen;$slaves[$i].slaveName's $activeSlave.relation, making their relationship incestuous.@@
+  <<for _lsd = 0; _lsd < $slaves.length; _lsd++>>
+	<<if $slaves[_lsd].ID == $activeSlave.relationTarget>>
+		<<if ($slaves[_lsd].ID == $activeSlave.relationshipTarget) && ($activeSlave.relationship >= 3)>>
+			$pronounCap is @@.lightgreen;$slaves[_lsd].slaveName's $activeSlave.relation, making their relationship incestuous.@@
 			<<break>>
 		<<else>>
-			$pronounCap is @@.lightgreen;$slaves[$i].slaveName's $activeSlave.relation.@@
+			$pronounCap is @@.lightgreen;$slaves[_lsd].slaveName's $activeSlave.relation.@@
 			<<break>>
 		<</if>>
 	<</if>>
@@ -1356,15 +1382,15 @@ when a dick is pushed inside <<if $activeSlave.vagina >= -1>>either of its lower
 <</if>>
 
 <<if $activeSlave.rivalry != 0>>
-  <<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $activeSlave.rivalryTarget>>
+  <<for _lsd = 0; _lsd < $slaves.length; _lsd++>>
+	<<if $slaves[_lsd].ID == $activeSlave.rivalryTarget>>
 		$pronounCap
 		<<if $activeSlave.rivalry <= 1>>
-			@@.lightsalmon;dislikes@@ $slaves[$i].slaveName.
+			@@.lightsalmon;dislikes@@ $slaves[_lsd].slaveName.
 		<<elseif $activeSlave.rivalry <= 2>>
-			is $slaves[$i].slaveName's @@.lightsalmon;rival.@@
+			is $slaves[_lsd].slaveName's @@.lightsalmon;rival.@@
 		<<else>>
-			@@.lightsalmon;bitterly hates@@ $slaves[$i].slaveName.
+			@@.lightsalmon;bitterly hates@@ $slaves[_lsd].slaveName.
    		<</if>>
 		<<break>>
 	<</if>>
@@ -1737,7 +1763,7 @@ $pronounCap is
 	@@.red;frail;@@ she can barely hold herself up.
 <</if>>
 
-<<if $arcologies[0].FSGenderFundamentalistLawBeauty + $arcologies[0].FSGenderRadicalistLawBeauty + $arcologies[0].FSSlimnessEnthusiastLaw > 0>>
+<<if $arcologies[0].FSGenderFundamentalistLawBeauty + $arcologies[0].FSGenderRadicalistLawBeauty + $arcologies[0].FSSlimnessEnthusiastLaw > 0 && $arcologies[0].FSPhysicalIdealist == "unset">>
 <<if $activeSlave.muscles > 30>>
   $pronounCap is entirely too muscular for the fashionable feminine ideal.
 <</if>>
@@ -1761,7 +1787,7 @@ $pronounCap is
 	<<CorsetPiercingDescription>>
 <</if>>
 
-<<if ($activeSlave.preg is -2) && ($activeSlave.vagina < 0)>>
+<<if ($activeSlave.preg == -2) && ($activeSlave.vagina < 0) && ($activeSlave.mpreg == 0)>>
 <<elseif ($activeSlave.preg <= -2) && ($activeSlave.ovaries == 1 || $activeSlave.mpreg == 1)>>
 	$pronounCap is sterile.
 <<elseif $activeSlave.preg == 0 && $activeSlave.vagina > -1>>
diff --git a/src/uncategorized/main.tw b/src/uncategorized/main.tw
index 3322dd6a2d296310793be70a5eb75856d6012a23..48b090d7e0b45409f199fc886d461608d83a7d9d 100644
--- a/src/uncategorized/main.tw
+++ b/src/uncategorized/main.tw
@@ -14,6 +14,9 @@
 <<if ndef $defaultRules>>
 	<<include "Init Rules">>
 <</if>>
+<<if ndef $prostateImplants>>
+	<<set $prostateImplants = 0>>
+<</if>>
 <<set $currentRule = $defaultRules[0]>>
 
 <<SlaveSort $slaves>>
diff --git a/src/uncategorized/managePenthouse.tw b/src/uncategorized/managePenthouse.tw
index 26a57921f8f1b4ef3b8573b67136cb77cd2ee8a4..8e6ca20b7d48ac40c7fc91d9154ddac4a5f4c652 100644
--- a/src/uncategorized/managePenthouse.tw
+++ b/src/uncategorized/managePenthouse.tw
@@ -1,12 +1,12 @@
 :: Manage Penthouse [nobr]
 
+<<set $nextButton = "Back", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "What the Upgrades Do">>
+
 <<if $cheatMode == 1>>
 <center>
 //[[Cheat Edit Arcology|MOD_Edit Arcology Cheat][$cheater = 1]]//
 </center>
 <</if>>
-<<set $nextButton = "Back", $nextLink = "Main">>
-<<set $showEncyclopedia = 0>>
 
 <<include "Office Description">>
 <<if $PC.career == "mercenary">>
diff --git a/src/uncategorized/markets.tw b/src/uncategorized/markets.tw
index edc343e7cda7b2a1d95ef1a63941723cbba8081d..f8cbdb59eb3502dd12c1aff112305d195d172118 100644
--- a/src/uncategorized/markets.tw
+++ b/src/uncategorized/markets.tw
@@ -18,8 +18,9 @@ This is an area of the concourse occupied by large stores and markets, many of w
 	//Costs ¤<<print Math.trunc(10000*$upgradeMultiplierArcology)>>//
 <</if>>
 
-<<if $corpMarket == 0>>
+<<if $corpMarket == 0 && $corpIncorporated == 1>>
 	<br>
 	[[Create a flagship slave market for your corporation here|Main][$corpCash -= Math.trunc(10000*$upgradeMultiplierArcology), $corpMarket = 1, $sectors[$AS].type = "CorporateMarket"]]
 	//Costs ¤<<print Math.trunc(10000*$upgradeMultiplierArcology)>> of the corporation's money//
-<</if>>
\ No newline at end of file
+<</if>>
+
diff --git a/src/uncategorized/masterSuiteReport.tw b/src/uncategorized/masterSuiteReport.tw
index 22b1ac21ab4f404d2027876406c345766ddac507..d25ce7d7900f7203a7edacbabc6bcd70d8089780 100644
--- a/src/uncategorized/masterSuiteReport.tw
+++ b/src/uncategorized/masterSuiteReport.tw
@@ -1,409 +1,395 @@
 :: Master Suite Report [nobr]
 
-<<set $legendaryAbolitionistID = 0, $masterSuiteAverageEnergy = 0, _masterSuiteAverageCum = 0, _masterSuiteAverageDick = 0, _masterSuiteAverageDom = 0, _masterSuiteAverageMilk = 0, _masterSuiteAveragePreg = 0, _masterSuiteAverageSadism = 0, _masterSuitePregnantSlaves = 0, _masterSuitePregnantSlavesMultiple = 0, _DL = $MastSiIDs.length, $masterSuiteSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $MastSiIDs.length, $masterSuiteSlaves = _DL, _SL = $slaves.length, $legendaryAbolitionistID = 0, $masterSuiteAverageEnergy = 0, _masterSuiteAverageCum = 0, _masterSuiteAverageDick = 0, _masterSuiteAverageDom = 0, _masterSuiteAverageMilk = 0, _masterSuiteAveragePreg = 0, _masterSuiteAverageSadism = 0, _masterSuitePregnantSlaves = 0, _masterSuitePregnantSlavesMultiple = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $MastSiIDs[_dI].Index, _ID = $MastSiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $MastSiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-		<<if _ID == $slaves[_i].ID>>
-			/% Correct the Index %/
-			<<set $MastSiIDs[_dI].Index = _i>>
-			<<break>>
-		<</if>>
-		<</for>>
+	<<set $i = $MastSiIDs[_dI].Index, _ID = $MastSiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $MastSiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "serve in the master suite">>
-		<<set $MastSiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "serve in the master suite">>
+		<<set $MastSiIDs.deleteAt(_dI), _dI--, _DL--, $masterSuiteSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
 <<SlaveSort $MastSiIDs>>
+
 <<if $Concubine != 0>>
-<<for _FLs = 0; _FLs < _SL; _FLs++>>
-<<if $slaves[_FLs].ID == $Concubine.ID>>
-	/% Add the Concubine to the $MastSiIDs list at the front of the array, so that she displays first. %/
-	<<set $MastSiIDs.unshift({ID: $Concubine.ID, Index: _FLs}), _DL++, $masterSuiteSlaves++>>
-	<<break>>
-<</if>>
-<</for>>
-<</if>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Concubine.ID; })>>
 
-<<if $masterSuiteSlaves > 0>>
-<<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $MastSiIDs[_dI].Index, $i = _i>>
-	<<set $masterSuiteAverageEnergy += $slaves[_i].energy>>
-	<<if $masterSuiteUpgradeLuxury == 2>>
-	<<if canAchieveErection($slaves[_i])>>
-		<<set _masterSuiteAverageCum += $slaves[_i].balls, _masterSuiteAverageDick += $slaves[_i].dick>>
-	<</if>>
-	<<set _masterSuiteAverageMilk += $slaves[_i].lactation*($slaves[_i].boobs-$slaves[_i].boobsImplant), _masterSuiteAveragePreg += $slaves[_i].preg>>
-	<<switch $slaves[_i].fetish>>
-	<<case "dom">>
-		<<set _masterSuiteAverageDom += $slaves[_i].fetishStrength>>
-	<<case "submissive">>
-		<<set _masterSuiteAverageDom -= $slaves[_i].fetishStrength>>
-	<<case "sadist">>
-		<<set _masterSuiteAverageSadism += $slaves[_i].fetishStrength>>
-	<<case "masochist">>
-		<<set _masterSuiteAverageSadism -= $slaves[_i].fetishStrength>>
-	<</switch>>
+	<<if _FLs != -1>>
+		/% Add the Concubine to the $MastSiIDs list at the front of the array, so that she displays first %/
+		<<set $MastSiIDs.unshift({ID: $Concubine.ID, Index: _FLs}), _DL++>>
 	<</if>>
-	<<if ($legendaryAbolitionistID == 0) && ($slaves[_i].devotion > 95) && ($slaves[_i].prestige == 0) && (($slaves[_i].origin == "You sentenced her to enslavement as a punishment for attempted theft of a slave.") || ($slaves[_i].origin == "She is an enslaved Daughter of Liberty."))>>
-		<<set $legendaryAbolitionistID = $slaves[_i].ID>>
-	<</if>>
-<</for>>
-<<set $masterSuiteAverageEnergy = $masterSuiteAverageEnergy/$masterSuiteSlaves>>
-<<set _masterSuiteAverageMilk = _masterSuiteAverageMilk/$masterSuiteSlaves>>
-<<set _masterSuiteAverageCum = _masterSuiteAverageCum/$masterSuiteSlaves>>
-<<set _masterSuiteAverageDick = _masterSuiteAverageDick/$masterSuiteSlaves>>
-<<set _masterSuiteAveragePreg = _masterSuiteAveragePreg/$masterSuiteSlaves>>
-<<set _masterSuiteAverageDom = _masterSuiteAverageDom/$masterSuiteSlaves>>
-<<set _masterSuiteAverageSadism = _masterSuiteAverageSadism/$masterSuiteSlaves>>
-
-&nbsp;&nbsp;&nbsp;&nbsp;''There <<if ($masterSuiteSlaves == 1)>>is one slave<<else>>are $masterSuiteSlaves slaves<</if>>
-seeing to your pleasure in the master suite.'' Such sexual opulence @@.green;improves@@ your reputation.
-<<if ($arcologies[0].FSEgyptianRevivalist > 0) && ($masterSuiteSlaves >= 5)>>
-	Society @@.green;approves@@ of your keeping a large number of women. This advances the Egyptian revivalist ideal of multiple concubinage.
-	<<FSChange "EgyptianRevivalist" 2>>
-<</if>>
-<<if (_masterSuitePregnantSlaves >= 1)>>
-	The suite is supporting the pregnancies of the slaves
-	<<if ($masterSuitePregnancyFertilityDrugs == 1 || $masterSuiteHyperPregnancy == 1)>>
-		within, and is providing them with fertility drugs
-		<<if ($masterSuitePregnancyFertilitySupplements == 1)>>
-		and supplements to encourage impregnation.
-		<<else>>
-		to encourage impregnation.
-		<</if>>
-	<<else>>
-	within.
-	<</if>>
-<</if>>
-<<if $masterSuiteSlaves > 1>>
-The level of sexual energy in the suite is
-<<if $masterSuiteUpgradeLuxury == 1>>
-	<<if $masterSuiteAverageEnergy > 90>>
-	intense. When you enter your luxurious retreat, you can set off pent-up orgasms with a touch.
-	<<elseif $masterSuiteAverageEnergy > 60>>
-	high; there is strong competition for your favors whenever you enter your retreat.
-	<<else>>
-	relatively normal; the girls serve your pleasure before their own.
-	<</if>>
-<<elseif $masterSuiteUpgradeLuxury == 2>>
-	<<if $masterSuiteAverageEnergy > 90>>
-	intense. Your girls spend almost all their time in the fuckpit, having sex in a big pile.
-	<<elseif $masterSuiteAverageEnergy > 60>>
-	high; your girls spend much of their time in the fuckpit, having sex with each other.
-	<<else>>
-	relatively normal; the girls lounging in the fuckpit get each other off when they feel like it.
-	<</if>>
-	<<if _masterSuiteAverageCum > 4>>
-	Unless it's right after an automated cleaning, everything in the fuckpit is spattered with cum.
-	<</if>>
-	<<if _masterSuiteAverageMilk > 4000>>
-	There's so much lactation going on that the lowest level of the fuckpit is a pool of milk.
-	<</if>>
-<<else>>
-	relatively normal.
-<</if>>
 <</if>>
 
-<<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $MastSiIDs[_dI].Index, $i = _i>>
-<br><br>
-	/* 000-250-006 */
-	<<if $seeImages == 1 && $imageChoice == 0>>
-	<div class="imageRef tinyImg">
-		<<SlaveArt $slaves[_i] 0 0>>
-	</div>
-	<</if>>
-	/* 000-250-006 */
-<<if ($slaves[_i].assignment != "be your Concubine")>>
-	<<if $verboseDescriptions == 1>>
-	''__@@.pink;$slaves[_i].slaveName@@__''
-	<<if $slaves[$i].choosesOwnAssignment == 2>>
-		<<include "SA chooses own job">>
-	<</if>>
-	<<else>>
-		sees to your pleasure in $masterSuiteName.
-	<</if>>
-	/* Perform facility based rule changes */
-	<<if ($masterSuiteUpgradeLuxury == 1)>>
-	<<set $slaves[_i].livingRules = "luxurious">>
-	<<if ($slaves[_i].devotion <= 95)>>
-		<<set $slaves[_i].devotion += 2>>
-	<</if>>
-	<<if $masterSuiteDecoration != "standard">>
-		<<set $slaves[_i].devotion++>>
-	<</if>>
-	<<if ($slaves[_i].trust < 60)>>
-		<<set $slaves[_i].trust++>>
-	<</if>>
-	<<elseif ($masterSuiteUpgradeLuxury == 2)>>
-	<<set $slaves[_i].livingRules = "luxurious">>
-	<<if ($slaves[_i].energy > 90)>>
-		<<if ($slaves[_i].devotion <= 95)>>
-		<<set $slaves[_i].devotion += 2>>
+<<if _DL > 0>>
+	<<for _dI = 0; _dI < _DL; _dI++>>
+		<<set $i = $MastSiIDs[_dI].Index>>
+		<<set $masterSuiteAverageEnergy += $slaves[$i].energy>>
+		<<if $masterSuiteUpgradeLuxury == 2>>
+		<<if canAchieveErection($slaves[$i])>>
+			<<set _masterSuiteAverageCum += $slaves[$i].balls, _masterSuiteAverageDick += $slaves[$i].dick>>
 		<</if>>
-		<<if ($slaves[_i].trust <= 95)>>
-		<<set $slaves[_i].trust += 2>>
+		<<set _masterSuiteAverageMilk += $slaves[$i].lactation*($slaves[$i].boobs-$slaves[$i].boobsImplant), _masterSuiteAveragePreg += $slaves[$i].preg>>
+		<<switch $slaves[$i].fetish>>
+		<<case "dom">>
+			<<set _masterSuiteAverageDom += $slaves[$i].fetishStrength>>
+		<<case "submissive">>
+			<<set _masterSuiteAverageDom -= $slaves[$i].fetishStrength>>
+		<<case "sadist">>
+			<<set _masterSuiteAverageSadism += $slaves[$i].fetishStrength>>
+		<<case "masochist">>
+			<<set _masterSuiteAverageSadism -= $slaves[$i].fetishStrength>>
+		<</switch>>
 		<</if>>
-	<<else>>
-		<<if ($slaves[_i].devotion <= 60)>>
-		<<set $slaves[_i].devotion++>>
+		<<if ($legendaryAbolitionistID == 0) && ($slaves[$i].devotion > 95) && ($slaves[$i].prestige == 0) && (($slaves[$i].origin == "You sentenced her to enslavement as a punishment for attempted theft of a slave.") || ($slaves[$i].origin == "She is an enslaved Daughter of Liberty."))>>
+			<<set $legendaryAbolitionistID = $slaves[$i].ID>>
 		<</if>>
-		<<if ($slaves[_i].trust < 60)>>
-		<<set $slaves[_i].trust++>>
+	<</for>>
+	<<set $masterSuiteAverageEnergy = $masterSuiteAverageEnergy/_DL>>
+	<<set _masterSuiteAverageMilk = _masterSuiteAverageMilk/_DL>>
+	<<set _masterSuiteAverageCum = _masterSuiteAverageCum/_DL>>
+	<<set _masterSuiteAverageDick = _masterSuiteAverageDick/_DL>>
+	<<set _masterSuiteAveragePreg = _masterSuiteAveragePreg/_DL>>
+	<<set _masterSuiteAverageDom = _masterSuiteAverageDom/_DL>>
+	<<set _masterSuiteAverageSadism = _masterSuiteAverageSadism/_DL>>
+
+	&nbsp;&nbsp;&nbsp;&nbsp;''There <<if (_DL == 1)>>is one slave<<else>>are _DL slaves<</if>>
+	seeing to your pleasure in the master suite.'' Such sexual opulence @@.green;improves@@ your reputation.
+	<<if ($arcologies[0].FSEgyptianRevivalist > 0) && (_DL >= 5)>>
+		Society @@.green;approves@@ of your keeping a large number of women. This advances the Egyptian revivalist ideal of multiple concubinage.
+		<<FSChange "EgyptianRevivalist" 2>>
+	<</if>>
+	<<if (_masterSuitePregnantSlaves >= 1)>>
+		The suite is supporting the pregnancies of the slaves
+		<<if ($masterSuitePregnancyFertilityDrugs == 1 || $masterSuiteHyperPregnancy == 1)>>
+			within, and is providing them with fertility drugs
+			<<if ($masterSuitePregnancyFertilitySupplements == 1)>>
+			and supplements to encourage impregnation.
+			<<else>>
+			to encourage impregnation.
+			<</if>>
+		<<else>>
+		within.
 		<</if>>
 	<</if>>
-	<<else>>
-	<<set $slaves[_i].livingRules = "spare">>
-	<<if ($slaves[_i].devotion <= 20) && ($slaves[_i].trust > -20)>>
-		<<set $slaves[_i].devotion -= 2, $slaves[_i].trust -= 5>>
-	<<elseif ($slaves[_i].devotion <= 60)>>
-		<<set $slaves[_i].devotion += 2>>
-	<<elseif ($slaves[_i].devotion > 60)>>
-		<<set $slaves[_i].devotion -= 2>>
-	<</if>>
-	<<if ($slaves[_i].trust < 60)>>
-		<<set $slaves[_i].trust++>>
-	<</if>>
+	<<if _DL > 1>>
+		The level of sexual energy in the suite is
+		<<if $masterSuiteUpgradeLuxury == 1>>
+			<<if $masterSuiteAverageEnergy > 90>>
+			intense. When you enter your luxurious retreat, you can set off pent-up orgasms with a touch.
+			<<elseif $masterSuiteAverageEnergy > 60>>
+			high; there is strong competition for your favors whenever you enter your retreat.
+			<<else>>
+			relatively normal; the girls serve your pleasure before their own.
+			<</if>>
+		<<elseif $masterSuiteUpgradeLuxury == 2>>
+			<<if $masterSuiteAverageEnergy > 90>>
+			intense. Your girls spend almost all their time in the fuckpit, having sex in a big pile.
+			<<elseif $masterSuiteAverageEnergy > 60>>
+			high; your girls spend much of their time in the fuckpit, having sex with each other.
+			<<else>>
+			relatively normal; the girls lounging in the fuckpit get each other off when they feel like it.
+			<</if>>
+			<<if _masterSuiteAverageCum > 4>>
+			Unless it's right after an automated cleaning, everything in the fuckpit is spattered with cum.
+			<</if>>
+			<<if _masterSuiteAverageMilk > 4000>>
+			There's so much lactation going on that the lowest level of the fuckpit is a pool of milk.
+			<</if>>
+		<<else>>
+			relatively normal.
+		<</if>>
 	<</if>>
 
-<<else>>
-	<<set $Concubine = $slaves[_FLs]>>
-	<<if $verboseDescriptions == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>''Your concubine $Concubine.slaveName is serving you in $masterSuiteName.'' More than any other slave, her sexual brilliance and physical appeal are @@.green;critical@@ to your reputation.
+	<<for _dI = 0; _dI < _DL; _dI++>>
+		<<set $i = $MastSiIDs[_dI].Index>>
+		<br><br>
+		/* 000-250-006 */
+		<<if $seeImages == 1 && $imageChoice == 0>>
+		<div class="imageRef tinyImg">
+			<<SlaveArt $slaves[$i] 0 0>>
+		</div>
+		<</if>>
+		/* 000-250-006 */
+		<<if ($slaves[$i].assignment == "be your Concubine")>>
+			<<set $Concubine = $slaves[_FLs]>>
+			''Your concubine $Concubine.slaveName is serving you in $masterSuiteName.'' More than any other slave, her sexual brilliance and physical appeal are @@.green;critical@@ to your reputation.
 
-	<<if ($Concubine.career == "an arcology owner")>>
-		She was once your rival, and your relationship is widely thought to be @@.green;the perfect modern romance.@@
-		<<set $repGain += 250>>
-	<<elseif ($Concubine.prestige > 0)>>
-		<<if $verboseDescriptions == 1>>Keeping such a prestigious slave as your concubine @@.green;adds to your fame.@@<</if>>
-		<<set $repGain += 25*$Concubine.prestige>>
-		<<if $verboseDescriptions == 1>>
-			<<if $Concubine.prestigeDesc == "She is a famed Free Cities whore, and commands top prices.">>
-				When she has a free moment, she refines her flexibility so that she is prepared for any sexual position you can think of, and many more that she researched just for your pleasure. 
+			<<if ($Concubine.career == "an arcology owner")>>
+				She was once your rival, and your relationship is widely thought to be @@.green;the perfect modern romance.@@
+				<<set $repGain += 250>>
+			<<elseif ($Concubine.prestige > 0)>>
+				<<if $verboseDescriptions == 1>>Keeping such a prestigious slave as your concubine @@.green;adds to your fame.@@<</if>>
+				<<set $repGain += 25*$Concubine.prestige>>
+				<<if $verboseDescriptions == 1>>
+					<<if $Concubine.prestigeDesc == "She is a famed Free Cities whore, and commands top prices.">>
+						When she has a free moment, she refines her flexibility so that she is prepared for any sexual position you can think of, and many more that she researched just for your pleasure. 
+					<</if>>
+					<<if $Concubine.prestigeDesc == "She is a famed Free Cities slut, and can please anyone.">>
+						When she has a free moment, she pretties herself up so that she may be as beautiful as possible to make you look even better.
+					<</if>>
+					<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a cockmilker.">>
+						She does her best to prevent herself from making a mess when you don't want one. When she has free time, she researches new techniques to makes use of her huge loads to entertain you.
+					<</if>>
+					<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a dairy cow.">>
+						She does her best to prevent herself from making a mess when you don't want one. When she has free time, she researches new techniques to makes use of her excessive milk to entertain you.
+					<</if>>
+					<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a breeder." && $Concubine.preg > 10>>
+						When she has a free moment, she refines her flexibility so that she can perform any sexual position possible for her in her motherly state. She takes the time to look up new positions to work around her growing pregnancy. 
+					<</if>>
+					<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a breeder.">>
+						When she has a free moment, she refines her flexibility so that she is prepared for any sexual position you can think of, no matter how heavy she becomes with children. 
+					<</if>>
+				<</if>>
 			<</if>>
-			<<if $Concubine.prestigeDesc == "She is a famed Free Cities slut, and can please anyone.">>
-				When she has a free moment, she pretties herself up so that she may be as beautiful as possible to make you look even better.
+			<<if ($Concubine.oralCount + $Concubine.analCount + $Concubine.vaginalCount + $Concubine.mammaryCount + $Concubine.penetrativeCount > 1000)>>
+				<<if $verboseDescriptions == 1>>Many citizens <<if $Concubine.publicCount > 10>>remember having had her themselves, and <</if>>@@.green;respectfully@@ envy you her exclusive company.<</if>>
+				<<set $repGain += 25>>
 			<</if>>
-			<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a cockmilker.">>
-				She does her best to prevent herself from making a mess when you don't want one. When she has free time, she researches new techniques to makes use of her huge loads to entertain you.
+			<<if $slaves[$i].devotion <= 20>>
+				<<if $masterSuiteUpgradeLuxury > 0>>
+					<<set $slaves[$i].livingRules = "luxurious", $slaves[$i].devotion += 4, $slaves[$i].trust += 4>>
+				<<else>>
+					<<set $slaves[$i].livingRules = "normal", $slaves[$i].devotion += 2, $slaves[$i].trust += 2>>
+				<</if>>
 			<</if>>
-			<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a dairy cow.">>
-				She does her best to prevent herself from making a mess when you don't want one. When she has free time, she researches new techniques to makes use of her excessive milk to entertain you.
+			<<if $masterSuiteDecoration != "standard">>
+				<<set $slaves[$i].devotion++>>
 			<</if>>
-			<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a breeder." && $Concubine.preg > 10>>
-				When she has a free moment, she refines her flexibility so that she can perform any sexual position possible for her in her motherly state. She takes the time to look up new positions to work around her growing pregnancy. 
+		<<else>> /* not Concubine */
+			<<if $verboseDescriptions == 1>>
+				''__@@.pink;$slaves[$i].slaveName@@__''
+				<<if $slaves[$i].choosesOwnAssignment == 2>>
+					<<include "SA chooses own job">>
+				<<else>>
+					sees to your pleasure in $masterSuiteName.
+				<</if>>
 			<</if>>
-			<<if $Concubine.prestigeDesc == "She is remembered for winning best in show as a breeder.">>
-				When she has a free moment, she refines her flexibility so that she is prepared for any sexual position you can think of, no matter how heavy she becomes with children. 
+			/* Perform facility based rule changes */
+			<<if ($masterSuiteUpgradeLuxury == 1)>>
+				<<set $slaves[$i].livingRules = "luxurious">>
+				<<if ($slaves[$i].devotion <= 95)>>
+					<<set $slaves[$i].devotion += 2>>
+				<</if>>
+				<<if $masterSuiteDecoration != "standard">>
+					<<set $slaves[$i].devotion++>>
+				<</if>>
+				<<if ($slaves[$i].trust < 60)>>
+					<<set $slaves[$i].trust++>>
+				<</if>>
+			<<elseif ($masterSuiteUpgradeLuxury == 2)>>
+				<<set $slaves[$i].livingRules = "luxurious">>
+				<<if ($slaves[$i].energy > 90)>>
+					<<if ($slaves[$i].devotion <= 95)>>
+						<<set $slaves[$i].devotion += 2>>
+					<</if>>
+					<<if ($slaves[$i].trust <= 95)>>
+						<<set $slaves[$i].trust += 2>>
+					<</if>>
+				<<else>>
+					<<if ($slaves[$i].devotion <= 60)>>
+						<<set $slaves[$i].devotion++>>
+					<</if>>
+					<<if ($slaves[$i].trust < 60)>>
+						<<set $slaves[$i].trust++>>
+					<</if>>
+				<</if>>
+			<<else>>
+				<<set $slaves[$i].livingRules = "spare">>
+				<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust > -20)>>
+					<<set $slaves[$i].devotion -= 2, $slaves[$i].trust -= 5>>
+				<<elseif ($slaves[$i].devotion <= 60)>>
+					<<set $slaves[$i].devotion += 2>>
+				<<elseif ($slaves[$i].devotion > 60)>>
+					<<set $slaves[$i].devotion -= 2>>
+				<</if>>
+				<<if ($slaves[$i].trust < 60)>>
+					<<set $slaves[$i].trust++>>
+				<</if>>
 			<</if>>
 		<</if>>
-	<</if>>
-	<<if ($Concubine.oralCount + $Concubine.analCount + $Concubine.vaginalCount + $Concubine.mammaryCount + $Concubine.penetrativeCount > 1000)>>
-		<<if $verboseDescriptions == 1>>Many citizens <<if $Concubine.publicCount > 10>>remember having had her themselves, and <</if>>@@.green;respectfully@@ envy you her exclusive company.<</if>>
-		<<set $repGain += 25>>
-	<</if>>
-	<<if $slaves[_i].devotion <= 20>>
-	<<if $masterSuiteUpgradeLuxury > 0>>
-		<<set $slaves[_i].livingRules = "luxurious", $slaves[_i].devotion += 4, $slaves[_i].trust += 4>>
-	<<else>>
-		<<set $slaves[_i].livingRules = "normal", $slaves[_i].devotion += 2, $slaves[_i].trust += 2>>
-	<</if>>
-	<</if>>
-	<<if $masterSuiteDecoration != "standard">>
-		<<set $slaves[_i].devotion++>>
-	<</if>>
-<</if>>
-/% Both %/
-<<if $masterSuiteUpgradeLuxury == 2>>
-	<<if ($slaves[_i].trust > -20) && ($slaves[_i].devotion > -10) && ($slaves[_i].fetishStrength <= 95)>>
-	<<if $masterSuiteAverageEnergy > random(50,90)>>
-	<<if $verboseDescriptions == 1>>
-		<<set _Verb = "She">>
-	<<else>>
-		<<set _Verb = $slaves[_i].slaveName>>
-	<</if>>
-	<<fetishChangeChance $slaves[_i]>>
-	<<if (_masterSuiteAverageMilk > 2000) && ($fetishChangeChance > random(0,50))>>
-		<<if $slaves[_i].fetish == "boobs">>
-			<<if $verboseDescriptions == 1>>Her<<else>>$slaves[_i].slaveName's<</if>> @@.lightcoral;boob fetish is strengthened@@ by the constant availability of milky nipples for her to play with.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			_Verb @@.lightcoral;acquires a boob fetish@@ after spending a lot of time in the fuckpit drinking from her fellow fucktoys' tits.
-			<<set $slaves[_i].fetish = "boobs", $slaves[_i].fetishStrength = 65>>
-		<</if>>
-	<<elseif (_masterSuiteAverageDick > 3) && ($slaves[_i].anus > 0) && ($fetishChangeChance > random(0,50))>>
-		_Verb
-		<<if $slaves[_i].fetish == "buttslut">>
-			@@.lightcoral;sinks farther into anal pleasure,@@ since she spends her time in the fuckpit with at least one of the many available cocks up her butt.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			@@.lightcoral;acquires an anal fetish@@ after helplessly orgasming at the mercy of your many fucktoys eager to shove their big stiff penises up her ass.
-			<<set $slaves[_i].fetish = "buttslut", $slaves[_i].fetishStrength = 65>>
-		<</if>>
-	<<elseif (_masterSuiteAverageCum > 3) && ($fetishChangeChance > random(0,50))>>
-		_Verb
-		<<if $slaves[_i].fetish == "cumslut">>
-			@@.lightcoral;sinks farther into cum addiction,@@ since she spends her time in the fuckpit eagerly sucking down ejaculate, straight from the many sources.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			@@.lightcoral;acquires an oral fixation@@ after orally servicing your many fucktoys eager to blow their loads down her throat.
-			<<set $slaves[_i].fetish = "cumslut", $slaves[_i].fetishStrength = 65>>
-		<</if>>
-	<<elseif (_masterSuiteAveragePreg > 10) && ($fetishChangeChance > random(0,50))>>
-		_Verb
-		<<if $slaves[_i].fetish == "pregnancy">>
-			@@.lightcoral;sinks farther into pregnancy obsession,@@ since she never wants for a pregnant girl to make love to.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			@@.lightcoral;acquires a pregnancy fetish,@@ since many of her sexual partners in the fuckpit are heavily pregnant.
-			<<set $slaves[_i].fetish = "pregnancy", $slaves[_i].fetishStrength = 65>>
-		<</if>>
-	<<elseif (_masterSuiteAverageDom < 50) && ($fetishChangeChance > random(0,50))>>
-		_Verb
-		<<if $slaves[_i].fetish == "dom">>
-			@@.lightcoral;becomes more dominant,@@ since there are so many subs in the fuckpit who beg her to fuck them hard.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			@@.lightcoral;becomes sexually dominant@@ after having fun satisfying the many submissive fucktoys in the fuckpit who beg her to top them.
-			<<set $slaves[_i].fetish = "dom", $slaves[_i].fetishStrength = 65>>
+		/% Both Concubine and other slaves %/
+		<<if $masterSuiteUpgradeLuxury == 2 && $masterSuiteAverageEnergy > random(50,90)>>
+			<<if ($slaves[$i].trust > -20) && ($slaves[$i].devotion > -10) && ($slaves[$i].fetishStrength <= 95)>>
+				<<if $verboseDescriptions == 1>>
+					<<set _Verb = "She">>
+				<<else>>
+					<<set _Verb = $slaves[$i].slaveName>>
+				<</if>>
+				<<fetishChangeChance $slaves[$i]>>
+				<<if (_masterSuiteAverageMilk > 2000) && ($fetishChangeChance > random(0,50))>>
+					<<if $slaves[$i].fetish == "boobs">>
+						<<if $verboseDescriptions == 1>>Her<<else>>$slaves[$i].slaveName's<</if>> @@.lightcoral;boob fetish is strengthened@@ by the constant availability of milky nipples for her to play with.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						_Verb @@.lightcoral;acquires a boob fetish@@ after spending a lot of time in the fuckpit drinking from her fellow fucktoys' tits.
+						<<set $slaves[$i].fetish = "boobs", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAverageDick > 3) && ($slaves[$i].anus > 0) && ($fetishChangeChance > random(0,50))>>
+					_Verb
+					<<if $slaves[$i].fetish == "buttslut">>
+						@@.lightcoral;sinks farther into anal pleasure,@@ since she spends her time in the fuckpit with at least one of the many available cocks up her butt.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						@@.lightcoral;acquires an anal fetish@@ after helplessly orgasming at the mercy of your many fucktoys eager to shove their big stiff penises up her ass.
+						<<set $slaves[$i].fetish = "buttslut", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAverageCum > 3) && ($fetishChangeChance > random(0,50))>>
+					_Verb
+					<<if $slaves[$i].fetish == "cumslut">>
+						@@.lightcoral;sinks farther into cum addiction,@@ since she spends her time in the fuckpit eagerly sucking down ejaculate, straight from the many sources.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						@@.lightcoral;acquires an oral fixation@@ after orally servicing your many fucktoys eager to blow their loads down her throat.
+						<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAveragePreg > 10) && ($fetishChangeChance > random(0,50))>>
+					_Verb
+					<<if $slaves[$i].fetish == "pregnancy">>
+						@@.lightcoral;sinks farther into pregnancy obsession,@@ since she never wants for a pregnant girl to make love to.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						@@.lightcoral;acquires a pregnancy fetish,@@ since many of her sexual partners in the fuckpit are heavily pregnant.
+						<<set $slaves[$i].fetish = "pregnancy", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAverageDom < 50) && ($fetishChangeChance > random(0,50))>>
+					_Verb
+					<<if $slaves[$i].fetish == "dom">>
+						@@.lightcoral;becomes more dominant,@@ since there are so many subs in the fuckpit who beg her to fuck them hard.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						@@.lightcoral;becomes sexually dominant@@ after having fun satisfying the many submissive fucktoys in the fuckpit who beg her to top them.
+						<<set $slaves[$i].fetish = "dom", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAverageDom > 50) && ($fetishChangeChance > random(0,50))>>
+					_Verb
+					<<if $slaves[$i].fetish == "submissive">>
+						@@.lightcoral;becomes even more submissive,@@ since there are so many doms in the fuckpit that she's often used by more than one at once.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						@@.lightcoral;becomes sexually submissive@@ after the many dominant slaves in the fuckpit hold her down and use her for their pleasure.
+						<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAverageSadism < 50) && ($fetishChangeChance > random(0,50))>>
+					_Verb
+					<<if $slaves[$i].fetish == "sadist">>
+						@@.lightcoral;becomes more sadistic,@@ since there are so many girls in the fuckpit who will do anything for her if she'll only spank them.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						@@.lightcoral;becomes a bit of a sadist@@ after she notices that so many of her fellow fucktoys cum harder if she gives them a good slap.
+						<<set $slaves[$i].fetish = "sadist", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<<elseif (_masterSuiteAverageSadism > 50) && ($fetishChangeChance > random(0,50))>>
+					<<if $slaves[$i].fetish == "masochist">>
+						<<if $verboseDescriptions == 1>>Her<<else>>$slaves[$i].slaveName's<</if>> @@.lightcoral;pain addiction deepens,@@ since the fuckpit is full of ladies happy to fuck her while she screams.
+						<<set $slaves[$i].fetishStrength += 4>>
+					<<else>>
+						<<if $verboseDescriptions == 1>>She<<else>>$slaves[$i].slaveName<</if>> @@.lightcoral;learns masochism@@ after experiencing many orgasms under the exquisite sexual torture of the sadists in the fuckpit.
+						<<set $slaves[$i].fetish = "masochist", $slaves[$i].fetishStrength = 65>>
+					<</if>>
+				<</if>>
+			<</if>>
+			<<if $slaves[$i].energy > 40 && $slaves[$i].energy < 95>>
+				Being a constant part of the fuckpit orgy @@.lime;greatly heightens her libido.@@
+				<<set $slaves[$i].energy += 2>>
+			<</if>>
 		<</if>>
-	<<elseif (_masterSuiteAverageDom > 50) && ($fetishChangeChance > random(0,50))>>
-		_Verb
-		<<if $slaves[_i].fetish == "submissive">>
-			@@.lightcoral;becomes even more submissive,@@ since there are so many doms in the fuckpit that she's often used by more than one at once.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			@@.lightcoral;becomes sexually submissive@@ after the many dominant slaves in the fuckpit hold her down and use her for their pleasure.
-			<<set $slaves[_i].fetish = "submissive", $slaves[_i].fetishStrength = 65>>
+
+		<<if $masterSuiteUpgradePregnancy == 1>>
+			/* If they're not on fertility drugs and the toggle is active, stick them on (if they can take them). Otherwise take them off. */
+			<<if ($masterSuitePregnancyFertilityDrugs == 1) && ($slaves[$i].drugs != "fertility drugs") && canGetPregnant($slaves[$i])>>
+				<<set $slaves[$i].drugs = "fertility drugs">>
+			<<elseif ($masterSuiteHyperPregnancy == 1) && ($slaves[$i].drugs != "super fertility drugs") && canGetPregnant($slaves[$i])>>
+				<<set $slaves[$i].drugs = "super fertility drugs">>
+			<<elseif ((($masterSuitePregnancyFertilityDrugs == 0) && ($slaves[$i].drugs == "fertility drugs")) || (($masterSuiteHyperPregnancy == 0) && ($slaves[$i].drugs == "super fertility drugs"))) || !canGetPregnant($slaves[$i])>>
+				<<set $slaves[$i].drugs = "no drugs">>
+			<</if>>
+			/* We don't know they're pregnant for a month or so by game logic */
+			<<if ($slaves[$i].preg >= 4)>>
+				/* Once we know they're knocked up, get the counter going. */
+				<<set _masterSuitePregnantSlaves += 1>>
+				/* Don't know about twins/triplets etc until 10 weeks. Once we do, get the counter going */
+				<<if ($slaves[$i].pregType > 1) && ($slaves[$i].preg >= 10)>>
+					<<set _masterSuitePregnantSlavesMultiple += 1>>
+				<</if>>
+				/* If they're preggo and in the upgraded suite, give them extra devotion. More if they're being given lighter duties. */
+				<<if ($slaves[$i].devotion <= 100)>>
+					<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
+						<<set $slaves[$i].devotion += 2>>
+					<<else>>
+						<<set $slaves[$i].devotion += 5>>
+					<</if>>
+				<</if>>
+				/* If they're preggo and in the upgraded suite, give them extra trust. More if they're being given lighter duties. */
+				<<if ($slaves[$i].trust <= 100)>>
+					<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
+						<<set $slaves[$i].trust += 2>>
+					<<else>>
+						<<set $slaves[$i].trust += 5>>
+					<</if>>
+				<</if>>
+				/* If they're preggo and in the upgraded suite, give them extra health. More if they're being given lighter duties. */
+				<<if ($slaves[$i].health < 100)>>
+					<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
+						<<set $slaves[$i].health += 15>>
+					<<else>>
+						<<set $slaves[$i].health += 25>>
+					<</if>>
+				<</if>>
+			<</if>>
 		<</if>>
-	<<elseif (_masterSuiteAverageSadism < 50) && ($fetishChangeChance > random(0,50))>>
-		_Verb
-		<<if $slaves[_i].fetish == "sadist">>
-			@@.lightcoral;becomes more sadistic,@@ since there are so many girls in the fuckpit who will do anything for her if she'll only spank them.
-			<<set $slaves[_i].fetishStrength += 4>>
+
+		<<if $verboseDescriptions == 1>>
+			<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA please you">>
+			<br>&nbsp;&nbsp;&nbsp;
+			<<include "SA chooses own clothes">>
+			<<include "SA diet">>
+			<<include "SA long term effects">>
+			<<include "SA drugs">>
+			<<include "SA relationships">>
+			<<include "SA rivalries">>
+			<br><<include "SA devotion">>
 		<<else>>
-			@@.lightcoral;becomes a bit of a sadist@@ after she notices that so many of her fellow fucktoys cum harder if she gives them a good slap.
-			<<set $slaves[_i].fetish = "sadist", $slaves[_i].fetishStrength = 65>>
+			<<silently>>
+			<<include "SA chooses own job">>
+			<<include "SA please you">>
+			<<include "SA chooses own clothes">>
+			<<include "SA diet">>
+			<<include "SA long term effects">>
+			<<include "SA drugs">>
+			<<include "SA relationships">>
+			<<include "SA rivalries">>
+			<<include "SA devotion">>
+			<</silently>>
 		<</if>>
-	<<elseif (_masterSuiteAverageSadism > 50) && ($fetishChangeChance > random(0,50))>>
-		<<if $slaves[_i].fetish == "masochist">>
-			<<if $verboseDescriptions == 1>>Her<<else>>$slaves[_i].slaveName's<</if>> @@.lightcoral;pain addiction deepens,@@ since the fuckpit is full of ladies happy to fuck her while she screams.
-			<<set $slaves[_i].fetishStrength += 4>>
-		<<else>>
-			<<if $verboseDescriptions == 1>>She<<else>>$slaves[_i].slaveName<</if>> @@.lightcoral;learns masochism@@ after experiencing many orgasms under the exquisite sexual torture of the sadists in the fuckpit.
-			<<set $slaves[_i].fetish = "masochist", $slaves[_i].fetishStrength = 65>>
+		<<if $slaves[$i].health < 80>>
+			<<if $masterSuiteUpgradeLuxury == 1>>
+				<<set $slaves[$i].health += 20>>
+			<<else>>
+				<<set $slaves[$i].health += 10>>
+			<</if>>
 		<</if>>
-	<</if>>
-	<</if>>
-	<<if $slaves[_i].energy > 40 && $slaves[_i].energy < 95>>
-		Being a constant part of the fuckpit orgy @@.lime;greatly heightens her libido.@@
-		<<set $slaves[_i].energy += 2>>
-	<</if>>
-	<</if>>
-<</if>>
 
-<<if $masterSuiteUpgradePregnancy == 1>>
-	/* If they're not on fertility drugs and the toggle is active, stick them on (if they can take them). Otherwise take them off. */
-	<<if $slaves[_i].assignment == "serve in the master suite" || $slaves[_i].assignment == "be your Concubine">>
-	<<if ($masterSuitePregnancyFertilityDrugs == 1) && ($slaves[_i].drugs != "fertility drugs") && canGetPregnant($slaves[_i])>>
-		<<set $slaves[_i].drugs = "fertility drugs">>
-	<<elseif ($masterSuiteHyperPregnancy == 1) && ($slaves[_i].drugs != "super fertility drugs") && canGetPregnant($slaves[_i])>>
-		<<set $slaves[_i].drugs = "super fertility drugs">>
-	<<elseif ((($masterSuitePregnancyFertilityDrugs == 0) && ($slaves[_i].drugs == "fertility drugs")) || (($masterSuiteHyperPregnancy == 0) && ($slaves[_i].drugs == "super fertility drugs"))) || !canGetPregnant($slaves[_i])>>
-		<<set $slaves[_i].drugs = "no drugs">>
-	<</if>>
-	<</if>>
-	/* We don't know they're pregnant for a month or so by game logic */
-	<<if ($slaves[_i].preg >= 4)>>
-	/* Once we know they're knocked up, get the counter going. */
-	<<set _masterSuitePregnantSlaves += 1>>
-	/* Don't know about twins/triplets etc until 10 weeks. Once we do, get the counter going */
-	<<if ($slaves[_i].pregType > 1) && ($slaves[_i].preg >= 10)>>
-		<<set _masterSuitePregnantSlavesMultiple += 1>>
-	<</if>>
-	/* If they're preggo and in the upgraded suite, give them extra devotion. More if they're being given lighter duties. */
-	<<if ($slaves[_i].devotion <= 100)>>
-	<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
-		<<set $slaves[_i].devotion += 2>>
-	<<else>>
-		<<set $slaves[_i].devotion += 5>>
-	<</if>>
-	<</if>>
-	/* If they're preggo and in the upgraded suite, give them extra trust. More if they're being given lighter duties. */
-	<<if ($slaves[_i].trust <= 100)>>
-	<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
-		<<set $slaves[_i].trust += 2>>
-	<<else>>
-		<<set $slaves[_i].trust += 5>>
-	<</if>>
-	<</if>>
-	/* If they're preggo and in the upgraded suite, give them extra health. More if they're being given lighter duties. */
-	<<if ($slaves[_i].health < 100)>>
-	<<if ($masterSuitePregnancySlaveLuxuries == 0)>>
-		<<set $slaves[_i].health += 15>>
-	<<else>>
-		<<set $slaves[_i].health += 25>>
-	<</if>>
-	<</if>>
-	<</if>>
-<</if>>
+	<</for>>
 
-<<if $verboseDescriptions == 1>>
-	<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA please you">>
-	<br>&nbsp;&nbsp;&nbsp;
-	<<include "SA chooses own clothes">>
-	<<include "SA diet">>
-	<<include "SA long term effects">>
-	<<include "SA drugs">>
-	<<include "SA relationships">>
-	<<include "SA rivalries">>
-	<br><<include "SA devotion">>
-<<else>>
-	<<silently>>
-	<<include "SA chooses own job">>
-	<<include "SA please you">>
-	<<include "SA chooses own clothes">>
-	<<include "SA diet">>
-	<<include "SA long term effects">>
-	<<include "SA drugs">>
-	<<include "SA relationships">>
-	<<include "SA rivalries">>
-	<<include "SA devotion">>
-	<</silently>>
-<</if>>
-<<if $slaves[_i].health < 80>>
-	<<if $masterSuiteUpgradeLuxury == 1>>
-	<<set $slaves[_i].health += 20>>
-	<<else>>
-	<<set $slaves[_i].health += 10>>
+	<<if $Concubine != 0 && _FLs != -1>>
+		/% Remove the Concubine from the $MastSiIDs list %/
+		<<set $Concubine = $slaves[_FLs], _dump = $MastSiIDs.deleteAt(0), _DL-->>
 	<</if>>
-<</if>>
 
-<</for>>
-
-<<if $Concubine>>
-	/% Remove the Concubine from the $MastSiIDs list %/
-	<<set $Concubine = $slaves[_FLs], _dump = $MastSiIDs.deleteAt(0), _DL--, $masterSuiteSlaves-->>
-<</if>>
-
-<<if $arcologies[0].FSRestart != "unset">>
-<<if $propOutcome != 1>>
-<<if _masterSuitePregnantSlaves > 0>>
-	The Societal Elite know what you are doing with your bedslaves. @@.red;They do not approve@@.
-	<<set $failedElite += 5*_masterSuitePregnantSlaves>>
-<</if>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSRestart != "unset" && $propOutcome != 1 && _masterSuitePregnantSlaves > 0>>
+		The Societal Elite know what you are doing with your bedslaves. @@.red;They do not approve@@.
+		<<set $failedElite += 5*_masterSuitePregnantSlaves>>
+	<</if>>
 
-<<if $masterSuiteDecoration != "standard">>
-	$masterSuiteNameCaps's $masterSuiteDecoration atmosphere @@.hotpink;has a minor impact on your fucktoys.@@
-<</if>>
+	<<if $masterSuiteDecoration != "standard">>
+		$masterSuiteNameCaps's $masterSuiteDecoration atmosphere @@.hotpink;has a minor impact on your fucktoys.@@
+	<</if>>
 <</if>>
-<<if $masterSuiteSlaves || $Concubine>>
+<<if _DL > 0 || $Concubine != 0>>
 	<br><br>
 <</if>>
+
diff --git a/src/uncategorized/neighborsDevelopment.tw b/src/uncategorized/neighborsDevelopment.tw
index 64f35e45dc2e58959d3fe9ee54fbb55d43841999..dd9ac8b247dae6e3597d6200aa651595206528e6 100644
--- a/src/uncategorized/neighborsDevelopment.tw
+++ b/src/uncategorized/neighborsDevelopment.tw
@@ -11,11 +11,11 @@
 
 <<set _corpBonus = Math.trunc($corpProfit*0.05)>>
 
-<<if $useTabs>>__Arcologies in the Free City__<</if>>
+<<if $useTabs == 0>>__Arcologies in the Free City__<</if>>
 
 <<for $i = 0; $i < $arcologies.length; $i++>>
 
-<br><br>
+<br>
 ''$arcologies[$i].name'', your <<if $arcologies[$i].direction == 0>>arcology<<else>>neighbor to the $arcologies[$i].direction<</if>>,
 
 /* PROSPERITY */
@@ -458,7 +458,7 @@ has an estimated GSP of @@.yellowgreen;¤<<print Math.trunc((0.1*$arcologies[$i]
 <<for $j = 0; $j < $arcologies.length; $j++>>
 <<if $arcologies[$i].direction != $arcologies[$j].direction>>
 <<if $arcologies[$i].name == $arcologies[$j].name>>
-	<<set $arcologies[$i].name = "Arcology X-"+$i>>
+	<<set $arcologies[$i].name = "Arcology X-"+($i < 4 ? $i : $i + 1)>> /* X-4 is reserved for player's arcology, so X-1 is available */
 	It resumes its original name, ''$arcologies[$i].name'', since the arcology to the $arcologies[$i].direction of yours is also named $arcologies[$j].name.
 	<<break>>
 <</if>>
diff --git a/src/uncategorized/newSlaveIntro.tw b/src/uncategorized/newSlaveIntro.tw
index 1ae4f6a46b4d99095915ff00147b985db1c7b4c6..cc4422a3cb3b5e8f14557c8ed8f2073cea1de800 100644
--- a/src/uncategorized/newSlaveIntro.tw
+++ b/src/uncategorized/newSlaveIntro.tw
@@ -1,6 +1,6 @@
 :: New Slave Intro [nobr]
 
-<<set $showEncyclopedia = 1>><<set $encyclopedia = "">>
+<<set $showEncyclopedia = 0>>
 
 <<SlaveTitle $activeSlave>>
 
diff --git a/src/uncategorized/nextWeek.tw b/src/uncategorized/nextWeek.tw
index bd34d3913c3d4f8831adbd6843343e019d4cafb7..53c93cac0305c2fd6df7f6c19812c73a5604695e 100644
--- a/src/uncategorized/nextWeek.tw
+++ b/src/uncategorized/nextWeek.tw
@@ -25,16 +25,16 @@
 <<set $averageTrust = 0, $averageDevotion = 0, _slavesContributing = 0, _OldHG = -1, _NewHG = -1, _SL = $slaves.length>>
 <<for _i = 0; _i < _SL; _i++>>
 	<<if $seeAge != 0>>
-	<<set $slaves[_i].birthWeek += 1>>
+	<<set $slaves[_i].birthWeek++>
 		<<if $slaves[_i].birthWeek >= 52>>
-		<<set $slaves[_i].birthWeek to 0>>
-		<<if $seeAge == 1>>
-			<<set $slaves[_i].physicalAge += 1, $slaves[_i].actualAge += 1, $slaves[_i].visualAge += 1>>
-			<<if $slaves[_i].physicalAge <= 18 && $loliGrow == 1>>
-				<<PhysicalDevelopment $slaves[_i]>>
+			<<set $slaves[_i].birthWeek = 0>>
+			<<if $seeAge == 1>>
+				<<set $slaves[_i].physicalAge += 1, $slaves[_i].actualAge += 1, $slaves[_i].visualAge += 1>>
+				<<if $slaves[_i].physicalAge <= 18 && $loliGrow == 1>>
+					<<PhysicalDevelopment $slaves[_i]>>
+				<</if>>
 			<</if>>
 		<</if>>
-		<</if>>
 	<</if>>
 	<<if $slaves[_i].indenture > 0>>
 		<<set $slaves[_i].indenture -= 1>>
@@ -205,16 +205,16 @@
 
 /% These are variables that either should be made into _temp vars or should be Zeroed out once done with them instead of here. This can also interfere with debugging or hide NaN's as zeroing things out would clear a NaN. Also could stop from NaN's getting worse? %/
 /% Integer and float variables. No real need to zero them out but doesn't hurt to have them in a known state, though this might mask variables NaN'ing out. Takes up the least amount of Memory besides a "" string. %/
-<<set $averageProsperity = 0, $beauty = 0, $beautyMultiplier = 0, $boobsID = -1, $boobsInterestTargetID = -1, $brideSlave = -1, $buttslutID = -1, $buttslutInterestTargetID = -1, $cumslutID = -1, $FResult = 0, $groomSlave = -1, $humiliationID = -1, $humiliationInterestTargetID = -1, $i = 0, $I = 0, $individualCosts = 0, $influenceBonus = 0, $j = 0, $learning = 0, $masochistID = -1, $masochistInterestTargetID = -1, $opinion = 0, $r = 0, $subID = -1, $submissiveInterestTargetID = -1, $weddingSlaveID = -1, $x = 0>>
+<<set $averageProsperity = 0, $beauty = 0, $beautyMultiplier = 0, $boobsID = -1, $boobsInterestTargetID = -1, $brideSlave = -1, $buttslutID = -1, $buttslutInterestTargetID = -1, $cumslutID = -1, $FResult = 0, $groomSlave = -1, $humiliationID = -1, $humiliationInterestTargetID = -1, $i = 0, $I = 0, $individualCosts = 0, $influenceBonus = 0, $j = 0, $masochistID = -1, $masochistInterestTargetID = -1, $opinion = 0, $r = 0, $subID = -1, $submissiveInterestTargetID = -1, $weddingSlaveID = -1, $x = 0>>
 
 /% Other arrays %/
-<<set $events = [], $FSAcquisitionEvents = [], $FSNonconformistEvents = [], $nurseMolestationSubIDs = [], $PESSevent = [], $PETSevent = [], $qualifiedNicknames = [], $REAnalCowgirlSubIDs = [], $REButtholeCheckinIDs = [], $RECIevent = [], $recruit = [], $RETasteTestSubIDs = [], $qualifiedFS = [], $recruitedType = []>>
+<<set $events = [], $RESSevent = [], $RESSTRevent = [], $RETSevent = [], $RECIevent = [], $RecETSevent = [], $REFIevent = [], $PESSevent = [], $PETSevent = [], $FSAcquisitionEvents = [], $FSNonconformistEvents = [], $nurseMolestationSubIDs = [], $qualifiedNicknames = [], $REAnalCowgirlSubIDs = [], $REButtholeCheckinIDs = [], $recruit = [], $RETasteTestSubIDs = [], $qualifiedFS = [], $recruitedType = []>>
 
 /% Slave Objects using 0 instead of null. Second most memory eaten up. %/
 <<set $activeSlave = 0, $displaySlave = 0, $domSlave = 0, $eventSlave = 0, $REBoobCollisionSub = 0, $REIfYouEnjoyItSub = 0, $RERelationshipSlave = 0, $RESadisticDescriptionSub = 0, $REShowerForceSub = 0, $slaveWithoutBonuses = 0, $subSlave = 0, $milkTap = 0, $relation = 0>>
 
 /% Slave Objects that never get zeroed so null them here. Second most memory eaten up. %/
-<<set $alphaTwin = null, $assayedSlave = null, $beforeGingering = null, $betaTwin = null, $mother = null, $olderSister = null, $recruiterMother = null, $recruiterSister, $sibling = null>>
+<<set $assayedSlave = null, $beforeGingering = null, $mother = null, $daughter = null, $devMother = null, $devDaughter = null, $alphaTwin = null, $betaTwin = null, $youngerSister = null, $olderSister = null, $recruiterMother = null, $recruiterSister = null, $sibling = null>>
 
 /% Slave Object Arrays. These can take up the most memory. %/
 <<set $eligibleSlaves = [], $slavesInLine = []>>
diff --git a/src/uncategorized/nonRandomEvent.tw b/src/uncategorized/nonRandomEvent.tw
index 20eb159928e35e5f525ff11616f9e59f1bdf9e87..c6562797b16fcce6d59a057109e1567a4ff504d2 100644
--- a/src/uncategorized/nonRandomEvent.tw
+++ b/src/uncategorized/nonRandomEvent.tw
@@ -1,6 +1,6 @@
 :: Nonrandom Event
 
-<<set $showEncyclopedia = 0>>
+<<set $showEncyclopedia = 0, $activeSlave = 0, $eventSlave = 0>>
 
 <<if ($plot == 1)>>
 
diff --git a/src/uncategorized/officeDescription.tw b/src/uncategorized/officeDescription.tw
index d9ddfbaa44da754c80a200c334520b2a7a657642..e092394bcfd013bc43a194bf327b30a5561fc2ac 100644
--- a/src/uncategorized/officeDescription.tw
+++ b/src/uncategorized/officeDescription.tw
@@ -7,9 +7,9 @@
 <<if $clubAdsSpending >= 5000>>
 	A corner of your desk is piled with sample merchandise from the campaign promoting your club.
 	<<set $eventSlaves = []>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-	<<if ($slaves[_i].assignment == "serve in the club") && canWalk($slaves[_i])>>
-		<<set $eventSlaves.push($slaves[_i])>>
+	<<for _odi = 0; _odi < $slaves.length; _odi++>>
+	<<if ($slaves[_odi].assignment == "serve in the club") && canWalk($slaves[_odi])>>
+		<<set $eventSlaves.push($slaves[_odi])>>
 	<</if>>
 	<</for>>
 	<<if $eventSlaves.length > 0>>
@@ -42,9 +42,9 @@
 	A corner of your desk is piled with sample merchandise from the campaign promoting $brothelName.
 	<</if>>
 	<<set $eventSlaves = []>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-	<<if ($slaves[_i].assignment == "work in the brothel") && canWalk($slaves[_i])>>
-		<<set $eventSlaves.push($slaves[_i])>>
+	<<for _odi = 0; _odi < $slaves.length; _odi++>>
+	<<if ($slaves[_odi].assignment == "work in the brothel") && canWalk($slaves[_odi])>>
+		<<set $eventSlaves.push($slaves[_odi])>>
 	<</if>>
 	<</for>>
 	<<if $eventSlaves.length > 0>>
diff --git a/src/uncategorized/pCoupAttempt.tw b/src/uncategorized/pCoupAttempt.tw
index f08076b5457db010a312b7caa947ded897583a89..05b16914af1405d28693ede68a4780114cc7f23a 100644
--- a/src/uncategorized/pCoupAttempt.tw
+++ b/src/uncategorized/pCoupAttempt.tw
@@ -1,8 +1,6 @@
 :: P coup attempt [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "Random Nonindividual Event">>
-<<set $nextButton = "Continue">>
+<<set $nextButton = "Continue", $nextLink = "Random Nonindividual Event">>
 
 <<set $daughtersVictory = 1>>
 
@@ -24,7 +22,11 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 
 <<set _newSlaves = []>>
 <<if $arcologies[0].FSRomanRevivalistLaw + $mercenaries + $personalArms + $hackerSupport < 9>>
-	@@.yellow;The Daughters of Liberty are defeated.@@ @@.red;$arcologies[0].name is heavily damaged,@@ and the repairs will be very costly. The effect on your reputation is @@.green;muted, but positive,@@ since though you won, your victory was hard-fought and set the arcology's prosperity back @@.red;a long way.@@ <<if $traitor != 0>>$traitor.slaveName was killed in the fighting.<<set $traitor = 0>><</if>>
+	@@.yellow;The Daughters of Liberty are defeated.@@ @@.red;$arcologies[0].name is heavily damaged,@@ and the repairs will be very costly. The effect on your reputation is @@.green;muted, but positive,@@ since though you won, your victory was hard-fought and set the arcology's prosperity back @@.red;a long way.@@
+	<<if $traitor != 0>>
+		$traitor.slaveName was killed in the fighting.
+		<<set $traitor = 0>>
+	<</if>>
 	<<set $daughtersVictory = 2>>
 	<<set $cash -= 10000>>
 	<<set $cash -= Math.trunc($cash*0.3)>>
@@ -57,7 +59,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<set $desc = "a Daughters of Liberty brassard">>
 	<<set $trinkets.push($desc)>>
 <<elseif $arcologies[0].FSRomanRevivalistLaw == 1>>
-	@@.yellow;The Daughters of Liberty are utterly crushed.@@ $arcologies[0].name has been slightly damaged, but even as the last pockets of resistance are crushed, your citizens begin repairs themselves. The effect on your reputation is @@.green;immensely positive,@@ since your victory was insultingly easy and barely set the arcology's prosperity back at all. You also took a truly impressive bag of prisoners. <<if $traitor != 0>>$traitor.slaveName was captured and has been returned to you.<</if>>
+	@@.yellow;The Daughters of Liberty are utterly crushed.@@ $arcologies[0].name has been slightly damaged, but even as the last pockets of resistance are crushed, your citizens begin repairs themselves. The effect on your reputation is @@.green;immensely positive,@@ since your victory was insultingly easy and barely set the arcology's prosperity back at all. You also took a truly impressive bag of prisoners.
 	<<set $daughtersVictory = 3>>
 	<<set $cash -= 2000>>
 	<<set $cash -= Math.trunc($cash*0.2)>>
@@ -83,20 +85,12 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<set $desc = "a damaged plate carrier bearing Daughters of Liberty insignia">>
 	<<set $trinkets.push($desc)>>
 <<else>>
-	@@.yellow;The Daughters of Liberty are annihilated.@@ @@.red;$arcologies[0].name has been damaged,@@ and the repairs will be quite costly. However, the effect on your reputation is @@.green;very positive,@@ since though your victory was hard-fought and set the arcology's prosperity back @@.red;considerably,@@ you did better than other arcology owners have done when faced with similar well-armed unrest. You also took a truly impressive bag of prisoners. <<if $traitor != 0>>$traitor.slaveName was captured and has been returned to you.<</if>>
+	@@.yellow;The Daughters of Liberty are annihilated.@@ @@.red;$arcologies[0].name has been damaged,@@ and the repairs will be quite costly. However, the effect on your reputation is @@.green;very positive,@@ since though your victory was hard-fought and set the arcology's prosperity back @@.red;considerably,@@ you did better than other arcology owners have done when faced with similar well-armed unrest. You also took a truly impressive bag of prisoners.
 	<<set $daughtersVictory = 3>>
 	<<set $cash -= 5000>>
 	<<set $cash -= Math.trunc($cash*0.2)>>
 	<<set $arcologies[0].prosperity = Math.trunc($arcologies[0].prosperity*0.7)>>
 	<<set $rep += 1000>>
-	<<if $traitor != 0>>
-		<<set $activeSlave = $traitor>>
-		<<set $activeSlave.assignmentVisible = 1>>
-		<<set $activeSlave.assignment = "rest">>
-		<<set $activeSlave.health = random(-80,-60)>>
-		<<set $activeSlave.origin = "She was your slave, but you freed her, which she repaid by participating in a coup attempt against you. It failed, and she is again your chattel.">>
-		<<set _newSlaves.push($activeSlave)>>
-	<</if>>
 	<<if $seeDicks > 50>>
 		<<set $j = 5>>
 	<<elseif $seeDicks > 0>>
@@ -125,6 +119,15 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<<set $trinkets.push($desc)>>
 <</if>>
 
+<<if $traitor != 0>>
+	$traitor.slaveName was captured and has been returned to you.
+	<<set $traitor.assignmentVisible = 1>>
+	<<set $traitor.assignment = "rest">>
+	<<set $traitor.health = random(-80,-60)>>
+	<<set $traitor.origin = "She was your slave, but you freed her, which she repaid by participating in a coup attempt against you. It failed, and she is again your chattel.">>
+	<<AddSlave $traitor>>
+<</if>>
+
 <br><br>
 
 <span id="result">
@@ -145,7 +148,7 @@ You are awakened in the middle of the night by a jolt that shakes the entire arc
 	<</for>>
 	Prisoners @@.green;given away.@@
 	<</replace>>
-<</link>> <<if $traitor != 0>>//$traitor.slaveName will not be sold.//<</if>>
+<</link>> <<if $traitor != 0>>//$traitor.slaveName will not be given away.//<</if>>
 <br><<link "Enslave all of your prisoners">>
 	<<replace "#result">>
 	<<for _i = 0; _i < _newSlaves.length; _i++>>
diff --git a/src/uncategorized/pRivalryActions.tw b/src/uncategorized/pRivalryActions.tw
index af7157e2f230f94023ac3d19c2894382812be492..7249cf3ed2fae28329246ceba2dfd0f02be4f8bd 100644
--- a/src/uncategorized/pRivalryActions.tw
+++ b/src/uncategorized/pRivalryActions.tw
@@ -3147,17 +3147,17 @@ You remind yourself that success in this conflict will not be defined by the tra
 	<<case "Multiculturalism">>Cultural Marxist
 	<<default>>Target One
 	<</switch>>
-	EKIA. Confirm, enemy E. K. I. A. No other casualties, team exfiltrating."
+	EKIA. Confirm, E. K. I. A. No other casualties, team exfiltrating."
 	<<set $rivalOwner = 0>>
 	<<set $rivalryPower = 0>>
 	<<if $rivalrySet != 0>>
-	  <<for $i = 0; $i < $arcologies.length; $i++>>
-		<<if $arcologies[$i].rival == 1>>
-		  <<set $arcologies[$i].embargo = 0>>
-		  <<set $arcologies[$i].embargoTarget = -1>>
-		  <<set $arcologies[$i].influenceTarget = -1>>
-		  <<set $arcologies[$i].rival = 0>>
-		  <<set $arcologies[$i].government = 5>>
+	  <<for _pra = 0; _pra < $arcologies.length; _pra++>>
+		<<if $arcologies[_pra].rival == 1>>
+		  <<set $arcologies[_pra].embargo = 0>>
+		  <<set $arcologies[_pra].embargoTarget = -1>>
+		  <<set $arcologies[_pra].influenceTarget = -1>>
+		  <<set $arcologies[_pra].rival = 0>>
+		  <<set $arcologies[_pra].government = "direct democracy">>
 		  <<break>>
 		<</if>>
 	  <</for>>
diff --git a/src/uncategorized/pRivalryVictory.tw b/src/uncategorized/pRivalryVictory.tw
index 46afd0c062659acd9a550e5a3b73aa3b4efeba88..208196ef8a2c18f08658f861d449d16c11c8b047 100644
--- a/src/uncategorized/pRivalryVictory.tw
+++ b/src/uncategorized/pRivalryVictory.tw
@@ -1,8 +1,6 @@
 :: P rivalry victory [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "RIE Eligibility Check">>
-<<set $returnTo = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", set $nextLink = "RIE Eligibility Check", $returnTo = "RIE Eligibility Check", $rivalOwner = 0, $rivalryPower = 0, _num = random(1,99)>>
 
 <<set $rivalOwner = 0>>
 <<set $rivalryPower = 0>>
@@ -20,15 +18,15 @@ For the first time, you receive a direct call from your rival. You pictured the
 	You accept, magnanimous in victory. "I don't think I would have done that," your rival replies. "Thank you. When they write the book, I'll make sure you look good."
 	<<if $rivalrySet != 0>>
 		<<if _num < $seeDicks>>His<<else>>Her<</if>> remaining liquid assets will go to satisfy her great debts, <<if _num < $seeDicks>>his<<else>>her<</if>> @@.yellowgreen;arcology holdings are yours.@@
-		<<for $i = 0; $i < $arcologies.length; $i++>>
-		<<if $arcologies[$i].rival == 1>>
-		  <<set $arcologies[$i].embargo = 0>>
-		  <<set $arcologies[$i].embargoTarget = -1>>
-		  <<set $arcologies[$i].influenceTarget = -1>>
-		  <<set $arcologies[$i].rival = 0>>
-		  <<set $arcologies[$i].government = 5>>
-		  <<set $arcologies[$i].PCminority += $arcologies[$i].ownership>>
-		  <<set $arcologies[$i].PCminority = Math.clamp($arcologies[$i].PCminority, 0, 49)>>
+		<<for _prv = 0; _prv < $arcologies.length; _prv++>>
+		<<if $arcologies[_prv].rival == 1>>
+		  <<set $arcologies[_prv].embargo = 0>>
+		  <<set $arcologies[_prv].embargoTarget = -1>>
+		  <<set $arcologies[_prv].influenceTarget = -1>>
+		  <<set $arcologies[_prv].rival = 0>>
+		  <<set $arcologies[_prv].government = "direct democracy">>
+		  <<set $arcologies[_prv].PCminority += $arcologies[_prv].ownership>>
+		  <<set $arcologies[_prv].PCminority = Math.clamp($arcologies[_prv].PCminority, 0, 49)>>
 		  <<break>>
 		<</if>>
 		<</for>>
@@ -44,13 +42,13 @@ For the first time, you receive a direct call from your rival. You pictured the
 	You coldly decline. "That was a mistake," your rival replies, entering computer command.
 	<<if $rivalrySet != 0>>
 		"All my remaining liquid assets have just been @@.red;carefully dispersed to deny you control of my arcology.@@ You'll get nothing from me." It's true. The financial self-destruction ensures that the fiscal wreckage goes to the arcology's citizens, not you.
-		<<for $i = 0; $i < $arcologies.length; $i++>>
-		<<if $arcologies[$i].rival == 1>>
-		  <<set $arcologies[$i].embargo = 0>>
-		  <<set $arcologies[$i].embargoTarget = -1>>
-		  <<set $arcologies[$i].influenceTarget = -1>>
-		  <<set $arcologies[$i].rival = 0>>
-		  <<set $arcologies[$i].government = 5>>
+		<<for _prv = 0; _prv < $arcologies.length; _prv++>>
+		<<if $arcologies[_prv].rival == 1>>
+		  <<set $arcologies[_prv].embargo = 0>>
+		  <<set $arcologies[_prv].embargoTarget = -1>>
+		  <<set $arcologies[_prv].influenceTarget = -1>>
+		  <<set $arcologies[_prv].rival = 0>>
+		  <<set $arcologies[_prv].government = "direct democracy">>
 		  <<break>>
 		<</if>>
 		<</for>>
@@ -72,7 +70,7 @@ For the first time, you receive a direct call from your rival. You pictured the
 	<</if>>
 	<</replace>>
 <</link>>
-<<if $rivalryDuration >= 30 && $hostageAnnounced == 0>>
+<<if $rivalryDuration >= 30 && $hostageAnnounced == 0 && $rivalrySet != 0>>
 <br><<link "Refuse, and place a bounty of ¤50000 on your rival's death">>
 	<<replace "#result">>
 	You coldly decline. "That was a mistake," your rival replies, entering computer command. "All my remaining liquid assets have just been @@.red;expended in an attack on the value of your holdings,@@ and my arcology has been heavily sabotaged. You'll get nothing from me." It's not entirely true, but the damage to your holdings does outweigh your gains by a significant margin. Your rival vanishes back into the old world
@@ -80,6 +78,16 @@ For the first time, you receive a direct call from your rival. You pictured the
 	<br><br>
 	Your bounty is quickly claimed, and you are treated to the delicious moment of finding your rival's head delivered to your doorstep. It might not have done much good, but damn did it feel good.
 	<<set $cash -= 50000>>
+	<<for _prv = 0; _prv < $arcologies.length; _prv++>>
+		<<if $arcologies[_prv].rival == 1>>
+			<<set $arcologies[_prv].embargo = 0>>
+			<<set $arcologies[_prv].embargoTarget = -1>>
+			<<set $arcologies[_prv].influenceTarget = -1>>
+			<<set $arcologies[_prv].rival = 0>>
+			<<set $arcologies[_prv].government = "direct democracy">>
+			<<break>>
+		<</if>>
+	<</for>>
     <</replace>>
 <</link>>
 <</if>>
@@ -89,13 +97,13 @@ For the first time, you receive a direct call from your rival. You pictured the
 	You coldly decline. "That was a mistake," your rival replies, entering computer command.
 	<<if $rivalrySet != 0>>
 		"All my remaining liquid assets have just been @@.red;carefully dispersed to deny you control of my arcology.@@ You'll get nothing from me." It's true. The financial self-destruction ensures that the fiscal wreckage goes to the arcology's citizens, not you.
-		<<for $i = 0; $i < $arcologies.length; $i++>>
-		<<if $arcologies[$i].rival == 1>>
-		  <<set $arcologies[$i].embargo = 0>>
-		  <<set $arcologies[$i].embargoTarget = -1>>
-		  <<set $arcologies[$i].influenceTarget = -1>>
-		  <<set $arcologies[$i].rival = 0>>
-		  <<set $arcologies[$i].government = 5>>
+		<<for _prv = 0; _prv < $arcologies.length; _prv++>>
+		<<if $arcologies[_prv].rival == 1>>
+		  <<set $arcologies[_prv].embargo = 0>>
+		  <<set $arcologies[_prv].embargoTarget = -1>>
+		  <<set $arcologies[_prv].influenceTarget = -1>>
+		  <<set $arcologies[_prv].rival = 0>>
+		  <<set $arcologies[_prv].government = "direct democracy">>
 		  <<break>>
 		<</if>>
 		<</for>>
diff --git a/src/uncategorized/peHeadgirlConcubine.tw b/src/uncategorized/peHeadgirlConcubine.tw
index 166ebdd424c8a3379cbe13e644693591d79f4d63..1ad92f2b800f87c80b77eaf37cc0cafd17e8243a 100644
--- a/src/uncategorized/peHeadgirlConcubine.tw
+++ b/src/uncategorized/peHeadgirlConcubine.tw
@@ -1,19 +1,17 @@
-:: PE headgirl concubine
+:: PE headgirl concubine [nobr]
 
-<<nobr>>
+<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check", $returnTo = "RIE Eligibility Check">>
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "AS Dump">>
-<<set $returnTo = "RIE Eligibility Check">>
+<<set $i = $slaves.findIndex(function(s) { return s.ID == $HeadGirl.ID; })>>
+<<set $partner = $slaves.findIndex(function(s) { return s.ID == $Concubine.ID; })>>
 
-<</nobr>>\
-\
 You wake up one morning to find $HeadGirl.slaveName and $Concubine.slaveName waiting next to your bed. It's immediately obvious that they both have a minor item of business for you, since nothing was urgent enough to wake you early, and they evidently both came in to catch you at your normal hour of rising. They're kneeling side by side next to the bed<<if $HeadGirl.boobs + $Concubine.boobs > 10000>> (a position that smashes their massive breasts together on one side)<<elseif $HeadGirl.butt + $Concubine.butt > 10>> (a position that smashes their massive asses together on one side)<</if>>, and it's also obvious that they've been filling the few minutes they've been waiting for you to wake up by making out. Their lips are moist, $Concubine.slaveName's $Concubine.skin cheeks are a little flushed, and there's even a little unnoticed strand of saliva running from her mouth to $HeadGirl.slaveName's. They both look at you expectantly, wondering whether to speak up or save their questions for after you take a moment to get ready for your day.
-\
+
+<br><br>
+
 <span id="result">
 <<link "Get right to work">>
 	<<replace "#result">>
-	<<nobr>>
 	You didn't get to where you are by lying around on the job. You spring out of bed and head straight towards your office and its desk to get some work done with your first rush of morning energy before your ablutions. Your Head Girl and Concubine follow along behind you;
 	$HeadGirl.slaveName does her best to keep up, because the sight of your
 	<<if $HeadGirl.attrXX > 65>>
@@ -135,12 +133,10 @@ You wake up one morning to find $HeadGirl.slaveName and $Concubine.slaveName wai
 	<</switch>>
 	on her way out the door. When she's gone, your Concubine speaks up from her adoring embrace of your leg. She asks a little aesthetic question about one of your other bedslaves, her <<if $Concubine.voice < 2>>deep voice rumbling against your knee<<elseif $Concubine.voice > 2>>high voice humming against your knee<<else>>feminine voice purring against your knee<</if>>. You chat with her about how you'd like the girl to look and act, ideally, and do other work while running your fingers through your Concubine's<<if $Concubine.hLength < 10>> short<</if>> hair. Your Head Girl's confident assistance managing your chattel and your Concubine's devoted comfort as you work allows you to @@.yellowgreen;be unusually productive@@ all morning.
 	<<set $cash += 1000>>
-	<</nobr>>
 	<</replace>>
 <</link>>
-<<link "Tease them while they meet with you">>
+<br><<link "Tease them while they meet with you">>
 	<<replace "#result">>
-	<<nobr>>
 	You tell them to go ahead, $HeadGirl.slaveName first, but you flip the sheet back and pat the soft mattress on either side of you while you do. They laugh and clamber on up, $HeadGirl.slaveName first, and she manages to drag a $HeadGirl.nipples nipple across your <<if $PC.boobs == 1>>own bare breasts<<else>>chest<</if>> as she climbs over you. Once she's situated under the crook of your arm, <<if $HeadGirl.boobs > 6000>>the huge weight of her boobs pressing against your ribcage<<elseif $HeadGirl.dick > 5>>which presses her absurd dick against your hip<<elseif $HeadGirl.energy > 95>>making the eager heat between the nympho's legs quite noticeable against your hip<<else>>her body warm against you<</if>>, she clears her throat and asks your permission to make a couple of last-minute changes to slaves' assignments for the day.
 	<br><br>
 	As she did so, you were encircling your girls in your <<if $PC.title == 1>>powerful arms<<else>>loving grip<</if>>. Cupping your Head Girl's butt in your left hand and your Concubine's in your right, you give them a good squeeze as $HeadGirl.slaveName finishes her question. Her voice rises cutely as your marauding hand moves over the place between her <<if $HeadGirl.butt > 6>>huge<<elseif $HeadGirl.butt > 3>>healthy<<else>>cute<</if>> buttocks and you slowly press a single malicious finger in against her <<if $HeadGirl.anus > 2>>loose asspussy<<elseif $HeadGirl.butt > 0>>practiced asshole<<else>>virgin pucker<</if>>. She manages to finish, but trails off into a groan, the warm, crinkled skin spasming against the teasing digit.
@@ -154,26 +150,20 @@ You wake up one morning to find $HeadGirl.slaveName and $Concubine.slaveName wai
 	she breathes across you at your Concubine.
 	<br><br>
 	They soon get their revenge as you give them their orders, though, moving their expert hands between your legs to give you a handjob. They do it cooperatively as you continue to play with them, letting you enjoy the delightful sensation of <<if $PC.dick == 1>>two hands working your shaft while another tickles your frenulum and a fourth massages your balls<<else>>a hand massaging your petals on either side while another delves two fingers inside you and a fourth pleasures your clit<</if>>. They crane their necks to rain kisses on your chin, neck, <<if $PC.boobs == 1>>breasts, and nipples,<<else>>and chest,<</if>> and on each other's mouths. You spring out of bed when you're satisfied, pulling your leadership with you towards the shower, and they @@.mediumaquamarine;trustingly bounce up to follow.@@
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if ($HeadGirl.ID == $slaves[$i].ID) || ($Concubine.ID == $slaves[$i].ID)>>
-			<<set $slaves[$i].trust += 4>>
-		<<set $slaves[$i].oralCount += 1>>
-		<<set $oralTotal += 1>>
-		<</if>>
-	<</for>>
-	<</nobr>>
+	<<set $slaves[$i].trust += 4, $slaves[$partner].trust += 4>>
+	<<set $slaves[$i].oralCount += 1, $slaves[$partner].oralCount += 1>>
+	<<set $oralTotal += 2>>
 	<</replace>>
 <</link>>
-<<if $HeadGirl.anus > 0>>\
-<<if $HeadGirl.vagina != 0>>\
-<<if $Concubine.anus > 0>>\
-<<if $Concubine.vagina != 0>>\
-<<link "Double penetrate them while they meet with you">>
+<<if $HeadGirl.anus > 0>>
+<<if $HeadGirl.vagina != 0>>
+<<if $Concubine.anus > 0>>
+<<if $Concubine.vagina != 0>>
+<br><<link "Double penetrate them while they meet with you">>
 	<<replace "#result">>
-	<<nobr>>
 	You sit up and order $HeadGirl.slaveName up onto the bed, on her back, and while she's <<if $HeadGirl.energy > 95>>eagerly obeying<<else>>obediently getting situated<</if>>, you tell $Concubine.slaveName to ride her, reverse cowgirl. She straddles your Head Girl, <<if $Concubine.butt > 6>>using her hands to situate her huge buttocks<<elseif $Concubine.boobs > 4000>>making her heavy boobs sway deliciously<<else>>carefully situating her legs astride $HeadGirl.slaveName's hips.<</if>> You plant a hard kiss on $Concubine.slaveName's mouth, pressing her backwards as you maneuver yourself into place<<if $PC.dick == 0>> and don a strap-on, since there isn't enough space for tribbing to work here<</if>>.
 	<<if $Concubine.vagina > -1>>
-		She moans into you as she feels you run <<if $PC.dick == 0>>the cool head of the phallus<<else>>your cockhead<</if>> along her<<if $activeSlave.labia > 0>> generous<</if>> labia before plunging it inside her. Getting the idea, $HeadGirl.slaveName
+		She moans into you as she feels you run <<if $PC.dick == 0>>the cool head of the phallus<<else>>your cockhead<</if>> along her<<if $Concubine.labia > 0>> generous<</if>> labia before plunging it inside her. Getting the idea, $HeadGirl.slaveName
 		<<if ($HeadGirl.dick > 0) && (canAchieveErection($HeadGirl))>>
 			<<if $HeadGirl.dick - $Concubine.anus > 2>>
 			gently pushes her cock up $Concubine.slaveName's ass, since she knows your Concubine's anus will be a little tight around her imposing dick.
@@ -250,25 +240,13 @@ You wake up one morning to find $HeadGirl.slaveName and $Concubine.slaveName wai
 			lube.
 		<</if>>
 	<</if>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if ($HeadGirl.ID == $slaves[$i].ID) || ($Concubine.ID == $slaves[$i].ID)>>
-			<<if ($slaves[$i].vagina > -1)>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<<else>>
-			<<set $slaves[$i].analCount += 1>>
-			<<set $analTotal += 1>>
-		<</if>>
-			<<set $slaves[$i].devotion += 4>>
-		<<set $slaves[$i].analCount += 1>>
-		<<set $analTotal += 1>>
-		<</if>>
-	<</for>>
-	<</nobr>>
+	<<set $slaves[$i].devotion += 4, $slaves[$partner].devotion += 4>>
+	<<BothVCheck 2 1>>
+	<<PartnerVCheck 2 1>>
 	<</replace>>
 <</link>>
-<</if>>\
-<</if>>\
-<</if>>\
-<</if>>\
+<</if>>
+<</if>>
+<</if>>
+<</if>>
 </span>
diff --git a/src/uncategorized/peLonelyBodyguard.tw b/src/uncategorized/peLonelyBodyguard.tw
index 319e6e49dd7f3b88ff0ce6d69192ef3d02041667..021ca93b35d55c489f97d2121949e89cf51997d4 100644
--- a/src/uncategorized/peLonelyBodyguard.tw
+++ b/src/uncategorized/peLonelyBodyguard.tw
@@ -1,73 +1,57 @@
-:: PE lonely bodyguard
+:: PE lonely bodyguard [nobr]
 
-<<nobr>>
+<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Random Nonindividual Event">>
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "Random Nonindividual Event">>
+<<set $activeSlave = $slaves.find(function(s) { return s.ID == $Bodyguard.ID; })>>
+<<set $j = $slaves.findIndex(function(s) { return s.ID != $Bodyguard.ID && s.relationship == 0 && s.devotion > -20; })>>
 
-<<if $activeSlave == 0>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if ($slaves[$i].ID != $Bodyguard.ID)>>
-	<<if ($slaves[$i].relationship == 0)>>
-		<<set $activeSlave = $slaves[$i]>>
-		<<break>>
-	<</if>>
-	<</if>>
-	<</for>>
-<</if>>
+You take an unusually close interest in $activeSlave.slaveName's health and mental well-being, since your health and mental well-being may rely on her combat effectiveness. She performs her duties acceptably, difficult though they are. Hers is a life of long hours and constant vigilance, and she has very little time to herself. The daily wear hasn't really affected her yet, but it may.
 
-<</nobr>>\
-\
-You take an unusually close interest in $Bodyguard.slaveName's health and mental well-being, since your health and mental well-being may rely on her combat effectiveness. She performs her duties acceptably, difficult though they are. Hers is a life of long hours and constant vigilance, and she has very little time to herself. The daily wear hasn't really affected her yet, but it may.
+<br><br>
+
+On a whim, you ask her whether she feels lonely. Caught off guard, she <<if canTalk($activeSlave) == false>>says in hesitant gestures that she's all right, and that her <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>'s companionship is enough for her.<<elseif ($activeSlave.lips > 70) || ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>lisps hesitantly "Ahm all right, <<Master>>. Ah love being near you; that'th enough for me."<<else>>says hesitantly "I'm all right, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>. I love being near you; that's enough for me."<</if>> The slight hesitation is explained the next time $slaves[$j].slaveName comes to your office. $activeSlave.slaveName watches everyone who sees you, of course, but you catch her eye running appreciatively up and down $slaves[$j].slaveName's body as she leaves.
+
+<br><br>
 
-On a whim, you ask her whether she feels lonely. Caught off guard, she <<if canTalk($Bodyguard) == false>>says in hesitant gestures that she's all right, and that her <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>'s companionship is enough for her.<<elseif ($Bodyguard.lips > 70) || ($Bodyguard.lipsPiercing+$Bodyguard.tonguePiercing > 2)>>lisps hesitantly "Ahm all right, <<Master>>. Ah love being near you; that'th enough for me."<<else>>says hesitantly "I'm all right, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>. I love being near you; that's enough for me."<</if>> The slight hesitation is explained the next time $activeSlave.slaveName comes to your office. $Bodyguard.slaveName watches everyone who sees you, of course, but you catch her eye running appreciatively up and down $activeSlave.slaveName's body as she leaves.
-\
 <span id="result">
 <<link "Make no mention of it">>
 	<<replace "#result">>
-	$Bodyguard.slaveName is a big girl and can look after herself, you reflect. You take no particular action to favor her interest in $activeSlave.slaveName.
+	$activeSlave.slaveName is a big girl and can look after herself, you reflect. You take no particular action to favor her interest in $slaves[$j].slaveName.
 	<</replace>>
 <</link>>
-<<link "Set them up">>
+<br><<link "Set them up">>
 	<<replace "#result">>
-	You decide to amuse yourself by engaging in a game of subtle matchmaking. You carefully rearrange $activeSlave.slaveName's schedule and duties so she and $Bodyguard.slaveName spend as much time as possible with one another. At the same time, you gradually reduce $activeSlave.slaveName's access to sexual outlets. After letting the situation marinate for a few days, you decide that the time is ripe, and without any further explanation assign $activeSlave.slaveName to spend the day in $Bodyguard.slaveName's armory. It's barely midmorning before they're making out on $Bodyguard.slaveName's workout mat, and by the afternoon $activeSlave.slaveName is under $Bodyguard.slaveName's workbench, orally servicing her new @@.lightgreen;fuckbuddy@@ as she maintains her machine pistol.
-		<<set $activeSlave.relationship = 3>>
-		<<set $activeSlave.relationshipTarget = $Bodyguard.ID>>
-		<<set $Bodyguard.relationship = 3>>
-		<<set $Bodyguard.relationshipTarget = $activeSlave.ID>>
-		<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-			<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-		<</for>>
-		<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $Bodyguard.ID == $slaves[$i].ID>>
-			<<set $slaves[$i] = $Bodyguard>>
-		<</if>>
-		<</for>>
+	You decide to amuse yourself by engaging in a game of subtle matchmaking. You carefully rearrange $slaves[$j].slaveName's schedule and duties so she and $activeSlave.slaveName spend as much time as possible with one another. At the same time, you gradually reduce $slaves[$j].slaveName's access to sexual outlets. After letting the situation marinate for a few days, you decide that the time is ripe, and without any further explanation assign $slaves[$j].slaveName to spend the day in $activeSlave.slaveName's armory. It's barely midmorning before they're making out on $activeSlave.slaveName's workout mat, and by the afternoon $slaves[$j].slaveName is under $activeSlave.slaveName's workbench, orally servicing her new @@.lightgreen;fuckbuddy@@ as she maintains her machine pistol.
+	<<set $slaves[$j].relationship = 3>>
+	<<set $slaves[$j].relationshipTarget = $activeSlave.ID>>
+	<<set $activeSlave.relationship = 3>>
+	<<set $activeSlave.relationshipTarget = $slaves[$j].ID>>
+	<<set $oralTotal += 1>>
 	<</replace>>
 <</link>>
-<<link "Marry them">>
+<br><<link "Marry them">>
 	<<replace "#result">>
-	You order $activeSlave.slaveName in and brusquely inform her she'll be marrying $Bodyguard.slaveName. $activeSlave.slaveName is too surprised to react much, and even $Bodyguard.slaveName looks shocked, but there is a gleam of wild glee in her eyes. You give them a few minutes to get dressed in special outfits you make available: they're lacy lingerie designed to resemble old world wedding dresses, but without concealing anything.
-	<br><br><<if ($Bodyguard.vagina == 0)>>$Bodyguard.slaveName is a virgin, so she's wearing white<<elseif ($Bodyguard.vagina < 0)>>$Bodyguard.slaveName is a sissy slave, so she's wearing light blue<<else>>$Bodyguard.slaveName is an experienced sex slave, so she's wearing light pink<</if>> against her $Bodyguard.skin skin. <<if ($Bodyguard.dick > 0) && ($Bodyguard.balls > 0) && ($Bodyguard.dickAccessory != "chastity") && ($Bodyguard.hormones < 1)>>The sight of $activeSlave.slaveName has her stiffly erect, and she's wearing a little bow around her cockhead.<<elseif ($Bodyguard.dick > 0) && ($Bodyguard.dickAccessory == "chastity")>>She's wearing a little bow over her caged girldick.<<elseif ($Bodyguard.dick > 0)>>She's impotent, but she's wearing a little bow around her useless cockhead.<<elseif ($Bodyguard.clit > 0)>>Her prominent clit is engorged, and she's wearing a tiny bow on it.<<else>>She's wearing a demure little bow just over her pussy.<</if>><<if ($Bodyguard.anus > 1)>> Her lacy panties are designed to spread her buttocks a little and display her big butthole.<<elseif ($Bodyguard.anus == 0)>> Her lacy panties cover her virgin anus, for once.<</if>> <<if ($Bodyguard.boobs > 1000)>>The bra makes no attempt to cover or even support her huge breasts, simply letting them through holes in the lace to jut proudly out.<<elseif ($Bodyguard.boobs > 500)>>The bra supports and presents her big breasts, leaving her stiffening nipples bare.<<else>>The bra supports and presents her breasts, giving her more cleavage than she usually displays.<</if>>
-	<br><br><<if ($activeSlave.vagina == 0)>>$activeSlave.slaveName is a virgin, so she's wearing white<<elseif ($activeSlave.vagina < 0)>>$activeSlave.slaveName is a sissy slave, so she's wearing light blue<<else>>$activeSlave.slaveName is an experienced sex slave, so she's wearing light pink<</if>> against her $activeSlave.skin skin. <<if ($activeSlave.dick > 0) && ($activeSlave.balls > 0) && ($activeSlave.dickAccessory != "chastity") && ($activeSlave.hormones < 1)>>The sight of $activeSlave.slaveName has her stiffly erect, and she's wearing a little bow around her cockhead.<<elseif ($activeSlave.dick > 0) && ($activeSlave.dickAccessory == "chastity")>>She's wearing a little bow over her caged girldick.<<elseif ($activeSlave.dick > 0)>>She's impotent, but she's wearing a little bow around her useless cockhead.<<elseif ($activeSlave.clit > 0)>>Her prominent clit is engorged, and she's wearing a tiny bow on it.<<else>>She's wearing a demure little bow just over her pussy.<</if>><<if ($activeSlave.anus > 1)>> Her lacy panties are designed to spread her buttocks a little and display her big butthole.<<elseif ($activeSlave.anus == 0)>> Her lacy panties cover her virgin anus, for once.<</if>> <<if ($activeSlave.boobs > 1000)>>The bra makes no attempt to cover or even support her huge breasts, simply letting them through holes in the lace to jut proudly out.<<elseif ($activeSlave.boobs > 500)>>The bra supports and presents her big breasts, leaving her stiffening nipples bare.<<else>>The bra supports and presents her breasts, giving her more cleavage than she usually displays.<</if>>
-	<br><br>The procedure is simple. The two of them prostrate themselves on the ground and beg your indulgence, though $activeSlave.slaveName is running on pure autopilot by this point. You state that you grant it, and hand each of them a simple gold band to be worn on the little finger in advertisement of the inferiority of their union. In turn, each of them gives the other her ring, and $Bodyguard.slaveName kisses her stunned bride. You pronounce them slave wives, and send them to the armory for their honeymoon. $Bodyguard.slaveName is so enthusiastic that in the coming days her obvious devotion wins $activeSlave.slaveName over to the arrangement.
-	<<set $Bodyguard.relationship = 5>>
+	You order $slaves[$j].slaveName in and brusquely inform her she'll be marrying $activeSlave.slaveName. $slaves[$j].slaveName is too surprised to react much, and even $activeSlave.slaveName looks shocked, but there is a gleam of wild glee in her eyes. You give them a few minutes to get dressed in special outfits you make available: they're lacy lingerie designed to resemble old world wedding dresses, but without concealing anything.
+	<br><br>
+	$activeSlave.slaveName is
+		<<if ($activeSlave.vagina == 0)>>a virgin, so she's wearing white<<elseif ($activeSlave.vagina < 0) && ($activeSlave.dick > 0)>>a sissy slave, so she's wearing light blue<<elseif ($activeSlave.vagina < 0) && ($activeSlave.dick < 1)>>a null, so it's wearing black<<else>>is an experienced sex slave, so she's wearing light pink<</if>> against her $activeSlave.skin skin.
+		<<if canPenetrate($activeSlave)>>The sight of $slaves[$j].slaveName has her stiffly erect, and she's wearing a little bow around her cockhead.<<elseif canAchieveErection($activeSlave)>>She's wearing a little bow over her caged girldick.<<elseif ($activeSlave.dick > 0)>>She's impotent, but she's wearing a little bow around her useless cockhead.<<elseif ($activeSlave.clit > 0)>>Her prominent clit is engorged, and she's wearing a tiny bow on it.<<elseif ($activeSlave.vagina >= 0)>>She's wearing a demure little bow just over her pussy.<</if>>
+		<<if ($activeSlave.anus > 1)>> Her lacy panties are designed to spread her buttocks a little and display her big butthole.<<elseif ($activeSlave.anus == 0)>> Her lacy panties cover her virgin anus, for once.<</if>>
+		<<if ($activeSlave.boobs > 1000)>>Her bra makes no attempt to cover or even support her huge breasts, simply letting them through holes in the lace to jut proudly out.<<elseif ($activeSlave.boobs > 500)>>Her bra supports and presents her big breasts, leaving her stiffening nipples bare.<<else>>Her bra supports and presents her breasts, giving her more cleavage than she usually displays.<</if>>
+	<br><br>
+	$slaves[$j].slaveName is
+		<<if ($slaves[$j].vagina == 0)>>a virgin, so she's wearing white<<elseif ($slaves[$j].vagina < 0) && ($slaves[$j].dick > 0)>>a sissy slave, so she's wearing light blue<<elseif ($slaves[$j].vagina < 0) && ($slaves[$j].dick < 1)>>a null, so it's wearing black<<else>>is an experienced sex slave, so she's wearing light pink<</if>> against her $slaves[$j].skin skin.
+		<<if canPenetrate($slaves[$j])>>The sight of $slaves[$j].slaveName has her stiffly erect, and she's wearing a little bow around her cockhead.<<elseif canAchieveErection($slaves[$j])>>She's wearing a little bow over her caged girldick.<<elseif ($slaves[$j].dick > 0)>>She's impotent, but she's wearing a little bow around her useless cockhead.<<elseif ($slaves[$j].clit > 0)>>Her prominent clit is engorged, and she's wearing a tiny bow on it.<<elseif ($slaves[$j].vagina >= 0)>>She's wearing a demure little bow just over her pussy.<</if>>
+		<<if ($slaves[$j].anus > 1)>> Her lacy panties are designed to spread her buttocks a little and display her big butthole.<<elseif ($slaves[$j].anus == 0)>> Her lacy panties cover her virgin anus, for once.<</if>>
+		<<if ($slaves[$j].boobs > 1000)>>Her bra makes no attempt to cover or even support her huge breasts, simply letting them through holes in the lace to jut proudly out.<<elseif ($slaves[$j].boobs > 500)>>Her bra supports and presents her big breasts, leaving her stiffening nipples bare.<<else>>Her bra supports and presents her breasts, giving her more cleavage than she usually displays.<</if>>
+	<br><br>
+	The procedure is simple. The two of them prostrate themselves on the ground and beg your indulgence, though $slaves[$j].slaveName is running on pure autopilot by this point. You state that you grant it, and hand each of them a simple gold band to be worn on the little finger in advertisement of the inferiority of their union. In turn, each of them gives the other her ring, and $activeSlave.slaveName kisses her stunned bride. You pronounce them @@.lightgreen;slave wives@@, and send them to the armory for their honeymoon. $activeSlave.slaveName is so enthusiastic that in the coming days her obvious devotion @@.hotpink;wins $slaves[$j].slaveName over to the arrangement.@@
+	<<set $slaves[$j].devotion = Math.max(20, $slaves[$j].devotion + 10)>> /* to accepting or better */
+	<<set $slaves[$j].relationship = 5>>
+	<<set $slaves[$j].relationshipTarget = $activeSlave.ID>>
 	<<set $activeSlave.relationship = 5>>
+	<<set $activeSlave.relationshipTarget = $slaves[$j].ID>>
 	<<set $oralTotal += 2>>
-		<<set $activeSlave.relationshipTarget = $Bodyguard.ID>>
-		<<set $Bodyguard.relationshipTarget = $activeSlave.ID>>
-		<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.ID == $slaves[$i].ID>>
-			<<set $slaves[$i] = $activeSlave>><<break>>
-		<</if>>
-		<</for>>
-		<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $Bodyguard.ID == $slaves[$i].ID>>
-			<<set $slaves[$i] = $Bodyguard>>
-		<</if>>
-		<</for>>
 	<</replace>>
 <</link>>
 </span>
diff --git a/src/uncategorized/persBusiness.tw b/src/uncategorized/persBusiness.tw
index 62702236e48604353f3e85aad10b58094998f504..19c3e9dce7aafdd97daa2bb45e370409d0173f20 100644
--- a/src/uncategorized/persBusiness.tw
+++ b/src/uncategorized/persBusiness.tw
@@ -1,6 +1,6 @@
 :: Personal Business [nobr]
 
-<<if $useTabs>>__Personal Business__<</if>>
+<<if $useTabs == 0>>__Personal Business__<</if>>
 <br>
 
 <<if $cash < 0>>
diff --git a/src/uncategorized/previousSlaveInLine.tw b/src/uncategorized/previousSlaveInLine.tw
index 9fc8b3d14e177c379b8747d7d3ca6557e3d74c91..d33f3a3e9568827e6c00d2a65c28ba974212eecd 100644
--- a/src/uncategorized/previousSlaveInLine.tw
+++ b/src/uncategorized/previousSlaveInLine.tw
@@ -2,13 +2,8 @@
 
 <<silently>>
 
-<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $activeSlave.ID == $slaves[$i].ID>>
-	<<set $slaves[$i] = $activeSlave>>
-	<<set $activeSlave = {}>>
-	<<break>>
-	<</if>>
-<</for>>
+<<set $i = $slaves.findIndex(function(s) { return s.ID == $activeSlave.ID; })>>
+<<set $slaves[$i] = $activeSlave>> /* save changes before switching */
 
 <<if $place == 0>>
 	<<set $activeSlave = $slavesInLine[$slavesInLine.length-1]>>
@@ -19,3 +14,4 @@
 <<goto "Slave Interact">>
 
 <</silently>>
+
diff --git a/src/uncategorized/randomEventSelect.tw b/src/uncategorized/randomEventSelect.tw
index 809097b18044c7646378770efd2d12421e41b08d..4a318d56ea124e9a5df0710736c66b170f3dc3c7 100644
--- a/src/uncategorized/randomEventSelect.tw
+++ b/src/uncategorized/randomEventSelect.tw
@@ -1,5 +1,7 @@
 :: random event select [nobr]
 
+<<set $nextButton = "Refresh", $nextLink = "random event select">>
+
 <<if $events.length == 0>>
 	<<set $events.push("RE no event")>>
 <</if>>
@@ -18,4 +20,5 @@
 <br><br>
 DEBUG:
 <br>
-	[[RE no event]]
+[[RE no event]] | <<print "[[Go back to previous passage: '" + previous() + "'|previous()][$activeSlave = 0, $eventSlave = 0]] | [[Go all the way back to Scheduled Event|Scheduled Event][$activeSlave = 0, $eventSlave = 0]]">>
+
diff --git a/src/uncategorized/randomIndividualEvent.tw b/src/uncategorized/randomIndividualEvent.tw
index 3132d58ec5eafe83e1167ada4f66ef140babe46b..4f257fa4e38053a56f812342dcbf60e4e0d0e386 100644
--- a/src/uncategorized/randomIndividualEvent.tw
+++ b/src/uncategorized/randomIndividualEvent.tw
@@ -2,29 +2,22 @@
 
 <<set $showEncyclopedia = 0>>
 <<if $eventSlave == 0>>
+  <<set $eventSlave = $eligibleSlaves.random()>>
   <<if $cheatMode == 1>>
-	''One of the following slaves would have been selected for a random event:''
+	<<set $nextButton = "Refresh", $nextLink = "Random Individual Event", $returnTo = "Random Individual Event">>
+	''One of the following eligible slaves would have been selected for an individual random event:''
 	<br>
 	<<for $i = 0; $i < $eligibleSlaves.length; $i++>>
-		<<print "[[$eligibleSlaves[$i].slaveName|Random Individual Event][$eventSlave = $eligibleSlaves[" + $i + "]]]">>
-		<br>
+		<br><<print "[[$eligibleSlaves[$i].slaveName|Random Individual Event][$eventSlave = $eligibleSlaves[" + $i + "]]]">>
 	<</for>>
+	<br><br>[[Switch to Random Nonindividual Event|Random Nonindividual Event][$activeSlave = 0, $eventSlave = 0]]
   <<else>>
-	<<set $eventSlave = $eligibleSlaves.random()>>
 	<<goto "Random Individual Event">>
   <</if>>
 <<else>>
 <<silently>>
-<<set $events = []>>
-<<set $RESSevent = []>>
-<<set $RESSTRevent = []>>
-<<set $RETSevent = []>>
-<<set $RECIevent = []>>
-<<set $activeSlave = 0>>
-<<set $groomSlave = 0>>
-<<set $brideSlave = 0>>
-
-<<set $legendaryFacility = 0>>
+/* initialize event lists as arrays [], not objects {} */
+<<set $events = [], $RESSevent = [], $RESSTRevent = [], $RETSevent = [], $RECIevent = [], $activeSlave = 0, $groomSlave = 0, $brideSlave = 0, $legendaryFacility = 0>>
 
 /* SUB CHECKS */
 
@@ -1760,3 +1753,4 @@
 
 <</silently>>
 <</if>> /* CLOSES SLAVE SELECT */
+
diff --git a/src/uncategorized/randomNonindividualEvent.tw b/src/uncategorized/randomNonindividualEvent.tw
index c06b392bea72639126be1749a99e3c5166b2db64..b9d395f60452f3241077363850ac1e6ed24bdb11 100644
--- a/src/uncategorized/randomNonindividualEvent.tw
+++ b/src/uncategorized/randomNonindividualEvent.tw
@@ -1,20 +1,25 @@
-:: Random Nonindividual Event
-
-<<silently>>
+:: Random Nonindividual Event [nobr]
 
 <<set $showEncyclopedia = 0>>
-
-<<set $events = []>>
-<<set $RecETSevent = []>>
-<<set $REFIevent = []>>
-<<set $PESSevent = []>>
-<<set $PETSevent = []>>
-<<set $activeSlave = 0>>
-<<set $groomSlave = 0>>
-<<set $brideSlave = 0>>
+<<if $eventSlave == 0>>
+  <<set $eventSlave = $slaves.random()>>
+  <<if $cheatMode == 1>>
+	<<set $nextButton = "Refresh", $nextLink = "Random Nonindividual Event", $returnTo = "Random Nonindividual Event">>
+	''Any one of your slaves would have been selected for a random non-individual event:''
+	<br>
+	<<for $i = 0; $i < $slaves.length; $i++>>
+		<br><<print "[[$slaves[$i].slaveName|Random Nonindividual Event][$eventSlave = $slaves[" + $i + "]]]">>
+	<</for>>
+	<br><br>[[Switch to RIE Eligibility Check|RIE Eligibility Check][$activeSlave = 0, $eventSlave = 0]]
+  <<else>>
+	<<goto "Random Nonindividual Event">>
+  <</if>>
+<<else>>
+<<silently>>
+/* initialize event lists as arrays [], not objects {} */
+<<set $events = [], $RecETSevent = [], $REFIevent = [], $PESSevent = [], $PETSevent = [], $activeSlave = 0, $groomSlave = 0, $brideSlave = 0>>
 
 <<set $seed = 0>>
-<<set $eventSlave = $slaves.random()>>
 
 <<if $eventSlave.fuckdoll == 0>>
 
@@ -28,11 +33,11 @@
 	<<set $events.push("RE nickname")>>
 	<<set $events.push("RE nickname")>>
 	<<set $events.push("RE nickname")>>
-	<<set $seed = 1>>
+	<<set $seed = 1>> /* tells RE nickname to set nextLink to RIE Eligibility Check */
 	<<else>>
 	<<set $events.push("RE nickname")>>
 	<<set $events.push("RE nickname")>>
-	<<set $seed = 1>>
+	<<set $seed = 1>> /* tells RE nickname to set nextLink to RIE Eligibility Check */
 	<</if>>
 	<</if>>
 <</if>> /* closes nickname check */
@@ -1263,3 +1268,5 @@
 <</if>>
 
 <</silently>>
+<</if>> /* CLOSES SLAVE SELECT */
+
diff --git a/src/uncategorized/reDevotedMotherDaughter.tw b/src/uncategorized/reDevotedMotherDaughter.tw
index a2a5877c5f7395d42b54b952a18194bc922a0033..296dad9ce9a2cd1a60253bab51fb91f18ee9911b 100644
--- a/src/uncategorized/reDevotedMotherDaughter.tw
+++ b/src/uncategorized/reDevotedMotherDaughter.tw
@@ -1,63 +1,47 @@
 :: RE devoted mother daughter [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check">>
 
-$mother.slaveName and her daughter are both good slaves, devoted and obedient. They'd probably do anything you order them to do. By happenstance they come before you for inspection one after the other. They certainly see each other stark naked frequently enough. As you finish $mother.slaveName's inspection, her daughter waits patiently for her turn. It occurs to you that they probably would to //anything// you order them to do, and that they're so acclimated to sexual slavery that they might well enjoy it.
+<<set $i = $slaves.findIndex(function(s) { return s.ID == $devMother.ID; })>>
+<<set $j = $slaves.findIndex(function(s) { return s.ID == $devDaughter.ID; })>>
+
+$devMother.slaveName and her daughter $devDaughter.slaveName are both good slaves, devoted and obedient. They'd probably do anything you order them to do. By happenstance they come before you for inspection one after the other. They certainly see each other stark naked frequently enough. As you finish $devMother.slaveName's inspection, her daughter waits patiently for her turn. It occurs to you that they probably would do //anything// you order them to do, and that they're so acclimated to sexual slavery that they might well enjoy it.
 
 <br><br>
+
 <span id="result">
 <br><<link "Spend the night sharing your bed with them, and each of them with the other">>
 	<<replace "#result">>
-	Neither of them bats an eye when you announce you're turning in early and that they'll be joining you. Since they're already naked, they get into your big soft bed before you and lie facing each other, with enough room in between them for you to take a central position. They clearly assume you'll start with one of them on each side of you, so they're quite surprised when you slide in behind $mother.slaveName instead. $daughter.slaveName snuggles up to her mother happily enough, however. You extend the foreplay to hours, eventually bringing both of them to such a state of naked arousal that they begin grinding against each other as much as they do you. They get the idea, and things turn into a sort of unspoken mutual one-upsmanship between them. What starts with $daughter.slaveName clearly feeling very daring as she sucks her mother's nipple ends with $mother.slaveName lying on her back getting fucked by you while she orally pleasures $daughter.slaveName. You're face to face with $daughter.slaveName and she groans happily into your mouth as $mother.slaveName moans into her fuckhole.
+	Neither of them bats an eye when you announce you're turning in early and that they'll be joining you. Since they're already naked, they get into your big soft bed before you and lie facing each other, with enough room in between them for you to take a central position. They clearly assume you'll start with one of them on each side of you, so they're quite surprised when you slide in behind $devMother.slaveName instead. $devDaughter.slaveName snuggles up to her mother happily enough, however. You extend the foreplay to hours, eventually bringing both of them to such a state of naked arousal that they begin grinding against each other as much as they do you. They get the idea, and things turn into a sort of unspoken mutual one-upsmanship between them. What starts with $devDaughter.slaveName clearly feeling very daring as she sucks her mother's nipple ends with $devMother.slaveName lying on her back getting fucked by you while she orally pleasures $devDaughter.slaveName. You're face to face with $devDaughter.slaveName and she groans happily into your mouth as $devMother.slaveName moans into her fuckhole.
 	@@.mediumaquamarine;They have both become more trusting of you.@@
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $daughter.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust += 4>>
-		<<if canDoAnal($slaves[$i])>>
-			<<set $slaves[$i].analCount += 1>>
-			<<set $analTotal += 1>>
-		<<elseif canDoVaginal($slaves[$i])>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<</if>>
-		<<set $slaves[$i].oralCount += 1>>
-		<<set $oralTotal += 1>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $mother.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust += 4>>
-		<<if canDoAnal($slaves[$i])>>
+
+	<<set $slaves[$i].trust += 4, $slaves[$j].trust += 4, $slaves[$i].oralCount += 1, $slaves[$j].oralCount += 1, $oralTotal += 2>>
+
+	<<if canDoAnal($slaves[$i])>>
 		<<set $slaves[$i].analCount += 1>>
 		<<set $analTotal += 1>>
-		<<elseif canDoVaginal($slaves[$i])>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<</if>>
-		<<set $slaves[$i].oralCount += 1>>
-		<<set $oralTotal += 1>>
+	<<elseif canDoVaginal($slaves[$i])>>
+		<<set $slaves[$i].vaginalCount += 1>>
+		<<set $vaginalTotal += 1>>
+	<</if>>
+
+	<<if canDoAnal($slaves[$j])>>
+		<<set $slaves[$j].analCount += 1>>
+		<<set $analTotal += 1>>
+	<<elseif canDoVaginal($slaves[$j])>>
+		<<set $slaves[$j].vaginalCount += 1>>
+		<<set $vaginalTotal += 1>>
 	<</if>>
-	<</for>>
+
 	<</replace>>
 <</link>>
 <br><<link "Get them started and then keep them at it in your office">>
 	<<replace "#result">>
-	You give them orders of devastating simplicity: they are to repair to the couch in your office and are to take turns getting each other off until such time as you tell them otherwise. They're momentarily stunned, but $mother.slaveName takes the lead and draws her daughter over to the couch by the hand. They're both accomplished sex slaves and obey orders well, so they are quite successful in the little game, if a bit mechanical. For the rest of the day, interviewees come and go and are treated to the sight of the two of them having subdued sex on the couch. Showing off one's slaves for business interlocutors is a common Free Cities practice, but more than one perceptive person figures out what the resemblance between the two slaves and the age gap between them really means. Of course, all those who figure it out are impressed by your sheer decadence.
+	You give them orders of devastating simplicity: they are to repair to the couch in your office and are to take turns getting each other off until such time as you tell them otherwise. They're momentarily stunned, but $devMother.slaveName takes the lead and draws her daughter over to the couch by the hand. They're both accomplished sex slaves and obey orders well, so they are quite successful in the little game, if a bit mechanical. For the rest of the day, interviewees come and go and are treated to the sight of the two of them having subdued sex on the couch. Showing off one's slaves for business interlocutors is a common Free Cities practice, but more than one perceptive person figures out what the resemblance between the two slaves and the age gap between them really means. Of course, all those who figure it out are impressed by your sheer decadence.
 	@@.green;Your reputation has increased considerably.@@
 	<<set $rep += 1000>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $daughter.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].oralCount += 5>>
-		<<set $oralTotal += 5>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $mother.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].oralCount += 5>>
-		<<set $oralTotal += 5>>
-	<</if>>
-	<</for>>
+	<<set $slaves[$i].oralCount += 5, $slaves[$j].oralCount += 5, $oralTotal += 10>>
 	<</replace>>
 <</link>>
 </span>
+
diff --git a/src/uncategorized/reDevotedTwins.tw b/src/uncategorized/reDevotedTwins.tw
index 37abf0614dc00bedc49b402419c937eb6af686f8..30a0ff421d27434afaaec79cbd9f9cdd0b259785 100644
--- a/src/uncategorized/reDevotedTwins.tw
+++ b/src/uncategorized/reDevotedTwins.tw
@@ -1,61 +1,49 @@
 :: RE devoted twins [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check">>
+
+<<set $i = $slaves.findIndex(function(s) { return s.ID == $alphaTwin.ID; })>>
+<<set $j = $slaves.findIndex(function(s) { return s.ID == $betaTwin.ID; })>>
 
 $alphaTwin.slaveName and $betaTwin.slaveName are such good and devoted slaves that they happily do everything together. They sleep in each other's arms, bathe together, work together whenever they can, and fuck together. For a while they masturbated together until they became so habituated to sexual slavery that they stopped seeing much distinction between masturbation and sex with one another. At the moment, they're getting ready for their day, chatting quietly and helping each other.
 <br><br>
 <span id="result">
-<br><<link "Take them out for the morning">>
+<<link "Take them out for the morning">>
 	<<replace "#result">>
 	<br>You head out of your penthouse with a pretty sex slave under each arm. They're attentive companions, doing everything they can to mirror each other as they show off their bodies to onlookers. It's a bright, sunny day, so you walk them up and down a busy glassed-in galleria. They clearly expect you to fuck them in public, but for once you just enjoy a couple of hours with them. They start disappointed that you aren't going to use them, but they quickly get over it and enjoy preening under your arms.
 	@@.mediumaquamarine;They have both become more trusting of you,@@ and @@.green;your reputation has increased considerably.@@
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $alphaTwin.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust += 4>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $betaTwin.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust += 4>>
-	<</if>>
-	<</for>>
+	<<set $slaves[$i].trust += 4, $slaves[$j].trust += 4>>
 	<<set $rep += 1000>>
 	<</replace>>
 <</link>>
 <br><<link "Use them side by side">>
 	<<replace "#result">>
 	<br>Slave twins inevitably get used to threesomes with their sibling, and $alphaTwin.slaveName and $betaTwin.slaveName are no exception. They greet you with every appearance of arousal and begin a carefully balanced routine - foreplay with you, of course, but whatever parts of them aren't working on you work on the other slave. They stroke you while making out, stroke each other while sucking you to rock hardness, and finger each others' holes while <<if $PC.vagina == 1>>crowding their faces against your pussy. You reach down and seize a nipple in each hand, pulling them upward so they can suck your nipples instead; they use manual stimulation to keep you going while they do. With one straddling each of your thighs, grinding shamelessly, you can reach around and molest their butts with your own hands.<<else>>rubbing four breasts up and down your dick. Since you only have one cock, the symmetry ends when you start fucking them. As you switch from hole to hole, whichever twin isn't getting fucked at the moment uses her mouth and hands to stimulate your balls and her twin's fuckhole as you pound it. When you finally cum in $betaTwin.slaveName, $alphaTwin.slaveName sucks it out and they kiss deeply to share your ejaculate.<</if>> @@.hotpink;They have both become more devoted to you.@@
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $alphaTwin.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].devotion += 4>>
-		<<if canDoAnal($slaves[$i])>>
+
+	<<set $slaves[$i].devotion += 4, $slaves[$j].devotion += 4>>
+
+	<<if canDoAnal($slaves[$i])>>
 		<<set $slaves[$i].analCount += 1>>
 		<<set $analTotal += 1>>
-		<<elseif canDoVaginal($slaves[$i])>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<<else>>
-			<<set $slaves[$i].oralCount += 1>>
-			<<set $oralTotal += 1>>
-		<</if>>
+	<<elseif canDoVaginal($slaves[$i])>>
+		<<set $slaves[$i].vaginalCount += 1>>
+		<<set $vaginalTotal += 1>>
+	<<else>>
+		<<set $slaves[$i].oralCount += 1>>
+		<<set $oralTotal += 1>>
 	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $betaTwin.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].devotion += 4>>
-		<<if canDoAnal($slaves[$i])>>
-		<<set $slaves[$i].analCount += 1>>
+
+	<<if canDoAnal($slaves[$j])>>
+		<<set $slaves[$j].analCount += 1>>
 		<<set $analTotal += 1>>
-		<<elseif canDoVaginal($slaves[$i])>>
-			<<set $slaves[$i].vaginalCount += 1>>
-			<<set $vaginalTotal += 1>>
-		<<else>>
-			<<set $slaves[$i].oralCount += 1>>
-			<<set $oralTotal += 1>>
-		<</if>>
+	<<elseif canDoVaginal($slaves[$j])>>
+		<<set $slaves[$j].vaginalCount += 1>>
+		<<set $vaginalTotal += 1>>
+	<<else>>
+		<<set $slaves[$j].oralCount += 1>>
+		<<set $oralTotal += 1>>
 	<</if>>
-	<</for>>
+
 	<</replace>>
 <</link>>
 </span>
diff --git a/src/uncategorized/reFullBed.tw b/src/uncategorized/reFullBed.tw
index ee88710c2202e414669bf71fbb991cbc255dcc99..a9efe32f60d8995a44a2df10fe9a74ccba653efe 100644
--- a/src/uncategorized/reFullBed.tw
+++ b/src/uncategorized/reFullBed.tw
@@ -1,89 +1,52 @@
 :: RE full bed [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check">>
 
-<<set $bedSlaveOne = 0>>
-<<set $bedSlaveTwo = 0>>
-<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if ($slaves[$i].assignment == "please you") || ($slaves[$i].assignment == "serve in the master suite") || ($slaves[$i].assignment == "be your Concubine")>>
-	<<if $slaves[$i].devotion > 50>>
-	<<if $slaves[$i].anus > 0>>
-		<<if $bedSlaveOne == 0>>
-		<<set $bedSlaveOne = $slaves[$i]>>
-	<<elseif $bedSlaveTwo == 0>>
-		<<set $bedSlaveTwo = $slaves[$i]>>
-		<<break>>
-		<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-<</for>>
-<<if ($bedSlaveOne == 0) || ($bedSlaveTwo == 0)>>
+<<set _bedSlaveOne = $slaves.findIndex(function(s) { return s.devotion > 50 && s.anus > 0 && (s.assignment == "please you" || s.assignment == "serve in the master suite" || s.assignment == "be your Concubine"); })>>
+<<if _bedSlaveOne != -1>>
+	<<set _bedSlaveTwo = $slaves.findIndex(function(s) { return s.ID != $slaves[_bedSlaveOne].ID && s.devotion > 50 && s.anus > 0 && (s.assignment == "please you" || s.assignment == "serve in the master suite" || s.assignment == "be your Concubine"); })>>
+<</if>>
+<<if (_bedSlaveOne == -1) || (_bedSlaveTwo == -1)>>
 	<<goto "RIE Eligibility Check">>
 <</if>>
 
+You have the luxury of being attended to by a coterie of devoted sex slaves. Tonight, $slaves[_bedSlaveTwo].slaveName and $slaves[_bedSlaveOne].slaveName are with you when it's time for bed, so they strip naked and climb under the sheets with you, one on either side. Each snuggles in under one of your arms so she can rest her head on your shoulder, a hand on your chest, her breasts against your flank, <<if $slaves[_bedSlaveTwo].preg > 10 && $slaves[_bedSlaveOne].preg > 10>>her swollen belly against yours, <</if>>and the warmth between her legs against your hip.
 
-You have the luxury of being attended to by a coterie of devoted sex slaves. Tonight, $bedSlaveTwo.slaveName and $bedSlaveOne.slaveName are with you when it's time for bed, so they strip naked and climb under the sheets with you, one on either side. Each snuggles in under one of your arms so she can rest her head on your shoulder, a hand on your chest, her breasts against your flank, <<if $bedSlaveTwo.preg > 10 and $bedSlaveOne.preg > 10>>her swollen belly against yours, <</if>>and the warmth between her legs against your hip.
+<br><br>
 
 Today was an unusually relaxing day, and you aren't particularly tired.
 
 <br><br>
+
 <span id="result">
-<br><<link "Take a slave in each hand">>
+<<link "Take a slave in each hand">>
 	<<replace "#result">>
 		With your arms each around a slave, you begin to run your hands across their bodies. They snuggle closer to you, their nipples growing hard and their hips grinding against you. As your grasp runs lower and lower, cupping and massaging their buttocks, they begin to kiss the chest against which their adoring faces are pressed, and reach down <<if $PC.dick == 0>>to your pussy<<else>><<if $PC.vagina == 1>>towards your cock and cunt<<else>>for your member<</if>><</if>>. The more manually skilled begins to give you a gentle stroke, while the other softly massages your <<if ($PC.dick == 0)>>mons<<else>>testicles<</if>>. They stiffen in unison when you hook two fingers up each asshole, but immediately relax and begin to work you harder. They orgasm one after the other, their butts clenching against your intruding fingers, and then eagerly clean you with their mouths when you climax yourself. They have become @@.hotpink;still more devoted to you.@@
-		<<set $bedSlaveOne.devotion += 4>>
-		<<set $bedSlaveTwo.devotion += 4>>
-			<<set $bedSlaveOne.analCount += 1>>
-			<<set $bedSlaveTwo.analCount += 1>>
-			<<set $analTotal += 2>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $bedSlaveOne.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $bedSlaveOne>>
-		<<set $bedSlaveOne = 0>>
-	<<elseif $bedSlaveTwo.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $bedSlaveTwo>>
-		<<set $bedSlaveTwo = 0>>
-	<</if>>
-	<</for>>
+		<<set $slaves[_bedSlaveOne].devotion += 4>>
+		<<set $slaves[_bedSlaveTwo].devotion += 4>>
+		<<set $slaves[_bedSlaveOne].analCount += 1>>
+		<<set $slaves[_bedSlaveTwo].analCount += 1>>
+		<<set $analTotal += 2>>
 	<</replace>>
 <</link>>
 <<if $bedSlaveTwo.preg > 20 && $bedSlaveOne.preg > 20 && $PC.dick == 1>>
 <br><<link "Fondle their pregnancies">>
 	<<replace "#result">>
 		With your arms each around a slave, you begin to run your hands across their bodies, focusing your attention on their full pregnancies. They snuggle closer to you, their nipples growing hard and their hips grinding against you. As they move, your rising cock catches in between their gravid middles, giving you an idea. Shifting your arms under and around their backs, you pull them together over your erect member and begin using their taut stomachs to pleasure yourself. They quickly catch on and push closer to each other, trapping your dick between them. Once they begin rubbing, and you humping, the skin surrounding you is quickly coated in precum. They smile at you as they feel your penis tense, and with one final thrust you coat their bellies in a layer of cum. They love your discovery of a new way to enjoy their bodies and become @@.hotpink;even more devoted to you.@@
-		<<set $bedSlaveOne.devotion += 5>>
-		<<set $bedSlaveTwo.devotion += 5>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $bedSlaveOne.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $bedSlaveOne>>
-		<<set $bedSlaveOne = 0>>
-	<<elseif $bedSlaveTwo.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $bedSlaveTwo>>
-		<<set $bedSlaveTwo = 0>>
-	<</if>>
-	<</for>>
+		<<set $slaves[_bedSlaveOne].devotion += 5>>
+		<<set $slaves[_bedSlaveTwo].devotion += 5>>
 	<</replace>>
 <</link>>
 <</if>>
 <br><<link "Pull up the sheets and wrestle">>
 	<<replace "#result">>
-		Without warning, you jerk the sheets all the way up and pin them at the head of the bed. They giggle as you seize first the one and then the other, groping and tickling. $bedSlaveTwo.slaveName and $bedSlaveOne.slaveName catch the spirit of fun, and rove around in the soft darkness under the sheets. You're <<if $PC.dick == 1>>rock hard<<if $PC.vagina == 1>> and <</if>><</if>><<if $PC.vagina == 1>>soaking wet<</if>> in no time, wrestling with two naked slaves, and begin to fuck the first one you can grab and hold. <<if ($bedSlaveOne.amp != 1) && ($bedSlaveTwo.amp != 1)>>When you <<if ($PC.dick == 0)>>finish with her<<else>>come inside her<</if>>, you release her and she slides out of bed to wash; by the time she gets back under the sheets, clean and fresh, you're on the point of filling the other.<<else>>When you <<if ($PC.dick == 0)>>finish with her<<else>>come inside her<</if>>, you carry her limbless, helpless body out of bed to wash her, and then return to the bed to fuck the other.<</if>> You switch off with the two of them, fucking them in turn, until everyone falls asleep in an exhausted pile. They have become @@.mediumaquamarine;still more trusting of you.@@
-		<<set $bedSlaveOne.trust += 4>>
-		<<set $bedSlaveTwo.trust += 4>>
-			<<set $bedSlaveOne.analCount += 3>>
-			<<set $bedSlaveTwo.analCount += 3>>
-			<<set $analTotal += 6>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $bedSlaveOne.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $bedSlaveOne>>
-		<<set $bedSlaveOne = 0>>
-	<<elseif $bedSlaveTwo.ID == $slaves[$i].ID>>
-		<<set $slaves[$i] = $bedSlaveTwo>>
-		<<set $bedSlaveTwo = 0>>
-	<</if>>
-	<</for>>
+		Without warning, you jerk the sheets all the way up and pin them at the head of the bed. They giggle as you seize first the one and then the other, groping and tickling. $slaves[_bedSlaveTwo].slaveName and $slaves[_bedSlaveOne].slaveName catch the spirit of fun, and rove around in the soft darkness under the sheets. You're <<if $PC.dick == 1>>rock hard<<if $PC.vagina == 1>> and <</if>><</if>><<if $PC.vagina == 1>>soaking wet<</if>> in no time, wrestling with two naked slaves, and begin to fuck the first one you can grab and hold. <<if ($slaves[_bedSlaveOne].amp != 1) && ($slaves[_bedSlaveTwo].amp != 1)>>When you <<if ($PC.dick == 0)>>finish with her<<else>>come inside her<</if>>, you release her and she slides out of bed to wash; by the time she gets back under the sheets, clean and fresh, you're on the point of filling the other.<<else>>When you <<if ($PC.dick == 0)>>finish with her<<else>>come inside her<</if>>, you carry her limbless, helpless body out of bed to wash her, and then return to the bed to fuck the other.<</if>> You switch off with the two of them, fucking them in turn, until everyone falls asleep in an exhausted pile. They have become @@.mediumaquamarine;still more trusting of you.@@
+		<<set $slaves[_bedSlaveOne].trust += 4>>
+		<<set $slaves[_bedSlaveTwo].trust += 4>>
+		<<set $slaves[_bedSlaveOne].analCount += 3>>
+		<<set $slaves[_bedSlaveTwo].analCount += 3>>
+		<<set $analTotal += 6>>
 	<</replace>>
 <</link>>
 </span>
+
diff --git a/src/uncategorized/reLegendaryBalls.tw b/src/uncategorized/reLegendaryBalls.tw
index 84cf7e103ddd45cd9ff68a352a7ea7253dedd93a..bfd6c260f824e0a116672d94f47c81e2557d37bd 100644
--- a/src/uncategorized/reLegendaryBalls.tw
+++ b/src/uncategorized/reLegendaryBalls.tw
@@ -5,12 +5,8 @@
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check", _SL = $slaves.length>>
 
 <<if $legendaryFacility == 1>>
-	<<for $i = 0; $i < _SL; $i++>>
-		<<if $legendaryBallsID == $slaves[$i].ID>>
-			<<set $activeSlave = $slaves[$i]>>
-		<</if>>
-	<</for>>
-	<<if $i >= _SL>> /* not found - reset variable and stop event */
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $legendaryBallsID; })>>
+	<<if (ndef $activeSlave)>> /* not found - reset variable and stop event */
 		<<set $legendaryBallsID = 0>>
 		<<goto "RIE Eligibility Check">>
 	<</if>>
diff --git a/src/uncategorized/reLegendaryCow.tw b/src/uncategorized/reLegendaryCow.tw
index bdf052518f598e7c865b9532b1a79e29ba8ca8ee..951a63142c5d0fcce9d2ad502f97510fdc59c80a 100644
--- a/src/uncategorized/reLegendaryCow.tw
+++ b/src/uncategorized/reLegendaryCow.tw
@@ -5,12 +5,8 @@
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check", _SL = $slaves.length>>
 
 <<if $legendaryFacility == 1>>
-	<<for $i = 0; $i < _SL; $i++>>
-		<<if $legendaryCowID == $slaves[$i].ID>>
-			<<set $activeSlave = $slaves[$i]>>
-		<</if>>
-	<</for>>
-	<<if $i >= _SL>> /* not found - reset variable and stop event */
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $legendaryCowID; })>>
+	<<if (ndef $activeSlave)>> /* not found - reset variable and stop event */
 		<<set $legendaryCowID = 0>>
 		<<goto "RIE Eligibility Check">>
 	<</if>>
diff --git a/src/uncategorized/reLegendaryEntertainer.tw b/src/uncategorized/reLegendaryEntertainer.tw
index 8ff48ee318997bd25cf973ee668fed8ac01100ec..303854350355bb3d4df7cf530971cebba1d92e64 100644
--- a/src/uncategorized/reLegendaryEntertainer.tw
+++ b/src/uncategorized/reLegendaryEntertainer.tw
@@ -1,16 +1,10 @@
-:: RE legendary entertainer
-
-<<nobr>>
+:: RE legendary entertainer [nobr]
 
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check", _SL = $slaves.length>>
 
 <<if $legendaryFacility == 1>>
-	<<for $i = 0; $i < _SL; $i++>>
-		<<if $legendaryEntertainerID == $slaves[$i].ID>>
-			<<set $activeSlave = $slaves[$i]>>
-		<</if>>
-	<</for>>
-	<<if $i >= _SL>> /* not found - reset variable and stop event */
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $legendaryEntertainerID; })>>
+	<<if (ndef $activeSlave)>> /* not found - reset variable and stop event */
 		<<set $legendaryEntertainerID = 0>>
 		<<goto "RIE Eligibility Check">>
 	<</if>>
@@ -20,26 +14,28 @@
 
 <<set $activeSlave.devotion += 4>>
 
-<</nobr>>\
-\
 The Free Cities fashion scene extends to slave bodies, of course; stopping at mere clothes and behaviors is an old world conceit. This week, <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink = passage(), $eventDescription = 1]]">></span> is in vogue. Such a crowd of gawkers and hangers-on follows her around the club that the fine citizens who have a chance at an hour of her time must shoulder their way through the throng.
 
+<br><br>
+
 This is a rare opportunity. Such popularity and fame is here today, and gone tomorrow. It might be possible, with a serious investment of funds in publicity, to really fix her in the public mind as a courtesan of note. There's no guarantee of success, but if you are successful, her value will increase a great deal.
-\
+
+<br><br>
+
 <span id="result">
 <<link "Just capitalize on her popularity as it is">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<replace "#result">>
 	You decide to limit your advantage on her temporary popularity to a little publicity and some advertising. You've gained a little @@.green;notoriety.@@
 	<<set $rep += 200>>
 	<</replace>>
 <</link>>
-<<link "Invest ¤5000 in her image">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+<br><<link "Invest ¤5000 in her image">>
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<if random(1,100) > 50>>
 		<<replace "#result">>
 		You buy media coverage of her, invest in an ad campaign, and even arrange for persons of influence and taste to sample and review her gentle caresses. Your efforts are a success. Her current extreme popularity will fade in time, but you have managed to arrange for her a permanent place as a @@.green;respected and famous courtesan.@@ As her owner, your reputation has @@.green;also increased.@@
@@ -60,10 +56,10 @@ This is a rare opportunity. Such popularity and fame is here today, and gone tom
 		<</replace>>
 	<</if>>
 <</link>>
-<<link "Lavish ¤10000 on her fame">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+<br><<link "Lavish ¤10000 on her fame">>
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<if random(1,100) > 10>>
 		<<replace "#result">>
 		You buy prime media coverage of her, invest in a lavish ad campaign, and even arrange for persons of great influence and fine taste to sample and review her gentle caresses. Your efforts are a success. Her current extreme popularity will fade in time, but you have managed to arrange for her a permanent place as a @@.green;respected and famous courtesan.@@ As her owner, your reputation has @@.green;also increased.@@
diff --git a/src/uncategorized/reLegendaryWhore.tw b/src/uncategorized/reLegendaryWhore.tw
index face39d798f229dd5628d03f38325c5eea66c0b5..8670b4e7be3bc32ebedd295fffdea2da923b9f50 100644
--- a/src/uncategorized/reLegendaryWhore.tw
+++ b/src/uncategorized/reLegendaryWhore.tw
@@ -5,12 +5,8 @@
 <<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "RIE Eligibility Check", _SL = $slaves.length>>
 
 <<if $legendaryFacility == 1>>
-	<<for $i = 0; $i < _SL; $i++>>
-		<<if $legendaryWhoreID == $slaves[$i].ID>>
-			<<set $activeSlave = $slaves[$i]>>
-		<</if>>
-	<</for>>
-	<<if $i >= _SL>> /* not found - reset variable and stop event */
+	<<set $activeSlave = $slaves.find(function(s) { return s.ID == $legendaryWhoreID; })>>
+	<<if (ndef $activeSlave)>> /* not found - reset variable and stop event */
 		<<set $legendaryWhoreID = 0>>
 		<<goto "RIE Eligibility Check">>
 	<</if>>
diff --git a/src/uncategorized/reNickname.tw b/src/uncategorized/reNickname.tw
index f53cc98d3027e00fc867e1e9964a32cf84507a97..df6bf68cdf548187bd183ce3b23fc3f8b4401049 100644
--- a/src/uncategorized/reNickname.tw
+++ b/src/uncategorized/reNickname.tw
@@ -1,9 +1,6 @@
-:: RE nickname
+:: RE nickname [nobr]
 
-<<nobr>>
-
-<<set $nextButton = "Continue">>
-<<set $nextLink = "AS Dump">>
+<<set $nextButton = "Continue", $nextLink = "AS Dump">>
 <<if $seed == 1>>
 	<<set $returnTo = "RIE Eligibility Check">>
 <<else>>
@@ -415,19 +412,19 @@
 	<<set $notApplyDesc = "realizes that her new identity is truly stateless. In the Free Cities, it does not matter where a slave is from, so long as that slave has value. All slaves belong to the singular nation of the owned, the subordinated, the fucked.">>
 
 <<elseif ($nickname == "white")>>
-	<<set $nickname = either("'Snowflake'", "'Ice Queen'", "'Princess'", "'Duchess'", "'Hillbilly'", "'Down Home'", "'Grits'", "'Top Dollar'", "'Vegas'", "'Hollywood'", "'Dixie'", "'Valley Girl'", "'Yankee'", "'Honky'", "'Memphis'", "'Euro Trash'")>>
+	<<set $nickname = either("'Snowflake'", "'Ice Queen'", "'Princess'", "'Duchess'", "'Hillbilly'", "'Down Home'", "'Grits'", "'Top Dollar'", "'Vegas'", "'Hollywood'", "'Dixie'", "'Valley Girl'", "'Yankee'", "'Honky'", "'Memphis'", "'Euro Trash'", "'Pasty'", "'Vanilla'", "'White Bread'")>>
 	<<set $situationDesc = "is white, which is not uncommon given the collapse of many erstwhile first world nations into depression and the proximity of many Free Cities to majority white areas. Slaves casually reference race as much or more than free citizens. They absorb the racial peccadilloes of their owners, and many of them bring prejudices from the old world into their slave lives.">>
 	<<set $applyDesc = "now has a constant reminder that as a sex slave she is judged on her appearance first.">>
 	<<set $notApplyDesc = "may feel some gratitude due to your preference that she not be defined by her ethnicity, but this is counterbalanced by the increased independence your kindness inspires.">>
 
 <<elseif ($nickname == "asian")>>
-	<<set $nickname = either("'Me Love You Long Time'", "'Me So Horny'", "'Almond'", "'Yellow Fever'", "'Thaigirl'", "'Pinoy'", "'Chinese'", "'Tokyo'", "'Manila'", "'Oriental'", "'Waifu'", "'Chink'", "'Squint'")>>
+	<<set $nickname = either("'Me Love You Long Time'", "'Me So Horny'", "'Almond'", "'Yellow Fever'", "'Thaigirl'", "'Pinoy'", "'Chinese'", "'Tokyo'", "'Manila'", "'Oriental'", "'Waifu'", "'Chink'", "'Squint'", "'3DPD'", "'E-Sports'")>>
 	<<set $situationDesc = "is asian, which is not uncommon given the huge population of Asia and the poverty of many countries there. Slaves casually reference race as much or more than free citizens. They absorb the racial peccadilloes of their owners, and many of them bring prejudices from the old world into their slave lives.">>
 	<<set $applyDesc = "now has a constant reminder that as a sex slave she is judged on her appearance first.">>
 	<<set $notApplyDesc = "may feel some gratitude due to your preference that she not be defined by her ethnicity, but this is counterbalanced by the increased independence your kindness inspires.">>
 
 <<elseif ($nickname == "latina")>>
-	<<set $nickname = either("'Chiquita'", "'Rio Grande'", "'Yeyo'", "'Cuzinho'", "'Senorita'", "'Senora'", "'Facil'", "'One Peso'", "'Mexicali'", "'Cafe'", "'Mestiza'", "'Adorada'")>>
+	<<set $nickname = either("'Chiquita'", "'Rio Grande'", "'Yeyo'", "'Cuzinho'", "'Senorita'", "'Senora'", "'Facil'", "'One Peso'", "'Mexicali'", "'Cafe'", "'Mestiza'", "'Adorada'", "'Chola'", "'Spicy'", "'Shakira'")>>
 	<<set $situationDesc = "is latina, which is not uncommon given the poor state of many Central and South American countries and the long diaspora of poor natives of those areas. Slaves casually reference race as much or more than free citizens. They absorb the racial peccadilloes of their owners, and many of them bring prejudices from the old world into their slave lives.">>
 	<<set $applyDesc = "now has a constant reminder that as a sex slave she is judged on her appearance first.">>
 	<<set $notApplyDesc = "may feel some gratitude due to your preference that she not be defined by her ethnicity, but this is counterbalanced by the increased independence your kindness inspires.">>
@@ -553,7 +550,7 @@
 	<<set $notApplyDesc = "accepts that her intellect is merely of slight interest.">>
 
 <<elseif ($nickname == "chubby")>>
-	<<set $nickname = either("'Plush'", "'Chubby'", "'Hambeast'", "'Jabba'", "'Bloated'", "'Landwhale'", "'Jiggly'", "'Tubby'", "'Whale'", "'Rotund'", "'Rubenesque'", "'Ample'", "'Jumbo'", "'Double Wide'", "'Feedee'", "'Plump'", "'Thicc'")>>
+	<<set $nickname = either("'Plush'", "'Chubby'", "'Hambeast'", "'Jabba'", "'Bloated'", "'Landwhale'", "'Jiggles'", "'Jiggly'", "'Tubby'", "'Whale'", "'Rotund'", "'Rubenesque'", "'Ample'", "'Jumbo'", "'Double Wide'", "'Feedee'", "'Plump'", "'Thicc'")>>
 	<<set $situationDesc = "is carrying a little extra weight. The cruelty of life as a slave increases your property's willingness to do cruelty where they can get away with it - what is passed to them, they pass to others - so she finds herself mocked for her size.">>
 	<<set $applyDesc = "knows that being fat makes her less valuable on the market, but she begins to accept that she's going to have to put up with being chubby for now.">>
 	<<set $notApplyDesc = "believes that this means she's going to have to lose weight soon, causing her some trepidation.">>
@@ -571,7 +568,7 @@
 	<<set $notApplyDesc = "understands that she'll have to take what buttsex she can get.">>
 
 <<elseif ($nickname == "cumslut")>>
-	<<set $nickname = either("'Vampire'", "'Sucker'", "'Deep Throat'", "'Throatclit'", "'Throat Meat'", "'No Gag Reflex'", "'Face Pussy'", "'Semen Demon'", "'Cumfiend'", "'Succubus'", "'Vacuum'", "'Hoover'", "'Fellatio'", "'Pearl Necklace'", "'Swallow'", "'Gobbler'", "'Pole Smoker'", "'Meat Smoker'", "'Lip Service'", "'Guzzler'", "'Third Pussy'", "'Cocksucker'")>>
+	<<set $nickname = either("'Vampire'", "'Sucker'", "'Deep Throat'", "'Throatclit'", "'Throat Meat'", "'No Gag Reflex'", "'Facepussy'", "'Semen Demon'", "'Cumfiend'", "'Succubus'", "'Vacuum'", "'Hoover'", "'Fellatio'", "'Pearl Necklace'", "'Swallows'", "'Gobbler'", "'Pole Smoker'", "'Meat Smoker'", "'Lip Service'", "'Guzzler'", "'Third Pussy'", "'Cocksucker'")>>
 	<<set $situationDesc = "loves her some cum. Most slaves have to put effort into showing enthusiasm when on their knees and presented with the second or third cock in a row. She, on the other hand, maintains such a fetish for the stuff that she'll often suck it out of other slaves' holes, if allowed.">>
 	<<set $applyDesc = "knows that as long as she's your slave, she'll get what she needs.">>
 	<<set $notApplyDesc = "understands that cum is a luxury and she'll have to savor what comes her way naturally.">>
@@ -834,42 +831,43 @@
 
 <</if>>
 
-<</nobr>>\
-\
 <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink = passage(), $eventDescription = 1]]">></span> $situationDesc You begin to overhear your other slaves refer to her as @@.pink;$nickname $activeSlave.slaveName.@@
-\
+
+<br><br>
+
 <span id="result">
-<<set $toSearch = $activeSlave.slaveName.toLowerCase();>>\
-<<if ($toSearch.indexOf("'") == -1)>>\
+<<set $toSearch = $activeSlave.slaveName.toLowerCase();>>
+<<if ($toSearch.indexOf("'") == -1)>>
 <<link "Encourage use of the nickname">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<replace "#result">>
 	Whatever $activeSlave.slaveName's feelings about being called $nickname were, she knows they're moot the first time she hears you refer to her that way. @@.hotpink;She has become more submissive to you.@@ $activeSlave.slaveName $applyDesc
 	<<set $activeSlave.devotion += 4>>
 	<<set $activeSlave.slaveName = ($nickname + " " + $activeSlave.slaveName)>>
 	<</replace>>
 <</link>>
-<</if>>\
-<<link "Disapprove, but encourage the other slaves to come up with a better nickname">>
+<</if>>
+<br><<link "Disapprove, but encourage the other slaves to come up with a better nickname">>
 	<<goto "RE nickname">>
 <</link>>
-<<link "Put a stop to it">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+<br><<link "Put a stop to it">>
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<replace "#result">>
 	As soon as you make your will on the matter known, $activeSlave.slaveName is referred to as $activeSlave.slaveName again. $activeSlave.slaveName $notApplyDesc
 	<</replace>>
 <</link>>
-<<link "No nicknames, now or ever">>
-	<<replace "#name">>\
-	$activeSlave.slaveName\
-	<</replace>>\
+<br><<link "No nicknames, now or ever">>
+	<<replace "#name">>
+	$activeSlave.slaveName
+	<</replace>>
 	<<replace "#result">>
 	You make it known that the power to name slaves is yours and yours alone.
 	<<set $nicknamesAllowed = 0>>
 	<</replace>>
 <</link>>
 </span>
+
diff --git a/src/uncategorized/reNoEvent.tw b/src/uncategorized/reNoEvent.tw
index d8563f9870e1cb9a76e7b0a62abab2950831c61c..594210be45a6238ff6d1c81fff8f4ec5cd7f71f5 100644
--- a/src/uncategorized/reNoEvent.tw
+++ b/src/uncategorized/reNoEvent.tw
@@ -1,8 +1,6 @@
 :: RE no event [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "AS Dump">>
-<<set $returnTo = "Next Week">>
+<<set $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Next Week">>
 
 <<set $activeSlave = $eventSlave>>
 
diff --git a/src/uncategorized/reRelativeRecruiter.tw b/src/uncategorized/reRelativeRecruiter.tw
index 1ab6cd70d996b005ee4e4a35d1a233988424b772..edfaa546b1014b47a0d5b52b022eed2370653450 100644
--- a/src/uncategorized/reRelativeRecruiter.tw
+++ b/src/uncategorized/reRelativeRecruiter.tw
@@ -1028,29 +1028,22 @@ She waits anxiously for your decision.
 <<set $activeSlave.recruiter = 0>>
 
 <br><br>
-You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but you won't be able to inspect her beyond her likely resemblance to her <<print relationTargetWord($activeSlave)>>.
 
-<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $activeSlave.relationTarget == $slaves[$i].ID>>
-		<<set $slaves[$i].recruiter = 0>>
-		<<break>>
-	<</if>>
-<</for>>
+You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but you won't be able to inspect her beyond her likely resemblance to her <<print relationTargetWord($activeSlave)>>.
 
 <br><br>
+
+<<set $slaves[$i].recruiter = 0>> /* the chance to recruit this particular related slave will not be offered again, regardless of player decision */
+
 <span id="result">
 <<link "Buy her">>
+	<<replace "#result">>
+	/* update $slaves[$i] (eventSlave) before calling any widgets */
+	<<set $slaves[$i].relation = relationTargetWord($activeSlave)>>
+	<<set $slaves[$i].relationTarget = $activeSlave.ID>>
 	<<AddSlave $activeSlave>>
 	<<set $cash -= $slaveCost>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if $activeSlave.relationTarget == $slaves[$i].ID>>
-			<<set $slaves[$i].relation = relationTargetWord($activeSlave)>>
-			<<set $slaves[$i].relationTarget = $activeSlave.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
 	<<SlaveTitle $eventSlave>>
-	<<replace "#result">>
 	You complete the legalities and biometric scanning quickly and without fuss. $activeSlave.slaveName arrives shortly. The two slaves remember each other only dimly - they parted a long time ago - but they embrace. The devoted $desc explains the situation and encourages her $activeSlave.relation to be a good slave to you. $activeSlave.slaveName looks a little fearful but clearly realizes that she's lucky to be here.
 	<<set $nextLink = "AS Dump">>
 	<<include "New Slave Intro">>
diff --git a/src/uncategorized/reShelterInspection.tw b/src/uncategorized/reShelterInspection.tw
index 5a0f88ff7c21250842db18d71d6f90b9a3db22c3..652c21440713c22c9f8d2053c8a4614fb2435ca2 100644
--- a/src/uncategorized/reShelterInspection.tw
+++ b/src/uncategorized/reShelterInspection.tw
@@ -1,13 +1,10 @@
-:: RE shelter inspection
+:: RE shelter inspection [nobr]
 
-<<nobr>>
-
-<<set $nextButton = "Continue">>
-<<set $nextLink = "Next Week">>
-<<set $activeSlave = $eventSlave>>
+<<set $nextButton = "Continue", $nextLink = "Next Week">>
 
 <<set $activeSlaveOneTimeMinAge = 21>>
 <<set $activeSlaveOneTimeMaxAge = 42>>
+<<set $one_time_age_overrides_pedo_mode = 1>>
 <<set $contractCost = 10000>>
 <<include "Generate XX Slave">>
 <<set $activeSlave.origin = "She was once an inspector for the Shelter, but you put a stop to that.">>
@@ -34,20 +31,21 @@
 <<set $activeSlave.behavioralQuirk = either("hates men", "hates women", "gluttonous", "liberated")>>
 <<set $activeSlave.sexualQuirk = either("apathetic", "idealistic")>>
 
-<<set $seed = $shelterGirlsIDs.random()>>
-<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $slaves[$i].ID == $seed>>
-	<<set $subSlave = $slaves[$i]>>
-	<<break>>
-	<</if>>
-<</for>>
+<<Enunciate $activeSlave>>
 
-<</nobr>>\
-\
-<<nobr>>
+<<set $seed = $shelterGirlsIDs.random()>>
+<<set $subSlave = $slaves.find(function(s) { return s.ID == $seed; })>>
+/*
+ * this check is currently unnecessary but if in the future the shelter girl IDs list is changed to updated only when acquiring shelter girls, this should be enabled
+ * 
+<<if (ndef $subSlave)>>
+	<<set $shelterGirlsIDs.delete($seed)>>
+	<<goto "Random Nonindividual Event">>
+<</if>>
+*/
 
 Your assistant announces a visitor in the entryway of your penthouse, and adds<<if $assistant > 0>> with disapproval<</if>> that it's an inspector from the Slave Shelter.
-<<if $assistant > 0 >>
+<<if $assistant > 0>>
 	<<switch $assistantAppearance>>
 	<<case "monstergirl">>
 		Her avatar's cocks and tentacle hair are all hanging limply; she's a dejected little picture of a cockblocked monstergirl.
@@ -85,10 +83,10 @@ Your assistant announces a visitor in the entryway of your penthouse, and adds<<
 		Her avatar turns a reproving blue and shrinks a little.
 	<</switch>>
 <</if>>
-Not waiting to be greeted, the inspector looks up at the nearest camera and demands to be let in. She's an older woman with graying hair back in a bun, holding a tablet against her chest like a shield. "I'm here to inspect $subSlave.slaveName," she bellows up at the camera.
+Not waiting to be greeted, the inspector looks up at the nearest camera and demands to be let in. She's an older woman with graying hair up in a bun, holding a tablet against her chest like a shield. "I'm here to inspect $subSlave.slaveName," she bellows up at the camera.
+
+<br><br>
 
-<</nobr>>
-\
 <span id="result">
 <<link "Amusing. Enslave her">>
 	<<AddSlave $activeSlave>>
@@ -100,8 +98,8 @@ Not waiting to be greeted, the inspector looks up at the nearest camera and dema
 	<<include "New Slave Intro">>
 	<</replace>>
 <</link>> //This will cost ¤$contractCost//
-<<if ($dairy > 0) && ($dairyRestraintsSetting > 1) && ($subSlave.assignment == "work in the dairy")>>\
-<<link "The slave is attached to a milking machine, and so will be the inspector">>
+<<if ($dairy > 0) && ($dairyRestraintsSetting > 1) && ($subSlave.assignment == "work in the dairy")>>
+<br><<link "The slave is attached to a milking machine, and so will be the inspector">>
 	<<assignJob $activeSlave "work in the dairy">>
 	<<set $activeSlave.clothes = "no clothing">>
 	<<AddSlave $activeSlave>>
@@ -112,95 +110,99 @@ Not waiting to be greeted, the inspector looks up at the nearest camera and dema
 	<<set $nextLink = "AS Dump">>
 	<</replace>>
 <</link>> //This will cost ¤<<print $contractCost/2>>//
-<</if>>\
-<<if ($dairyRestraintsSetting < 2) || ($subSlave.assignment != "work in the dairy")>>\
-<<link "Allow the inspection">>
+<</if>>
+<<if ($dairyRestraintsSetting < 2) || ($subSlave.assignment != "work in the dairy")>>
+<br><<link "Allow the inspection">>
 	<<replace "#result">>
-	<<nobr>>
 	You have her ushered up to your office, and order $subSlave.slaveName brought in.
-	<<if $subSlave.fetish == "mindbroken">>
-		<<if $subSlave.origin == "You got her at the Slave Shelter. She has never communicated anything about her background, since she arrived at the shelter with a broken mind.">>
-		Of course, the poor girl is just as mindbroken as ever. The inspector asks some cursory questions and gives up. "Don't worry," she says. "I know she was like this when you got her. Just - just keep trying, would you?" She leaves, looking bitter.
+	<br><br>
+	<<if $subSlave.origin == "She has never communicated anything about her background, since she arrived at the shelter with a broken mind.">>
+		<<if $subSlave.fetish == "mindbroken">>
+			Of course, the poor girl is just as mindbroken as ever. The inspector asks some cursory questions and gives up. "Don't worry," she says. "I know she was like this when you got her. Just - just keep trying, would you?" She leaves, looking bitter.
 		<<else>>
-		Of course, the poor girl is mindbroken. The inspector is horrified, though she tries to conceal it. She makes lengthy notes on her tablet, and almost runs out of the penthouse.
-		<<set $shelterAbuse += 5>>
+			The inspector asks some cursory questions and is shocked when she responds.  "S-she came back?" she mutters, "You restored her mind, I can't believe it.  This is incredible."  She carries on while writing notes on her tablet, "You're more than welcome to adopt slaves from our shelter."  You swear she seems in much better spirits as she leaves your penthouse.
+			<<set $shelterAbuse -= 5>>
 		<</if>>
-	<<elseif $subSlave.origin == "You got her at the Slave Shelter. She has never communicated anything about her background, since she arrived at the shelter with a broken mind." and $subSlave.fetish != "mindbroken">>
-	  The inspector asks some cursory questions and is shocked when she responds.  "S-she came back?" she mutters, "You restored her mind, I can't believe it.  This is incredible."  She carries on while writing notes on her tablet, "You're more than welcome to adopt slaves from our shelter."  You swear she seems in much better spirits as she leaves your penthouse.
-	  <<set $shelterAbuse -= 5>>
+	<<elseif $subSlave.fetish == "mindbroken">>
+		Of course, the poor girl is mindbroken now. The inspector is horrified, though she tries to conceal it. She makes lengthy notes on her tablet, and almost runs out of the penthouse.
+		<<set $shelterAbuse += 5>>
 	<<elseif $subSlave.trust < -20>>
 		She is sufficiently afraid of you that she tells the inspector whatever she thinks you'd want her to say. The inspector, experienced at this, is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
 	<<elseif $subSlave.devotion <= 20>>
 		She does not like you and isn't particularly terrified of you, so she is not flattering. She's not stupid enough to really criticise you, but she is honest and makes no effort to conceal troubling particulars. The inspector takes copious notes. She offers you a few choice words, makes notes on her tablet, and storms out.
 	<<elseif $subSlave.anus > 2>>
 		She cooperates with the inspector, who pulls on a pair of latex gloves and performs a complete examination. When she pulls the girl's buttocks apart and probes the slave's asshole, she pulls her hand away as if scalded. "Oh my God," she says. "$subSlave.birthName, what happened to your anus?"
-		<<if ($slaves[$i].devotion < 10)>>
-		<<if ($slaves[$i].buttplug == "large plug") || ($slaves[$i].buttplug == "huge plug") || ($slaves[$i].buttplug == "long, large plug") || ($slaves[$i].buttplug == "long, huge plug")>>
-			"W-well," she says, "I wear a buttplug." The inspector frowns. "A buttplug shouldn't do that!" The slave looks worried and replies, "It'<<s>> kinda big? And I wear it all the time. B-but I like it! It d-doe<<s>>n't hurt. Well, anymore." The inspector is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
-		<<elseif ($slaves[$i].assignment == "whore") || ($slaves[$i].assignment == "work in the brothel") || ($slaves[$i].assignment == "serve the public") || ($slaves[$i].assignment == "serve in the club")>>
-			"W-well," she says, "I get fucked there at work." The inspector frowns. "How often!?" The slave looks worried and replies, "L-let me think. Four time<<s>> today? After the third time, it u<<s>>ually <<s>>top<<s>> clo<<s>>ing up again between cock<<s>>." The inspector is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
-		<<elseif ($slaves[$i].fetish == "buttslut") && ($slaves[$i].fetishKnown == 1)>>
-			"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love anal <<s>>ex! Don't judge me. I want cock up that hole right now, you bitch. I'm going to beg for butt<<s>>ex the moment you leave." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<elseif ($slaves[$i].energy > 95) && ($slaves[$i].fetishKnown == 1)>>
-			"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love <<s>>ex! Don't judge me. I take cock in all my hole<<s>>, and I like it. I'm going to beg for butt<<s>>ex the moment you leave, you bitch." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<else>>
-			"W-well," she says, "I'm a <<s>>lave." The inspector frowns. "What does that have to do with it?" The slave looks worried and replies, "I-it'<<s>> a hole, right? I get fucked in all my hole<<s>>." The inspector is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
-		<</if>>
-		<<else>>
-		<<if ($slaves[$i].buttplug == "large plug") || ($slaves[$i].buttplug == "huge plug") || ($slaves[$i].buttplug == "long, large plug") || ($slaves[$i].buttplug == "long, huge plug")>>
-			"I wear a buttplug!" she says confidently. The inspector frowns. "A buttplug shouldn't do that!" The slave looks worried and replies, "It'<<s>> really big, and I wear it all the time. I like it! It keep<<s>> my hole ready for anything." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<elseif ($slaves[$i].assignment == "whore") || ($slaves[$i].assignment == "work in the brothel") || ($slaves[$i].assignment == "serve the public") || ($slaves[$i].assignment == "serve in the club")>>
-			"I get fucked there at work!" she says confidently. The inspector frowns. "How often!?" The slave thinks for a moment and replies, "Four time<<s>> today. After the third time, it u<<s>>ually <<s>>top<<s>> clo<<s>>ing up again between cock<<s>>. I'm good at my job!" The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<elseif ($slaves[$i].fetish == "buttslut") && ($slaves[$i].fetishKnown == 1)>>
-			"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love anal <<s>>ex! Don't judge me. I want cock up that hole right now, you bitch. I'm going to beg for butt<<s>>ex the moment you leave." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<elseif ($slaves[$i].energy > 95) && ($slaves[$i].fetishKnown == 1)>>
-			"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love <<s>>ex! Don't judge me. I take cock in all my hole<<s>>, and I like it. I'm going to beg for butt<<s>>ex the moment you leave, you bitch." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
+		<br><br>
+		<<if ($subSlave.devotion < 10)>>
+			<<if ($subSlave.buttplug == "large plug") || ($subSlave.buttplug == "huge plug") || ($subSlave.buttplug == "long, large plug") || ($subSlave.buttplug == "long, huge plug")>>
+				"W-well," she says, "I wear a buttplug." The inspector frowns. "A buttplug shouldn't do that!" The slave looks worried and replies, "It'<<s>> kinda big? And I wear it all the time. B-but I like it! It d-doe<<s>>n't hurt. Well, anymore." The inspector is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
+			<<elseif ($subSlave.assignment == "whore") || ($subSlave.assignment == "work in the brothel") || ($subSlave.assignment == "serve the public") || ($subSlave.assignment == "serve in the club")>>
+				"W-well," she says, "I get fucked there at work." The inspector frowns. "How often!?" The slave looks worried and replies, "L-let me think. Four time<<s>> today? After the third time, it u<<s>>ually <<s>>top<<s>> clo<<s>>ing up again between cock<<s>>." The inspector is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
+			<<elseif ($subSlave.fetish == "buttslut") && ($subSlave.fetishKnown == 1)>>
+				"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love anal <<s>>ex! Don't judge me. I want cock up that hole right now, you bitch. I'm going to beg for butt<<s>>ex the moment you leave." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<elseif ($subSlave.energy > 95) && ($subSlave.fetishKnown == 1)>>
+				"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love <<s>>ex! Don't judge me. I take cock in all my hole<<s>>, and I like it. I'm going to beg for butt<<s>>ex the moment you leave, you bitch." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<else>>
+				"W-well," she says, "I'm a <<s>>lave." The inspector frowns. "What does that have to do with it?" The slave looks worried and replies, "I-it'<<s>> a hole, right? I get fucked in all my hole<<s>>." The inspector is not amused. She offers you a few choice words, makes notes on her tablet, and storms out.
+			<</if>>
 		<<else>>
-			"I'm a <<s>>lave," she says confidently. The inspector frowns. "What does that have to do with it?" The slave beams and replies, "It'<<s>> a hole. I'm a good girl, <<s>>o I get fucked in all my hole<<s>>." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<</if>>
+			<<if ($subSlave.buttplug == "large plug") || ($subSlave.buttplug == "huge plug") || ($subSlave.buttplug == "long, large plug") || ($subSlave.buttplug == "long, huge plug")>>
+				"I wear a buttplug!" she says confidently. The inspector frowns. "A buttplug shouldn't do that!" The slave looks worried and replies, "It'<<s>> really big, and I wear it all the time. I like it! It keep<<s>> my hole ready for anything." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<elseif ($subSlave.assignment == "whore") || ($subSlave.assignment == "work in the brothel") || ($subSlave.assignment == "serve the public") || ($subSlave.assignment == "serve in the club")>>
+				"I get fucked there at work!" she says confidently. The inspector frowns. "How often!?" The slave thinks for a moment and replies, "Four time<<s>> today. After the third time, it u<<s>>ually <<s>>top<<s>> clo<<s>>ing up again between cock<<s>>. I'm good at my job!" The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<elseif ($subSlave.fetish == "buttslut") && ($subSlave.fetishKnown == 1)>>
+				"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love anal <<s>>ex! Don't judge me. I want cock up that hole right now, you bitch. I'm going to beg for butt<<s>>ex the moment you leave." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<elseif ($subSlave.energy > 95) && ($subSlave.fetishKnown == 1)>>
+				"Hey," she protests, "that'<<s>> normal." The inspector looks incredulous. "What!?" The slave looks insulted and replies, "I love <<s>>ex! Don't judge me. I take cock in all my hole<<s>>, and I like it. I'm going to beg for butt<<s>>ex the moment you leave, you bitch." She defiantly sticks her rump out at you. The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<else>>
+				"I'm a <<s>>lave," she says confidently. The inspector frowns. "What does that have to do with it?" The slave beams and replies, "It'<<s>> a hole. I'm a good girl, <<s>>o I get fucked in all my hole<<s>>." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<</if>>
 		<</if>>
 	<<else>>
 		The inspector asks, "What do you do for work, $subSlave.birthName?"
-		<<if ($slaves[$i].assignment == "whore") || ($slaves[$i].assignment == "work in the brothel")>>
-		<<if ($slaves[$i].fetishStrength > 95) || ($slaves[$i].energy > 95)>>
-			$subSlave.slaveName says happily, "I'm a whore!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> awe<<s>>ome. Nothing but cock, every day." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<else>>
-			$subSlave.slaveName says confidently, "I'm a whore!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> hard work <<s>>ometime<<s>>, but I'm okay. I'm much happier with my current owner, thank you." The inspector looks pleased, and says she'll put out a @@.green;good word@@ about you.
-			<<set $rep += 100>>
-			<<set $shelterAbuse -= 1>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment == "serve the public") || ($slaves[$i].assignment == "serve in the club")>>
-		<<if ($slaves[$i].fetishStrength > 95) || ($slaves[$i].energy > 95)>>
-			$subSlave.slaveName says happily, "I'm a <<s>>lut!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> awe<<s>>ome. Nothing but cute boy<<s>> and girl<<s>>, every day." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<else>>
-			$subSlave.slaveName says confidently, "I'm a <<s>>lut!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> not bad. I'm much happier with my current owner, thank you." The inspector looks pleased, and says she'll put out a @@.green;good word@@ about you.
-			<<set $rep += 100>>
-			<<set $shelterAbuse -= 1>>
-		<</if>>
-		<<elseif (($slaves[$i].assignment == "get milked") || ($slaves[$i].assignment == "work in the dairy")) && $slaves[$i].lactation > 0>>
-		$subSlave.slaveName says happily, "I'm a milk cow!" The inspector arches an eyebrow skeptically, and the slave continues, "I give milk. <<s>>ee?" She expresses a squirt of milk from one nipple. It'<<s>> a nice life. I'm much happier with my current owner, thank you." The inspector looks pleased, and says she'll put out a @@.green;good word@@ about you.
-		<<set $rep += 100>>
-		<<set $shelterAbuse -= 1>>
-		<<elseif ($slaves[$i].assignment == "get milked") || ($slaves[$i].assignment == "work in the dairy")>>
-		$subSlave.slaveName says happily, "I get cockmilked!" The inspector arches an eyebrow skeptically, and the slave continues, "I give cum. It'<<s>> actually lot<<s>> of fun!" She shakes her penis for emphasis. "The machine feel<<s>> <<s>>o good. And when I'm almo<<s>>t empty, I get buttfucked to get the la<<s>>t drop out of me!" She shivers. "It'<<s>> really nice..." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
-			<<set $shelterAbuse -= 1>>
-		<<else>>
-		$subSlave.slaveName says flatly, "Whatever my beloved <<if $PC.title == 1>>Ma<<s>>ter<<else>>Mi<<s>>tre<<ss>><</if>> require<<s>>. I have a good life now, and I would appreciate it if you would <<s>>upport me by doing everything you can for <<if $PC.title == 1>>him<<else>>her<</if>>." Taken aback, the inspector says she'll put out a @@.green;good word@@ about you.
-		<<set $rep += 100>>
-		<<set $shelterAbuse -= 1>>
-		<</if>>
+		<br><br>
+		<<switch $subSlave.assignment>>
+		<<case "whore" "work in the brothel">>
+			<<if ($subSlave.fetishStrength > 95) || ($subSlave.energy > 95)>>
+				$subSlave.slaveName says happily, "I'm a whore!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> awe<<s>>ome. Nothing but cock, every day." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<else>>
+				$subSlave.slaveName says confidently, "I'm a whore!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> hard work <<s>>ometime<<s>>, but I'm okay. I'm much happier with my current owner, thank you." The inspector looks pleased, and says she'll put out a @@.green;good word@@ about you.
+				<<set $rep += 100>>
+				<<set $shelterAbuse -= 1>>
+			<</if>>
+		<<case "serve the public" "serve in the club">>
+			<<if ($subSlave.fetishStrength > 95) || ($subSlave.energy > 95)>>
+				$subSlave.slaveName says happily, "I'm a <<s>>lut!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> awe<<s>>ome. Nothing but cute boy<<s>> and girl<<s>>, every day." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+				<<set $shelterAbuse -= 1>>
+			<<else>>
+				$subSlave.slaveName says confidently, "I'm a <<s>>lut!" The inspector makes a go-on gesture, and the slave continues, "It'<<s>> not bad. I'm much happier with my current owner, thank you." The inspector looks pleased, and says she'll put out a @@.green;good word@@ about you.
+				<<set $rep += 100>>
+				<<set $shelterAbuse -= 1>>
+			<</if>>
+		<<case "get milked" "work in the dairy">>
+			<<if $subSlave.lactation > 0>>
+				$subSlave.slaveName says happily, "I'm a milk cow!" The inspector arches an eyebrow skeptically, and the slave continues, "I give milk. <<s>>ee?" She expresses a squirt of milk from one nipple. It'<<s>> a nice life. I'm much happier with my current owner, thank you." The inspector looks pleased, and says she'll put out a @@.green;good word@@ about you.
+				<<set $rep += 100>>
+				<<set $shelterAbuse -= 1>>
+			<<else>>
+				$subSlave.slaveName says happily, "I get cockmilked!" The inspector arches an eyebrow skeptically, and the slave continues, "I give cum. It'<<s>> actually lot<<s>> of fun!" She shakes her penis for emphasis. "The machine feel<<s>> <<s>>o good. And when I'm almo<<s>>t empty, I get buttfucked to get the la<<s>>t drop out of me!" She shivers. "It'<<s>> really nice..." The inspector looks deflated, and reluctantly makes a positive note on her tablet.
+					<<set $shelterAbuse -= 1>>
+				<<else>>
+				$subSlave.slaveName says flatly, "Whatever my beloved <<if $PC.title == 1>>Ma<<s>>ter<<else>>Mi<<s>>tre<<ss>><</if>> require<<s>>. I have a good life now, and I would appreciate it if you would <<s>>upport me by doing everything you can for <<if $PC.title == 1>>him<<else>>her<</if>>." Taken aback, the inspector says she'll put out a @@.green;good word@@ about you.
+				<<set $rep += 100>>
+				<<set $shelterAbuse -= 1>>
+			<</if>>
+		<</switch>>
 	<</if>>
-	<</nobr>>
 	<</replace>>
 <</link>>
-<</if>>\
+<</if>>
 </span>
diff --git a/src/uncategorized/reSiblingRevenge.tw b/src/uncategorized/reSiblingRevenge.tw
index 5fc847100afb5fc8600caa4dda0aea3e9711663c..65e303e82021778b409af29652bca8c1b00fd9f3 100644
--- a/src/uncategorized/reSiblingRevenge.tw
+++ b/src/uncategorized/reSiblingRevenge.tw
@@ -1,71 +1,62 @@
 :: RE sibling revenge [nobr]
 
-<<set $nextButton = "Continue">>
-<<set $nextLink = "RIE Eligibility Check">>
+<<set $nextButton = "Continue", $nextLink = "RIE Eligibility Check">>
+
+<<set $i = $slaves.findIndex(function(s) { return s.ID == $youngerSister.ID; })>>
+<<set $j = $slaves.findIndex(function(s) { return s.ID == $olderSister.ID; })>>
 
 $youngerSister.slaveName, whose older sister tried to sell her to you, is up for inspection. As usual, you pepper your inspection with questions about her duties, her feelings about her physical condition, and experiences. More information about one's property is never a bad thing. When the inspection reaches $youngerSister.slaveName's asshole, you ask whether she enjoyed having her older sister sell her butt.
 
 "No, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>," she says.
+
 <br><br>
+
 <span id="result">
 <br><<link "Turnabout is fair play">>
 	<<replace "#result">>
-	$olderSister.slaveName is brought in. You gag her, throw the resisting bitch down on the couch, and hold her there. Then, you peremptorily order the wide-eyed $youngerSister.slaveName to <<if canDoAnal($olderSister)>>sodomize<<else>>face-fuck<</if>> her sister. She stares open mouthed for a moment, but comes over obediently. Her face is a strange mix of vengeful eagerness, revulsion, and even a little lust. She shoves herself into the frantically struggling girl's butt without mercy. Her cock is pathetically small, but by how $olderSister.slaveName reacts it might as well be a baseball bat. $youngerSister.slaveName rarely gets to penetrate anything, mostly serving as an oral slut<<if canDoAnal($youngerSister)>> and anal cocksleeve<</if>>, so she comes in no time and takes a turn holding $olderSister.slaveName down <<if canDoAnal($olderSister)>>so you can claim sloppy seconds on her spasming butthole<</if>>.
+	$olderSister.slaveName is brought in. You gag her, throw the resisting bitch down on the couch, and hold her there. Then, you peremptorily order the wide-eyed $youngerSister.slaveName to <<if canDoAnal($olderSister)>>sodomize<<else>>face-fuck<</if>> her sister. She stares open mouthed for a moment, but comes over obediently. Her face is a strange mix of vengeful eagerness, revulsion, and even a little lust. She shoves herself into the frantically struggling girl's <<if canDoAnal($olderSister)>>butt<<else>>jaw<</if>> without mercy. Her cock is pathetically small, but by how $olderSister.slaveName reacts it might as well be a baseball bat. $youngerSister.slaveName rarely gets to penetrate anything, mostly serving as an oral slut<<if canDoAnal($youngerSister)>> and anal cocksleeve<</if>>, so she comes in no time and takes a turn holding $olderSister.slaveName down <<if canDoAnal($olderSister)>>so you can claim sloppy seconds on her spasming butthole<</if>>.
 	@@.hotpink;$youngerSister.slaveName has become more devoted to you,@@ while $olderSister.slaveName @@.mediumorchid;hates you@@ and has become @@.gold;more afraid of you,@@<<if canDoAnal($olderSister)>> and @@.lime;$olderSister.slaveName has lost her anal virginity.@@<<else>>.<</if>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $olderSister.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].trust -= 5>>
-		<<set $slaves[$i].devotion -= 4>>
-		<<if canDoAnal($olderSister)>>
-		<<set $slaves[$i].anus = 1>>
-		<<set $slaves[$i].analCount += 1>>
+	<<set $slaves[$i].devotion += 4>>
+	<<set $slaves[$i].penetrativeCount += 1>>
+	<<set $penetrativeTotal += 1>>
+
+	<<set $slaves[$j].trust -= 5>>
+	<<set $slaves[$j].devotion -= 4>>
+	<<if canDoAnal($olderSister)>>
+		<<set $slaves[$j].anus = 1>>
+		<<set $slaves[$j].analCount += 1>>
 		<<set $analTotal += 1>>
-		<<else>>
-			<<set $slaves[$i].oralCount += 1>>
-			<<set $oralTotal += 1>>
-		<</if>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $youngerSister.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].devotion += 4>>
-		<<set $slaves[$i].penetrativeCount += 1>>
-		<<set $penetrativeTotal += 1>>
+	<<else>>
+		<<set $slaves[$j].oralCount += 1>>
+		<<set $oralTotal += 1>>
 	<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 <br><<link "Let her have her revenge, but remind her of her place">>
 	<<replace "#result">>
-	$olderSister.slaveName is brought in. You gag her, throw the resisting bitch down on the couch, and hold her there. Then, you peremptorily order the wide-eyed $youngerSister.slaveName to put her cock <<if canDoAnal($olderSister)>>up her sister's ass<<else>>in her sister's mouth<</if>>, and then hold it there. She stares open mouthed for a moment, but comes over obediently. Her face is a strange mix of vengeful eagerness, revulsion, and even a little lust. She shoves herself into the frantically struggling girl's <<if canDoAnal($olderSister)>>butt<<else>>jaw<</if>> without mercy. Her cock is pathetically small, but by how $youngerSister.slaveName reacts it might as well be a baseball bat. $youngerSister.slaveName obeys your orders and holds still after inserting herself. You<<if $PC.dick == 0>> don a strap-on,<</if>> move around behind her and start <<if canDoAnal($youngerSister)>>ass<<else>>face-<</if>>fucking her in turn, slowly permitting her to find a rhythm where she can fuck and get fucked at the same time. She's getting it much harder than she's giving it but she's experienced enough that she comes quickly.
+	$olderSister.slaveName is brought in. You gag her, throw the resisting bitch down on the couch, and hold her there. Then, you peremptorily order the wide-eyed $youngerSister.slaveName to put her cock <<if canDoAnal($olderSister)>>up her sister's ass<<else>>in her sister's mouth<</if>>, and then hold it there. She stares open mouthed for a moment, but comes over obediently. Her face is a strange mix of vengeful eagerness, revulsion, and even a little lust. She shoves herself into the frantically struggling girl's <<if canDoAnal($olderSister)>>butt<<else>>jaw<</if>> without mercy. Her cock is pathetically small, but by how $olderSister.slaveName reacts it might as well be a baseball bat. $youngerSister.slaveName obeys your orders and holds still after inserting herself. You<<if $PC.dick == 0>> don a strap-on,<</if>> move around <<if canDoAnal($youngerSister)>>behind her and start ass<<else>>in front of her and start face-<</if>>fucking her in turn, slowly permitting her to find a rhythm where she can fuck and get fucked at the same time. She's getting it much harder than she's giving it but she's experienced enough that she comes quickly.
 	@@.hotpink;$youngerSister.slaveName has become more devoted to you,@@ while @@.mediumorchid;$olderSister.slaveName has become more rebellious,@@<<if canDoAnal($olderSister)>> and @@.lime;$olderSister.slaveName has lost her anal virginity.@@<<else>>.<</if>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $olderSister.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].devotion -= 5>>
-		<<if canDoAnal($olderSister)>>
-		<<set $slaves[$i].anus = 1>>
-		<<set $slaves[$i].analCount += 2>>
-		<<set $analTotal += 2>>
-		<<else>>
-			<<set $slaves[$i].oralCount += 2>>
-			<<set $oralTotal += 2>>
-		<</if>>
-	<</if>>
-	<</for>>
-	<<for $i = 0; $i < $slaves.length; $i++>>
-	<<if $youngerSister.ID == $slaves[$i].ID>>
-		<<set $slaves[$i].devotion += 4>>
-		<<if canDoAnal($youngerSister)>>
+	<<set $slaves[$i].devotion += 4>>
+	<<if canDoAnal($youngerSister)>>
 		<<set $slaves[$i].analCount += 1>>
 		<<set $analTotal += 1>>
-		<<else>>
-			<<set $slaves[$i].oralCount += 1>>
-			<<set $oralTotal += 1>>
-		<</if>>
-		<<set $slaves[$i].penetrativeCount += 1>>
-		<<set $penetrativeTotal += 1>>
+	<<else>>
+		<<set $slaves[$i].oralCount += 1>>
+		<<set $oralTotal += 1>>
+	<</if>>
+	<<set $slaves[$i].penetrativeCount += 1>>
+	<<set $penetrativeTotal += 1>>
+
+	<<set $slaves[$j].devotion -= 5>>
+	<<if canDoAnal($olderSister)>>
+		<<set $slaves[$j].anus = 1>>
+		<<set $slaves[$j].analCount += 2>>
+		<<set $analTotal += 2>>
+	<<else>>
+		<<set $slaves[$j].oralCount += 2>>
+		<<set $oralTotal += 2>>
 	<</if>>
-	<</for>>
 	<</replace>>
 <</link>>
 </span>
+
diff --git a/src/uncategorized/remoteSurgery.tw b/src/uncategorized/remoteSurgery.tw
index 999f9f57e6f2c0c4308d471e2ab365b472f5318b..b0873080385b98f30010f0976f68d137f43f3c4b 100644
--- a/src/uncategorized/remoteSurgery.tw
+++ b/src/uncategorized/remoteSurgery.tw
@@ -599,10 +599,33 @@ $pronounCap has
 		[[Geld|Surgery Degradation][$activeSlave.balls to 0,$activeSlave.scrotum to 0,$cash -= $surgeryCost, $activeSlave.health -= 40, $surgeryType to "geld"]]
 		<</if>>
 	<</if>>
-	<br>$pronounCap <<if $activeSlave.prostate > 0>>has<<else>>lacks<</if>> a prostate.
-	<<if $activeSlave.prostate > 0>>
+<</if>>
+<<if $activeSlave.prostate>>
+	<br>$pronounCap has a <<if $activeSlave.prostate > 2>>extremely hyperactive<<elseif $activeSlave.prostate > 1>>hyperactive<<else>>normal<</if>> prostate.
+	<<if ($seeExtreme == 1)>>
 		<<if $activeSlave.indentureRestrictions < 1>>
-			[[Remove|Surgery Degradation][$activeSlave.prostate to 0,$activeSlave.prostateImplant to 0,$cash -= $surgeryCost, $activeSlave.health -= 40, $surgeryType to "prostate"]]
+			[[Remove|Surgery Degradation][$activeSlave.prostate = 0,$cash -= $surgeryCost, $activeSlave.health -= 40, $surgeryType to "prostate"]]
+		<</if>>
+	<</if>>
+	<<if $activeSlave.prostate >= 2 && $prostateImplants == 1>>
+		<<if $activeSlave.prostate < 3>>
+			<<if $activeSlave.indentureRestrictions < 2>>
+			[[Implant prostate with concentrated production drugs|Surgery Degradation][$activeSlave.prostate = 3,$cash -= $surgeryCost, $activeSlave.health -= 20,$surgeryType = "ejaculation"]] //This will thin $possessive ejaculate but greatly increase its quantity//
+			<</if>>
+		<</if>>
+		<<if $activeSlave.prostate == 3>>
+			 | [[Remove concentrated drug implant|Surgery Degradation][$activeSlave.prostate = 2,$cash -= $surgeryCost, $activeSlave.health -= 10, $surgeryType = "endejac"]]
+		<<elseif $activeSlave.prostate == 2>>
+			 | [[Remove drug implant|Surgery Degradation][$activeSlave.prostate=1,$cash-=$surgeryCost,$surgeryType="endprecum"]]
+		<</if>>
+	<<else>>
+		<<if $activeSlave.prostate < 2>>
+			<<if $activeSlave.indentureRestrictions < 2>>
+				[[Implant slow-release productivity drugs|Surgery Degradation][$activeSlave.lactation=2,$cash-=$surgeryCost,$activeSlave.health-=10,$surgeryType="precum"]] //This may cause some leaking//
+			<</if>>
+		<</if>>
+		<<if $activeSlave.prostate > 1>>
+			 | [[Remove drug implant|Surgery Degradation][$activeSlave.prostate=1,$cash-=$surgeryCost,$surgeryType="endprecum"]]
 		<</if>>
 	<</if>>
 <</if>>
@@ -622,22 +645,6 @@ $pronounCap has
 	<</if>>
 <</if>>
 <br>
-<<if $activeSlave.prostate > 0>>
-<<if $activeSlave.prostateImplant == 1>>
-	$pronounCap is implanted with an prostate implant designed to increase semen production and enhance ejaculation.
-<<else>>
-	$pronounCap is ejaculating normally.
-<</if>>
-<<if $activeSlave.prostateImplant == 0>>
-	<<if $activeSlave.indentureRestrictions < 2>>
-	[[Implant prostate with slow-release production drugs|Surgery Degradation][$activeSlave.prostateImplant = 1,$cash -= $surgeryCost, $activeSlave.health -= 20,$surgeryType = "ejaculation"]] //This will thin $possessive ejaculate but increase its quantity//
-	<</if>>
-<</if>>
-<<if $activeSlave.prostateImplant == 1>>
-	 | [[Remove prostate implant|Surgery Degradation][$activeSlave.prostateImplant = 0,$cash -= $surgeryCost, $activeSlave.health -= 20, $surgeryType = "endejac"]]
-<</if>>
-<</if>>
-<br>
 <<if $activeSlave.areolae == 0>>
 	$possessiveCap areolae are fairly normal.
 <<elseif $activeSlave.areolae == 1>>
diff --git a/src/uncategorized/reputation.tw b/src/uncategorized/reputation.tw
index 26e0d186aae5b6a68ddac84afd85ac1fa8702a29..e70ba3e9d95160723ee7de6230cccbefe68d4e7a 100644
--- a/src/uncategorized/reputation.tw
+++ b/src/uncategorized/reputation.tw
@@ -1,6 +1,6 @@
 :: Reputation [nobr]
 
-<<if $useTabs>>__Reputation__<</if>>
+<<if $useTabs == 0>>__Reputation__<</if>>
 <br>
 
 <<PCTitle>>
diff --git a/src/uncategorized/rieEligibilityCheck.tw b/src/uncategorized/rieEligibilityCheck.tw
index 2fc85d3640f6d2a48228a4e69721d33f366cf1b9..0ba369c701441718aff14af03777625726559c7b 100644
--- a/src/uncategorized/rieEligibilityCheck.tw
+++ b/src/uncategorized/rieEligibilityCheck.tw
@@ -2,14 +2,12 @@
 
 <<silently>>
 
-<<set $eventSlave = 0>>
-
-<<set $eligibleSlaves = []>>
+<<set $eventSlave = 0, $eligibleSlaves = []>>
 
 <<for $i = 0; $i < $slaves.length; $i++>>
 	<<if $slaves[$i].assignmentVisible == 1>>
 	<<if $slaves[$i].fuckdoll == 0>>
-	<<set $eligibleSlaves.push($slaves[$i])>>
+		<<set $eligibleSlaves.push($slaves[$i])>>
 	<</if>>
 	<</if>>
 <</for>>
@@ -19,8 +17,8 @@
 <<elseif $hostageRescued == 1>>
 	<<goto "P hostage acquisition">>
 <<else>>
-	<<set $eventSlave = 0>>
 	<<goto "Random Individual Event">>
 <</if>>
 
 <</silently>>
+
diff --git a/src/uncategorized/rulesAssistant.tw b/src/uncategorized/rulesAssistant.tw
index d991e46a345aa253a3dedeea4f88c6fdae5d70a4..a3a17c1078d0349bd75d85078011ecbb2e515556 100644
--- a/src/uncategorized/rulesAssistant.tw
+++ b/src/uncategorized/rulesAssistant.tw
@@ -2658,6 +2658,7 @@ Relationship rules: ''$currentRule.relationshipRules.''
 				<<set $currentRule.teeth = "straighten">>
 				<<set $currentRule.autosurgery = 1>>
 				<<set $currentRule.surgery.lactation = "no default setting">>
+				<<set $currentRule.surgery.prostate = "no default setting">>
 				<<set $currentRule.surgery.cosmetic = 1>>
 				<<set $currentRule.surgery.accent = 0>>
 				<<set $currentRule.surgery.shoulders = 0>>
@@ -2735,6 +2736,7 @@ Relationship rules: ''$currentRule.relationshipRules.''
 				<<set $currentRule.selectedSlaves = []>>
 				<<set $currentRule.excludedSlaves = []>>
 				<<set $currentRule.surgery.lactation = "no default setting">>
+				<<set $currentRule.surgery.prostate = "no default setting">>
 				<<set $currentRule.surgery.cosmetic = 0>>
 				<<set $currentRule.surgery.accent = 0>>
 				<<set $currentRule.surgery.shoulders = 0>>
@@ -2811,6 +2813,7 @@ Relationship rules: ''$currentRule.relationshipRules.''
 				<<set $currentRule.selectedSlaves = []>>
 				<<set $currentRule.excludedSlaves = []>>
 				<<set $currentRule.surgery.lactation = "no default setting">>
+				<<set $currentRule.surgery.prostate = "no default setting">>
 				<<set $currentRule.surgery.cosmetic = 0>>
 				<<set $currentRule.surgery.accent = 0>>
 				<<set $currentRule.surgery.shoulders = 0>>
@@ -2886,4 +2889,3 @@ Relationship rules: ''$currentRule.relationshipRules.''
 <</if>>
 
 | [[Import a rule|Import Rule]]
-
diff --git a/src/uncategorized/rulesAutosurgery.tw b/src/uncategorized/rulesAutosurgery.tw
index 46bfabc5f3ce4840479d24a96ec4fd87a6f52d99..aa7ee8acfdcf9f3e601e9954d20cc642a40a8b8a 100644
--- a/src/uncategorized/rulesAutosurgery.tw
+++ b/src/uncategorized/rulesAutosurgery.tw
@@ -2,49 +2,64 @@
 
 <<set $surgeries = []>>
 
-<<for _r = $defaultRules.length-1; _r >= 0; _r-->>
-	<<set _currentRule = $defaultRules[_r]>>
-	<<if (def _currentRule) && (_currentRule.autoSurgery != 0)>>
-		<<set $thisSurgery = _currentRule.surgery>>
-		<<set _temp = lastLactationSurgeryRule($slaves[$i], $defaultRules)>>
-		<<if _temp != null>>
-			<<set $thisSurgery.lactation = _temp.surgery.lactation>>
-		<</if>>
-		<<set _temp = lastLipSurgeryRule($slaves[$i], $defaultRules)>>
-		<<if _temp != null>>
-			<<set $thisSurgery.lips = _temp.surgery.lips>>
-		<</if>>
-		<<set _temp = lastButtSurgeryRule($slaves[$i], $defaultRules)>>
-		<<if _temp != null>>
-			<<set $thisSurgery.butt = _temp.surgery.butt>>
-		<</if>>
-		<<set _temp = lastBoobSurgeryRule($slaves[$i], $defaultRules)>>
-		<<if _temp != null>>
-			<<set $thisSurgery.boobs = _temp.surgery.boobs>>
-		<</if>>
-		<<if ($thisSurgery.hips !== "no default setting") && ($thisSurgery.butt !== "no default setting")>>
-			<<if $slaves[$i].hips < -1>>
-				<<if $thisSurgery.butt > 2>>
-					<<set $thisSurgery.butt = 2>>
-				<</if>>
-			<<elseif $slaves[$i].hips < 0>>
-				<<if $thisSurgery.butt > 4>>
-					<<set $thisSurgery.butt = 4>>
-				<</if>>
-			<<elseif $slaves[$i].hips > 0>>
-				<<if $thisSurgery.butt > 8>>
-					<<set $thisSurgery.butt = 8>>
-				<</if>>
-			<<elseif $slaves[$i].hips > 1>>
-			<<else>>
-				<<if $thisSurgery.butt > 6>>
-					<<set $thisSurgery.butt = 6>>
+<<if $HGTastes>>
+	<<if $HGTastes == 1>>
+		<<set $thisSurgery = {lactation: 0, cosmetic: 1, faceShape: "cute", lips: 10, hips: 0, hipsImplant: 0, butt: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, holes: 0}>>
+	<<elseif $HGTastes == 2>>
+		<<set $thisSurgery = {lactation: 0, cosmetic: 1, faceShape: "cute", lips: 60, hips: 0, hipsImplant: 0, butt: 4, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 1200, holes: 0}>>
+	<<else>>
+		<<set $thisSurgery = {lactation: 0, cosmetic: 1, faceShape: "cute", lips: 95, hips: 0, hipsImplant: 0, butt: 8, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 10000, holes: 2}>>
+	<</if>>
+<<else>>
+	<<for _r = $defaultRules.length-1; _r >= 0; _r-->>
+		<<set _currentRule = $defaultRules[_r]>>
+		<<if (def _currentRule) && (_currentRule.autoSurgery != 0)>>
+			<<set $thisSurgery = _currentRule.surgery>>
+			<<set _temp = lastLactationSurgeryRule($slaves[$i], $defaultRules)>>
+			<<if _temp != null>>
+				<<set $thisSurgery.lactation = _temp.surgery.lactation>>
+			<</if>>
+			<<set _temp = lastProstateSurgeryRule($slaves[$i], $defaultRules)>>
+			<<if _temp != null>>
+				<<set $thisSurgery.prostate = _temp.surgery.lactation>>
+			<</if>>
+			<<set _temp = lastLipSurgeryRule($slaves[$i], $defaultRules)>>
+			<<if _temp != null>>
+				<<set $thisSurgery.lips = _temp.surgery.lips>>
+			<</if>>
+			<<set _temp = lastButtSurgeryRule($slaves[$i], $defaultRules)>>
+			<<if _temp != null>>
+				<<set $thisSurgery.butt = _temp.surgery.butt>>
+			<</if>>
+			<<set _temp = lastBoobSurgeryRule($slaves[$i], $defaultRules)>>
+			<<if _temp != null>>
+				<<set $thisSurgery.boobs = _temp.surgery.boobs>>
+			<</if>>
+			<<if ($thisSurgery.hips !== "no default setting") && ($thisSurgery.butt !== "no default setting")>>
+				<<if $slaves[$i].hips < -1>>
+					<<if $thisSurgery.butt > 2>>
+						<<set $thisSurgery.butt = 2>>
+					<</if>>
+				<<elseif $slaves[$i].hips < 0>>
+					<<if $thisSurgery.butt > 4>>
+						<<set $thisSurgery.butt = 4>>
+					<</if>>
+				<<elseif $slaves[$i].hips > 0>>
+					<<if $thisSurgery.butt > 8>>
+						<<set $thisSurgery.butt = 8>>
+					<</if>>
+				<<elseif $slaves[$i].hips > 1>>
+				<<else>>
+					<<if $thisSurgery.butt > 6>>
+						<<set $thisSurgery.butt = 6>>
+					<</if>>
 				<</if>>
 			<</if>>
+			<<break>>
 		<</if>>
-		<<break>>
-	<</if>>
-<</for>>
+	<</for>>
+<</if>>
+
 <<if ndef $thisSurgery>>
 	<<set $thisSurgery = {lactation: "no default setting", cosmetic: 0, accent: "no default setting", shoulders: "no default setting", shouldersImplant: "no default setting", boobs: "no default setting", hips: "no default setting", hipsImplant: "no default setting", butt: "no default setting", faceShape: "no default setting", lips: "no default setting", holes: 0}>>
 <</if>>
@@ -56,14 +71,16 @@
 	<<set $seed = 1>>
 <<else>>
 <<if ($slaves[$i].lactation == 2) && ($thisSurgery.lactation == 0)>>
-	<<set $surgeries.push("surgery to remove her lactation implants")>>
-	<<set $slaves[$i].lactation = 0>>
-	<<set $cash -= $surgeryCost>>
+	<<set $surgeries.push("surgery to remove her lactation implants"), $slaves[$i].lactation = 0, $cash -= $surgeryCost>>
 	<<if $PC.medicine >= 100>><<set $slaves[$i].health -= 5>><<else>><<set $slaves[$i].health -= 10>><</if>>
-<<elseif ($slaves[$i].lactation != 2) && ($thisSurgery.lactation == 1)>>
-	<<set $surgeries.push("lactation inducing implanted drugs")>>
-	<<set $slaves[$i].lactation = 2>>
-	<<set $cash -= $surgeryCost>>
+<<elseif $slaves[$i].lactation != 2 && $thisSurgery.lactation>>
+	<<set $surgeries.push("lactation inducing implanted drugs"), $slaves[$i].lactation = 2, $cash -= $surgeryCost>>
+	<<if $PC.medicine >= 100>><<set $slaves[$i].health -= 5>><<else>><<set $slaves[$i].health -= 10>><</if>>
+<<elseif ($slaves[$i].prostate == 2) && ($thisSurgery.prostate == 0)>>
+	<<set $surgeries.push("surgery to remove her prostate implant"), $slaves[$i].prostate = 0, $cash -= $surgeryCost>>
+	<<if $PC.medicine >= 100>><<set $slaves[$i].health -= 5>><<else>><<set $slaves[$i].health -= 10>><</if>>
+<<elseif $slaves[$i].prostate != 2 && $thisSurgery.prostate>>
+	<<set $surgeries.push("a precum production enhancing drug implant"), $slaves[$i].prostate = 2, $cash -= $surgeryCost>>
 	<<if $PC.medicine >= 100>><<set $slaves[$i].health -= 5>><<else>><<set $slaves[$i].health -= 10>><</if>>
 <<elseif ($slaves[$i].anus > 3) && ($thisSurgery.cosmetic > 0)>>
 	<<set $surgeries.push("a restored anus")>>
diff --git a/src/uncategorized/saGetMilked.tw b/src/uncategorized/saGetMilked.tw
index 1b54409038656db7045b9dc3c9819f0e37477701..a9a39e004d1c612cbe22254eb3105d777ccee3bf 100644
--- a/src/uncategorized/saGetMilked.tw
+++ b/src/uncategorized/saGetMilked.tw
@@ -345,7 +345,13 @@ gets milked this week.
 		She does produce cum despite her apparent ballslessness, but less than she would if they weren't hidden inside her.
 	<</if>>
 
-	<<if $slaves[$i].prostate == 0>>
+	<<if $slaves[$i].prostate>>
+		<<if $slaves[$i].prostate > 2>>
+			Her heavily altered prostate greatly increases the volume of her ejaculations and promotes good, if not watery, semen production.
+		<<elseif $slaves[$i].prostate > 1>>
+			Her hyperactive prostate increases the volume of her ejaculations and promotes good semen production.
+		<</if>>
+	<<else>>
 		Her lack of a prostate reduces the health and volume of her ejaculations.
 	<</if>>
 
diff --git a/src/uncategorized/saLiveWithHG.tw b/src/uncategorized/saLiveWithHG.tw
index 5f69ef0fece84587c29bf59fe5b7c49f57bb3791..e2953b1e6fceb5d181473f1fc6a6f68b8b74b05c 100644
--- a/src/uncategorized/saLiveWithHG.tw
+++ b/src/uncategorized/saLiveWithHG.tw
@@ -744,3 +744,5 @@
 	<<include "SA rivalries">>
 	<br><<include "SA devotion">>
 <</if>>
+
+<<unset $HGTastes>>
diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index cf40a72c365063f083fe154ae3b6dbef5d8f1ad2..e7bd4b10ecd89d16673e819cd9ff5923432f1034 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -123,7 +123,6 @@
 <</if>>
 <</if>>
 
-
 <<if $slaves[$i].fuckdoll == 0>>
 <<if $slaves[$i].fetish != "mindbroken">>
 
@@ -266,65 +265,13 @@
 <<if ($slaves[$i].fetishKnown == 0)>>
 <<if ($slaves[$i].fetish == "humiliation")>>
 <<if random(1,100) > 90>>
-<<if $slaves[$i].clothes != "conservative clothing">>
-<<if $slaves[$i].clothes != "a toga">>
-<<if $slaves[$i].clothes != "a huipil">>
-<<if $slaves[$i].clothes != "a slutty qipao">>
-<<if $slaves[$i].clothes != "restrictive latex">>
-<<if $slaves[$i].clothes != "cutoffs and a t-shirt">>
-<<if $slaves[$i].clothes != "battledress">>
-<<if $slaves[$i].clothes != "a penitent nuns habit">>
-<<if $slaves[$i].clothes != "a slave gown">>
-<<if $slaves[$i].clothes != "slutty business attire">>
-<<if $slaves[$i].clothes != "nice business attire">>
-<<if $slaves[$i].clothes != "a comfortable bodysuit">>
-<<if $slaves[$i].clothes != "a leotard">>
-<<if $slaves[$i].clothes != "a bunny outfit">>
-<<if $slaves[$i].clothes != "a nice nurse outfit">>
-<<if $slaves[$i].clothes != "a slutty nurse outfit">>
-<<if $slaves[$i].clothes != "a schoolgirl outfit">>
-<<if $slaves[$i].clothes != "a hijab and abaya">>
-<<if $slaves[$i].clothes != "a kimono">>
-<<if $slaves[$i].clothes != "a nice maid outfit">>
-<<if $slaves[$i].clothes != "a slutty maid outfit">>
-<<if $slaves[$i].clothes != "a ball gown">>
-<<if $slaves[$i].clothes != "a halter top dress">>
-<<if $slaves[$i].clothes != "a mini dress">>
-<<if $slaves[$i].clothes != "a latex catsuit">>
-<<if $slaves[$i].clothes != "a military uniform">>
-<<if $slaves[$i].clothes != "a maternity dress">>
+<<if not $modestClothes.includes($slaves[$i].clothes)>>
 	Surprisingly, she takes to her extremely revealing clothing, and gets an obvious thrill from it. @@.green;She's a humiliation fetishist!@@
 	<<set $slaves[$i].fetishKnown = 1>>
 <</if>>
 <</if>>
 <</if>>
 <</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
-<</if>>
 
 <<if ($slaves[$i].vaginalAccessory == "chastity belt")>>
 	<<if ($slaves[$i].devotion > 20)>>
diff --git a/src/uncategorized/saTakeClasses.tw b/src/uncategorized/saTakeClasses.tw
index 3d408fc2979f85f54280cc0f25a7d1e8d6a1aba3..27a8e7993c8036af06f3b23abd082629fbdf94f7 100644
--- a/src/uncategorized/saTakeClasses.tw
+++ b/src/uncategorized/saTakeClasses.tw
@@ -2,22 +2,22 @@
 
 <<SlavePronouns $slaves[$i]>>
 
-<<set $learning = 1>>
+<<set _learning = 1>>
 
 <<if ($slaves[$i].assignment == "learn in the schoolroom")>>
 	<<if ($Schoolteacher != 0)>>
-		<<set $seed = $Schoolteacher.intelligence+$Schoolteacher.intelligenceImplant>>
+		<<set _seed = $Schoolteacher.intelligence+$Schoolteacher.intelligenceImplant>>
 		<<if ($Schoolteacher.visualAge > 35)>>
-			<<set $seed += 1>>
+			<<set _seed += 1>>
 		<</if>>
 		<<if $schoolteacherCareers.includes($Schoolteacher.career)>>
-			<<set $seed += 1>>
+			<<set _seed += 1>>
 		<</if>>
 		<<if ($Schoolteacher.face > 40)>>
-			<<set $seed += 1>>
+			<<set _seed += 1>>
 		<</if>>
-		<<if (random(1,100) < 20+($seed*20))>>
-			<<set $learning += 1>>
+		<<if (random(1,100) < 20+(_seed*20))>>
+			<<set _learning += 1>>
 		<</if>>
 	<</if>>
 <</if>>
@@ -37,33 +37,33 @@ takes courses in slavery<<if $schoolroomUpgradeSkills + $schoolroomUpgradeRemedi
 
 <<if ($slaves[$i].intelligence >= 3)>>
 	$pronounCap is a genius,
-	<<set $learning += 1>>
+	<<set _learning += 1>>
 <<elseif ($slaves[$i].intelligence >= 2)>>
 	$pronounCap is highly intelligent
-	<<set $learning += 1>>
+	<<set _learning += 1>>
 <<elseif ($slaves[$i].intelligence >= 1)>>
 	$pronounCap is of above average intelligence
 	<<if (random(1,100) < 70)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<elseif ($slaves[$i].intelligence >= 0)>>
 	$pronounCap is of average intelligence
 	<<if (random(1,100) < 50)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<elseif ($schoolroomUpgradeRemedial == 1)>>
 	<<if (random(1,100) < 50)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<elseif ($slaves[$i].intelligence >= -1)>>
 	$pronounCap is of below average intelligence
 	<<if (random(1,100) < 30)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<elseif ($slaves[$i].intelligence >= -2)>>
 	$pronounCap is quite stupid
 	<<if (random(1,100) < 10)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<else>>
 	$pronounCap is an imbecile,
@@ -71,41 +71,41 @@ takes courses in slavery<<if $schoolroomUpgradeSkills + $schoolroomUpgradeRemedi
 
 <<if ($slaves[$i].devotion > 95)>>
 	and worshipful of you,
-	<<set $learning += 1>>
+	<<set _learning += 1>>
 <<elseif ($slaves[$i].devotion > 50)>>
 	and devoted to you,
 	<<if (random(1,100) < 70)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<elseif ($slaves[$i].devotion > 20)>>
 	and obedient to you,
 	<<if (random(1,100) < 50)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<elseif ($slaves[$i].trust < -20)>>
 	and frightened of you,
 	<<if (random(1,100) < 50)>>
-		<<set $learning += 1>>
+		<<set _learning += 1>>
 	<</if>>
 <<else>>
 	and neither likes you nor is afraid of you,
 <</if>>
 
-<<if ($learning <= 1)>>
+<<if (_learning <= 1)>>
 	and $pronoun learns slowly this week.
-<<elseif ($learning == 2)>>
+<<elseif (_learning == 2)>>
 	and $pronoun does well with $possessive studies this week.
 <<else>>
 	and $pronoun is perfectly studious this week.
 <</if>>
 
-<<set $seed = 0>>
+<<set _seed = 0>>
 <<set $skillIncrease = 10+$slaves[$i].intelligence>>
-<<for $j = 0; $j < $learning; $j++>>
-	<<if ($slaves[$i].devotion <= 20) && ($seed == 0)>>
+<<for _j = 0; _j < _learning; _j++>>
+	<<if ($slaves[$i].devotion <= 20) && (_seed == 0)>>
 		Since $pronoun is wanting in basic obedience, $pronoun suffers through courses on @@.hotpink;$possessive place@@ in the Free Cities world.
 		<<set $slaves[$i].devotion += 10>>
-		<<set $seed = 1>>
+		<<set _seed = 1>>
 	<<elseif ($slaves[$i].oralSkill <= 10)>>
 		Since $pronoun is orally incompetent, $pronoun is taught basic gag reflex suppression exercises and other simple oral things.
 		<<OralSkillIncrease $slaves[$i]>>
@@ -149,7 +149,7 @@ takes courses in slavery<<if $schoolroomUpgradeSkills + $schoolroomUpgradeRemedi
 
 <<if ($slaves[$i].intelligenceImplant < 1)>>
 	$pronounCap makes some progress towards a basic education.
-	<<set $slaves[$i].intelligenceImplant += 0.1*$learning>>
+	<<set $slaves[$i].intelligenceImplant += 0.1*_learning>>
 	<<if ($slaves[$i].intelligenceImplant >= 1)>>
 		<<set $slaves[$i].intelligenceImplant = 1>>
 		$pronounCap has completed a course of slave education, and for most purposes $pronoun is now @@.deepskyblue;more intelligent.@@
diff --git a/src/uncategorized/schoolroomReport.tw b/src/uncategorized/schoolroomReport.tw
index 968f524c988b244f376bdbfa7fa01288d1137926..db9f36430d755f53a98f6b56504b7e35eaa2daff 100644
--- a/src/uncategorized/schoolroomReport.tw
+++ b/src/uncategorized/schoolroomReport.tw
@@ -1,21 +1,15 @@
 :: Schoolroom Report [nobr]
 
-<<set _idleBonus = 0, _FLsFetish = 0, _DL = $SchlRiIDs.length, $schoolroomSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $SchlRiIDs.length, $schoolroomSlaves = _DL, _SL = $slaves.length, _idleBonus = 0, _FLsFetish = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $SchlRiIDs[_dI].Index, _ID = $SchlRiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $SchlRiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if _ID == $slaves[_i].ID>>
-				/% Correct the Index %/
-				<<set $SchlRiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $SchlRiIDs[_dI].Index, _ID = $SchlRiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $SchlRiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "learn in the schoolroom">>
-		<<set $SchlRiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "learn in the schoolroom">>
+		<<set $SchlRiIDs.deleteAt(_dI), _dI--, _DL--, $schoolroomSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
@@ -28,11 +22,8 @@
 <</if>>
 
 <<if $Schoolteacher != 0>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if $slaves[_FLs].ID == $Schoolteacher.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Schoolteacher.ID; })>>
+
 	<<if ($slaves[_FLs].health < -80)>>
 		<<set $slaves[_FLs].health += 20>>
 	<<elseif ($slaves[_FLs].health < -40)>>
@@ -61,7 +52,7 @@
 			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
 		<</if>>
 	<</if>>
-	<<set $Schoolteacher = $slaves[_FLs], $i = _FLs>>
+	<<set $Schoolteacher = $slaves[_FLs]>>
 	&nbsp;&nbsp;&nbsp;&nbsp;$Schoolteacher.slaveName is serving as your Schoolteacher.<<if $Schoolteacher.relationship == -3>> As your wife, she tries her best to teach her pupils how to please you.<</if>>
 	<<if (_FLsFetish == 1)>>
 		She's allowed and even expected to use her students for her own sexual gratification, and in their own way her students are complicit, offering sexual favors for an easier time in the classroom. Before long, she's running a hungry eye over the tits and asses of new trainees; she is now @@.lightcoral;more dominant.@@
@@ -88,51 +79,51 @@
 		<<set _idleBonus++>>
 	<</if>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $SchlRiIDs[_dI].Index>>
-		<<if $Schoolteacher.rivalryTarget == $slaves[_i].ID>>
-			Ever since her <<if $Schoolteacher.rivalry == 1>>growing rival<<elseif $Schoolteacher.rivalry == 2>>rival<<elseif $Schoolteacher.rivalry == 3>>bitter rival<</if>>, was enrolled, she began stalking the classroom carrying a large paddle, much to $slaves[_i].slaveName's terror.
-			<<set $slaves[_i].devotion -= 4, $slaves[_i].trust -= 4>>
+		<<set $i = $SchlRiIDs[_dI].Index>>
+		<<if $Schoolteacher.rivalryTarget == $slaves[$i].ID>>
+			Ever since her <<if $Schoolteacher.rivalry == 1>>growing rival<<elseif $Schoolteacher.rivalry == 2>>rival<<elseif $Schoolteacher.rivalry == 3>>bitter rival<</if>>, was enrolled, she began stalking the classroom carrying a large paddle, much to $slaves[$i].slaveName's terror.
+			<<set $slaves[$i].devotion -= 4, $slaves[$i].trust -= 4>>
 			<<if random(1,100) > 35>>
-				<<set $Schoolteacher.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
+				<<set $Schoolteacher.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Schoolteacher.relationshipTarget == $slaves[_i].ID>>
-			She dedicates most of her attention to her <<if $Schoolteacher.relationship == 1>>friend<<elseif $Schoolteacher.relationship == 2>>best friend<<elseif $Schoolteacher.relationship == 3>>friend with benefits<<elseif $Schoolteacher.relationship == 4>>lover<<elseif $Schoolteacher.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, making sure she understands that day's lesson.
-			<<set $slaves[_i].devotion += 2, $slaves[_i].trust += 2>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Schoolteacher.ID || $slaves[_i].father == $Schoolteacher.ID>>
-				She makes sure to spend extra time teaching her daughter, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++>>
-			<<elseif $slaves[_i].ID == $Schoolteacher.mother>>
-				She makes sure to spend extra time teaching her mother, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++>>
-			<<elseif $slaves[_i].ID == $Schoolteacher.father>>
-				She makes sure to spend extra time teaching her father, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Schoolteacher) == 1>>
-				She makes sure to spend extra time teaching her twin sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Schoolteacher) == 2>>
-				She makes sure to spend extra time teaching her sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Schoolteacher) == 3>>
-				She makes sure to spend extra time teaching her half-sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++>>
+		<<elseif $Schoolteacher.relationshipTarget == $slaves[$i].ID>>
+			She dedicates most of her attention to her <<if $Schoolteacher.relationship == 1>>friend<<elseif $Schoolteacher.relationship == 2>>best friend<<elseif $Schoolteacher.relationship == 3>>friend with benefits<<elseif $Schoolteacher.relationship == 4>>lover<<elseif $Schoolteacher.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, making sure she understands that day's lesson.
+			<<set $slaves[$i].devotion += 2, $slaves[$i].trust += 2>>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Schoolteacher.ID || $slaves[$i].father == $Schoolteacher.ID>>
+				She makes sure to spend extra time teaching her daughter, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++>>
+			<<elseif $slaves[$i].ID == $Schoolteacher.mother>>
+				She makes sure to spend extra time teaching her mother, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++>>
+			<<elseif $slaves[$i].ID == $Schoolteacher.father>>
+				She makes sure to spend extra time teaching her father, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Schoolteacher) == 1>>
+				She makes sure to spend extra time teaching her twin sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Schoolteacher) == 2>>
+				She makes sure to spend extra time teaching her sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Schoolteacher) == 3>>
+				She makes sure to spend extra time teaching her half-sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++>>
 			<</if>>
-		<<elseif $Schoolteacher.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She makes sure to spend extra time teaching her $slaves[_i].relation, $slaves[_i].slaveName.
-			<<set $slaves[_i].trust++>>
+		<<elseif $Schoolteacher.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She makes sure to spend extra time teaching her $slaves[$i].relation, $slaves[$i].slaveName.
+			<<set $slaves[$i].trust++>>
 		<</if>>
 	<</for>>
-	<<if ($schoolroomSlaves < $schoolroom)>>
-		<<set _seed = random(1,10)+(($schoolroom-$schoolroomSlaves)*(random(150,170)+(_idleBonus*10)))>>
+	<<if (_DL < $schoolroom)>>
+		<<set _seed = random(1,10)+(($schoolroom-_DL)*(random(150,170)+(_idleBonus*10)))>>
 		<<set $cash += _seed>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;Since she doesn't have enough students to occupy all her time, $schoolroomName takes in citizens' slaves on a contract basis and she teaches them too, earning @@.yellowgreen;¤_seed.@@
 	<</if>>
-	<<if ($schoolroomSlaves > 0)>><br><br><</if>>
+	<<if (_DL > 0)>><br><br><</if>>
 <</if>>
 
-<<if ($schoolroomSlaves > 0)>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($schoolroomSlaves == 1)>>''There is one slave studying in $schoolroomName.''<<else>>''There are $schoolroomSlaves slaves studying in $schoolroomName.''<</if>>
+<<if (_DL > 0)>>
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL == 1)>>''There is one slave studying in $schoolroomName.''<<else>>''There are _DL slaves studying in $schoolroomName.''<</if>>
 <</if>>
 
 <<if ($Schoolteacher != 0)>>
@@ -171,27 +162,27 @@
 
 <<set _restedSlaves = 0>>
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $SchlRiIDs[_dI].Index, $i = _i>>
-	<<set $slaves[_i].devotion += _devBonus>>
-	<<if ($slaves[_i].health < -80)>>
-		<<set $slaves[_i].health += 20>>
-	<<elseif ($slaves[_i].health < -40)>>
-		<<set $slaves[_i].health += 10>>
-	<<elseif ($slaves[_i].health < 0)>>
-		<<set $slaves[_i].health += 7>>
-	<<elseif ($slaves[_i].health < 90)>>
-		<<set $slaves[_i].health += 3>>
+	<<set $i = $SchlRiIDs[_dI].Index>>
+	<<set $slaves[$i].devotion += _devBonus>>
+	<<if ($slaves[$i].health < -80)>>
+		<<set $slaves[$i].health += 20>>
+	<<elseif ($slaves[$i].health < -40)>>
+		<<set $slaves[$i].health += 10>>
+	<<elseif ($slaves[$i].health < 0)>>
+		<<set $slaves[$i].health += 7>>
+	<<elseif ($slaves[$i].health < 90)>>
+		<<set $slaves[$i].health += 3>>
 	<</if>>
 	/% Education done? Has to be here before we run the SA's or there will be double entries for slave %/
-	<<if ($slaves[_i].intelligenceImplant == 1)>>
-	<<if ($slaves[_i].voice == 0) || ($slaves[_i].accent <= 1) || (($schoolroomUpgradeLanguage == 0) && ($slaves[_i].accent <= 2))>>
-	<<if ($slaves[_i].oralSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].oralSkill > 10))>>
-	<<if ($slaves[_i].whoreSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].whoreSkill > 10))>>
-	<<if ($slaves[_i].entertainSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].entertainSkill > 10))>>
-	<<if ($slaves[_i].analSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].analSkill > 10))>>
-	<<if ($slaves[_i].vaginalSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[_i].vaginalSkill > 10)) || ($slaves[_i].vagina < 0)>>
-		<br><br>''__@@.pink;$slaves[_i].slaveName@@__'' can learn little from further classes, so @@.yellow;her assignment has defaulted to rest.@@
-		<<removeJob $slaves[_i] "learn in the schoolroom">>
+	<<if ($slaves[$i].intelligenceImplant == 1)>>
+	<<if ($slaves[$i].voice == 0) || ($slaves[$i].accent <= 1) || (($schoolroomUpgradeLanguage == 0) && ($slaves[$i].accent <= 2))>>
+	<<if ($slaves[$i].oralSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].oralSkill > 10))>>
+	<<if ($slaves[$i].whoreSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].whoreSkill > 10))>>
+	<<if ($slaves[$i].entertainSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].entertainSkill > 10))>>
+	<<if ($slaves[$i].analSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].analSkill > 10))>>
+	<<if ($slaves[$i].vaginalSkill > 30) || (($schoolroomUpgradeSkills == 0) && ($slaves[$i].vaginalSkill > 10)) || ($slaves[$i].vagina < 0)>>
+		<br><br>''__@@.pink;$slaves[$i].slaveName@@__'' can learn little from further classes, so @@.yellow;her assignment has defaulted to rest.@@
+		<<removeJob $slaves[$i] "learn in the schoolroom">>
 		<<set _restedSlaves++, _dI--, _DL-->>
 		<<continue>>
 	<</if>>
@@ -206,7 +197,7 @@
 		/* 000-250-006 */
 		<<if $seeImages == 1 && $imageChoice == 0>>
 		<div class="imageRef tinyImg">
-			<<SlaveArt $slaves[_i] 0 0>>
+			<<SlaveArt $slaves[$i] 0 0>>
 		</div>
 		<</if>>
 		/* 000-250-006 */
@@ -251,6 +242,6 @@
 <<if $schoolroomDecoration != "standard">>
 	$schoolroomNameCaps's $schoolroomDecoration atmosphere @@.hotpink;has a minor impact on the students.@@
 <</if>>
-<<if $schoolroomSlaves || $Schoolteacher>>
+<<if _DL > 0 || $Schoolteacher != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/servantsQuartersReport.tw b/src/uncategorized/servantsQuartersReport.tw
index aefbd40671e8435d4814c1f70af1c4df70044654..afdcca0ff8bd289deca0ec7791717d4a3b0f4481 100644
--- a/src/uncategorized/servantsQuartersReport.tw
+++ b/src/uncategorized/servantsQuartersReport.tw
@@ -1,21 +1,15 @@
 :: Servants' Quarters Report [nobr]
 
-<<set $stewardessBonus = 0, _FLsFetish = 0, _DL = $ServQiIDs.length, $servantsQuartersSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $ServQiIDs.length, $servantsQuartersSlaves = _DL, _SL = $slaves.length, _FLsFetish = 0, $stewardessBonus = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $ServQiIDs[_dI].Index, _ID = $ServQiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $ServQiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if _ID == $slaves[_i].ID>>
-				/% Correct the Index %/
-				<<set $ServQiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $ServQiIDs[_dI].Index, _ID = $ServQiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $ServQiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "work as a servant">>
-		<<set $ServQiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "work as a servant">>
+		<<set $ServQiIDs.deleteAt(_dI), _dI--, _DL--, $servantsQuartersSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
@@ -28,12 +22,9 @@
 <</if>>
 
 <<if ($Stewardess != 0)>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if $slaves[_FLs].ID == $Stewardess.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
-	<<set $slaves[_FLs].devotion += _devBonus, $i = _FLs>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Stewardess.ID; })>>
+
+	<<set $slaves[_FLs].devotion += _devBonus>>
 	<<if ($slaves[_FLs].health < -80)>>
 		<<set $slaves[_FLs].health += 20>>
 	<<elseif ($slaves[_FLs].health < -40)>>
@@ -61,14 +52,14 @@
 			<<set _FLsFetish = 2, $slaves[_FLs].fetishStrength += 4>>
 		<</if>>
 	<</if>>
-	<<set $Stewardess = $slaves[_FLs], $i = _FLs>>
+	<<set $Stewardess = $slaves[_FLs]>>
 	&nbsp;&nbsp;&nbsp;&nbsp;$Stewardess.slaveName is serving as your Stewardess.<<if $Stewardess.relationship == -3>> She does her best to be your perfect housewife.<</if>>
-	<<if ($stewardessImpregnates == 1) && ($servantsQuartersSlaves > 0) && (canPenetrate($Stewardess)) && $Stewardess.pubertyXY == 1>>
+	<<if ($stewardessImpregnates == 1) && (_DL > 0) && (canPenetrate($Stewardess)) && $Stewardess.pubertyXY == 1>>
 		<<set _stewardessImpregnated = 0>>
 		<<for _dI = 0; _dI < _DL; _dI++>>
-			<<set _i = $ServQiIDs[_dI].Index>>
-			<<if (canImpreg($slaves[_i], $Stewardess))>>
-				<<set $slaves[_i].preg = 1, $slaves[_i].pregSource = $Stewardess.ID, $slaves[_i].vagina = Math.clamp($slaves[_i].vagina,1,10), _stewardessImpregnated++, $slaves[_i].vaginalCount += 10, $vaginalTotal += 10>>
+			<<set $i = $ServQiIDs[_dI].Index>>
+			<<if (canImpreg($slaves[$i], $Stewardess))>>
+				<<set $slaves[$i].preg = 1, $slaves[$i].pregSource = $Stewardess.ID, $slaves[$i].vagina = Math.clamp($slaves[$i].vagina,1,10), _stewardessImpregnated++, $slaves[$i].vaginalCount += 10, $vaginalTotal += 10>>
 			<</if>>
 		<</for>>
 		<<if _stewardessImpregnated > 0>>
@@ -113,74 +104,74 @@
 		<<set _BonusToggle = 0>>
 	<</if>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $ServQiIDs[_dI].Index>>
-		<<if $Stewardess.rivalryTarget == $slaves[_i].ID>>
-			She bears down on her <<if $Stewardess.rivalry == 1>>growing rival<<elseif $Stewardess.rivalry == 2>>rival<<elseif $Stewardess.rivalry == 3>>bitter rival<</if>>, $slaves[_i].slaveName, forcing her to work extra hard or suffer punishment.
-			<<set $slaves[_i].devotion--, $slaves[_i].trust-->>
+		<<set $i = $ServQiIDs[_dI].Index>>
+		<<if $Stewardess.rivalryTarget == $slaves[$i].ID>>
+			She bears down on her <<if $Stewardess.rivalry == 1>>growing rival<<elseif $Stewardess.rivalry == 2>>rival<<elseif $Stewardess.rivalry == 3>>bitter rival<</if>>, $slaves[$i].slaveName, forcing her to work extra hard or suffer punishment.
+			<<set $slaves[$i].devotion--, $slaves[$i].trust-->>
 			<<if random(1,100) > 65>>
-				<<set $Stewardess.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
+				<<set $Stewardess.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Stewardess.relationshipTarget == $slaves[_i].ID>>
-			She dotes over her <<if $Stewardess.relationship == 1>>friend<<elseif $Stewardess.relationship == 2>>best friend<<elseif $Stewardess.relationship == 3>>friend with benefits<<elseif $Stewardess.relationship == 4>>lover<<elseif $Stewardess.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, making sure she knows how to do a good job and keeping her well stocked with everything she needs.
-			<<set $slaves[_i].devotion++>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Stewardess.ID || $slaves[_i].father == $Stewardess.ID>>
-				She pays special attention to her daughter, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-				<<set $slaves[_i].trust++>>
-			<<elseif $slaves[_i].ID == $Stewardess.mother>>
-				She pays special attention to her mother, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-				<<set $slaves[_i].trust++>>
-			<<elseif $slaves[_i].ID == $Stewardess.father>>
-				She pays special attention to her father, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Stewardess) == 1>>
-				She pays special attention to her twin sister, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Stewardess) == 2>>
-				She pays special attention to her sister, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-				<<set $slaves[_i].trust++>>
-			<<elseif areSisters($slaves[_i], $Stewardess) == 3>>
-				She pays special attention to her half-sister, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-				<<set $slaves[_i].trust++>>
+		<<elseif $Stewardess.relationshipTarget == $slaves[$i].ID>>
+			She dotes over her <<if $Stewardess.relationship == 1>>friend<<elseif $Stewardess.relationship == 2>>best friend<<elseif $Stewardess.relationship == 3>>friend with benefits<<elseif $Stewardess.relationship == 4>>lover<<elseif $Stewardess.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, making sure she knows how to do a good job and keeping her well stocked with everything she needs.
+			<<set $slaves[$i].devotion++>>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Stewardess.ID || $slaves[$i].father == $Stewardess.ID>>
+				She pays special attention to her daughter, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+				<<set $slaves[$i].trust++>>
+			<<elseif $slaves[$i].ID == $Stewardess.mother>>
+				She pays special attention to her mother, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+				<<set $slaves[$i].trust++>>
+			<<elseif $slaves[$i].ID == $Stewardess.father>>
+				She pays special attention to her father, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Stewardess) == 1>>
+				She pays special attention to her twin sister, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Stewardess) == 2>>
+				She pays special attention to her sister, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+				<<set $slaves[$i].trust++>>
+			<<elseif areSisters($slaves[$i], $Stewardess) == 3>>
+				She pays special attention to her half-sister, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+				<<set $slaves[$i].trust++>>
 			<</if>>
-		<<elseif $Stewardess.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She pays special attention to her $slaves[_i].relation, $slaves[_i].slaveName, making sure she doesn't slack off just because they are related.
-			<<set $slaves[_i].trust++>>
+		<<elseif $Stewardess.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She pays special attention to her $slaves[$i].relation, $slaves[$i].slaveName, making sure she doesn't slack off just because they are related.
+			<<set $slaves[$i].trust++>>
 		<</if>>
-		<<switch $slaves[_i].prestigeDesc>>
+		<<switch $slaves[$i].prestigeDesc>>
 		<<case "She is a famed Free Cities whore, and commands top prices.">>
-			She does her best to motivate the famous whore, $slaves[_i].slaveName, though she is uncertain why she is here.
+			She does her best to motivate the famous whore, $slaves[$i].slaveName, though she is uncertain why she is here.
 		<<case "She is a famed Free Cities slut, and can please anyone.">>
-			She ignores her duties in order the fawn over the famous entertainer, $slaves[_i].slaveName.
+			She ignores her duties in order the fawn over the famous entertainer, $slaves[$i].slaveName.
 		<<case "She is remembered for winning best in show as a cockmilker.">>
-			$slaves[_i].slaveName leaves a trail of cum wherever she goes and frequently stops to masturbate greatly annoying $Stewardess.slaveName.
-			<<if random(1,100) > 90 && $Stewardess.rivalry == 0 && $slaves[_i].rivalry == 0>>
-				<<set $Stewardess.rivalryTarget = $slaves[_i].ID, $Stewardess.rivalry++, $slaves[_FLs].rivalryTarget = $slaves[_i].ID, $slaves[_FLs].rivalry++>>
-				<<set $slaves[_i].rivalryTarget = $Stewardess.ID, $slaves[_i].rivalry++>>
+			$slaves[$i].slaveName leaves a trail of cum wherever she goes and frequently stops to masturbate greatly annoying $Stewardess.slaveName.
+			<<if random(1,100) > 90 && $Stewardess.rivalry == 0 && $slaves[$i].rivalry == 0>>
+				<<set $Stewardess.rivalryTarget = $slaves[$i].ID, $Stewardess.rivalry++, $slaves[_FLs].rivalryTarget = $slaves[$i].ID, $slaves[_FLs].rivalry++>>
+				<<set $slaves[$i].rivalryTarget = $Stewardess.ID, $slaves[$i].rivalry++>>
 			<</if>>
 		<<case "She is remembered for winning best in show as a dairy cow.">>
-			$slaves[_i].slaveName's huge breasts frequently get in the way of her work and she leaks milk everywhere, greatly annoying $Stewardess.slaveName.
-			<<if random(1,100) > 90 && $Stewardess.rivalry == 0 && $slaves[_i].rivalry == 0>>
-				<<set $Stewardess.rivalryTarget = $slaves[_i].ID, $Stewardess.rivalry++, $slaves[_FLs].rivalryTarget = $slaves[_i].ID, $slaves[_FLs].rivalry++>>
-				<<set $slaves[_i].rivalryTarget = $Stewardess.ID, $slaves[_i].rivalry++>>
+			$slaves[$i].slaveName's huge breasts frequently get in the way of her work and she leaks milk everywhere, greatly annoying $Stewardess.slaveName.
+			<<if random(1,100) > 90 && $Stewardess.rivalry == 0 && $slaves[$i].rivalry == 0>>
+				<<set $Stewardess.rivalryTarget = $slaves[$i].ID, $Stewardess.rivalry++, $slaves[_FLs].rivalryTarget = $slaves[$i].ID, $slaves[_FLs].rivalry++>>
+				<<set $slaves[$i].rivalryTarget = $Stewardess.ID, $slaves[$i].rivalry++>>
 			<</if>>
 		<<case "She is remembered for winning best in show as a breeder.">>
-			<<if $slaves[_i].preg > 20>>
-				$slaves[_i].slaveName's big pregnant belly frequently gets in the way of her work. However, $Stewardess.slaveName is willing to overlook it, as well as allow her easy jobs, due to how valuable her womb is.
+			<<if $slaves[$i].preg > 20>>
+				$slaves[$i].slaveName's big pregnant belly frequently gets in the way of her work. However, $Stewardess.slaveName is willing to overlook it, as well as allow her easy jobs, due to how valuable her womb is.
 			<</if>>
 		<</switch>>
-		<<if (_BonusToggle == 1) && ($slaves[_i].devotion < 45)>>
-			<<set $slaves[_i].devotion += 5>>
+		<<if (_BonusToggle == 1) && ($slaves[$i].devotion < 45)>>
+			<<set $slaves[$i].devotion += 5>>
 		<</if>>
 	<</for>>
-	<<if ($servantsQuartersSlaves > 0)>>
+	<<if (_DL > 0)>>
 		<<if ($Stewardess.fetishKnown == 1) && ($Stewardess.fetish == "dom")>>
 			She walks among the cowering servants as a queen among peasants, playing the role of dominant to perfection and increasing her charges' @@.hotpink;obedience.@@
 		<<elseif ($Stewardess.energy > 95)>>
 			She walks among the cowering servants looking for an excuse to extract sex from shirkers as @@.hotpink;punishment.@@
 		<</if>>
 		/% Get it out of the loop %/
-		<<set $cash += ($stewardessBonus * $servantsQuartersSlaves)>>
+		<<set $cash += ($stewardessBonus * _DL)>>
 		<br><br>
 	<</if>>
 <</if>>
@@ -189,8 +180,8 @@
 	The Societal Elite know you've ordered $Stewardess.slaveName to impregnate your maids. @@.red;They are not amused by your disenterest in eugenics.@@
 	<<set $failedElite += 10>>
 <</if>>
-<<if ($servantsQuartersSlaves > 0)>>
-	&nbsp;&nbsp;&nbsp;&nbsp;<<if ($servantsQuartersSlaves != 1)>>''There are $servantsQuartersSlaves slaves working out of the servants' quarters.'' They work to<<else>>''There is one slave working out of the servants' quarters.'' She works to<</if>> @@.yellowgreen;reduce@@ your household expenses; having a well-staffed house slightly @@.green;increases@@ your reputation.
+<<if (_DL > 0)>>
+	&nbsp;&nbsp;&nbsp;&nbsp;<<if (_DL != 1)>>''There are _DL slaves working out of the servants' quarters.'' They work to<<else>>''There is one slave working out of the servants' quarters.'' She works to<</if>> @@.yellowgreen;reduce@@ your household expenses; having a well-staffed house slightly @@.green;increases@@ your reputation.
 <</if>>
 
 <<if ($Stewardess != 0)>>
@@ -230,34 +221,34 @@
 <<set $servantMilkersMultiplier = 0.5, _SQMilk = 0, _SQMilkSale = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $ServQiIDs[_dI].Index, $i = _i, $slaves[_i].devotion += _devBonus>>
-	<<if ($slaves[_i].devotion <= 20) && ($slaves[_i].trust > -20)>>
-		<<set $slaves[_i].devotion -= 5, $slaves[_i].trust -= 5>>
-	<<elseif ($slaves[_i].devotion < 2)>>
-		<<set $slaves[_i].devotion += 2>>
-	<<elseif ($slaves[_i].devotion > 3)>>
-		<<set $slaves[_i].devotion -= 2>>
+	<<set $i = $ServQiIDs[_dI].Index, $slaves[$i].devotion += _devBonus>>
+	<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust > -20)>>
+		<<set $slaves[$i].devotion -= 5, $slaves[$i].trust -= 5>>
+	<<elseif ($slaves[$i].devotion < 2)>>
+		<<set $slaves[$i].devotion += 2>>
+	<<elseif ($slaves[$i].devotion > 3)>>
+		<<set $slaves[$i].devotion -= 2>>
 	<</if>>
-	<<if ($slaves[_i].trust < -50)>>
-		<<set $slaves[_i].trust += 2>>
-	<<elseif ($slaves[_i].trust < -6)>>
-		<<set $slaves[_i].trust += 1>>
+	<<if ($slaves[$i].trust < -50)>>
+		<<set $slaves[$i].trust += 2>>
+	<<elseif ($slaves[$i].trust < -6)>>
+		<<set $slaves[$i].trust += 1>>
 	<</if>>
-	<<if ($slaves[_i].health < -80)>>
-		<<set $slaves[_i].health += 20>>
-	<<elseif ($slaves[_i].health < -40)>>
-		<<set $slaves[_i].health += 10>>
-	<<elseif ($slaves[_i].health < 0)>>
-		<<set $slaves[_i].health += 7>>
-	<<elseif ($slaves[_i].health < 90)>>
-		<<set $slaves[_i].health += 3>>
+	<<if ($slaves[$i].health < -80)>>
+		<<set $slaves[$i].health += 20>>
+	<<elseif ($slaves[$i].health < -40)>>
+		<<set $slaves[$i].health += 10>>
+	<<elseif ($slaves[$i].health < 0)>>
+		<<set $slaves[$i].health += 7>>
+	<<elseif ($slaves[$i].health < 90)>>
+		<<set $slaves[$i].health += 3>>
 	<</if>>
 	<<if $showEWD != 0>>
 		<br><br>
 		/* 000-250-006 */
 		<<if $seeImages == 1 && $imageChoice == 0>>
 		<div class="imageRef tinyImg">
-			<<SlaveArt $slaves[_i] 0 0>>
+			<<SlaveArt $slaves[$i] 0 0>>
 		</div>
 		<</if>>
 		/* 000-250-006 */
@@ -268,7 +259,7 @@
 			is working out of $servantsQuartersName.
 		<</if>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA servant">>
-		<<if ($servantMilkers == 1) && ($slaves[_i].lactation > 0)>>
+		<<if ($servantMilkers == 1) && ($slaves[$i].lactation > 0)>>
 			<br>&nbsp;&nbsp;&nbsp;&nbsp;She <<include "SA get milked">>
 			<<set _SQMilk += $milk, _SQMilkSale += $milkSale>>
 		<</if>>
@@ -284,7 +275,7 @@
 		<<silently>>
 		<<include "SA chooses own job">>
 		<<include "SA servant">>
-		<<if ($servantMilkers == 1) && ($slaves[_i].lactation > 0)>>
+		<<if ($servantMilkers == 1) && ($slaves[$i].lactation > 0)>>
 			<<include "SA get milked">>
 			<<set _SQMilk += $milk, _SQMilkSale += $milkSale>>
 		<</if>>
@@ -299,7 +290,7 @@
 	<</if>>
 <</for>>
 
-<<if _SQMilk || $servantsQuartersDecoration != "standard">>
+<<if _SQMilk > 0 || $servantsQuartersDecoration != "standard">>
 	<br><br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<if _SQMilk > 0>>
 		Since your lactating servants spend most of their time working in the penthouse, they use the milkers there, giving _SQMilk liters of milk over the week, which is sold for @@.yellowgreen;¤_SQMilkSale.@@
@@ -310,8 +301,8 @@
 	$servantsQuartersNameCaps's $servantsQuartersDecoration atmosphere @@.hotpink;has a minor impact on your servants.@@
 <</if>>
 
-<<set $servantMilkersMultiplier = 1, $repGain += $servantsQuartersSlaves*20>>
+<<set $servantMilkersMultiplier = 1, $repGain += _DL*20>>
 
-<<if $servantsQuartersSlaves || $Stewardess>>
+<<if _DL > 0 || $Stewardess != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/slaveAssignmentsReport.tw b/src/uncategorized/slaveAssignmentsReport.tw
index 8a647968c6b990ea3c5ad785f13d25bed098a7c6..0ac9c0a167fd0e2c20b538599a5b2dfb3cb63843 100644
--- a/src/uncategorized/slaveAssignmentsReport.tw
+++ b/src/uncategorized/slaveAssignmentsReport.tw
@@ -4,41 +4,41 @@
 
 <<set $nextLink = "Economics", $nextButton = "Continue", _SL = $slaves.length>>
 
-<<for _i = 0; _i < _SL; _i++>>
+<<for $i = 0; $i < _SL; $i++>>
 
 /* PATCH, remove after 0.9.10 */
-<<if $slaves[_i].fetish == "sub">>
-	<<set $slaves[_i].fetish = "submissive">>
+<<if $slaves[$i].fetish == "sub">>
+	<<set $slaves[$i].fetish = "submissive">>
 <</if>>
 
-<<if ndef $slaves[_i].whoreSkill>>
-	@@.yellow;Reset bad whore skill for $slaves[_i].slaveName.@@ Report this as a bug if it reoccurs.<br>
-	<<set $slaves[_i].whoreSkill = 0>>
+<<if ndef $slaves[$i].whoreSkill>>
+	@@.yellow;Reset bad whore skill for $slaves[$i].slaveName.@@ Report this as a bug if it reoccurs.<br>
+	<<set $slaves[$i].whoreSkill = 0>>
 <</if>>
-<<if ndef $slaves[_i].entertainSkill>>
-	@@.yellow;Reset bad entertain skill for $slaves[_i].slaveName.@@ Report this as a bug if it reoccurs.<br>
-	<<set $slaves[_i].entertainSkill = 0>>
+<<if ndef $slaves[$i].entertainSkill>>
+	@@.yellow;Reset bad entertain skill for $slaves[$i].slaveName.@@ Report this as a bug if it reoccurs.<br>
+	<<set $slaves[$i].entertainSkill = 0>>
 <</if>>
-<<if ndef $slaves[_i].vaginalSkill>>
-	@@.yellow;Reset bad vaginal skill for $slaves[_i].slaveName.@@ Report this as a bug if it reoccurs.<br>
-	<<set $slaves[_i].vaginalSkill = 0>>
+<<if ndef $slaves[$i].vaginalSkill>>
+	@@.yellow;Reset bad vaginal skill for $slaves[$i].slaveName.@@ Report this as a bug if it reoccurs.<br>
+	<<set $slaves[$i].vaginalSkill = 0>>
 <</if>>
-<<if ndef $slaves[_i].analSkill>>
-	@@.yellow;Reset bad anal skill for $slaves[_i].slaveName.@@ Report this as a bug if it reoccurs.<br>
-	<<set $slaves[_i].analSkill = 0>>
+<<if ndef $slaves[$i].analSkill>>
+	@@.yellow;Reset bad anal skill for $slaves[$i].slaveName.@@ Report this as a bug if it reoccurs.<br>
+	<<set $slaves[$i].analSkill = 0>>
 <</if>>
-<<if ndef $slaves[_i].oralSkill>>
-	@@.yellow;Reset bad skill for $slaves[_i].slaveName.@@ Report this as a bug if it reoccurs.<br>
-	<<set $slaves[_i].oralSkill = 0>>
+<<if ndef $slaves[$i].oralSkill>>
+	@@.yellow;Reset bad skill for $slaves[$i].slaveName.@@ Report this as a bug if it reoccurs.<br>
+	<<set $slaves[$i].oralSkill = 0>>
 <</if>>
 
-<<if ($seeDicks > 0) && (canPenetrate($slaves[_i])) && ($slaves[_i].releaseRules != "restrictive")>>
-	<<set $averageDick += $slaves[_i].dick, $slavesWithWorkingDicks++>>
+<<if ($seeDicks > 0) && (canPenetrate($slaves[$i])) && ($slaves[$i].releaseRules != "restrictive")>>
+	<<set $averageDick += $slaves[$i].dick, $slavesWithWorkingDicks++>>
 <</if>>
 
-<<switch $slaves[_i].assignment>>
+<<switch $slaves[$i].assignment>>
 <<case "be your Head Girl">>
-	<<set $HeadGirl = $slaves[_i]>>
+	<<set $HeadGirl = $slaves[$i]>>
 	<<if $HeadGirl.fetish == "mindbroken">>
 		''__@@.pink;$HeadGirl.slaveName@@__'' is mindbroken @@.yellow;and cannot serve as your head girl any more.@@<br>
 		<<set $HeadGirl = 0>>
@@ -74,16 +74,16 @@
 			<<set $HGCum = 2+Math.trunc(($HeadGirl.balls/5)+($HeadGirl.energy/95)+($HeadGirl.health/95)+($HeadGirl.devotion/95))>>
 		<</if>>
 	<<else>>
-		<<removeJob $slaves[_i] "be your Head Girl">>
+		<<removeJob $slaves[$i] "be your Head Girl">>
 	<</if>>
 <<case "live with your Head Girl">>
-	<<if random(-30,20) <= $slaves[_i].devotion>>
+	<<if random(-30,20) <= $slaves[$i].devotion>>
 		<<set $HGSlaveSuccess++, $HGEnergy++>>
 	<<else>>
 		<<set $HGSlaveSuccess-->>
 	<</if>>
 <<case "recruit girls">>
-	<<set $Recruiter = $slaves[_i]>>
+	<<set $Recruiter = $slaves[$i]>>
 	<<if $Recruiter.fetish == "mindbroken">>
 		''__@@.pink;$Recruiter.slaveName@@__'' is mindbroken @@.yellow;and cannot serve as your recruiter any more.@@<br>
 		<<set $Recruiter = 0>>
@@ -101,10 +101,10 @@
 		<<set $Recruiter = 0>>
 	<</if>>
 	<<if $Recruiter == 0>>
-		<<removeJob $slaves[_i] "recruit girls">>
+		<<removeJob $slaves[$i] "recruit girls">>
 	<</if>>
 <<case "be the Madam">>
-	<<set $Madam = $slaves[_i]>>
+	<<set $Madam = $slaves[$i]>>
 	<<if canTalk($Madam) == false>>
 		''__@@.pink;$Madam.slaveName@@__'' can't give whores verbal orders @@.yellow;and cannot serve as your Madam any more.@@<br>
 		<<set $Madam = 0>>
@@ -122,10 +122,10 @@
 		<<set $Madam = 0>>
 	<</if>>
 	<<if $Madam == 0>>
-		<<removeJob $slaves[_i] "be the Madam">>
+		<<removeJob $slaves[$i] "be the Madam">>
 	<</if>>
 <<case "be the DJ">>
-	<<set $DJ = $slaves[_i]>>
+	<<set $DJ = $slaves[$i]>>
 	<<if canTalk($DJ) == false>>
 		''__@@.pink;$DJ.slaveName@@__'' can't speak @@.yellow;and cannot serve as your DJ any more.@@<br>
 		<<set $DJ = 0>>
@@ -140,10 +140,10 @@
 		<<set $DJ = 0>>
 	<</if>>
 	<<if $DJ == 0>>
-		<<removeJob $slaves[_i] "be the DJ">>
+		<<removeJob $slaves[$i] "be the DJ">>
 	<</if>>
 <<case "be the Milkmaid">>
-	<<set $Milkmaid = $slaves[_i]>>
+	<<set $Milkmaid = $slaves[$i]>>
 	<<if $Milkmaid.fetish == "mindbroken">>
 		''__@@.pink;$Milkmaid.slaveName@@__'' is mindbroken @@.yellow;and cannot serve as your Milkmaid any more.@@<br>
 		<<set $Milkmaid = 0>>
@@ -158,10 +158,10 @@
 		<<set $Milkmaid = 0>>
 	<</if>>
 	<<if $Milkmaid == 0>>
-		<<removeJob $slaves[_i] "be the Milkmaid">>
+		<<removeJob $slaves[$i] "be the Milkmaid">>
 	<</if>>
 <<case "be the Stewardess">>
-	<<set $Stewardess = $slaves[_i]>>
+	<<set $Stewardess = $slaves[$i]>>
 	<<if canTalk($Stewardess) == false>>
 		''__@@.pink;$Stewardess.slaveName@@__'' can't give servants verbal orders @@.yellow;and cannot serve as your Stewardess any more.@@<br>
 		<<set $Stewardess = 0>>
@@ -179,10 +179,10 @@
 		<<set $Stewardess = 0>>
 	<</if>>
 	<<if $Stewardess == 0>>
-		<<removeJob $slaves[_i] "be the Stewardess">>
+		<<removeJob $slaves[$i] "be the Stewardess">>
 	<</if>>
 <<case "be the Schoolteacher">>
-	<<set $Schoolteacher = $slaves[_i]>>
+	<<set $Schoolteacher = $slaves[$i]>>
 	<<if canTalk($Schoolteacher) == false>>
 		''__@@.pink;$Schoolteacher.slaveName@@__'' can't give verbal instruction @@.yellow;and cannot serve as your Schoolteacher any more.@@<br>
 		<<set $Schoolteacher = 0>>
@@ -197,10 +197,10 @@
 		<<set $Schoolteacher = 0>>
 	<</if>>
 	<<if $Schoolteacher == 0>>
-		<<removeJob $slaves[_i] "be the Schoolteacher">>
+		<<removeJob $slaves[$i] "be the Schoolteacher">>
 	<</if>>
 <<case "be the Wardeness">>
-	<<set $Wardeness = $slaves[_i]>>
+	<<set $Wardeness = $slaves[$i]>>
 	<<if canWalk($Wardeness) != true>>
 		''__@@.pink;$Wardeness.slaveName@@__'' is no longer independently mobile @@.yellow;and cannot serve as your Wardeness any more.@@<br>
 		<<set $Wardeness = 0>>
@@ -212,10 +212,10 @@
 		<<set $Wardeness = 0>>
 	<</if>>
 	<<if $Wardeness == 0>>
-		<<removeJob $slaves[_i] "be the Wardeness">>
+		<<removeJob $slaves[$i] "be the Wardeness">>
 	<</if>>
 <<case "be the Attendant">>
-	<<set $Attendant = $slaves[_i]>>
+	<<set $Attendant = $slaves[$i]>>
 	<<if $Attendant.fetish == "mindbroken">>
 		''__@@.pink;$Attendant.slaveName@@__'' is mindbroken @@.yellow;and cannot serve as your Attendant any more.@@<br>
 		<<set $Attendant = 0>>
@@ -227,10 +227,10 @@
 		<<set $Attendant = 0>>
 	<</if>>
 	<<if $Attendant == 0>>
-		<<removeJob $slaves[_i] "be the Attendant">>
+		<<removeJob $slaves[$i] "be the Attendant">>
 	<</if>>
 <<case "be the Nurse">>
-	<<set $Nurse = $slaves[_i]>>
+	<<set $Nurse = $slaves[$i]>>
 	<<if $Nurse.fetish == "mindbroken">>
 		''__@@.pink;$Nurse.slaveName@@__'' is mindbroken @@.yellow;and cannot serve as your Nurse any more.@@<br>
 		<<set $Nurse = 0>>
@@ -245,10 +245,10 @@
 		<<set $Nurse = 0>>
 	<</if>>
 	<<if $Nurse == 0>>
-		<<removeJob $slaves[_i] "be the Nurse">>
+		<<removeJob $slaves[$i] "be the Nurse">>
 	<</if>>
 <<case "guard you">>
-	<<set $Bodyguard = $slaves[_i]>>
+	<<set $Bodyguard = $slaves[$i]>>
 	<<if canWalk($Bodyguard) != true>>
 		''__@@.pink;$Bodyguard.slaveName@@__'' is no longer independently mobile @@.yellow;and cannot serve as your bodyguard any more.@@<br>
 		<<set $Bodyguard = 0>>
@@ -260,17 +260,17 @@
 		<<set $Bodyguard = 0>>
 	<</if>>
 	<<if $Bodyguard == 0>>
-		<<removeJob $slaves[_i] "guard you">>
+		<<removeJob $slaves[$i] "guard you">>
 	<</if>>
 <<case "be your Concubine">>
-	<<set $Concubine = $slaves[_i], $fuckSlaves++>>
+	<<set $Concubine = $slaves[$i], $fuckSlaves++>>
 <<case "serve in the master suite" "please you">>
 	<<set $fuckSlaves++>>
 <</switch>>
 
 <<if $Lurcher>>
-	<<if $slaves[_i].ID == $Lurcher.ID>>
-		<<set $Lurcher = $slaves[_i]>>
+	<<if $slaves[$i].ID == $Lurcher.ID>>
+		<<set $Lurcher = $slaves[$i]>>
 		<<if canWalk($Lurcher) != true>>
 			''__@@.pink;$Lurcher.slaveName@@__'' is no longer able to run @@.yellow;and cannot course as a lurcher.@@<br>
 			<<set $Lurcher = 0>>
@@ -281,37 +281,37 @@
 	<</if>>
 <</if>>
 
-<<if $fighterIDs.includes($slaves[_i])>>
-	<<if canWalk($slaves[_i]) != true>>
-		''__@@.pink;$slaves[_i].slaveName@@__'' is no longer independently mobile @@.yellow;and cannot fight any more.@@ She has been removed from $pitName roster<br>.
-		<<set $fighterIDs.delete($slaves[_i].ID)>>
+<<if $fighterIDs.includes($slaves[$i])>>
+	<<if canWalk($slaves[$i]) != true>>
+		''__@@.pink;$slaves[$i].slaveName@@__'' is no longer independently mobile @@.yellow;and cannot fight any more.@@ She has been removed from $pitName roster<br>.
+		<<set $fighterIDs.delete($slaves[$i].ID)>>
 	<</if>>
 <</if>>
 
-<<if $slaves[_i].origin>>
-<<set $toSearch = $slaves[_i].origin>>
+<<if $slaves[$i].origin>>
+<<set $toSearch = $slaves[$i].origin>>
 <<if $toSearch.indexOf("Slave Shelter") != -1>>
-	<<set $shelterGirlsIDs.push($slaves[_i].ID)>>
+	<<set $shelterGirlsIDs.push($slaves[$i].ID)>>
 <</if>>
 <</if>>
 
-<<if $slaves[_i].bellyPain != 0>>
-	<<set $slaves[_i].bellyPain = 0>>
+<<if $slaves[$i].bellyPain != 0>>
+	<<set $slaves[$i].bellyPain = 0>>
 <</if>>
 /* preg speed control changes*/
-<<if $slaves[_i].preg > 0>>
-	<<if $slaves[_i].pregControl == "slow gestation">>
-		<<set $slaves[_i].preg += 0.5>>
-		<<set $slaves[_i].preg = (Math.ceil($slaves[_i].preg*10)/10)>> /* trick to avoid precision lost error showed like week: 29.499999999999998*/
-	<<elseif $slaves[_i].pregControl == "speed up">>
-		<<set $slaves[_i].preg += 2>>
+<<if $slaves[$i].preg > 0>>
+	<<if $slaves[$i].pregControl == "slow gestation">>
+		<<set $slaves[$i].preg += 0.5>>
+		<<set $slaves[$i].preg = (Math.ceil($slaves[$i].preg*10)/10)>> /* trick to avoid precision lost error showed like week: 29.499999999999998*/
+	<<elseif $slaves[$i].pregControl == "speed up">>
+		<<set $slaves[$i].preg += 2>>
 	<<else>>
-		<<set $slaves[_i].preg++>>
+		<<set $slaves[$i].preg++>>
 	<</if>>
 <</if>>
 /* end of preg speed control changes*/
-<<if ($slaves[_i].scars == 3)>> 
-	<<set $slaves[_i].scarheal += 1>>
+<<if ($slaves[$i].scars == 3)>> 
+	<<set $slaves[$i].scarheal += 1>>
 <</if>>
 
 <</for>>
diff --git a/src/uncategorized/slaveShelter.tw b/src/uncategorized/slaveShelter.tw
index 5362f231b77c5eedf659f35f903c7721d7952838..c1a60c2b428d936273bc7aacd94e1a90a3146b79 100644
--- a/src/uncategorized/slaveShelter.tw
+++ b/src/uncategorized/slaveShelter.tw
@@ -1,23 +1,15 @@
-:: Slave Shelter
+:: Slave Shelter [nobr]
 
-<<nobr>>
+<<set $nextButton = "Back", $nextLink = "Buy Slaves", $returnTo = "Buy Slaves", $showEncyclopedia = 1, $encyclopedia = "Kidnapped Slaves">>
 
-<<set $nextButton = "Back">>
-<<set $nextLink = "Buy Slaves">>
-<<set $returnTo = "Buy Slaves">>
-<<set $showEncyclopedia = 1>>
-<<set $encyclopedia = "Kidnapped Slaves">>
+<<if $shelterSlaveBought == 1>><<goto $returnTo>><</if>>
 
-<</nobr>>\
-\
 You contact the Slave Shelter to review the profile of the slave the Shelter is offering to a good <<if $PC.title == 1>>Master<<else>>Mistress<</if>> willing to pay the Shelter's nominal placement fee. The severe, tired-looking woman who answers your call hurries through the disclaimers. "All Shelter Slaves are provided as-is... the Shelter provides a single slave for placement each week... resale of Shelter slaves is contractually forbidden... we reserve the right to unannounced inspection of placed slaves... the Shelter follows up on reports of abuse or resale of its slaves..."
 
-<<nobr>>
+<br><br>
 
 <<set _num = random(1,99)>>
 
-<<if $shelterSlave == 0>>
-
 <<set $origins = []>>
 
 <<set $origins.push("She has never communicated anything about her background, since she arrived at the shelter with a broken mind.")>>
@@ -227,22 +219,31 @@ You contact the Slave Shelter to review the profile of the slave the Shelter is
 	<<set $shelterSlave.sexualFlaw = either("hates penetration", "hates oral", "hates anal", "apathetic")>>
 <</if>>
 
-<</if>>
-
 <<set $slaveCost = 1000>>
 
-<</nobr>>\
-\
 The placement fee is ¤<<print $slaveCost>>.
 
-<<nobr>>
+<br><br>
+
+<<set $activeSlave = $shelterSlave>><<set $saleDescription = 1>><<set $applyLaw = 1>><<include "Long Slave Description">><<set $saleDescription = 0>>
+
+<br><br>
+
+$origins
+
+<br><br>
+
+<span id="result">
+
 <<if $cash >= $slaveCost>>
-	[[Buy her slave contract|New Slave Intro][$cash -= $slaveCost,$shelterSlaveBought = 1,$nextButton = "Continue",$nextLink = "AS Dump",$returnTo = "Main"]]
+	<<link "Buy her slave contract">>
+		<<replace "#result">>
+			<<set $cash -= $slaveCost, $shelterSlaveBought = 1, $shelterGirlsIDs.push($shelterSlave.ID), $nextButton = "Continue", $nextLink = "AS Dump", $returnTo = "Main">>
+			<<include "New Slave Intro">>
+		<</replace>>
+	<</link>>
 <<else>>
 	//You lack the necessary funds to buy this slave.//
 <</if>>
-<</nobr>>
-
-<<set $activeSlave = $shelterSlave>><<set $saleDescription = 1>><<include "Long Slave Description">><<set $saleDescription = 0>>
 
-$origins
+</span>
diff --git a/src/uncategorized/slaveSummary.tw b/src/uncategorized/slaveSummary.tw
index a85e0f12b47f4849911ed257577ded5d5b9b38c2..2cc13f7a8e28d56d40f1e8111b52a74f9f5b5c38 100644
--- a/src/uncategorized/slaveSummary.tw
+++ b/src/uncategorized/slaveSummary.tw
@@ -1,8 +1,8 @@
 :: Slave Summary [nobr]
 
 <<set _Pass = passage(), _SL = $slaves.length, $assignTo = _Pass>>
-<<for _i = 0;_i < _SL;_i++>>
-<<set _Slave = $slaves[_i]>>
+<<for _ssi = 0; _ssi < _SL; _ssi++>>
+<<set _Slave = $slaves[_ssi]>>
 <<if _Slave.assignment == "be your agent" || _Slave.assignment == "live with your agent">>
 	<<continue>> /* slaves on these assignments should never be visible from facilities */
 <</if>>
@@ -10,46 +10,46 @@
 <<case "Main">>
 	<<if _Slave.assignmentVisible != 1>><<continue>><</if>>
 	<<if (_Slave.choosesOwnClothes == 1) && (_Slave.clothes == "choosing her own clothes")>>
-		<<set $i = _i, _oldDevotion = _Slave.devotion>>
+		<<set $i = _ssi, _oldDevotion = _Slave.devotion>>
 		<<silently>><<include "SA chooses own clothes">><</silently>>
-		<<set $slaves[_i].devotion = _oldDevotion, _Slave = $slaves[_i]>> /* restore devotion value so repeatedly changing clothes isn't an exploit */
+		<<set $slaves[_ssi].devotion = _oldDevotion, _Slave = $slaves[_ssi]>> /* restore devotion value so repeatedly changing clothes isn't an exploit */
 	<</if>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<if "be your Head Girl" == _Slave.assignment>>''HG''
-	<<elseif "recruit girls" == _Slave.assignment>>''RC''
-	<<elseif "guard you" == _Slave.assignment>>''BG''
+	<<if "be your Head Girl" == _Slave.assignment>>''@@.lightcoral;HG@@''
+	<<elseif "recruit girls" == _Slave.assignment>>''@@.lightcoral;RC@@''
+	<<elseif "guard you" == _Slave.assignment>>''@@.lightcoral;BG@@''
 	<</if>>
-	<<if $personalAttention == _Slave.ID>>''PA''<</if>>
-	<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+	<<if $personalAttention == _Slave.ID>>''@@.lightcoral;PA@@''<</if>>
+	<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 <<case "Personal Attention Select">>
 	<<if (_Slave.assignmentVisible != 1) || (_Slave.fuckdoll > 0)>><<continue>><</if>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Personal Attention Select][$personalAttention = $slaves["+_i+"].ID, $activeSlave = $slaves["+_i+"], $personalAttentionChanged = 1]]">>
+	<<print "[[_Slave.slaveName|Personal Attention Select][$personalAttention = $slaves["+_ssi+"].ID, $activeSlave = $slaves["+_ssi+"], $personalAttentionChanged = 1]]">>
 <<case "Agent Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.assignment != "be your agent") && (_Slave.devotion >= 20) && (_Slave.intelligence > 0) && (_Slave.intelligenceImplant > 0) && canWalk(_Slave) && canSee(_Slave) && canTalk(_Slave) && _Slave.pregType < 50 && _Slave.breedingMark != 1>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Agent Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Agent Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
 <<case "BG Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && (_Slave.assignment != "guard you") && canWalk(_Slave) && canSee(_Slave) && _Slave.breedingMark != 1>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Bodyguard Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Bodyguard Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
 <<case "Recruiter Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && (_Slave.assignment != "recruit girls") && canWalk(_Slave) && canSee(_Slave) && canTalk(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Recruiter Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Recruiter Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
 <<case "HG Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && (_Slave.assignment != "be your Head Girl") && canWalk(_Slave) && canSee(_Slave) && canTalk(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|HG Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|HG Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -58,7 +58,7 @@
 <<if $Flag == 0>>
 	<<if (_Slave.assignment != "be your Head Girl") && (_Slave.indentureRestrictions <= 0) && _Slave.breedingMark != 1>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<<continue>>
 	<</if>>
@@ -67,13 +67,13 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Subordinate Targeting">>
 <<if (_Slave.devotion >= -20) && (_Slave.fuckdoll == 0) && ($activeSlave.ID != _Slave.ID)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Subordinate Targeting][$activeSlave.subTarget = $slaves["+_i+"].ID]]">>
+	<<print "[[_Slave.slaveName|Subordinate Targeting][$activeSlave.subTarget = $slaves["+_ssi+"].ID]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -84,7 +84,7 @@
 	<<if (_Slave.health < 20) || (_Slave.trust < 60) || (_Slave.devotion <= 60) || (_Slave.fetish == "mindbroken") || _Slave.sexualFlaw !== "none" || _Slave.behavioralFlaw !== "none">>
 	<<if _Slave.devotion >= -20 || _Slave.fetish == "mindbroken">>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<br>//_Slave.slaveName cannot be trusted in the spa//
 		<<continue>>
@@ -98,19 +98,19 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Attendant.ID>>
 		<<continue>>
 	<<else>>
-		<<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>><<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>><<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Attendant Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && canWalk(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Attendant Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Attendant Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -121,7 +121,7 @@
 	<<if _Slave.breedingMark != 1>>
 	<<if (_Slave.devotion > 50) || ((_Slave.devotion >= -50) && (_Slave.trust < -20)) || (_Slave.trust < -50) || (_Slave.trust > 50)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves[" + _i + "]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves[" + _ssi + "]]]">>
 	<<else>>
 		<br>//_Slave.slaveName must be either more fearful of you or devoted to you//
 		<<continue>>
@@ -135,19 +135,19 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Madam.ID>>
 		<<continue>>
 	<<else>>
-		<<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>><<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>><<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Madam Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && (_Slave.intelligence > -2) && canWalk(_Slave) && canSee(_Slave) && _Slave.breedingMark != 1>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Madam Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Madam Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -158,7 +158,7 @@
 	<<if _Slave.breedingMark != 1>>
 	<<if (_Slave.devotion > 50) || ((_Slave.devotion >= -50) && (_Slave.trust < -20)) || (_Slave.trust < -50) || (_Slave.trust > 50)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<br>//_Slave.slaveName must be either more fearful of you or devoted to you//
 		<<continue>>
@@ -172,20 +172,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $DJ.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "DJ Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && (_Slave.intelligence > -2) && canTalk(_Slave) && canWalk(_Slave) && _Slave.breedingMark != 1>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|DJ Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|DJ Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -195,7 +195,7 @@
 	<<if _Slave.assignment == "get treatment in the clinic">><<continue>><</if>>
 	<<if (_Slave.health < 20) || ($Nurse != 0 && (_Slave.chem > 15 && $clinicUpgradeFilters == 1) || ($bellyImplants == 1 && _Slave.bellyImplant > 100) || (_Slave.preg >= 1 && ($clinicSpeedGestation >= 0 || _Slave.pregControl == "speed up")))>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<br>//_Slave.slaveName cannot benefit from the clinic//
 		<<continue>>
@@ -205,20 +205,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Nurse.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Nurse Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && canWalk(_Slave) && canSee(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Nurse Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Nurse Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -229,7 +229,7 @@
 	<<if (_Slave.devotion >= -20) || ((_Slave.devotion >= -50) && (_Slave.trust < -20)) || (_Slave.trust < -50)>>
 		<<if (_Slave.intelligenceImplant < 1) || (_Slave.voice != 0 && _Slave.accent+$schoolroomUpgradeLanguage > 2) || (_Slave.oralSkill <= 10+$schoolroomUpgradeSkills*20) || (_Slave.whoreSkill <= 10+$schoolroomUpgradeSkills*20) || (_Slave.entertainSkill <= 10+$schoolroomUpgradeSkills*20) || (_Slave.analSkill < 10+$schoolroomUpgradeSkills*20) || ((_Slave.vagina >= 0) && (_Slave.vaginalSkill < 10+$schoolroomUpgradeSkills*20))>>
 			<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-			<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+			<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 		<<else>>
 			<br>//_Slave.slaveName already has a basic education//
 			<<continue>>
@@ -243,20 +243,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Schoolteacher.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Schoolteacher Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && canTalk(_Slave) && canWalk(_Slave) && canSee(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Schoolteacher Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Schoolteacher Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -282,7 +282,7 @@
 				<<if ($dairyStimulatorsSetting < 2) || (_Slave.anus > 2) || ($dairyPrepUpgrade == 1)>>
 					<<if ($dairyPregSetting < 2) || (_Slave.vagina > 2) || (_Slave.ovaries == 0) || ($dairyPrepUpgrade == 1)>>
 						<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-						<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+						<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 						<<else>>
 							<br>//_Slave.slaveName's vagina cannot accommodate current machine settings//
 							<<continue>>
@@ -308,20 +308,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Milkmaid.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Milkmaid Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 20) && canWalk(_Slave) && canSee(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Milkmaid Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Milkmaid Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -331,7 +331,7 @@
 	<<if _Slave.assignment == "work as a servant">><<continue>><</if>>
 	<<if (_Slave.devotion >= -20) || ((_Slave.devotion >= -50) && (_Slave.trust <= 20)) || (_Slave.trust < -20)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<br>//_Slave.slaveName must be either more fearful of you or devoted to you//
 		<<continue>>
@@ -341,20 +341,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Stewardess.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Stewardess Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && (_Slave.intelligence > -2) && canWalk(_Slave) && canSee(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Stewardess Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Stewardess Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -363,7 +363,7 @@
 	<<if _Slave.assignment == "serve in the master suite">><<continue>><</if>>
 	<<if (_Slave.devotion > 20) || ((_Slave.devotion >= -50) && (_Slave.trust < -20)) || (_Slave.trust < -50)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves[" + _i + "]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves[" + _ssi + "]]]">>
 	<<else>>
 		<br>//_Slave.slaveName is not sufficiently broken for the master suite//
 		<<continue>>
@@ -373,20 +373,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Concubine.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Concubine Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && _Slave.amp != 1>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Concubine Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Concubine Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -395,7 +395,7 @@
 	<<if _Slave.assignment == "be confined in the cellblock">><<continue>><</if>>
 	<<if (_Slave.devotion < -20 && _Slave.trust >= -20) || (_Slave.devotion < -50 && _Slave.trust >= -50)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<<continue>>
 	<</if>>
@@ -404,20 +404,20 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <<else>>
 	<<if _Slave.ID != $Wardeness.ID>>
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Wardeness Select">>
 <<if (_Slave.fuckdoll == 0) && (_Slave.devotion > 50) && canWalk(_Slave) & canSee(_Slave)>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Wardeness Workaround][$i = "+_i+"]]">>
+	<<print "[[_Slave.slaveName|Wardeness Workaround][$i = "+_ssi+"]]">>
 <<else>>
 	<<continue>>
 <</if>>
@@ -428,7 +428,7 @@
 	<<if _Slave.breedingMark != 1>>
 	<<if (_Slave.indentureRestrictions <= 0)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<<else>>
 		<br>//_Slave.slaveName's indenture forbids arcade service.//
 		<<continue>>
@@ -442,7 +442,7 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+		<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 	<</if>>
 <</if>>
 <<case "Pit">>
@@ -463,7 +463,7 @@
 				<<continue>>
 			<<else>>
 				<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-				<<print "[[_Slave.slaveName|Assign][$i = "+_i+"]]">>
+				<<print "[[_Slave.slaveName|Assign][$i = "+_ssi+"]]">>
 			<</if>>
 		<<else>>
 			<<continue>>
@@ -474,7 +474,7 @@
 <<else>>
 	<<if $fighterIDs.includes(_Slave.ID)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Retrieve][$i = "+_i+"]]">>
+		<<print "[[_Slave.slaveName|Retrieve][$i = "+_ssi+"]]">>
 	<<else>>
 		<<continue>>
 	<</if>>
@@ -484,7 +484,7 @@
 <<if $Flag == 0>>
 	<<if canWalk(_Slave) && ($Lurcher.ID != _Slave.ID)>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Assign][$i = "+_i+"]]">>
+		<<print "[[_Slave.slaveName|Assign][$i = "+_ssi+"]]">>
 	<<else>>
 		<<continue>>
 	<</if>>
@@ -493,7 +493,7 @@
 		<<continue>>
 	<<else>>
 		<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-		<<print "[[_Slave.slaveName|Retrieve][$i = "+_i+"]]">>
+		<<print "[[_Slave.slaveName|Retrieve][$i = "+_ssi+"]]">>
 	<</if>>
 <</if>>
 <<case "New Game Plus">>
@@ -514,14 +514,14 @@
 <<if $Flag == 0>>
 	<<if !ruleSlaveSelected(_Slave, $currentRule)>>
 		<br>__''
-		<<print "[[_Slave.slaveName|Rules Slave Select Workaround][$activeSlave = $slaves["+_i+"]]]">>''__
+		<<print "[[_Slave.slaveName|Rules Slave Select Workaround][$activeSlave = $slaves["+_ssi+"]]]">>''__
 	<<else>>
 		<<continue>>
 	<</if>>
 <<else>>
 	<<if ruleSlaveSelected(_Slave, $currentRule)>>
 		<br>__''
-		<<print "[[_Slave.slaveName|Rules Slave Deselect Workaround][$activeSlave = $slaves["+_i+"]]]">>''__
+		<<print "[[_Slave.slaveName|Rules Slave Deselect Workaround][$activeSlave = $slaves["+_ssi+"]]]">>''__
 	<<else>>
 		<<continue>>
 	<</if>>
@@ -530,14 +530,14 @@
 <<if $Flag == 0>>
 	<<if !ruleSlaveExcluded(_Slave, $currentRule)>>
 		<br>__''
-		<<print "[[_Slave.slaveName|Rules Slave Exclude Workaround][$activeSlave = $slaves["+_i+"]]]">>''__
+		<<print "[[_Slave.slaveName|Rules Slave Exclude Workaround][$activeSlave = $slaves["+_ssi+"]]]">>''__
 	<<else>>
 		<<continue>>
 	<</if>>
 <<else>>
 	<<if ruleSlaveExcluded(_Slave, $currentRule)>>
 		<br>__''
-		<<print "[[_Slave.slaveName|Rules Slave NoExclude Workaround][$activeSlave = $slaves["+_i+"]]]">>''__
+		<<print "[[_Slave.slaveName|Rules Slave NoExclude Workaround][$activeSlave = $slaves["+_ssi+"]]]">>''__
 	<<else>>
 		<<continue>>
 	<</if>>
@@ -545,7 +545,7 @@
 <<case "Matchmaking">>
 	<<if (_Slave.devotion < 100) || (_Slave.relationship != $activeSlave.relationship) || (_Slave.ID == $activeSlave.ID)>><<continue>><</if>>
 	<br style="clear:both" /><<if $lineSeparations == 0>><br><<else>><hr style="margin:0"><</if>><<if ($seeImages == 1) && ($seeSummaryImages == 1)>><div class="imageRef smlImg"><<SlaveArt _Slave 1>></div><</if>>
-	<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_i+"]]]">>
+	<<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves["+_ssi+"]]]">>
 <</switch>>
 
 <<set _Slave.energy = Math.clamp(_Slave.energy, 0, 100)>>
@@ -581,7 +581,7 @@
 <<set _Slave.devotion = Math.trunc(_Slave.devotion)>>
 <<set _Slave.health = Math.trunc(_Slave.health)>>
 
-<<set $slaves[_i] = _Slave>>
+<<set $slaves[_ssi] = _Slave>>
 
 will
 <<if (_Slave.assignment == "rest") && (_Slave.health >= -20)>>
@@ -594,18 +594,18 @@ will
 
 <<if ($displayAssignments == 1) && (_Pass == "Main") && (_Slave.ID != $HeadGirl.ID) && (_Slave.ID != $Recruiter.ID) && (_Slave.ID != $Bodyguard.ID)>>
 	<<if _Slave.assignment != "rest">>
-		<<print "[[Rest|Rest Workaround][$i = "+_i+"]]">>
+		<<print "[[Rest|Rest Workaround][$i = "+_ssi+"]]">>
 	<<else>>
 		Rest
 	<</if>>
 	<<if _Slave.assignment != "please you">>
-		| <<print "[[Fucktoy|Fucktoy Workaround][$i = "+_i+"]]">>
+		| <<print "[[Fucktoy|Fucktoy Workaround][$i = "+_ssi+"]]">>
 	<<else>>
 		| Fucktoy
 	<</if>>
 	<<if _Slave.indentureRestrictions <= 0 && _Slave.breedingMark != 1>>
 		<<if _Slave.assignment != "work a glory hole">>
-			| <<print "[[Gloryhole|Hole Workaround][$i = "+_i+"]]">>
+			| <<print "[[Gloryhole|Hole Workaround][$i = "+_ssi+"]]">>
 		<<else>>
 			| Hole
 		<</if>>
@@ -613,37 +613,37 @@ will
 	<<if _Slave.fuckdoll == 0>> /* NON-FUCKDOLL ASSIGNMENTS */
 		<<if (_Slave.assignment != "take classes")>>
 			<<if (_Slave.intelligenceImplant != 1) && ((_Slave.devotion >= -20) || ((_Slave.trust < -20) && (_Slave.devotion >= -50)) || (_Slave.trust < -50)) && (_Slave.fetish != "mindbroken")>>
-				| <<print "[[Classes|Classes Workaround][$i = "+_i+"]]">>
+				| <<print "[[Classes|Classes Workaround][$i = "+_ssi+"]]">>
 			<</if>>
 		<<else>>
 			| Classes
 		<</if>>
 		<<if (_Slave.assignment != "be a servant")>>
 			<<if ((_Slave.devotion >= -20) || ((_Slave.trust < -20) && (_Slave.devotion >= -50)) || (_Slave.trust < -50)) && canWalk(_Slave) && canSee(_Slave)>>
-				| <<print "[[House Servant|Servant Workaround][$i = "+_i+"]]">>
+				| <<print "[[House Servant|Servant Workaround][$i = "+_ssi+"]]">>
 			<</if>>
 		<<else>>
 			| House Servant
 		<</if>>
 		<<if (_Slave.assignment != "whore") && _Slave.breedingMark != 1>>
-			| <<print "[[Whore|Whore Workaround][$i = "+_i+"]]">>
+			| <<print "[[Whore|Whore Workaround][$i = "+_ssi+"]]">>
 		<<else>>
 			| Whore
 		<</if>>
 		<<if (_Slave.assignment != "serve the public") && _Slave.breedingMark != 1>>
-			| <<print "[[Public Servant|Public Servant Workaround][$i = "+_i+"]]">>
+			| <<print "[[Public Servant|Public Servant Workaround][$i = "+_ssi+"]]">>
 		<<else>>
 			| Public Servant
 		<</if>>
 		<<if (_Slave.lactation > 0) || (_Slave.balls > 0)>>
 			<<if (_Slave.assignment != "get milked")>>
-				| <<print "[[Milked|Milking Workaround][$i = "+_i+"]]">>
+				| <<print "[[Milked|Milking Workaround][$i = "+_ssi+"]]">>
 			<<else>>
 				| Milked
 			<</if>>
 		<</if>>
 		<<if (_Slave.assignment != "stay confined")>>
-			| <<print "[[Confinement|Confinement Workaround][$i = "+_i+"]]">>
+			| <<print "[[Confinement|Confinement Workaround][$i = "+_ssi+"]]">>
 		<<else>>
 			| Confinement
 		<</if>>
@@ -2794,22 +2794,22 @@ _Slave.faceShape face.
 <<if $abbreviateMental == 1>>
 @@.lightgreen;
 <<if $familyTesting == 1>>
-	<<for _j = 0; _j < _SL; _j++>>
-		<<if _Slave.mother == $slaves[_j].ID>>
-			$slaves[_j].slaveName's daughter<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
+	<<for ssj = 0; ssj < _SL; ssj++>>
+		<<if _Slave.mother == $slaves[_ssj].ID>>
+			$slaves[_ssj].slaveName's daughter<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
 		<</if>>
-		<<if _Slave.father == $slaves[_j].ID>>
-			$slaves[_j].slaveName's daughter<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
+		<<if _Slave.father == $slaves[_ssj].ID>>
+			$slaves[_ssj].slaveName's daughter<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
 		<</if>>
 	<</for>>
 	<<if _Slave.daughters == 1>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if $slaves[_j].mother == _Slave.ID>>
-				$slaves[_j].slaveName's mother<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if $slaves[_ssj].mother == _Slave.ID>>
+				$slaves[_ssj].slaveName's mother<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
 				<<break>>
 			<</if>>
-			<<if $slaves[_j].father == _Slave.ID>>
-				$slaves[_j].slaveName's father<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
+			<<if $slaves[_ssj].father == _Slave.ID>>
+				$slaves[_ssj].slaveName's father<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
 				<<break>>
 			<</if>>
 		<</for>>
@@ -2817,9 +2817,9 @@ _Slave.faceShape face.
 		multiple daughters
 	<</if>>
 	<<if _Slave.sisters == 1>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if areSisters($slaves[_j], _Slave.ID) > 0>>
-				$slaves[_j].slaveName's sister<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if areSisters($slaves[_ssj], _Slave.ID) > 0>>
+				$slaves[_ssj].slaveName's sister<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> & friend<<elseif _Slave.relationship == 2>> & BFF<<elseif _Slave.relationship == 3>> & FWB<<elseif _Slave.relationship == 4>> & lover<<else>> & wife<</if>><<set _relationshipHandled = 1>><</if>>
 				<<break>>
 			<</if>>
 		<</for>>
@@ -2827,19 +2827,19 @@ _Slave.faceShape face.
 		multiple sisters
 	<</if>>
 	<<if _Slave.relationship > 0 && _relationshipHandled != 1>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if _Slave.relationshipTarget == $slaves[_j].ID>>
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if _Slave.relationshipTarget == $slaves[_ssj].ID>>
 				<<switch _Slave.relationship>>
 				<<case 1>>
-					$slaves[_j].slaveName's friend
+					$slaves[_ssj].slaveName's friend
 				<<case 2>>
-					$slaves[_j].slaveName's BFF
+					$slaves[_ssj].slaveName's BFF
 				<<case 3>>
-					$slaves[_j].slaveName's FWB
+					$slaves[_ssj].slaveName's FWB
 				<<case 4>>
-					$slaves[_j].slaveName's lover
+					$slaves[_ssj].slaveName's lover
 				<<case 5>>
-					$slaves[_j].slaveName's wife
+					$slaves[_ssj].slaveName's wife
 				<</switch>>
 				&nbsp;&nbsp;&nbsp;&nbsp;
 				<<break>>
@@ -2857,28 +2857,28 @@ _Slave.faceShape face.
 	<</if>>
 <<else>>
 	<<if _Slave.relation != 0>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if _Slave.relationTarget == $slaves[_j].ID>>
-				$slaves[_j].slaveName's _Slave.relation
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if _Slave.relationTarget == $slaves[_ssj].ID>>
+				$slaves[_ssj].slaveName's _Slave.relation
 				<<if _Slave.relationship <= 0>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 				<<break>>
 			<</if>>
 		<</for>>
 	<</if>>
 	<<if _Slave.relationship > 0>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if _Slave.relationshipTarget == $slaves[_j].ID>>
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if _Slave.relationshipTarget == $slaves[_ssj].ID>>
 				<<switch _Slave.relationship>>
 				<<case 1>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>&<</if>> friend
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>&<</if>> friend
 				<<case 2>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>&<</if>> BFF
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>&<</if>> BFF
 				<<case 3>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>&<</if>> FWB
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>&<</if>> FWB
 				<<case 4>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>&<</if>> lover
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>&<</if>> lover
 				<<case 5>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>&<</if>> wife
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>&<</if>> wife
 				<</switch>>
 				&nbsp;&nbsp;&nbsp;&nbsp;
 				<<break>>
@@ -2898,15 +2898,15 @@ _Slave.faceShape face.
 @@
 <<set _relationshipHandled = 0>>
 <<if _Slave.rivalry != 0>>
-<<for _j = 0; _j < _SL; _j++>>
-<<if _Slave.rivalryTarget == $slaves[_j].ID>>
+<<for _ssj = 0; _ssj < _SL; _ssj++>>
+<<if _Slave.rivalryTarget == $slaves[_ssj].ID>>
 @@.lightsalmon;
 <<if _Slave.rivalry <= 1>>
-	Disl $slaves[_j].slaveName
+	Disl $slaves[_ssj].slaveName
 <<elseif _Slave.rivalry <= 2>>
-	$slaves[_j].slaveName's rival
+	$slaves[_ssj].slaveName's rival
 <<else>>
-	Hates $slaves[_j].slaveName
+	Hates $slaves[_ssj].slaveName
 <</if>>
 &nbsp;&nbsp;&nbsp;&nbsp;
 @@
@@ -2916,22 +2916,22 @@ _Slave.faceShape face.
 <</if>>
 <<elseif $abbreviateMental == 2>>
 <<if $familyTesting == 1>>
-	<<for _j = 0; _j < _SL; _j++>>
-		<<if _Slave.mother == $slaves[_j].ID>>
-			$slaves[_j].slaveName's @@.lightgreen;daughter<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
+	<<for ssj = 0; ssj < _SL; ssj++>>
+		<<if _Slave.mother == $slaves[_ssj].ID>>
+			$slaves[_ssj].slaveName's @@.lightgreen;daughter<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
 		<</if>>
-		<<if _Slave.father == $slaves[_j].ID>>
-			$slaves[_j].slaveName's @@.lightgreen;daughter<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
+		<<if _Slave.father == $slaves[_ssj].ID>>
+			$slaves[_ssj].slaveName's @@.lightgreen;daughter<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
 		<</if>>
 	<</for>>
 	<<if _Slave.daughters == 1>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if $slaves[_j].mother == _Slave.ID>>
-				$slaves[_j].slaveName's @@.lightgreen;mother<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if $slaves[_ssj].mother == _Slave.ID>>
+				$slaves[_ssj].slaveName's @@.lightgreen;mother<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
 				<<break>>
 			<</if>>
-			<<if $slaves[_j].father == _Slave.ID>>
-				$slaves[_j].slaveName's @@.lightgreen;father<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
+			<<if $slaves[_ssj].father == _Slave.ID>>
+				$slaves[_ssj].slaveName's @@.lightgreen;father<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
 				<<break>>
 			<</if>>
 		<</for>>
@@ -2945,9 +2945,9 @@ _Slave.faceShape face.
 		<</if>>
 	<</if>>
 	<<if _Slave.sisters == 1>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if areSisters($slaves[_j], _Slave) > 0>>
-				$slaves[_j].slaveName's @@.lightgreen;sister<<if _Slave.relationshipTarget == $slaves[_j].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if areSisters($slaves[_ssj], _Slave) > 0>>
+				$slaves[_ssj].slaveName's @@.lightgreen;sister<<if _Slave.relationshipTarget == $slaves[_ssj].ID>><<if _Slave.relationship == 1>> and friend<<elseif _Slave.relationship == 2>> and best friend<<elseif _Slave.relationship == 3>> and FWB<<elseif _Slave.relationship == 4>> and lover<<else>> and wife<</if>><<set _relationshipHandled = 1>><</if>>.@@
 				<<break>>
 			<</if>>
 		<</for>>
@@ -2961,19 +2961,19 @@ _Slave.faceShape face.
 		<</if>>
 	<</if>>
 	<<if _Slave.relationship > 0 && _relationshipHandled != 1>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if _Slave.relationshipTarget == $slaves[_j].ID>>
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if _Slave.relationshipTarget == $slaves[_ssj].ID>>
 				<<switch _Slave.relationship>>
 				<<case 1>>
-					$slaves[_j].slaveName's @@.lightgreen;friend.@@
+					$slaves[_ssj].slaveName's @@.lightgreen;friend.@@
 				<<case 2>>
-					$slaves[_j].slaveName's @@.lightgreen;best friend.@@
+					$slaves[_ssj].slaveName's @@.lightgreen;best friend.@@
 				<<case 3>>
-					$slaves[_j].slaveName's @@.lightgreen;FWB.@@
+					$slaves[_ssj].slaveName's @@.lightgreen;FWB.@@
 				<<case 4>>
-					$slaves[_j].slaveName's @@.lightgreen;lover.@@
+					$slaves[_ssj].slaveName's @@.lightgreen;lover.@@
 				<<case 5>>
-					$slaves[_j].slaveName's @@.lightgreen;slave wife.@@
+					$slaves[_ssj].slaveName's @@.lightgreen;slave wife.@@
 				<</switch>>
 				&nbsp;&nbsp;&nbsp;&nbsp;
 				<<break>>
@@ -2991,9 +2991,9 @@ _Slave.faceShape face.
 	<</if>>
 <<else>>
 	<<if _Slave.relation != 0>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if _Slave.relationTarget == $slaves[_j].ID>>
-				$slaves[_j].slaveName's 
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if _Slave.relationTarget == $slaves[_ssj].ID>>
+				$slaves[_ssj].slaveName's 
 				<<if _Slave.relationshipTarget != _Slave.relationTarget>>
 					@@.lightgreen;_Slave.relation@@.
 				<<else>>
@@ -3005,19 +3005,19 @@ _Slave.faceShape face.
 		<</for>>
 	<</if>>
 	<<if _Slave.relationship > 0>>
-		<<for _j = 0; _j < _SL; _j++>>
-			<<if _Slave.relationshipTarget == $slaves[_j].ID>>
+		<<for ssj = 0; ssj < _SL; ssj++>>
+			<<if _Slave.relationshipTarget == $slaves[_ssj].ID>>
 				<<switch _Slave.relationship>>
 				<<case 1>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>and<</if>> @@.lightgreen;friend.@@
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>and<</if>> @@.lightgreen;friend.@@
 				<<case 2>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>and<</if>> @@.lightgreen;best friend.@@
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>and<</if>> @@.lightgreen;best friend.@@
 				<<case 3>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>and<</if>> @@.lightgreen;FWB.@@
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>and<</if>> @@.lightgreen;FWB.@@
 				<<case 4>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>and<</if>> @@.lightgreen;lover.@@
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>and<</if>> @@.lightgreen;lover.@@
 				<<case 5>>
-					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_j].slaveName's<<else>>and<</if>> @@.lightgreen;slave wife.@@
+					<<if _Slave.relationshipTarget != _Slave.relationTarget>>$slaves[_ssj].slaveName's<<else>>and<</if>> @@.lightgreen;slave wife.@@
 				<</switch>>
 				&nbsp;&nbsp;&nbsp;&nbsp;
 				<<break>>
@@ -3036,16 +3036,16 @@ _Slave.faceShape face.
 <</if>>
 <<set _relationshipHandled = 0>>
 <<if _Slave.rivalry != 0>>
-<<for _j = 0; _j < _SL; _j++>>
-<<if _Slave.rivalryTarget == $slaves[_j].ID>>
+<<for _ssj = 0; _ssj < _SL; _ssj++>>
+<<if _Slave.rivalryTarget == $slaves[_ssj].ID>>
 <<if _Slave.rivalry <= 1>>
-	@@.lightsalmon;Dislikes@@ $slaves[_j].slaveName.
+	@@.lightsalmon;Dislikes@@ $slaves[_ssj].slaveName.
 	&nbsp;&nbsp;&nbsp;&nbsp;
 <<elseif _Slave.rivalry <= 2>>
-	$slaves[_j].slaveName's @@.lightsalmon;rival.@@
+	$slaves[_ssj].slaveName's @@.lightsalmon;rival.@@
 	&nbsp;&nbsp;&nbsp;&nbsp;
 <<else>>
-	@@.lightsalmon;Hates@@ $slaves[_j].slaveName.
+	@@.lightsalmon;Hates@@ $slaves[_ssj].slaveName.
 	&nbsp;&nbsp;&nbsp;&nbsp;
 <</if>>
 <<break>>
@@ -3275,7 +3275,7 @@ _Slave.faceShape face.
     @@.gray;_Slave.origin@@
 <</if>>
 
-<<set $slaves[_i] = _Slave>>
+<<set $slaves[_ssi] = _Slave>>
 
 <<switch _Pass>>
 <<case "Main">>
@@ -3287,9 +3287,9 @@ _Slave.faceShape face.
 <<case "Head Girl Suite">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Send her to live with your Head Girl|Assign][$i = "+_i+"]]">>
+	<<print "[[Send her to live with your Head Girl|Assign][$i = "+_ssi+"]]">>
 <<else>>
-	<<print "[[Bring her out of the Head Girl's suite|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Bring her out of the Head Girl's suite|Retrieve][$i = "+_ssi+"]]">>
 	<<break>>
 <</if>>
 <<case "Recruiter Select">>
@@ -3303,9 +3303,9 @@ _Slave.faceShape face.
 <<case "Spa">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Send her to the Spa|Assign][$i = "+_i+"]]">>
+	<<print "[[Send her to the Spa|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Remove her from the Spa|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Remove her from the Spa|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Attendant|Attendant Select]]
 	<<break>>
@@ -3317,9 +3317,9 @@ _Slave.faceShape face.
 <<case "Brothel">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Send her to the Brothel|Assign][$i = "+_i+"]]">>
+	<<print "[[Send her to the Brothel|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Release her from the Brothel|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Release her from the Brothel|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Madam|Madam Select]]
 	<<break>>
@@ -3331,9 +3331,9 @@ _Slave.faceShape face.
 <<case "Club">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Send her to the Club|Assign][$i = "+_i+"]]">>
+	<<print "[[Send her to the Club|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Remove her from the Club|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Remove her from the Club|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove DJ|DJ Select]]
 	<<break>>
@@ -3341,9 +3341,9 @@ _Slave.faceShape face.
 <<case "Arcade">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Confine her in the Arcade|Assign][$i = "+_i+"]]">>
+	<<print "[[Confine her in the Arcade|Assign][$i = "+_ssi+"]]">>
 <<else>>
-	<<print "[[Release her from the Arcade|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Release her from the Arcade|Retrieve][$i = "+_ssi+"]]">>
 <</if>>
 <<case "DJ Select">>
 <<if $DJCareers.includes(_Slave.career)>>
@@ -3355,9 +3355,9 @@ _Slave.faceShape face.
 		@@.cyan;Estimated DNA error value: <<print Math.ceil(_Slave.chem/10)>>@@
 	<</if>>
 <<if $Flag == 0>>
-	<<print "[[Send her to the Clinic|Assign][$i = "+_i+"]]">>
+	<<print "[[Send her to the Clinic|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Take her out of the Clinic|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Take her out of the Clinic|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Nurse|Nurse Select]]
 	<<break>>
@@ -3369,9 +3369,9 @@ _Slave.faceShape face.
 <<case "Schoolroom">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Assign her to the Schoolroom|Assign][$i = "+_i+"]]">>
+	<<print "[[Assign her to the Schoolroom|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Release her from the Schoolroom|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Release her from the Schoolroom|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Schoolteacher|Schoolteacher Select]]
 	<<break>>
@@ -3383,9 +3383,9 @@ _Slave.faceShape face.
 <<case "Dairy">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Send her to the Dairy|Assign][$i = "+_i+"]]">>
+	<<print "[[Send her to the Dairy|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Release her from the Dairy|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Release her from the Dairy|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Milkmaid|Milkmaid Select]]
 	<<break>>
@@ -3397,9 +3397,9 @@ _Slave.faceShape face.
 <<case "Servants' Quarters">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Assign her to the Servants' Quarters|Assign][$i = "+_i+"]]">>
+	<<print "[[Assign her to the Servants' Quarters|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Release her from the Servants' Quarters|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Release her from the Servants' Quarters|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Stewardess|Stewardess Select]]
 	<<break>>
@@ -3411,9 +3411,9 @@ _Slave.faceShape face.
 <<case "Master Suite">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Add her to the Suite|Assign][$i = "+_i+"]]">>
+	<<print "[[Add her to the Suite|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Send her out of the Suite|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Send her out of the Suite|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Concubine|Concubine Select]]
 	<<break>>
@@ -3421,9 +3421,9 @@ _Slave.faceShape face.
 <<case "Cellblock">>
 <br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Confine her in the cellblock|Assign][$i = "+_i+"]]">>
+	<<print "[[Confine her in the cellblock|Assign][$i = "+_ssi+"]]">>
 <<elseif $Flag == 1>>
-	<<print "[[Release her from the cellblock|Retrieve][$i = "+_i+"]]">>
+	<<print "[[Release her from the cellblock|Retrieve][$i = "+_ssi+"]]">>
 <<else>>
 	[[Change or remove Wardeness|Wardeness Select]]
 	<<break>>
@@ -3435,14 +3435,14 @@ _Slave.faceShape face.
 <<case "New Game Plus">>
 	<br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
 <<if $Flag == 0>>
-	<<print "[[Add to import list|NGP Workaround][$slavesToImport = 1, $i = "+_i+"]]">>
+	<<print "[[Add to import list|NGP Workaround][$slavesToImport = 1, $i = "+_ssi+"]]">>
 <<else>>
-	<<print "[[Remove from import list|NGP Workaround][$slavesToImport = 0, $i = "+_i+"]]">>
+	<<print "[[Remove from import list|NGP Workaround][$slavesToImport = 0, $i = "+_ssi+"]]">>
 	<<set $slavesToImport += 1>>
 <</if>>
 <<case "Matchmaking">>
 	<br><<if $seeImages != 1 || $seeSummaryImages != 1 || $imageChoice == 1>>&nbsp;&nbsp;&nbsp;&nbsp;<</if>>
-	<<print "[[Match them|Matchmaking][$subSlave = $slaves[" + _i + "]]]">>
+	<<print "[[Match them|Matchmaking][$subSlave = $slaves[" + _ssi + "]]]">>
 <</switch>>
 <</for>>
 <<set $activeSlave = 0, _Slave = 0>>
diff --git a/src/uncategorized/spaReport.tw b/src/uncategorized/spaReport.tw
index 65cbf63c53419a6750f9e8faa5d02f18db0c6b69..6193212240ec1126365034c4d5c70822fe7c2102 100644
--- a/src/uncategorized/spaReport.tw
+++ b/src/uncategorized/spaReport.tw
@@ -1,21 +1,15 @@
 :: Spa Report [nobr]
 
-<<set _bonusToggle = 0, _healthBonus = 0, _idleBonus = 0, _restedSlaves = 0, _trustBonus = 0, _DL = $SpaiIDs.length, $spaSlaves = _DL, _SL = $slaves.length, _FLs = -1>>
+<<set _DL = $SpaiIDs.length, $spaSlaves = _DL, _SL = $slaves.length, _bonusToggle = 0, _healthBonus = 0, _idleBonus = 0, _restedSlaves = 0, _trustBonus = 0>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $SpaiIDs[_dI].Index, _ID = $SpaiIDs[_dI].ID>>
-	<<if _i >= _SL || _ID != $slaves[_i].ID>>
-		/% Slaves.ID and $SpaiIDs.ID's don't match-up so let's find her %/
-		<<for _i = 0; _i < _SL; _i++>>
-			<<if _ID == $slaves[_i].ID>>
-				/% Correct the Index %/
-				<<set $SpaiIDs[_dI].Index = _i>>
-				<<break>>
-			<</if>>
-		<</for>>
+	<<set $i = $SpaiIDs[_dI].Index, _ID = $SpaiIDs[_dI].ID>>
+	<<if $i >= _SL || _ID != $slaves[$i].ID>>
+		/% IDs don't match-up so let's find her %/
+		<<set $i = $slaves.findIndex(function(s) { return s.ID == _ID; }), $SpaiIDs[_dI].Index = $i>>
 	<</if>>
-	<<if _i >= _SL || $slaves[_i].assignment != "rest in the spa">>
-		<<set $SpaiIDs.deleteAt(_dI), _dI--, _DL-->>
+	<<if $i == -1 || $slaves[$i].assignment != "rest in the spa">>
+		<<set $SpaiIDs.deleteAt(_dI), _dI--, _DL--, $spaSlaves-->>
 		<<continue>>
 	<</if>>
 <</for>>
@@ -28,11 +22,8 @@
 <</if>>
 
 <<if $Attendant != 0>>
-	<<for _FLs = 0; _FLs < _SL; _FLs++>>
-		<<if $slaves[_FLs].ID == $Attendant.ID>>
-			<<break>>
-		<</if>>
-	<</for>>
+	<<set _FLs = $slaves.findIndex(function(s) { return s.ID == $Attendant.ID; })>>
+
 	<<if ($slaves[_FLs].health < 100)>>
 		<<set $slaves[_FLs].health += 20>>
 	<</if>>
@@ -58,7 +49,7 @@
 	<<if ($Attendant.fetish == "none") || ($Attendant.fetish == "submissive")>>
 		<<set _devBonus++>>
 	<</if>>
-	<<set $slaves[_FLs].devotion += _devBonus, $Attendant = $slaves[_FLs], $i = _FLs>>
+	<<set $slaves[_FLs].devotion += _devBonus, $Attendant = $slaves[_FLs]>>
 	&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName is serving as the spa attendant.<<if $Attendant.relationship == -3>> She tries her best to be your perfect attentive and caring wife.<</if>>
 	<<if (_FLsFetish == 1)>>
 		When she is paid a visit by a slave with sexual issues to work out, she provides her with an understanding, willing, giving partner. She finds real satisfaction in helping your slaves find sexual gratification, and @@.lightsalmon;becomes a submissive.@@
@@ -96,173 +87,169 @@
 	<</if>>
 	<<set _attendantUsedCure = 0>>
 	<<for _dI = 0; _dI < _DL; _dI++>>
-		<<set _i = $SpaiIDs[_dI].Index>>
-		<<if ($slaves[_i].fetish == "mindbroken") && ($slaves[_i].health > 20) && (_attendantUsedCure == 0) && ($spaFix != 2)>>
+		<<set $i = $SpaiIDs[_dI].Index>>
+		<<if ($slaves[$i].fetish == "mindbroken") && ($slaves[$i].health > 20) && (_attendantUsedCure == 0) && ($spaFix != 2)>>
 			<<set _attendantUsedCure = 1>>
 			<<if (random(1,100) > 90-$Attendant.devotion)>>
-				&nbsp;&nbsp;&nbsp;&nbsp;@@.green;Something almost miraculous has happened.@@ $Attendant.slaveName has always refused to believe that $slaves[_i].slaveName could not be reached, and has lavished patient tenderness on her in $spaName. $slaves[_i].slaveName has begun to respond, and is stirring from her mental torpor.
-				<<set $slaves[_i].devotion = -3, $slaves[_i].sexualFlaw = "apathetic", $slaves[_i].behavioralFlaw = either("hates men", "odd"), $slaves[_i].fetish = "none", $slaves[_i].fetishKnown = 1>>
+				&nbsp;&nbsp;&nbsp;&nbsp;@@.green;Something almost miraculous has happened.@@ $Attendant.slaveName has always refused to believe that $slaves[$i].slaveName could not be reached, and has lavished patient tenderness on her in $spaName. $slaves[$i].slaveName has begun to respond, and is stirring from her mental torpor.
+				<<set $slaves[$i].devotion = -3, $slaves[$i].sexualFlaw = "apathetic", $slaves[$i].behavioralFlaw = either("hates men", "odd"), $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1>>
 				<<if ($arcologies[0].FSPaternalist > 0)>>
-					Society @@.green;strongly approves@@ of $slaves[_i].slaveName being restored to sanity, which advances ideals about enlightened slave ownership.
+					Society @@.green;strongly approves@@ of $slaves[$i].slaveName being restored to sanity, which advances ideals about enlightened slave ownership.
 					<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSPaternalist/$FSLockinLevel), $arcologies[0].FSPaternalist += 0.01*$FSSingleSlaveRep>>
 				<</if>>
 			<</if>>
 		<</if>>
 		<<set _seed = _bonusToggle * 10>>
-		<<if _bonusToggle == 1 && $slaves[_i].trust < 60>>
-			<<set $slaves[_i].trust++>>
+		<<if _bonusToggle == 1 && $slaves[$i].trust < 60>>
+			<<set $slaves[$i].trust++>>
 		<</if>>
-		<<if $Attendant.rivalryTarget == $slaves[_i].ID>>
-			She constantly harasses her <<if $Attendant.rivalry == 1>>growing rival<<elseif $Attendant.rivalry == 2>>rival<<elseif $Attendant.rivalry == 3>>bitter rival<</if>>, $slaves[_i].slaveName, preventing her from getting comfortable and forcing her to keep her guard up.
-			<<set $slaves[_i].devotion -= 4, $slaves[_i].trust -= 4>>
+		<<if $Attendant.rivalryTarget == $slaves[$i].ID>>
+			She constantly harasses her <<if $Attendant.rivalry == 1>>growing rival<<elseif $Attendant.rivalry == 2>>rival<<elseif $Attendant.rivalry == 3>>bitter rival<</if>>, $slaves[$i].slaveName, preventing her from getting comfortable and forcing her to keep her guard up.
+			<<set $slaves[$i].devotion -= 4, $slaves[$i].trust -= 4>>
 			<<if random(1,100) > 35>>
-				<<set $Attendant.rivalry++, $slaves[_FLs].rivalry++, $slaves[_i].rivalry++>>
+				<<set $Attendant.rivalry++, $slaves[_FLs].rivalry++, $slaves[$i].rivalry++>>
 			<</if>>
-		<<elseif $Attendant.relationshipTarget == $slaves[_i].ID>>
-			She dedicates most of her attention to her <<if $Attendant.relationship == 1>>friend<<elseif $Attendant.relationship == 2>>best friend<<elseif $Attendant.relationship == 3>>friend with benefits<<elseif $Attendant.relationship == 4>>lover<<elseif $Attendant.relationship == 5>>slave wife<</if>>, $slaves[_i].slaveName, making her stress, both physical and mental, wash away.
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
-		<<elseif $familyTesting == 1 && totalRelatives($slaves[_i]) > 0>>
-			<<if $slaves[_i].mother == $Attendant.ID || $slaves[_i].father == $Attendant.ID>>
-				She makes sure to spend extra time caring for her daughter, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif $slaves[_i].ID == $Attendant.mother>>
-				She makes sure to spend extra time caring for her mother, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif $slaves[_i].ID == $Attendant.father>>
-				She makes sure to spend extra time caring for her father, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif areSisters($slaves[_i], $Attendant) == 1>>
-				She makes sure to spend extra time caring for her twin sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif areSisters($slaves[_i], $Attendant) == 2>>
-				She makes sure to spend extra time caring for her sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
-			<<elseif areSisters($slaves[_i], $Attendant) == 3>>
-				She makes sure to spend extra time caring for her half-sister, $slaves[_i].slaveName.
-				<<set $slaves[_i].trust++, $slaves[_i].health++>>
+		<<elseif $Attendant.relationshipTarget == $slaves[$i].ID>>
+			She dedicates most of her attention to her <<if $Attendant.relationship == 1>>friend<<elseif $Attendant.relationship == 2>>best friend<<elseif $Attendant.relationship == 3>>friend with benefits<<elseif $Attendant.relationship == 4>>lover<<elseif $Attendant.relationship == 5>>slave wife<</if>>, $slaves[$i].slaveName, making her stress, both physical and mental, wash away.
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
+		<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0>>
+			<<if $slaves[$i].mother == $Attendant.ID || $slaves[$i].father == $Attendant.ID>>
+				She makes sure to spend extra time caring for her daughter, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif $slaves[$i].ID == $Attendant.mother>>
+				She makes sure to spend extra time caring for her mother, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif $slaves[$i].ID == $Attendant.father>>
+				She makes sure to spend extra time caring for her father, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif areSisters($slaves[$i], $Attendant) == 1>>
+				She makes sure to spend extra time caring for her twin sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif areSisters($slaves[$i], $Attendant) == 2>>
+				She makes sure to spend extra time caring for her sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
+			<<elseif areSisters($slaves[$i], $Attendant) == 3>>
+				She makes sure to spend extra time caring for her half-sister, $slaves[$i].slaveName.
+				<<set $slaves[$i].trust++, $slaves[$i].health++>>
 			<</if>>
-		<<elseif $Attendant.relationTarget == $slaves[_i].ID && $familyTesting == 0>>
-			She makes sure to spend extra time caring for her $slaves[_i].relation, $slaves[_i].slaveName.
-			<<set $slaves[_i].trust++>>
+		<<elseif $Attendant.relationTarget == $slaves[$i].ID && $familyTesting == 0>>
+			She makes sure to spend extra time caring for her $slaves[$i].relation, $slaves[$i].slaveName.
+			<<set $slaves[$i].trust++>>
 		<</if>>
-		<<switch $slaves[_i].prestigeDesc>>
+		<<switch $slaves[$i].prestigeDesc>>
 		<<case "She is a famed Free Cities whore, and commands top prices.">>
-			She does her best to relax the famous whore, $slaves[_i].slaveName, making sure to pay special attention to her worn holes.
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+			She does her best to relax the famous whore, $slaves[$i].slaveName, making sure to pay special attention to her worn holes.
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<<case "She is a famed Free Cities slut, and can please anyone.">>
-			She does her best to soothe the famous entertainer, $slaves[_i].slaveName, letting her relax in blissful peace.
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+			She does her best to soothe the famous entertainer, $slaves[$i].slaveName, letting her relax in blissful peace.
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<<case "She is remembered for winning best in show as a cockmilker.">>
 			<<if $Attendant.fetish == "cumslut">>
-				She can't keep her hands off $slaves[_i].slaveName's cock and balls, but she doesn't mind being milked constantly.  Before long strands of cum can be found floating all throughout the bath.
+				She can't keep her hands off $slaves[$i].slaveName's cock and balls, but she doesn't mind being milked constantly.  Before long strands of cum can be found floating all throughout the bath.
 				<<set $Attendant.fetishStrength += 4, $slaves[_FLs].fetishStrength += 4>>
 			<<else>>
-				She does her best to accommodate $slaves[_i].slaveName's massive genitals and tends to her when ever she feels a need for release.
+				She does her best to accommodate $slaves[$i].slaveName's massive genitals and tends to her when ever she feels a need for release.
 				<<if random(1,100) > 65 && $Attendant.fetish == "none">>
 					After taking several massive loads to the face, $Attendant.slaveName begins to find satisfaction in being coated in cum.
 					<<set $Attendant.fetish = "cumslut", $slaves[_FLs].fetish = "cumslut">>
 				<</if>>
 			<</if>>
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<<case "She is remembered for winning best in show as a dairy cow.">>
 			<<if $Attendant.fetish == "boobs">>
-				She can't keep her hands off $slaves[_i].slaveName's huge breasts, but she doesn't mind being milked constantly.  Before long the bath gains a white tint.
+				She can't keep her hands off $slaves[$i].slaveName's huge breasts, but she doesn't mind being milked constantly.  Before long the bath gains a white tint.
 				<<set $Attendant.fetishStrength += 4, $slaves[_FLs].fetishStrength += 4>>
 			<<else>>
-				She does her best to accommodate $slaves[_i].slaveName's massive breasts and tends to her when ever she feels a need for release.
+				She does her best to accommodate $slaves[$i].slaveName's massive breasts and tends to her when ever she feels a need for release.
 				<<if random(1,100) > 65 && $Attendant.fetish == "none">>
 					After multiple milking sessions, $Attendant.slaveName begins to find herself fantasizing about having giant milky breasts too.
 					<<set $Attendant.fetish = "boobs", $slaves[_FLs].fetish = "boobs">>
 				<</if>>
 			<</if>>
-			<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+			<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 		<<case "She is remembered for winning best in show as a breeder.">>
-			<<if $slaves[_i].preg > 10>>
+			<<if $slaves[$i].preg > 10>>
 				<<if $Attendant.fetish == "pregnancy">>
-				She can't keep her hands off $slaves[_i].slaveName's pregnancy, but she doesn't mind her full belly being fondled. 
+				She can't keep her hands off $slaves[$i].slaveName's pregnancy, but she doesn't mind her full belly being fondled. 
 				<<set $Attendant.fetishStrength += 4, $slaves[_FLs].fetishStrength += 4>>
 				<<else>>
-					She does her best to accommodate $slaves[_i].slaveName's pregnancy and to make sure the mother-to-be is happy and comfortable.
+					She does her best to accommodate $slaves[$i].slaveName's pregnancy and to make sure the mother-to-be is happy and comfortable.
 					<<if random(1,100) > 65 && $Attendant.fetish == "none">>
-						After massaging $slaves[_i].slaveName's growing belly multiple times, $Attendant.slaveName begins to find herself fantasizing about being swollen with life too.
+						After massaging $slaves[$i].slaveName's growing belly multiple times, $Attendant.slaveName begins to find herself fantasizing about being swollen with life too.
 						<<set $Attendant.fetish to "pregnancy", $slaves[_FLs].fetish to "pregnancy">>
 					<</if>>
 				<</if>>
-				<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+				<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 			<<else>>
 				<<if $Attendant.fetish == "pregnancy">>
-					She can't help but pester $slaves[_i].slaveName with questions about her pregnancy, limiting her ability to truly relax.
-					<<set $slaves[_i].devotion += 1, $slaves[_i].trust += 1>>
+					She can't help but pester $slaves[$i].slaveName with questions about her pregnancy, limiting her ability to truly relax.
+					<<set $slaves[$i].devotion += 1, $slaves[$i].trust += 1>>
 				<<else>>
-					She does her best to encourage $slaves[_i].slaveName's fertilization by performing any fertility boosting actions she can.
-					<<set $slaves[_i].devotion += 3, $slaves[_i].trust += 3>>
+					She does her best to encourage $slaves[$i].slaveName's fertilization by performing any fertility boosting actions she can.
+					<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 				<</if>>
 			<</if>>
 		<</switch>>
-		<<if ($Attendant.intelligence > 0) && (_attendantUsedCure == 0) && ($spaFix == 0)>>
-			<<if $slaves[_i].behavioralFlaw != "none">>
-				<<if random(1,100) > (100-($Attendant.intelligence*10)-_seed)>>
-				<<switch $slaves[_i].behavioralFlaw>>
+		<<if ($Attendant.intelligence > 0) && (_attendantUsedCure == 0) && random(1,100) > (100-($Attendant.intelligence*10)-_seed) && ($spaFix == 0)>>
+			<<if $slaves[$i].behavioralFlaw != "none">>
+				<<switch $slaves[$i].behavioralFlaw>>
 				<<case "arrogant">>
-				<<set $slaves[_i].behavioralQuirk = "confident">>
+				<<set $slaves[$i].behavioralQuirk = "confident">>
 				<<case "bitchy">>
-				<<set $slaves[_i].behavioralQuirk = "cutting">>
+				<<set $slaves[$i].behavioralQuirk = "cutting">>
 				<<case "odd">>
-				<<set $slaves[_i].behavioralQuirk = "funny">>
+				<<set $slaves[$i].behavioralQuirk = "funny">>
 				<<case "hates men">>
-				<<set $slaves[_i].behavioralQuirk = "adores women">>
+				<<set $slaves[$i].behavioralQuirk = "adores women">>
 				<<case "hates women">>
-				<<set $slaves[_i].behavioralQuirk = "adores men">>
+				<<set $slaves[$i].behavioralQuirk = "adores men">>
 				<<case "gluttonous">>
-				<<set $slaves[_i].behavioralQuirk = "fitness">>
+				<<set $slaves[$i].behavioralQuirk = "fitness">>
 				<<case "anorexic">>
-				<<set $slaves[_i].behavioralQuirk = "insecure">>
+				<<set $slaves[$i].behavioralQuirk = "insecure">>
 				<<case "devout">>
-				<<set $slaves[_i].behavioralQuirk = "sinful">>
+				<<set $slaves[$i].behavioralQuirk = "sinful">>
 				<<case "liberated">>
-				<<set $slaves[_i].behavioralQuirk = "advocate">>
+				<<set $slaves[$i].behavioralQuirk = "advocate">>
 				<</switch>>
-				<<set $slaves[_i].behavioralFlaw = "none", _attendantUsedCure += 1>>
-				&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[_i].slaveName, and successfully @@.green;softens her behavioral flaw@@ into an appealing quirk.
-				<</if>>
-			<<elseif $slaves[_i].sexualFlaw != "none">>
-				<<if random(1,100) > (100-($Attendant.intelligence*10)-_seed)>>
-				<<switch $slaves[_i].sexualFlaw>>
+				<<set $slaves[$i].behavioralFlaw = "none", _attendantUsedCure += 1>>
+				&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[$i].slaveName, and successfully @@.green;softens her behavioral flaw@@ into an appealing quirk.
+			<<elseif $slaves[$i].sexualFlaw != "none">>
+				<<switch $slaves[$i].sexualFlaw>>
 				<<case "hates oral">>
-				<<set $slaves[_i].sexualQuirk = "gagfuck queen">>
+				<<set $slaves[$i].sexualQuirk = "gagfuck queen">>
 				<<case "hates anal">>
-				<<set $slaves[_i].sexualQuirk = "painal queen">>
+				<<set $slaves[$i].sexualQuirk = "painal queen">>
 				<<case "hates penetration">>
-				<<set $slaves[_i].sexualQuirk = "strugglefuck queen">>
+				<<set $slaves[$i].sexualQuirk = "strugglefuck queen">>
 				<<case "shamefast">>
-				<<set $slaves[_i].sexualQuirk = "tease">>
+				<<set $slaves[$i].sexualQuirk = "tease">>
 				<<case "idealistic">>
-				<<set $slaves[_i].sexualQuirk = "romantic">>
+				<<set $slaves[$i].sexualQuirk = "romantic">>
 				<<case "repressed">>
-				<<set $slaves[_i].sexualQuirk = "perverted">>
+				<<set $slaves[$i].sexualQuirk = "perverted">>
 				<<case "apathetic">>
-				<<set $slaves[_i].sexualQuirk = "caring">>
+				<<set $slaves[$i].sexualQuirk = "caring">>
 				<<case "crude">>
-				<<set $slaves[_i].sexualQuirk = "unflinching">>
+				<<set $slaves[$i].sexualQuirk = "unflinching">>
 				<<case "judgemental">>
-				<<set $slaves[_i].sexualQuirk = "size queen">>
+				<<set $slaves[$i].sexualQuirk = "size queen">>
 				<</switch>>
-				<<set $slaves[_i].sexualFlaw = "none", _attendantUsedCure += 1>>
-				&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[_i].slaveName, and successfully @@.green;softens her sexual flaw@@ into an appealing quirk.
-				<</if>>
+				<<set $slaves[$i].sexualFlaw = "none", _attendantUsedCure += 1>>
+				&nbsp;&nbsp;&nbsp;&nbsp;$Attendant.slaveName works carefully with $slaves[$i].slaveName, and successfully @@.green;softens her sexual flaw@@ into an appealing quirk.
 			<</if>>
 		<</if>>
 	<</for>>
-	<<if ($spaSlaves < $spa)>>
-		<<set _seed = random(1,10)+(($spa-$spaSlaves)*(random(150,170)+(_idleBonus*10)))>>
+	<<if (_DL < $spa)>>
+		<<set _seed = random(1,10)+(($spa-_DL)*(random(150,170)+(_idleBonus*10)))>>
 		<<set $cash += _seed>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;Since she doesn't have enough girls to occupy all her time, the spa takes in citizens' slaves on a contract basis and she helps them too, earning @@.yellowgreen;¤_seed.@@
 	<</if>>
-	<<if ($spaSlaves > 0)>><br><br><</if>>
+	<<if (_DL > 0)>><br><br><</if>>
 <</if>>
 
-<<if ($spaSlaves > 0)>>
-	&nbsp;&nbsp;&nbsp;&nbsp;''<<if ($spaSlaves > 1)>>There are $spaSlaves slaves<<else>>There is one slave<</if>> resting and recuperating in the spa.''
+<<if (_DL > 0)>>
+	&nbsp;&nbsp;&nbsp;&nbsp;''<<if (_DL > 1)>>There are _DL slaves<<else>>There is one slave<</if>> resting and recuperating in the spa.''
 <</if>>
 
 <<if $Attendant != 0>>
@@ -300,21 +287,21 @@
 <</if>>
 
 <<for _dI = 0; _dI < _DL; _dI++>>
-	<<set _i = $SpaiIDs[_dI].Index, $i = _i>>
-	<<set $slaves[_i].devotion += _devBonus, $slaves[_i].trust += _trustBonus, $slaves[_i].health += _healthBonus>>
-	<<if ($slaves[_i].devotion < 60) && ($slaves[_i].trust < 60)>>
-		<<set $slaves[_i].devotion++, $slaves[_i].trust++>>
-	<<elseif ($slaves[_i].trust < 40)>>
-		<<set $slaves[_i].trust += 10>>
-	<<elseif ($slaves[_i].devotion < 40)>>
-		<<set $slaves[_i].devotion += 10>>
+	<<set $i = $SpaiIDs[_dI].Index>>
+	<<set $slaves[$i].devotion += _devBonus, $slaves[$i].trust += _trustBonus, $slaves[$i].health += _healthBonus>>
+	<<if ($slaves[$i].devotion < 60) && ($slaves[$i].trust < 60)>>
+		<<set $slaves[$i].devotion++, $slaves[$i].trust++>>
+	<<elseif ($slaves[$i].trust < 40)>>
+		<<set $slaves[$i].trust += 10>>
+	<<elseif ($slaves[$i].devotion < 40)>>
+		<<set $slaves[$i].devotion += 10>>
 	<</if>>
-	<<if ($spaUpgrade == 1) && ($slaves[_i].health < 20)>>
-		<<set $slaves[_i].health += 3>>
+	<<if ($spaUpgrade == 1) && ($slaves[$i].health < 20)>>
+		<<set $slaves[$i].health += 3>>
 	<</if>>
-	<<if ($slaves[_i].health >= 20) && ($slaves[_i].trust > 60) && ($slaves[_i].devotion > 60) && ($slaves[_i].fetish != "mindbroken") && ($slaves[_i].sexualFlaw == "none") && ($slaves[_i].behavioralFlaw == "none")>>
-		<br><br>''__@@.pink;$slaves[_i].slaveName@@__'' is feeling well enough to leave $spaName, so @@.yellow;her assignment has defaulted to rest@@.
-		<<removeJob $slaves[_i] "rest in the spa">>
+	<<if ($slaves[$i].health >= 20) && ($slaves[$i].trust > 60) && ($slaves[$i].devotion > 60) && ($slaves[$i].fetish != "mindbroken") && ($slaves[$i].sexualFlaw == "none") && ($slaves[$i].behavioralFlaw == "none")>>
+		<br><br>''__@@.pink;$slaves[$i].slaveName@@__'' is feeling well enough to leave $spaName, so @@.yellow;her assignment has defaulted to rest@@.
+		<<removeJob $slaves[$i] "rest in the spa">>
 		<<set _restedSlaves++, _DL--, _dI-->>
 		<<continue>>
 	<</if>>
@@ -367,6 +354,6 @@
 		$spaNameCaps's $spaDecoration atmosphere @@.hotpink;had an impact on <<if _restedSlaves == 1>>her while she<<else>>them while they<</if>>@@ were resting.
 	<</if>>
 <</if>>
-<<if $spaSlaves || $Attendant>>
+<<if _DL > 0 || $Attendant != 0>>
 	<br><br>
 <</if>>
diff --git a/src/uncategorized/specialSlave.tw b/src/uncategorized/specialSlave.tw
index 9a9e6ea955562bf5fb62312004d584c9049e5c20..f512e133ab89c75891ede40141a3b7a7275bb9d0 100644
--- a/src/uncategorized/specialSlave.tw
+++ b/src/uncategorized/specialSlave.tw
@@ -1,50 +1,62 @@
-:: Special Slave
-
-<<set $nextButton = "Back">>\
-<<set $nextLink = "Buy Slaves">>\
-<<set $returnTo = "Buy Slaves">>\
-<<set $showEncyclopedia = 1>><<set $encyclopedia = "Direct Sales">>\
-\
-You review a piece of merchandise via video call, making a few lewd demands to gauge her obedience. The background of the video feed is luxurious and plush; somewhere offscreen someone is moaning rapturously.
-
-<<set $activeSlave = getHeroSlave($heroSlaves.random(), $baseHeroSlave)>>\
-<<set $activeSlave.weekAcquired = $week>>\
-<<set $activeSlave.pubicHColor = $activeSlave.hColor>>\
-<<set $activeSlave.pubicHStyle = "waxed">>\
-<<set $activeSlave.underArmHColor = $activeSlave.hColor>>\
-<<set $activeSlave.underArmHStyle = "waxed">>\
-<<if $familyTesting == 1>>
-	/* special slaves exceptions to keep siblings sensible */
-	<<if $activeSlave.mother == -9999 && $activeSlave.father == -9998>> /* The twins - Camille & Kennerly */
-		<<for _k = 0; _k < $slaves.length; _k++>>
-			<<if areSisters($slaves[_k], $activeSlave) > 0>>
-				<<set $activeSlave.actualAge = $slaves[_k].actualAge, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.birthWeek = $slaves[_k].birthWeek>>
-			<</if>>
-		<</for>>
-	<</if>>
-	<<if $activeSlave.mother == -9997 && $activeSlave.father == -9996>> /* The siblings - Elisa & Martin */
-		<<for _k = 0; _k < $slaves.length; _k++>>
-			<<if areSisters($slaves[_k], $activeSlave) > 0>>
-				<<if $activeSlave.birthName == "Elisa">>
-					<<set $activeSlave.actualAge = $slaves[_k].actualAge-1, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge =  $activeSlave.actualAge>>
-				<<elseif $activeSlave.birthName == "Martin">>
-					<<set $activeSlave.actualAge = $slaves[_k].actualAge+1, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge =  $activeSlave.actualAge>>
+:: Special Slave [nobr]
+
+<<set $nextButton = "Back", $nextLink = "Buy Slaves", $returnTo = "Buy Slaves", $showEncyclopedia = 1, $encyclopedia = "Direct Sales">>
+
+<<if $heroSlaves.length == 0>>
+	Unfortunately, the catalog is empty.
+<<else>>
+
+	You review a piece of merchandise via video call, making a few lewd demands to gauge her obedience. The background of the video feed is luxurious and plush; somewhere offscreen someone is moaning rapturously.
+
+	<br><br>
+
+	<<set $activeSlave = getHeroSlave($heroSlaves.random(), $baseHeroSlave)>>
+	<<set $activeSlave.weekAcquired = $week>>
+	<<set $activeSlave.pubicHColor = $activeSlave.hColor>>
+	<<set $activeSlave.pubicHStyle = "waxed">>
+	<<set $activeSlave.underArmHColor = $activeSlave.hColor>>
+	<<set $activeSlave.underArmHStyle = "waxed">>
+	<<if $familyTesting == 1>>
+		/* special slaves exceptions to keep siblings sensible */
+		<<if $activeSlave.mother == -9999 && $activeSlave.father == -9998>> /* The twins - Camille & Kennerly */
+			<<for _k = 0; _k < $slaves.length; _k++>>
+				<<if areSisters($slaves[_k], $activeSlave) > 0>>
+					<<set $activeSlave.actualAge = $slaves[_k].actualAge, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge = $activeSlave.actualAge, $activeSlave.birthWeek = $slaves[_k].birthWeek>>
 				<</if>>
-			<</if>>
-		<</for>>
+			<</for>>
+		<</if>>
+		<<if $activeSlave.mother == -9997 && $activeSlave.father == -9996>> /* The siblings - Elisa & Martin */
+			<<for _k = 0; _k < $slaves.length; _k++>>
+				<<if areSisters($slaves[_k], $activeSlave) > 0>>
+					<<if $activeSlave.birthName == "Elisa">>
+						<<set $activeSlave.actualAge = $slaves[_k].actualAge-1, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge =  $activeSlave.actualAge>>
+					<<elseif $activeSlave.birthName == "Martin">>
+						<<set $activeSlave.actualAge = $slaves[_k].actualAge+1, $activeSlave.physicalAge = $activeSlave.actualAge, $activeSlave.visualAge =  $activeSlave.actualAge>>
+					<</if>>
+				<</if>>
+			<</for>>
+		<</if>>
 	<</if>>
-<</if>>
-<<slaveCost $activeSlave>>\
-<<NationalityToAccent $activeSlave>>
-\
-The offered price is ¤<<print $slaveCost>>.
-\
-[[Buy her slave contract|New Slave Intro][$cash -= $slaveCost,$nextButton = "Continue",$nextLink = "AS Dump",$returnTo = "Main",$specialSlave = 1]]
+	<<NationalityToAccent $activeSlave>>
+	<<slaveCost $activeSlave>>
 
-[[Pay ¤1000 to access complete catalog of slaves|Complete Catalog][$cash -= 1000]]
+	The offered price is ¤<<print $slaveCost>>.
 
-//Best regards to /d/, whose fine denizens came up with most of the slaves in the "previously owned" database.//
+	[[Buy her slave contract|New Slave Intro][$cash -= $slaveCost,$nextButton = "Continue",$nextLink = "AS Dump",$returnTo = "Main",$specialSlave = 1]]
+
+	<br><br>
+
+	[[Pay ¤1000 to access complete catalog of slaves|Complete Catalog][$cash -= 1000]]
+
+	<br><br>
+
+	//Best regards to /d/, whose fine denizens came up with most of the slaves in the "previously owned" database.//
+
+	<br><br>
+
+	<<set $specialSlavesPriceOverride = 1>>
+	<<set $saleDescription = 1>><<include "Long Slave Description">><<set $saleDescription = 0>>
+	<<set $specialSlavesPriceOverride = 0>>
+
+<</if>>
 
-<<set $specialSlavesPriceOverride = 1>>
-<<set $saleDescription = 1>><<include "Long Slave Description">><<set $saleDescription = 0>>
-<<set $specialSlavesPriceOverride = 0>>
diff --git a/src/uncategorized/surgeryDegradation.tw b/src/uncategorized/surgeryDegradation.tw
index eb5b864e736860e6f090d7d62a56045fb7dc536d..5e49ff1229e0519863719dd361359d6b4a375bfc 100644
--- a/src/uncategorized/surgeryDegradation.tw
+++ b/src/uncategorized/surgeryDegradation.tw
@@ -522,11 +522,40 @@ As the remote surgery's long recovery cycle completes,
 		<<removeJob $activeSlave $activeSlave.assignment>>
 	<</if>>
 
+<<case "precum">>
+	Her groin is a little sore, and she examines it closely, but she can't find much difference. Near the end of her close inspection of her own private parts, though, she happens to stimulate herself, unintentionally, and just a little. That's enough. She begins to leak precum, and it doesn't stop until her confusion snuffs out the slight arousal that got it started.
+	<<if $activeSlave.devotion > 50>>
+		@@.hotpink;She's delighted.@@ She's such a good sex slave that the lewdness of making extra fluid when she's ready to fuck is exciting to her. That, and extra lubrication is always welcome.
+		<<if $activeSlave.dick > 2>>One of the first things she tries is guiding her flaccid dick back to apply some to her asspussy. It works, to her naughty satisfaction.<</if>>
+		<<set $activeSlave.devotion += 4>>
+	<<elseif $activeSlave.devotion >= -20>>
+		She obviously doesn't know what to think at first. She does her best not to make a mess, and is mostly successful, but she's realizing that this is going to be somewhat inconvenient. Still, having such a lewd change made to her body affects her feelings towards you; she is @@.gold;sensibly fearful@@ of your total power over her.
+		<<set $activeSlave.trust -= 5>>
+	<<else>>
+		She feared the worst when she realized that something had been done to her down there, and she's initially relieved to find that she's intact and apparently functional. But she's been invaded in an extremely personal way, and @@.mediumorchid;resents having you tamper with her private parts.@@ Furthermore, she is @@.gold;sensibly fearful@@ of your total power over her.
+		<<set $activeSlave.trust -= 5, $activeSlave.devotion -= 5>>
+	<</if>>
+	As with all surgery @@.red;her health has been slightly affected.@@
+
+<<case "endprecum">>
+	Her groin is a little sore, and she examines it closely, but she can't find much difference. Her generous production of precum won't tail off for some time, until the slow-release drugs are completely flushed from her system. Even then, the only real change for her will be a little less inconvenience. As with all surgery @@.red;her health has been slightly affected.@@
+
 <<case "ejaculation">>
-	She can only feel a nondescript soreness in her lower belly. She doesn't understand what was done to her and as such, doesn't know what to think. She'll realize later when she ejaculates roughly twenty percent more semen than unusual. As with all surgery @@.red;her health has been affected.@@
+	Her groin is a little sore, and she examines it closely, finding it slightly swollen. Near the end of her close inspection of her own private parts, though, she happens to stimulate herself, unintentionally, and just a little. That's enough. She begins to leak excessive precum, as usual, but a distinct pressure begins building in her loins. She groans as the swelling rises before bucking and orgasming uncontrollably, coating herself and the bed in a layer of fluid.
+	<<if $activeSlave.devotion > 50>>
+		@@.hotpink;She's delighted.@@ She's such a good sex slave that the lewdness of extra large ejaculations is exciting to her. That, and the extra length of her climax wasn't bad either.
+		<<set $activeSlave.devotion += 4>>
+	<<elseif $activeSlave.devotion >= -20>>
+		She obviously doesn't know what to think at first. Just brushing her private parts resulted in a huge mess, a somewhat exciting prospect, but she's realizing that this is going to be rather inconvenient, if not moist. Still, having such a lewd change made to her body affects her feelings towards you; she is @@.gold;sensibly fearful@@ of your total power over her.
+		<<set $activeSlave.trust -= 5>>
+	<<else>>
+		She feared the worst when she realized that something had been done to her down there, and she's initially relieved to find that she's intact and apparently functional. But she's been invaded in an extremely personal way, and @@.mediumorchid;resents having you tamper with her private parts.@@ Furthermore, she is @@.gold;sensibly fearful@@ of your total power over her.
+		<<set $activeSlave.trust -= 5, $activeSlave.devotion -= 5>>
+	<</if>>
+	As with all surgery @@.red;her health has been slightly affected.@@
 
 <<case "endejac">>
-	She can only feel a nondescript soreness in her lower belly. She doesn't understand what was done to her and as such, doesn't know what to think. She'll realize later when she ejaculates roughly twenty percent less semen than unusual. As with all surgery @@.red;her health has been affected.@@
+	Her groin is a little sore, and she examines it closely, but she can't find much difference other than the swelling above her crotch has gone down. She'll realize later when her next ejaculation is rather underwhelming from what she has become acustomed to. As with all surgery @@.red;her health has been slightly affected.@@
 
 <<case "scarRemov">>
 	Even though removing scars is a trivial process, @@.red;her health has been slightly affected@@. When she exits the room, she feels that most of her skin is numb, and she is @@.hotpink;happy@@ when she finds her scars have been removed.
diff --git a/src/uncategorized/walkPast.tw b/src/uncategorized/walkPast.tw
index e01d97e9d8095ea36fdf4c64fcf745469fd34482..f4827879e44476df8226b710e3138d6c13c79a0b 100644
--- a/src/uncategorized/walkPast.tw
+++ b/src/uncategorized/walkPast.tw
@@ -525,6 +525,8 @@
 		oversee your other slaves;
 	<<case "be your Recruiter">>
 		use her connections to recruit slaves;
+	<<default>>
+		_partnerSlave.assignment;
 	<</switch>>
 
 	<<if (_partnerSlave.amp == 1)>>
diff --git a/src/utility/artWidgets.tw b/src/utility/artWidgets.tw
index b21aa15cab9df086ef5b283b9f72a34a64c9b4c5..59e5c79b43e090b5d45376fe62aea76a10bcc762 100644
--- a/src/utility/artWidgets.tw
+++ b/src/utility/artWidgets.tw
@@ -161,7 +161,7 @@ $args[2]: icon UI Display for vector art, 1 for on.
 <<elseif $args[0].hips > 0>>
 	<<set _legSize = "wide">>
 <</if>>
-<<if $args[0].amp != 0>>
+<<if $args[0].amp == 1>>
 	<<set _legSize = "stump " + _legSize>>
 <</if>>
 <<if $args[0].fuckdoll != 0 && $args[0].amp != 1>>
diff --git a/src/utility/assignWidgets.tw b/src/utility/assignWidgets.tw
index de517ca57a44b08e161caa71ba3feff9f4c8dcbc..a90034566709089fe003da97828703bd430e4a6a 100644
--- a/src/utility/assignWidgets.tw
+++ b/src/utility/assignWidgets.tw
@@ -10,7 +10,7 @@
 <<widget assignJob>>
 <<if ($args[1] != "Pit") && ($args[1] != "Coursing Association")>>
 
-	<<removeJob $args[0] $args[0].assignment>>
+	<<removeJob $args[0] $args[0].assignment>> /* sets _wID and _SL */
 
 	/% use .toLowerCase() to get rid of a few dupe conditions. %/
 	<<switch $args[1].toLowerCase()>>
@@ -123,79 +123,79 @@
 	<<switch $args[1].toLowerCase()>>
 		<<case "be confined in the arcade" "arcade">>
 			<<set $args[0].assignment = "work a glory hole">>
-			<<for _i = 0; _i < $ArcadeiIDs.length; _i++>>
-				<<if $ArcadeiIDs[_i].ID == _wID>>
-					<<set $ArcadeiIDs.deleteAt(_i), _i--, $arcadeSlaves-->>
+			<<for _awi = 0; _awi < $ArcadeiIDs.length; _awi++>>
+				<<if $ArcadeiIDs[_awi].ID == _wID>>
+					<<set $ArcadeiIDs.deleteAt(_awi), _awi--, $arcadeSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "work in the brothel" "brothel">>
 			<<set $args[0].assignment = "whore">>
-			<<for _i = 0; _i < $BrothiIDs.length; _i++>>
-				<<if $BrothiIDs[_i].ID == _wID>>
-					<<set $BrothiIDs.deleteAt(_i), _i--, $brothelSlaves-->>
+			<<for _awi = 0; _awi < $BrothiIDs.length; _awi++>>
+				<<if $BrothiIDs[_awi].ID == _wID>>
+					<<set $BrothiIDs.deleteAt(_awi), _awi--, $brothelSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "be confined in the cellblock" "cellblock">>
 			<<set $args[0].assignment = "rest">>
-			<<for _i = 0; _i < $CellBiIDs.length; _i++>>
-				<<if $CellBiIDs[_i].ID == _wID>>
-					<<set $CellBiIDs.deleteAt(_i), _i--, $cellblockSlaves-->>
+			<<for _awi = 0; _awi < $CellBiIDs.length; _awi++>>
+				<<if $CellBiIDs[_awi].ID == _wID>>
+					<<set $CellBiIDs.deleteAt(_awi), _awi--, $cellblockSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "get treatment in the clinic" "clinic">>
 			<<set $args[0].assignment = "rest">>
-			<<for _i = 0; _i < $CliniciIDs.length; _i++>>
-				<<if $CliniciIDs[_i].ID == _wID>>
-					<<set $CliniciIDs.deleteAt(_i), _i--, $clinicSlaves-->>
+			<<for _awi = 0; _awi < $CliniciIDs.length; _awi++>>
+				<<if $CliniciIDs[_awi].ID == _wID>>
+					<<set $CliniciIDs.deleteAt(_awi), _awi--, $clinicSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "serve in the club" "club">>
 			<<set $args[0].assignment = "serve the public">>
-			<<for _i = 0; _i < $ClubiIDs.length; _i++>>
-				<<if $ClubiIDs[_i].ID == _wID>>
-					<<set $ClubiIDs.deleteAt(_i), _i--, $clubSlaves-->>
+			<<for _awi = 0; _awi < $ClubiIDs.length; _awi++>>
+				<<if $ClubiIDs[_awi].ID == _wID>>
+					<<set $ClubiIDs.deleteAt(_awi), _awi--, $clubSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "work in the dairy" "dairy">>
 			<<set $args[0].assignment = "get milked">>
-			<<for _i = 0; _i < $DairyiIDs.length; _i++>>
-				<<if $DairyiIDs[_i].ID == _wID>>
-					<<set $DairyiIDs.deleteAt(_i), _i--, $dairySlaves-->>
+			<<for _awi = 0; _awi < $DairyiIDs.length; _awi++>>
+				<<if $DairyiIDs[_awi].ID == _wID>>
+					<<set $DairyiIDs.deleteAt(_awi), _awi--, $dairySlaves-->>
 				<</if>>
 			<</for>>
 		<<case "learn in the schoolroom" "schoolroom">>
 			<<set $args[0].assignment = "rest">>
-			<<for _i = 0; _i < $SchlRiIDs.length; _i++>>
-				<<if $SchlRiIDs[_i].ID == _wID>>
-					<<set $SchlRiIDs.deleteAt(_i), _i--, $schoolroomSlaves-->>
+			<<for _awi = 0; _awi < $SchlRiIDs.length; _awi++>>
+				<<if $SchlRiIDs[_awi].ID == _wID>>
+					<<set $SchlRiIDs.deleteAt(_awi), _awi--, $schoolroomSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "rest in the spa" "spa">>
 			<<set $args[0].assignment = "rest">>
-			<<for _i = 0; _i < $SpaiIDs.length; _i++>>
-				<<if $SpaiIDs[_i].ID == _wID>>
-					<<set $SpaiIDs.deleteAt(_i), _i--, $spaSlaves-->>
+			<<for _awi = 0; _awi < $SpaiIDs.length; _awi++>>
+				<<if $SpaiIDs[_awi].ID == _wID>>
+					<<set $SpaiIDs.deleteAt(_awi), _awi--, $spaSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "work as a servant" "servants' quarters" "servantsquarters">>
 			<<set $args[0].assignment = "be a servant">>
-			<<for _i = 0; _i < $ServQiIDs.length; _i++>>
-				<<if $ServQiIDs[_i].ID == _wID>>
-					<<set $ServQiIDs.deleteAt(_i), _i--, $servantsQuartersSlaves-->>
+			<<for _awi = 0; _awi < $ServQiIDs.length; _awi++>>
+				<<if $ServQiIDs[_awi].ID == _wID>>
+					<<set $ServQiIDs.deleteAt(_awi), _awi--, $servantsQuartersSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "serve in the master suite" "master suite" "mastersuite">>
 			<<set $args[0].assignment = "please you">>
-			<<for _i = 0; _i < $MastSiIDs.length; _i++>>
-				<<if $MastSiIDs[_i].ID == _wID>>
-					<<set $MastSiIDs.deleteAt(_i), _i--, $masterSuiteSlaves-->>
+			<<for _awi = 0; _awi < $MastSiIDs.length; _awi++>>
+				<<if $MastSiIDs[_awi].ID == _wID>>
+					<<set $MastSiIDs.deleteAt(_awi), _awi--, $masterSuiteSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "live with your head girl" "head girl suite" "hgsuite">>
 			<<set $args[0].assignment = "rest">>
-			<<for _i = 0; _i < $HGSuiteiIDs.length; _i++>>
-				<<if $HGSuiteiIDs[_i].ID == _wID>>
-					<<set $HGSuiteiIDs.deleteAt(_i), _i--, $HGSuiteSlaves-->>
+			<<for _awi = 0; _awi < $HGSuiteiIDs.length; _awi++>>
+				<<if $HGSuiteiIDs[_awi].ID == _wID>>
+					<<set $HGSuiteiIDs.deleteAt(_awi), _awi--, $HGSuiteSlaves-->>
 				<</if>>
 			<</for>>
 		<<case "be your head girl">>
diff --git a/src/utility/descriptionWidgets.tw b/src/utility/descriptionWidgets.tw
index 9c7592cfb977bfd911f596c31c923c06b0703c61..418ba987394c3ea7052ac371c8d51436ecdc62d9 100644
--- a/src/utility/descriptionWidgets.tw
+++ b/src/utility/descriptionWidgets.tw
@@ -45,38 +45,38 @@
 <</if>>
 
 <<if $organsCompleted > 0>>
-<<for _j = 0; _j < $organs.length; _j++>>
+<<for _dwj = 0; _dwj < $organs.length; _dwj++>>
 	<<set _validHost = 0>>
 	<<set $dumped = 0>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<set _Slave = $slaves[_i]>>
-		<<if ($organs[_j] != 0) && ($organs[_j].ID == _Slave.ID)>>
+	<<for _dwi = 0; _dwi < $slaves.length; _dwi++>>
+		<<set _Slave = $slaves[_dwi]>>
+		<<if ($organs[_dwj] != 0) && ($organs[_dwj].ID == _Slave.ID)>>
 			<<set _validHost = 1>>
-			<<if ($organs[_j].weeksToCompletion <= 0)>>
+			<<if ($organs[_dwj].weeksToCompletion <= 0)>>
 				<br>@@.yellow;The fabricator has completed an organ for@@ <span id="name"><<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves[" + _i + "]]]">></span>, @@.yellow; which is ready to be implanted.@@
 			<</if>>
 		<</if>>
 	<</for>>
 	<<if _validHost == 0>>
-		<<set $dump = $organs.deleteAt(_j), _j-->>
+		<<set $dump = $organs.deleteAt(_dwj), _dwj-->>
 	<</if>>
 <</for>>
 <</if>>
 <<if $limbsCompleted > 0>>
-<<for _j = 0; _j < $limbs.length; _j++>>
+<<for _dwj = 0; _dwj < $limbs.length; _dwj++>>
 	<<set _validHost = 0>>
 	<<set $dumped = 0>>
-	<<for _i = 0; _i < $slaves.length; _i++>>
-		<<set _Slave = $slaves[_i]>>
-		<<if ($limbs[_j] != 0) && ($limbs[_j].ID == _Slave.ID)>>
+	<<for _dwi = 0; _dwi < $slaves.length; _dwi++>>
+		<<set _Slave = $slaves[_dwi]>>
+		<<if ($limbs[_dwj] != 0) && ($limbs[_dwj].ID == _Slave.ID)>>
 			<<set _validHost = 1>>
-			<<if ($limbs[_j].weeksToCompletion <= 0)>>
+			<<if ($limbs[_dwj].weeksToCompletion <= 0)>>
 				<br>@@.yellow;The facility has completed a set of limbs for@@ <span id="name"><<print "[[_Slave.slaveName|Slave Interact][$activeSlave = $slaves[" + _i + "]]]">></span>, @@.yellow; which is ready to be attached.@@
 			<</if>>
 		<</if>>
 	<</for>>
 	<<if _validHost == 0>>
-		<<set $dump = $limbs.deleteAt(_j), _j-->>
+		<<set $dump = $limbs.deleteAt(_dwj), _dwj-->>
 	<</if>>
 <</for>>
 <</if>>
@@ -3407,7 +3407,7 @@ $pronounCap's got a
 <</if>>
 
 <<if $activeSlave.fuckdoll == 0>>
-<<if $activeSlave.mpreg == 1 && canAchieveErection($activeSlave) && bigBellyPreg($activeSlave) && $activeSlave.prostate == 1>>
+<<if $activeSlave.mpreg == 1 && canAchieveErection($activeSlave) && bigBellyPreg($activeSlave) && $activeSlave.prostate > 0>>
 	$possessiveCap huge pregnancy puts pressure on $possessive prostate at all times, leaving $object fully erect and trailing cum.
 <<elseif ($activeSlave.assignment == "work in the dairy") && ($dairyStimulatorsSetting > 1) && canAchieveErection($activeSlave)>>
 	<<if ($activeSlave.dick > 8)>>
@@ -3452,27 +3452,31 @@ $pronounCap's got a
 	$possessiveCap cock is flirting with the limit of what the human cardiovascular system can bring erect: the best $pronoun can manage is a half-hardness that's too soft to meaningfully fuck anything. If $pronoun could somehow get fully erect, there are few holes $pronoun could safely penetrate, anyway.
 <<elseif ($activeSlave.dick > 1)>>
 	<<if ($activeSlave.aphrodisiacs > 0) || $activeSlave.inflationType == "aphrodisiac">>
-		The aphrodisiacs have $possessive <<if ($activeSlave.aphrodisiacs > 1) || ($activeSlave.inflationType == "aphrodisiac" && $activeSlave.inflation >= 2)>>painfully <</if>>hard<<if !canAchieveErection($activeSlave)>>, despite her usual inability to achieve erection<</if>>.
+		The aphrodisiacs have $possessive <<if ($activeSlave.aphrodisiacs > 1) || ($activeSlave.inflationType == "aphrodisiac" && $activeSlave.inflation >= 2)>>painfully <</if>>hard<<if !canAchieveErection($activeSlave)>>, despite $possessive usual inability to achieve erection<</if>>.
 	<<elseif ($activeSlave.energy > 95)>>
 		As a nympho, $pronoun's almost constantly hard.
 	<<elseif ($activeSlave.fetish == "buttslut") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about being buttfucked.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about being buttfucked.
 	<<elseif ($activeSlave.fetish == "cumslut") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about being facefucked.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about being facefucked.
 	<<elseif ($activeSlave.fetish == "humiliation") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about being humiliated.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about being humiliated.
 	<<elseif ($activeSlave.fetish == "submissive") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about submission.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about submission.
 	<<elseif ($activeSlave.fetish == "dom") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about dominating someone.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about dominating someone.
 	<<elseif ($activeSlave.fetish == "masochist") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about pain.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about pain.
 	<<elseif ($activeSlave.fetish == "sadist") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about hurting someone.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about hurting someone.
 	<<elseif ($activeSlave.fetish == "pregnancy") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about getting someone pregnant.
+		<<if canGetPregnant($activeSlave)>>
+			Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about sporting a huge pregnant belly.
+		<<else>>
+			Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about getting someone pregnant.
+		<</if>>
 	<<elseif ($activeSlave.fetish == "boobs") && ($activeSlave.fetishStrength > 60) && ($activeSlave.fetishKnown == 1)>>
-		Judging by how hard $pronoun is, $pronoun's probably fantasizing about boobs.
+		Judging by how hard $pronoun is<<if $activeSlave.prostate > 1>> and the constant flow of precum leaking from the tip of $possessive dick<<elseif $activeSlave.prostate > 0>>and the little bead of precum forming at the tip of $possessive dick<</if>>, $pronoun's probably fantasizing about boobs.
 	<<elseif ($activeSlave.devotion > 50)>>
 		As a devoted sex slave, $pronoun has no trouble keeping herself hard for $object <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>.
 	<<elseif ($activeSlave.devotion > 20)>>
@@ -3482,6 +3486,12 @@ $pronounCap's got a
 	<</if>>
 <</if>>
 
+<<if ($activeSlave.prostate > 2)>>
+	The area above $possessive crotch has a slight swell to it from $possessive massive prostate. Several thick strings of precum dangle from the tip of $possessive cock; $possessive artificially hyperactive prostate forcing cum out of $object that way.
+<<elseif ($activeSlave.prostate > 1)>>
+	$possessiveCap's got a string of precum dangling from the tip of $possessive cock; $possessive artificially hyperactive prostate keeps $object that way.
+<</if>>
+
 <<if $activeSlave.physicalAge <= 3>>
 <<if $activeSlave.dick >= 15>>
 <<if $activeSlave.fuckdoll > 0>>
@@ -3581,9 +3591,9 @@ $pronounCap's got a
 	$pronounCap produces so much cum that $possessive dick uncontrollably dribbles precum wherever $pronoun goes, leaving a trail of drops behind $object.
 <</if>>
 
-<<if $activeSlave.prostateImplant == 1>>
-	$possessiveCap ejaculate has a distinct clearness to it from the excess prostate fluid produced by $possessive altered prostate.
-<</if>>
+	<<if $activeSlave.prostate > 2>>
+		$possessiveCap ejaculate has a distinct clearness to it from the sheer amount of prostate fluid produced by $possessive heavily altered prostate.
+	<</if>>
 
 <<if $activeSlave.physicalAge <= 3>>
 <<if $activeSlave.balls >= 25>>
@@ -3894,34 +3904,38 @@ $pronounCap's got a
 	<</if>>
 	<</if>>
 	<</if>>
-	<<if $activeSlave.prostate > 0>>
+		<<if ($activeSlave.prostate > 2)>>
+			he area above $possessive crotch has a slight swell to it from $possessive massive prostate. Several thick strings of precum dangle from the hole; $possessive artificially hyperactive prostate forcing cum out of $object that way.
+		<<elseif ($activeSlave.prostate > 1)>>
+			$possessiveCap's got a string of precum dangling from the hole; $possessive artificially hyperactive prostate keeps $object that way.
+		<</if>>
 		<<if ($activeSlave.aphrodisiacs > 0) || ($activeSlave.inflationType == "aphrodisiac")>>
-			The aphrodisiacs have $possessive so horny that there's a <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little precum beading at<</if>> the hole.
+			The aphrodisiacs have $possessive so horny that there's a <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little precum beading at<</if>> the hole.
 		<<elseif ($activeSlave.energy > 95)>>
-			As a nympho, $pronoun's almost always got a <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole.
+			As a nympho, $pronoun's almost always got a <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<elseif $activeSlave.prostate > 1>><<else>>little bead of precum forming at<</if>> the hole.
 		<<elseif $activeSlave.fetishKnown == 0>>
 		<<elseif $activeSlave.fetishStrength <= 60>>
 		<<elseif ($activeSlave.fetish == "buttslut")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about being buttfucked.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about being buttfucked.
 		<<elseif ($activeSlave.fetish == "cumslut")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about being facefucked.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about being facefucked.
 		<<elseif ($activeSlave.fetish == "humiliation")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about being humiliated.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about being humiliated.
 		<<elseif ($activeSlave.fetish == "submissive")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about submission.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about submission.
 		<<elseif ($activeSlave.fetish == "dom")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about dominating someone.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about dominating someone.
 		<<elseif ($activeSlave.fetish == "masochist")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about pain.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about pain.
 		<<elseif ($activeSlave.fetish == "sadist")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about hurting someone.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about hurting someone.
 		<<elseif ($activeSlave.fetish == "pregnancy")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about getting someone pregnant.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about getting someone pregnant.
 		<<elseif ($activeSlave.fetish == "boobs")>>
-			Judging by the <<if $activeSlave.prostateImplant == 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about boobs.
+			Judging by the <<if $activeSlave.prostate > 1>>constant flow of precum leaking from<<else>>little bead of precum forming at<</if>> the hole, $pronoun's probably fantasizing about boobs.
 		<</if>>
 	<</if>>
-	<<if $activeSlave.prostateImplant != 0>>
+	<<if $activeSlave.prostate > 2>>
 		This hole is normally almost invisible, making it absolutely shocking when $pronoun orgasms and shoots a massive cumshot out of it.
 	<<elseif $activeSlave.balls != 0>>
 		This hole is normally almost invisible, making it quite surprising when $pronoun orgasms and shoots cum out of it.
@@ -3933,12 +3947,12 @@ $pronounCap's got a
 	<<elseif $activeSlave.balls >= 37>>
 		$possessiveCap perpetual stream of semen-laced precum running down $possessive balls leaves a mess on the floor wherever $pronoun goes.
 	<<elseif $activeSlave.balls >= 25>>
-		Parts of the constant dribble coming out of the hole now white, a testament to just how much cum $possessive massive balls produce and how desperate they are for release.
+		Parts of the constant dribble coming out of the hole are now white, a testament to just how much cum $possessive massive balls produce and how desperate they are for release.
 	<<elseif $activeSlave.balls >= 10>>
 		$pronounCap produces so much cum that $possessive dick uncontrollably dribbles precum wherever $pronoun goes, leaving a trail of drops behind $object.
 	<</if>>
-	<<if $activeSlave.prostateImplant == 1>>
-		$possessiveCap ejaculate has a distinct clearness to it from the excess prostate fluid produced by $possessive altered prostate.
+	<<if $activeSlave.prostate > 2>>
+		$possessiveCap ejaculate has a distinct clearness to it from the sheer amount of prostate fluid produced by $possessive heavily altered prostate.
 	<</if>>
 <</if>>
 
@@ -3946,7 +3960,7 @@ $pronounCap's got a
 
 <<if ($activeSlave.dick > 0) || ($activeSlave.balls > 0)>>
 <<if $activeSlave.prostate == 0>>
-	Though it's not externally apparent, $possessive prostate has been removed, giving her ejaculations less body<<if $activeSlave.anus != 0>> and reducing the stimulation $pronoun feels during anal sex<</if>>.
+	Though it's not externally apparent, $possessive prostate has been removed, giving $possessive ejaculations less body<<if $activeSlave.anus != 0>> and reducing the stimulation $pronoun feels during anal sex<</if>>.
 <</if>>
 <</if>>
 
@@ -4026,7 +4040,7 @@ $pronounCap's got a
 <<elseif $activeSlave.vagina == 3>>
 	$possessiveCap pussy is loose,
 <<elseif $activeSlave.vagina == 10>>
-	$possessiveCap pussy is completely ruined from hundreds of births.  One could fit their arm into it with minimal effort and $pronoun can barely get off from vaginal sex now.  $possessiveCap pussy is abyssal,
+	$possessiveCap pussy is completely ruined from hundreds of births. One could fit their arm into it with minimal effort and $pronoun can barely get off from vaginal sex now. $possessiveCap pussy is abyssal,
 <<elseif  $activeSlave.vagina > 3>>
 	$possessiveCap pussy is utterly cavernous,
 <</if>>
@@ -4112,8 +4126,8 @@ $pronounCap's got a
 	<</if>>
 	<<if $activeSlave.prostate != 0>>
 	<<if $activeSlave.dick == 0>>
-		Bizarrely, $pronoun's been given a functional prostate gland. It's attached to $possessive urethra, of course, <<if $activeSlave.balls > 0>>which in combination with her testicles make $possessive squirt copious amounts of fluids and semen with each orgasm<<else>>so $pronoun squirts copiously when $pronoun orgasms<</if>>.
-		<<if $activeSlave.prostateImplant == 1>>
+		Bizarrely, $pronoun's been given a functional prostate gland. It's attached to $possessive urethra, of course, <<if $activeSlave.balls > 0>>which in combination with $possessive testicles make $possessive squirt copious amounts of fluids and semen with each orgasm<<else>>so $pronoun squirts copiously when $pronoun orgasms<</if>>.
+		<<if $activeSlave.prostate > 2>>
 			With the implant imbedded in it; that qush is more like a flood. Changes of clothes are a must with $object, as $pronoun can and will soak both you, <<print $object>>self and what $pronoun is getting fucked over.
 		<</if>>
 	<</if>>
@@ -4162,8 +4176,8 @@ $pronounCap's got a
 	<</if>>
 	<<if $activeSlave.prostate != 0>>
 	<<if $activeSlave.dick == 0>>
-		Bizarrely, $pronoun's been given a functional prostate gland. It's attached to $possessive urethra, of course, <<if $activeSlave.balls > 0>>which in combination with her testicles make $possessive squirt unreasonable volume of fluids and semen with each orgasm<<else>>meaning that when $pronoun orgasms, $pronoun squirts an unreasonable volume of fluid<</if>>.
-		<<if $activeSlave.prostateImplant == 1>>
+		Bizarrely, $pronoun's been given a functional prostate gland. It's attached to $possessive urethra, of course, <<if $activeSlave.balls > 0>>which in combination with $possessive testicles make $possessive squirt unreasonable volume of fluids and semen with each orgasm<<else>>meaning that when $pronoun orgasms, $pronoun squirts an unreasonable volume of fluid<</if>>.
+		<<if $activeSlave.prostate > 2>>
 			With the implant imbedded in it; that gush is insane. Everything around $object is at risk of being splashed. Changes of clothes are a must with $object, as are supplies to mop up afterwards.
 		<</if>>
 	<</if>>
@@ -7957,15 +7971,15 @@ $pronounCap has
 	<</if>>
 	<<elseif $activeSlave.physicalAge <= 3>>
 	<<if $activeSlave.pregType >= 20>>
-		and $pronoun is nearly spherical.  $possessiveCap toddlerish form is utterly dwarfed by her pregnancy, all $pronoun can do is lay on top of it.  Despite being taut, her belly visibly bulges and squirms from all the babies writhing within her.  $possessiveCap womb is so full you can see the babies forced up against her uterus, even the slightest provocation could cause her to burst.  $pronounCap requires multiple slaves to move her bulk when $pronoun must go somewhere.
+		and $pronoun is nearly spherical.  $possessiveCap toddlerish form is utterly dwarfed by $possessive pregnancy, all $pronoun can do is lay on top of it.  Despite being taut, $possessive belly visibly bulges and squirms from all the babies writhing within $object. $possessiveCap womb is so full you can see the babies forced up against $possessive uterus, even the slightest provocation could cause $possessive to burst. $pronounCap requires multiple slaves to move $possessive bulk when $pronoun must go somewhere.
 	<<elseif $activeSlave.pregType >= 10>>
-		and $possessive belly pins $possessive to the ground.  $possessiveCap toddlerish form is dwarfed by $possessive pregnancy, and try as $pronoun might $pronoun can not even drag the massive thing.  $pronounCap is so pregnant you can barely see the babies within $possessive bulging $possessive stomach.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
+		and $possessive belly pins $possessive to the ground.  $possessiveCap toddlerish form is dwarfed by $possessive pregnancy, and try as $pronoun might $pronoun can not even drag the massive thing. $pronounCap is so pregnant you can barely see the babies within $possessive bulging $possessive stomach.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
 	<<else>>
 		and $possessive toddlerish body is absolutely filled by $possessive womb.  $pronounCap can barely move herself and resembles an over inflated blow-up doll.
 	<</if>>
 	<<elseif $activeSlave.physicalAge <= 12>>
 	<<if $activeSlave.pregType >= 20>>
-		and $pronoun is more belly than girl.  $possessiveCap absolutely gigantic, overfilled womb keeps $possessive pinned to the ground.  $possessiveCap belly visibly bulges and squirms from all the babies within $possessive.  $pronounCap is so full you can see the babies forced up against the walls of $possessive uterus.  $possessiveCap skin is so taut that even the slightest provocation could cause $possessive to burst.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
+		and $pronoun is more belly than girl.  $possessiveCap absolutely gigantic, overfilled womb keeps $possessive pinned to the ground. $possessiveCap belly visibly bulges and squirms from all the babies within $possessive. $pronounCap is so full you can see the babies forced up against the walls of $possessive uterus.  $possessiveCap skin is so taut that even the slightest provocation could cause $possessive to burst.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
 	<<elseif $activeSlave.pregType >= 10>>
 		and $pronoun can barely function with $possessive enormous belly.  $pronounCap is so full you can barely see the babies bulging out of $possessive stomach.
 	<<else>>
@@ -7973,15 +7987,15 @@ $pronounCap has
 	<</if>>
 	<<elseif $activeSlave.height >= 185>>
 	<<if $activeSlave.pregType >= 20>>
-		but $possessive tall frame barely keeps $possessive grotesque, splitting belly off the ground.  Despite being taut, $possessive belly visibly bulges and squirms from all the babies writhing within $possessive.  $possessiveCap womb is so full you can see the babies forced up against $possessive uterus, even the slightest provocation could cause $possessive to burst.
+		but $possessive tall frame barely keeps $possessive grotesque, splitting belly off the ground. Despite being taut, $possessive belly visibly bulges and squirms from all the babies writhing within $possessive. $possessiveCap womb is so full you can see the babies forced up against $possessive uterus, even the slightest provocation could cause $possessive to burst.
 	<<elseif $activeSlave.pregType >= 10>>
-		but $possessive tall frame barely bears $possessive obscene, drum-taut belly.  $pronounCap is so pregnant you can barely see the babies within $possessive bulging $possessive stomach.
+		but $possessive tall frame barely bears $possessive obscene, drum-taut belly. $pronounCap is so pregnant you can barely see the babies within $possessive bulging $possessive stomach.
 	<<else>>
 		but $possessive tall frame bears $possessive massive, drum-taut belly well.
 	<</if>>
 	<<elseif $activeSlave.height < 150>>
 	<<if $activeSlave.pregType >= 20>>
-		and $pronoun is more belly than girl.  $possessiveCap absolutely gigantic, overfilled womb keeps $possessive pinned to the ground.  $possessiveCap belly visibly bulges and squirms from all the babies within $possessive.  $pronounCap is so full you can see the babies forced up against the walls of $possessive uterus.  $possessiveCap skin is so taut that even the slightest provocation could cause $possessive to burst.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
+		and $pronoun is more belly than girl. $possessiveCap absolutely gigantic, overfilled womb keeps $possessive pinned to the ground. $possessiveCap belly visibly bulges and squirms from all the babies within $possessive. $pronounCap is so full you can see the babies forced up against the walls of $possessive uterus. $possessiveCap skin is so taut that even the slightest provocation could cause $possessive to burst.<<if $activeSlave.amp == 0>> $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
 	<<elseif $activeSlave.pregType >= 10>>
 		and $pronoun can barely function with $possessive enormous belly.  $pronounCap is so full you can barely see the babies bulging out of $possessive stomach.
 	<<else>>
@@ -7989,7 +8003,7 @@ $pronounCap has
 	<</if>>
 	<<elseif $activeSlave.muscles > 30>>
 	<<if $activeSlave.pregType >= 20>>
-		and $pronoun can barely hold $possessive overfilled belly upright.  $possessiveCap enormous brood greatly protrudes $possessive belly covering it in writhing bulges where they are forced up against her uterus.  While her strong body spares her from the fear of bursting, it does nothing to stop everyone from seeing how many children $pronoun's having.
+		and $pronoun can barely hold $possessive overfilled belly upright. $possessiveCap enormous brood greatly protrudes $possessive belly covering it in writhing bulges where they are forced up against $possessive uterus. While $possessive strong body spares $object from the fear of bursting, it does nothing to stop everyone from seeing how many children $pronoun's having.
 	<<elseif $activeSlave.pregType >= 10>>
 		and $possessive fit body allows $possessive to carry $possessive obscene belly without too much trouble.  $possessiveCap large brood gently bulges $possessive belly.
 	<<else>>
@@ -7997,9 +8011,9 @@ $pronounCap has
 	<</if>>
 	<<else>>
 	<<if $activeSlave.pregType >= 20>>
-		and $pronoun is more belly than girl.  $possessiveCap gigantic, overfilled womb keeps $possessive pinned to the ground.  $possessiveCap belly visibly bulges and squirms from all the babies within $possessive.  $pronounCap is so full you can see the babies forced up against the walls of $possessive womb through $possessive taut skin.  $possessiveCap bulgy belly is at risk of rupturing.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
+		and $pronoun is more belly than girl. $possessiveCap gigantic, overfilled womb keeps $possessive pinned to the ground. $possessiveCap belly visibly bulges and squirms from all the babies within $possessive.  $pronounCap is so full you can see the babies forced up against the walls of $possessive womb through $possessive taut skin.  $possessiveCap bulgy belly is at risk of rupturing.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
 	<<elseif $activeSlave.pregType >= 10>>
-		and $pronoun can barely function with $possessive enormous belly.  $possessiveCap womb is so full you can see the babies gently bulging the walls of $possessive uterus.
+		and $pronoun can barely function with $possessive enormous belly. $possessiveCap womb is so full you can see the babies gently bulging the walls of $possessive uterus.
 	<<else>>
 		and $possessive massive, drum-taut belly dominates $possessive frame.
 	<</if>>
@@ -8014,9 +8028,9 @@ $pronounCap has
 	<</if>>
 	<<if $activeSlave.physicalAge <= 3>>
 	<<if $activeSlave.pregType >= 20>>
-		and $possessive hugely distended belly is bigger than $pronoun is.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
+		and $possessive hugely distended belly is bigger than $pronoun is.<<if $activeSlave.amp == 0>> $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
 	<<elseif $activeSlave.pregType >= 10>>
-		and $possessive bulging belly is as big as $pronoun is.<<if $activeSlave.amp == 0>>  $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
+		and $possessive bulging belly is as big as $pronoun is.<<if $activeSlave.amp == 0>> $pronounCap requires assistance to get to $possessive feet, and uses a wheeled stand to support $possessive pregnancy when $pronoun must walk anywhere.<</if>>
 	<<else>>
 		and $possessive swollen belly is nearly as big as $possessive toddlerish body.
 	<</if>>
@@ -8065,7 +8079,7 @@ $pronounCap has
 	$pronounCap is visibly pregnant,
 	<<if $activeSlave.physicalAge <= 3>>
 	<<if $activeSlave.pregType >= 20>>
-		$possessiveCap huge belly resembles an over-inflated beach ball compared to $possessive toddlerish frame.  It bulges out from $possessive sides considerably.
+		$possessiveCap huge belly resembles an over-inflated beach ball compared to $possessive toddlerish frame. It bulges out from $possessive sides considerably.
 	<<elseif $activeSlave.pregType >= 10>>
 		and it looks like $pronoun is ready to birth triplets due to $possessive toddlerish body.
 	<<else>>
@@ -8311,7 +8325,7 @@ $pronounCap has
 <<case "slutty business attire">>
 	$activeSlave.slaveName's titanic bulging pregnant stomach hangs out the front of $possessive suit jacket and blouse as there is no way $pronoun could close them.
 <<case "nice business attire">>
-	$activeSlave.slaveName's titanic bulging pregnant belly hangs out the front of $possessive specially tailored blouse and jacket as there is no way for her to close them.
+	$activeSlave.slaveName's titanic bulging pregnant belly hangs out the front of $possessive specially tailored blouse and jacket as there is no way for $object to close them.
 <<case "harem gauze">>
 	$activeSlave.slaveName's harem girl outfit sensually accentuates $possessive titanic bulging pregnancy.
 <<case "a comfortable bodysuit">>
@@ -8327,7 +8341,7 @@ $pronounCap has
 <<case "battledress">>
 	$activeSlave.slaveName's tank top rests atop $possessive titanic bulging pregnant belly leaving $object looking like someone who fucked half the country.
 <<case "a halter top dress">>
-	$activeSlave.slaveName's beautiful halter top dress has been torn open by $possessive titanic bulging pregnant belly.  $possessiveCap squirming belly hangs out the hole it made.
+	$activeSlave.slaveName's beautiful halter top dress has been torn open by $possessive titanic bulging pregnant belly. $possessiveCap squirming belly hangs out the hole it made.
 <<case "a ball gown">>
 	$activeSlave.slaveName's fabulous silken ball gown has been retailored to expose $possessive titanic bulging pregnant belly while still maintaining its' beauty.
 <<case "slutty jewelry">>
@@ -8386,11 +8400,11 @@ $pronounCap has
 <<case "a slutty qipao")>>
 	$possessiveCap qipao is slit up the side.  However, it merely rests atop $possessive gigantic pregnant belly.
 <<case "uncomfortable straps")>>
-	$activeSlave.slaveName's slave outfit's straining straps press into $possessive gigantic pregnant belly causing flesh to spill out the gaps.  The straps connect to a steel ring encircling $possessive popped navel.
+	$activeSlave.slaveName's slave outfit's straining straps press into $possessive gigantic pregnant belly causing flesh to spill out the gaps. The straps connect to a steel ring encircling $possessive popped navel.
 <<case "shibari ropes")>>
 	$activeSlave.slaveName's gigantic pregnant belly is tightly bound with rope, flesh angrily bulges from between them.
 <<case "restrictive latex" "a latex catsuit">>
-	$activeSlave.slaveName's gigantic pregnant belly greatly distends $possessive latex suit.  $pronounCap looks like an over inflated balloon ready to pop.  Only $possessive popped navel sticking out the front of $possessive belly disrupts the smoothness.
+	$activeSlave.slaveName's gigantic pregnant belly greatly distends $possessive latex suit. $pronounCap looks like an over inflated balloon ready to pop. Only $possessive popped navel sticking out the front of $possessive belly disrupts the smoothness.
 <<case "a military uniform")>>
 	<<if ($activeSlave.boobs > 6000)>>
 	$activeSlave.slaveName's gigantic pregnant belly hangs out $possessive open tunic and shirt
@@ -8412,7 +8426,7 @@ $pronounCap has
 <<case "attractive lingerie">>
 	$activeSlave.slaveName's gigantic pregnant belly completely hides $possessive lacy g-string.
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's gigantic pregnant belly completely hides $possessive silken panties.  $possessiveCap silken vest sensually frames $possessive overfilled belly.
+	$activeSlave.slaveName's gigantic pregnant belly completely hides $possessive silken panties. $possessiveCap silken vest sensually frames $possessive overfilled belly.
 <<case "a maternity dress">>
 	$activeSlave.slaveName's gigantic pregnant belly fills $possessive loose dress.  $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive full pregnancy.
 <<case "a slutty maid outfit">>
@@ -8422,7 +8436,7 @@ $pronounCap has
 <<case "a fallen nun's habit">>
 	$activeSlave.slaveName's latex habit's corset is left hanging open fully revealing $possessive gigantic pregnant belly.
 <<case "a penitent nun's habit">>
-	$activeSlave.slaveName's gigantic pregnant belly completely fills $possessive habit.  The coarse cloth aggravates $possessive sensitive stretched skin.
+	$activeSlave.slaveName's gigantic pregnant belly completely fills $possessive habit. The coarse cloth aggravates $possessive sensitive stretched skin.
 <<case "a string bikini">>
 	$activeSlave.slaveName's gigantic pregnant belly parts $possessive string bikini to either side.
 <<case "clubslut netting">>
@@ -8460,13 +8474,13 @@ $pronounCap has
 <<case "battledress">>
 	$activeSlave.slaveName's tank top rests atop $possessive gigantic pregnant belly leaving $possessive looking like someone who fucked all the locals.
 <<case "a halter top dress">>
-	$activeSlave.slaveName's beautiful halter top dress is strained by $possessive gigantic pregnant belly.  $possessiveCap popped navel prominently pokes through the front of $possessive dress as its' seams strain to hold together.
+	$activeSlave.slaveName's beautiful halter top dress is strained by $possessive gigantic pregnant belly. $possessiveCap popped navel prominently pokes through the front of $possessive dress as its' seams strain to hold together.
 <<case "a ball gown">>
 	$activeSlave.slaveName's fabulous silken ball gown, while tailored, strains to contain $possessive gigantic pregnant belly.
 <<case "slutty jewelry">>
 	$activeSlave.slaveName's bangles include a long thin chain that rests above $possessive popped navel.
 <<case "a leotard">>
-	$activeSlave.slaveName's tight leotard shows off every kick and movement within $possessive gigantic pregnant belly.  The material tightly clings to $possessive popped navel and strains to hold together.
+	$activeSlave.slaveName's tight leotard shows off every kick and movement within $possessive gigantic pregnant belly. The material tightly clings to $possessive popped navel and strains to hold together.
 <<case "a chattel habit">>
 	The strip of cloth running down $possessive front is parted to one side by $possessive gigantic pregnant belly.
 <<case "a bunny outfit">>
@@ -8636,9 +8650,9 @@ $pronounCap has
 	$activeSlave.slaveName's blouse is pulled taut by $possessive pregnant belly. $possessiveCap popped navel forms a small tent in $possessive shirt.
 	<</if>>
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's pregnant belly hides $possessive silken panties.  $possessiveCap silken vest sensually frames $possessive heavy belly.
+	$activeSlave.slaveName's pregnant belly hides $possessive silken panties. $possessiveCap silken vest sensually frames $possessive heavy belly.
 <<case "a maternity dress">>
-	$activeSlave.slaveName's pregnant belly fills out $possessive loose dress.  $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive growing pregnancy.
+	$activeSlave.slaveName's pregnant belly fills out $possessive loose dress. $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive growing pregnancy.
 <<case "chains">>
 	$activeSlave.slaveName's pregnant belly is tightly wrapped with chains, causing it to bulge angrily.
 <<case "western clothing">>
@@ -8770,7 +8784,7 @@ $pronounCap has
 	$activeSlave.slaveName's blouse is pulled tight over $possessive fat belly. The bottom of which peeks out from under it.
 	<</if>>
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's fat belly is large enough to hide $possessive panties.  $possessiveCap silken vest sensually frames $possessive heavy, jiggly gut.
+	$activeSlave.slaveName's fat belly is large enough to hide $possessive panties. $possessiveCap silken vest sensually frames $possessive heavy, jiggly gut.
 <<case "a maternity dress">>
 	$activeSlave.slaveName's fat belly fills out $possessive loose dress. $possessiveCap dress is specially tailored to be modest yet draw attention to a growing pregnancy, though it works on big, jiggly guts all the same.
 <<case "chains">>
@@ -8898,9 +8912,9 @@ $pronounCap has
 	$activeSlave.slaveName's blouse bulges with $possessive growing belly.
 	<</if>>
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's growing belly rests above $possessive silken panties.  $possessiveCap silken vest sensually frames $possessive swelling belly.
+	$activeSlave.slaveName's growing belly rests above $possessive silken panties. $possessiveCap silken vest sensually frames $possessive swelling belly.
 <<case "a maternity dress">>
-	$activeSlave.slaveName's growing belly is noticeable under $possessive loose dress.  $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive growing pregnancy.
+	$activeSlave.slaveName's growing belly is noticeable under $possessive loose dress. $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive growing pregnancy.
 <<case "chains">>
 	$activeSlave.slaveName's growing belly is tightly wrapped with chains.
 <<case "western clothing">>
@@ -9030,7 +9044,7 @@ $pronounCap has
 	$activeSlave.slaveName's blouse bulges with $possessive chubby belly.
 	<</if>>
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's chubby belly rests above $possessive silken panties, barely hanging over the top of them.  $possessiveCap silken vest sensually frames $possessive soft stomach.
+	$activeSlave.slaveName's chubby belly rests above $possessive silken panties, barely hanging over the top of them. $possessiveCap silken vest sensually frames $possessive soft stomach.
 <<case "a maternity dress">>
 	$activeSlave.slaveName's chubby belly is noticeable under $possessive loose dress. $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive pudgy belly.
 <<case "chains">>
@@ -9176,7 +9190,7 @@ $pronounCap has
 	<<elseif $activeSlave.navelPiercing == 2>>
 		$possessiveCap navel is pierced with a big ring.
 		<<if ($activeSlave.preg > 20) && ($activeSlave.pregType >= 10)>>
-			It has a heavy bell dangling from it.  It sounds whenever $possessive babies kick, which is often.
+			It has a heavy bell dangling from it. It sounds whenever $possessive babies kick, which is often.
 		<<elseif ($activeSlave.clothes == "slutty jewelry")>>
 			It has a length of gilded chain dangling from it.
 		<<else>>
@@ -9348,9 +9362,9 @@ $pronounCap has
 
 <<widget "SlavePronouns">>
 
-<<if $activeSlave.fuckdoll > 0>>
+<<if $args[0].fuckdoll > 0>>
 	<<set $pronoun = "it", $pronounCap = "It", $possessive = "its", $possessiveCap = "Its", $object = "it">>
-<<elseif $activeSlave.dick < 0 && $activeSlave.vagina == -1>> /*impossible condition to keep it from running but saving it for future use*/
+<<elseif $args[0].dick < 0 && $args[0].vagina == -1>> /*impossible condition to keep it from running but saving it for future use*/
 	<<set $pronoun = "he", $pronounCap = "He", $possessive = "his", $possessiveCap = "His", $object = "his">>
 <<else>>
 	<<set $pronoun = "she", $pronounCap = "She", $possessive = "her", $possessiveCap = "Her", $object = "her">>
@@ -9369,11 +9383,11 @@ $pronounCap has
 	<<elseif $activeSlave.height >= 185>>
 		but $possessive tall frame barely keeps $possessive grotesque belly off the ground. $pronounCap is so overfilled you can clearly make out the implant within $possessive body through $possessive skin. It is so taut, not one motion can be seen in its contents.
 	<<elseif $activeSlave.height < 150>>
-		and $pronoun is more belly than girl.  $possessiveCap absolutely gigantic, overfilled implant keeps $possessive pinned to the ground. $pronounCap is so overfilled you can clearly make out the implant within $possessive body through $possessive skin. It is so taut, not one motion can be seen in its contents.
+		and $pronoun is more belly than girl. $possessiveCap absolutely gigantic, overfilled implant keeps $possessive pinned to the ground. $pronounCap is so overfilled you can clearly make out the implant within $possessive body through $possessive skin. It is so taut, not one motion can be seen in its contents.
 	<<elseif $activeSlave.muscles > 1>>
 		and $pronoun can barely hold $possessive overfilled belly upright. $pronounCap is so overfilled you can clearly make out the implant within $possessive body through $possessive skin. It is so taut, not one motion can be seen in its contents.
 	<<else>>
-		and $pronoun is more belly than girl.  $possessiveCap gigantic, overfilled implant keeps $possessive pinned to the ground. $pronounCap is so overfilled you can clearly make out the implant within $possessive body through $possessive skin. It is so taut, not one motion can be seen in its contents.
+		and $pronoun is more belly than girl. $possessiveCap gigantic, overfilled implant keeps $possessive pinned to the ground. $pronounCap is so overfilled you can clearly make out the implant within $possessive body through $possessive skin. It is so taut, not one motion can be seen in its contents.
 	<</if>>
 <<elseif $activeSlave.bellyImplant >= 16000>>
 	$pronounCap looks unbelievably pregnant,
@@ -10404,7 +10418,7 @@ $pronounCap has
 <<if $activeSlave.inflation == 3>>
 		$possessiveCap middle is enormously distended with <<print $activeSlave.inflationType>>,
 	<<if $activeSlave.physicalAge <= 3>>
-		and $possessive toddlerish body is absolutely filled by $possessive bloated innards.  $pronounCap can barely move herself and resembles an over inflated blow-up doll.
+		and $possessive toddlerish body is absolutely filled by $possessive bloated innards. $pronounCap can barely move herself and resembles an over inflated blow-up doll.
 	<<elseif $activeSlave.physicalAge <= 12>>
 		and $possessive massive, drum-taut belly dominates $possessive poor little frame.
 	<<elseif $activeSlave.height >= 185>>
@@ -10493,7 +10507,7 @@ $pronounCap has
 <<case "shibari ropes">>
 	$activeSlave.slaveName's hugely swollen belly is tightly bound with ropes; flesh  bulges angrily from between them.
 <<case "restrictive latex" "a latex catsuit">>
-	$activeSlave.slaveName's hugely swollen belly greatly distends $possessive latex suit.  $pronounCap looks like an over inflated balloon ready to pop.  Only $possessive popped navel sticking out the front of $possessive belly disrupts the smoothness.
+	$activeSlave.slaveName's hugely swollen belly greatly distends $possessive latex suit. $pronounCap looks like an over inflated balloon ready to pop.  Only $possessive popped navel sticking out the front of $possessive belly disrupts the smoothness.
 <<case "a military uniform">>
 	<<if ($activeSlave.boobs > 6000)>>
 	$activeSlave.slaveName's hugely swollen belly is obscured by $possessive massive tits.
@@ -10523,7 +10537,7 @@ $pronounCap has
 <<case "a fallen nuns habit">>
 	$activeSlave.slaveName's latex habit's corset is left hanging open fully revealing $possessive hugely swollen belly.
 <<case "a penitent nuns habit">>
-	$pronounCap looks absolutely blasphemous in a habit with such a hugely swollen belly.  The coarse cloth aggravates $possessive sensitive stretched skin.
+	$pronounCap looks absolutely blasphemous in a habit with such a hugely swollen belly. The coarse cloth aggravates $possessive sensitive stretched skin.
 <<case "a string bikini">>
 	$activeSlave.slaveName's hugely swollen belly parts $possessive string bikini to either side.
 <<case "clubslut netting">>
@@ -10541,7 +10555,7 @@ $pronounCap has
 <<case "a slutty outfit">>
 	$activeSlave.slaveName's hugely swollen belly really shows what a slut $pronoun is.
 <<case "a slave gown">>
-	$activeSlave.slaveName's slave gown is carefully tailored, giving $object a sensual motherly look as it carefully caresses her hugely swollen belly.
+	$activeSlave.slaveName's slave gown is carefully tailored, giving $object a sensual motherly look as it carefully caresses $possessive hugely swollen belly.
 <<case "slutty business attire">>
 	$activeSlave.slaveName's hugely swollen stomach hangs out the front of $possessive suit jacket and blouse, as there is no way $pronoun could close them.
 <<case "nice business attire">>
@@ -10561,7 +10575,7 @@ $pronounCap has
 <<case "battledress">>
 	$activeSlave.slaveName's tank top barely even covers the top of $possessive hugely swollen belly, leaving $object looking like someone who had too much fun on shore leave.
 <<case "a halter top dress">>
-	$activeSlave.slaveName's beautiful halter top dress is filled by $possessive hugely swollen belly.  $possessiveCap popped navel prominently pokes through its front.
+	$activeSlave.slaveName's beautiful halter top dress is filled by $possessive hugely swollen belly. $possessiveCap popped navel prominently pokes through its front.
 <<case "a ball gown">>
 	$activeSlave.slaveName's fabulous silken ball gown is tailored to not only fit $possessive hugely swollen belly, but draw attention to it.
 <<case "slutty jewelry">>
@@ -10591,14 +10605,14 @@ $pronounCap has
 	<<elseif ($activeSlave.boobs > 8000)>>
 	$activeSlave.slaveName's oversized breasts keep $possessive sweater far from $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.
 	<<elseif ($activeSlave.boobs > 4000)>>
-	$activeSlave.slaveName's sweater is pulled taut by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.  $possessiveCap popped navel forms a small tent in material.
+	$activeSlave.slaveName's sweater is pulled taut by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly. $possessiveCap popped navel forms a small tent in material.
 	<<else>>
-	$activeSlave.slaveName's blouse is pulled taut by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.  $possessiveCap popped navel forms a small tent in $possessive shirt.
+	$activeSlave.slaveName's blouse is pulled taut by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly. $possessiveCap popped navel forms a small tent in $possessive shirt.
 	<</if>>
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly hides $possessive silken panties.  $possessiveCap silken vest sensually frames $possessive heavy belly.
+	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly hides $possessive silken panties. $possessiveCap silken vest sensually frames $possessive heavy belly.
 <<case "a maternity dress">>
-	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly fills out $possessive loose dress.  $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive swollen middle.
+	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly fills out $possessive loose dress. $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive swollen middle.
 <<case "chains">>
 	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly is tightly wrapped with chains, causing it to bulge angrily.
 <<case "western clothing">>
@@ -10616,7 +10630,7 @@ $pronounCap has
 <<case "shibari ropes">>
 	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly is tightly bound with rope; flesh  bulges angrily from between them.
 <<case "restrictive latex" "a latex catsuit">>
-	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly greatly distends $possessive latex suit.  $pronounCap looks like an over inflated balloon.  Only $possessive popped navel sticking out the front of $possessive belly disrupts the smoothness.
+	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly greatly distends $possessive latex suit. $pronounCap looks like an over inflated balloon.  Only $possessive popped navel sticking out the front of $possessive belly disrupts the smoothness.
 <<case "a military uniform">>
 	<<if ($activeSlave.boobs > 6000)>>
 	$activeSlave.slaveName's jiggling <<print $activeSlave.inflationType>>-filled belly is obscured by $possessive massive tits.
@@ -10642,7 +10656,7 @@ $pronounCap has
 <<case "a slutty maid outfit">>
 	$activeSlave.slaveName's maid dress fails to cover $possessive jiggling <<print $activeSlave.inflationType>>-filled belly, but the outfit includes a thin white blouse that conceals only the top half of $possessive stomach.
 <<case "a nice maid outfit">>
-	$activeSlave.slaveName's maid dress is almost conservative, it covers $possessive jiggling <<print $activeSlave.inflationType>>-filled belly completely.  Though it can not hide $possessive popped navel poking through the front.
+	$activeSlave.slaveName's maid dress is almost conservative, it covers $possessive jiggling <<print $activeSlave.inflationType>>-filled belly completely. Though it can not hide $possessive popped navel poking through the front.
 <<case "a fallen nuns habit">>
 	$activeSlave.slaveName's latex habit's corset is left hanging open fully revealing $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.
 <<case "a penitent nuns habit">>
@@ -10684,7 +10698,7 @@ $pronounCap has
 <<case "battledress">>
 	$activeSlave.slaveName's tank top rides up $possessive jiggling <<print $activeSlave.inflationType>>-filled belly leaving $object looking like someone who had too much fun on shore-leave.
 <<case "a halter top dress">>
-	$activeSlave.slaveName's beautiful halter top dress is filled by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.  $possessiveCap popped navel prominently pokes through the front of $possessive dress.
+	$activeSlave.slaveName's beautiful halter top dress is filled by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly. $possessiveCap popped navel prominently pokes through the front of $possessive dress.
 <<case "a ball gown">>
 	$activeSlave.slaveName's fabulous silken ball gown is tailored to not only fit $possessive jiggling <<print $activeSlave.inflationType>>-filled belly but draw attention to it.
 <<case "slutty jewelry">>
@@ -10694,7 +10708,7 @@ $pronounCap has
 <<case "a chattel habit">>
 	The strip of cloth running down $possessive front is parted to one side by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.
 <<case "a bunny outfit">>
-	$activeSlave.slaveName's teddy is stretched out by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly.  $possessiveCap popped navel prominently pokes through the material.
+	$activeSlave.slaveName's teddy is stretched out by $possessive jiggling <<print $activeSlave.inflationType>>-filled belly. $possessiveCap popped navel prominently pokes through the material.
 <<default>>
 <</switch>>
 
@@ -10737,7 +10751,7 @@ $pronounCap has
 <<case "a slutty qipao">>
 	$possessiveCap qipao is slit up the side. However, it only covers the top of $possessive fat belly, allowing it to hang free.
 <<case "uncomfortable straps">>
-	$activeSlave.slaveName's slave outfit's straps sink deep into $possessive fat belly, several even disappearing beneath $possessive folds.  The straps connect to a steel ring that parts the fold concealing $possessive navel, allowing it to be seen once again.
+	$activeSlave.slaveName's slave outfit's straps sink deep into $possessive fat belly, several even disappearing beneath $possessive folds. The straps connect to a steel ring that parts the fold concealing $possessive navel, allowing it to be seen once again.
 <<case "shibari ropes">>
 	$activeSlave.slaveName's binding ropes sink deep into $possessive fat belly, several even disappearing beneath $possessive folds.
 <<case "restrictive latex" "a latex catsuit">>
@@ -10847,9 +10861,9 @@ $pronounCap has
 	$activeSlave.slaveName's blouse bulges with $possessive <<print $activeSlave.inflationType>>-swollen belly.
 	<</if>>
 <<case "attractive lingerie for a pregnant woman">>
-	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly rests above $possessive silken panties.  $possessiveCap silken vest sensually frames $possessive swelling belly.
+	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly rests above $possessive silken panties. $possessiveCap silken vest sensually frames $possessive swelling belly.
 <<case "a maternity dress">>
-	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly is noticeable under $possessive loose dress.  $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive distended stomach.
+	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly is noticeable under $possessive loose dress. $possessiveCap dress is specially tailored to be modest yet draw attention to $possessive distended stomach.
 <<case "chains">>
 	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly is tightly wrapped with chains.
 <<case "western clothing">>
@@ -10897,7 +10911,7 @@ $pronounCap has
 <<case "a fallen nuns habit">>
 	$activeSlave.slaveName's latex habit's corset struggles to hold $possessive <<print $activeSlave.inflationType>>-swollen belly.
 <<case "a penitent nuns habit">>
-	$activeSlave.slaveName's habit gently bulges from $possessive <<print $activeSlave.inflationType>>-swollen belly.  The coarse cloth aggravates $possessive sensitive skin.
+	$activeSlave.slaveName's habit gently bulges from $possessive <<print $activeSlave.inflationType>>-swollen belly. The coarse cloth aggravates $possessive sensitive skin.
 <<case "a string bikini">>
 	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly juts out between the strings of $possessive bikini.
 <<case "clubslut netting">>
@@ -10910,14 +10924,14 @@ $pronounCap has
 	<<elseif ($activeSlave.boobs > 2000)>>
 	$activeSlave.slaveName's tits keep $possessive t-shirt far from $possessive <<print $activeSlave.inflationType>>-swollen belly.
 	<<else>>
-	$activeSlave.slaveName's t-shirt bulges with $possessive <<print $activeSlave.inflationType>>-swollen belly.  The bottom of which is beginning to peek from under $possessive T-shirt.
+	$activeSlave.slaveName's t-shirt bulges with $possessive <<print $activeSlave.inflationType>>-swollen belly. The bottom of which is beginning to peek from under $possessive T-shirt.
 	<</if>>
 <<case "a slutty outfit">>
 	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly shows how big of a slut $pronoun is.
 <<case "a slave gown">>
 	$activeSlave.slaveName's slave gown is carefully tailored, giving $object a sensual look as it carefully caresses $possessive <<print $activeSlave.inflationType>>-swollen belly.
 <<case "slutty business attire">>
-	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly bulges $possessive suit jacket and blouse.  It peeks out from under their bottom slightly.
+	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly bulges $possessive suit jacket and blouse. It peeks out from under their bottom slightly.
 <<case "nice business attire">>
 	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly bulges under $possessive tailored blouse and jacket.
 <<case "harem gauze">>
@@ -10927,7 +10941,7 @@ $pronounCap has
 <<case "a slutty nurse outfit">>
 	$activeSlave.slaveName's jacket bulges with $possessive <<print $activeSlave.inflationType>>-swollen belly, which can be seen peeking out from underneath.
 <<case "a schoolgirl outfit">>
-	$activeSlave.slaveName's blouse bulges with $possessive <<print $activeSlave.inflationType>>-swollen belly.  It peeks out from the bottom leaving $object looking particularly slutty.
+	$activeSlave.slaveName's blouse bulges with $possessive <<print $activeSlave.inflationType>>-swollen belly. It peeks out from the bottom leaving $object looking particularly slutty.
 <<case "a kimono">>
 	$activeSlave.slaveName's <<print $activeSlave.inflationType>>-swollen belly is demurely covered by $possessive kimono.
 <<case "a hijab and abaya">>
diff --git a/src/utility/miscWidgets.tw b/src/utility/miscWidgets.tw
index f4596544da94a894788ec606091ef772120d4fd6..fe21981e661fbbddddabbed9987fd3f049d19761 100644
--- a/src/utility/miscWidgets.tw
+++ b/src/utility/miscWidgets.tw
@@ -24,7 +24,7 @@
  if $arg[0] is left undefined it will assume it to be 1.
 %/
 <<widget "AnalVCheck">>
-<<if canDoAnal($activeSlave) && ($activeSlave.anus eq 0)>>
+<<if canDoAnal($activeSlave) && ($activeSlave.anus == 0)>>
 	@@.lime;This breaks in $activeSlave.slaveName's virgin ass.@@
 	<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 		Since it's her first time, you gently ease yourself into her butthole and gradually increase the intensity of your thrusts. Before long she's moaning loudly as you continue working away at her butthole. She thinks of losing her anal virginity to you as a @@.hotpink;connection@@ with her beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>. She looks forward to having her asshole fucked by you again.
@@ -58,7 +58,7 @@
 %/
 <<widget "VaginalVCheck">>
 <<if canDoVaginal($activeSlave)>>
-	<<if ($activeSlave.vagina eq 0)>>
+	<<if ($activeSlave.vagina == 0)>>
 		@@.lime;This breaks in $activeSlave.slaveName's virgin pussy.@@
 		<<if ($activeSlave.devotion > 20) || $activeSlave.career == "a slave since birth">>
 			You ease yourself into her pussy, since it's her first time, then gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. @@.hotpink;She enjoys losing her cherry to you.@@ She looks forward to having her pussy fucked by you again.
@@ -91,8 +91,8 @@
 %/
 <<widget "BothVCheck">>
 <<if canDoVaginal($activeSlave)>>
-	<<if ($activeSlave.vagina eq 0)>>
-		<<if canDoAnal($activeSlave) && ($activeSlave.anus eq 0)>>
+	<<if ($activeSlave.vagina == 0)>>
+		<<if canDoAnal($activeSlave) && ($activeSlave.anus == 0)>>
 			@@.lime;This breaks in $activeSlave.slaveName's virgin holes.@@
 			<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 				As it's her first time, you ease yourself into her pussy before gradually working your way into her ass and alternate between the two holes while she moans. @@.hotpink;She's so devoted she enjoys being fucked in both holes for the first time.@@ She looks forward to having her holes fucked by you again.
@@ -118,7 +118,7 @@
 			<</if>>
 		<</if>>
 		<<set $activeSlave.vagina = 1>>
-	<<elseif ($activeSlave.anus eq 0)>>
+	<<elseif ($activeSlave.anus == 0)>>
 		@@.lime;This breaks in $activeSlave.slaveName's virgin ass.@@
 		<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you ease yourself into her butthole and gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. She thinks of losing her anal virginity to you as a @@.hotpink;connection@@ with her beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>. She looks forward to having her asshole fucked by you again.
@@ -142,7 +142,7 @@
 		$activeSlave.vaginalCount++, $activeSlave.analCount++>>
 	<</if>>
 <<elseif canDoAnal($activeSlave)>>
-	<<if ($activeSlave.anus eq 0)>>
+	<<if ($activeSlave.anus == 0)>>
 		@@.lime;This breaks in $activeSlave.slaveName's virgin ass.@@
 		<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you ease yourself into her butthole and gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. She thinks of losing her anal virginity to you as a @@.hotpink;connection@@ with her beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>. She looks forward to having her asshole fucked by you again.
@@ -175,7 +175,7 @@
 %/
 <<widget "SimpleVCheck">>
 <<if canDoVaginal($activeSlave)>>
-	<<if ($activeSlave.vagina eq 0)>>
+	<<if ($activeSlave.vagina == 0)>>
 		@@.lime;This breaks in $activeSlave.slaveName's virgin pussy.@@
 		<<if ($activeSlave.devotion > 20) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you ease yourself into her pussy and gradually speed up your thrusts while she slowly learns to move her hips along with you. Her moans become louder and louder. @@.hotpink;She enjoys losing her cherry to you.@@ She looks forward to having her pussy fucked by you again.
@@ -196,7 +196,7 @@
 		$activeSlave.vaginalCount++>>
 	<</if>>
 <<elseif canDoAnal($activeSlave)>>
-	<<if ($activeSlave.anus eq 0)>>
+	<<if ($activeSlave.anus == 0)>>
 		@@.lime;This breaks in $activeSlave.slaveName's virgin ass.@@
 		<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you gently ease yourself into her butthole and gradually increase the intensity of your thrusts. Before long she's moaning loudly as you continue working away at her butthole. She thinks of losing her anal virginity to you as a @@.hotpink;connection@@ with her beloved <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>. She looks forward to having her asshole fucked by you again.
@@ -224,6 +224,7 @@
 
 /%
  Call as <<PartnerVCheck 10 5>> or <<PartnerVCheck>>
+ Before calling this widget, set $partner to the index of the partner in the $slaves array
  $arg[0] is how many times to increment the Anal counts, if there is no Vagina available.
  $arg[1] is how many times to increment both holes counts (usually it is half of Anal).
  In both cases if left undefined it will assume it to be 1.
@@ -232,37 +233,39 @@
 %/
 <<widget "PartnerVCheck">>
 
-<<if canDoVaginal($partner)>>
-	<<if ($partner.vagina == 0)>>
-		<<if canDoAnal($partner) && ($partner.anus eq 0)>>
-			Since it's $partner.slaveName's first time, you take your time and gently ease yourself into her pussy before gradually working your way into her butthole, alternating between her holes. @@.lime;This breaks in $partner.slaveName's virgin holes.
-			<<set $partner.vagina++, $partner.anus++>>
+<<if $partner < 0 || $partner >= $slaves.length>>
+	@@.red;PartnerVCheck called with invalid partner '$partner' from passage <<print passage()>>@@
+<<elseif canDoVaginal($slaves[$partner])>>
+	<<if ($slaves[$partner].vagina == 0)>>
+		<<if canDoAnal($slaves[$partner]) && ($slaves[$partner].anus == 0)>>
+			Since it's $slaves[$partner].slaveName's first time, you take your time and gently ease yourself into her pussy before gradually working your way into her butthole, alternating between her holes. @@.lime;This breaks in $slaves[$partner].slaveName's virgin holes.
+			<<set $slaves[$partner].vagina++, $slaves[$partner].anus++>>
 		<<else>>
-			Since it's $partner.slaveName's first time, you take your time and gently ease yourself into her pussy before gradually increasing the intensity of your thrusts. @@.lime;This breaks in $partner.slaveName's virgin pussy.
-			<<set $partner.vagina++>>
+			Since it's $slaves[$partner].slaveName's first time, you take your time and gently ease yourself into her pussy before gradually increasing the intensity of your thrusts. @@.lime;This breaks in $slaves[$partner].slaveName's virgin pussy.
+			<<set $slaves[$partner].vagina++>>
 		<</if>>
-	<<elseif canDoAnal($partner) && ($partner.anus eq 0)>>
-		Since it's $partner.slaveName's first time, you take your time and gently ease yourself into her butthole before gradually increasing the intensity of your thrusts into her ass. @@.lime;This breaks in $partner.slaveName's virgin ass.
-		<<set $partner.anus++>>
+	<<elseif canDoAnal($slaves[$partner]) && ($slaves[$partner].anus == 0)>>
+		Since it's $slaves[$partner].slaveName's first time, you take your time and gently ease yourself into her butthole before gradually increasing the intensity of your thrusts into her ass. @@.lime;This breaks in $slaves[$partner].slaveName's virgin ass.
+		<<set $slaves[$partner].anus++>>
 	<</if>>
 	<<if $args[1]>>
 		<<set $vaginalTotal += $args[1], $analTotal += $args[1],
-		$partner.vaginalCount += $args[1], $partner.analCount += $args[1]>>
+		$slaves[$partner].vaginalCount += $args[1], $slaves[$partner].analCount += $args[1]>>
 	<<else>>
 		<<set $vaginalTotal++, $analTotal++,
-		$partner.vaginalCount++, $partner.analCount++>>
+		$slaves[$partner].vaginalCount++, $slaves[$partner].analCount++>>
 	<</if>>
-<<elseif canDoAnal($partner)>>
-	<<if ($partner.anus eq 0)>>
-		Since it's $partner.slaveName's first time, you take your time and gently ease yourself into her butthole before gradually increasing the intensity of your thrusts into her ass. This breaks in $partner.slaveName's virgin ass.
-		<<set $partner.anus++>>
+<<elseif canDoAnal($slaves[$partner])>>
+	<<if ($slaves[$partner].anus == 0)>>
+		Since it's $slaves[$partner].slaveName's first time, you take your time and gently ease yourself into her butthole before gradually increasing the intensity of your thrusts into her ass. This breaks in $slaves[$partner].slaveName's virgin ass.
+		<<set $slaves[$partner].anus++>>
 	<</if>>
 	<<if $args[0]>>
 		<<set $analTotal += $args[0],
-		$partner.analCount += $args[0]>>
+		$slaves[$partner].analCount += $args[0]>>
 	<<else>>
 		<<set $analTotal++,
-		$partner.analCount++>>
+		$slaves[$partner].analCount++>>
 	<</if>>
 <</if>>
 @@
@@ -277,7 +280,7 @@
 		<<if ($PC.dick != 0 && $activeSlave.eggType == "human")>>
 		| <<link "Impregnate her yourself">><<replace "#miniscene">><<include "FPCImpreg">><br>&nbsp;&nbsp;&nbsp;&nbsp;<</replace>><<SlaveInteractImpreg>><<SlaveInteractFertility>><</link>>
 		<</if>>
-	| [[Use another slave to impregnate her|FSlaveImpreg]]
+		| [[Use another slave to impregnate her|FSlaveImpreg]]
 	<</if>>
 	<<if $activeSlave.preg <= 0 && $activeSlave.bellyImplant == 0>>
 	<<if $activeSlave.assignment != "work in the dairy" && $activeSlave.assignment != "be confined in the arcade">>
@@ -938,29 +941,29 @@
 	<<else>>
 	<<set $schoolTitle = "Benefactrix of ">>
 	<</if>>
-	<<for $i = 0; $i < $schoolsPerfected.length; $i++>>
-	<<set $seed = $schoolsPerfected[$i]>>
-	<<set $schoolTitle = ($schoolTitle + $seed)>>
-	<<if $i < $schoolsPerfected.length-2>>
-		<<set $schoolTitle = ($schoolTitle + ", ")>>
-	<<elseif $i == $schoolsPerfected.length-2>>
-		<<if $schoolsPerfected.length > 2>>
-		<<set $schoolTitle = ($schoolTitle + ", and ")>>
-		<<else>>
-		<<set $schoolTitle = ($schoolTitle + " and ")>>
+	<<for _mwi = 0; _mwi < $schoolsPerfected.length; _mwi++>>
+		<<set $seed = $schoolsPerfected[_mwi]>>
+		<<set $schoolTitle = ($schoolTitle + $seed)>>
+		<<if _mwi < $schoolsPerfected.length-2>>
+			<<set $schoolTitle = ($schoolTitle + ", ")>>
+		<<elseif _mwi == $schoolsPerfected.length-2>>
+			<<if $schoolsPerfected.length > 2>>
+			<<set $schoolTitle = ($schoolTitle + ", and ")>>
+			<<else>>
+			<<set $schoolTitle = ($schoolTitle + " and ")>>
+			<</if>>
 		<</if>>
-	<</if>>
 	<</for>>
 	<<set $titles.push($schoolTitle)>>
 <</if>>
 <<if $schoolsPresent.length > 0>>
 	<<set $schoolTitle = "Supporter of ">>
-	<<for $i = 0; $i < $schoolsPresent.length; $i++>>
-	<<set $seed = $schoolsPresent[$i]>>
+	<<for _mwi = 0; _mwi < $schoolsPresent.length; _mwi++>>
+	<<set $seed = $schoolsPresent[_mwi]>>
 	<<set $schoolTitle = ($schoolTitle + $seed)>>
-	<<if $i < $schoolsPresent.length-2>>
+	<<if _mwi < $schoolsPresent.length-2>>
 		<<set $schoolTitle = ($schoolTitle + ", ")>>
-	<<elseif $i == $schoolsPresent.length-2>>
+	<<elseif _mwi == $schoolsPresent.length-2>>
 		<<if $schoolsPresent.length > 2>>
 		<<set $schoolTitle = ($schoolTitle + ", and ")>>
 		<<else>>
@@ -1034,10 +1037,10 @@
 	<<set $titles.push("owner of the arcology")>>
 <</if>>
 
-<<for $i = 0; $i < $titles.length; $i++>>
-	<<set $seed = $titles[$i]>>
+<<for _mwi = 0; _mwi < $titles.length; _mwi++>>
+	<<set $seed = $titles[_mwi]>>
 	<<set $PCTitle = ($PCTitle + $seed)>>
-	<<if $i < $titles.length-2>>
+	<<if _mwi < $titles.length-2>>
 	<<set $PCTitle = ($PCTitle + ", ")>>
 	<</if>>
 <</for>>
@@ -1051,8 +1054,8 @@
 <<widget "MenialPopCap">>
 
 <<set $PopCap = 500>>
-<<for _i = 20; _i < $sectors.length; _i++>>
-	<<if $sectors[_i].type == "Pens">>
+<<for _mwi = 20; _mwi < $sectors.length; _mwi++>>
+	<<if $sectors[_mwi].type == "Pens">>
 		<<set $PopCap += 500>>
 	<</if>>
 <</for>>
diff --git a/src/utility/raWidgets.tw b/src/utility/raWidgets.tw
index d15b9ec148728677b55ce71999f27094507d921b..f030bf83e125b5fe3843663cc4627a6955fd2638 100644
--- a/src/utility/raWidgets.tw
+++ b/src/utility/raWidgets.tw
@@ -2477,14 +2477,13 @@ Relationship rules: ''$currentRule.relationshipRules.''
     <<link "Apply rules">>
         <<RASaveRule $currentRule.ID>>
         <<replace "#applied">>
-            <<for $i = 0; $i < $slaves.length; $i++>>
-                <<if (!$slaves[$i].useRulesAssistant)>> /* skip RA-exempt slaves */
+            <<for _rai = 0; _rai < $slaves.length; _rai++>>
+                <<if (!$slaves[_rai].useRulesAssistant)>> /* skip RA-exempt slaves */
                     <<continue>>
                 <</if>>
 
-                <<set $activeSlave = $slaves[$i]>>
-                <<CheckAutoRulesActivate $activeSlave>> /* does not use or modify $currentRule */
-                <<DefaultRules $activeSlave>>           /* does not use or modify $currentRule */
+                <<CheckAutoRulesActivate $slaves[_rai]>> /* does not use or modify $currentRule */
+                <<DefaultRules $slaves[_rai]>>           /* does not use or modify $currentRule */
             <</for>>
         <</replace>>
 
@@ -2857,9 +2856,9 @@ Your brand design is ''$brandDesign.''
 <</widget>>
 
 /%
- Call as <<RASurgeryChangeLacation>>
+ Call as <<RASurgeryChangeLactation>>
 %/
-<<widget "RASurgeryChangeLacation">>
+<<widget "RASurgeryChangeLactation">>
 <<replace #lactation>>
 	<<if ($currentRule.surgery.lactation == "no default setting")>>
 		''no default setting.''
@@ -2874,7 +2873,7 @@ Your brand design is ''$brandDesign.''
 	<<if ($currentRule.surgery.lactation !== "no default setting")>>
 		<<link "No default setting">>
 			<<set $currentRule.surgery.lactation = "no default setting">>
-			<<RASurgeryChangeLacation>>
+			<<RASurgeryChangeLactation>>
 		<</link>> |
 	<<else>>
 		No default setting |
@@ -2882,7 +2881,7 @@ Your brand design is ''$brandDesign.''
 	<<if ($currentRule.surgery.lactation !== 0)>>
 		<<link "Removed">>
 			<<set $currentRule.surgery.lactation = 0>>
-			<<RASurgeryChangeLacation>>
+			<<RASurgeryChangeLactation>>
 		<</link>> |
 	<<else>>
 		Removed |
@@ -2890,7 +2889,49 @@ Your brand design is ''$brandDesign.''
 	<<if ($currentRule.surgery.lactation !== 1)>>
 		<<link "Implanted">>
 			<<set $currentRule.surgery.lactation = 1>>
-			<<RASurgeryChangeLacation>>
+			<<RASurgeryChangeLactation>>
+		<</link>>
+	<<else>>
+		Implanted
+	<</if>>
+<</replace>>
+<</widget>>
+
+/%
+ Call as <<RASurgeryChangeProstate>>
+%/
+<<widget "RASurgeryChangeProstate">>
+<<replace #prostate>>
+	<<if ($currentRule.surgery.prostate == "no default setting")>>
+		''no default setting.''
+	<<elseif ($currentRule.surgery.prostate == 1)>>
+		''implanted.''
+	<<else>>
+		''implants will be removed.''
+	<</if>>
+
+	<br>
+
+	<<if ($currentRule.surgery.prostate !== "no default setting")>>
+		<<link "No default setting">>
+			<<set $currentRule.surgery.prostate = "no default setting">>
+			<<RASurgeryChangeProstate>>
+		<</link>> |
+	<<else>>
+		No default setting |
+	<</if>>
+	<<if ($currentRule.surgery.prostate !== 0)>>
+		<<link "Removed">>
+			<<set $currentRule.surgery.prostate = 0>>
+			<<RASurgeryChangeProstate>>
+		<</link>> |
+	<<else>>
+		Removed |
+	<</if>>
+	<<if ($currentRule.surgery.prostate !== 1)>>
+		<<link "Implanted">>
+			<<set $currentRule.surgery.prostate = 1>>
+			<<RASurgeryChangeProstate>>
 		<</link>>
 	<<else>>
 		Implanted
diff --git a/src/utility/slaveCreationWidgets.tw b/src/utility/slaveCreationWidgets.tw
index 5a2dd1ddfcfcf0fad872c7f75ec7867cfdfb979b..b39f64a70cec7eeb6a81957540bfcf0f5aae4699 100644
--- a/src/utility/slaveCreationWidgets.tw
+++ b/src/utility/slaveCreationWidgets.tw
@@ -6,7 +6,7 @@
 	Called from Gen XX, Gen XY, CheatMode DB, InitNationalities.
 %/
 <<widget "BaseSlave">>
-	<<set $activeSlave = {slaveName: "blank", birthName: "blank", genes: "XX", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", origEye: "brown", eyewear: "none", origHColor: "brown", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, PLimb: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, prostate: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules: "restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0, intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customTitle: "", customTitleLisp: "", rudeTitle: 0, customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, bellyPain: 0, cervixImplant: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, scars: 0, breedingMark: 0, prostateImplant: 0, underArmHStyle: "waxed", bodySwap: 0, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0, pregControl: "none", readyLimbs: [], ageAdjust: 0, bald: 0, origBodyOwner: "", death: "", hormoneBalance: 0}>>
+	<<set $activeSlave = {slaveName: "blank", birthName: "blank", genes: "XX", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", origEye: "brown", eyewear: "none", origHColor: "brown", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, PLimb: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, prostate: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules: "restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0, intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customTitle: "", customTitleLisp: "", rudeTitle: 0, customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, bellyPain: 0, cervixImplant: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, scars: 0, breedingMark: 0, underArmHStyle: "waxed", bodySwap: 0, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0, pregControl: "none", readyLimbs: [], ageAdjust: 0, bald: 0, origBodyOwner: "", death: "", hormoneBalance: 0}>>
 <</widget>>
 
 /%
@@ -1884,7 +1884,7 @@
 			<<set $activeSlave.faceImplant = 1>>
 			<<set $activeSlave.face = Math.clamp($activeSlave.face+20,-100,100)>>
 		<</if>>
-		<<if ($activeSlave.ageImplant != 1) && ($activeSlave.age >= 25)>>
+		<<if ($activeSlave.ageImplant != 1) && ($activeSlave.visualAge >= 25)>>
 			<<set $activeSlave.ageImplant = 1>>
 			<<AgeImplantAdjustment>>
 		<</if>>
@@ -2024,7 +2024,7 @@
 		<<else>>
 			<<set $activeSlave.faceShape = "androgynous">>
 		<</if>>
-		<<if ($activeSlave.age < 25)>>
+		<<if ($activeSlave.physicalAge < 25)>>
 			<<set $activeSlave.shoulders = Math.clamp($activeSlave.shoulders+1, -2, 2)>>
 			<<set $activeSlave.hips = Math.clamp($activeSlave.hips-1, -2, 2)>>
 		<</if>>