move stuff out into lover_ files

locations/Cum_Manage

@@ -154,7 +154,7 @@ if $ARGS[0] = '':
 
 !!{	Next it sets the variables in the array. The cumming boys name is first and cum age to 0.
 !!	The cum delivery location is set to vaginally, and we check to see if this is an unknowing sex act.
-!!	If it is, it makes it so the MC doesnt know who did it.
+!!	If it is, it makes it so the MC doesn''t know who did it.
 !!	If the boy has a custom specified potency 'sexspecpot', it flags the potency. Otherwise it sets it to the default.
 !!	Default potency potential is generated from a random multiplier of sexvolume.
 !!	Sexvolume defaults to 40 (4 mL), but may be overwritten with 'sexvolume'.}

locations/IgorHanter

@@ -241,7 +241,7 @@ if hantersIgorLove < 2 and hantersIgorQw >= 35 and hantersKnowSlut = 0 and bfA <
 	gs 'arousal', 'foreplay', 1
 	gs 'stat'
 !! this part is not included properly into boyfriend system yet - rachels
-!! it could be simply replaced with gs 'boyfrend','start' but we need to check if a slot is empty
+!! it could be simply replaced with gs 'boyfrend', 'start' but we need to check if a slot is empty
 !! at the moment I disable all the actions
     act 'Answer kiss':
         *clr & cla

locations/boy

@@ -18,6 +18,7 @@ if $ARGS[0] = 'details':
 	picrand =  RAND(1,30)
 	if picrand = lover_picture[0] or picrand = lover_picture[1] or picrand = lover_picture[2]: jump 'boydetailsloop'
 
+	loverGenderTmp = 0
 	silaVag = npc_sexskill[$npclastgenerated]
 	$npc_usedname[$npclastgenerated] = $npc_firstname[$npclastgenerated]
 	$boydesc = $npc_usedname[$npclastgenerated]

locations/boyStat

@@ -31,25 +31,7 @@ if mid($npcboytemp,1,1) = 'A' or mid($npcboytemp,1,1) = 'B' or mid($npcboytemp,1
 	bstemp[2] = npc_dick[$npclastcalled]
 	$bstemp[3] = $npc_thdick[$npclastcalled]
 	bstemp[4] = npc_sexskill[$npclastcalled]
-	if npc_gender[$npclastcalled] = 0 or npc_gender[$npclastcalled] = 3:
-		$bstemp[5] = 'he' & $bstemp[6] = 'He'
-		$bstemp[7] = 'his' & $bstemp[8] = 'His'
-		$bstemp[9] = 'him' & $bstemp[10] = 'Him'
-		$bstemp[11] = 'his' & $bstemp[12] = 'His'
-		$bstemp[13] = 'himself' & $bstemp[14] = 'Himself'
-	elseif npc_gender[$npclastcalled] = 1 or npc_gender[$npclastcalled] = 2:
-		$bstemp[5] = 'she' & $bstemp[6] = 'She'
-		$bstemp[7] = 'her' & $bstemp[8] = 'Her'
-		$bstemp[9] = 'her' & $bstemp[10] = 'Her'
-		$bstemp[11] = 'hers' & $bstemp[12] = 'Hers'
-		$bstemp[13] = 'herself' & $bstemp[14] = 'Herself'
-	else
-		$bstemp[5] = 'xe' & $bstemp[6] = 'Xe'
-		$bstemp[7] = 'xem' & $bstemp[8] = 'Xem'
-		$bstemp[9] = 'xyr' & $bstemp[10] = 'Xyr'
-		$bstemp[11] = 'xyrs' & $bstemp[12] = 'Xyrs'
-		$bstemp[13] = 'xemself' & $bstemp[14] = 'Xemself'
-	end
+	gs 'pronouns', npc_gender[$npclastcalled], $ARGS[1]
 elseif mid($npcboytemp,1,1) = 'D':
 	if mid($npcboytemp, 2) = 1:
 		$bstemp[1] = 'small sized'
@@ -88,44 +70,24 @@ if $ARGS[1] = 'a':
 	dick1 = bstemp[2]
 	$dick_girth1 = $bstemp[3]
 	silavag1 = bstemp[4]
-	$xe1 = $bstemp[5] & $xec1 = $bstemp[6]
-	$xem1 = $bstemp[7] & $xemc1 = $bstemp[8]
-	$xyr1 = $bstemp[9] & $xyrc1 = $bstemp[10]
-	$xyrs1 = $bstemp[11] & $xyrsc1 = $bstemp[12]
-	$xemself1 = $bstemp[13] & $xemselfc1 = $bstemp[14]
 elseif $ARGS[1] = 'b':
 	$boy2 = $npclastcalled
 	$boydesc2 = $bstemp[1]
 	dick2 = bstemp[2]
 	$dick_girth2 = $bstemp[3]
 	silavag2 = bstemp[4]
-	$xe2 = $bstemp[5] & $xec2 = $bstemp[6]
-	$xem2 = $bstemp[7] & $xemc2 = $bstemp[8]
-	$xyr2 = $bstemp[9] & $xyrc2 = $bstemp[10]
-	$xyrs2 = $bstemp[11] & $xyrsc2 = $bstemp[12]
-	$xemself2 = $bstemp[13] & $xemselfc2 = $bstemp[14]
 elseif $ARGS[1] = 'c':
 	$boy3 = $npclastcalled
 	$boydesc3 = $bstemp[1]
 	dick3 = bstemp[2]
 	$dick_girth3 = $bstemp[3]
 	silavag3 = bstemp[4]
-	$xe3 = $bstemp[5] & $xec3 = $bstemp[6]
-	$xem3 = $bstemp[7] & $xemc3 = $bstemp[8]
-	$xyr3 = $bstemp[9] & $xyrc3 = $bstemp[10]
-	$xyrs3 = $bstemp[11] & $xyrsc3 = $bstemp[12]
-	$xemself3 = $bstemp[13] & $xemselfc3 = $bstemp[14]
 elseif $ARGS[1] = 'd':
 	$boy4 = $npclastcalled
 	$boydesc4 = $bstemp[1]
 	dick4 = bstemp[2]
 	$dick_girth4 = $bstemp[3]
 	silavag4 = bstemp[4]
-	$xe4 = $bstemp[5] & $xec4 = $bstemp[6]
-	$xem4 = $bstemp[7] & $xemc4 = $bstemp[8]
-	$xyr4 = $bstemp[9] & $xyrc4 = $bstemp[10]
-	$xyrs4 = $bstemp[11] & $xyrsc4 = $bstemp[12]
-	$xemself4 = $bstemp[13] & $xemselfc4 = $bstemp[14]
 else
 	i = ARGS[1]
 	if mid($ARGS[1],1,1) < 10: i = $ARGS[1]
@@ -134,11 +96,6 @@ else
 	dick[i] = bstemp[2]
 	$dick_girth[i] = $bstemp[3]
 	silavag[i] = bstemp[4]
-	$xe[i] = $bstemp[5] & $xec[i] = $bstemp[6]
-	$xem[i] = $bstemp[7] & $xemc[i] = $bstemp[8]
-	$xyr[i] = $bstemp[9] & $xyrc[i] = $bstemp[10]
-	$xyrs[i] = $bstemp[11] & $xyrsc[i] = $bstemp[12]
-	$xemself[i] = $bstemp[13] & $xemselfc[i] = $bstemp[14]
 end
 
 killvar 'bstemp'

locations/boy_likes

@@ -1,2411 +0,0 @@
-# boy_likes
-
-gs 'boyStat', $lover[lover_number]
-!!$boybody = 1 - tall, 2 - average, 3 - short
-$boybody = $loverbody[lover_number]
-!!$boybod = 1 - thin, 2 - athletic, 3 - chunky, 4 - fat
-$boybod = $loverbod[lover_number]
-$boyface = $loverface[lover_number]
-!! sexual force of 0 prior_to 2
-silaVag = loversilaVag[lover_number]
-!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
-finance = loverfinance[lover_number]
-!!check in appearance, a parameter vnesh
-vneshBoy = vneshlover[lover_number]
-$boyClo = $loverClo[lover_number]
-!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100, 3 no pref
-figurBoy = figurlover[lover_number]
-!!0 - chest less or equal 3, 1 breast 3-4, 2 breasts bigger 4
-titBoy = titlover[lover_number]
-!!favorite hair color 0 - black, 1 - brown, 2 - Redhead, 3 - blonde
-hairBoy = hairlover[lover_number]
-
-!!character 0 - soft, 1 -norm 2 - aggressor
-harakBoy = haraklover[lover_number]
-!!perversity
-izvrat = loverizvrat[lover_number]
-husb_birth_year = year - boyage
-husbAge = boyage
-  
-
-!!new preferences
-
-!!renaming perversity constant
-pervConstant = izvrat
-
-!!This is for clothing type preference
-!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
-clotTypePrefTmp = clotTypePref[lover_number]
-
-!!This is for the quality of clothing
-!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
-clotQualPrefTmp = clotQualPref[lover_number]
-
-!!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
-!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
-!! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
-
-!! How much they want to see your chest USE THIS FOR NOW
-!! 0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
-!! It doesn''t matter if your poor or rich, everyone loves tits.
-clotTopPrefTmp = clotTopPref[lover_number]
-
-!!THIS IS THE EQUATION FOR THE TIT ADDITION
-
-
-
-
-!! This is for pants and skirt shortness and will be grouped together as such.
-!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
-bottShorPrefTmp = bottShorPref[lover_number]
-
-!! This is for clothes thinness.
-!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
-!! I see the moderate to really thin overlapping. Its intentional.
-clotThinPrefTmp = clotThinPref[lover_number]
-
-!!This is to find out if they want you to wear bimbo clothing
-!! 0 - no preference, 1 - Prefers bimbo clothing.
-bimbPrefTmp = bimbPref[lover_number]
-
-!!This is to find out if they want you to wear piercings.
-!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
-pierPrefTmp = pierPref[lover_number]
-
-!!This is to find out if they want you to have tattoos.
-!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
-tattPrefTmp = tattPref[lover_number]
-
-
-!!This is to find out how big they want your lips.
-!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
-lipsPrefTmp = lipsPref[lover_number]
-
-!!This is to find out how big they want YOU.
-!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
-!! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
-bodyPrefTmp = bodyPref[lover_number]
-
-!!This is to find out how much makeup they want you to wear.
-!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
-makePrefTmp = makePref[lover_number]
-
-
-!! This is to see if they like a ditz, average, or a smartypants
-!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
-IQPrefTmp = IQPref[lover_number]
-
-!!This is the new hair color preference
-!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
-
-
-!!Putting his preferences into words
-
-
-!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
-if clotTypePrefTmp = 0:
-	$clotTypePrefTmp = ''
-elseif clotTypePrefTmp = 1:
-	$clotTypePrefTmp = 'cheap'
-elseif clotTypePrefTmp = 2:
-	$clotTypePrefTmp = 'average'
-elseif clotTypePrefTmp = 3:
-	$clotTypePrefTmp = 'formal'
-elseif clotTypePrefTmp = 4:
-	$clotTypePrefTmp = 'fetish'
-end
-
-!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
-if clotQualPrefTmp = 0:
-	$clotQualPrefTmp = 'any type of'
-elseif clotQualPrefTmp = 1:
-	$clotQualPrefTmp = 'anything but expensive'
-elseif clotQualPrefTmp = 2:
-	$clotQualPrefTmp = 'expensive'
-end
-
-!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
-if clotTopPrefTmp = 0:
-	$clotTopPrefTmp = 'any amount of'
-elseif clotTopPrefTmp = 1:
-	$clotTopPrefTmp = 'a little bit of'
-elseif clotTopPrefTmp = 2:
-	$clotTopPrefTmp = 'a lot of'
-elseif clotTopPrefTmp = 3:
-	$clotTopPrefTmp = 'a huge amount of'
-end
-
-!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
-if bottShorPrefTmp = 0:
-	$bottShorPrefTmp= 'any length'
-elseif bottShorPrefTmp = 1:
-	$bottShorPrefTmp= 'modest length'
-elseif bottShorPrefTmp = 2:
-	$bottShorPrefTmp= 'slightly short length'
-elseif bottShorPrefTmp = 3:
-	$bottShorPrefTmp= 'really short length'
-end
-
-!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
-if clotThinPrefTmp = 0:
-	$clotThinPrefTmp= ''
-elseif clotThinPrefTmp = 1:
-	$clotThinPrefTmp= 'thick'
-elseif clotThinPrefTmp = 2:
-	$clotThinPrefTmp= 'a little thin'
-elseif clotThinPrefTmp = 3:
-	$clotThinPrefTmp= 'really thin or even see through'
-end
-
-!! 0 - no preference, 1 - Prefers bimbo clothing.
-if bimbPrefTmp = 0:
-	$bimboPref = ''
-else
-	$bimboPref = 'a bimbo'
-end
-
-!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
-if pierPrefTmp = 0:
-	$pierPrefTmp = 'any amount'
-elseif pierPrefTmp = 1:
-	$pierPrefTmp = 'a couple'
-elseif pierPrefTmp = 2:
-	$pierPrefTmp = 'a good amount'
-elseif pierPrefTmp = 3:
-	$pierPrefTmp = 'a lot'
-end
-
-!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
-if tattPrefTmp = 0:
-	$tattPrefTmp = 'any amount'
-elseif tattPrefTmp = 1:
-	$tattPrefTmp = 'a couple'
-elseif tattPrefTmp = 2:
-	$tattPrefTmp = 'a good amount'
-elseif tattPrefTmp = 3:
-	$tattPrefTmp = 'a lot'
-end
-
-!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
-if lipsPrefTmp = 0:
-	$lipsPrefTmp = 'any sized lips'
-elseif lipsPrefTmp = 1:
-	$lipsPrefTmp = 'average sized lips'
-elseif lipsPrefTmp = 2:
-	$lipsPrefTmp = 'thick lips'
-end
-
-!!This is the Players lip description, this allows flexibility when writing
-if pcs_lip = 0:
-	$lipDesc = 'thin'
-elseif pcs_lip = 1:
-	$lipDesc = 'soft'
-elseif pcs_lip = 2:
-	$lipDesc = 'plump'
-elseif pcs_lip = 3:
-	$lipDesc = 'juicy'
-elseif pcs_lip = 4:
-	$lipDesc = 'thick'
-end
-
-
-
-!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
-if bodyPrefTmp = 0:
-	$bodyPrefTmp = 'any weight'
-elseif bodyPrefTmp = 1:
-	$bodyPrefTmp = 'should be skinny'
-elseif bodyPrefTmp = 2:
-	$bodyPrefTmp = ' should be not to skinny or fat'
-elseif bodyPrefTmp = 3:
-	$bodyPrefTmp = 'should be thick and curvy'
-end
-
-!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
-if makePrefTmp = 0:
-	$makePrefTmp = 'any amount of makeup'
-elseif makePrefTmp = 1:
-	$makePrefTmp = 'a sutle amount of makeup'
-elseif makePrefTmp = 2:
-	$makePrefTmp = ' a good amount of makeup'
-elseif makePrefTmp = 3:
-	$makePrefTmp = 'a slutty amount of makeup'
-end
-
-!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
-if IQPrefTmp = 0:
-	$IQPrefTmp = 'nice'
-elseif IQPrefTmp = 1:
-	$IQPrefTmp = 'ditzy'
-elseif IQPrefTmp = 2:
-	$IQPrefTmp = 'with at least a little brain power'
-elseif IQPrefTmp = 3:
-	$IQPrefTmp = 'genius'
-end
-
-!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
-if hairPref = 0:
-	$hairPref = 'black'
-elseif hairPref = 1:
-	$hairPref = 'brown'
-elseif hairPref = 2:
-	$hairPref = 'redhead'
-elseif hairPref = 3:
-	$hairPref = 'blond'
-elseif hairPref = 4:
-	$hairPref = 'any color'
-end
-
-
-!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
-if titBoy = 0:
-	$titBoy = 'petite breasts'
-elseif titBoy = 1:
-	$titBoy = 'good sized breasts'
-elseif titBoy = 2:
-	$titBoy = 'huge breasts'
-end
-
-
-!! manna , mannamax * 50 / 100:
-
-if pcs_hairbsh = 1 and curly > 0:
-	loverrelation[lover_number] += 2 &
-	$meetHair = 'Your hair looks very beautiful.'
-end
-if pcs_hairbsh = 1 and curly = 0:
-	loverrelation[lover_number] += 1 
-	$meetHair = 'You have pretty hair today.'
-end
-if pcs_hairbsh = 0:
-	loverrelation[lover_number] -= 1 
-	$meetHair = 'You look like you were in a hurry.'
-end
-
-!!This are generic things your boyfriend will call you based on how much he likes you.
-if loverrelation[lover_number] > 80:
-	randchan = rand(0,2)
-	if randchan = 0 and haraklover[lover_number] ! 0:
-		$giveNick = 'angel'
-	elseif randchan = 1:
-		$giveNick = 'beautiful'
-	elseif randchan = 2:
-		$giveNick = 'love'
-	end
-elseif loverrelation[lover_number] > 20:
-	randchan = rand(0,1)
-	if randchan = 0:
-		$giveNick = 'babe'
-	elseif randchan = 1:
-		$giveNick = '<<$pcs_nickname>>'
-	end
-else
-	$giveNick = '<<$pcs_firstname>>'
-end
-
-
-
-
-
-
-
-if $ARGS[0] = 'clotTypePrefTmp':
-	if clotTypePrefTmp ! 0:
-		if haraklover[lover_number] = 0:
-
-			if $clotTypePrefTmp = $clothingworntype:
-				loverrelation[lover_number] += 1
-				$meetClot = '<<$loverdesc[lover_number]>> says, "I like the type of clothing you are wearing <<$pcs_nickname>>. I think girls look amazing in <<$clotTypePrefTmp>> clothing."'
-			elseif $clotTypePrefTmp = $clothingworntype:
-				loverrelation[lover_number] -= 1
-				$meetClot = '<<$loverdesc[lover_number]>> says nerviously, "I don''t mean to be rude <<$pcs_nickname>>, but I don''t think <<$clothingworntype>> clothing looks nice on girls. I like girls who wear <<$clotTypePrefTmp>> clothing."'
-			end
-		elseif haraklover[lover_number] = 1:
-			if $clotTypePrefTmp = $clothingworntype:
-				loverrelation[lover_number] += 2
-				$meetClot = '<<$loverdesc[lover_number]>> says, "I think girls who where <<$clothingworntype>> clothing look amazing. I''m glad you chose that type of clothing."'
-			elseif $clotTypePrefTmp = $clothingworntype:
-				loverrelation[lover_number] -= 2
-				$meetClot = '<<$loverdesc[lover_number]>> says cafefully, "<<$pcs_nickname>> to be honest, I don''t think <<$clothingworntype>> clothing looks good on you. I think <<$clotTypePrefTmp>> clothing would look better on you."'
-			end
-		elseif haraklover[lover_number] = 2:
-			if $clotTypePrefTmp = $clothingworntype:
-				loverrelation[lover_number] += 3
-				$meetClot = '<<$loverdesc[lover_number]>> says, "<<$pcs_nickname>>, you look fucking hot in <<$clothingworntype>> clothes. It looks amazing on you!"'
-			elseif $clotTypePrefTmp = $clothingworntype:
-				loverrelation[lover_number] -= 3
-				$meetClot = '<<$loverdesc[lover_number]>> says rather rudely, "I think girls who wear <<$clothingworntype>> type clothing looks like shit. Girls who wear <<$clotTypePrefTmp>> turn me on much more."'
-			end
-		end
-	end
-	if clotTypePrefTmp ! 0:
-	'<<$meetClot>>'
-	end
-end
-if $ARGS[0] = 'clotQualPrefTmp':
-	if clotQualPrefTmp = 1:
-		if PCloQuality > 4: 
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 2
-				$meetQualPref = '<<$loverdesc[lover_number]>> says that he thinks your clothing quality is way too high and he likes girls that where clothing that is <<$clotQualPrefTmp>>."'
-			elseif haraklover[lover_number] = 0:
-				loverrelation[lover_number] -= 1
-				$meetQualPref = '<<$loverdesc[lover_number]>> says that he thinks your clothing quality is way too high and he likes girls that where clothing that is <<$clotQualPrefTmp>>."'
-			elseif haraklover[lover_number] = 0:
-				loverrelation[lover_number] -= 2 
-				$meetQualPref = '<<$loverdesc[lover_number]>> says that he thinks your clothing quality is way too high and he likes girls that where clothing that is <<$clotQualPrefTmp>>."'
-			end	
-		elseif PCloQuality < 4:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 2
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear expensive clothing."'
-			elseif haraklover[lover_number] = 0:
-				loverrelation[lover_number] += 1
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear expensive clothing."'
-			elseif haraklover[lover_number] = 0:
-				loverrelation[lover_number] += 3 
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear expensive clothing."'
-			end	
-		end
-	elseif clotQualPrefTmp = 2: 
-		if PCloQuality < 5: 
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 2
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he likes girls that wear <<clotQualPrefTmp>> clothing, and anything else just doesnt look good."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he likes girls that wear <<clotQualPrefTmp>> clothing, and anything else is trash."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he likes girls that wear <<clotQualPrefTmp>> clothing, and anything else is crap."'
-			end	
-		elseif PCloQuality > 4:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 2
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear cheap clothing."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear cheap clothing."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetQualPref = '<<$loverdesc[lover_number]>> says he loves the quality of your clothes and he is glad you don''t wear cheap clothing."'
-			end	
-		end
-	end
-	if clotQualPrefTmp ! 0:
-		'<<$meetQualPref>>'
-	end
-
-end
-if $ARGS[0] = 'clotTopPrefTmp':
-	if clotTopPrefTmp = 1:
-		if PCloTopCut > clotTopMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> says shyly that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you kind of have to much for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is way to much."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
-			end	
-		else
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> says with a blush he likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says hes glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes that you wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
-			end					
-		end
-	elseif clotTopPrefTmp = 2:
-		if PCloTopCut < clotTopMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says shyly that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to little for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and yours is way to little."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
-			end	
-		elseif PCloTopCut > clotTopMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says slightly embarressed that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to much for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and your''s is way to much."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
-			end	
-		else
-				if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> says with a blush he likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says hes glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes that you wear clothes with <<$clotTopPrefTmp>> cleavage."'
-			end	
-		end
-	elseif clotTopPrefTmp = 3:
-		if PCloTopCut < clotTopMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says shyly that he likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to little for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and yours is way to little."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
-			end	
-		else
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> says with a blush he likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says hes glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says he likes that you wear clothes with <<$clotTopPrefTmp>> cleavage, and it makes your breats look great."'
-			end	
-		end
-	end
-	if clotTopPrefTmp ! 0:
-		'<<$meetTopPref>>'
-	end
-end
-if $ARGS[0] = 'bottShorPrefTmp':
-	if bottShorPrefTmp = 1:
-		if PCloSkirt > bottShorMax or PCloPants > bottShorMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too much for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look lewd."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a slut."'
-			end	
-		else
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says that he likes that you are wearing clothes with only <<$bottShorPrefTmp>> bottoms."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says hes glad you wear clothes with only <<$bottShorPrefTmp>> bottoms."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says he likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, and anything else is trash."'
-			end					
-		end
-	
-	elseif bottShorPrefTmp = 2:
-		if (PCloSkirt < bottShorMin + PCloPants < bottShorMin) = 1:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of have too long of clothing for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look prudish."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a prude."'
-			end	
-		elseif PCloSkirt > bottShorMax or PCloPants > bottShorMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too much for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look lewd."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a slut."'
-			end	
-		else
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length, blushing, and says that he likes that you are wearing clothes with <<$bottShorPrefTmp>> bottoms."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says hes glad you wear clothes with <<$bottShorPrefTmp>> bottoms."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says he likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, and anything else is trash."'
-			end					
-		end
-	elseif bottShorPrefTmp = 3:
-		if (PCloSkirt < bottShorMin + PCloPants < bottShorMin) = 1:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says shyly that he likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too little for his taste."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look prudish."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says he likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a prude."'
-			end	
-		else
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says with a blush he likes that you are wearing clothes with <<$bottShorPrefTmp>> bottoms, and that he thinks the length looks great on you."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says hes glad you wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a seductress."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says he likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, it makes you look sexy."'
-			end	
-		end
-	end
-	if bottShorPrefTmp ! 0:
-		'<<$meetBottPref>>'
-	end
-
-end
-if $ARGS[0] = 'clotThinPrefTmp':
-	if clotThinPrefTmp = 1:
-		if PCloThinness > clotThinMax: 
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 2
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and looking down he mumbles that it makes you look like a slut."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and that it makes you look like a slut."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and only whores where clothes that thin."'
-			end	
-		elseif PCloThinness <= clotThinMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
-			end	
-		end
-	elseif clotThinPrefTmp = 2: 
-		if PCloThinness > clotThinMax: 
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 2
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and looking down he mumbles that it makes you look like a slut."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and that it makes you look like a slut."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and only whores where clothes that thin."'
-			end	
-		elseif PCloThinness < clotThinMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 2
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and looking down he mumbles that it makes you look like a prude."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and that it makes you look like a prude."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and only prude where clothes that thick."'
-			end	
-		elseif PCloThinness >= clotThinMin and PCloThinness <= clotThinMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is just right, not too thick and not to thin."'
-			end	
-		end
-	elseif clotThinPrefTmp = 3:
-		if PCloThinness < clotThinMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 2
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and looking down he mumbles that it makes you look like a prude."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and that it makes you look like a prude."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and only prude where clothes that thick."'
-			end	
-		elseif PCloThinness >= clotThinMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is perfect, and he says shyly he likes to look at your body''s curves."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is perfect, and he loves to see every curve of your body."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that he thinks your outfit''s thinness is perfect, and his eyes take in the curves of your body."'
-			end	
-		end
-	end
-	if clotThinPrefTmp ! 0:
-		'<<$meetClotThin>>'
-	end
-end
-if $ARGS[0] = 'bimbPrefTmp':
-	if bimbPrefTmp = 1:
-		if PCloBimbo > 0:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you blushing that he likes that you look like a bimbo."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you that your bimbo clothes look amazing on you."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 2 
-				$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you that he thinks all girls should dress up as much as a bimbo as you are."'
-			end	
-		elseif PCloBimbo = 0:
-			loverrelation[lover_number] -= 1
-			$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> says you would look much better dressed up as a bimbo."'
-		end
-	end
-	if bimbPrefTmp ! 0:
-		'<<$meetbimbPrefTmp>>'
-	end
-
-end
-if $ARGS[0] = 'pierPrefTmp':
-	if pierPrefTmp = 1:
-		if pierWearCount > pierPrefTmpMax:
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> sees your piercings and tells you that you have to many piercings and anything more then <<pierPrefTmpMax>> is too much.'
-		else
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad to see you wear very few piercings."'
-		end
-	elseif pierPrefTmp = 2:
-		if pierWearCount < pierPrefTmpMin:
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of piercings and says a woman should at least have <<pierPrefTmpMin>> piercings.'
-		elseif pierWearCount > pierPrefTmpMax:
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your many piercings and says a woman should at most <<pierPrefTmpMax>> piercings.'
-		else
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad you wear a few piercings, stating makes any girl look good.'
-		end
-	elseif pierPrefTmp = 3:
-		if pierWearCount < pierPrefTmpMin:
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of piercings and says a woman should at least have <<pierPrefTmpMin>> piercings.'
-		else
-			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad you wear many piercings, stating makes any girl look good.'
-		end
-	end
-	if pierPrefTmp ! 0:
-		'<<$meetpierPrefTmp>>'
-	end
-
-end
-if $ARGS[0] = 'tattPrefTmp':
-	if tattPrefTmp = 1:
-		if TattCount > tattPrefTmpMax:
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> sees your tattoos and tells you that you have to many tattoos and anything more then <<tattPrefTmpMax>> is too much.'
-		else
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad to see you have very few tattoos."'
-		end
-	elseif tattPrefTmp = 2:
-		if TattCount < tattPrefTmpMin:
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of tattoos and says a woman should at least have <<tattPrefTmpMin>> tattoos.'
-		elseif TattCount > tattPrefTmpMax:
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your many tattoos and says a woman should at most <<tattPrefTmpMax>> tattoos.'
-		else
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad you have a few tattoos, stating makes any girl look good.'
-		end
-	elseif tattPrefTmp = 3:
-		if TattCount < tattPrefTmpMin:
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of tattoos and says a woman should at least have <<tattPrefTmpMin>> tattoos.'
-		else
-			$meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad you have many tattoos, stating makes any girl look good.'
-		end
-	end
-	if tattPrefTmp ! 0:
-		'<<$meettattPrefTmp>>'
-	end
-
-end
-if $ARGS[0] = 'lipsPrefTmp':
-	!!This is to find out how big they want your lips.
-	!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
-	if lipsPrefTmp = 1:
-		if pcs_lip > lipsPrefTmpMax:
-			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a quick comment on how he hates the size of your lips, for him it''s way too big.'
-		elseif pcs_lip <= lipsPrefTmpMin:
-			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a comment on how he likes that your lips aren''t outragously huge.'
-		end
-	elseif lipsPrefTmp = 2:
-		if pcs_lip < lipsPrefTmpMin:
-			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a quick comment on how he hates the size of your lips, for him they are not big enough.'
-		elseif pcs_lip >= lipsPrefTmpMin:
-			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a comment on how he likes that your lips are huge.'
-		end
-	end
-	if lipsPrefTmp ! 0:
-		'<<$meetlipsPrefTmp>>'
-	end
-end
-
-if $ARGS[0] = 'makePrefTmp':
-	if pcs_makeup ! 0 and makePrefTmp ! 0:
-		if haraklover[lover_number] = 0:
-
-			if pcs_hairbsh = 0:
-				loverrelation[lover_number] -= 1
-				$meetMake = '<<$loverdesc[lover_number]>> says timidly "I guess you had to leave in a hurry huh?"'
-			elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
-				loverrelation[lover_number] -= 1
-				$meetMake = '<<$loverdesc[lover_number]>> says timidly "I don''t mean to be pushy, but I think girls should wear <<$makePrefTmp>>."'
-			elseif pcs_makeup = makePrefTmp + 1:
-				loverrelation[lover_number] += 1
-				$meetMake = '<<$loverdesc[lover_number]>> looks at your face and says, "I love the way you did your makeup."'
-			end
-		elseif haraklover[lover_number] = 1:
-			if pcs_hairbsh = 0:
-				loverrelation[lover_number] -= 1
-				$meetMake = '<<$loverdesc[lover_number]>> says questionly, "I guess you had to leave in a hurry?"'
-			elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
-				loverrelation[lover_number] -= 1
-				$meetMake = '<<$loverdesc[lover_number]>> looks at your makeup and says, "I don''t mean to be rude, but I really like it when girls wear <<$makePrefTmp>>."'
-			elseif pcs_makeup = makePrefTmp + 1:
-				loverrelation[lover_number] += 1
-				$meetMake = '<<$loverdesc[lover_number]>> looks at your face and says, "I love the way you did your makeup. It makes you look beautiful."'
-			else
-				$meetMake = '<<$loverdesc[lover_number]>> says sweetly, "It seems any way you do your makeup is beautiful."'
-			end
-		elseif haraklover[lover_number] = 2:
-			if pcs_hairbsh = 0:
-				loverrelation[lover_number] -= 1
-				$meetMake = '<<$loverdesc[lover_number]>> says rudely, "Couldn''t take the time to brush your hair?"'
-			elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
-				loverrelation[lover_number] -= 1
-				$meetMake = '<<$loverdesc[lover_number]>> says rather crudely," You should wear <<$makePrefTmp>> <<$pcs_nickname>>. Anything else and it makes you look ugly."'
-			elseif pcs_makeup = makePrefTmp + 1:
-				loverrelation[lover_number] += 1
-				$meetMake = '<<$loverdesc[lover_number]>> says with a smile, "Now THATS how a woman should do their makeup, it looks sexy on you!"'
-			else
-				$meetMake = '<<$loverdesc[lover_number]>> says, "It seems any way you do your makeup is beautiful."'
-			end
-		end
-		if makePrefTmp ! 0:
-			'<<$meetMake>>'
-		end
-	elseif pcs_makeup = 0:
-		if haraklover[lover_number] = 0:
-
-			loverrelation[lover_number] -= 1
-			$meetMake = '<<$loverdesc[lover_number]>> looks at you and nerviously says, "Your makeup is running."'
-		elseif haraklover[lover_number] = 1:
-			loverrelation[lover_number] -= 1
-			$meetMake = '<<$loverdesc[lover_number]>> says in a disapproving tone, "Your makeup is running."'
-		elseif haraklover[lover_number] = 2:
-			loverrelation[lover_number] -= 1
-			$meetMake = '<<$loverdesc[lover_number]>> says in a rude tone, "Your makeup is running."'
-		else
-			loverrelation[lover_number] -= 1
-			$meetMake = '"Um, your makeup is running."'
-		end
-		'<<$meetMake>>'
-	end
-end
-if $ARGS[0] = 'hairPref':
-	if pcs_haircol ! hairPref and hairPref ! 4:
-		if haraklover[lover_number] = 0:
-
-			loverrelation[lover_number] -= 1
-			$meetHair = '<<$loverdesc[lover_number]>> says timidly "I don''t mean to judge you, but I kind of like girls with <<$hairPref>> hair."'
-		elseif haraklover[lover_number] = 1:
-			loverrelation[lover_number] -= 1
-			$meetHair = '<<$loverdesc[lover_number]>> says to you curtly, "I am your boyfriend and all, but girls with <<$pcs_haircol>> hair just doesn''t do it for me. I like girls with <<$hairPref>> hair."'
-		elseif haraklover[lover_number] = 2:
-			loverrelation[lover_number] -= 1
-			$meetHair = '<<$loverdesc[lover_number]>> says with a candor tone, "You don''t look good at all with <<$pcs_haircol>> hair, but girls with <<$hairPref>> hair look amazing."'
-		end
-	elseif pcs_haircol = hairPref:
-		if haraklover[lover_number] = 0:
-
-			loverrelation[lover_number] += 1
-			$meetHair = '<<$loverdesc[lover_number]>> says sweetly "I love the color of your hair <<$pcs_nickname>>, it likes pretty on you."'
-		elseif haraklover[lover_number] = 1:
-			loverrelation[lover_number] += 1
-			$meetHair = '<<$loverdesc[lover_number]>> says, "I think you look amazing with <<$pcs_haircol>> hair. I love girls that have <<$pcs_haircol>> hair."'
-		elseif haraklover[lover_number] = 2:
-			loverrelation[lover_number] += 1
-			$meetHair = '<<$loverdesc[lover_number]>> says smiling, "I can''t even begin to tell you <<$pcs_nickname>> how amazing you look with <<$pcs_haircol>> hair."'
-		end
-	end
-	if hairPref ! 4:
-		'<<$meetHair>>'
-	end
-
-end
-if $ARGS[0] = 'IQPrefTmp':
-
-
-end
-if $ARGS[0] = 'titBoy':
-	if titBoy = 0: 
-		if tits > titMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> tells you shyly, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> tells you cafefully, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> tells you bluntly, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>.'
-			end
-		elseif tits <= titMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> tells you slightly embarrassed, "Um <<$giveNick>>, your breasts make you look amazing."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> says to you, "Hey <<$giveNick>>, want you to know, your breasts make you look amazing."'
-			elseif haraklover[lover_number] = 2:
-					loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> says to you, "Hey <<$giveNick>>, want you to know, your breasts make you look amazing."'
-			end
-		
-		end
-	elseif titBoy = 1:
-		if tits < titMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> tells you shyly, "Hey <<$giveNick>>, you look beautiful, but I like girls with <<$titBoy>>, and yours are just to small."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> cafefully says to you, "Hey <<$giveNick>>, you look beautiful, but girls shouldn''t have a flat chest. I like girls with <<$titBoy>>.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> bluntly says, "Hey <<$giveNick>>, you look beautiful, but your small breasts make you look like a dude. I like girls with <<$titBoy>>.'
-			end
-		elseif tits > titMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> says to you, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours are way to big.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> says to you, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours are way to big.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> says, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours make you look like a cow.'
-			end
-		elseif tits >= titMin and tits <= titMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> tells you slightly embarrassed, "H-Hey <<$giveNick>>, your breasts are beautiful."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> says to you, " Have I ever told you <<$giveNick>> that your breasts are beautiful?"'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> says to you, " You know your breasts look amazing, right <<$giveNick>>?"'
-			end
-		end
-	elseif titBoy = 2:
-		if tits < titMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> says quietly, "Hey <<$giveNick>>, I don''t mean to be mean, but I like girls with <<$titBoy>>, and yours are just to small."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> says with a very calm voice, "Hey <<$giveNick>>, I don''t mean to be an ass, but I like girls with <<$titBoy>>, and yours are just not big enough for my liking."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetTits = '<<$loverdesc[lover_number]>> says crudely, "Hey <<$giveNick>>, girls should have a nice big rack, and your chest does''t even come close."'
-			end
-		elseif tits >= titMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> tells you in slightly embarrassed voice, "H-Hey <<$giveNick>>, I think you look amazing with <<$titBoy>>."'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> tells you, "Oh <<$giveNick>>, I think you look amazing with <<$titBoy>>."'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 1 
-				$meetTits = '<<$loverdesc[lover_number]>> tells you, "Oh <<$giveNick>>, I love girls with <<$titBoy>>."'
-			end
-		
-		end
-	end
-	'<<$meetTits>>'
-end
-
-
-if $ARGS[0] = 'figPref':
-	if figurBoy = 0:
-		if salocatnow > figurePrefMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is skinny, and you are kind of chunky.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is thin, and you are not at all.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is slender, and your weight makes you look ugly.'
-			end
-		elseif salocatnow <= figurePrefMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> tells you he loves your slim figure.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your slim figure proves that slenderness is sexy.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your slim body makes you look like a goddess.'
-			end
-		end
-	elseif figurBoy = 1:
-		if salocatnow > figurePrefMax:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> tells you that you are to overweight, and he prefers a woman a bit skinnier.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your weight is unappealing and he prefers a woman that is slimmer.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> crudely says you look fat and you should lose some weight.'
-			end
-		elseif salocatnow < figurePrefMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> quietly says you could do to gain a few pounds.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says you should eat more, because your body is too thin.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says you look anarexic.'
-			end
-		else
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your figure is perfect in his eyes.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says he loves how you are not too skinny or fat.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your body looks amazing.'
-			end
-		end
-		
-	elseif figurBoy = 2:
-		
-		if salocatnow < figurePrefMin:
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says he prefers a woman that is thicker, and you are too slim.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says he thinks a woman''s figure should be on the thick side, and your body is too skinny.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] -= 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> crudely tells you he prefers a woman that is thick, and you look anerexic.'
-			end
-		elseif salocatnow >= figurePrefMin:
-			!!Yeah, yeah I made it overlap, a preference that you can change if you want.
-			if haraklover[lover_number] = 0:
-
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> tells you he loves your thick figure.'
-			elseif haraklover[lover_number] = 1:
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your curvy figure proves that women should have curves.'
-			elseif haraklover[lover_number] = 2:
-				loverrelation[lover_number] += 1
-				$meetFigurPref = '<<$loverdesc[lover_number]>> says your curvy body makes you look like a goddess.'
-			end
-		end
-	end
-	if figurBoy ! 3:
-		'<<$meetFigurPref>>'
-	end
-	
-	
-end
-
-if $ARGS[0] = 'clothesPref':
-	gs 'boy_likes', 'clotTypePrefTmp'
-	gs 'boy_likes', 'clotQualPrefTmp'
-	gs 'boy_likes', 'clotTopPrefTmp'
-	gs 'boy_likes', 'bottShorPrefTmp'
-	gs 'boy_likes', 'clotThinPrefTmp'
-	gs 'boy_likes', 'bimbPrefTmp'
-end
-
-if $ARGS[0] = 'facePref':
-	gs 'boy_likes', 'makePrefTmp'
-	gs 'boy_likes', 'hairPref'
-end
-
-if $ARGS[0] = 'bodyPrefTmp':
-	gs 'boy_likes', 'figPref'
-	gs 'boy_likes', 'pierPrefTmp'
-	gs 'boy_likes', 'tattPrefTmp'
-	gs 'boy_likes', 'titBoy'
-	gs 'boy_likes', 'lipsPrefTmp'
-end
-
-if $ARGS[0] = 'allPref':
-	gs 'boy_likes', 'makePrefTmp'
-	gs 'boy_likes', 'hairPref'
-	gs 'boy_likes', 'lipsPrefTmp'
-	gs 'boy_likes', 'clotTypePrefTmp'
-	gs 'boy_likes', 'clotQualPrefTmp'
-	gs 'boy_likes', 'clotTopPrefTmp'
-	gs 'boy_likes', 'bottShorPrefTmp'
-	gs 'boy_likes', 'clotThinPrefTmp'
-	gs 'boy_likes', 'bimbPrefTmp'
-	gs 'boy_likes', 'figPref'
-	gs 'boy_likes', 'pierPrefTmp'
-	gs 'boy_likes', 'tattPrefTmp'
-	gs 'boy_likes', 'titBoy'
-end
-
-if $ARGS[0] = 'checkPier':
-	pierWearCount = 0
-	if pirsA > 0 and pirsA < 1000:
-		pierWearCount += 1
-	end
-	if pirsB > 0 and pirsB < 1000:
-		pierWearCount += 1
-	end
-	if pirsC > 0 and pirsC < 1000:
-		pierWearCount += 1
-	end
-	if pirsD > 0 and pirsD < 1000:
-		pierWearCount += 1
-	end
-	if pirsE > 0 and pirsE < 1000:
-		pierWearCount += 1
-	end
-	if pirsF > 0 and pirsF < 1000:
-		pierWearCount += 1
-	end
-	if pirsG > 0 and pirsG < 1000:
-		pierWearCount += 1
-	end
-	if pirsN > 0 and pirsN < 1000:
-		pierWearCount += 1
-	end
-
-end
-
-
-
-if $ARGS[0] = 'compliance':
-	if loverscompliance[lover_number] >= 0 and loverscompliance[lover_number] < 2:
-		'You are a bit frustrated that he doesn''t like you for who you are.'
-	elseif loverscompliance[lover_number] < 3:
-		pcs_horny += 3
-		'You have done this at a couple of times and you feel... Strange thinking about how you are changing to suit his wants.'
-	elseif loverscompliance[lover_number] < 4:
-		pcs_horny += 5
-		'You can''t understand why you feel tingly about changing into his dream girl...'
-	elseif loverscompliance[lover_number] < 5:
-		pcs_horny += 7
-		'Your mind briefly fantasizes about turning more and more into his ideal girl...'
-	elseif loverscompliance[lover_number] < 6:
-		pcs_horny += 8
-		'You think to yourself, "He is my boyfriend, I guess it would make sense to try to be the best girl I can be for him..."'
-	elseif loverscompliance[lover_number] < 7:
-		pcs_horny += 10
-		'You feel from the amount of times you have changed for him you would do anything to become his ideal girlfriend.'
-	end
-
-end
-
-if $ARGS[0] = 'changeHair':
-	'As you arrive at the salon with <<$loverdesc[lover_number]>>, he heads over to the counter and tells something to the barber. The barber nods and comes towards you.' 
-	'"So Ms.<<$pcs_lastname>>, you want to get your hair dyed <<$hairPref>> now is that right?"'
-	act 'Nod':		
-		cla 
-		'Knowing there is no way to back out of this now, you meekly nod.'	
-		'"Alrighty then, your hair will be <<$hairPref>> before you know it!"'
-		act 'Take a seat':
-			cla 
-			if pcs_haircol ! hairPref: pcs_haircol = hairPref
-				dyefade = rand(35,42)
-				collength = pcs_hairlng
-			minut += 20
-			'In less then 20 minutes you see that your hair''s original color has been changed to <<$hairPref>>.'
-			act 'Get up from chair and go to your boyfriend.':
-				cla 
-				'You walk towards your boyfriend with your new <<$hairPref>> hair and he tells you that you look amazing.'
-				'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-				'You then leave the salon and head home.'
-				loverscompliance[lover_number] += 1
-				act 'Continue': dynamic $go_home
-			exit
-			end
-			
-		end
-	end
-end
-if $ARGS[0] = 'changeMake':
-	'After you agree to change your makeup routine for him, you talk a bit with him for an hour and then head home.'
-	'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-	minut += 60
-	if makeupSetting ! makePrefTmp: makeupSetting = makePrefTmp
-	loverscompliance[lover_number] += 1
-	act 'Continue': dynamic $go_home
-exit
-end
-
-if $ARGS[0] = 'changePier':
-	'Since you agreed to adjust your piercings to fit your boyfriend''s preferences he looks at any pre existing piercings you may have.'
-	if pierWearCount < pierPrefTmpMin and pierCount >= pierPrefTmpMin:
-		'<<$loverdesc[lover_number]>> sees that you have enough piercings already, and that you just need to wear them.'
-		act 'Let him add piercings':
-			cla
-			'He pulls out a couple of piercings starts to put them on you.'
-			if pirsA = 1000 and pierWearCount < pierPrefTmpMin:
-				'He asks you to stick out your tongue, then inserts a barbell into your tongue.'
-				pirsA = 1
-				pierWearCount += 1
-			end
-			if pirsB = 1000 and pierWearCount < pierPrefTmpMin:
-				'He gently holds your lip, then inserts a ring.'
-				pirsB = 1
-				pierWearCount += 1
-			end
-			if pirsC = 1000 and pierWearCount < pierPrefTmpMin:
-				'He sees you do not have earrings and proceeds to put rings onto your ears. '
-				pirsC = 1
-				pierWearCount += 1
-			end
-			if pirsD = 1000 and pierWearCount < pierPrefTmpMin:
-				'He takes out a ring and then carefully inserts a ring through your nose.'
-				pirsD = 1
-				pierWearCount += 1
-			end
-			if pirsE = 1000 and pierWearCount < pierPrefTmpMin:
-				'<<$loverdesc[lover_number]>> moves to your eyebrow and proceeds to insert a barbell.'
-				pirsE = 1
-				pierWearCount += 1
-			end
-			if pirsN = 1000 and pierWearCount < pierPrefTmpMin:
-				'He takes out a barbell and inserts it into your navel.'
-				pcs_horny += 2
-				pirsN = 1
-				pierWearCount += 1
-			end
-			if pirsF = 1000 and pierWearCount < pierPrefTmpMin:
-				'<<$loverdesc[lover_number]>> looks around, then pulls out a couple of nipple rings. You can tell it slightly turns him on as works his way up your shirt to put on the nipple rings.'
-				pcs_horny += 5
-				pirsF = 1
-				pierWearCount += 1
-			end
-			if pirsG = 1000 and pierWearCount < pierPrefTmpMin:
-				'<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non chalontely slides his hand down to your labia, and inserts a ring.'
-				'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
-				pcs_horny += 7
-				pirsG = 1
-				pierWearCount += 1
-			end
-			act '"All done!" <<$loverdesc[lover_number]>> says.':
-				cla
-				gs'stat'
-				'You look at your body and examine it.'
-				if pierPrefTmp = 1:
-					'This should not fire off how did he want to add stuff to nothing?'
-				elseif pierPrefTmp = 2:
-					'You can tell he likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
-				elseif pierPrefTmp = 3:
-					'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
-				end
-				if haraklover[lover_number] = 0:
-
-					'You can see he loves how many piercings you have, as he has a slight blush on his face.'
-				elseif haraklover[lover_number] = 1:
-
-					'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
-				elseif haraklover[lover_number] = 2:
-
-					'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
-				end
-				act 'Continue':
-					cla
-					'After this you guys talk for an hour about various things, before he gets up and says he has to go.'
-					'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-					loverscompliance[lover_number] += 1
-					minut += 60
-					act 'Continue': dynamic $go_home
-					exit
-				end
-			end
-		end
-	
-	elseif pierWearCount > pierPrefTmpMax:
-		'<<$loverdesc[lover_number]>> says that you just need to remove the ones that you have and you will look amazing.'
-		act 'Let him remove some piercings.':
-			cla
-			if pirsN > 0 and pirsN < 1000 and pierWearCount < pierPrefTmpMin:
-				'He takes the barbell out of your navel.'
-				pcs_horny += 2
-				pirsN = 1000
-				pierWearCount -= 1
-			end
-			if pirsE > 0 and pirsE < 1000 and pierWearCount > pierPrefTmpMax:
-				'<<$loverdesc[lover_number]>> He sees the piercing in your eyebrow and proceeds to remove it.'
-				pirsE = 1000
-				pierWearCount -= 1
-			end
-			if pirsB > 0 and pirsB < 1000 and pierWearCount > pierPrefTmpMax:
-				'He carefully takes the ring out of your lips.'
-				pirsB = 1000
-				pierWearCount -= 1
-			end
-			if pirsF > 0 and pirsF < 1000 and pierWearCount > pierPrefTmpMax:
-				'<<$loverdesc[lover_number]>> looks around, then carefully uses his hands to take the nipple rings off your breasts.'
-				pcs_horny += 5
-				pirsF = 1000
-				pierWearCount -= 1
-			end
-			if pirsD > 0 and pirsD < 1000 and pierWearCount > pierPrefTmpMax:
-				'He sees the nose ring that you are wearing and removes it.'
-				pirsD = 1000
-				pierWearCount -= 1
-			end
-			if pirsG > 0 and pirsG < 1000 and pierWearCount > pierPrefTmpMax:
-				'<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non chalontely slides his hand down to your labia, and removes the ring there.'
-				'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
-				pcs_horny += 7
-				pirsG = 1000
-				pierWearCount -= 1
-			end
-			if pirsA > 0 and pirsA < 1000 and pierWearCount > pierPrefTmpMax:
-				'He asks you to stick out your tongue, then removes the barbell in your tongue.'
-				pirsA = 1000
-				pierWearCount -= 1
-			end
-
-			if pirsC > 0 and pirsC < 1000 and pierWearCount > pierPrefTmpMax:
-				'He sees your earrings and quickly takes them off.'
-				pirsC = 1000
-				pierWearCount -= 1
-			end
-			act '"All done!" <<$loverdesc[lover_number]>> says.':
-				cla
-				minut += 60
-				gs'stat'
-				'<<$loverdesc[lover_number]>> says "All done!" and promptly hands you the piercings he took off.'
-				'After this you guys talk for an hour about various things, before he gets up and says he has to go.'
-				'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-				loverscompliance[lover_number] += 1
-				act 'Continue': dynamic $go_home
-				exit
-			end
-		end
-	elseif pierWearCount < pierPrefTmpMin and pierCount < pierPrefTmpMin:
-		'<<$loverdesc[lover_number]>> takes you by the hand and heads over to the piercing salon.'
-		act 'Enter the piercing salon':
-			cla
-			'As you both arrive at the salon, he talks real quick to the tattoo artist and piercer.'
-			'You see him hand the artist some money and the artist starts to walk up towards you.'
-			'"Your boyfriend says you want to get some piercings?", the artist asks.'
-			act 'Quietly nod':
-				cla
-				'You know you can''t pull out now, so you meekly nod.'
-				'The man shrugs and says "Head over to the chair over there okay?"'
-				act 'Head over to the chair':
-				cla
-					'As you sit down you see the man come over with the various needles he needs to do his job.'
-					'He sees you are a little bit concerned about the needles and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
-					'He takes out a clean needle and proceeds with his job.'
-					act 'Continue':
-						cls 
-						randchan = rand(0, 7)
-						if randchan = 0 and pirsC = 0:
-							if pirsC = 0 and pierCount < pierPrefTmpMin:
-								'The artist takes a look at your unpierced ears, and with a quick sharp pain, pierces them.'
-								'<center><img <<$set_imgh>> src="images/pc/body/piercings/c.jpg"></center>'
-								pirsC = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'ears', 'pierce'
-							end
-						elseif randchan = 1 and pirsA = 0:
-							if pirsA = 0 and pierCount < pierPrefTmpMin:
-								'He asks you to stick out your tongue. You comply and then start to regret it as he pierces your tongue.'
-								'<center><img <<$set_imgh>> src="images/pc/body/piercings/a.jpg"></center>'
-								pirsA = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'tongue', 'pierce'
-							end
-						elseif randchan = 2 and pirsB = 0:
-							if pirsB = 0 and pierCount < pierPrefTmpMin:
-								'The artist gently holds your lip as he drives the needle through to pierce it.'
-								'<center><img <<$set_imgh>> src="images/pc/body/piercings/b.jpg"></center>'
-								pirsB = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'lips', 'pierce'
-							end
-						elseif randchan = 3 and pirsD = 0:
-							if pirsD = 0 and pierCount < pierPrefTmpMin:
-								'You feel a sharp pain in your nose as he pierces your nose.'
-								'<center><img <<$set_imgh>> src="images/pc/body/piercings/d.jpg"></center>'
-								pirsD = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'nose', 'pierce'
-							end
-						elseif randchan = 4 and pirsE = 0:
-							if pirsE = 0 and pierCount < pierPrefTmpMin:
-								'The artist moves to above your eyes and quickly pierces your eyebrow.'
-								'<center><img <<$set_imgh>> src="images/pc/body/piercings/e.jpg"></center>'
-								pirsE = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'eyebrows', 'pierce'
-							end
-						elseif randchan = 5 and pirsN = 0:
-							if pirsN = 0 and pierCount < pierPrefTmpMin:
-								'He positions himself to pierce your belly button. You feel a sharp pain through your navel as he pierces it.'
-								'<center><img <<$set_imgh>> src="images/pc/body/piercings/n.jpg"></center>'
-								pcs_horny += 2
-								pirsN = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'tummy', 'pierce'
-							end
-						elseif randchan = 6 and pirsF = 0:
-							if pirsF = 0 and pierCount < pierPrefTmpMin:
-								'He motions for you to lift up your shirt. After you do the man grabs your breasts rather softly and carefully pierces each nipple.'
-								!!'<center><img <<$set_imgh>> src="images/pc/body/piercings/f.jpg"></center>'
-								pcs_horny += 5
-								pirsF = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'nipples', 'pierce'
-							end
-						elseif randchan = 7 and pirsG = 0:
-							if pirsG = 0 and pierCount < pierPrefTmpMin:
-								'"Ma ''am can you take off your bottoms?", the man says. You realize that he plans to pierce your labia and you reluctantly present yourself.'
-								'You cover your mouth as you let out a quick "Eep!", as you feel a quick pain through your labia, but in a second, its over.'
-								!!'<center><img <<$set_imgh>> src="images/pc/body/piercings/g.jpg"></center>'
-								pcs_horny += 7
-								pirsG = 1
-								pierCount += 1
-								pierWearCount += 1
-								gs 'pain', 7, 'pubic', 'pierce'
-							end
-						end
-						gs'stat'
-						'"All done!", the artist says as he starts to clean up his various tools. He says to not irritate the places that he pierced and baby them for a week or two.'
-						'Before you leave he puts on the various new piercings throughout your body.'
-						act 'Go back towards your boyfriend':
-							cla
-							'As you go back towards him, he looks you up and down.'
-							if pierWearCount < pierPrefTmpMin and pierCount >= pierPrefTmpMin:
-								'"Now lets just add the rest of the piercings...", <<$loverdesc[lover_number]>> says.'
-								if pirsA = 1000 and pierWearCount < pierPrefTmpMin:
-									'He asks you to stick out your tongue, then inserts a barbell into your tongue.'
-									pirsA = 1
-									pierWearCount += 1
-								end
-								if pirsB = 1000 and pierWearCount < pierPrefTmpMin:
-									'He gently holds your lip, then inserts a ring.'
-									pirsB = 1
-									pierWearCount += 1
-								end
-								if pirsC = 1000 and pierWearCount < pierPrefTmpMin:
-									'He sees you do not have earrings and proceeds to put rings onto your ears. '
-									pirsC = 1
-									pierWearCount += 1
-								end
-								if pirsD = 1000 and pierWearCount < pierPrefTmpMin:
-									'He takes out a ring and then carefully inserts a ring through your nose.'
-									pirsD = 1
-									pierWearCount += 1
-								end
-								if pirsE = 1000 and pierWearCount < pierPrefTmpMin:
-									'<<$loverdesc[lover_number]>> moves to your eyebrow and proceeds to insert a barbell.'
-									pirsE = 1
-									pierWearCount += 1
-								end
-								if pirsN = 1000 and pierWearCount < pierPrefTmpMin:
-									'He takes out a barbell and inserts it into your navel.'
-									pcs_horny += 2
-									pirsN = 1
-									pierWearCount += 1
-								end
-								if pirsF = 1000 and pierWearCount < pierPrefTmpMin:
-									'<<$loverdesc[lover_number]>> looks around, then pulls out a couple of nipple rings. You can tell it slightly turns him on as works his way up your shirt to put on the nipple rings.'
-									pcs_horny += 5
-									pirsF = 1
-									pierWearCount += 1
-								end
-								if pirsG = 1000 and pierWearCount < pierPrefTmpMin:
-									'<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non-challontely slides his hand down to your labia, and inserts a ring.'
-									'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
-									pcs_horny += 7
-									pirsG = 1
-									pierWearCount += 1
-								end
-								gs'stat'
-								'"There we go!", he says with a smile.'
-								if pierPrefTmp = 2:
-									'You can tell he likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
-								elseif pierPrefTmp = 3:
-									'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
-								end			
-								if haraklover[lover_number] = 0:
-
-									'You can see he loves how many piercings you have, as he has a slight blush on his face.'
-								elseif haraklover[lover_number] = 1:
-
-									'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
-								elseif haraklover[lover_number] = 2:
-
-									'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
-								end
-								act 'Continue':
-									minut += 40
-									cla
-									'After getting the piercings, you both part ways and head home.'
-									'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-									minut += 20
-									act 'Continue': dynamic $go_home
-									exit
-								end							
-							elseif pierWearCount >= pierPrefTmpMin:
-								'"There we go!", he says with a smile.'
-								if pierPrefTmp = 2:
-									'You can tell he likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
-								elseif pierPrefTmp = 3:
-									'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
-								end			
-								if haraklover[lover_number] = 0:
-
-									'You can see he loves how many piercings you have, as he has a slight blush on his face.'
-								elseif haraklover[lover_number] = 1:
-
-									'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
-								elseif haraklover[lover_number] = 2:
-
-									'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
-								end
-								act 'Continue':
-									minut += 40
-									cla
-									'After getting the piercings, you both part ways and head home.'
-									'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-									loverscompliance[lover_number] += 1
-									minut += 20
-									act 'Continue': dynamic $go_home
-									exit
-								end		
-							else
-								'"There we go!", he says with a smile.'
-								if pierPrefTmp > 1: 'You can tell he likes a girl with a more piercings and you can''t help but agree in some aspect, it does make you look a bit sexier.'
-								if haraklover[lover_number] = 0:
-
-									'You can see he is pleased with your piercing, as he has a slight blush on his face.'
-								elseif haraklover[lover_number] = 1:
-
-									'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
-								elseif haraklover[lover_number] = 2:
-
-									'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "You look much better."'
-								end
-								act 'Continue':
-									minut += 40
-									cla
-									'After getting the piercing, you both part ways and head home.'
-									'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-									loverscompliance[lover_number] += 1
-									minut += 20
-									act 'Continue': dynamic $go_home
-									exit
-								end		
-							end
-						end
-					end	
-				end
-			end
-		end
-	else
-		'This should not fire off. NO else if.'
-	end
-end
-if $ARGS[0] = 'changeTatt':
-	!! Arm Slot tatarm4, tatarm
-	!! ass slot tatass21, tatass
-	!! back slot tatback2, tatback
-	!! belly slot tatblly1, tatblly
-	!! Breast Slot tatbrst8, tatbrst
-	!! Chest Slot tatchst1, tatchst
-	!! face slot tatfce1, tatfce
-	!! Foot Slot tatankle5, tatankle
-	!! Leg Slot tatleg2, tatleg
-	!! Lip Slot tatlip1, tatlip
-	!! Neck Slot tatnck12, tatneck
-	!! Pubic Slot tatvag6, tatvag
-	!! Shoulder Slot tatshldr7 ,tatlech
-	!! Side Slot tatside9 ,tatside
-	!! Tramp Slot tatlowbck16 , tatupb
-	!! UnderBreast Slot tatundbreast5 , tatunder
-	!! Wrist Slot tatwrst8 , tatwrist
-	act 'Enter Tattoo Parlor':
-		cla
-		'As you arrive at the tattoo parlor, <<$loverdesc[lover_number]>> looks you up and down to decide what needs to be done about your tattoos.'
-		if tattCount < tattPrefTmpMin:
-			'You need some more tattoos, it would make you look so much better!'
-			'He heads over to the counter and starts talks to the tattoo artist.'
-			'You see him hand the artist some money and the artist starts to walk up towards you.'
-			'"Your boyfriend says you want to get some tattoos?", the artist asks.'
-			act 'Quietly nod':
-				cla
-				'You know you can''t pull out now, so you meekly nod.'
-				'The man shrugs and says "Head over to the chair over there okay?"'
-				act 'Head over to the chair':
-					cls 
-					'As you sit down you see the man come over with the various needles he needs to do his job.'
-					'He sees you are a little bit concerned about the needles and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
-					'He takes out a clean needle and proceeds with his job.'	
-					randchan = rand(0, 17)
-					
-					if randchan = 0 and tatarm = 0:	
-						randchan = rand(1, 82)
-						!!randchan = 4
-						if tatarm = 0 and tattCount < tattPrefTmpMin:
-							tatarm = randchan
-							tattCount += 1
-							'He gives you a tattoo on your arm.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/arms/tatarm<<tatarm>>.jpg"></center>'
-						end
-					elseif randchan = 1 and tatass = 0:
-						randchan = rand(1, 23)
-						!!randchan = 21
-						if tatass = 0 and tattCount < tattPrefTmpMin:
-							tatass = randchan
-							tattCount += 1
-							'He gives you a tattoo on your ass.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/ass/tatass<<tatass>>.jpg"></center>'
-						end
-					elseif randchan = 2 and tatback = 0:
-						randchan = rand(1, 53)
-						!!randchan = 2
-						if tatback = 0 and tattCount < tattPrefTmpMin:
-							tatback = randchan
-							tattCount += 1
-							'He gives you a tattoo on your back.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/back/tatback<<tatback>>.jpg"></center>'
-						end
-					
-					!!
-					elseif randchan = 3 and tatblly = 0:
-						randchan = rand(1, 20)
-						!!randchan = 1
-						if tatblly = 0 and tattCount < tattPrefTmpMin:
-							tatblly = randchan
-							tattCount += 1
-							'He gives you a tattoo on your belly.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/belly/tatblly<<tatblly>>.jpg"></center>'
-						end
-					elseif randchan = 4 and tatbrst = 0:
-						randchan = rand(1, 10)
-						!!randchan = 8
-						if tatbrst = 0 and tattCount < tattPrefTmpMin:
-							tatbrst = randchan
-							tattCount += 1
-							'He gives you a tattoo on your breasts.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/breasts/tatbrst<<tatbrst>>.jpg"></center>'
-						end
-					elseif randchan = 5 and tatchst = 0:
-						randchan = rand(1, 15)
-						!!randchan = 1
-						if tatchst = 0 and tattCount < tattPrefTmpMin:
-							tatchst = randchan
-							tattCount += 1
-							'He gives you a tattoo on your chest.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/chest/tatchst<<tatchst>>.jpg"></center>'
-						end
-					elseif randchan = 6 and tatfce = 0:
-						randchan = rand(1, 8)
-						!!randchan = 1
-						if tatfce = 0 and tattCount < tattPrefTmpMin:
-							tatfce = randchan
-							tattCount += 1
-							'He gives you a tattoo on your face.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/face/tatfce<<tatfce>>.jpg"></center>'
-						end
-					elseif randchan = 7 and tatankle = 0:
-						randchan = rand(1, 25)
-						!!randchan = 5
-						if tatankle = 0 and tattCount < tattPrefTmpMin:
-							tatankle = randchan
-							tattCount += 1
-							'He gives you a tattoo on your ankles.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle<<tatankle>>.jpg"></center>'
-						end
-					elseif randchan = 8 and tatleg = 0:
-						randchan = rand(1, 36)
-						!!randchan = 2
-						if tatleg = 0 and tattCount < tattPrefTmpMin:
-							tatleg = randchan
-							tattCount += 1
-							'He gives you a tattoo on your legs.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/legs/tatleg<<tatleg>>.jpg"></center>'
-						end
-					elseif randchan = 9 and tatlip = 0:
-						randchan = rand(1, 9)
-						!!randchan = 1
-						if tatlip = 0 and tattCount < tattPrefTmpMin:
-							tatlip = randchan
-							tattCount += 1
-							'He gives you a tattoo on your bottom lip.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/lip/tatlip<<tatlip>>.jpg"></center>'
-						end
-					elseif randchan = 10 and tatneck = 0:
-						randchan = rand(1, 28)
-						!!randchan = 12
-						if tatneck = 0 and tattCount < tattPrefTmpMin:
-							tatneck = randchan
-							tattCount += 1
-							'He gives you a tattoo on your neck.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/neck/tatnck<<tatneck>>.jpg"></center>'
-						end
-					elseif randchan = 11 and tatvag = 0:
-						randchan = rand(1, 44)
-						!!randchan = 6
-						if tatvag = 0 and tattCount < tattPrefTmpMin:
-							tatvag = randchan
-							tattCount += 1
-							'He gives you a tattoo above your cunt.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag<<tatvag>>.jpg"></center>'
-						end
-					elseif randchan = 12 and tatlech = 0:
-						randchan = rand(1, 25)
-						!!randchan = 7
-						if tatlech = 0 and tattCount < tattPrefTmpMin:
-							tatlech = randchan
-							tattCount += 1
-							'He gives you a tattoo on your shoulder.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr<<tatlech>>.jpg"></center>'
-						end
-					elseif randchan = 13 and tatside = 0:
-						randchan = rand(1, 18)
-						!!randchan = 9
-						if tatside = 0 and tattCount < tattPrefTmpMin:
-							tatside = randchan
-							tattCount += 1
-							'He gives you a tattoo on your sides.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/side/tatside<<tatside>>.jpg"></center>'
-						end
-					elseif randchan = 14 and tatupb = 0:
-						randchan = rand(1, 30)
-						!!randchan = 16
-						if tatupb = 0 and tattCount < tattPrefTmpMin:
-							tatupb = randchan
-							tattCount += 1
-							'He gives you a tramp stamp.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampStamp/tatlowbck<<tatupb>>.jpg"></center>'
-						end
-					elseif randchan = 15 and tatunder = 0:
-						randchan = rand(1, 22)
-						!!randchan = 5
-						if tatunder = 0 and tattCount < tattPrefTmpMin:
-							tatunder = randchan
-							tattCount += 1
-							'He gives you a tattoo under your breasts.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/underBreast/tatundbreast<<tatunder>>.jpg"></center>'
-						end
-					elseif randchan = 16 and tatwrist = 0:
-						randchan = rand(1, 51)
-						!!randchan = 8
-						if tatwrist = 0 and tattCount < tattPrefTmpMin:
-							tatwrist = randchan
-							tattCount += 1
-							'He gives you a tattoo on your wrists.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/wrists/tatwrst<<tatwrist>>.jpg"></center>'
-						end
-					elseif randchan = 17 and tathand = 0:
-						randchan = rand(1, 9)
-						!!randchan = 8
-						if tathand = 0 and tattCount < tattPrefTmpMin:
-							tathand = randchan
-							tattCount += 1
-							'He gives you a tattoo on your hand.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
-						end
-					end
-
-					gs'stat'
-					'"All done!", the artist smiles as he starts to clean up his various tools."'
-					'"I must say, your body looks amazing with the art on you!"'
-					'You are reluctant to admit it, but having these tattoos feels like they do make you look sexier for some people, though a bit more slutty too.'
-					act 'Go back towards your boyfriend':
-						cls
-						'As you go back towards him, he looks you up and down.'
-						'"There we go!", he says with a smile.'
-						if pierPrefTmp = 2:
-							'You can tell he likes a girl with at least a couple of tattoos, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
-						elseif pierPrefTmp = 3:
-							'With this many tattoos, you look like a punk or scene girl, and you can feel that many people would want to explore you to see if you have any "hidden" gems underneath your clothes.'
-						end			
-						if haraklover[lover_number] = 0:
-
-							'You can see he loves how many tattoos you have, as he has a slight blush on his face.'
-						elseif haraklover[lover_number] = 1:
-
-							'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
-						elseif haraklover[lover_number] = 2:
-
-							'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
-						end
-						act 'Continue':
-							minut += 40
-							cla
-							'After getting the tattoos, you both part ways and head home.'
-							'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-							loverscompliance[lover_number] += 1
-							minut += 20
-							act 'Continue': dynamic $go_home
-							exit
-						end		
-					
-					end
-				end		
-			end
-		elseif tattCount > tattPrefTmpMax:
-			'You need to get rid of some tattoos, it would make you look so much better!'
-			'He heads over to the counter and starts talks to the tattoo artist.'
-			'You see him hand the artist some money and the artist starts to walk up towards you.'
-			'"Your boyfriend says you want to get rid of some tattoos?", the artist asks.'
-			act 'Quietly nod':
-				cla
-				'You know you can''t pull out now, so you meekly nod.'
-				'The man shrugs and says "Head over to the chair over there okay?"'
-				act 'Head over to the chair':
-					cls 
-					'As you sit down you see the man come over with the various needles and lasers he needs to do his job.'
-					'He sees you are a little bit concerned about the laser and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
-					'He takes he turns on the mini laser and proceeds with his job.'	
-					randchan = rand(0, 16)
-					if randchan = 0 and tatarm > 0:	
-						if tattCount > tattPrefTmpMax:
-							tatarm = 0
-							tattCount -= 1
-							'He removes the tattoo on your arm.'
-						
-						end
-					elseif randchan = 1 and tatass > 0:
-						if tattCount > tattPrefTmpMax:
-							tatass = 0
-							tattCount -= 1
-							'He removes the tattoo on your ass.'
-							
-						end
-					elseif randchan = 2 and tatback > 0:
-						if tattCount > tattPrefTmpMax:
-							tatback = 0
-							tattCount -= 1
-							'He removes the tattoo on your back.'
-							
-						end
-					elseif randchan = 3 and tatblly > 0:
-						if tattCount > tattPrefTmpMax:
-							tatblly = 0
-							tattCount -= 1
-							'He removes the tattoo on your belly.'
-							
-						end
-					elseif randchan = 4 and tatbrst > 0:
-						if tattCount > tattPrefTmpMax:
-							tatbrst = 0
-							tattCount -= 1
-							'He removes the tattoo on your breasts.'
-
-						end
-					elseif randchan = 5 and tatchst > 0:
-						if tattCount > tattPrefTmpMax:
-							tatchst = 0
-							tattCount -= 1
-							'He removes the tattoo on your chest.'
-
-						end
-					elseif randchan = 6 and tatfce > 0:
-						if tattCount > tattPrefTmpMax:
-							tatfce = 0
-							tattCount -= 1
-							'He removes the tattoo on your face.'
-
-						end
-					elseif randchan = 7 and tatankle > 0:
-						if tattCount > tattPrefTmpMax:
-							tatankle = 0
-							tattCount -= 1
-							'He removes the tattoo on your ankles.'
-
-						end
-					elseif randchan = 8 and tatleg > 0:
-						if tattCount > tattPrefTmpMax:
-							tatleg = 0
-							tattCount -= 1
-							'He removes the tattoo on your legs.'
-
-						end
-					elseif randchan = 9 and tatlip > 0:
-						if tattCount > tattPrefTmpMax:
-							tatlip = 0
-							tattCount -= 1
-							'He removes the tattoo on your bottom lip.'
-
-						end
-					elseif randchan = 10 and tatneck > 0:
-						if tattCount > tattPrefTmpMax:
-							tatneck = 0
-							tattCount -= 1
-							'He removes the tattoo on your neck.'
-
-						end
-					elseif randchan = 11 and tatvag > 0:
-						if tattCount > tattPrefTmpMax:
-							tatvag = 0
-							tattCount -= 1
-							'He removes the tattoo above your cunt.'
-
-						end
-					elseif randchan = 12 and tatlech > 0:
-						if tattCount > tattPrefTmpMax:
-							tatlech = 0
-							tattCount -= 1
-							'He removes the tattoo on your shoulder.'
-
-						end
-					elseif randchan = 13 and tatside > 0:
-						if tattCount > tattPrefTmpMax:
-							tatside = 0
-							tattCount -= 1
-							'He removes the tattoo on your sides.'
-
-						end
-					elseif randchan = 14 and tatupb > 0:
-						if tattCount > tattPrefTmpMax:
-							tatupb = 0
-							tattCount -= 1
-							'He removes your tramp stamp.'
-
-						end
-					elseif randchan = 15 and tatunder > 0:
-						if tattCount > tattPrefTmpMax:
-							tatunder = 0
-							tattCount -= 1
-							'He removes the tattoo under your breasts.'
-
-						end
-					elseif randchan = 16 and tatwrist > 0:
-						if tattCount > tattPrefTmpMax:
-							tatwrist = 0
-							tattCount -= 1
-							'He removes the tattoo on your wrists.'
-
-						end
-					end
-					gs'stat'
-					'"All done!", the artist says as he starts to clean up his various tools."'
-					'"Me myself, I like a girl with a lot of tattoos, but to each their own." he tells you.'
-					'You are reluctant to admit it, but taking away tattoos does make your skin look much cleaner, and makes people focus more on the figure, and not just the art on it.'
-					act 'Go back towards your boyfriend':
-						cla
-						'As you go back towards him, he looks you up and down.'
-						'"There we go!", he says with a smile.'
-						if tattPrefTmp = 1:
-							'You can tell he hates girls with tattoos and likes them to have as few as possible. You can''t help but agree in some aspect, it does make your body look a bit sexier.'
-						elseif tattPrefTmp = 2:
-							'You can tell that though <<$loverdesc[lover_number]>> likes a girl to have some tattoos, he doesn''t want them to be the focus on a girl. You can''t help but agree that there is a thing as to many tattoos.'
-						end			
-						if haraklover[lover_number] = 0:
-
-							'You can see he loves how many tattoos you have, as he has a slight blush on his face.'
-						elseif haraklover[lover_number] = 1:
-
-							'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
-						elseif haraklover[lover_number] = 2:
-
-							'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
-						end
-						act 'Continue':
-							minut += 40
-							cla
-							'After getting rid of the tattoos, you both part ways and head home.'
-							'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-							loverscompliance[lover_number] += 1
-							minut += 20
-							act 'Continue': dynamic $go_home
-							exit
-						end		
-					end
-				end		
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'changeLips':
-	act 'Enter clinic':
-		'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
-		'<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
-		'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
-		if pcs_lip < lipsPrefTmpMin:
-			'"So that man over there says you want to get lip enhancements?", the doctor asks quizically, looking at the size of your lips.'
-		else
-			'"So that man over there says you want to get a lip reduction?", the doctor asks quizically, looking at the size of your lips.'
-		end
-		'"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
-		'"All right, lets get started right away", he says as he looks at his clipboard.'
-		act 'Go with doctor to operating room':
-			cls
-			'The doctor motions for you to sit on the operating table, and you reluctantly comply.'
-			'"Don''t worry it will just be a quick injection and we will be done, its perfectly safe.", the doctor says.'
-			'As you try to get confortable on the table the doctor comes up to you with the injection.'
-			'"Okay now if you can pucker out your lips it will give me a nice surface for the shot.", he says holding your face gently.'
-			act 'Pucker out lips':
-				cla
-				'"And... Done. There we go! You should feel the effects almost immediately."'
-				'He holds up a mirror and you look at your changed lips.'
-				if pcs_lip < lipsPrefTmpMin:
-					minut += 20
-					pcs_lip = lipsPrefTmpMin + 1
-					gs 'stat'
-					'Your lips have grown! They are whorishly huge!'
-					'You look at the doctor and he shrugs, "You look much nicer with huge lips in my opinion."'
-				else
-					minut += 20
-					pcs_lip = lipsPrefTmpMax - 1
-					'Your lips have shrunk! They look much more modest now.'
-					'You look at the doctor and he shrugs, "You look much nicer with more modest lips in my opinion."'
-				end
-				'You stand up and leave the room.'
-				act 'Go back towards your boyfriend':
-					cla
-					'As you go back towards him, he looks you up and down.'
-					'"There we go!", he says with a smile.'
-					if lipsPrefTmp = 1:
-						'You can tell he loves girls with more modest yet full lips, and you have to admit, its better then having big whorish, cocksucking lips.'
-					elseif lipsPrefTmp = 2:
-						'You can tell that <<$loverdesc[lover_number]>> likes a girl to have whorish, cocksucking lips, and as you give the mirror in the room a quick slutty face, you have to admit it does make you look sexier.'
-					end			
-					if haraklover[lover_number] = 0:
-
-						'You can see he loves the size of your lips, for even with all of his shyness, he still gives you a kiss on your new lips.'
-					elseif haraklover[lover_number] = 1:
-
-						'<<$loverdesc[lover_number]>> gives you one last examination of your new lips before giving you a kiss on the lips, probably to test the new wares.'
-					elseif haraklover[lover_number] = 2:
-
-						'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on your new lips and says, "Now those lips are the lips of a goddess."'
-					end
-					act 'Continue':
-						cla
-						'After improving your lips, you both part ways and head home.'
-						'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-						loverscompliance[lover_number] += 1
-						minut += 20
-						act 'Continue': dynamic $go_home
-						exit
-					end	
-				
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'changeTits':
-	act 'Enter clinic':
-		cla
-		'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
-		'<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
-		if tits < titMin:
-			'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
-			
-			'"So that man over there says you want to get breast implants?", the doctor asks quizically, looking you up and down.'
-			'"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
-			'"All right, lets get started right away, let me see what size he got for you...", he says as he looks at his clipboard.'
-			titAmount = (titMin - tits) * 5 + 9
-			if titAmount <= 10:
-				'"It seems you will be getting our smallest breast implants."'
-				'As you hear this you relax a bit. At least its not a big difference.'
-			elseif titAmount <= 15:
-				'"It seems you will be getting small breast implants." '
-				'As you hear this you shift nervously. At least its not going to be that big of a change.'
-			elseif titAmount <= 20:
-				'"It seems you will be getting medium breast implants."'
-				'Your heart skips a beat, "Those are kind of big.", you think to yourself.'
-			elseif titAmount <= 25:
-				'"It seems you will be getting large breast implants."'
-				'Your heart skips a beat, What? "Those will be huge...", you tell to yourself.'
-			elseif titAmount <= 30:
-				'"It seems you will be getting our largest, the XLarge breast implants." '
-				'What?! You are about to get up and leave but you realize that its to late for that now. "God, those will be MASSIVE", you think to yourself.'
-			else 
-				'This should not shoot off, if you go from 10 to 35 it should fall into preference still.'
-			end
-			'"If you would follow me, I will take you to the operating room.", the doctor says indifferently.'
-			act 'Go with doctor to operating room':
-				cls
-				'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
-				'"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
-				'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
-				'"Okay before I continue I want you to take a deep breath okay?", he says.'
-				act 'Take a deep breath':
-					cla
-					'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
-					*nl
-					*nl
-					*nl
-					act 'Wake up':
-						minut += 120
-						silicone += titAmount
-						gs 'stat'
-						'"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
-						' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
-						' ''My breasts feel fuller...'' '
-						'You grab your breasts as you look down, and you see you have a bigger breasts! Your breasts are now <<$titsize>>s.'
-						'<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
-						'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your boyfriend.'
-						act 'Head over to your boyfriend':
-							cla
-							'As you go back towards him, he looks you up and down.'
-							'"There we go!", he says with a smile.'
-							if titBoy = 0:
-							'If you are getting inplants this should not fire off.'
-							elseif titBoy = 1:
-								'You can tell that <<$loverdesc[lover_number]>> likes a girl with a good rack, thankfully although you look more like a bimbo then before, his tit preference is not outragously big, and you must admit, it does make you look sexier.'
-							elseif titBoy = 2:
-								'<<$loverdesc[lover_number]>> you can clearly tell loves a girl with bimbo-sized tits, as you hold your tits you look at yourself in the mirror. The girl staring back at you looks like a bimbo that doesn''t know where to put her whorish tits. And you have to admit, it does turn you on a little.'
-							end
-							if haraklover[lover_number] = 0:
-
-								'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new breasts.'
-							elseif haraklover[lover_number] = 1:
-
-								'<<$loverdesc[lover_number]>> gives you one last look and gives you a quick kiss on your cheek.'
-							elseif haraklover[lover_number] = 2:
-
-								'<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you look like a bombshell!"'
-							end
-							act 'Continue':
-								minut += 40
-								cla
-								'After getting your new breasts, you both part ways and head home.'
-								'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-								loverscompliance[lover_number] += 1
-								minut += 20
-								act 'Continue': dynamic $go_home
-							end
-							exit
-						end		
-					end
-				end	
-			end
-		elseif tits > titMax:
-			'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
-			
-			'"So that man over there says you want to get breast implants?", the doctor asks quizically, looking you up and down.'
-			'"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
-			'"All right, lets get started right away, he had a set size he wanted so we will be doing that.", he says as he looks at his clipboard.'
-			titAmount = (tits - titMax) * 5 + 9
-			'"If you would follow me, I will take you to the operating room.", the doctor says indifferently.'
-			act 'Go with doctor to operating room':
-				cls
-				'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
-				'"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
-				'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
-				'"Okay before I continue I want you to take a deep breath okay?", he says.'
-				act 'Take a deep breath':
-					cla
-					'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
-					*nl
-					*nl
-					*nl
-					act 'Wake up':
-						cla
-						minut += 120
-						if silicone - titAmount < 0:
-							titExtra = titAmount - silicone
-							silicone = 0
-							nbsize -= titExtra
-						else
-							silicone -= titAmount
-						end
-						gs 'stat'
-						'"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
-						' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
-						' ''My breasts feel lighter...'' '
-						'You grab your breasts as you look down, and you realize you have much smaller breasts! Your breasts are now <<$titsize>>s.'
-						'<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
-						'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your boyfriend.'
-						act 'Head over to your boyfriend':
-							cla
-							'As you go back towards him, he looks you up and down.'
-							'"There we go!", he says with a smile.'
-							if titBoy = 0:
-								'You can tell that <<$loverdesc[lover_number]>> likes a girl without whorish tits, and you can kind of see why as you slowly grope your now tinier breasts.'
-							elseif titBoy = 1:
-								'You can tell that <<$loverdesc[lover_number]>> likes a girl with a good rack, but thankfully not to big, and you admittadly agree with him, as you slowly massage your breasts.'
-							elseif titBoy = 2:
-								'Reducing to max? What?'
-							end
-							if haraklover[lover_number] = 0:
-
-								'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new breasts.'
-							elseif haraklover[lover_number] = 1:
-
-								'<<$loverdesc[lover_number]>> gives you one last look and gives you a quick kiss on your cheek.'
-							elseif haraklover[lover_number] = 2:
-
-								'<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you look like a bombshell!"'
-							end
-							act 'Continue':
-								minut += 40
-								cla
-								'After getting your new breasts, you both part ways and head home.'
-								'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-								loverscompliance[lover_number] += 1
-								minut += 20
-								act 'Continue': dynamic $go_home
-							end
-							exit
-						end		
-					end
-				end	
-			end
-		end
-	end
-end
-
-!!This is a interesting one as it will take in a couple of things, not just clothes preferences. I need to find clothing pictures for most of the types of clothes. Think of these as quest clothes.
-if $ARGS[0] = 'changeClothes':
-!! void code - need future work
-!!	act 'Enter Clothing Shop':
-!!	cla
-!!	if 
-!!	end
-end
-
-!! This should not increase the weight at all, and should only have been called if they weigh over the figurePrefMax
-if $ARGS[0] = 'changeFigure':
-	act 'Enter clinic':
-		cla
-		'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
-		'<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
-		'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
-		'"So you want to get a lyposuction procedure done, is that right?", the doctor asks you.'
-		act 'Meekly nod':
-			cla
-			'You know you can''t back out now. "Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
-			'"All right, lets get started right away, if you can follow me into the operating room.'
-			act 'Go with doctor to operating room':
-				cls
-				'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
-				'"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
-				'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
-				'"Okay before I continue I want you to take a deep breath okay?", he says.'
-				act 'Take a deep breath':
-					cla
-					'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
-					*nl
-					*nl
-					*nl
-					!!'<<salocatnow>> is the value for salocatnow, the value for fat is <<fat>>, and the value for salo is <<salo>>.'
-					act 'Wake up':
-						cla
-						minut += 120
-
-						if figurlover[lover_number] ! 3:
-
-							:loopfatRemover
-								salo = 20 * figurePrefMin + 1
-								if salo < 11: salo = 11
-
-								gs 'body_shape', 'softreset'
-								!!'<<salocatnow>> is the value for salocatnow, the value for fat is <<fat>>, and the value for salo is <<salo>>.'
-								
-							if salocatnow > figurePrefMax:jump 'loopfatRemover'
-						else
-							'This should not fire, I made it so that you can''t ADD weight.'
-						end
-						gs 'stat'
-						!!'The stat for salocatnow is <<salocatnow>> and the stat for figurePrefMax is <<figurPrefMax>>.'
-						'"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
-						' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
-						'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your boyfriend.'
-						act 'Head over to your boyfriend':
-							cls
-							'As you go back towards him, he looks you up and down.'
-							'"There we go!", he says with a smile.'
-							gs 'obj_din', 'body'
-							if figurlover[lover_number] = 0:
-
-								'You can tell that <<$loverdesc[lover_number]>> likes a girl that has very little fat on her whorish tits, and you can kind of see why as you slowly look at yourself in the mirror.'
-							elseif figurBoy = 1:
-								'You can tell that <<$loverdesc[lover_number]>> likes a girl thats not too fat, but thankfully not too skinny, and you admittadly agree with him, as you slowly run your hands over your now smaller curves.'
-							elseif figurBoy = 2:
-								'Reducing to max? What?'
-							end
-							if haraklover[lover_number] = 0:
-
-								'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new figure.'
-							elseif haraklover[lover_number] = 1:
-
-								'<<$loverdesc[lover_number]>> gives your figure one last look and gives you a quick kiss on your cheek.'
-							elseif haraklover[lover_number] = 2:
-
-								'<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you have the body of a bombshell!"'
-							end
-							act 'Continue':
-								cla
-								'After getting a lyposuction treatment, you both part ways and head home.'
-								'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
-								loverscompliance[lover_number] += 1
-								minut += 20
-								act 'Continue': dynamic $go_home
-							end
-							exit
-							
-						end
-					end
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'testLikes':
-	figurlover[lover_number] = 0
-	titlover[lover_number] = 0
-
-
-
-	!!new preferences
-	clotTypePref[lover_number] = 0
-	clotQualPref[lover_number] = 0
-	clotTopPref[lover_number] = 0
-	bottShorPref[lover_number] = 0
-	clotThinPref[lover_number] = 0
-	bimbPref[lover_number] = 0
-	pierPref[lover_number] = 0
-	tattPref[lover_number] = 0
-	lipsPref[lover_number] = 0
-	makePref[lover_number] = 0
-	IQPref[lover_number] = 0
-	haraklover[lover_number] = 0
-	loverfinance[lover_number] = 2
-	'figurlover[lover_number] is <<figurlover[lover_number]>>, titlover[lover_number] is <<titlover[lover_number]>>, clotTypePref[lover_number] is <<clotTypePref[lover_number]>>, clotQualPref[lover_number] is <<clotQualPref[lover_number]>>, clotTopPref[lover_number] is <<clotTopPref[lover_number]>>'
-	'bottShorPref[lover_number] is <<bottShorPref[lover_number]>>, clotThinPref[lover_number] is <<clotThinPref[lover_number]>>, bimbPref[lover_number] is <<bimbPref[lover_number]>>, pierPref[lover_number] is <<pierPref[lover_number]>>, tattPref[lover_number] is <<tattPref[lover_number]>>'
-	'lipsPref[lover_number] is <<lipsPref[lover_number]>>, makePref[lover_number] is <<makePref[lover_number]>>, IQPref[lover_number] is <<IQPref[lover_number]>>, loverscompliance[lover_number] is <<loverscompliance[lover_number]>>.'
-
-end
-
-!!When I test things I like to have a small preference. Don''t mind this, nothing to see here.
-
-if $ARGS[0] = 'bimTest':
-	figurlover[lover_number] = 0
-	titlover[lover_number] = 2
-	hairlover[lover_number] = 3
-
-	clotTypePref[lover_number] = 4
-	clotQualPref[lover_number] = 2
-	clotTopPref[lover_number] = 3
-	bottShorPref[lover_number] = 3
-	clotThinPref[lover_number] = 3
-	bimbPref[lover_number] = 1
-	pierPref[lover_number] = 2
-	tattPref[lover_number] = 1
-	lipsPref[lover_number] = 2
-	makePref[lover_number] = 3
-	IQPref[lover_number] = 0
-	haraklover[lover_number] = 2
-	loverfinance[lover_number] = 2
-
-	boybodyrand = 1
-	loverbodyrand[lover_number] = boybodyrand
-	if loverbodyrand[lover_number] = 1: $boybody = 'tall'
-	$loverbody[lover_number] = $boybody 
-	
-	boybodrand = 2
-	loverbodyrand[lover_number] = boybodrand
-	if boybodrand = 2: $boybod = 'athletic'
-	$loverbod[lover_number] = $boybod
-	izvrat = 1
-	loverizvrat[lover_number] = izvrat
-	
-	'figurlover[lover_number] is <<figurlover[lover_number]>>, titlover[lover_number] is <<titlover[lover_number]>>, clotTypePref[lover_number] is <<clotTypePref[lover_number]>>, clotQualPref[lover_number] is <<clotQualPref[lover_number]>>, clotTopPref[lover_number] is <<clotTopPref[lover_number]>>'
-	'bottShorPref[lover_number] is <<bottShorPref[lover_number]>>, clotThinPref[lover_number] is <<clotThinPref[lover_number]>>, bimbPref[lover_number] is <<bimbPref[lover_number]>>, pierPref[lover_number] is <<pierPref[lover_number]>>, tattPref[lover_number] is <<tattPref[lover_number]>>'
-	'lipsPref[lover_number] is <<lipsPref[lover_number]>>, makePref[lover_number] is <<makePref[lover_number]>>, IQPref[lover_number] is <<IQPref[lover_number]>>, loverscompliance[lover_number] is <<loverscompliance[lover_number]>>.'
-
-
-end
-
-
---- boy_likes ---------------------------------
-

locations/clothing_attributes

@@ -4,7 +4,7 @@
 !! CloCategory: 1 Cheap, 2 Average, 3 Expensive, 4 Formal, 5 Office, 6 School, 7 Exercise, 8 Fetish, 9 Exhibit, 10 Uniform, 11 Coat, 12 Swimwear, 13 Burlesque
 !!		Notes: 1-3 are general purpose clothing, 4-7 are self-explanatory, 8 is fetish wear, latex and leather. 9 is extreme clothing that exposes your body and likely to get you arrested . 10 is waitress, maid and stripper uniforms. 13 is for burlesque shows or a bordello
 !! CloStyle: 1 Girlie, 2 Rebel, 3 Wealthy, 4 Prostitute, 5 is Loose fit
-!!		Notes: 1 is clothing themed to give the impression of innocence of youth. 2 is for stereotypical punks; ripped clothing, leather jackets, etc. 3 gives the impression that theyre debutanttes or rich at first glance. 4 is stuff worn by prostitutes. 5 is formless clothing that doesnt requiring refitting.
+!!		Notes: 1 is clothing themed to give the impression of innocence of youth. 2 is for stereotypical punks; ripped clothing, leather jackets, etc. 3 gives the impression that theyre debutanttes or rich at first glance. 4 is stuff worn by prostitutes. 5 is formless clothing that doesn''t requiring refitting.
 !! CloStyle2: 1 Maid, 2 Server, 3 Stripper
 !!		Notes: Used to distinguish between the main types of uniform.
 !! CloExhibit: 0-100 Exhibitionism value required to wear the outfit

locations/dimaRevenge

@@ -1184,7 +1184,7 @@ if dimaRevChoice = 5:
 								'<center><img src="images/characters/pavlovsk/school/head/50.jpg"></center>'
 								'Miss. Volkov looks at you. "I don''t know what''s on your mind miss <<$pcs_lastname>> but what have you done will have serious consequences...now go"'
 								!!sent to princeipal''s office and earn 20 demerits, afterwards it goes to this scene.
-								!!Office doesnt exist yet according to gschool_grounds.
+								!!Office doesn''t exist yet according to gschool_grounds.
 								act 'Back to class':
 								    *clr
 						            cla

locations/dinSex

@@ -4,9 +4,9 @@
 
 $dinrandbj = {
 	tperbjran = rand(0, 3)
-	if tperbjran = 0:$tperbj = 'Your <<$liptalk>> wraps around <<$xem>> <<dick>> centimeter member'
-	if tperbjran = 1:$tperbj = 'Your <<$liptalk>> clasps <<$xem>> the purple head of the <<dick>> centimeter member'
-	if tperbjran = 2:$tperbj = 'You held your <<$liptalk>> on the head of <<$xem>> <<dick>> centimeter member and pulled it into your mouth'
+	if tperbjran = 0:$tperbj = 'Your <<$liptalk>> wraps around <<$xyr>> <<dick>> centimeter member'
+	if tperbjran = 1:$tperbj = 'Your <<$liptalk>> clasps <<$xyr>> the purple head of the <<dick>> centimeter member'
+	if tperbjran = 2:$tperbj = 'You held your <<$liptalk>> on the head of <<$xyr>> <<dick>> centimeter member and pulled it into your mouth'
 	if tperbjran = 3:$tperbj = 'The <<dick>> centimeter dick rested between your <<$liptalk>>, you opened them slightly and let the dick in your mouth.'
 	if tperbjran = 4:$tperbj = ''   
 	if tperbjran = 5:$tperbj = ''
@@ -30,7 +30,7 @@ $dinrandswallow = {
 	if tperswalrand2 = 1:$tperswal2 = 'Your mouth is filled with cum and began to run down your <<$liptalk2>>'
 	if tperswalrand2 = 2:$tperswal2 = 'Hot seed quickly filled your mouth, making you experience the whole scale and sharp taste of sperm.'
 	tperswalrand3 = rand(0, 2)
-	if tperswalrand3 = 0:$tperswal3 = 'You gulped and swallowed the sperm located in your mouth. The taste of semen stayed in your mouth and you could smell <<$xem>> scent.'
+	if tperswalrand3 = 0:$tperswal3 = 'You gulped and swallowed the sperm located in your mouth. The taste of semen stayed in your mouth and you could smell <<$xyr>> scent.'
 	if tperswalrand3 = 1:$tperswal3 = 'You swallow the warm cum that fills your mouth and lick the remnants of the seed with your <<$liptalk3>>.'
 	if tperswalrand3 = 2:$tperswal3 = 'You swallow the viscous semen that is filling your mouth, and then lick your lips to make sure you don''t leave any drop.'
 	'<<$tperswal>> <<$tperswal2>> <<$tperswal3>>'
@@ -144,10 +144,10 @@ $sexstart = {
 		protect = 1
 		if preziktype = 2:
 			sexcontra = 7
-			'<<$boydesc>> took your sabotaged condom and put it on <<$xem>> <<dick>> centimeter member.'
+			'<<$boydesc>> took your sabotaged condom and put it on <<$xyr>> <<dick>> centimeter member.'
 		else
 			sexcontra = 3
-			'<<$boydesc>> took your condom and put it on <<$xem>> <<dick>> centimeter member.'
+			'<<$boydesc>> took your condom and put it on <<$xyr>> <<dick>> centimeter member.'
 		end
 	else
 		sexcontra = 0
@@ -161,13 +161,13 @@ $sexstart2 = {
 		pcs_horny = 0
 		pcs_mood -= 10
 		pcs_willpwr -= 10
-		'Menstruation blood slowly flows from your vagina while <<$xe>> fucks you. It feels painful and also pleasant. You moan while <<$xem>> <<dick>> centimeter dick fucks your pussy.'
+		'Menstruation blood slowly flows from your vagina while <<$xe>> fucks you. It feels painful and also pleasant. You moan while <<$xyr>> <<dick>> centimeter dick fucks your pussy.'
 	elseif cycle > 0 and pcs_vag > 0:
 		!!No Menstruatsion
 		!!horny - excitement
 		!!pcs_vag - vagina elasticity
 		!!silavag - male skill:0-clumsy, 1-middle, 2-stud
-		!!dick - <<$xem>> penis size
+		!!dick - <<$xyr>> penis size
 		!!orgazm - what kind of orgasm
 		!!0 - very painful, 1 - hurts, 2 - unpleasant, 3 - so-so, 4 - little orgasm, 5 - orgasm, 6- little orgasm
 		smazka = pcs_horny / 10
@@ -266,47 +266,47 @@ $sexstart2 = {
 			pcs_horny = 0
 			pcs_mood -= 15
 			pcs_willpwr -= 15
-			'You groaned in pain when <<$boydesc>> penetrated your pussy. Tears flowed from your eyes and it felt like someone drove a red-hot rod in your vagina. You cry and moan while <<$xem>> strong <<dick>> centimeter dick fucks your pussy.'
+			'You groaned in pain when <<$boydesc>> penetrated your pussy. Tears flowed from your eyes and it felt like someone drove a red-hot rod in your vagina. You cry and moan while <<$xyr>> strong <<dick>> centimeter dick fucks your pussy.'
 		elseif orgazm = 1:
 			if vgape < 2:vgape = 2
 			pcs_horny -= 10
 			pcs_mood -= 10
 			pcs_willpwr -= 10
-			'You bite your lip in pain when <<$boydesc>> entered, it is very painful. You are frowning and moaning in pain while <<$xem>> strong <<dick>> centimeter dick fucks your pussy.'
+			'You bite your lip in pain when <<$boydesc>> entered, it is very painful. You are frowning and moaning in pain while <<$xyr>> strong <<dick>> centimeter dick fucks your pussy.'
 		elseif orgazm = 2:
 			if vgape < 1:vgape = 1
 			pcs_horny -= 5
 			pcs_mood -= 5
 			pcs_willpwr -= 5
-			'You winced at the sudden pain when <<$boydesc>> entered, it hurts but it gradually became quite tolerable. You are trying to get aroused while <<$xem>> <<dick>> centimeter dick fucks your pussy, but you did not succeed.'
+			'You winced at the sudden pain when <<$boydesc>> entered, it hurts but it gradually became quite tolerable. You are trying to get aroused while <<$xyr>> <<dick>> centimeter dick fucks your pussy, but you did not succeed.'
 		elseif orgazm = 3:
 			pcs_mood += 5
 			pcs_willpwr += 5
-			'You are startled by the feeling that your pussy is stretching when <<$boydesc>> entered you. It feels good when <<$xem>> <<dick>> centimeter dick fucks your pussy.'
+			'You are startled by the feeling that your pussy is stretching when <<$boydesc>> entered you. It feels good when <<$xyr>> <<dick>> centimeter dick fucks your pussy.'
 		elseif orgazm = 4:
 			pcs_horny += 10
 			pcs_mood += 10
 			pcs_willpwr += 10
-			'You are startled by the feeling that your pussy is stretching as <<$boydesc>> entered you. It feels good when <<$xem>> strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
+			'You are startled by the feeling that your pussy is stretching as <<$boydesc>> entered you. It feels good when <<$xyr>> strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
 		elseif orgazm = 5:
 			pcs_horny = 0
 			pcs_mood += 15
 			pcs_willpwr += 15
 			orgasm += 1
 			vaginalOrgasm += 1
-			'You flinched from a pleasant feeling when your pussy is stretched by <<$xem>> dick. It feels good when <<$xem>> <<dick>> centimeter dick fucks your pussy.Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling became unbearable and your entire body was covered with hot waves of orgasm, you scream with pleasure.'
+			'You flinched from a pleasant feeling when your pussy is stretched by <<$xyr>> dick. It feels good when <<$xyr>> <<dick>> centimeter dick fucks your pussy.Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling became unbearable and your entire body was covered with hot waves of orgasm, you scream with pleasure.'
 		elseif orgazm = 6:
 			pcs_horny += 5
 			pcs_mood += 5
 			pcs_willpwr += 5
-			'You can feel <<$xem>> penis entering your pussy. This feels nice between your legs , but <<$xem>> <<dick>> cm dick is significantly less than what your pussy needs. This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
+			'You can feel <<$xyr>> penis entering your pussy. This feels nice between your legs , but <<$xyr>> <<dick>> cm dick is significantly less than what your pussy needs. This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
 		end
 		if pcs_vag = 0:
 			pcs_horny = 0
 			pcs_mood -= 15
 			pcs_willpwr -= 15
 			pcs_vag += 1
-			'You were biting your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> entered, breaking your hymen. You moan while crying and <<$xem>> <<dick>> centimeter dick fucks your bloody pussy.'
+			'You were biting your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> entered, breaking your hymen. You moan while crying and <<$xyr>> <<dick>> centimeter dick fucks your bloody pussy.'
 		elseif pcs_vag <= dick:
 			pcs_vag += 1
 		end
@@ -323,7 +323,7 @@ $sexstart3 = {
 		pcs_horny = 0
 		pcs_mood -= 10
 		pcs_willpwr -= 10
-		'You have your period and blood slowly flows from your vagina while you move on <<$xem>> dick. This is giving you painful and pleasants sensations . You moan while <<$xem>> strong <<dick>> centimeter penis fucks you.'
+		'You have your period and blood slowly flows from your vagina while you move on <<$xyr>> dick. This is giving you painful and pleasants sensations . You moan while <<$xyr>> strong <<dick>> centimeter penis fucks you.'
    
 	elseif cycle > 0 and pcs_vag > 0:
 		!!no monthly
@@ -431,7 +431,7 @@ $sexstart3 = {
 			pcs_horny = 0
 			pcs_mood -= 15
 			pcs_willpwr -= 15
-			'You groaned in pain when <<$boydesc>> penetrated your pussy. Tears flowed from your eyes and it felt like someone drove a red-hot rod in your vagina. You cry and moan while <<$xem>> strong <<dick>> centimeter dick fucks your pussy.'
+			'You groaned in pain when <<$boydesc>> penetrated your pussy. Tears flowed from your eyes and it felt like someone drove a red-hot rod in your vagina. You cry and moan while <<$xyr>> strong <<dick>> centimeter dick fucks your pussy.'
 		elseif orgazm = 1:
 			if vgape < 2:vgape = 2
 			pcs_horny -= 10
@@ -444,7 +444,7 @@ $sexstart3 = {
 			pcs_horny -= 5
 			pcs_mood -= 5
 			pcs_willpwr -= 5
-			'You winced at the sudden pain when you felt the penis of <<$boydesc>> entering you.  The pain between your legs gradually dissapeared and it became quite tolerable. You are trying to get aroused while rhythmically moving on <<$xem>> sturdy and strong <<dick>> centimeter dick fucking your pussy, but you do not succeed.'
+			'You winced at the sudden pain when you felt the penis of <<$boydesc>> entering you.  The pain between your legs gradually dissapeared and it became quite tolerable. You are trying to get aroused while rhythmically moving on <<$xyr>> sturdy and strong <<dick>> centimeter dick fucking your pussy, but you do not succeed.'
 		elseif orgazm = 3:
 			pcs_horny += 5
 			pcs_mood += 5
@@ -461,19 +461,19 @@ $sexstart3 = {
 			pcs_willpwr += 15
 			orgasm += 1
 			vaginalOrgasm += 1
-			'You flinched from a pleasant feeling when your pussy is stretched by <<$xem>> dick. Between your legs you are getting a very warm and pleasant feeling when you move up and down on the strong <<dick>> centimeter penis. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling became unbearable and your entire body was covered with hot waves of orgasm. You scream with pleasure.'
+			'You flinched from a pleasant feeling when your pussy is stretched by <<$xyr>> dick. Between your legs you are getting a very warm and pleasant feeling when you move up and down on the strong <<dick>> centimeter penis. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling became unbearable and your entire body was covered with hot waves of orgasm. You scream with pleasure.'
 		elseif orgazm = 6:
 			pcs_horny += 5
 			pcs_mood += 5
 			pcs_willpwr += 5
-			'You can feel <<$xem>> penis entering your pussy. This feels nice between your legs , but <<$xem>> <<dick>> cm dick  is significantly less than what your pussy needs .This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
+			'You can feel <<$xyr>> penis entering your pussy. This feels nice between your legs , but <<$xyr>> <<dick>> cm dick  is significantly less than what your pussy needs .This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
 		end
 		if pcs_vag = 0:
 			pcs_horny = 0
 			pcs_mood -= 15
 			pcs_willpwr -= 15
 			pcs_vag += 1
-			'You were biting your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> entered, breaking your hymen. You moan while crying and <<$xem>> <<dick>> centimeter dick fucks your bloody pussy.'
+			'You were biting your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> entered, breaking your hymen. You moan while crying and <<$xyr>> <<dick>> centimeter dick fucks your bloody pussy.'
 		elseif pcs_vag <= dick:
 			pcs_vag += 1
 		end
@@ -489,7 +489,7 @@ $sexstart4 = {
 		pcs_horny = 0
 		pcs_mood = pcs_mood - 10
 		pcs_willpwr = pcs_willpwr - 10
-		'You are menstruating but this does not stop <<$xe>> from ramming <<$xem>> dick into you. vaginal blood flows slowly out of your pussy. You are experiencing  both painful and pleasant sensations. You moan while a strong <<dick>> centimeter dick fucks your pussy.'
+		'You are menstruating but this does not stop <<$xe>> from ramming <<$xyr>> dick into you. vaginal blood flows slowly out of your pussy. You are experiencing  both painful and pleasant sensations. You moan while a strong <<dick>> centimeter dick fucks your pussy.'
 	elseif cycle > 0 and pcs_vag > 0:
 		!!no monthly
 		!!horny - excitement
@@ -596,7 +596,7 @@ $sexstart4 = {
 			pcs_horny = 0
 			pcs_mood -= 15
 			pcs_willpwr -= 15
-			'You groaned in pain when <<$boydesc>> penetrated your pussy. Tears flowed from your eyes and it felt like someone drove a red-hot rod in your vagina. You cry and moan while <<$xem>> strong <<dick>> centimeter dick fucks your pussy.'
+			'You groaned in pain when <<$boydesc>> penetrated your pussy. Tears flowed from your eyes and it felt like someone drove a red-hot rod in your vagina. You cry and moan while <<$xyr>> strong <<dick>> centimeter dick fucks your pussy.'
 		elseif orgazm = 1:
 			if vgape < 2:vgape = 2
 			pcs_horny -= 10
@@ -630,14 +630,14 @@ $sexstart4 = {
 			pcs_horny += 5
 			pcs_mood += 5
 			pcs_willpwr += 5
-			'You feel  <<$xem>> penis entering your pussy. This feels nice between your legs , but <<$xem>> <<dick>> cm dick  is significantly less than what your pussy needs .This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
+			'You feel  <<$xyr>> penis entering your pussy. This feels nice between your legs , but <<$xyr>> <<dick>> cm dick  is significantly less than what your pussy needs .This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end.'
 		end
 		if pcs_vag = 0:
 			pcs_horny = 0
 			pcs_mood -= 15
 			pcs_willpwr -= 15
 			pcs_vag += 1
-			'You suddenly bite your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> entered you, breaking your hymen. You moan while crying and <<$xem>> <<dick>> centimeter dick fucks your bloody pussy.'
+			'You suddenly bite your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> entered you, breaking your hymen. You moan while crying and <<$xyr>> <<dick>> centimeter dick fucks your bloody pussy.'
 		elseif pcs_vag <= dick:
 			pcs_vag += 1
 		end
@@ -656,18 +656,18 @@ $sexcum = {
 	
 		if finrand = 0:
 			cumvag_text = RAND(0,2)
-			if cumvag_text = 0: '<<$xemc>> movements speed up and <<$xe>> drives <<$xem>> cock balls deep into you. With a beatific smile <<$xe>> cums deep inside you. You feel a warm jet pour into your womb.'
-			if cumvag_text = 1: '<<$xec>> does not pull out and instead pulls you tightly against <<$xyr>> and your pussy is filled with splashes of semen.'
+			if cumvag_text = 0: '<<$xyrc>> movements speed up and <<$xe>> drives <<$xyr>> cock balls deep into you. With a beatific smile <<$xe>> cums deep inside you. You feel a warm jet pour into your womb.'
+			if cumvag_text = 1: '<<$xec>> does not pull out and instead pulls you tightly against <<$xem>> and your pussy is filled with splashes of semen.'
 			if cumvag_text = 2: '<<$xec>> groans, and you feel a jet of sperm hit you inside your body.'
 			gs 'cuminsidereact', $boydesc
 		elseif finrand = 1:
 			!!Out
 			if pose = 0:
 				spafinloc = 14
-				'<<$boydesc>> groaned and after pulling out <<$xem>> dick, <<$xe>> came on your stomach.'
+				'<<$boydesc>> groaned and after pulling out <<$xyr>> dick, <<$xe>> came on your stomach.'
 			elseif pose = 1:
 				spafinloc = 4
-				'<<$boydesc>> groaned and after pulling out <<$xem>> dick, <<$xe>> came on your ass.'
+				'<<$boydesc>> groaned and after pulling out <<$xyr>> dick, <<$xe>> came on your ass.'
 			end
 		end
 		gs 'Cum_Manage'
@@ -677,9 +677,9 @@ $sexcum = {
 		'<<$boydesc>> groaned and you realized that <<$xe>> came in the <<$tmp>>condom.'
 		gs 'Cum_Manage'
 		if sexcontra = 4:
-			'Pulling out of you and looking at <<$xem>> dick, <<$boydesc>> said "Hmm, the condom burst."'
+			'Pulling out of you and looking at <<$xyr>> dick, <<$boydesc>> said "Hmm, the condom burst."'
 		elseif sexcontra = 5:
-			'Pulling out of you and looking at <<$xem>> dick, <<$boydesc>> said "Hmm, the condom is missing."'
+			'Pulling out of you and looking at <<$xyr>> dick, <<$boydesc>> said "Hmm, the condom is missing."'
 		end
 		gs 'cuminsidereact'
 		protect = 0
@@ -700,8 +700,8 @@ $sexcumsk = {
 		if finrand = 0:
 			!inside
 			cumvag_text = RAND(0,2)
-			if cumvag_text = 0: '<<$xemc>> movements speed up and <<$xe>> drives <<$xem>> cock balls deep into you. With a beatific smile, <<$xe>> cums deep inside you. You feel a warm jet pour into your womb.'
-			if cumvag_text = 1: '<<$xec>> does not pull out and instead pulls you tightly against <<$xyr>> and your pussy is filled with splashes of semen.'
+			if cumvag_text = 0: '<<$xyrc>> movements speed up and <<$xe>> drives <<$xyr>> cock balls deep into you. With a beatific smile, <<$xe>> cums deep inside you. You feel a warm jet pour into your womb.'
+			if cumvag_text = 1: '<<$xec>> does not pull out and instead pulls you tightly against <<$xem>> and your pussy is filled with splashes of semen.'
 			if cumvag_text = 2: '<<$xec>> groans, and you feel a jet of sperm hit you inside your body.'
 
 			pcs_mood = pcs_mood - 15
@@ -712,10 +712,10 @@ $sexcumsk = {
 
 			if pose = 0:
 				spafinloc = 14
-				'<<$shultextrand33>> groans and pulls <<$xem>> cock out of you and cums on your stomach.'
+				'<<$shultextrand33>> groans and pulls <<$xyr>> cock out of you and cums on your stomach.'
 			elseif pose = 1:
 				spafinloc = 4
-				'<<$shultextrand33>> groans and pulls <<$xem>> cock out of you and cums on your ass.'
+				'<<$shultextrand33>> groans and pulls <<$xyr>> cock out of you and cums on your ass.'
 			end
 		end
 		gs 'Cum_Manage'
@@ -726,9 +726,9 @@ $sexcumsk = {
 		'<<$shultextrand33>> groans and you realize that <<$xe>> came in the <<$tmp>>condom.'
 		gs 'Cum_Manage'
 		if sexcontra = 4:
-			'Pulls <<$xem>> cock out of you and, looking at <<$xem>> dick, <<$shultextrand33>> says "Hmm, the condom burst."'
+			'Pulls <<$xyr>> cock out of you and, looking at <<$xyr>> dick, <<$shultextrand33>> says "Hmm, the condom burst."'
 		elseif sexcontra = 5
-			'Pulls <<$xem>> cock out of you and, looking at <<$xem>> dick, <<$shultextrand33>> says "Hmm, the condom is missing."'
+			'Pulls <<$xyr>> cock out of you and, looking at <<$xyr>> dick, <<$shultextrand33>> says "Hmm, the condom is missing."'
 		end
 		gs 'cuminsidereact'
 		protect = 0
@@ -751,7 +751,7 @@ $analsex = {
 	end
 
 	if dick >= pcs_ass:pcs_ass += 3
-	'<<$boydesc>> began to massage your anus with <<$xem>> fingers.'
+	'<<$boydesc>> began to massage your anus with <<$xyr>> fingers.'
 	!!!WD: Replaced
 	!!if lubri > 0:
 	!!!
@@ -759,15 +759,15 @@ $analsex = {
 	!!!
 		lubri -= 1
 		lubonus += rand(1, 5)
-		'You squeezed anal lube on your hand and began to smear it in your ass. Then you gave it to <<$xyr>> and <<$xe>> smeared it on <<$xem>> dick'
+		'You squeezed anal lube on your hand and began to smear it in your ass. Then you gave it to <<$xem>> and <<$xe>> smeared it on <<$xyr>> dick'
 	end
 
 	if pcs_ass < 10:'<<$xec>> inserted three fingers into your ass and you groaned in pain.'
 	if pcs_ass >= 10:'<<$xec>> started to stretch your anus with three fingers.'
-	'<<$boydesc>> pulled <<$xem>> fingers out of your ass and you felt <<$xem>> hard cock near your hole.'
-	if pcs_ass + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when <<$xem>> <<dick>> centimeter dick entered your ass.'
-	if pcs_ass + lubonus + 10 >= dick:'You moaned when <<$xem>> <<dick>> centimeter dick entered your ass.'
-	'<<$boydesc>> stopped for a moment, giving your ass time to adjust to <<$xem>> cock in it, and then started to slowly move, stretching your anus.'
+	'<<$boydesc>> pulled <<$xyr>> fingers out of your ass and you felt <<$xyr>> hard cock near your hole.'
+	if pcs_ass + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when <<$xyr>> <<dick>> centimeter dick entered your ass.'
+	if pcs_ass + lubonus + 10 >= dick:'You moaned when <<$xyr>> <<dick>> centimeter dick entered your ass.'
+	'<<$boydesc>> stopped for a moment, giving your ass time to adjust to <<$xyr>> cock in it, and then started to slowly move, stretching your anus.'
 
 	if pcs_ass + lubonus + 2 < dick:
 		if pcs_makeup > 1:pcs_makeup = 0
@@ -778,7 +778,7 @@ $analsex = {
 	elseif pcs_ass + lubonus + 2 >= dick:
 		pcs_horny += 10
 		if agape < 2 and lubonus = 0:agape = 2
-		'You started to moan rhythmically, matching the timings of  <<$xem>> cock''s movements inside you. You feel your anus stretching when <<$xem>> penis enters you.'
+		'You started to moan rhythmically, matching the timings of  <<$xyr>> cock''s movements inside you. You feel your anus stretching when <<$xyr>> penis enters you.'
 
 		if pcs_horny >= 100:
 			if stat['anal'] >= 10 and orgasm > 0:
@@ -786,7 +786,7 @@ $analsex = {
 				orgasm += 1
 				pcs_mood += 20
 				if agape < 1 and lubonus = 0:agape = 1
-				'You moan in pleasure while <<$xem>> dick moves inside your ass.'
+				'You moan in pleasure while <<$xyr>> dick moves inside your ass.'
 			end
 		end
 	end
@@ -808,7 +808,7 @@ $analsex2 = {
 		'<<$boydesc>> pulled your butt plug out of your narrow and tight ass.'
 	end
 	if dick >= pcs_ass:pcs_ass += 3
-	'<<$boydesc>> began to massage your anus with <<$xem>> fingers.'
+	'<<$boydesc>> began to massage your anus with <<$xyr>> fingers.'
 
 	!!!WD: Replaced
 	!!if lubri > 0:
@@ -817,16 +817,16 @@ $analsex2 = {
 	!!!
 	lubri -= 1
 	lubonus += rand(1, 5)
-	'You squeezed anal lube on your hand and began to smear it in your ass. Then you gave the guy a tube and <<$xe>> started lucricating <<$xem>> cock.'
+	'You squeezed anal lube on your hand and began to smear it in your ass. Then you gave the guy a tube and <<$xe>> started lucricating <<$xyr>> cock.'
 	end
 	if pcs_ass < 10:'When <<$xe>> entered three fingers in your ass you groaned in pain.'
    	if pcs_ass >= 10:'<<$xec>> started to stretch your anus with three fingers.'
-	'<<$boydesc>> pulled <<$xem>> fingers out of your ass and you felt <<$xem>> hard cock near your hole.'
+	'<<$boydesc>> pulled <<$xyr>> fingers out of your ass and you felt <<$xyr>> hard cock near your hole.'
 	!!!WD: Added lubonus
-	if pcs_ass + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when <<$xem>> <<dick>> centimeter dick entered your ass.'
-	if pcs_ass + lubonus + 10 >= dick:'You moaned when <<$xem>> <<dick>> centimeter dick entered your ass.'
+	if pcs_ass + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when <<$xyr>> <<dick>> centimeter dick entered your ass.'
+	if pcs_ass + lubonus + 10 >= dick:'You moaned when <<$xyr>> <<dick>> centimeter dick entered your ass.'
 	!!!
-	'<<$boydesc>> stopped for a moment, giving your ass time to adjust to <<$xem>> cock in it. Then he started to slowly move, stretching your anus.'
+	'<<$boydesc>> stopped for a moment, giving your ass time to adjust to <<$xyr>> cock in it. Then he started to slowly move, stretching your anus.'
 
 	if pcs_ass + lubonus + 2 < dick:
 		if pcs_makeup > 1:pcs_makeup = 0
@@ -837,7 +837,7 @@ $analsex2 = {
 	elseif pcs_ass + lubonus + 2 >= dick:
 		pcs_horny += 10
 		if agape < 2 and lubonus = 0:agape = 2
-		'You started to moan rhythmically following the movements of <<$xem>> cock inside you. You can feel your anus stretching when <<$xem>> penis enters you.'
+		'You started to moan rhythmically following the movements of <<$xyr>> cock inside you. You can feel your anus stretching when <<$xyr>> penis enters you.'
 
 		if pcs_horny >= 100:
 			if stat['anal'] >= 10 and orgasm > 0:
@@ -845,7 +845,7 @@ $analsex2 = {
 				orgasm += 1
 				pcs_mood += 20
 				if agape < 1 and lubonus = 0:agape = 1
-				'You moan in pleasure while <<$xem>> dick moves inside your ass.'
+				'You moan in pleasure while <<$xyr>> dick moves inside your ass.'
 			end
 		end
 	end
@@ -872,10 +872,10 @@ $analsexrude = {
 	'<<$boydesc>> tucked a finger into your anus, then a second one .'
 	if pcs_ass < 10:'When <<$xe>> entered three fingers in your ass you groaned in pain.'
 	if pcs_ass >= 10:'<<$xec>> started to stretch your anus with three fingers.'
-	'<<$boydesc>> pulled <<$xem>> fingers out of your ass and you feel <<$xem>> pushing his hard cock into your hole.'
-	if pcs_ass + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when <<$xem>> <<dick>> centimeter dick entered your ass.'
-   	if pcs_ass + lubonus + 10 >= dick:'You moaned when <<$xem>> <<dick>> centimeter dick entered your ass.'
-	'<<$boydesc>> stopped for a moment, giving your ass time to adjust to <<$xem>> cock in it. Then he started to slowly move, stretching your anus.'
+	'<<$boydesc>> pulled <<$xyr>> fingers out of your ass and you feel <<$xyr>> pushing his hard cock into your hole.'
+	if pcs_ass + lubonus + 10 < dick:'You screamed and bit your lip from a sharp pain when <<$xyr>> <<dick>> centimeter dick entered your ass.'
+   	if pcs_ass + lubonus + 10 >= dick:'You moaned when <<$xyr>> <<dick>> centimeter dick entered your ass.'
+	'<<$boydesc>> stopped for a moment, giving your ass time to adjust to <<$xyr>> cock in it. Then he started to slowly move, stretching your anus.'
 
 	if pcs_ass + lubonus + 2 < dick:
    		if pcs_makeup > 1:pcs_makeup = 0
@@ -888,7 +888,7 @@ $analsexrude = {
 	elseif pcs_ass + lubonus + 2 >= dick:
 		pcs_horny += 10
 		if agape < 2 and lubonus = 0:agape = 2
-		'You started to moan rhythmically, following the movements of <<$xem>> cock inside you. You can feel your anus stretching when <<$xem>> penis enters you.'
+		'You started to moan rhythmically, following the movements of <<$xyr>> cock inside you. You can feel your anus stretching when <<$xyr>> penis enters you.'
 
 		if pcs_horny >= 100:
 			if stat['anal'] >= 10 and orgasm > 0:
@@ -896,7 +896,7 @@ $analsexrude = {
 				orgasm += 1
 				pcs_mood += 20
 				if agape < 1 and lubonus = 0:agape = 1
-				'You moan in pleasure while <<$xem>> dick moves inside your ass.'
+				'You moan in pleasure while <<$xyr>> dick moves inside your ass.'
 			end
 		end
 	end
@@ -918,10 +918,10 @@ if $ARGS[0] = 'boy_puts_condom':
 			badprezik -= 1
 			noprotect = 1
 			sexcontra = 7
-			*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and puts it on <<$xem>> <<dick>> centimeter dick.'
+			*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and puts it on <<$xyr>> <<dick>> centimeter dick.'
 		else
 			sexcontra = 3
-			*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your condom and puts it on <<$xem>> <<dick>> centimeter dick.'
+			*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your condom and puts it on <<$xyr>> <<dick>> centimeter dick.'
 			noprotect = 0
 		end
 		prezik -= 1
@@ -951,10 +951,10 @@ if $ARGS[0] = 'pc_puts_condom':
 			badprezik -= 1
 			noprotect = 1
 			sexcontra = 7
-			*p 'You take your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and put it on <<$xem>> <<dick>> centimeter dick.'
+			*p 'You take your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and put it on <<$xyr>> <<dick>> centimeter dick.'
 		else
 			sexcontra = 3
-			*p 'You take your condom and put it on <<$xem>> <<dick>> centimeter dick.'
+			*p 'You take your condom and put it on <<$xyr>> <<dick>> centimeter dick.'
 			noprotect = 0
 		end
 		prezik -= 1
@@ -974,7 +974,7 @@ if $ARGS[0] = 'boy_wants_anal':
 	end
 	if $ARGS[2] = 'lubri':
 		lubri +=1
-		'<<$bwa_boy>> takes a tube of lubricant, squeezes a little on <<$xem>>  palm and rubs your anus.'
+		'<<$bwa_boy>> takes a tube of lubricant, squeezes a little on <<$xyr>>  palm and rubs your anus.'
 		gs 'arousal', 'anal_finger', 1,'lube' 
 	else
 		if lubri = 0:
@@ -984,9 +984,9 @@ if $ARGS[0] = 'boy_wants_anal':
 			if rand(0,2) = 0: 
 				'You take a tube of lubricant and hand it to <<$bwa_boy>>, he squeezes a little on his palm and rubs your anus.'
 			elseif rand(0,1) = 0:
-				'You squeeze anal lube on your hand and begin to smear it in your ass. Then you give the guy a tube and <<$xe>> starts lucricating <<$xem>> cock.'
+				'You squeeze anal lube on your hand and begin to smear it in your ass. Then you give the guy a tube and <<$xe>> starts lucricating <<$xyr>> cock.'
 			else
-				'You squeeze anal lube on your hand and begin to smear it in your ass. Then you give it to <<$xyr>> and <<$xe>> smears it on <<$xem>> dick'
+				'You squeeze anal lube on your hand and begin to smear it in your ass. Then you give it to <<$xem>> and <<$xe>> smears it on <<$xyr>> dick'
 			end
 			gs 'arousal', 'anal_finger', 1,'lube' 
 		end
@@ -1050,20 +1050,20 @@ if $ARGS[0] = 'vaginal_sex':
 	if pcs_vag > 0:
 		gs 'arousal','vaginal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
 		$temp_mens = iif(cycle <= 0,' and menstruation blood leaks from your vagina','')
-		if (vgrdif + vltdif) >= 30: 'You groaned in pain when <<$boydesc>> penetrated you, tears flowed from your eyes and it feels like someone drove a red-hot rod in your vagina. You cry and moan while <<$xem>> strong <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
-		if (vgrdif + vltdif) >= 20 and (vgrdif + vltdif) < 30: 'You bite your lip in pain when <<$boydesc>> entered, it is very painful. You are frowning and moaning in pain while <<$xem>> strong <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= 30: 'You groaned in pain when <<$boydesc>> penetrated you, tears flowed from your eyes and it feels like someone drove a red-hot rod in your vagina. You cry and moan while <<$xyr>> strong <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= 20 and (vgrdif + vltdif) < 30: 'You bite your lip in pain when <<$boydesc>> entered, it is very painful. You are frowning and moaning in pain while <<$xyr>> strong <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
 		if cycle <= 0: $temp_mens = ' even though' + $temp_mens
-		if (vgrdif + vltdif) >= 12 and (vgrdif + vltdif) < 20: 'You winced at the sudden pain when <<$boydesc>> entered, it hurt but gradually it became quite tolerable. You are trying to get aroused while <<$xem>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>, but you did not succeed.'
-		if (vgrdif + vltdif) >= 7 and (vgrdif + vltdif) < 12: 'You are startled by the feeling that your pussy is stretching when <<$boydesc>> entered you. It feels good when <<$xem>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
-		if (vgrdif + vltdif) >=  2 and (vgrdif + vltdif) < 7: 'You are startled by the feeling that your pussy is stretching as <<$boydesc>> enters you. It feels good when <<$xem>> strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end<<$temp_mens>>.'
-		if (vgrdif + vltdif) >= -3 and (vgrdif + vltdif) < 2: 'You flinched from a pleasant feeling when your pussy is stretched by <<$xem>> dick. It feels good when <<$xem>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling became unbearable and your entire body was covered with hot waves of orgasm You scream with pleasure.'
-		if (vgrdif + vltdif) <  -3: 'You feel  <<$xem>> penis entering your pussy. This gives you a nice tingling feeling between your legs , but <<$xem>> <<dick>> cm dick  is significantly less than what your pussy needs .This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= 12 and (vgrdif + vltdif) < 20: 'You winced at the sudden pain when <<$boydesc>> entered, it hurt but gradually it became quite tolerable. You are trying to get aroused while <<$xyr>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>, but you did not succeed.'
+		if (vgrdif + vltdif) >= 7 and (vgrdif + vltdif) < 12: 'You are startled by the feeling that your pussy is stretching when <<$boydesc>> entered you. It feels good when <<$xyr>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
+		if (vgrdif + vltdif) >=  2 and (vgrdif + vltdif) < 7: 'You are startled by the feeling that your pussy is stretching as <<$boydesc>> enters you. It feels good when <<$xyr>> strong <<dick>> centimeter dick fucks your pussy. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= -3 and (vgrdif + vltdif) < 2: 'You flinched from a pleasant feeling when your pussy is stretched by <<$xyr>> dick. It feels good when <<$xyr>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling became unbearable and your entire body was covered with hot waves of orgasm You scream with pleasure.'
+		if (vgrdif + vltdif) <  -3: 'You feel  <<$xyr>> penis entering your pussy. This gives you a nice tingling feeling between your legs , but <<$xyr>> <<dick>> cm dick  is significantly less than what your pussy needs .This is not enough for you. Gradually a pleasant warmth and some pulsations started building up in your stomach. Then the feeling decreased a little and remained like that until the end<<$temp_mens>>.'
 	else
 		$temp_mens = iif(cycle <= 0,' and menstruation blood leaks from your vagina','')
 		pcs_horny = 0
 		pcs_mood -= 15
 		pcs_willpwr -= 15
-		'You were biting your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> penetrated you, breaking your hymen. You moan while crying and <<$xem>> <<dick>> centimeter dick fucks your bloody pussy.'
+		'You were biting your <<$liptalk>> in pain and tears started to flow from your eyes when <<$boydesc>> penetrated you, breaking your hymen. You moan while crying and <<$xyr>> <<dick>> centimeter dick fucks your bloody pussy.'
 		gs 'arousal','vaginal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
 	end
 	killvar '$temp_mens'
@@ -1079,19 +1079,19 @@ if $ARGS[0] = 'analsex':
 	'<<$boydesc>> tucks a finger into your anus, then a second one .'
 	if pcs_ass < 10:'When <<$xec>> inserts three fingers into your ass you groan in pain.'
 	if pcs_ass >= 10:'<<$xec>> starts to stretch your anus with three fingers.'
-	*p '<<$boydesc>> pulls <<$xem>> fingers out of your ass and you feel '
-	if rand(0,1)=0: '<<$xem>> hard cock near your hole.' else '<<$xyr>> pushing <<$xem>> hard cock into your hole.'
+	*p '<<$boydesc>> pulls <<$xyr>> fingers out of your ass and you feel '
+	if rand(0,1)=0: '<<$xyr>> hard cock near your hole.' else '<<$xem>> pushing <<$xyr>> hard cock into your hole.'
 	gs 'arousal','anal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
-	if (agrdif + altdif) >= 20:'You scream and bit your lip from a sharp pain when <<$xem>> <<dick>> centimeter dick enters your ass.'
-	if (agrdif + altdif) <  20:'You moan when <<$xem>> <<dick>> centimeter dick enters your ass.'
-	'<<$boydesc>> stops for a moment, giving your ass time to adjust to <<$xem>> cock in it. Then he starts to slowly move, stretching your anus.'
+	if (agrdif + altdif) >= 20:'You scream and bit your lip from a sharp pain when <<$xyr>> <<dick>> centimeter dick enters your ass.'
+	if (agrdif + altdif) <  20:'You moan when <<$xyr>> <<dick>> centimeter dick enters your ass.'
+	'<<$boydesc>> stops for a moment, giving your ass time to adjust to <<$xyr>> cock in it. Then he starts to slowly move, stretching your anus.'
 
 	if (agrdif + altdif) >= 30:
 		if pcs_makeup > 1:pcs_makeup = 0
 		'You cry and bit your lip when <<dick>> centimeter cock begins to fuck your ass on (! full force !). Your ass feels like it is on fire and all you want is for this torture to be over quickly.'
 	elseif (agrdif + altdif) >= 20 and (agrdif + altdif) < 30:
 		pcs_horny += 10
-		'You start to moan rhythmically in time with <<$xem>> cock''s movements inside you. You feel like your anus is stretched when <<$xem>> penis enters you.'
+		'You start to moan rhythmically in time with <<$xyr>> cock''s movements inside you. You feel like your anus is stretched when <<$xyr>> penis enters you.'
 	end
 	'After some time <<$boydesc>> groan and you feel a pleasant warmth filling your ass.'
 	gs 'cum_call','anus',$boy,1
@@ -1106,8 +1106,8 @@ if $ARGS[0] = 'sexcum':
 		!!Unprotected sex
 		if rand(0, 1) = 0 or pose = 3:
 			cumvag_text = RAND(0,2)
-			if cumvag_text = 0: '<<$xemc>> movements speed up and <<$xe>> drives <<$xem>> cock balls deep into you. With a beatific smile, <<$xe>> cums deep inside you. You feel a warm jet pour into your womb.'
-			if cumvag_text = 1: '<<$xec>> does not pull out and instead pulls you tightly against <<$xyr>> and your pussy is filled with splashes of semen.'
+			if cumvag_text = 0: '<<$xyrc>> movements speed up and <<$xe>> drives <<$xyr>> cock balls deep into you. With a beatific smile, <<$xe>> cums deep inside you. You feel a warm jet pour into your womb.'
+			if cumvag_text = 1: '<<$xec>> does not pull out and instead pulls you tightly against <<$xem>> and your pussy is filled with splashes of semen.'
 			if cumvag_text = 2: '<<$xec>> groans, and you feel a jet of sperm hit you inside your body.'
 			gs 'cuminsidereact', $boydesc
 			gs 'cum_call','',$boy,1
@@ -1115,10 +1115,10 @@ if $ARGS[0] = 'sexcum':
 			!!Out
 			if pose = 0:
 				spafinloc = 14
-				'<<$boydesc>> groaned and after pulling out <<$xem>> dick, <<$xe>> came on your stomach.'
+				'<<$boydesc>> groaned and after pulling out <<$xyr>> dick, <<$xe>> came on your stomach.'
 				gs 'cum_call','stomach',$boy,1
 			elseif pose = 1:
-				'<<$boydesc>> groaned and after pulling out <<$xem>> dick, <<$xe>> came on your ass.'
+				'<<$boydesc>> groaned and after pulling out <<$xyr>> dick, <<$xe>> came on your ass.'
 				gs 'cum_call','butt',$boy,1
 			end
 		end
@@ -1126,9 +1126,9 @@ if $ARGS[0] = 'sexcum':
 		$tmp = iif(sexcontra = 7,'sabotaged ','')
 		'<<$boydesc>> groaned and you realized that <<$xe>> ejaculated in the <<$tmp>>condom.'
 		if sexcontra = 4:
-			'Pulling out of you and looking at <<$xem>> dick, <<$boydesc>> said "Hmm, the condom burst."'
+			'Pulling out of you and looking at <<$xyr>> dick, <<$boydesc>> said "Hmm, the condom burst."'
 		elseif sexcontra = 5:
-			'Pulling out of you and looking at <<$xem>> dick, <<$boydesc>> said "Hmm, the condom is missing."'
+			'Pulling out of you and looking at <<$xyr>> dick, <<$boydesc>> said "Hmm, the condom is missing."'
 		end
 		eff_contra = sexcontra
 		gs 'cum_call','',$boy,1
@@ -1145,13 +1145,13 @@ end &! --- sexcum ---
 !! phrases rewrited by Filicophyte 
 if $ARGS[0] = 'dinrandbj':
 	tperbjran = rand(0, 3)
-	if tperbjran = 0:$tperbj = 'You wrap your <<$liptalk>> around <<$xem>> <<dick>>cm member.'
-	if tperbjran = 1:$tperbj = 'Your <<$liptalk>> engulf the purple head of <<$xem>> <<dick>>cm member.'
-	if tperbjran = 2:$tperbj = 'You plant your <<$liptalk>> on the bulbous tip of <<$xem>> <<dick>>cm cock and greedily slide your mouth down along <<$xem>> throbbing maleness.'
+	if tperbjran = 0:$tperbj = 'You wrap your <<$liptalk>> around <<$xyr>> <<dick>>cm member.'
+	if tperbjran = 1:$tperbj = 'Your <<$liptalk>> engulf the purple head of <<$xyr>> <<dick>>cm member.'
+	if tperbjran = 2:$tperbj = 'You plant your <<$liptalk>> on the bulbous tip of <<$xyr>> <<dick>>cm cock and greedily slide your mouth down along <<$xyr>> throbbing maleness.'
 	if tperbjran = 3:$tperbj = 'The <<dick>> centimeters dick rests between your <<$liptalk>> then you slightly part them and allow the delicious invador to slide into your mouth.'
 
 	tperbjran = rand(0, 2)
-	if tperbjran = 0:$tperbj2 = 'You give <<$xem>> face a sultry look while <<$xem>> cock rests in your mouth then you greedily lean forwards, taking <<$xem>> tasty penis deeper in your mouth and lustfully start to bob your head back and forth along <<$xem>> <<dick>>cm tool.'
+	if tperbjran = 0:$tperbj2 = 'You give <<$xyr>> face a sultry look while <<$xyr>> cock rests in your mouth then you greedily lean forwards, taking <<$xyr>> tasty penis deeper in your mouth and lustfully start to bob your head back and forth along <<$xyr>> <<dick>>cm tool.'
 	if tperbjran = 1:$tperbj2 = 'You playfully roll your tongue around the engorged boner and start giving one hell of a blowjob, swallowing the whole length down your throat and making lewd slurping noises everytime you hilt.'
 	if tperbjran = 2:$tperbj2 = 'That hard cock between your <<$liptalk>> is definitely yummy! You just can''t hold back and hungrily take the whole length in your mouth until its tip is resting at the entrance of your throat, you grin and relax your muscles to let it in, deepthroating this <<dick>>cm cock like there''s no tomorrow.'
 	'<<$tperbj>> <<$tperbj2>>'

locations/dinSex2

@@ -58,21 +58,21 @@ if $ARGS[0] = 'd_strapon_vag':
 	frost = 0
 	if pcs_vag > 0:
 		$temp_mens = iif(cycle <= 0,' and menstruation blood leaks from your vagina','')
-		if (vgrdif + vltdif) >= 30: 'You groan in pain when <<$boydesc>> penetrates you. Tears flow from your eyes and it feels like someone drove a red-hot rod into your vagina. You cry and moan while <<$xem>> fake <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
-		if (vgrdif + vltdif) >= 20 and (vgrdif + vltdif) < 30: 'You bite your lip in pain when <<$boydesc>> enters you, it is very painful. You frown and moan in pain while <<$xem>> fake <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= 30: 'You groan in pain when <<$boydesc>> penetrates you. Tears flow from your eyes and it feels like someone drove a red-hot rod into your vagina. You cry and moan while <<$xyr>> fake <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= 20 and (vgrdif + vltdif) < 30: 'You bite your lip in pain when <<$boydesc>> enters you, it is very painful. You frown and moan in pain while <<$xyr>> fake <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
 		if cycle <= 0: $temp_mens = ' even though' + $temp_mens
-		if (vgrdif + vltdif) >= 12 and (vgrdif + vltdif) < 20: 'You wince at the sudden pain when <<$boydesc>> enters you, it hurts but gradually becames quite tolerable. You are trying to get aroused while fake <<$xem>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>, but you did not succeed.'
-		if (vgrdif + vltdif) >= 7 and (vgrdif + vltdif) < 12: 'You are startled by the feeling that your pussy is stretching when <<$boydesc>> enters you. It feels good when rubber <<$xem>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
-		if (vgrdif + vltdif) >=  2 and (vgrdif + vltdif) < 7: 'You are startled by the feeling that your pussy is stretching as <<$boydesc>> enters you. It feels good when <<$xem>> <<dick>> centimeter rubber dick fucks your pussy. Gradually, a pleasant warmth and some pulsations start building up in your stomach, then the feeling decreases a little and remains like that until the end<<$temp_mens>>.'
-		if (vgrdif + vltdif) >= -3 and (vgrdif + vltdif) < 2: 'You flinch from a pleasant feeling when your pussy is stretched by <<$xem>> dick. It feels good when <<$xem>> <<dick>> centimeter fake dick fucks your pussy<<$temp_mens>>. Gradually, a pleasant warmth and some pulsations start building up in your stomach, then the feeling becomes unbearable and your entire body is covered with hot waves of orgasm as you scream with pleasure.'
-		if (vgrdif + vltdif) <  -3: 'You feel <<$xem>> fake penis enter your pussy. This gives you a nice tingling feeling between your legs, but <<$xem>> <<dick>> cm rubber dick is significantly less than what your pussy needs. It is not big enough for you. Gradually a pleasant warmth and some pulsations start building up in your stomach. Then the feeling decreases a little and remaines like that until the end<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= 12 and (vgrdif + vltdif) < 20: 'You wince at the sudden pain when <<$boydesc>> enters you, it hurts but gradually becames quite tolerable. You are trying to get aroused while fake <<$xyr>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>, but you did not succeed.'
+		if (vgrdif + vltdif) >= 7 and (vgrdif + vltdif) < 12: 'You are startled by the feeling that your pussy is stretching when <<$boydesc>> enters you. It feels good when rubber <<$xyr>> <<dick>> centimeter dick fucks your pussy<<$temp_mens>>.'
+		if (vgrdif + vltdif) >=  2 and (vgrdif + vltdif) < 7: 'You are startled by the feeling that your pussy is stretching as <<$boydesc>> enters you. It feels good when <<$xyr>> <<dick>> centimeter rubber dick fucks your pussy. Gradually, a pleasant warmth and some pulsations start building up in your stomach, then the feeling decreases a little and remains like that until the end<<$temp_mens>>.'
+		if (vgrdif + vltdif) >= -3 and (vgrdif + vltdif) < 2: 'You flinch from a pleasant feeling when your pussy is stretched by <<$xyr>> dick. It feels good when <<$xyr>> <<dick>> centimeter fake dick fucks your pussy<<$temp_mens>>. Gradually, a pleasant warmth and some pulsations start building up in your stomach, then the feeling becomes unbearable and your entire body is covered with hot waves of orgasm as you scream with pleasure.'
+		if (vgrdif + vltdif) <  -3: 'You feel <<$xyr>> fake penis enter your pussy. This gives you a nice tingling feeling between your legs, but <<$xyr>> <<dick>> cm rubber dick is significantly less than what your pussy needs. It is not big enough for you. Gradually a pleasant warmth and some pulsations start building up in your stomach. Then the feeling decreases a little and remaines like that until the end<<$temp_mens>>.'
 		gs 'arousal','vaginal_strap',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
 	else
 		$temp_mens = iif(cycle <= 0,' and menstruation blood leaks from your vagina','')
 		pcs_horny = 0
 		pcs_mood -= 15
 		pcs_willpwr -= 15
-		'You bite your <<$liptalk>> in pain while tears start to flow from your eyes when <<$boydesc>> penetrates you, breaking your hymen. You moan while crying and <<$xem>> rubber <<dick>> centimeter dick fucks your bloody pussy.'
+		'You bite your <<$liptalk>> in pain while tears start to flow from your eyes when <<$boydesc>> penetrates you, breaking your hymen. You moan while crying and <<$xyr>> rubber <<dick>> centimeter dick fucks your bloody pussy.'
 		gs 'arousal','vaginal',ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
 	end
 	killvar '$temp_mens'
@@ -166,18 +166,18 @@ if $ARGS[0] = 'd_strapon_anal':
 	'<<$boydesc>> tucks a finger into your anus, then a second one.'
 	if pcs_ass < 10:'When <<$xec>> inserts three fingers into your ass you groan in pain.'
 	if pcs_ass >= 10:'<<$xec>> starts to stretch your anus using three fingers.'
-	*p '<<$boydesc>> pulls <<$xem>> fingers out of your ass and you feel '
-	if rand(0,1)=0: '<<$xem>> fake cock near your hole.' else '<<$xyr>> pushing <<$xem>> fake cock into your hole.'
-	if (agrdif + altdif) >= 20:'You scream and bite your lip from a sharp pain when <<$xem>> fake <<dick>> centimeter dick enters your ass.'
-	if (agrdif + altdif) <  20:'You moan when <<$xem>> <<dick>>cm rubber dick enters your ass.'
-	'<<$boydesc>> stops for a moment, giving your ass time to adjust to <<$xem>> cock inside it. Then <<$xe>> starts to slowly move, stretching your anus.'
+	*p '<<$boydesc>> pulls <<$xyr>> fingers out of your ass and you feel '
+	if rand(0,1)=0: '<<$xyr>> fake cock near your hole.' else '<<$xem>> pushing <<$xyr>> fake cock into your hole.'
+	if (agrdif + altdif) >= 20:'You scream and bite your lip from a sharp pain when <<$xyr>> fake <<dick>> centimeter dick enters your ass.'
+	if (agrdif + altdif) <  20:'You moan when <<$xyr>> <<dick>>cm rubber dick enters your ass.'
+	'<<$boydesc>> stops for a moment, giving your ass time to adjust to <<$xyr>> cock inside it. Then <<$xe>> starts to slowly move, stretching your anus.'
 
 	if (agrdif + altdif) >= 30:
 		if pcs_makeup > 1:pcs_makeup = 0
 		'You cry and bite your lip when the <<dick>> centimeter fake cock begins to fuck your ass with full force!. Your ass feels like it is on fire and all you want is for this torture to be over quickly.'
 	elseif (agrdif + altdif) >= 20 and (agrdif + altdif) < 30:
 		pcs_horny += 10
-		'You feel like your anus is stretching when <<$xem>> fake shaft enters you. You start to moan rhythmically in unison with <<$xem>> fake cock''s movements inside of you.'
+		'You feel like your anus is stretching when <<$xyr>> fake shaft enters you. You start to moan rhythmically in unison with <<$xyr>> fake cock''s movements inside of you.'
 	end
 	gs 'arousal','anal', ARGS[1],$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7],$ARGS[8]
 end
@@ -235,8 +235,8 @@ if $ARGS[0] = 'doublepenetration':
 		if (vgrdif + vltdif) >= 12 and (vgrdif + vltdif) < 20: TotPain +=2 & 'You wince at the sudden pain when <<$boydesc1>> enters, it hurts but gradually it becomes quite tolerable.'
 		if (vgrdif + vltdif) >= 7 and (vgrdif + vltdif) < 12: TotPain +=1 & 'You are startled by the feeling of your pussy stretching when <<$boydesc1>> enters you.'
 		if (vgrdif + vltdif) >=  2 and (vgrdif + vltdif) < 7: 'You are startled by the feeling of your pussy stretching as <<$boydesc1>> enters you.'
-		if (vgrdif + vltdif) >= -3 and (vgrdif + vltdif) < 2: 'You flinch from a pleasant feeling when your pussy is stretched by <<$xem1>> dick.'
-		if (vgrdif + vltdif) <  -3: 'You feel <<$xem1>> penis entering your pussy. This gives you a nice tingling feeling between your legs, but <<$xem>> <<dick>> cm dick is significantly smaller than what your pussy needs.'
+		if (vgrdif + vltdif) >= -3 and (vgrdif + vltdif) < 2: 'You flinch from a pleasant feeling when your pussy is stretched by <<$xyr1>> dick.'
+		if (vgrdif + vltdif) <  -3: 'You feel <<$xyr1>> penis entering your pussy. This gives you a nice tingling feeling between your legs, but <<$xyr>> <<dick>> cm dick is significantly smaller than what your pussy needs.'
 	else
 		pcs_horny = 0
 		pcs_mood -= 15
@@ -244,9 +244,9 @@ if $ARGS[0] = 'doublepenetration':
 		TotPain +=4
 		'You bite your <<$liptalk>> in pain and tears start to flow from your eyes when <<$boydesc1>> penetrates you, breaking your hymen.'
 	end
-	if (agrdif + altdif) >= 20: TotPain +=1 & 'You scream and bite your lip from a sharp pain when <<$xem2>> <<dick2>> centimeter dick enters your ass.'
-	if (agrdif + altdif) <  20:'You moan when <<$xem2>> <<dick2>> centimeter dick enters your ass.'
-	'<<$boydesc2>> stops for a moment, giving your ass time to adjust to <<$xem2>> cock inside it. He then starts to slowly move, stretching your anus.'
+	if (agrdif + altdif) >= 20: TotPain +=1 & 'You scream and bite your lip from a sharp pain when <<$xyr2>> <<dick2>> centimeter dick enters your ass.'
+	if (agrdif + altdif) <  20:'You moan when <<$xyr2>> <<dick2>> centimeter dick enters your ass.'
+	'<<$boydesc2>> stops for a moment, giving your ass time to adjust to <<$xyr2>> cock inside it. He then starts to slowly move, stretching your anus.'
 
 	if (agrdif + altdif) >= 30:
 		if pcs_makeup > 1:pcs_makeup = 0
@@ -254,7 +254,7 @@ if $ARGS[0] = 'doublepenetration':
 		TotPain +=1
 	elseif (agrdif + altdif) >= 20 and (agrdif + altdif) < 30:
 		pcs_horny += 10
-		'You feel like your anus is stretching when <<$xem2>> penis enters you. You start to moan rhythmically in unison with <<$xem2>> cock''s movements inside of you.'
+		'You feel like your anus is stretching when <<$xyr2>> penis enters you. You start to moan rhythmically in unison with <<$xyr2>> cock''s movements inside of you.'
 	end
 
 	if totPAIN = 0:
@@ -287,7 +287,7 @@ if $ARGS[0] = 'doublepenetration':
 		pcs_horny = 0
 		pcs_willpwr = pcs_willpwr/2
 		if pcs_makeup > 1:pcs_makeup = 0
-		'Squeals and tears stream pouring out of your eyes from the terrible pain, your entire abdomen and genitals feel a sharp pain while <<$boydesc1>> fucks your vagina with <<$xem1>> <<dick1>> centimeter dick and <<$boydesc2>> almost tearing your <<$anustipe>> with <<$xem2>> <<dick2>> centimeter instrument.'
+		'Squeals and tears stream pouring out of your eyes from the terrible pain, your entire abdomen and genitals feel a sharp pain while <<$boydesc1>> fucks your vagina with <<$xyr1>> <<dick1>> centimeter dick and <<$boydesc2>> almost tearing your <<$anustipe>> with <<$xyr2>> <<dick2>> centimeter instrument.'
 	end
 	gs 'arousal','vaginal',ARGS[1],'dick1',$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7]
 	gs 'arousal','anal',ARGS[1],'dick2',$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],$ARGS[6],$ARGS[7]

locations/girl

@@ -18,72 +18,73 @@ if $ARGS[0] = 'details':
 	!Select Photos
 
 :girldetailsloop
-	!! girls 1-30, girlfriends 31-60
+	!! boys 1-30, girlfriends 31-60
 	picrand =  RAND(1,30) + 30
 	if picrand = lover_picture[0] or picrand = lover_picture[1] or picrand = lover_picture[2]: jump 'girldetailsloop'
 
+	loverGenderTmp = 1
 	silaVag = npc_sexskill[$npclastgenerated]
 	$npc_usedname[$npclastgenerated] = $npc_firstname[$npclastgenerated]
-	$girldesc = $npc_usedname[$npclastgenerated]
+	$boydesc = $npc_usedname[$npclastgenerated]
 
 	!!appearance
-	girlbodyrand = rand(1, 3)
+	boybodyrand = rand(1, 3)
 
-	if girlbodyrand = 1: $girlbody = 'short'
-	if girlbodyrand = 2: $girlbody = 'average'
-	if girlbodyrand = 3: $girlbody = 'tall'
+	if boybodyrand = 1: $boybody = 'short'
+	if boybodyrand = 2: $boybody = 'average'
+	if boybodyrand = 3: $boybody = 'tall'
 
-	girlbodrand = rand(1, 4)
+	boybodrand = rand(1, 4)
 
-	if girlbodrand = 1 and girlbodyrand = 1: $girlbod = 'petite'
-	if girlbodrand = 1 and girlbodyrand > 1: $girlbod = 'slender'
-	if girlbodrand = 2: $girlbod = 'toned'
-	if girlbodrand = 3: $girlbod = 'chubby'
-	if girlbodrand = 4: $girlbod = 'fat'
+	if boybodrand = 1 and boybodyrand = 1: $boybod = 'petite'
+	if boybodrand = 1 and boybodyrand > 1: $boybod = 'slender'
+	if boybodrand = 2: $boybod = 'toned'
+	if boybodrand = 3: $boybod = 'chubby'
+	if boybodrand = 4: $boybod = 'fat'
 
-	girlfacerand = rand(1, 3)
+	boyfacerand = rand(1, 3)
 
-	if girlfacerand = 1: $girlface = 'black'
-	if girlfacerand = 2: $girlface = 'brunette'
-	if girlfacerand = 3: $girlface = 'blond'
+	if boyfacerand = 1: $boyface = 'black'
+	if boyfacerand = 2: $boyface = 'brunette'
+	if boyfacerand = 3: $boyface = 'blond'
 
 	!!variable is responsible for guy
-	girlonce = 0
+	boyonce = 0
 
 	!!Variables responsible for any features like
 	!!security, is responsible for the money and requirements
-	harakgirl = rand(0, 2)
+	harakboy = rand(0, 2)
 	finance = rand(0, 2)
 
 	if finance = 0:
 		!!Gopnik beggar or a hard worker
 		!!check in appearance Primary
-		if harakgirl = 0: npc_app[$npclastgenerated] = rand(0, 8)
-		if harakgirl = 1: npc_app[$npclastgenerated] = rand(0, 16)
-		if harakgirl = 2: npc_app[$npclastgenerated] = rand(0, 32)
+		if harakboy = 0: npc_app[$npclastgenerated] = rand(0, 8)
+		if harakboy = 1: npc_app[$npclastgenerated] = rand(0, 16)
+		if harakboy = 2: npc_app[$npclastgenerated] = rand(0, 32)
 
-		$girlClo = 'wearing a tracksuit.'
+		$boyClo = 'wearing a tracksuit.'
 	elseif finance = 1:
 		!!middle_peasant
 		!!check in appearance
-		if harakgirl = 0: npc_app[$npclastgenerated] = rand(0, 16)
-		if harakgirl = 1: npc_app[$npclastgenerated] = rand(0, 24)
-		if harakgirl = 2: npc_app[$npclastgenerated] = rand(0, 32)
+		if harakboy = 0: npc_app[$npclastgenerated] = rand(0, 16)
+		if harakboy = 1: npc_app[$npclastgenerated] = rand(0, 24)
+		if harakboy = 2: npc_app[$npclastgenerated] = rand(0, 32)
 
-		$girlClo = 'wearing jeans and a blouse.'
+		$boyClo = 'wearing jeans and a blouse.'
 	elseif finance = 2:
 		!!middle_peasant
 		!!check in appearance
-		if harakgirl = 0: npc_app[$npclastgenerated] = rand(16, 32)
-		if harakgirl = 1: npc_app[$npclastgenerated] = rand(24, 32)
-		if harakgirl = 2: npc_app[$npclastgenerated] = rand(32, 40)
+		if harakboy = 0: npc_app[$npclastgenerated] = rand(16, 32)
+		if harakboy = 1: npc_app[$npclastgenerated] = rand(24, 32)
+		if harakboy = 2: npc_app[$npclastgenerated] = rand(32, 40)
 
-		$girlClo = 'wearing an expensive dress.'
+		$boyClo = 'wearing an expensive dress.'
 	end
 
 	!!requirements of the figure, chest size, hair color.
 	!!0 - ass less 80, 1 back from 80 prior_to 100, 2 ass over 100
-	figurgirl = rand(0, 2)
+	figurboy = rand(0, 2)
 	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
 	npc_bust[$npclastgenerated] = rand(0, 2)
 	!!0 - black, 1 - brown, 2 - Redhead, 3 - blonde
@@ -96,9 +97,9 @@ if $ARGS[0] = 'details':
 
 
 
-	hairgirl = npc_haircol[$npclastgenerated]
-	titgirl = npc_bust[$npclastgenerated]
-	vneshgirl = npc_app[$npclastgenerated]
+	hairboy = npc_haircol[$npclastgenerated]
+	titboy = npc_bust[$npclastgenerated]
+	vneshboy = npc_app[$npclastgenerated]
 
 
 	!! trying to make the preference section 
@@ -150,7 +151,7 @@ if $ARGS[0] = 'details':
 
 	!!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
 	!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
-	!! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titgirl + 0/3 depending on the players breast size
+	!! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titboy + 0/3 depending on the players breast size
 
 
 	!!0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
@@ -170,7 +171,7 @@ if $ARGS[0] = 'details':
 		elseif randchan = 5 and clotTypePrefTmp ! 3:
 			clotTopPrefTmp = 3
 		end
-		if clotTopPrefTmp ! 0 and titgirl = 2:
+		if clotTopPrefTmp ! 0 and titboy = 2:
 			if clotPref ! 3:
 				clotTopPrefTmp += 1
 			end
@@ -282,7 +283,7 @@ if $ARGS[0] = 'details':
 	!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
 
 	IQPrefTmp = 0
-	if rand(0, 4) = 4:IQPrefTmp = rand(1, 2) + rand(1, 2)
+	if rand(0, 4) = 4:IQPrefTmp = rand(1, 2) + rand(1, 2) + rand(0,1)
 
 end
 

locations/girl_meet

@@ -0,0 +1,2451 @@
+# girl_meet
+
+gs 'lover_pronouns'
+
+if $ARGS[0] = 'start':
+	minut += 15
+
+	loverdays[lover_number] += 1
+	svidanie[lover_number] = 0
+	giftNum = giftNum[lover_number]
+	if night_mode = 1:
+		fcolor = rgb(255, 255, 255)
+		bcolor = rgb(0, 0, 0)
+		lcolor = rgb(106, 90, 205)
+	else
+		fcolor = rgb(0, 0, 0)
+		bcolor = rgb(255, 255, 255)
+		lcolor = rgb(106, 90, 205)
+	end
+	gs 'boyStat', $lover[lover_number]
+	!!$boybody = 1 - tall, 2 - average, 3 - short
+	$boybody = $loverbody[lover_number]
+	!!$boybod = 1 - thin, 2 - athletic, 3 - chunky, 4 - fat
+	$boybod = $loverbod[lover_number]
+	$boyface = $loverface[lover_number]
+	!! sexual force of 0 prior_to 2
+	silaVag = loversilaVag[lover_number]
+	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
+	finance = loverfinance[lover_number]
+	!!check in appearance, a parameter vnesh
+	vneshBoy = vneshlover[lover_number]
+	$boyClo = $loverClo[lover_number]
+	
+	
+	!!0 - 0 to 2, 1 - 3 to 5, 2, 5 to 6
+
+	!! These variables will be compared to the player value 'salocatnow'.
+	figurBoy = figurelover[lover_number]
+	
+		
+	if figurBoy = 0:
+		figurePrefMin = 0
+		figurePrefMax = 2
+	elseif figurBoy = 1:
+		figurePrefMin = 3
+		figurePrefMax = 4
+	elseif figurBoy = 2:
+		figurePrefMin = 5
+		figurePrefMax = 77
+	else
+		figurePrefMin = 0
+		figurePrefMax = 99
+	end
+
+	
+	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
+	titBoy = titlover[lover_number]
+	if titBoy = 0:
+		titMin = 0
+		titMax = 3
+	elseif titBoy = 1:
+		titMin = 3
+		titMax = 4
+	elseif titBoy = 2:
+		titMin = 5
+		titMax = 999
+	end
+	
+	
+	!!favorite hair color 0 - black, 1 - brown, 2 - redhead, 3 - blonde
+	hairBoy = hairlover[lover_number]
+	!!character 0 - soft, 1 -norm 2 - aggressor
+	harakBoy = haraklover[lover_number]
+	!!perversity
+	izvrat = loverizvrat[lover_number]
+	husb_birth_year = year - boyage
+	husbAge = boyage
+	  
+
+	!!new preferences
+	
+	!!renaming perversity constant
+	pervConstant = izvrat
+	
+	!!This is for clothing type preference
+	!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
+	clotTypePrefTmp = clotTypePref[lover_number]
+	
+	!!This is for the quality of clothing
+	!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
+	clotQualPrefTmp = clotQualPref[lover_number]
+	
+	!!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
+	!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
+	!! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
+	
+	!! How much they want to see your chest USE THIS FOR NOW
+	!! 0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
+	!! It doesn''t matter if your poor or rich, everyone loves tits.
+	clotTopPrefTmp = clotTopPref[lover_number]
+	
+	!!This part helps calculate the constant to add to the 
+	
+	
+	!!This is to set the max/min of the clotTop variables. This is so you dont need to go through the code changing individual numbers.
+	if clotTopPrefTmp = 1:
+		clotTopMin = 1
+		clotTopMax = 4
+	elseif clotTopPrefTmp = 2:
+		clotTopMin = 3
+		clotTopMax = 5
+	elseif clotTopPrefTmp = 3:
+		clotTopMin = 5
+		clotTopMax = 7
+	else
+		clotTopMin = 0
+		clotTopMax = 999
+	end
+	
+	
+	
+	
+	!!THIS IS THE EQUATION FOR THE TIT ADDITION
+	if tits < 2:
+		titConstant = 0
+	elseif tits >= 2 and tits < 4:
+		titConstant = 1
+	elseif tits >= 4 and tits < 6:
+		titConstant = 2
+	elseif tits >= 6:
+		titConstant = 3
+	else
+		titConstant = 0
+	end
+	
+	
+	
+	
+	!! This is for pants and skirt shortness and will be grouped together as such.
+	!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 5 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
+	bottShorPrefTmp = bottShorPref[lover_number]
+	
+	
+	!!This is to set the max/min of the bottShor variables. This is so you dont need to go through the code changing individual numbers.
+	if bottShorPrefTmp = 1:
+		bottShorMin = 0
+		bottShorMax = 2
+	elseif bottShorPrefTmp = 2:
+		bottShorMin = 3
+		bottShorMax = 5
+	elseif bottShorPrefTmp = 3:
+		bottShorMin = 5
+		bottShorMax = 6
+	else
+		bottShorMin = 0
+		bottShorMax = 999
+	end
+	
+	
+	!! This is for clothes thinness.
+	!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
+	!! I see the moderate to really thin overlapping. Its intentional.
+	
+	!!This is to set the max/min of the clotThinness variables. This is so you dont need to go through the code changing individual numbers.
+	clotThinPrefTmp = clotThinPref[lover_number]
+	if clotThinPrefTmp = 1:
+		clotThinMin = 0
+		clotThinMax = 2
+	elseif clotThinPrefTmp = 2:
+		clotThinMin = 3
+		clotThinMax = 4
+	elseif clotThinPrefTmp = 3:
+		clotThinMin = 4
+		clotThinMax = 6
+	else
+		pierPrefTmpMin = 0
+		clotThinMax = 999
+	end
+	
+	
+	
+	!!This is to find out if they want you to wear bimbo clothing
+	!! 0 - no preference, 1 - Prefers bimbo clothing.
+	bimbPrefTmp = bimbPref[lover_number]
+	
+	!!This is to find out if they want you to wear piercings.
+	!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
+	pierPrefTmp = pierPref[lover_number]
+	
+	!!This is to set the max min
+	if pierPrefTmp = 1:
+		pierPrefTmpMin = 0
+		pierPrefTmpMax = 2
+	elseif pierPrefTmp = 2:
+		pierPrefTmpMin = 3
+		pierPrefTmpMax = 5
+	elseif pierPrefTmp = 3:
+		pierPrefTmpMin = 6
+		pierPrefTmpMax = 999
+	else
+		pierPrefTmpMin = 0
+		pierPrefTmpMax = 999
+	end
+	
+	
+	
+	
+	!!This is to find out if they want you to have tattoos.
+	!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
+	tattPrefTmp = tattPref[lover_number]
+	
+	!!This is to set the max min for tattoos
+	
+	if tattPrefTmp = 1:
+		tattPrefTmpMin = 0
+		tattPrefTmpMax = 2
+	elseif tattPrefTmp = 2:
+		tattPrefTmpMin = 3
+		tattPrefTmpMax = 5
+	elseif tattPrefTmp = 3:
+		tattPrefTmpMin = 6
+		tattPrefTmpMax = 999
+	else
+		tattPrefTmpMin = 0
+		tattPrefTmpMax = 999
+	end
+	
+	!!This is to find out how big they want your lips.
+	!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
+	lipsPrefTmp = lipsPref[lover_number]
+	
+	if lipsPrefTmp = 1:
+		lipsPrefTmpMin = 2
+		lipsPrefTmpMax = 3
+	elseif lipsPrefTmp = 2:
+		lipsPrefTmpMin = 3
+		lipsPrefTmpMax = 99
+	else
+		lipsPrefTmpMin = 0
+		lipsPrefTmpMax = 99
+	end
+	
+	
+	
+	!!This is to find out how big they want YOU.
+	!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
+	!! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
+	bodyPrefTmp = bodyPref[lover_number]
+	
+	!!This is to find out how much makeup they want you to wear.
+	!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
+	makePrefTmp = makePref[lover_number]
+	
+	
+	!! This is to see if they like a ditz, average, or a smartypants
+	!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
+	IQPrefTmp = IQPref[lover_number]
+	
+	!!This is the new hair color preference
+	!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
+	hairPref = hairBoy
+	
+	!!This keeps track in the change action what it plans to change
+	$changeFind = ''
+	!!This keeps track on how many 
+	
+	!!How many days until the lover starts to comment.
+	
+	clotDay = 3
+	bodyDay = 7
+	
+	
+	!!How many days until they wants you to change.
+	pierDay = 7
+	tattDay = 7
+	lipsDay = 9
+	titsDay = 12
+	figureDay = 15
+	
+	
+	if loverlove[lover_number] = 3:
+		'<<$loverdesc[lover_number]>> has hired a wedding limousine and it''s outside waiting for you. This is it, you are getting married today.'
+
+		act 'Sit in the limousine':
+			cla
+			'You get into the limo, and it drives off. Soon you arrive at the wedding, <<$loverdesc[lover_number]>> is waiting for you as you walk down the aisle.'
+
+			act 'Marry husband':
+				cla
+				minut += 60
+				loverslove[lover_number] = 0
+				gs 'lover', 'remove', lover_number
+				husband = 100
+				husbanday = 0
+				$husName = $lover[lover_number]
+				$husHair = $loverface[lover_number]
+				$husBody = $loverbod[lover_number]
+				$husFat = $loverbod[lover_number]
+				husDick = loverdick[lover_number]
+				harakHusb = haraklover[lover_number]
+				izvratH = loverizvrat[lover_number]
+				silavagH = loversilaVag[lover_number]
+				husbFin = loverfinance[lover_number]
+				husbandMark = 1
+				'The wedding reception takes place at a cafe. There aren''t many guests since neither you nor the groom have that many friends or family members. There is a lot of congratulations, toasts, merrymaking and crying. By the evening, everybody is drunk and you and your husband stagger into a taxi, which takes you home.'
+
+				act 'Wedding night':gt 'husbsex', 'room'
+			end
+		end
+
+		exit
+	elseif loverlove[lover_number] = 2:
+		'<<$loverdesc[lover_number]>> looks very excited and suddenly pulls a ring out of a box.'
+		'<<$loverdesc[lover_number]>> says "<<$pcs_nickname>>. I offer you my hand and heart. Would you marry me?"'
+
+		act 'No (turn <<$tXem>> down)':
+			minut += 60
+			gs 'lover', 'remove', lover_number
+			pregtalk = 0
+			dynamic $go_home
+			
+		end
+
+		act 'Yes':
+			cla
+			'You agree and put the ring on your finger. <<$loverdesc[lover_number]>> rejoices and happily hugs and kisses you.'
+			'<<$loverdesc[lover_number]>> says "Now you need to find a wedding dress."'
+
+			act 'Go looking for the dress':
+				cla
+				minut += 60
+				loverlove[lover_number] = 3
+				'You get into a taxi with your soon to be husband and go to the store to choose a dress. You choose an expensive and luxurious dress. <<$loverdesc[lover_number]>> pays for the purchase.'
+				'After a long day you feel tired and ask <<$loverdesc[lover_number]>> to drive you home, warning <<$tXem>> that the next time you''ll meet you will get married.'
+				dynamic $go_home
+			end
+		end
+
+		exit
+	end
+
+	if pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and loverlove[lover_number] = 1 and haraklover[lover_number] = 0:
+		'<<$loverdesc[lover_number]>> looks very excited. <<$tXec>> decides that you are now ready to meet <<$tXyr>> mother.'
+
+		act 'Meet the parents':gt 'love', 'mother'
+
+		exit
+	elseif pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and loverlove[lover_number] = 1 and haraklover[lover_number] = 1 and $pantyworntype ! 'none':
+		'<<$loverdesc[lover_number]>> examins you and decides that you are ready to meet <<$tXyr>> friends.'
+
+		act 'Meet his friends':gt 'love', 'frends'
+
+		exit
+	end
+	
+	
+	!!I WILL START HERE!
+	
+
+	!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
+	if clotTypePrefTmp = 0:
+		$clotTypePrefTmp = ''
+	elseif clotTypePrefTmp = 1:
+		$clotTypePrefTmp = 'cheap'
+	elseif clotTypePrefTmp = 2:
+		$clotTypePrefTmp = 'average'
+	elseif clotTypePrefTmp = 3:
+		$clotTypePrefTmp = 'formal'
+	elseif clotTypePrefTmp = 4:
+		$clotTypePrefTmp = 'fetish'
+	end
+	
+	!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
+	if clotQualPrefTmp = 0:
+		$clotQualPrefTmp = 'any type of'
+	elseif clotQualPrefTmp = 1:
+		$clotQualPrefTmp = 'anything but expensive'
+	elseif clotQualPrefTmp = 2:
+		$clotQualPrefTmp = 'expensive'
+	end
+	
+	!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
+	if clotTopPrefTmp = 0:
+		$clotTopPrefTmp = 'any amount of'
+	elseif clotTopPrefTmp = 1:
+		$clotTopPrefTmp = 'a little bit of'
+	elseif clotTopPrefTmp = 2:
+		$clotTopPrefTmp = 'a lot of'
+	elseif clotTopPrefTmp = 3:
+		$clotTopPrefTmp = 'a huge amount of'
+	end
+	
+	!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
+	if bottShorPrefTmp = 0:
+		$bottShorPrefTmp= 'any length'
+	elseif bottShorPrefTmp = 1:
+		$bottShorPrefTmp= 'modest length'
+	elseif bottShorPrefTmp = 2:
+		$bottShorPrefTmp= 'slightly short length'
+	elseif bottShorPrefTmp = 3:
+		$bottShorPrefTmp= 'really short length'
+	end
+	
+	!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
+	if clotThinPrefTmp = 0:
+		$clotThinPrefTmp= ''
+	elseif clotThinPrefTmp = 1:
+		$clotThinPrefTmp= 'thick'
+	elseif clotThinPrefTmp = 2:
+		$clotThinPrefTmp= 'a little thin'
+	elseif clotThinPrefTmp = 3:
+		$clotThinPrefTmp= 'really thin or even see through'
+	end
+	
+	!! 0 - no preference, 1 - Prefers bimbo clothing.
+	if bimbPrefTmp = 0:
+		$bimboPref = ''
+	else
+		$bimboPref = 'a bimbo'
+	end
+	
+	!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
+	if pierPrefTmp = 0:
+		$pierPrefTmp = 'any amount'
+	elseif pierPrefTmp = 1:
+		$pierPrefTmp = 'a couple'
+	elseif pierPrefTmp = 2:
+		$pierPrefTmp = 'a good amount'
+	elseif pierPrefTmp = 3:
+		$pierPrefTmp = 'a lot'
+	end
+	
+	!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
+	if tattPrefTmp = 0:
+		$tattPrefTmp = 'any amount'
+	elseif tattPrefTmp = 1:
+		$tattPrefTmp = 'a couple'
+	elseif tattPrefTmp = 2:
+		$tattPrefTmp = 'a good amount'
+	elseif tattPrefTmp = 3:
+		$tattPrefTmp = 'a lot'
+	end
+	
+	!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
+	if lipsPrefTmp = 0:
+		$lipsPrefTmp = 'any sized lips'
+	elseif lipsPrefTmp = 1:
+		$lipsPrefTmp = 'average sized lips'
+	elseif lipsPrefTmp = 2:
+		$lipsPrefTmp = 'thick lips'
+	end
+	
+	!!This is the Players lip description, this allows flexibility when writing
+	if pcs_lip = 0:
+		$lipDesc = 'thin'
+	elseif pcs_lip = 1:
+		$lipDesc = 'soft'
+	elseif pcs_lip = 2:
+		$lipDesc = 'plump'
+	elseif pcs_lip = 3:
+		$lipDesc = 'juicy'
+	elseif pcs_lip = 4:
+		$lipDesc = 'thick'
+	end
+	
+	
+	
+	!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
+	if bodyPrefTmp = 0:
+		$bodyPrefTmp = 'any weight'
+	elseif bodyPrefTmp = 1:
+		$bodyPrefTmp = 'should be skinny'
+	elseif bodyPrefTmp = 2:
+		$bodyPrefTmp = ' should be not to skinny or fat'
+	elseif bodyPrefTmp = 3:
+		$bodyPrefTmp = 'should be thick and curvy'
+	end
+	
+	!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
+	if makePrefTmp = 0:
+		$makePrefTmp = 'any amount of makeup'
+	elseif makePrefTmp = 1:
+		$makePrefTmp = 'a sutle amount of makeup'
+	elseif makePrefTmp = 2:
+		$makePrefTmp = 'a good amount of makeup'
+	elseif makePrefTmp = 3:
+		$makePrefTmp = 'a heavy amount of makeup'
+	end
+	
+	!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
+	if IQPrefTmp = 0:
+		$IQPrefTmp = 'nice'
+	elseif IQPrefTmp = 1:
+		$IQPrefTmp = 'ditzy'
+	elseif IQPrefTmp = 2:
+		$IQPrefTmp = 'with at least a little brain power'
+	elseif IQPrefTmp = 3:
+		$IQPrefTmp = 'genius'
+	end
+	
+	!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
+	if hairPref = 0:
+		$hairPref = 'black'
+	elseif hairPref = 1:
+		$hairPref = 'brown'
+	elseif hairPref = 2:
+		$hairPref = 'redhead'
+	elseif hairPref = 3:
+		$hairPref = 'blond'
+	elseif hairPref = 4:
+		$hairPref = 'any color'
+	end
+	
+	
+	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
+	if titBoy = 0:
+		$titBoy = 'petite breasts'
+	elseif titBoy = 1:
+		$titBoy = 'good sized breasts'
+	elseif titBoy = 2:
+		$titBoy = 'huge breasts'
+	end
+	
+
+	if pcs_hairbsh = 1 and curly > 0:
+		loverrelation[lover_number] += 2 &
+		$meetHair = 'Your hair looks very beautiful.'
+	end
+	if pcs_hairbsh = 1 and curly = 0:
+		loverrelation[lover_number] += 1 
+		$meetHair = 'You have pretty hair today.'
+	end
+	if pcs_hairbsh = 0:
+		loverrelation[lover_number] -= 1 
+		$meetHair = 'You look like you were in a hurry.'
+	end
+	
+	!!This are generic things your lover will call you based on how much they like you.
+	if loverrelation[lover_number] > 80:
+		randchan = rand(0,2)
+		if randchan = 0 and haraklover[lover_number] ! 0:
+			$giveNick = 'angel'
+		elseif randchan = 1:
+			$giveNick = 'beautiful'
+		elseif randchan = 2:
+			$giveNick = 'love'
+		end
+	elseif loverrelation[lover_number] > 20:
+		randchan = rand(0,1)
+		if randchan = 0:
+			$giveNick = 'babe'
+		elseif randchan = 1:
+			$giveNick = '<<$pcs_nickname>>'
+		end
+	else
+		$giveNick = '<<$pcs_firstname>>'
+	end
+	
+	
+	!! This is the start of the usual talk
+	!!character 0 - soft, 1 -norm 2 - aggressor
+
+	if haraklover[lover_number] = 0:
+		if loverrelation[lover_number] > 70:
+			randchan = rand(0, 1)
+			if randchan = 0:
+				$greet = 'says with love in <<$tXyr>> eyes, "Hey <<$pcs_nickname>>."'
+			elseif randchan = 1:
+				$greet = 'says lovingly, "Hello love. I''m glad so see you."'
+			else
+				$greet = 'says quietly while looking into your eyes, "Hello love." '
+			end
+		elseif loverrelation[lover_number] > 20:
+			randchan = rand(0, 1)
+			if randchan = 0:
+				$greet = 'says with a faint smile,"Hey <<$pcs_nickname>>."'
+			elseif randchan = 1:
+				$greet = 'says with a smile , "Hi <<$pcs_nickname>>."'
+			end
+		else
+			$greet = 'says, "Hi <<$pcs_firstname>>."'
+		end
+	end
+
+	if haraklover[lover_number] = 1:
+		if loverrelation[lover_number] > 70:
+			randchan = rand(0, 1)
+			if randchan = 0:
+				$greet = 'says, "Hey love. I am so happy to see you."'
+			elseif randchan = 1:
+				$greet = 'says intimately, "Hello my angel."'
+			else
+				$greet = 'says while admiring you, "Hello <<$pcs_nickname>> beautiful."'
+			end
+		elseif loverrelation[lover_number] > 20:
+			randchan = rand(0, 1)
+			if randchan = 0:
+				$greet = 'says with a smile, "Hey <<$pcs_nickname>>, glad to see you."'
+			elseif randchan = 1:
+				$greet = 'says with a soft tone, "Hello beautiful."'
+			end
+		else
+			$greet = 'says, "Hello <<$pcs_nickname>>."'
+		end
+	end
+
+	if haraklover[lover_number] = 2:
+		if loverrelation[lover_number] > 70:
+			randchan = rand(0, 1)
+			if randchan = 0:
+				$greet = 'says with a loving voice, "Theres my sexy gal."'
+			elseif randchan = 1:
+				$greet = 'says with a toothful grin, "There is my goddess."'
+			else
+				$greet = 'says with a rather loud enduring voice, "Hey babe!"'
+			end
+		elseif loverrelation[lover_number] > 20:
+			randchan = rand(0, 1)
+			if randchan = 0:
+				$greet = 'says with a grin, "Hey <<$pcs_nickname>>."'
+			elseif randchan = 1:
+				$greet = 'says with a chuckle, "Hey''ya <<$pcs_nickname>>."'
+			end
+		else
+			$greet = 'says, "Hey <<$pcs_nickname>>."'
+		end
+	end
+	
+	
+	
+	!! QUEST VARIABLES!!! WOOOT ALMOST TIME!
+	didPushAway = 0
+	
+	
+	
+	!!How beautiful you are
+	if pcs_skin < 20:
+		loverrelation[lover_number] -= 2 & $meetskin = 'looking at <<$tXyr>> feet'
+	elseif pcs_skin < 40:
+		loverrelation[lover_number] -= 1 & $meetskin = 'giving you a quick glance'
+	elseif pcs_skin < 60:
+		$meetskin = 'looking at you'
+	elseif pcs_skin < 80:
+		loverrelation[lover_number] += 1 & $meetskin = 'smiling at you'
+	else
+		loverrelation[lover_number] += 2 & $meetskin = 'smiling at you'
+	end
+	
+	!! Your lip size
+	if pcs_lip = 0:$meetlip = 'thin lips'
+	if pcs_lip = 1:$meetlip = 'soft lips'
+	if pcs_lip = 2:$meetlip = 'plump lips'
+	if pcs_lip = 3:$meetlip = 'large, plump lips'
+	if pcs_lip = 4:$meetlip = 'thick and huge lips'
+	
+	
+	
+	if loverfinance[lover_number] = 0:$clom = 'dressed in a tracksuit.'
+	if loverfinance[lover_number] = 1:$clom = 'dressed in jeans and a sweater.'
+	if loverfinance[lover_number] = 2 and loverGender [lover_number] = 0:$clom = 'dressed in a respectable and expensive jacket.'
+	if loverfinance[lover_number] = 2 and loverGender [lover_number] = 1:$clom = 'dressed in a beautiful and expensive dress.'
+	
+	!!Greeting start
+	
+	'At the entrance <<$meetskin>> stands <<$loverdesc[lover_number]>>. <<$tXec>> comes over to you and <<$greet>>'
+	
+	
+	gs 'lover_likes', 'hairPref'
+	gs 'lover_likes', 'makePrefTmp'
+	
+	if haraklover[lover_number] = 0:'<<$loverdesc[lover_number]>> looks like a timid and not very confident young <<$loverGenderName>> <<$clom>>'
+	if haraklover[lover_number] = 1:'<<$loverdesc[lover_number]>> looks like a average young <<$loverGenderName>> <<$clom>>'
+	if haraklover[lover_number] = 2:'<<$loverdesc[lover_number]>> looks like a cocky and brash young <<$loverGenderName>> <<$clom>>'
+	
+	
+	
+	
+	!!This is to reset the like part later
+	
+	likeCount = 0
+	like1 = 99
+	like2 = 99
+	like3 = 99
+	
+	!! This is the greeting kissy kissy part
+
+	if haraklover[lover_number] >= 0:
+		if loverrelation[lover_number] > -20:
+			loverrelation[lover_number] += 0
+			'<<$loverdesc[lover_number]>> gets close to you, and you can tell by <<$tXyr>> body movements <<$tXe>> wants to kiss you.'
+			act 'Kiss with tongue':
+				*clr 
+				'You take the initiative and when <<$tXe>> opens <<$tXyr>> mouth you thrust your tongue into <<$tXyr>> mouth.'
+				gs 'arousal', 'kiss', 5
+				pcs_dom += 1
+				pcs_mood += 10
+				gs 'stat'
+				if venera > 4:
+					gs 'lover', 'remove', lover_number
+					'<<$loverdesc[lover_number]>> takes a closer look at you and says, "What is wrong with your lips? They are very sore. Is that genital herpes? I better go, I do not want to get infected. I''m sorry, goodbye."'
+					pcs_mood -= 20
+					dynamic $go_home
+					exit
+				elseif venera < 4 and cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
+
+					if haraklover[lover_number] = 0:
+						loverrelation[lover_number] += 2
+						'Normally this would have made <<$tXem>> feel uncomfortable, but as you pull away <<$tXe>> smiles and sighs contently.'
+					elseif haraklover[lover_number] = 1:
+						loverrelation[lover_number] += 1
+						'<<$tXec>> goes with it a blink and in moments your tongues are intertwined.'
+					elseif haraklover[lover_number] = 2:
+						'It seems as <<$loverdesc[lover_number]>> had the same idea, as <<$tXe>> pushes his tongue into your mouth as much as you push into his.'
+						loverrelation[lover_number] += 2
+					else
+						'This should not fire off at all: TongueKiss'
+					end
+				elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant = 1:
+					if cumloc[11] = 1:
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							'<<$tXec>> can see sperm on your face, but by the bulge in his pants you know it only turns <<$tXem>> on.'
+						end
+					elseif (cumloc[6] = 1 or cumloc[7] = 1):
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							loverrelation[lover_number] += 3
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but by the bulge in his pants you know it only turns <<$tXem>> on.'
+						end
+					end
+				elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
+					if cumloc[11] = 1:
+						gs 'lover', 'remove', lover_number
+						'<<$tXec>> notices the sperm on your face, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you out of his face. "We are through, I don''t want to see your face again!'
+						pcs_mood -= 20
+
+						dynamic $go_home
+						exit
+					elseif (cumloc[6] = 1 or cumloc[7] = 1):
+						loverrelation[lover_number] += 2
+						'<<$tXec>> notices the sperm on your ass, "<<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
+						pcs_mood -= 20
+						dynamic $go_home
+						exit
+					end
+				end
+				cla 
+				act 'Continue':
+					xgt 'meet', 'likes'
+				
+				end
+				exit
+			end
+			act 'Kiss with lips':
+				*clr 
+				'You press your <<$meetlip>> softly against his, and for a split second time seems to stop.'
+				pcs_mood += 10
+				if cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
+
+					if haraklover[lover_number] = 0:
+						loverrelation[lover_number] += 2
+						'<<$tXec>> wraps arms around you, you both stay like this for at least a couple of seconds and as you pull away <<$tXe>> looks into your eyes and smiles.'
+						gs 'arousal', 'kiss', 5
+						gs 'stat'
+					elseif haraklover[lover_number] = 1:
+						loverrelation[lover_number] += 2
+						'<<$tXec>> kisses you back with such skill it turns you on.'
+						gs 'arousal', 'kiss', 5
+						gs 'stat'
+					elseif haraklover[lover_number] = 2:
+						loverrelation[lover_number] += 2
+						'<<$tXec>> kisses you back with such passion you feel a tingle within you.'
+						gs 'arousal', 'kiss', 5
+						gs 'stat'
+					end
+				elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[12] = 1 and pervConstant = 1:
+					if cumloc[11] = 1:
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							loverrelation[lover_number] += 3
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but by the bulge in his pants you know it only turns <<$tXem>> on.'
+						end
+					elseif (cumloc[6] = 1 or cumloc[7] = 1):
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							loverrelation[lover_number] += 3
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but by the bulge in his pants you know it only turns <<$tXem>> on.'
+						end
+					elseif cumloc[12] = 1:
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can smell the scent of sperm on you, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can smell the scent of sperm on you, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							loverrelation[lover_number] += 3
+							pcs_horny += 5
+							'<<$tXec>> can smell the scent of sperm on you, but you know by the bulge in his pants it only turns <<$tXem>> on more.'
+						end
+					end
+				else 
+					if cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
+						if cumloc[11] = 1:
+							gs 'lover', 'remove', lover_number
+							'<<$tXec>> notices the sperm on your face, "<<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you out of his face. "We are through, I don''t want to see your face again!'
+							pcs_mood -= 20
+
+							dynamic $go_home
+							exit
+						elseif (cumloc[6] = 1 or cumloc[7] = 1):
+							gs 'lover', 'remove', lover_number
+							'<<$tXec>> notices the sperm on your ass, "<<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
+							pcs_mood -= 20
+
+							dynamic $go_home
+							exit
+						end
+					end
+				end
+				cla
+				act 'Continue':
+					xgt 'meet', 'likes'
+
+				end
+				exit
+			end
+			act 'Hint for a kiss on the cheek':
+				*clr 
+				'You make a cute pouty face and turn your cheek toward <<$loverdesc[lover_number]>>. <<$tXec>> understands and though <<$tXe>> wanted to kiss you, <<$tXe>> settles with giving you a peck on the cheek'
+				pcs_mood += 10
+				if cumloc[11] = 0 and (cumloc[6] = 0 and cumloc[7] = 0):
+
+					if haraklover[lover_number] = 0:
+						loverrelation[lover_number] += 2
+						'<<$tXec>> gives you a soft kiss on the cheek, and you can tell <<$tXe>> finds this act very cute.'
+						gs 'arousal', 'kiss', 5
+						gs 'stat'
+					elseif haraklover[lover_number] = 1:
+						loverrelation[lover_number] += 1
+						'<<$tXec>> kisses you on the cheek and before <<$tXe>> pulls away you feel a quick kiss on the forhead.'
+						gs 'arousal', 'kiss', 5
+						gs 'stat'
+					elseif haraklover[lover_number] = 2:
+						loverrelation[lover_number] += 0
+						'Though you can tell <<$tXe>> is a bit disappointed, <<$tXe>> gives you a kiss on the cheek. As <<$tXe>> pulls away <<$tXe>> gives your ass a quick squeeze.'
+						gs 'arousal', 'kiss', 5
+						gs 'stat'
+					end
+				elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[12] = 1 and pervConstant = 1:
+					if cumloc[11] = 1:
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 2
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							loverrelation[lover_number] += 3
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your face, but by the bulge in his pants you know it only turns <<$tXem>> on.'
+						end
+					elseif (cumloc[6] = 1 or cumloc[7] = 1):
+
+						if haraklover[lover_number] = 0:
+							loverrelation[lover_number] += 1
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but underneath his shy demener you know that it only turns <<$tXem>> on.'
+
+						elseif haraklover[lover_number] = 1:
+							loverrelation[lover_number] += 1
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but you know that it only turns <<$tXem>> on more.'
+
+						elseif haraklover[lover_number] = 2:
+							loverrelation[lover_number] += 1
+							pcs_horny += 5
+							'<<$tXec>> can see sperm on your ass, but by the bulge in his pants you know it only turns <<$tXem>> on.'
+						end
+					end
+				elseif cumloc[11] = 1 or (cumloc[6] = 1 or cumloc[7] = 1) and pervConstant ! 1:
+					if cumloc[11] = 1:
+						gs 'lover', 'remove', lover_number
+						'<<$tXec>> notices the sperm on your face, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you out of his face. "We are through, I don''t want to see your face again!'
+						pcs_mood -= 20
+						dynamic $go_home
+						exit
+					elseif (cumloc[6] = 1 or cumloc[7] = 1):
+						gs 'lover', 'remove', lover_number
+						'<<$tXec>> notices the sperm on your ass, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
+						pcs_mood -= 20
+						dynamic $go_home
+						exit
+					elseif (cumloc[6] = 1 or cumloc[7] = 1):
+						gs 'lover', 'remove', lover_number
+						'<<$tXec>> realizes your mouth smells like sperm, "H-Hey- <<$pcs_firstname>>! What the...?! You dirty whore!", <<$tXe>> then pushes you away. "We are through, I don''t want to see your face again!'
+						pcs_mood -= 20
+						dynamic $go_home
+						exit
+					end
+				end	
+				cla 
+				act 'Continue':
+					xgt 'meet', 'likes'
+				
+				end
+				exit
+			end
+			act 'Push his face away':
+				*clr 
+				didPushAway = 1
+				'Maybe you had a bad day, maybe you don''t want a kiss, you rudely push his face away, and by the looks of it, hurting his feelings in the process.'
+
+				if haraklover[lover_number] = 0:
+					loverrelation[lover_number] -= 7
+					'<<$tXec>> stands there slightly embarrassed, and you can tell this hurt your relationship a good amount.'
+				elseif haraklover[lover_number] = 1:
+					loverrelation[lover_number] -= 5
+					'<<$tXec>> looks at you slightly concerned, but backs off and gives you your space.'
+				elseif haraklover[lover_number] = 2:
+					loverrelation[lover_number] -= 10
+					'<<$tXec>> begins to get angry, <<$tXe>> takes a deep breath and gives you space.'
+				end
+				cla 
+				act 'Continue':
+					xgt 'meet', 'likes'
+				
+				end
+				exit
+			end
+		end
+	end
+	
+end	
+	
+
+if $ARGS[0] = 'likes':
+	cla
+	if loverdays[lover_number] >= clotDay:
+		gs 'lover_likes', 'clothesPref'
+		
+	end
+	if loverdays[lover_number] >= bodyDay:
+		gs 'lover_likes', 'bodyPrefTmp'
+	end
+	
+	xgt 'meet', 'actions'
+
+	
+end
+	
+if $ARGS[0] = 'actions':
+	cls 
+
+	act 'Can I ask you how you think I look?':
+		'<<$loverdesc[lover_number]>> says "If you insist" and tells you exactly how <<$tXe>> thinks you look based on what <<$tXe>> likes:'
+		gs 'lover_likes', 'allPref'
+		act 'Okay, lets talk about something else':
+			xgt 'meet', 'actions'
+		end
+	end
+	act 'What do you want to do today?':
+		cla 
+		randchan = rand(0, 1)
+		if randchan = 0:
+			sub += 1
+		end
+		'You tell <<$tXem>> you would rather <<$tXem>> decide what we do today.'
+
+		if haraklover[lover_number] = 0:
+			loverrelation[lover_number] += 0
+			'Not used to being given the opportunity to choose, <<$tXe>> thinks what to do...'
+		elseif haraklover[lover_number] = 1:
+			loverrelation[lover_number] += 0
+			'<<$tXec>> thinks about what to do today.'
+		elseif haraklover[lover_number] = 2:
+			loverrelation[lover_number] += 1
+			'You can tell <<$tXe>> is happy you gave <<$tXem>> the ability to choose what to do today.'
+		end
+		!!This is the choice maker!
+
+		if loverfinance[lover_number] = 0:
+			!! 0 - change player, 1 - beer in stairwell, 2 - walk in park, 
+			randchan = rand(0, 2)
+			!! 1 = does like, 0 = not like
+			if (pierWearCount >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
+				pierCheck = 1
+			else
+				pierCheck = 0
+			end
+			if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
+				tattCheck = 1
+			else
+				tattCheck = 0
+			end
+			if (makeupSetting = makePrefTmp) or makePrefTmp = 0:
+				makeupCheck = 1
+			else
+				makeupCheck = 0
+			end
+			if pcs_haircol = hairPref:
+				hairCheck = 1
+			else
+				hairCheck = 0
+			end
+			if (pierWearCount >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
+				pierCheck = 1
+			else
+				pierCheck = 0
+			end
+			if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
+				tattCheck = 1
+			else
+				tattCheck = 0
+			end
+			
+			
+			if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck) = 4:
+				randchan = rand(1, 2)
+			end
+
+			if randchan = 0:
+				cls 
+				!!Some things you can change.
+				!!loverfinance[lover_number] = 0 - hair, makeup, tattoo, piercings.
+
+				if haraklover[lover_number] = 0:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				elseif haraklover[lover_number] = 1:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				elseif haraklover[lover_number] = 2:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				end
+				'"Whats up <<$loverdesc[lover_number]>>?"'
+				'"There is just a trait about you that bugs me, can we change that?"'
+				if loverscompliance[lover_number] > 0:
+					'You know you have changed for <<$tXem>> before, and you want to avoid to changing into something you are not.'
+				end
+				
+				gs 'lover_likes', 'compliance'
+				
+				'"And what did you want to change about me?"'
+				!!This is to make a last check on how many piercings they are WEARING
+				gs 'lover_likes', 'checkPier'
+
+				if pcs_haircol ! hairPref:
+					'<<$loverdesc[lover_number]>> looks at your hair and says, "can we get your hair dyed?"'
+					!!act 'I''d rather not...':
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I like my hair just the way it is':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeHair'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change it, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily and takes you to the salon.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Go to Salon':		
+									gt 'lover_likes', 'changeHair'
+								end
+								exit
+							end
+						end
+					end
+				elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
+					'<<$loverdesc[lover_number]>> thinks about it and says "Can you wear <<$makePrefTmp>> from now on?"'
+					!!act 'I''d rather not...':
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I like my makeup just the way it is':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Agree to change the makeup you usually wear':
+							gt 'lover_likes', 'changeMake'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. You can tell that <<$tXe>> is bummed when <<$tXe>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you like the makeup you usually wear':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "What''s wrong with my makeup...?"':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change it, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. You tell <<$tXem>> from now on you will wear <<$makePrefTmp>>.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Continue':		
+									gt 'lover_likes', 'changeMake'
+								end
+								exit
+							end
+						end
+					end
+				elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> talks about how you just don''t have the right amount of piercings.'
+					if pierWearCount < pierPrefTmpMin:
+						'<<$tXec>> tells you that you should have more piercings.'
+					else
+						'<<$tXec>> tells you that you should have less piercings.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I am not going to change my piercings!':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Agree to change the amount of piercings you have':
+							gt 'lover_likes', 'changePier'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the amount of piercings you have, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily and then gets down to how to get the right amount of piercings.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Continue':		
+									gt 'lover_likes', 'changePier'
+								end
+								exit
+							end
+						end
+					end
+				elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> talks about how you just don''t have the right amount of tattoos.'
+					if tattCount < tattPrefTmpMin:
+						'<<$tXec>> tells you that you should have more tattoos.'
+					else
+						'<<$tXec>> tells you that you should have less tattoos.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I am not going to change my tattoos!':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Agree to change the amount of tattoos you have':
+							gt 'lover_likes', 'changeTatt'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+						act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the amount of tattoos you have, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily then starts to take you to the tattoo parlor to get the right amount of tattoos.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Go to tattoo parlor':		
+									gt 'lover_likes', 'changeTatt'
+								end
+								exit
+							end
+						end
+					end
+					
+				else
+					'Erm... Nothing..."'
+					act 'Well then...':
+						xgt 'meet', 'actions'
+						exit
+					end
+				end
+			elseif randchan = 1:
+				'<<$loverdesc[lover_number]>> suggest you and <<$tXem>> drink a beer in the stairwell.'
+				act 'Sorry, but I need to go':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'podezdM', 'start'
+
+				exit
+			
+			elseif randchan = 2:
+				'<<$loverdesc[lover_number]>> suggests that you take a walk in the park.'
+
+				act 'Sorry, but I need to go':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'parkM', 'start'
+
+				exit
+			
+			end
+		elseif loverfinance[lover_number] = 1:
+			!! 0 - change player, 1 - go to the movies, 2 - walk in park, 3 , suggests that you go to a cafe.
+			randchan = rand(0, 3)
+			!! 1 = does like, 0 = not like
+			if (pierWearCount >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
+				pierCheck = 1
+			else
+				pierCheck = 0
+			end
+			if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
+				tattCheck = 1
+			else
+				tattCheck = 0
+			end
+			if (makeupSetting = makePrefTmp) or makePrefTmp = 0:
+				makeupCheck = 1
+			else
+				makeupCheck = 0
+			end
+			if pcs_haircol = hairPref:
+				hairCheck = 1
+			else
+				hairCheck = 0
+			end
+			if tits >= titMin and tits <= titMax:
+				titCheck = 1
+			else
+				titCheck = 0
+			end
+			
+			if pcs_lips >= lipsPrefTmpMin and tits <= lipsPrefTmpMax:
+				lipsCheck = 1
+			else
+				lipsCheck = 0
+			end
+			
+			
+			if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck + titCheck + lipsCheck) = 6:
+				'Takes one look at your body and loves every part of it.'
+				randchan = rand(1, 3)
+			end
+			if randchan = 0:
+				cls 
+				!!Some things you can change.
+				!!loverfinance[lover_number] = 1 - hair, makeup, tattoo, piercings, lips, tits.
+
+				if haraklover[lover_number] = 0:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				elseif haraklover[lover_number] = 1:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				elseif haraklover[lover_number] = 2:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				end
+				'"Whats up <<$loverdesc[lover_number]>>?"'
+				'"There is just a trait about you that bugs me, can we change that?"'
+				if loverscompliance[lover_number] > 0:
+					'You know you have changed for <<$tXem>> before, and you want to avoid to changing into something you are not.'
+				end
+				
+				gs 'lover_likes', 'compliance'
+				
+				'"And what did you want to change about me?"'
+				!!This is to make a last check on how many piercings they are WEARING
+				gs 'lover_likes', 'checkPier'
+				
+				
+				
+				if pcs_haircol ! hairPref:
+					'<<$loverdesc[lover_number]>> looks at your hair and says, "can we get your hair dyed?"'
+					!!act 'I''d rather not...':
+					if sub < 20 and loverrelation[lover_number] < 60 and compliance < 6:
+						act 'I like my hair just the way it is':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeHair'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change it, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily and takes you to the salon.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Go to Salon':		
+									gt 'lover_likes', 'changeHair'
+								end
+								exit
+							end
+						end
+					end
+				elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
+					'<<$loverdesc[lover_number]>> thinks about it and says "Can you wear <<$makePrefTmp>> from now on?"'
+					!!act 'I''d rather not...':
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I like my makeup just the way it is':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Agree to change the makeup you usually wear':
+							gt 'lover_likes', 'changeMake'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. You can tell that <<$tXe>> is bummed when <<$tXe>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you like the makeup you usually wear':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "What''s wrong with my makeup...?"':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change it, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. You tell <<$tXem>> from now on you will wear <<$makePrefTmp>>.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Continue':		
+									gt 'lover_likes', 'changeMake'
+								end
+								exit
+							end
+						end
+					end
+				elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> talks about how you just don''t have the right amount of piercings.'
+					if pierWearCount < pierPrefTmpMin:
+						'<<$tXec>> tells you that you should have more piercings.'
+					else
+						'<<$tXec>> tells you that you should have less piercings.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I am not going to change my piercings!':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Agree to change the amount of piercings you have':
+							gt 'lover_likes', 'changePier'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the amount of piercings you have, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily and then gets down to how to get the right amount of piercings.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Continue':		
+									gt 'lover_likes', 'changePier'
+								end
+								exit
+							end
+						end
+					end
+				elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> talks about how you just don''t have the right amount of tattoos.'
+					if tattCount < tattPrefTmpMin:
+						'<<$tXec>> tells you that you should have more tattoos.'
+					else
+						'<<$tXec>> tells you that you should have less tattoos.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I am not going to change my tattoos!':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Agree to change the amount of tattoos you have':
+							gt 'lover_likes', 'changeTatt'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+						act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the amount of tattoos you have, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily then starts to take you to the tattoo parlor to get the right amount of tattoos.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Go to tattoo parlor':		
+									gt 'lover_likes', 'changeTatt'
+								end
+								exit
+							end
+						end
+					end
+					
+				elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]: 
+					'<<$loverdesc[lover_number]>> tells you your lips are just not the right size.'
+					if pcs_lip < lipsPrefTmpMin:
+						'<<$tXec>> tells you that you should get lip injections.'
+					else
+						'<<$tXec>> tells you that you should have lip reduction.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act '"My lips are fine the way they are!", you say slightly offended':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change your lip size, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeLips'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much to get work done on my lips':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to get work done on your lips. <<$tXec>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> that you decide what size lips you look good with':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You squeek, "But I like the size of my lips..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the size, but you successfully tell <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
+								sub += 4
+								loverrelation[lover_number] += 5
+								act 'Go to the clinic':		
+									gt 'lover_likes', 'changeLips'
+								end
+								exit
+							end
+						end
+					end
+				
+				elseif tits < titMin or tits > titMax and titsDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> tells you your breasts are just not right.'
+					if tits < titMin:
+						'<<$tXec>> tells you that you should get breast implants.'
+					else
+						'<<$tXec>> tells you that you should have a breast reduction.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act '"My breasts are fine the way they are!", you say slightly offended':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change your breast size, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeTits'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much to get work done on my breasts':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to get work done on your breasts. <<$tXec>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> that you decide what size breasts you look good with':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You squeek, "But I like the size of my breasts..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the size, but you successfully tell <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
+								sub += 4
+								loverrelation[lover_number] += 5
+								act 'Go to the clinic':		
+									gt 'lover_likes', 'changeTits'
+								end
+								exit
+							end
+						end
+					end
+				else
+					'"Erm... Nothing..."'
+					act '"Well then..."':
+						*clr 
+						xgt 'meet', 'actions'
+						exit
+					end
+				end
+			elseif randchan = 1:
+				'<<$loverdesc[lover_number]>> suggests that you go to the movies.'
+
+				act 'Sorry, but I need to go':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'kinoM', 'start'
+
+				exit
+			elseif randchan = 2:
+				'<<$loverdesc[lover_number]>> suggest that you take a walk in the park'
+
+				act 'Sorry, but I need to go':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home	
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'parkM', 'start'
+
+				exit
+			elseif randchan = 3:
+				'<<$loverdesc[lover_number]>> suggests that you go to a cafe.'
+
+				act 'Sorry, but I need to go':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home	
+				end
+				act 'Go with <<$tXem>>':gt 'kafeM', 'start'
+
+				exit
+			end
+			
+		elseif loverfinance[lover_number] = 2:
+			!!Some things you can change.
+			!!loverfinance[lover_number] = 2 - hair, makeup, tattoo, piercings, lips, tits
+			!! 0 - change player, 1 - go to a cafe, 2 - go to a restaurant, 3 - to the movies. 
+			randchan = rand(0, 3)
+			!! 1 = does like, 0 = not like
+			if (pierWearCount >= pierPrefTmpMin and pierWearCount <= pierPrefTmpMax) or pierPrefTmp = 0:
+				pierCheck = 1
+			else
+				pierCheck = 0
+			end
+			if (tattCount >= tattPrefTmpMin and tattCount <= tattPrefTmpMax) or tattPrefTmp = 0:
+				tattCheck = 1
+			else
+				tattCheck = 0
+			end
+			if (makeupSetting = makePrefTmp) or makePrefTmp = 0:
+				makeupCheck = 1
+			else
+				makeupCheck = 0
+			end
+			if pcs_haircol = hairPref:
+				hairCheck = 1
+			else
+				hairCheck = 0
+			end
+			if tits >= titMin and tits <= titMax:
+				titCheck = 1
+			else
+				titCheck = 0
+			end
+			
+			if pcs_lips >= lipsPrefTmpMin and tits <= lipsPrefTmpMax:
+				lipsCheck = 1
+			else
+				lipsCheck = 0
+			end
+			
+			if salocatnow <= figurePrefMax:
+				figureCheck = 1
+			else
+				figureCheck = 0
+			end
+
+			
+			
+			if randchan = 0 and (pierCheck + tattCheck + makeupCheck + hairCheck + titCheck + lipsCheck + figureCheck) = 7:
+				'Takes one look at your body and loves every part of it.'
+				randchan = rand(1, 3)
+			end
+			
+			if randchan = 0:
+				cls 
+				!!Some things you can change.
+				!!loverfinance[lover_number] = 2 - hair, makeup, tattoo, piercings, lips, tits, figure.
+
+				if haraklover[lover_number] = 0:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				elseif haraklover[lover_number] = 1:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				elseif haraklover[lover_number] = 2:
+					'"Actually can I talk to you about something?", <<$loverdesc[lover_number]>> asks you.'
+				end
+				'"Whats up <<$loverdesc[lover_number]>>?"'
+				'"There is just a trait about you that bugs me, can we change that?"'
+				if loverscompliance[lover_number] > 0:
+					'You know you have changed for <<$tXem>> before, and you want to avoid to changing into something you are not.'
+				end
+				
+				gs 'lover_likes', 'compliance'
+				
+				'"And what did you want to change about me?"'
+				!!This is to make a last check on how many piercings they are WEARING
+				gs 'lover_likes', 'checkPier'
+				
+				
+				
+				if pcs_haircol ! hairPref:
+					'<<$loverdesc[lover_number]>> looks at your hair and says, "can we get your hair dyed?"'
+					!!act 'I''d rather not...':
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I like my hair just the way it is':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeHair'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change it, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily and takes you to the salon.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Go to Salon':		
+									gt 'lover_likes', 'changeHair'
+								end
+								exit
+							end
+						end
+					end
+				elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
+					'<<$loverdesc[lover_number]>> thinks about it and says "Can you wear <<$makePrefTmp>> from now on?"'
+					!!act 'I''d rather not...':
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I like my makeup just the way it is':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Agree to change the makeup you usually wear':
+							gt 'lover_likes', 'changeMake'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. You can tell that <<$tXe>> is bummed when <<$tXe>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you like the makeup you usually wear':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "What''s wrong with my makeup...?"':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change it, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. You tell <<$tXem>> from now on you will wear <<$makePrefTmp>>.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Continue':		
+									gt 'lover_likes', 'changeMake'
+								end
+								exit
+							end
+						end
+					end
+				elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> talks about how you just don''t have the right amount of piercings.'
+					if pierWearCount < pierPrefTmpMin:
+						'<<$tXec>> tells you that you should have more piercings.'
+					else
+						'<<$tXec>> tells you that you should have less piercings.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I am not going to change my piercings!':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Agree to change the amount of piercings you have':
+							gt 'lover_likes', 'changePier'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the amount of piercings you have, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily and then gets down to how to get the right amount of piercings.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Continue':		
+									gt 'lover_likes', 'changePier'
+								end
+								exit
+							end
+						end
+					end
+				elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> talks about how you just don''t have the right amount of tattoos.'
+					if tattCount < tattPrefTmpMin:
+						'<<$tXec>> tells you that you should have more tattoos.'
+					else
+						'<<$tXec>> tells you that you should have less tattoos.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act 'I am not going to change my tattoos!':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change it, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+						end
+						act 'Agree to change the amount of tattoos you have':
+							gt 'lover_likes', 'changeTatt'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much...':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to do that. <<$tXec>> tells you <<$tXe>> has something to do and heads off'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+						act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> you are who you are':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You mumble "I would rather not..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the amount of tattoos you have, but you successfully inform <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> smiles happily then starts to take you to the tattoo parlor to get the right amount of tattoos.'
+								sub += 2
+								loverrelation[lover_number] += 5
+								act 'Go to tattoo parlor':		
+									gt 'lover_likes', 'changeTatt'
+								end
+								exit
+							end
+						end
+					end
+					
+				elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]: 
+					'<<$loverdesc[lover_number]>> tells you your lips are just not the right size.'
+					if pcs_lip < lipsPrefTmpMin:
+						'<<$tXec>> tells you that you should get lip injections.'
+					else
+						'<<$tXec>> tells you that you should have lip reduction.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act '"My lips are fine the way they are!", you say slightly offended':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change your lip size, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							dynamic $go_home
+								
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeLips'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much to get work done on my lips':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to get work done on your lips. <<$tXec>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+								
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> that you decide what size lips you look good with':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You squeek, "But I like the size of my lips..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the size, but you successfully tell <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home		
+
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
+								sub += 4
+								loverrelation[lover_number] += 5
+								act 'Go to the clinic':		
+									gt 'lover_likes', 'changeLips'
+								end
+								exit
+							end
+						end
+					end
+				
+				elseif tits < titMin or tits > titMax and titsDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> tells you your breasts are just not right.'
+					if tits < titMin:
+						'<<$tXec>> tells you that you should get breast implants.'
+					else
+						'<<$tXec>> tells you that you should have a breast reduction.'
+					end
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act '"My breasts are fine the way they are!", you say slightly offended':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change your breast size, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeTits'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much to get work done on my breasts':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to get work done on your breasts. <<$tXec>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+							act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> that you decide what size breasts you look good with':
+								cla
+								pcs_dom += 1
+								loverrelation[lover_number] -=3
+								'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+								dynamic $go_home
+							end
+							exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You squeek, "But I like the size of my breasts..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change the size, but you successfully tell <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''
+								dynamic $go_home
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
+								sub += 4
+								loverrelation[lover_number] += 5
+								act 'Go to the clinic':		
+									gt 'lover_likes', 'changeTits'
+								end
+								exit
+							end
+						end
+					end
+				elseif salocatnow > figurePrefMax and figureDay <= loverdays[lover_number]:
+					'<<$loverdesc[lover_number]>> tells you your body is just too thick.'
+					'<<$tXec>> offers to pay for you to get lyposuction.'
+					if sub < 20 and loverrelation[lover_number] < 60 and loverscompliance[lover_number] < 6:
+						act '"My body weight is fine the way it is!", you say slightly offended':
+							cla
+							cls
+							loverrelation[lover_number] -= 3
+							'<<$loverdesc[lover_number]>> tries to push you to change your body weight, but you are not that submissive to be pressured by <<$tXem>>, nor do your emotions make you make a choice you may regret.'
+							
+							dynamic $go_home
+						end
+						act 'Go with <<$tXem>>':
+							gt 'lover_likes', 'changeFigure'
+						end
+						exit
+					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
+						act 'You think to yourself, its not like I like <<$tXem>> THAT much to get lyposuction':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> <<$tXe>> realizes you adoration for <<$tXem>> isn''t enough to pressure you to get work done on your weight. <<$tXec>> tells you <<$tXe>> has something to do and heads off.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub <= 20 and loverscompliance[lover_number] < 6:
+						act 'Your personality is not something that can be dominated that easily, and you brush <<$tXem>> off, telling <<$tXem>> that you decide what size your body looks good at':
+							cla
+							pcs_dom += 1
+							loverrelation[lover_number] -=3
+							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXyrself>>.'
+							dynamic $go_home
+						end
+						exit
+					elseif sub > 20 or loverscompliance[lover_number] >= 6:
+						act 'You squeek, "But I like being this weight..."':
+							cla
+							loverrelation[lover_number] -= 2
+							wantRand = rand(0, 100)
+							wantRand -= 4*loverscompliance[lover_number]
+							if wantRand > sub:
+								cla
+								'<<$loverdesc[lover_number]>> tries to push you to change your weight, but you successfully tell <<$tXem>> that you do not want to. This makes <<$tXem>> rather upset.'
+								''	
+								dynamic $go_home		
+								exit
+							elseif wantRand <= sub:
+								cla
+								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeaner, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
+								sub += 4
+								loverrelation[lover_number] += 5
+								act 'Go to the clinic':		
+									gt 'lover_likes', 'changeFigure'
+								end
+								exit
+							end
+						end
+					end
+				else
+					'"Erm... Nothing..."'
+					act '"Well then..."':
+						*clr 
+						xgt 'meet', 'actions'
+						exit
+					end
+				end
+			elseif randchan = 1:
+				'<<$loverdesc[lover_number]>> suggests that you go to a cafe.'
+
+				act 'Sorry, but I need to leave':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'kafeM', 'start'
+
+				exit
+			elseif randchan = 2:
+				'<<$loverdesc[lover_number]>> suggests that you go to a restaurant.'
+
+				act 'Sorry, but I need to leave':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'restoranM', 'start'
+
+				exit
+			elseif randchan = 3:
+				'<<$loverdesc[lover_number]>> suggests that you go to the movies.'
+
+				act 'Sorry, but I need to go':
+					cla
+
+					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
+					dynamic $go_home
+					
+				end
+
+				act 'Go with <<$tXem>>':gt 'kinoM', 'start'
+
+				exit
+			end
+		end
+	end
+	act 'I want to do something today':
+		cla
+		
+		
+		randchan = rand(0, 1)
+		if randchan = 0:
+			pcs_dom += 1
+		end
+		'"What do you want to do?", <<$tXe>> asks'
+		act '"Lets go just relax in the stairwell and drink some beer."':
+			act 'Go with <<$tXem>>':gt 'podezdM', 'start'
+		end
+		act '"Lets take a walk in the park"':
+			act 'Go with <<$tXem>>':gt 'parkM', 'start'
+		end
+		act '"Lets go see a movie"':
+			act 'Go with <<$tXem>>':gt 'kinoM', 'start'
+		end
+		act '"Lets go to the cafe."':
+			act 'Go with <<$tXem>>':gt 'kafeM', 'start'
+		end
+		
+		act 'Never mind...':
+			gt 'meet', 'actions'
+			exit
+		end
+	end
+	act 'I think we should break up...':
+		cla 
+		'<<$tXec>> looks hurt, but you insist it is for the best. You both say goodbye and part ways.'
+		gs 'lover', 'remove', lover_number
+		act 'Continue':
+			dynamic $go_home
+			
+			exit
+		end
+		
+	end
+end
+
+--- girl_meet ---------------------------------
+

locations/liames

@@ -65,7 +65,7 @@ if streetrand >= 60 and pcs_lover < 3:
 
 		act 'Tell him your telephone number':
 			cla
-			gs'boyfrend','start'
+			gs'boyfrend', 'start'
 			stopboy = 0
 			'<<$boydesc>> record your phone and left.'
 			act 'Complete outing':gt 'liames'

locations/lover

@@ -48,6 +48,21 @@ if $ARGS[0] = 'add':
 	bodyPref[i] = bodyPrefTmp
 	makePref[i] = makePrefTmp
 	IQPref[i] = IQPrefTmp
+	loverGender[i] = loverGenderTmp
+
+	!! making sure lover has pronouns
+	gs 'pronouns', loverGender[i], 0
+	$loverXe[i] = $xe[0]
+	$loverXec[i] = $xec[0]
+	$loverXem[i] = $xem[0]
+	$loverXemc[i] = $xemc[0]
+	$loverXyr[i] = $xyr[0]
+	$loverXyrc[i] = $xyrc[0]
+	$loverXyrs[i] = $xyrs[0]
+	$loverXyrsc[i] = $xyrsc[0]
+	$loverXemself[i] = $xemself[0]
+	$loverXemselfc[i] = $xemselfc[0]
+
 	
 	pcs_lovers[i] = 1
 	pcs_lover +=1

locations/lover_change

@@ -0,0 +1,1169 @@
+# lover_change
+
+gs 'lover_pronouns'
+
+if $ARGS[0] = 'Hair':
+	'As you arrive at the salon with <<$loverdesc[lover_number]>>, <<$tXe>> heads over to the counter and tells something to the barber. The barber nods and comes towards you.' 
+	'"So Ms.<<$pcs_lastname>>, you want to get your hair dyed <<$hairPref>> now is that right?"'
+	act 'Nod':		
+		cla 
+		'Knowing there is no way to back out of this now, you meekly nod.'	
+		'"Alrighty then, your hair will be <<$hairPref>> before you know it!"'
+		act 'Take a seat':
+			cla 
+			if pcs_haircol ! hairPref: pcs_haircol = hairPref
+				dyefade = rand(35,42)
+				collength = pcs_hairlng
+			minut += 20
+			'In less then 20 minutes you see that your hair''s original color has been changed to <<$hairPref>>.'
+			act 'Get up from chair and go to your <<$tBoyGirlfriend>>.':
+				cla 
+				'You walk towards your <<$tBoyGirlfriend>> with your new <<$hairPref>> hair and <<$tXe>> tells you that you look amazing.'
+				'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
+				'You then leave the salon and head home.'
+				loverscompliance[lover_number] += 1
+				act 'Continue': dynamic $go_home
+			exit
+			end
+			
+		end
+	end
+end
+if $ARGS[0] = 'Make':
+	'After you agree to change your makeup routine for <<$tXem>>, you talk a bit with <<$tXem>> for an hour and then head home.'
+	'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+	minut += 60
+	if makeupSetting ! makePrefTmp: makeupSetting = makePrefTmp
+	loverscompliance[lover_number] += 1
+	act 'Continue': dynamic $go_home
+exit
+end
+
+if $ARGS[0] = 'Pier':
+	'Since you agreed to adjust your piercings to fit your <<$tBoyGirlfriend>>''s preferences, <<$tXe>> looks at any pre-existing piercings you may have.'
+	if pierWearCount < pierPrefTmpMin and pierCount >= pierPrefTmpMin:
+		'<<$loverdesc[lover_number]>> sees that you have enough piercings already, and that you just need to wear them.'
+		act 'Let <<$tXem>> add piercings':
+			cla
+			'<<$tXec>> pulls out a couple of piercings and starts to put them on you.'
+			if pirsA = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$tXec>> asks you to stick out your tongue, then inserts a barbell into your tongue.'
+				pirsA = 1
+				pierWearCount += 1
+			end
+			if pirsB = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$tXec>> gently holds your lip, then inserts a ring.'
+				pirsB = 1
+				pierWearCount += 1
+			end
+			if pirsC = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$tXec>> sees you do not have earrings and proceeds to put rings onto your ears. '
+				pirsC = 1
+				pierWearCount += 1
+			end
+			if pirsD = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$tXec>> takes out a ring and then carefully inserts a ring through your nose.'
+				pirsD = 1
+				pierWearCount += 1
+			end
+			if pirsE = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$loverdesc[lover_number]>> moves to your eyebrow and proceeds to insert a barbell.'
+				pirsE = 1
+				pierWearCount += 1
+			end
+			if pirsN = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$tXec>> takes out a barbell and inserts it into your navel.'
+				pcs_horny += 2
+				pirsN = 1
+				pierWearCount += 1
+			end
+			if pirsF = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$loverdesc[lover_number]>> looks around, then pulls out a couple of nipple rings. You can tell it slightly turns <<$tXem>> on as <<$tXe>> works <<$tXyr>> way up your shirt to put on the nipple rings.'
+				pcs_horny += 5
+				pirsF = 1
+				pierWearCount += 1
+			end
+			if pirsG = 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then <<$tXe>> nonchalantly slides <<$tXyr>> hand down to your labia, and inserts a ring.'
+				'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
+				pcs_horny += 7
+				pirsG = 1
+				pierWearCount += 1
+			end
+			act '"All done!" <<$loverdesc[lover_number]>> says.':
+				cla
+				gs'stat'
+				'You look at your body and examine it.'
+				if pierPrefTmp = 1:
+					'This should not fire off how did <<$tXe>> want to add stuff to nothing?'
+				elseif pierPrefTmp = 2:
+					'You can tell <<$tXe>> likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
+				elseif pierPrefTmp = 3:
+					'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
+				end
+				if haraklover[lover_number] = 0:
+
+					'You can see <<$tXe>> loves how many piercings you have, as <<$tXe>> has a slight blush on his face.'
+				elseif haraklover[lover_number] = 1:
+
+					'<<$loverdesc[lover_number]>> gives you one last examination with $tXyr eyes and gives you a quick kiss on your cheek.'
+				elseif haraklover[lover_number] = 2:
+
+					'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
+				end
+				act 'Continue':
+					cla
+					'After this you guys talk for an hour about various things, before <<$tXe>> gets up and says <<$tXe>> has to go.'
+					'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
+					loverscompliance[lover_number] += 1
+					minut += 60
+					act 'Continue': dynamic $go_home
+					exit
+				end
+			end
+		end
+	
+	elseif pierWearCount > pierPrefTmpMax:
+		'<<$loverdesc[lover_number]>> says that you just need to remove the ones that you have and you will look amazing.'
+		act 'Let <<$tXem>> remove some piercings.':
+			cla
+			if pirsN > 0 and pirsN < 1000 and pierWearCount < pierPrefTmpMin:
+				'<<$tXec>> takes the barbell out of your navel.'
+				pcs_horny += 2
+				pirsN = 1000
+				pierWearCount -= 1
+			end
+			if pirsE > 0 and pirsE < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$loverdesc[lover_number]>> <<$tXec>> sees the piercing in your eyebrow and proceeds to remove it.'
+				pirsE = 1000
+				pierWearCount -= 1
+			end
+			if pirsB > 0 and pirsB < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$tXec>> carefully takes the ring out of your lips.'
+				pirsB = 1000
+				pierWearCount -= 1
+			end
+			if pirsF > 0 and pirsF < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$loverdesc[lover_number]>> looks around, then carefully uses <<$tXyr>> hands to take the nipple rings off your breasts.'
+				pcs_horny += 5
+				pirsF = 1000
+				pierWearCount -= 1
+			end
+			if pirsD > 0 and pirsD < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$tXec>> sees the nose ring that you are wearing and removes it.'
+				pirsD = 1000
+				pierWearCount -= 1
+			end
+			if pirsG > 0 and pirsG < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then he non chalontely slides <<$tXyr>> hand down to your labia, and removes the ring there.'
+				'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
+				pcs_horny += 7
+				pirsG = 1000
+				pierWearCount -= 1
+			end
+			if pirsA > 0 and pirsA < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$tXec>> asks you to stick out your tongue, then removes the barbell in your tongue.'
+				pirsA = 1000
+				pierWearCount -= 1
+			end
+
+			if pirsC > 0 and pirsC < 1000 and pierWearCount > pierPrefTmpMax:
+				'<<$tXec>> sees your earrings and quickly takes them off.'
+				pirsC = 1000
+				pierWearCount -= 1
+			end
+			act '"All done!" <<$loverdesc[lover_number]>> says.':
+				cla
+				minut += 60
+				gs'stat'
+				'<<$loverdesc[lover_number]>> says "All done!" and promptly hands you the piercings <<$tXe>> took off.'
+				'After this you guys talk for an hour about various things, before <<$tXe>> gets up and says <<$tXe>> has to go.'
+				'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
+				loverscompliance[lover_number] += 1
+				act 'Continue': dynamic $go_home
+				exit
+			end
+		end
+	elseif pierWearCount < pierPrefTmpMin and pierCount < pierPrefTmpMin:
+		'<<$loverdesc[lover_number]>> takes you by the hand and heads over to the piercing salon.'
+		act 'Enter the piercing salon':
+			cla
+			'As you both arrive at the salon, <<$tXe>> talks real quick to the tattoo artist and piercer.'
+			'You see <<$tXem>> hand the artist some money and the artist starts to walk up towards you.'
+			'"Your <<$tBoyGirlfriend>> says you want to get some piercings?", the artist asks.'
+			act 'Quietly nod':
+				cla
+				'You know you can''t pull out now, so you meekly nod.'
+				'The man shrugs and says "Head over to the chair over there okay?"'
+				act 'Head over to the chair':
+				cla
+					'As you sit down you see the man come over with the various needles he needs to do his job.'
+					'He sees you are a little bit concerned about the needles and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
+					'He takes out a clean needle and proceeds with his job.'
+					act 'Continue':
+						cls 
+						randchan = rand(0, 7)
+						if randchan = 0 and pirsC = 0:
+							if pirsC = 0 and pierCount < pierPrefTmpMin:
+								'The artist takes a look at your unpierced ears, and with a quick sharp pain, pierces them.'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/c.jpg"></center>'
+								pirsC = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'ears', 'pierce'
+							end
+						elseif randchan = 1 and pirsA = 0:
+							if pirsA = 0 and pierCount < pierPrefTmpMin:
+								'He asks you to stick out your tongue. You comply and then start to regret it as he pierces your tongue.'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/a.jpg"></center>'
+								pirsA = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'tongue', 'pierce'
+							end
+						elseif randchan = 2 and pirsB = 0:
+							if pirsB = 0 and pierCount < pierPrefTmpMin:
+								'The artist gently holds your lip as he drives the needle through to pierce it.'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/b.jpg"></center>'
+								pirsB = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'lips', 'pierce'
+							end
+						elseif randchan = 3 and pirsD = 0:
+							if pirsD = 0 and pierCount < pierPrefTmpMin:
+								'You feel a sharp pain in your nose as he pierces your nose.'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/d.jpg"></center>'
+								pirsD = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'nose', 'pierce'
+							end
+						elseif randchan = 4 and pirsE = 0:
+							if pirsE = 0 and pierCount < pierPrefTmpMin:
+								'The artist moves to above your eyes and quickly pierces your eyebrow.'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/e.jpg"></center>'
+								pirsE = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'eyebrows', 'pierce'
+							end
+						elseif randchan = 5 and pirsN = 0:
+							if pirsN = 0 and pierCount < pierPrefTmpMin:
+								'He positions himself to pierce your belly button. You feel a sharp pain through your navel as he pierces it.'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/n.jpg"></center>'
+								pcs_horny += 2
+								pirsN = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'tummy', 'pierce'
+							end
+						elseif randchan = 6 and pirsF = 0:
+							if pirsF = 0 and pierCount < pierPrefTmpMin:
+								'He motions for you to lift up your shirt. After you do the man grabs your breasts rather softly and carefully pierces each nipple.'
+								!!'<center><img <<$set_imgh>> src="images/pc/body/piercings/f.jpg"></center>'
+								pcs_horny += 5
+								pirsF = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'nipples', 'pierce'
+							end
+						elseif randchan = 7 and pirsG = 0:
+							if pirsG = 0 and pierCount < pierPrefTmpMin:
+								'"Ma ''am can you take off your bottoms?", the man says. You realize that he plans to pierce your labia and you reluctantly present yourself.'
+								'You cover your mouth as you let out a quick "Eep!", as you feel a quick pain through your labia, but in a second, its over.'
+								!!'<center><img <<$set_imgh>> src="images/pc/body/piercings/g.jpg"></center>'
+								pcs_horny += 7
+								pirsG = 1
+								pierCount += 1
+								pierWearCount += 1
+								gs 'pain', 7, 'pubic', 'pierce'
+							end
+						end
+						gs'stat'
+						'"All done!", the artist says as he starts to clean up his various tools. He says to not irritate the places that he pierced and baby them for a week or two.'
+						'Before you leave he puts on the various new piercings throughout your body.'
+						act 'Go back towards your <<$tBoyGirlfriend>>':
+							cla
+							'As you go back towards him, <<$tXe>> looks you up and down.'
+							if pierWearCount < pierPrefTmpMin and pierCount >= pierPrefTmpMin:
+								'"Now lets just add the rest of the piercings...", <<$loverdesc[lover_number]>> says.'
+								if pirsA = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$tXec>> asks you to stick out your tongue, then inserts a barbell into your tongue.'
+									pirsA = 1
+									pierWearCount += 1
+								end
+								if pirsB = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$tXec>> gently holds your lip, then inserts a ring.'
+									pirsB = 1
+									pierWearCount += 1
+								end
+								if pirsC = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$tXec>> sees you do not have earrings and proceeds to put rings onto your ears. '
+									pirsC = 1
+									pierWearCount += 1
+								end
+								if pirsD = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$tXec>> takes out a ring and then carefully inserts a ring through your nose.'
+									pirsD = 1
+									pierWearCount += 1
+								end
+								if pirsE = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$loverdesc[lover_number]>> moves to your eyebrow and proceeds to insert a barbell.'
+									pirsE = 1
+									pierWearCount += 1
+								end
+								if pirsN = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$tXec>> takes out a barbell and inserts it into your navel.'
+									pcs_horny += 2
+									pirsN = 1
+									pierWearCount += 1
+								end
+								if pirsF = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$loverdesc[lover_number]>> looks around, then pulls out a couple of nipple rings. You can tell it slightly turns <<$tXem>> on as <<$tXe>> works <<$tXyr>> way up your shirt to put on the nipple rings.'
+									pcs_horny += 5
+									pirsF = 1
+									pierWearCount += 1
+								end
+								if pirsG = 1000 and pierWearCount < pierPrefTmpMin:
+									'<<$loverdesc[lover_number]>> gets close to your ear, "Don''t make a scene okay?", then <<$tXe>> nonchalantly slides <<$tXyr>> hand down to your labia, and inserts a ring.'
+									'You cover your mouth as you let out a quick "Eep!", but in a second, its over.'
+									pcs_horny += 7
+									pirsG = 1
+									pierWearCount += 1
+								end
+								gs'stat'
+								'"There we go!", <<$tXe>> says with a smile.'
+								if pierPrefTmp = 2:
+									'You can tell <<$tXe>> likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
+								elseif pierPrefTmp = 3:
+									'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
+								end			
+								if haraklover[lover_number] = 0:
+
+									'You can see <<$tXe>> loves how many piercings you have, as <<$tXe>> has a slight blush on <<$tXyr>> face.'
+								elseif haraklover[lover_number] = 1:
+
+									'<<$loverdesc[lover_number]>> gives you one last examination with <<$tXyr>> eyes and gives you a quick kiss on your cheek.'
+								elseif haraklover[lover_number] = 2:
+
+									'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
+								end
+								act 'Continue':
+									minut += 40
+									cla
+									'After getting the piercings, you both part ways and head home.'
+									'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
+									minut += 20
+									act 'Continue': dynamic $go_home
+									exit
+								end							
+							elseif pierWearCount >= pierPrefTmpMin:
+								'"There we go!", <<$tXe>> says with a smile.'
+								if pierPrefTmp = 2:
+									'You can tell <<$tXe>> likes a girl with a bit more piercings, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
+								elseif pierPrefTmp = 3:
+									'With this many piercings, you can feel many people will be exploring your body with their eyes, curious on where else you may have piercings.'
+								end			
+								if haraklover[lover_number] = 0:
+
+									'You can see <<$tXe>> loves how many piercings you have, as <<$tXe>> has a slight blush on <<$tXyr>> face.'
+								elseif haraklover[lover_number] = 1:
+
+									'<<$loverdesc[lover_number]>> gives you one last examination with <<$tXyr>> eyes and gives you a quick kiss on your cheek.'
+								elseif haraklover[lover_number] = 2:
+
+									'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
+								end
+								act 'Continue':
+									minut += 40
+									cla
+									'After getting the piercings, you both part ways and head home.'
+									'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
+									loverscompliance[lover_number] += 1
+									minut += 20
+									act 'Continue': dynamic $go_home
+									exit
+								end		
+							else
+								'"There we go!", <<$tXe>> says with a smile.'
+								if pierPrefTmp > 1: 'You can tell <<$tXe>> likes a girl with a more piercings and you can''t help but agree in some aspect, it does make you look a bit sexier.'
+								if haraklover[lover_number] = 0:
+
+									'You can see <<$tXe>> is pleased with your piercing, as <<$tXe>> has a slight blush on <<$tXyr>> face.'
+								elseif haraklover[lover_number] = 1:
+
+									'<<$loverdesc[lover_number]>> gives you one last examination with <<$tXyr>> eyes and gives you a quick kiss on your cheek.'
+								elseif haraklover[lover_number] = 2:
+
+									'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "You look much better."'
+								end
+								act 'Continue':
+									minut += 40
+									cla
+									'After getting the piercing, you both part ways and head home.'
+									'You can''t say why, but you feel it would be harder to say no next time if <<$tXe>> asked you to change something.'
+									loverscompliance[lover_number] += 1
+									minut += 20
+									act 'Continue': dynamic $go_home
+									exit
+								end		
+							end
+						end
+					end	
+				end
+			end
+		end
+	else
+		'This should not fire off. NO else if.'
+	end
+end
+if $ARGS[0] = 'Tatt':
+	!! Arm Slot tatarm4, tatarm
+	!! ass slot tatass21, tatass
+	!! back slot tatback2, tatback
+	!! belly slot tatblly1, tatblly
+	!! Breast Slot tatbrst8, tatbrst
+	!! Chest Slot tatchst1, tatchst
+	!! face slot tatfce1, tatfce
+	!! Foot Slot tatankle5, tatankle
+	!! Leg Slot tatleg2, tatleg
+	!! Lip Slot tatlip1, tatlip
+	!! Neck Slot tatnck12, tatneck
+	!! Pubic Slot tatvag6, tatvag
+	!! Shoulder Slot tatshldr7 ,tatlech
+	!! Side Slot tatside9 ,tatside
+	!! Tramp Slot tatlowbck16 , tatupb
+	!! UnderBreast Slot tatundbreast5 , tatunder
+	!! Wrist Slot tatwrst8 , tatwrist
+	act 'Enter Tattoo Parlor':
+		cla
+		'As you arrive at the tattoo parlor, <<$loverdesc[lover_number]>> looks you up and down to decide what needs to be done about your tattoos.'
+		if tattCount < tattPrefTmpMin:
+			'You need some more tattoos, it would make you look so much better!'
+			'<<$tXec>> heads over to the counter and starts talks to the tattoo artist.'
+			'You see <<$tXem>> hand the artist some money and the artist starts to walk up towards you.'
+			'"Your <<$tBoyGirlfriend>> says you want to get some tattoos?", the artist asks.'
+			act 'Quietly nod':
+				cla
+				'You know you can''t pull out now, so you meekly nod.'
+				'The man shrugs and says "Head over to the chair over there okay?"'
+				act 'Head over to the chair':
+					cls 
+					'As you sit down you see the man come over with the various needles he needs to do his job.'
+					'He sees you are a little bit concerned about the needles and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
+					'He takes out a clean needle and proceeds with his job.'	
+					randchan = rand(0, 17)
+					
+					if randchan = 0 and tatarm = 0:	
+						randchan = rand(1, 82)
+						!!randchan = 4
+						if tatarm = 0 and tattCount < tattPrefTmpMin:
+							tatarm = randchan
+							tattCount += 1
+							'He gives you a tattoo on your arm.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/arms/tatarm<<tatarm>>.jpg"></center>'
+						end
+					elseif randchan = 1 and tatass = 0:
+						randchan = rand(1, 23)
+						!!randchan = 21
+						if tatass = 0 and tattCount < tattPrefTmpMin:
+							tatass = randchan
+							tattCount += 1
+							'He gives you a tattoo on your ass.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/ass/tatass<<tatass>>.jpg"></center>'
+						end
+					elseif randchan = 2 and tatback = 0:
+						randchan = rand(1, 53)
+						!!randchan = 2
+						if tatback = 0 and tattCount < tattPrefTmpMin:
+							tatback = randchan
+							tattCount += 1
+							'He gives you a tattoo on your back.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/back/tatback<<tatback>>.jpg"></center>'
+						end
+					
+					!!
+					elseif randchan = 3 and tatblly = 0:
+						randchan = rand(1, 20)
+						!!randchan = 1
+						if tatblly = 0 and tattCount < tattPrefTmpMin:
+							tatblly = randchan
+							tattCount += 1
+							'He gives you a tattoo on your belly.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/belly/tatblly<<tatblly>>.jpg"></center>'
+						end
+					elseif randchan = 4 and tatbrst = 0:
+						randchan = rand(1, 10)
+						!!randchan = 8
+						if tatbrst = 0 and tattCount < tattPrefTmpMin:
+							tatbrst = randchan
+							tattCount += 1
+							'He gives you a tattoo on your breasts.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/breasts/tatbrst<<tatbrst>>.jpg"></center>'
+						end
+					elseif randchan = 5 and tatchst = 0:
+						randchan = rand(1, 15)
+						!!randchan = 1
+						if tatchst = 0 and tattCount < tattPrefTmpMin:
+							tatchst = randchan
+							tattCount += 1
+							'He gives you a tattoo on your chest.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/chest/tatchst<<tatchst>>.jpg"></center>'
+						end
+					elseif randchan = 6 and tatfce = 0:
+						randchan = rand(1, 8)
+						!!randchan = 1
+						if tatfce = 0 and tattCount < tattPrefTmpMin:
+							tatfce = randchan
+							tattCount += 1
+							'He gives you a tattoo on your face.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/face/tatfce<<tatfce>>.jpg"></center>'
+						end
+					elseif randchan = 7 and tatankle = 0:
+						randchan = rand(1, 25)
+						!!randchan = 5
+						if tatankle = 0 and tattCount < tattPrefTmpMin:
+							tatankle = randchan
+							tattCount += 1
+							'He gives you a tattoo on your ankles.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle<<tatankle>>.jpg"></center>'
+						end
+					elseif randchan = 8 and tatleg = 0:
+						randchan = rand(1, 36)
+						!!randchan = 2
+						if tatleg = 0 and tattCount < tattPrefTmpMin:
+							tatleg = randchan
+							tattCount += 1
+							'He gives you a tattoo on your legs.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/legs/tatleg<<tatleg>>.jpg"></center>'
+						end
+					elseif randchan = 9 and tatlip = 0:
+						randchan = rand(1, 9)
+						!!randchan = 1
+						if tatlip = 0 and tattCount < tattPrefTmpMin:
+							tatlip = randchan
+							tattCount += 1
+							'He gives you a tattoo on your bottom lip.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/lip/tatlip<<tatlip>>.jpg"></center>'
+						end
+					elseif randchan = 10 and tatneck = 0:
+						randchan = rand(1, 28)
+						!!randchan = 12
+						if tatneck = 0 and tattCount < tattPrefTmpMin:
+							tatneck = randchan
+							tattCount += 1
+							'He gives you a tattoo on your neck.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/neck/tatnck<<tatneck>>.jpg"></center>'
+						end
+					elseif randchan = 11 and tatvag = 0:
+						randchan = rand(1, 44)
+						!!randchan = 6
+						if tatvag = 0 and tattCount < tattPrefTmpMin:
+							tatvag = randchan
+							tattCount += 1
+							'He gives you a tattoo above your cunt.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag<<tatvag>>.jpg"></center>'
+						end
+					elseif randchan = 12 and tatlech = 0:
+						randchan = rand(1, 25)
+						!!randchan = 7
+						if tatlech = 0 and tattCount < tattPrefTmpMin:
+							tatlech = randchan
+							tattCount += 1
+							'He gives you a tattoo on your shoulder.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr<<tatlech>>.jpg"></center>'
+						end
+					elseif randchan = 13 and tatside = 0:
+						randchan = rand(1, 18)
+						!!randchan = 9
+						if tatside = 0 and tattCount < tattPrefTmpMin:
+							tatside = randchan
+							tattCount += 1
+							'He gives you a tattoo on your sides.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/side/tatside<<tatside>>.jpg"></center>'
+						end
+					elseif randchan = 14 and tatupb = 0:
+						randchan = rand(1, 30)
+						!!randchan = 16
+						if tatupb = 0 and tattCount < tattPrefTmpMin:
+							tatupb = randchan
+							tattCount += 1
+							'He gives you a tramp stamp.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampStamp/tatlowbck<<tatupb>>.jpg"></center>'
+						end
+					elseif randchan = 15 and tatunder = 0:
+						randchan = rand(1, 22)
+						!!randchan = 5
+						if tatunder = 0 and tattCount < tattPrefTmpMin:
+							tatunder = randchan
+							tattCount += 1
+							'He gives you a tattoo under your breasts.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/underBreast/tatundbreast<<tatunder>>.jpg"></center>'
+						end
+					elseif randchan = 16 and tatwrist = 0:
+						randchan = rand(1, 51)
+						!!randchan = 8
+						if tatwrist = 0 and tattCount < tattPrefTmpMin:
+							tatwrist = randchan
+							tattCount += 1
+							'He gives you a tattoo on your wrists.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/wrists/tatwrst<<tatwrist>>.jpg"></center>'
+						end
+					elseif randchan = 17 and tathand = 0:
+						randchan = rand(1, 9)
+						!!randchan = 8
+						if tathand = 0 and tattCount < tattPrefTmpMin:
+							tathand = randchan
+							tattCount += 1
+							'He gives you a tattoo on your hand.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
+						end
+					end
+
+					gs'stat'
+					'"All done!", the artist smiles as he starts to clean up his various tools."'
+					'"I must say, your body looks amazing with the art on you!"'
+					'You are reluctant to admit it, but having these tattoos feels like they do make you look sexier for some people, though a bit more slutty too.'
+					act 'Go back towards your <<$tBoyGirlfriend>>':
+						cls
+						'As you go back towards him, he looks you up and down.'
+						'"There we go!", he says with a smile.'
+						if pierPrefTmp = 2:
+							'You can tell he likes a girl with at least a couple of tattoos, and you can''t help but agree in some aspect, it does make you look a bit sexier.'
+						elseif pierPrefTmp = 3:
+							'With this many tattoos, you look like a punk or scene girl, and you can feel that many people would want to explore you to see if you have any "hidden" gems underneath your clothes.'
+						end			
+						if haraklover[lover_number] = 0:
+
+							'You can see he loves how many tattoos you have, as he has a slight blush on his face.'
+						elseif haraklover[lover_number] = 1:
+
+							'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
+						elseif haraklover[lover_number] = 2:
+
+							'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
+						end
+						act 'Continue':
+							minut += 40
+							cla
+							'After getting the tattoos, you both part ways and head home.'
+							'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+							loverscompliance[lover_number] += 1
+							minut += 20
+							act 'Continue': dynamic $go_home
+							exit
+						end		
+					
+					end
+				end		
+			end
+		elseif tattCount > tattPrefTmpMax:
+			'You need to get rid of some tattoos, it would make you look so much better!'
+			'He heads over to the counter and starts talks to the tattoo artist.'
+			'You see him hand the artist some money and the artist starts to walk up towards you.'
+			'"Your <<$tBoyGirlfriend>> says you want to get rid of some tattoos?", the artist asks.'
+			act 'Quietly nod':
+				cla
+				'You know you can''t pull out now, so you meekly nod.'
+				'The man shrugs and says "Head over to the chair over there okay?"'
+				act 'Head over to the chair':
+					cls 
+					'As you sit down you see the man come over with the various needles and lasers he needs to do his job.'
+					'He sees you are a little bit concerned about the laser and laughs, "Don''t worry ma ''am, it will be all over before you know it!"'
+					'He takes he turns on the mini laser and proceeds with his job.'	
+					randchan = rand(0, 16)
+					if randchan = 0 and tatarm > 0:	
+						if tattCount > tattPrefTmpMax:
+							tatarm = 0
+							tattCount -= 1
+							'He removes the tattoo on your arm.'
+						
+						end
+					elseif randchan = 1 and tatass > 0:
+						if tattCount > tattPrefTmpMax:
+							tatass = 0
+							tattCount -= 1
+							'He removes the tattoo on your ass.'
+							
+						end
+					elseif randchan = 2 and tatback > 0:
+						if tattCount > tattPrefTmpMax:
+							tatback = 0
+							tattCount -= 1
+							'He removes the tattoo on your back.'
+							
+						end
+					elseif randchan = 3 and tatblly > 0:
+						if tattCount > tattPrefTmpMax:
+							tatblly = 0
+							tattCount -= 1
+							'He removes the tattoo on your belly.'
+							
+						end
+					elseif randchan = 4 and tatbrst > 0:
+						if tattCount > tattPrefTmpMax:
+							tatbrst = 0
+							tattCount -= 1
+							'He removes the tattoo on your breasts.'
+
+						end
+					elseif randchan = 5 and tatchst > 0:
+						if tattCount > tattPrefTmpMax:
+							tatchst = 0
+							tattCount -= 1
+							'He removes the tattoo on your chest.'
+
+						end
+					elseif randchan = 6 and tatfce > 0:
+						if tattCount > tattPrefTmpMax:
+							tatfce = 0
+							tattCount -= 1
+							'He removes the tattoo on your face.'
+
+						end
+					elseif randchan = 7 and tatankle > 0:
+						if tattCount > tattPrefTmpMax:
+							tatankle = 0
+							tattCount -= 1
+							'He removes the tattoo on your ankles.'
+
+						end
+					elseif randchan = 8 and tatleg > 0:
+						if tattCount > tattPrefTmpMax:
+							tatleg = 0
+							tattCount -= 1
+							'He removes the tattoo on your legs.'
+
+						end
+					elseif randchan = 9 and tatlip > 0:
+						if tattCount > tattPrefTmpMax:
+							tatlip = 0
+							tattCount -= 1
+							'He removes the tattoo on your bottom lip.'
+
+						end
+					elseif randchan = 10 and tatneck > 0:
+						if tattCount > tattPrefTmpMax:
+							tatneck = 0
+							tattCount -= 1
+							'He removes the tattoo on your neck.'
+
+						end
+					elseif randchan = 11 and tatvag > 0:
+						if tattCount > tattPrefTmpMax:
+							tatvag = 0
+							tattCount -= 1
+							'He removes the tattoo above your cunt.'
+
+						end
+					elseif randchan = 12 and tatlech > 0:
+						if tattCount > tattPrefTmpMax:
+							tatlech = 0
+							tattCount -= 1
+							'He removes the tattoo on your shoulder.'
+
+						end
+					elseif randchan = 13 and tatside > 0:
+						if tattCount > tattPrefTmpMax:
+							tatside = 0
+							tattCount -= 1
+							'He removes the tattoo on your sides.'
+
+						end
+					elseif randchan = 14 and tatupb > 0:
+						if tattCount > tattPrefTmpMax:
+							tatupb = 0
+							tattCount -= 1
+							'He removes your tramp stamp.'
+
+						end
+					elseif randchan = 15 and tatunder > 0:
+						if tattCount > tattPrefTmpMax:
+							tatunder = 0
+							tattCount -= 1
+							'He removes the tattoo under your breasts.'
+
+						end
+					elseif randchan = 16 and tatwrist > 0:
+						if tattCount > tattPrefTmpMax:
+							tatwrist = 0
+							tattCount -= 1
+							'He removes the tattoo on your wrists.'
+
+						end
+					end
+					gs'stat'
+					'"All done!", the artist says as he starts to clean up his various tools."'
+					'"Me myself, I like a girl with a lot of tattoos, but to each their own." he tells you.'
+					'You are reluctant to admit it, but taking away tattoos does make your skin look much cleaner, and makes people focus more on the figure, and not just the art on it.'
+					act 'Go back towards your <<$tBoyGirlfriend>>':
+						cla
+						'As you go back towards him, he looks you up and down.'
+						'"There we go!", he says with a smile.'
+						if tattPrefTmp = 1:
+							'You can tell he hates girls with tattoos and likes them to have as few as possible. You can''t help but agree in some aspect, it does make your body look a bit sexier.'
+						elseif tattPrefTmp = 2:
+							'You can tell that though <<$loverdesc[lover_number]>> likes a girl to have some tattoos, he doesn''t want them to be the focus on a girl. You can''t help but agree that there is a thing as to many tattoos.'
+						end			
+						if haraklover[lover_number] = 0:
+
+							'You can see he loves how many tattoos you have, as he has a slight blush on his face.'
+						elseif haraklover[lover_number] = 1:
+
+							'<<$loverdesc[lover_number]>> gives you one last examination with his eyes and gives you a quick kiss on your cheek.'
+						elseif haraklover[lover_number] = 2:
+
+							'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on the lips and says, "Now this is a bombshell."'
+						end
+						act 'Continue':
+							minut += 40
+							cla
+							'After getting rid of the tattoos, you both part ways and head home.'
+							'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+							loverscompliance[lover_number] += 1
+							minut += 20
+							act 'Continue': dynamic $go_home
+							exit
+						end		
+					end
+				end		
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'Lips':
+	act 'Enter clinic':
+		'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
+		'<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
+		'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
+		if pcs_lip < lipsPrefTmpMin:
+			'"So that man over there says you want to get lip enhancements?", the doctor asks quizically, looking at the size of your lips.'
+		else
+			'"So that man over there says you want to get a lip reduction?", the doctor asks quizically, looking at the size of your lips.'
+		end
+		'"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
+		'"All right, lets get started right away", he says as he looks at his clipboard.'
+		act 'Go with doctor to operating room':
+			cls
+			'The doctor motions for you to sit on the operating table, and you reluctantly comply.'
+			'"Don''t worry it will just be a quick injection and we will be done, its perfectly safe.", the doctor says.'
+			'As you try to get confortable on the table the doctor comes up to you with the injection.'
+			'"Okay now if you can pucker out your lips it will give me a nice surface for the shot.", he says holding your face gently.'
+			act 'Pucker out lips':
+				cla
+				'"And... Done. There we go! You should feel the effects almost immediately."'
+				'He holds up a mirror and you look at your changed lips.'
+				if pcs_lip < lipsPrefTmpMin:
+					minut += 20
+					pcs_lip = lipsPrefTmpMin + 1
+					gs 'stat'
+					'Your lips have grown! They are whorishly huge!'
+					'You look at the doctor and he shrugs, "You look much nicer with huge lips in my opinion."'
+				else
+					minut += 20
+					pcs_lip = lipsPrefTmpMax - 1
+					'Your lips have shrunk! They look much more modest now.'
+					'You look at the doctor and he shrugs, "You look much nicer with more modest lips in my opinion."'
+				end
+				'You stand up and leave the room.'
+				act 'Go back towards your <<$tBoyGirlfriend>>':
+					cla
+					'As you go back towards him, he looks you up and down.'
+					'"There we go!", he says with a smile.'
+					if lipsPrefTmp = 1:
+						'You can tell he loves girls with more modest yet full lips, and you have to admit, its better then having big whorish, cocksucking lips.'
+					elseif lipsPrefTmp = 2:
+						'You can tell that <<$loverdesc[lover_number]>> likes a girl to have whorish, cocksucking lips, and as you give the mirror in the room a quick slutty face, you have to admit it does make you look sexier.'
+					end			
+					if haraklover[lover_number] = 0:
+
+						'You can see he loves the size of your lips, for even with all of his shyness, he still gives you a kiss on your new lips.'
+					elseif haraklover[lover_number] = 1:
+
+						'<<$loverdesc[lover_number]>> gives you one last examination of your new lips before giving you a kiss on the lips, probably to test the new wares.'
+					elseif haraklover[lover_number] = 2:
+
+						'<<$loverdesc[lover_number]>> comes up to you, and with a quick squeeze on the ass, kisses you on your new lips and says, "Now those lips are the lips of a goddess."'
+					end
+					act 'Continue':
+						cla
+						'After improving your lips, you both part ways and head home.'
+						'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+						loverscompliance[lover_number] += 1
+						minut += 20
+						act 'Continue': dynamic $go_home
+						exit
+					end	
+				
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'Tits':
+	act 'Enter clinic':
+		cla
+		'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
+		'<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
+		if tits < titMin:
+			'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
+			
+			'"So that man over there says you want to get breast implants?", the doctor asks quizically, looking you up and down.'
+			'"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
+			'"All right, lets get started right away, let me see what size he got for you...", he says as he looks at his clipboard.'
+			titAmount = (titMin - tits) * 5 + 9
+			if titAmount <= 10:
+				'"It seems you will be getting our smallest breast implants."'
+				'As you hear this you relax a bit. At least its not a big difference.'
+			elseif titAmount <= 15:
+				'"It seems you will be getting small breast implants." '
+				'As you hear this you shift nervously. At least its not going to be that big of a change.'
+			elseif titAmount <= 20:
+				'"It seems you will be getting medium breast implants."'
+				'Your heart skips a beat, "Those are kind of big.", you think to yourself.'
+			elseif titAmount <= 25:
+				'"It seems you will be getting large breast implants."'
+				'Your heart skips a beat, What? "Those will be huge...", you tell to yourself.'
+			elseif titAmount <= 30:
+				'"It seems you will be getting our largest, the XLarge breast implants." '
+				'What?! You are about to get up and leave but you realize that its to late for that now. "God, those will be MASSIVE", you think to yourself.'
+			else 
+				'This should not shoot off, if you go from 10 to 35 it should fall into preference still.'
+			end
+			'"If you would follow me, I will take you to the operating room.", the doctor says indifferently.'
+			act 'Go with doctor to operating room':
+				cls
+				'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
+				'"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
+				'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
+				'"Okay before I continue I want you to take a deep breath okay?", he says.'
+				act 'Take a deep breath':
+					cla
+					'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
+					*nl
+					*nl
+					*nl
+					act 'Wake up':
+						minut += 120
+						silicone += titAmount
+						gs 'stat'
+						'"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
+						' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
+						' ''My breasts feel fuller...'' '
+						'You grab your breasts as you look down, and you see you have a bigger breasts! Your breasts are now <<$titsize>>s.'
+						'<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
+						'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your <<$tBoyGirlfriend>>.'
+						act 'Head over to your <<$tBoyGirlfriend>>':
+							cla
+							'As you go back towards him, he looks you up and down.'
+							'"There we go!", he says with a smile.'
+							if titBoy = 0:
+							'If you are getting inplants this should not fire off.'
+							elseif titBoy = 1:
+								'You can tell that <<$loverdesc[lover_number]>> likes a girl with a good rack, thankfully although you look more like a bimbo then before, his tit preference is not outragously big, and you must admit, it does make you look sexier.'
+							elseif titBoy = 2:
+								'<<$loverdesc[lover_number]>> you can clearly tell loves a girl with bimbo-sized tits, as you hold your tits you look at yourself in the mirror. The girl staring back at you looks like a bimbo that doesn''t know where to put her whorish tits. And you have to admit, it does turn you on a little.'
+							end
+							if haraklover[lover_number] = 0:
+
+								'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new breasts.'
+							elseif haraklover[lover_number] = 1:
+
+								'<<$loverdesc[lover_number]>> gives you one last look and gives you a quick kiss on your cheek.'
+							elseif haraklover[lover_number] = 2:
+
+								'<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you look like a bombshell!"'
+							end
+							act 'Continue':
+								minut += 40
+								cla
+								'After getting your new breasts, you both part ways and head home.'
+								'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+								loverscompliance[lover_number] += 1
+								minut += 20
+								act 'Continue': dynamic $go_home
+							end
+							exit
+						end		
+					end
+				end	
+			end
+		elseif tits > titMax:
+			'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
+			
+			'"So that man over there says you want to get breast implants?", the doctor asks quizically, looking you up and down.'
+			'"Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
+			'"All right, lets get started right away, he had a set size he wanted so we will be doing that.", he says as he looks at his clipboard.'
+			titAmount = (tits - titMax) * 5 + 9
+			'"If you would follow me, I will take you to the operating room.", the doctor says indifferently.'
+			act 'Go with doctor to operating room':
+				cls
+				'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
+				'"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
+				'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
+				'"Okay before I continue I want you to take a deep breath okay?", he says.'
+				act 'Take a deep breath':
+					cla
+					'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
+					*nl
+					*nl
+					*nl
+					act 'Wake up':
+						cla
+						minut += 120
+						if silicone - titAmount < 0:
+							titExtra = titAmount - silicone
+							silicone = 0
+							nbsize -= titExtra
+						else
+							silicone -= titAmount
+						end
+						gs 'stat'
+						'"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
+						' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
+						' ''My breasts feel lighter...'' '
+						'You grab your breasts as you look down, and you realize you have much smaller breasts! Your breasts are now <<$titsize>>s.'
+						'<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
+						'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your <<$tBoyGirlfriend>>.'
+						act 'Head over to your <<$tBoyGirlfriend>>':
+							cla
+							'As you go back towards him, he looks you up and down.'
+							'"There we go!", he says with a smile.'
+							if titBoy = 0:
+								'You can tell that <<$loverdesc[lover_number]>> likes a girl without whorish tits, and you can kind of see why as you slowly grope your now tinier breasts.'
+							elseif titBoy = 1:
+								'You can tell that <<$loverdesc[lover_number]>> likes a girl with a good rack, but thankfully not to big, and you admittadly agree with him, as you slowly massage your breasts.'
+							elseif titBoy = 2:
+								'Reducing to max? What?'
+							end
+							if haraklover[lover_number] = 0:
+
+								'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new breasts.'
+							elseif haraklover[lover_number] = 1:
+
+								'<<$loverdesc[lover_number]>> gives you one last look and gives you a quick kiss on your cheek.'
+							elseif haraklover[lover_number] = 2:
+
+								'<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you look like a bombshell!"'
+							end
+							act 'Continue':
+								minut += 40
+								cla
+								'After getting your new breasts, you both part ways and head home.'
+								'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+								loverscompliance[lover_number] += 1
+								minut += 20
+								act 'Continue': dynamic $go_home
+							end
+							exit
+						end		
+					end
+				end	
+			end
+		end
+	end
+end
+
+!!This is a interesting one as it will take in a couple of things, not just clothes preferences. I need to find clothing pictures for most of the types of clothes. Think of these as quest clothes.
+if $ARGS[0] = 'Clothes':
+!! void code - need future work
+!!	act 'Enter Clothing Shop':
+!!	cla
+!!	if 
+!!	end
+end
+
+!! This should not increase the weight at all, and should only have been called if they weigh over the figurePrefMax
+if $ARGS[0] = 'Figure':
+	act 'Enter clinic':
+		cla
+		'As you arrive at the clinic, <<$loverdesc[lover_number]>> walks up to the front desc and asks to speak with the plastic surgeon. After a couple of minutes the plastic surgeon comes out with a clipboard.'
+		'<<$loverdesc[lover_number]>> talks to the surgeon and after a brief exchange of words, he hands the surgeon a respectable stack of bills. The surgeon discreetly puts the bills into his jacket and starts to walk toward you.'
+		'Even though you don''t know what <<$loverdesc[lover_number]>> said to the surgeon, you still jump when he starts to speak to you.'
+		'"So you want to get a lyposuction procedure done, is that right?", the doctor asks you.'
+		act 'Meekly nod':
+			cla
+			'You know you can''t back out now. "Y-yes.", you manage to squeek out, your face turning slightly red at the topic of the conversation.'
+			'"All right, lets get started right away, if you can follow me into the operating room.'
+			act 'Go with doctor to operating room':
+				cls
+				'The doctor motions for you to lay on the operating table, and you reluctantly comply.'
+				'"Now this is going to take about 2 hours for us to do the procedure, but do not worry, the procedure is safe, I have done this dozens of times." the doctor says.'
+				'As you try to get confortable on the table the doctor comes up to you with the anesthesia.'
+				'"Okay before I continue I want you to take a deep breath okay?", he says.'
+				act 'Take a deep breath':
+					cla
+					'You take a deep breath of the sleeping gas, and soon the room starts to spin and your mind starts to fog, then everything goes dark...'
+					*nl
+					*nl
+					*nl
+					!!'<<salocatnow>> is the value for salocatnow, the value for fat is <<fat>>, and the value for salo is <<salo>>.'
+					act 'Wake up':
+						cla
+						minut += 120
+
+						if figurlover[lover_number] ! 3:
+
+							:loopfatRemover
+								salo = 20 * figurePrefMin + 1
+								if salo < 11: salo = 11
+
+								gs 'body_shape', 'softreset'
+								!!'<<salocatnow>> is the value for salocatnow, the value for fat is <<fat>>, and the value for salo is <<salo>>.'
+								
+							if salocatnow > figurePrefMax:jump 'loopfatRemover'
+						else
+							'This should not fire, I made it so that you can''t ADD weight.'
+						end
+						gs 'stat'
+						!!'The stat for salocatnow is <<salocatnow>> and the stat for figurePrefMax is <<figurPrefMax>>.'
+						'"<<$pcs_firstname>> <<$pcs_lastname>>, are you listening?"'
+						' ''Wait... I''m awake?'' It seemed just a couple of seconds ago you were laying down on the operating table about to have surgery.'
+						'You aren''t paying attention to the doctor as he finishes up, and you slowly get off the operating table and head over to your <<$tBoyGirlfriend>>.'
+						act 'Head over to your <<$tBoyGirlfriend>>':
+							cls
+							'As you go back towards him, he looks you up and down.'
+							'"There we go!", he says with a smile.'
+							gs 'obj_din', 'body'
+							if figurlover[lover_number] = 0:
+
+								'You can tell that <<$loverdesc[lover_number]>> likes a girl that has very little fat on her whorish tits, and you can kind of see why as you slowly look at yourself in the mirror.'
+							elseif figurBoy = 1:
+								'You can tell that <<$loverdesc[lover_number]>> likes a girl thats not too fat, but thankfully not too skinny, and you admittadly agree with him, as you slowly run your hands over your now smaller curves.'
+							elseif figurBoy = 2:
+								'Reducing to max? What?'
+							end
+							if haraklover[lover_number] = 0:
+
+								'From the blush on his face, you can tell <<$loverdesc[lover_number]>> loves your new figure.'
+							elseif haraklover[lover_number] = 1:
+
+								'<<$loverdesc[lover_number]>> gives your figure one last look and gives you a quick kiss on your cheek.'
+							elseif haraklover[lover_number] = 2:
+
+								'<<$loverdesc[lover_number]>> comes up to you, and with a quick slap on the ass, kisses you on the lips and says, "Now you have the body of a bombshell!"'
+							end
+							act 'Continue':
+								cla
+								'After getting a lyposuction treatment, you both part ways and head home.'
+								'You can''t say why, but you feel it would be harder to say no next time if he asked you to change something.'
+								loverscompliance[lover_number] += 1
+								minut += 20
+								act 'Continue': dynamic $go_home
+							end
+							exit
+							
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+
+--- lover_change ---------------------------------
+

locations/lover_likes

@@ -0,0 +1,876 @@
+# lover_likes
+
+gs 'lover_pref'
+gs 'lover_pronouns'
+
+if $ARGS[0] = 'clotTypePrefTmp':
+	if clotTypePrefTmp ! 0:
+		if haraklover[lover_number] = 0:
+
+			if $clotTypePrefTmp = $clothingworntype:
+				loverrelation[lover_number] += 1
+				$meetClot = '<<$loverdesc[lover_number]>> says, "I like the type of clothing you are wearing <<$pcs_nickname>>. I think girls look amazing in <<$clotTypePrefTmp>> clothing."'
+			elseif $clotTypePrefTmp = $clothingworntype:
+				loverrelation[lover_number] -= 1
+				$meetClot = '<<$loverdesc[lover_number]>> says nerviously, "I don''t mean to be rude <<$pcs_nickname>>, but I don''t think <<$clothingworntype>> clothing looks nice on girls. I like girls who wear <<$clotTypePrefTmp>> clothing."'
+			end
+		elseif haraklover[lover_number] = 1:
+			if $clotTypePrefTmp = $clothingworntype:
+				loverrelation[lover_number] += 2
+				$meetClot = '<<$loverdesc[lover_number]>> says, "I think girls who where <<$clothingworntype>> clothing look amazing. I''m glad you chose that type of clothing."'
+			elseif $clotTypePrefTmp = $clothingworntype:
+				loverrelation[lover_number] -= 2
+				$meetClot = '<<$loverdesc[lover_number]>> says cafefully, "<<$pcs_nickname>> to be honest, I don''t think <<$clothingworntype>> clothing looks good on you. I think <<$clotTypePrefTmp>> clothing would look better on you."'
+			end
+		elseif haraklover[lover_number] = 2:
+			if $clotTypePrefTmp = $clothingworntype:
+				loverrelation[lover_number] += 3
+				$meetClot = '<<$loverdesc[lover_number]>> says, "<<$pcs_nickname>>, you look fucking hot in <<$clothingworntype>> clothes. It looks amazing on you!"'
+			elseif $clotTypePrefTmp = $clothingworntype:
+				loverrelation[lover_number] -= 3
+				$meetClot = '<<$loverdesc[lover_number]>> says rather rudely, "I think girls who wear <<$clothingworntype>> type clothing looks like shit. Girls who wear <<$clotTypePrefTmp>> turn me on much more."'
+			end
+		end
+	end
+	if clotTypePrefTmp ! 0:
+	'<<$meetClot>>'
+	end
+end
+if $ARGS[0] = 'clotQualPrefTmp':
+	if clotQualPrefTmp = 1:
+		if PCloQuality > 4: 
+			if haraklover[lover_number] = 0:
+				loverrelation[lover_number] -= 2
+				$meetQualPref = '<<$loverdesc[lover_number]>> says that <<$tXe>> thinks your clothing quality is way too high and <<$tXe>> likes girls that where clothing that is <<$clotQualPrefTmp>>."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetQualPref = '<<$loverdesc[lover_number]>> says that <<$tXe>> thinks your clothing quality is way too high and <<$tXe>> likes girls that where clothing that is <<$clotQualPrefTmp>>."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetQualPref = '<<$loverdesc[lover_number]>> says that <<$tXe>> thinks your clothing quality is way too high and <<$tXe>> likes girls that where clothing that is <<$clotQualPrefTmp>>."'
+			end	
+		elseif PCloQuality < 4:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 2
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves the quality of your clothes and <<$tXe>> is glad you don''t wear expensive clothing."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves the quality of your clothes and <<$tXe>> is glad you don''t wear expensive clothing."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 3 
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves the quality of your clothes and <<$tXe>> is glad you don''t wear expensive clothing."'
+			end	
+		end
+	elseif clotQualPrefTmp = 2: 
+		if PCloQuality < 5: 
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 2
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear <<clotQualPrefTmp>> clothing, and anything else just doesn''t look good."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear <<clotQualPrefTmp>> clothing, and anything else is trash."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear <<clotQualPrefTmp>> clothing, and anything else is crap."'
+			end	
+		elseif PCloQuality > 4:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 2
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves the quality of your clothes and <<$tXe>> is glad you don''t wear cheap clothing."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves the quality of your clothes and <<$tXe>> is glad you don''t wear cheap clothing."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetQualPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves the quality of your clothes and <<$tXe>> is glad you don''t wear cheap clothing."'
+			end	
+		end
+	end
+	if clotQualPrefTmp ! 0:
+		'<<$meetQualPref>>'
+	end
+
+end
+if $ARGS[0] = 'clotTopPrefTmp':
+	if clotTopPrefTmp = 1:
+		if PCloTopCut > clotTopMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> says shyly that <<$tXe>> likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you kind of have to much for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is way to much."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
+			end	
+		else
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> says with a blush <<$tXe>> likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> is glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes that you wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
+			end					
+		end
+	elseif clotTopPrefTmp = 2:
+		if PCloTopCut < clotTopMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says shyly that <<$tXe>> likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to little for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and yours is way to little."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
+			end	
+		elseif PCloTopCut > clotTopMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says slightly embarressed that <<$tXe>> likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to much for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and your''s is way to much."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
+			end	
+		else
+				if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> says with a blush <<$tXe>> likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> is glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes that you wear clothes with <<$clotTopPrefTmp>> cleavage."'
+			end	
+		end
+	elseif clotTopPrefTmp = 3:
+		if PCloTopCut < clotTopMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says shyly that <<$tXe>> likes girls who wear clothes with <<$clotTopPrefTmp>> cleavage, and you have to little for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and yours is way to little."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes girls that wear clothes with <<$clotTopPrefTmp>> cleavage, and anything else is trash."'
+			end	
+		else
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> says with a blush <<$tXe>> likes that you are wearing clothes with only <<$clotTopPrefTmp>> cleavage."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> is glad you wear clothes with only <<$clotTopPrefTmp>> cleavage."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetTopPref = '<<$loverdesc[lover_number]>> looks at your cleavage and says <<$tXe>> likes that you wear clothes with <<$clotTopPrefTmp>> cleavage, and it makes your breats look great."'
+			end	
+		end
+	end
+	if clotTopPrefTmp ! 0:
+		'<<$meetTopPref>>'
+	end
+end
+if $ARGS[0] = 'bottShorPrefTmp':
+	if bottShorPrefTmp = 1:
+		if PCloSkirt > bottShorMax or PCloPants > bottShorMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> says shyly that <<$tXe>> likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too much for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look lewd."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a slut."'
+			end	
+		else
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says that <<$tXe>> likes that you are wearing clothes with only <<$bottShorPrefTmp>> bottoms."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says <<$tXe>> is glad you wear clothes with only <<$bottShorPrefTmp>> bottoms."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says <<$tXe>> likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, and anything else is trash."'
+			end					
+		end
+	
+	elseif bottShorPrefTmp = 2:
+		if (PCloSkirt < bottShorMin + PCloPants < bottShorMin) = 1:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says shyly that <<$tXe>> likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of have too long of clothing for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look prudish."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a prude."'
+			end	
+		elseif PCloSkirt > bottShorMax or PCloPants > bottShorMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> says shyly that <<$tXe>> likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too much for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look lewd."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a slut."'
+			end	
+		else
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length, blushing, and says that <<$tXe>> likes that you are wearing clothes with <<$bottShorPrefTmp>> bottoms."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says <<$tXe>> is glad you wear clothes with <<$bottShorPrefTmp>> bottoms."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your bottom''s length and says <<$tXe>> likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, and anything else is trash."'
+			end					
+		end
+	elseif bottShorPrefTmp = 3:
+		if (PCloSkirt < bottShorMin + PCloPants < bottShorMin) = 1:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says shyly that <<$tXe>> likes girls who wear clothes with <<$bottShorPrefTmp>> bottoms, and you kind of show too little for <<$tXyr>> taste."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look prudish."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your legs and says <<$tXe>> likes girls that wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a prude."'
+			end	
+		else
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says with a blush <<$tXe>> likes that you are wearing clothes with <<$bottShorPrefTmp>> bottoms, and that <<$tXe>> thinks the length looks great on you."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says <<$tXe>> is glad you wear clothes with <<$bottShorPrefTmp>> bottoms, and yours makes you look like a seductress."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetBottPref = '<<$loverdesc[lover_number]>> looks at your clothing''s bottoms length and says <<$tXe>> likes that you wear clothes with <<$bottShorPrefTmp>> bottoms, it makes you look sexy."'
+			end	
+		end
+	end
+	if bottShorPrefTmp ! 0:
+		'<<$meetBottPref>>'
+	end
+
+end
+if $ARGS[0] = 'clotThinPrefTmp':
+	if clotThinPrefTmp = 1:
+		if PCloThinness > clotThinMax: 
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 2
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and looking down <<$tXe>> mumbles that it makes you look like a slut."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and that it makes you look like a slut."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and only whores where clothes that thin."'
+			end	
+		elseif PCloThinness <= clotThinMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is just right, not too thick and not to thin."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is just right, not too thick and not to thin."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is just right, not too thick and not to thin."'
+			end	
+		end
+	elseif clotThinPrefTmp = 2: 
+		if PCloThinness > clotThinMax: 
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 2
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and looking down <<$tXe>> mumbles that it makes you look like a slut."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and that it makes you look like a slut."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thin, and only whores where clothes that thin."'
+			end	
+		elseif PCloThinness < clotThinMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 2
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and looking down <<$tXe>> mumbles that it makes you look like a prude."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and that it makes you look like a prude."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and only prude where clothes that thick."'
+			end	
+		elseif PCloThinness >= clotThinMin and PCloThinness <= clotThinMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is just right, not too thick and not to thin."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is just right, not too thick and not to thin."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is just right, not too thick and not to thin."'
+			end	
+		end
+	elseif clotThinPrefTmp = 3:
+		if PCloThinness < clotThinMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 2
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and looking down <<$tXe>> mumbles that it makes you look like a prude."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and that it makes you look like a prude."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> looks at the thinness of your outfit and says that your outfit is too thick, and only prude where clothes that thick."'
+			end	
+		elseif PCloThinness >= clotThinMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is perfect, and <<$tXe>> says shyly <<$tXe>> likes to look at your body''s curves."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is perfect, and <<$tXe>> loves to see every curve of your body."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetClotThin = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks your outfit''s thinness is perfect, and <<$tXyr>> eyes take in the curves of your body."'
+			end	
+		end
+	end
+	if clotThinPrefTmp ! 0:
+		'<<$meetClotThin>>'
+	end
+end
+if $ARGS[0] = 'bimbPrefTmp':
+	if bimbPrefTmp = 1:
+		if PCloBimbo > 0:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you blushing that <<$tXe>> likes that you look like a bimbo."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you that your bimbo clothes look amazing on you."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 2 
+				$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> tells you that <<$tXe>> thinks all girls should dress up as much as a bimbo as you are."'
+			end	
+		elseif PCloBimbo = 0:
+			loverrelation[lover_number] -= 1
+			$meetbimbPrefTmp = '<<$loverdesc[lover_number]>> says you would look much better dressed up as a bimbo."'
+		end
+	end
+	if bimbPrefTmp ! 0:
+		'<<$meetbimbPrefTmp>>'
+	end
+
+end
+if $ARGS[0] = 'pierPrefTmp':
+	if pierPrefTmp = 1:
+		if pierWearCount > pierPrefTmpMax:
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> sees your piercings and tells you that you have to many piercings and anything more then <<pierPrefTmpMax>> is too much.'
+		else
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad to see you wear very few piercings."'
+		end
+	elseif pierPrefTmp = 2:
+		if pierWearCount < pierPrefTmpMin:
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of piercings and says a woman should at least have <<pierPrefTmpMin>> piercings.'
+		elseif pierWearCount > pierPrefTmpMax:
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your many piercings and says a woman should at most <<pierPrefTmpMax>> piercings.'
+		else
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad you wear a few piercings, stating makes any girl look good.'
+		end
+	elseif pierPrefTmp = 3:
+		if pierWearCount < pierPrefTmpMin:
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of piercings and says a woman should at least have <<pierPrefTmpMin>> piercings.'
+		else
+			$meetpierPrefTmp = '<<$loverdesc[lover_number]>> is glad you wear many piercings, stating makes any girl look good.'
+		end
+	end
+	if pierPrefTmp ! 0:
+		'<<$meetpierPrefTmp>>'
+	end
+
+end
+if $ARGS[0] = 'tattPrefTmp':
+	if tattPrefTmp = 1:
+		if TattCount > tattPrefTmpMax:
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> sees your tattoos and tells you that you have to many tattoos and anything more then <<tattPrefTmpMax>> is too much.'
+		else
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad to see you have very few tattoos."'
+		end
+	elseif tattPrefTmp = 2:
+		if TattCount < tattPrefTmpMin:
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of tattoos and says a woman should at least have <<tattPrefTmpMin>> tattoos.'
+		elseif TattCount > tattPrefTmpMax:
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your many tattoos and says a woman should at most <<tattPrefTmpMax>> tattoos.'
+		else
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad you have a few tattoos, stating makes any girl look good.'
+		end
+	elseif tattPrefTmp = 3:
+		if TattCount < tattPrefTmpMin:
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> comments on your lack of tattoos and says a woman should at least have <<tattPrefTmpMin>> tattoos.'
+		else
+			$meettattPrefTmp = '<<$loverdesc[lover_number]>> is glad you have many tattoos, stating makes any girl look good.'
+		end
+	end
+	if tattPrefTmp ! 0:
+		'<<$meettattPrefTmp>>'
+	end
+
+end
+if $ARGS[0] = 'lipsPrefTmp':
+	!!This is to find out how big they want your lips.
+	!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
+	if lipsPrefTmp = 1:
+		if pcs_lip > lipsPrefTmpMax:
+			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a quick comment on how <<$tXe>> hates the size of your lips, for <<$tXem>> it''s way too big.'
+		elseif pcs_lip <= lipsPrefTmpMin:
+			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a comment on how <<$tXe>> likes that your lips aren''t outragously huge.'
+		end
+	elseif lipsPrefTmp = 2:
+		if pcs_lip < lipsPrefTmpMin:
+			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a quick comment on how <<$tXe>> hates the size of your lips, for <<$tXem>> they are not big enough.'
+		elseif pcs_lip >= lipsPrefTmpMin:
+			$meetlipsPrefTmp = '<<$loverdesc[lover_number]>> makes a comment on how <<$tXe>> likes that your lips are huge.'
+		end
+	end
+	if lipsPrefTmp ! 0:
+		'<<$meetlipsPrefTmp>>'
+	end
+end
+
+if $ARGS[0] = 'makePrefTmp':
+	if pcs_makeup ! 0 and makePrefTmp ! 0:
+		if haraklover[lover_number] = 0:
+
+			if pcs_hairbsh = 0:
+				loverrelation[lover_number] -= 1
+				$meetMake = '<<$loverdesc[lover_number]>> says timidly "I guess you had to leave in a hurry huh?"'
+			elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
+				loverrelation[lover_number] -= 1
+				$meetMake = '<<$loverdesc[lover_number]>> says timidly "I don''t mean to be pushy, but I think girls should wear <<$makePrefTmp>>."'
+			elseif pcs_makeup = makePrefTmp + 1:
+				loverrelation[lover_number] += 1
+				$meetMake = '<<$loverdesc[lover_number]>> looks at your face and says, "I love the way you did your makeup."'
+			end
+		elseif haraklover[lover_number] = 1:
+			if pcs_hairbsh = 0:
+				loverrelation[lover_number] -= 1
+				$meetMake = '<<$loverdesc[lover_number]>> says questionly, "I guess you had to leave in a hurry?"'
+			elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
+				loverrelation[lover_number] -= 1
+				$meetMake = '<<$loverdesc[lover_number]>> looks at your makeup and says, "I don''t mean to be rude, but I really like it when girls wear <<$makePrefTmp>>."'
+			elseif pcs_makeup = makePrefTmp + 1:
+				loverrelation[lover_number] += 1
+				$meetMake = '<<$loverdesc[lover_number]>> looks at your face and says, "I love the way you did your makeup. It makes you look beautiful."'
+			else
+				$meetMake = '<<$loverdesc[lover_number]>> says sweetly, "It seems any way you do your makeup is beautiful."'
+			end
+		elseif haraklover[lover_number] = 2:
+			if pcs_hairbsh = 0:
+				loverrelation[lover_number] -= 1
+				$meetMake = '<<$loverdesc[lover_number]>> says rudely, "Couldn''t take the time to brush your hair?"'
+			elseif pcs_makeup ! makePrefTmp + 1 and makePrefTmp ! 0:
+				loverrelation[lover_number] -= 1
+				$meetMake = '<<$loverdesc[lover_number]>> says rather crudely," You should wear <<$makePrefTmp>> <<$pcs_nickname>>. Anything else and it makes you look ugly."'
+			elseif pcs_makeup = makePrefTmp + 1:
+				loverrelation[lover_number] += 1
+				$meetMake = '<<$loverdesc[lover_number]>> says with a smile, "Now THATS how a woman should do their makeup, it looks sexy on you!"'
+			else
+				$meetMake = '<<$loverdesc[lover_number]>> says, "It seems any way you do your makeup is beautiful."'
+			end
+		end
+		if makePrefTmp ! 0:
+			'<<$meetMake>>'
+		end
+	elseif pcs_makeup = 0:
+		if haraklover[lover_number] = 0:
+
+			loverrelation[lover_number] -= 1
+			$meetMake = '<<$loverdesc[lover_number]>> looks at you and nerviously says, "Your makeup is running."'
+		elseif haraklover[lover_number] = 1:
+			loverrelation[lover_number] -= 1
+			$meetMake = '<<$loverdesc[lover_number]>> says in a disapproving tone, "Your makeup is running."'
+		elseif haraklover[lover_number] = 2:
+			loverrelation[lover_number] -= 1
+			$meetMake = '<<$loverdesc[lover_number]>> says in a rude tone, "Your makeup is running."'
+		else
+			loverrelation[lover_number] -= 1
+			$meetMake = '"Um, your makeup is running."'
+		end
+		'<<$meetMake>>'
+	end
+end
+if $ARGS[0] = 'hairPref':
+	if pcs_haircol ! hairPref and hairPref ! 4:
+		if haraklover[lover_number] = 0:
+
+			loverrelation[lover_number] -= 1
+			$meetHair = '<<$loverdesc[lover_number]>> says timidly "I don''t mean to judge you, but I kind of like girls with <<$hairPref>> hair."'
+		elseif haraklover[lover_number] = 1:
+			loverrelation[lover_number] -= 1
+			$meetHair = '<<$loverdesc[lover_number]>> says to you curtly, "I am your <<$tBoyGirlfriend>> and all, but girls with <<$pcs_haircol>> hair just doesn''t do it for me. I like girls with <<$hairPref>> hair."'
+		elseif haraklover[lover_number] = 2:
+			loverrelation[lover_number] -= 1
+			$meetHair = '<<$loverdesc[lover_number]>> says with a candor tone, "You don''t look good at all with <<$pcs_haircol>> hair, but girls with <<$hairPref>> hair look amazing."'
+		end
+	elseif pcs_haircol = hairPref:
+		if haraklover[lover_number] = 0:
+
+			loverrelation[lover_number] += 1
+			$meetHair = '<<$loverdesc[lover_number]>> says sweetly "I love the color of your hair <<$pcs_nickname>>, it likes pretty on you."'
+		elseif haraklover[lover_number] = 1:
+			loverrelation[lover_number] += 1
+			$meetHair = '<<$loverdesc[lover_number]>> says, "I think you look amazing with <<$pcs_haircol>> hair. I love girls that have <<$pcs_haircol>> hair."'
+		elseif haraklover[lover_number] = 2:
+			loverrelation[lover_number] += 1
+			$meetHair = '<<$loverdesc[lover_number]>> says smiling, "I can''t even begin to tell you <<$pcs_nickname>> how amazing you look with <<$pcs_haircol>> hair."'
+		end
+	end
+	if hairPref ! 4:
+		'<<$meetHair>>'
+	end
+
+end
+if $ARGS[0] = 'IQPrefTmp':
+
+
+end
+if $ARGS[0] = 'titBoy':
+	if titBoy = 0: 
+		if tits > titMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> tells you shyly, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> tells you cafefully, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> tells you bluntly, "Hey <<$giveNick>>, you look amazing, but I like girls with <<$titBoy>>.'
+			end
+		elseif tits <= titMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> tells you slightly embarrassed, "Um <<$giveNick>>, your breasts make you look amazing."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> says to you, "Hey <<$giveNick>>, want you to know, your breasts make you look amazing."'
+			elseif haraklover[lover_number] = 2:
+					loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> says to you, "Hey <<$giveNick>>, want you to know, your breasts make you look amazing."'
+			end
+		
+		end
+	elseif titBoy = 1:
+		if tits < titMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> tells you shyly, "Hey <<$giveNick>>, you look beautiful, but I like girls with <<$titBoy>>, and yours are just to small."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> cafefully says to you, "Hey <<$giveNick>>, you look beautiful, but girls shouldn''t have a flat chest. I like girls with <<$titBoy>>.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> bluntly says, "Hey <<$giveNick>>, you look beautiful, but your small breasts make you look like a dude. I like girls with <<$titBoy>>.'
+			end
+		elseif tits > titMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> says to you, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours are way to big.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> says to you, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours are way to big.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> says, "<<$pcs_firstname>>, you look amazing, but I like girls with <<$titBoy>>, and yours make you look like a cow.'
+			end
+		elseif tits >= titMin and tits <= titMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> tells you slightly embarrassed, "H-Hey <<$giveNick>>, your breasts are beautiful."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> says to you, " Have I ever told you <<$giveNick>> that your breasts are beautiful?"'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> says to you, " You know your breasts look amazing, right <<$giveNick>>?"'
+			end
+		end
+	elseif titBoy = 2:
+		if tits < titMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> says quietly, "Hey <<$giveNick>>, I don''t mean to be mean, but I like girls with <<$titBoy>>, and yours are just to small."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> says with a very calm voice, "Hey <<$giveNick>>, I don''t mean to be an ass, but I like girls with <<$titBoy>>, and yours are just not big enough for my liking."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetTits = '<<$loverdesc[lover_number]>> says crudely, "Hey <<$giveNick>>, girls should have a nice big rack, and your chest does''t even come close."'
+			end
+		elseif tits >= titMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> tells you in slightly embarrassed voice, "H-Hey <<$giveNick>>, I think you look amazing with <<$titBoy>>."'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> tells you, "Oh <<$giveNick>>, I think you look amazing with <<$titBoy>>."'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 1 
+				$meetTits = '<<$loverdesc[lover_number]>> tells you, "Oh <<$giveNick>>, I love girls with <<$titBoy>>."'
+			end
+		
+		end
+	end
+	'<<$meetTits>>'
+end
+
+
+if $ARGS[0] = 'figPref':
+	if figurBoy = 0:
+		if salocatnow > figurePrefMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says <<$tXe>> prefers a woman that is skinny, and you are kind of chunky.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says <<$tXe>> prefers a woman that is thin, and you are not at all.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says <<$tXe>> prefers a woman that is slender, and your weight makes you look ugly.'
+			end
+		elseif salocatnow <= figurePrefMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> tells you <<$tXe>> loves your slim figure.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your slim figure proves that slenderness is sexy.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your slim body makes you look like a goddess.'
+			end
+		end
+	elseif figurBoy = 1:
+		if salocatnow > figurePrefMax:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> tells you that you are to overweight, and <<$tXe>> prefers a woman a bit skinnier.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your weight is unappealing and <<$tXe>> prefers a woman that is slimmer.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> crudely says you look fat and you should lose some weight.'
+			end
+		elseif salocatnow < figurePrefMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> quietly says you could do to gain a few pounds.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says you should eat more, because your body is too thin.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says you look anarexic.'
+			end
+		else
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your figure is perfect in <<$tXyr>> eyes.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says <<$tXe>> loves how you are not too skinny or fat.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your body looks amazing.'
+			end
+		end
+		
+	elseif figurBoy = 2:
+		
+		if salocatnow < figurePrefMin:
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says <<$tXe>> prefers a woman that is thicker, and you are too slim.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says <<$tXe>> thinks a woman''s figure should be on the thick side, and your body is too skinny.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] -= 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> crudely tells you <<$tXe>> prefers a woman that is thick, and you look anerexic.'
+			end
+		elseif salocatnow >= figurePrefMin:
+			!!Yeah, yeah I made it overlap, a preference that you can change if you want.
+			if haraklover[lover_number] = 0:
+
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> tells you <<$tXe>> loves your thick figure.'
+			elseif haraklover[lover_number] = 1:
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your curvy figure proves that women should have curves.'
+			elseif haraklover[lover_number] = 2:
+				loverrelation[lover_number] += 1
+				$meetFigurPref = '<<$loverdesc[lover_number]>> says your curvy body makes you look like a goddess.'
+			end
+		end
+	end
+	if figurBoy ! 3:
+		'<<$meetFigurPref>>'
+	end
+	
+	
+end
+
+if $ARGS[0] = 'clothesPref':
+	gs 'lover_likes', 'clotTypePrefTmp'
+	gs 'lover_likes', 'clotQualPrefTmp'
+	gs 'lover_likes', 'clotTopPrefTmp'
+	gs 'lover_likes', 'bottShorPrefTmp'
+	gs 'lover_likes', 'clotThinPrefTmp'
+	gs 'lover_likes', 'bimbPrefTmp'
+end
+
+if $ARGS[0] = 'facePref':
+	gs 'lover_likes', 'makePrefTmp'
+	gs 'lover_likes', 'hairPref'
+end
+
+if $ARGS[0] = 'bodyPrefTmp':
+	gs 'lover_likes', 'figPref'
+	gs 'lover_likes', 'pierPrefTmp'
+	gs 'lover_likes', 'tattPrefTmp'
+	gs 'lover_likes', 'titBoy'
+	gs 'lover_likes', 'lipsPrefTmp'
+end
+
+if $ARGS[0] = 'allPref':
+	gs 'lover_likes', 'makePrefTmp'
+	gs 'lover_likes', 'hairPref'
+	gs 'lover_likes', 'lipsPrefTmp'
+	gs 'lover_likes', 'clotTypePrefTmp'
+	gs 'lover_likes', 'clotQualPrefTmp'
+	gs 'lover_likes', 'clotTopPrefTmp'
+	gs 'lover_likes', 'bottShorPrefTmp'
+	gs 'lover_likes', 'clotThinPrefTmp'
+	gs 'lover_likes', 'bimbPrefTmp'
+	gs 'lover_likes', 'figPref'
+	gs 'lover_likes', 'pierPrefTmp'
+	gs 'lover_likes', 'tattPrefTmp'
+	gs 'lover_likes', 'titBoy'
+end
+
+if $ARGS[0] = 'checkPier':
+	pierWearCount = 0
+	if pirsA > 0 and pirsA < 1000:
+		pierWearCount += 1
+	end
+	if pirsB > 0 and pirsB < 1000:
+		pierWearCount += 1
+	end
+	if pirsC > 0 and pirsC < 1000:
+		pierWearCount += 1
+	end
+	if pirsD > 0 and pirsD < 1000:
+		pierWearCount += 1
+	end
+	if pirsE > 0 and pirsE < 1000:
+		pierWearCount += 1
+	end
+	if pirsF > 0 and pirsF < 1000:
+		pierWearCount += 1
+	end
+	if pirsG > 0 and pirsG < 1000:
+		pierWearCount += 1
+	end
+	if pirsN > 0 and pirsN < 1000:
+		pierWearCount += 1
+	end
+
+end
+
+
+
+if $ARGS[0] = 'compliance':
+	if loverscompliance[lover_number] >= 0 and loverscompliance[lover_number] < 2:
+		'You are a bit frustrated that <<$tXe>> doesn''t like you for who you are.'
+	elseif loverscompliance[lover_number] < 3:
+		pcs_horny += 3
+		'You have done this at a couple of times and you feel... Strange thinking about how you are changing to suit <<$tXyr>> wants.'
+	elseif loverscompliance[lover_number] < 4:
+		pcs_horny += 5
+		'You can''t understand why you feel tingly about changing into <<$tXyr>> dream girl...'
+	elseif loverscompliance[lover_number] < 5:
+		pcs_horny += 7
+		'Your mind briefly fantasizes about turning more and more into <<$tXyr>> ideal girl...'
+	elseif loverscompliance[lover_number] < 6:
+		pcs_horny += 8
+		'You think to yourself, "<<$tXec>>is my <<$tBoyGirlfriend>>, I guess it would make sense to try to be the best girl I can be for <<$tXem>>..."'
+	elseif loverscompliance[lover_number] < 7:
+		pcs_horny += 10
+		'You feel from the amount of times you have changed for <<$tXem>> you would do anything to become <<$tXyr>> ideal girlfriend.'
+	end
+
+end
+
+
+--- lover_likes ---------------------------------
+

locations/lover_love

@@ -0,0 +1,77 @@
+# lover_love
+
+if loverlove[lover_number] = 3:
+	'<<$loverdesc[lover_number]>> has hired a wedding limousine and it''s outside waiting for you. This is it, you are getting married today.'
+
+	act 'Sit in the limousine':
+		cla
+		'You get into the limo, and it drives off. Soon you arrive at the wedding, <<$loverdesc[lover_number]>> is waiting for you as you walk down the aisle.'
+
+		act 'Marry husband':
+			cla
+			minut += 60
+			loverslove[lover_number] = 0
+			gs 'lover', 'remove', lover_number
+			husband = 100
+			husbanday = 0
+			$husName = $lover[lover_number]
+			$husHair = $loverface[lover_number]
+			$husBody = $loverbod[lover_number]
+			$husFat = $loverbod[lover_number]
+			husDick = loverdick[lover_number]
+			harakHusb = haraklover[lover_number]
+			izvratH = loverizvrat[lover_number]
+			silavagH = loversilaVag[lover_number]
+			husbFin = loverfinance[lover_number]
+			husbandMark = 1
+			'The wedding reception takes place at a cafe. There aren''t many guests since neither you nor the groom have that many friends or family members. There is a lot of congratulations, toasts, merrymaking and crying. By the evening, everybody is drunk and you and your husband stagger into a taxi, which takes you home.'
+
+			act 'Wedding night':gt 'husbsex', 'room'
+		end
+	end
+
+	exit
+elseif loverlove[lover_number] = 2:
+	'<<$loverdesc[lover_number]>> looks very excited and suddenly pulls a ring out of a box.'
+	'<<$loverdesc[lover_number]>> says "<<$pcs_nickname>>. I offer you my hand and heart. Would you marry me?"'
+
+	act 'No (turn him down)':
+		minut += 60
+		gs 'lover', 'remove', lover_number
+		pregtalk = 0
+		dynamic $go_home
+		
+	end
+
+	act 'Yes':
+		cla
+		'You agree and put the ring on your finger. <<$loverdesc[lover_number]>> rejoices and happily hugs and kisses you.'
+		'<<$loverdesc[lover_number]>> says "Now you need to find a wedding dress."'
+
+		act 'Go looking for the dress':
+			cla
+			minut += 60
+			loverlove[lover_number] = 3
+			'You get into a taxi with your soon to be husband and go to the store to choose a dress. You choose an expensive and luxurious dress. <<$loverdesc[lover_number]>> pays for the purchase.'
+			'After a long day you feel tired and ask <<$loverdesc[lover_number]>> to drive you home, warning him that the next time you''ll meet you will get married.'
+			dynamic $go_home
+		end
+	end
+
+	exit
+end
+
+if pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and loverlove[lover_number] = 1 and haraklover[lover_number] = 0:
+	'<<$loverdesc[lover_number]>> looks very excited. He decides that you are now ready to meet his mother.'
+
+	act 'Meet the parents':gt 'love', 'mother'
+
+	exit
+elseif pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and loverlove[lover_number] = 1 and haraklover[lover_number] = 1 and $pantyworntype ! 'none':
+	'<<$loverdesc[lover_number]>> examins you and decides that you are ready to meet his friends.'
+
+	act 'Meet his friends':gt 'love', 'frends'
+
+	exit
+end
+--- lover_love ---------------------------------

locations/lover_pref

@@ -0,0 +1,449 @@
+# lover_pref
+
+gs 'boyStat', $lover[lover_number]
+!!$boybody = 1 - tall, 2 - average, 3 - short
+$boybody = $loverbody[lover_number]
+!!$boybod = 1 - thin, 2 - athletic, 3 - chunky, 4 - fat
+$boybod = $loverbod[lover_number]
+$boyface = $loverface[lover_number]
+!! sexual force of 0 prior_to 2
+silaVag = loversilaVag[lover_number]
+!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
+finance = loverfinance[lover_number]
+!!check in appearance, a parameter vnesh
+vneshBoy = vneshlover[lover_number]
+$boyClo = $loverClo[lover_number]
+
+
+!!0 - 0 to 2, 1 - 3 to 5, 2, 5 to 6
+
+!! These variables will be compared to the player value 'salocatnow'.
+figurBoy = figurelover[lover_number]
+
+	
+if figurBoy = 0:
+	figurePrefMin = 0
+	figurePrefMax = 2
+elseif figurBoy = 1:
+	figurePrefMin = 3
+	figurePrefMax = 4
+elseif figurBoy = 2:
+	figurePrefMin = 5
+	figurePrefMax = 77
+else
+	figurePrefMin = 0
+	figurePrefMax = 99
+end
+
+
+!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
+titBoy = titlover[lover_number]
+if titBoy = 0:
+	titMin = 0
+	titMax = 3
+elseif titBoy = 1:
+	titMin = 3
+	titMax = 4
+elseif titBoy = 2:
+	titMin = 5
+	titMax = 999
+end
+
+
+!!favorite hair color 0 - black, 1 - brown, 2 - redhead, 3 - blonde
+hairBoy = hairlover[lover_number]
+!!character 0 - soft, 1 -norm 2 - aggressor
+harakBoy = haraklover[lover_number]
+!!perversity
+izvrat = loverizvrat[lover_number]
+husb_birth_year = year - boyage
+husbAge = boyage
+
+
+!!new preferences
+
+!!renaming perversity constant
+pervConstant = izvrat
+
+!!This is for clothing type preference
+!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
+clotTypePrefTmp = clotTypePref[lover_number]
+
+!!This is for the quality of clothing
+!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
+clotQualPrefTmp = clotQualPref[lover_number]
+
+!!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
+!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
+!! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
+
+!! How much they want to see your chest USE THIS FOR NOW
+!! 0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
+!! It doesn''t matter if your poor or rich, everyone loves tits.
+clotTopPrefTmp = clotTopPref[lover_number]
+
+!!This part helps calculate the constant to add to the 
+
+
+!!This is to set the max/min of the clotTop variables. This is so you dont need to go through the code changing individual numbers.
+if clotTopPrefTmp = 1:
+	clotTopMin = 1
+	clotTopMax = 4
+elseif clotTopPrefTmp = 2:
+	clotTopMin = 3
+	clotTopMax = 5
+elseif clotTopPrefTmp = 3:
+	clotTopMin = 5
+	clotTopMax = 7
+else
+	clotTopMin = 0
+	clotTopMax = 999
+end
+
+
+
+
+!!THIS IS THE EQUATION FOR THE TIT ADDITION
+if tits < 2:
+	titConstant = 0
+elseif tits >= 2 and tits < 4:
+	titConstant = 1
+elseif tits >= 4 and tits < 6:
+	titConstant = 2
+elseif tits >= 6:
+	titConstant = 3
+else
+	titConstant = 0
+end
+
+
+
+
+!! This is for pants and skirt shortness and will be grouped together as such.
+!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 5 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
+bottShorPrefTmp = bottShorPref[lover_number]
+
+
+!!This is to set the max/min of the bottShor variables. This is so you dont need to go through the code changing individual numbers.
+if bottShorPrefTmp = 1:
+	bottShorMin = 0
+	bottShorMax = 2
+elseif bottShorPrefTmp = 2:
+	bottShorMin = 3
+	bottShorMax = 5
+elseif bottShorPrefTmp = 3:
+	bottShorMin = 5
+	bottShorMax = 6
+else
+	bottShorMin = 0
+	bottShorMax = 999
+end
+
+
+!! This is for clothes thinness.
+!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
+!! I see the moderate to really thin overlapping. Its intentional.
+
+!!This is to set the max/min of the clotThinness variables. This is so you dont need to go through the code changing individual numbers.
+clotThinPrefTmp = clotThinPref[lover_number]
+if clotThinPrefTmp = 1:
+	clotThinMin = 0
+	clotThinMax = 2
+elseif clotThinPrefTmp = 2:
+	clotThinMin = 3
+	clotThinMax = 4
+elseif clotThinPrefTmp = 3:
+	clotThinMin = 4
+	clotThinMax = 6
+else
+	pierPrefTmpMin = 0
+	clotThinMax = 999
+end
+
+
+
+!!This is to find out if they want you to wear bimbo clothing
+!! 0 - no preference, 1 - Prefers bimbo clothing.
+bimbPrefTmp = bimbPref[lover_number]
+
+!!This is to find out if they want you to wear piercings.
+!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
+pierPrefTmp = pierPref[lover_number]
+
+!!This is to set the max min
+if pierPrefTmp = 1:
+	pierPrefTmpMin = 0
+	pierPrefTmpMax = 2
+elseif pierPrefTmp = 2:
+	pierPrefTmpMin = 3
+	pierPrefTmpMax = 5
+elseif pierPrefTmp = 3:
+	pierPrefTmpMin = 6
+	pierPrefTmpMax = 999
+else
+	pierPrefTmpMin = 0
+	pierPrefTmpMax = 999
+end
+
+
+
+
+!!This is to find out if they want you to have tattoos.
+!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
+tattPrefTmp = tattPref[lover_number]
+
+!!This is to set the max min for tattoos
+
+if tattPrefTmp = 1:
+	tattPrefTmpMin = 0
+	tattPrefTmpMax = 2
+elseif tattPrefTmp = 2:
+	tattPrefTmpMin = 3
+	tattPrefTmpMax = 5
+elseif tattPrefTmp = 3:
+	tattPrefTmpMin = 6
+	tattPrefTmpMax = 999
+else
+	tattPrefTmpMin = 0
+	tattPrefTmpMax = 999
+end
+
+!!This is to find out how big they want your lips.
+!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
+lipsPrefTmp = lipsPref[lover_number]
+
+if lipsPrefTmp = 1:
+	lipsPrefTmpMin = 2
+	lipsPrefTmpMax = 3
+elseif lipsPrefTmp = 2:
+	lipsPrefTmpMin = 3
+	lipsPrefTmpMax = 99
+else
+	lipsPrefTmpMin = 0
+	lipsPrefTmpMax = 99
+end
+
+!!This is to find out how big they want YOU.
+!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
+!! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
+bodyPrefTmp = bodyPref[lover_number]
+
+!!This is to find out how much makeup they want you to wear.
+!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
+makePrefTmp = makePref[lover_number]
+
+
+!! This is to see if they like a ditz, average, or a smartypants
+!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
+IQPrefTmp = IQPref[lover_number]
+
+!!This is the new hair color preference
+!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
+hairPref = hairBoy
+	
+
+
+!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
+if clotTypePrefTmp = 0:
+	$clotTypePrefTmp = ''
+elseif clotTypePrefTmp = 1:
+	$clotTypePrefTmp = 'cheap'
+elseif clotTypePrefTmp = 2:
+	$clotTypePrefTmp = 'average'
+elseif clotTypePrefTmp = 3:
+	$clotTypePrefTmp = 'formal'
+elseif clotTypePrefTmp = 4:
+	$clotTypePrefTmp = 'fetish'
+end
+
+!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
+if clotQualPrefTmp = 0:
+	$clotQualPrefTmp = 'any type of'
+elseif clotQualPrefTmp = 1:
+	$clotQualPrefTmp = 'anything but expensive'
+elseif clotQualPrefTmp = 2:
+	$clotQualPrefTmp = 'expensive'
+end
+
+!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
+if clotTopPrefTmp = 0:
+	$clotTopPrefTmp = 'any amount of'
+elseif clotTopPrefTmp = 1:
+	$clotTopPrefTmp = 'a little bit of'
+elseif clotTopPrefTmp = 2:
+	$clotTopPrefTmp = 'a lot of'
+elseif clotTopPrefTmp = 3:
+	$clotTopPrefTmp = 'a huge amount of'
+end
+
+!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
+if bottShorPrefTmp = 0:
+	$bottShorPrefTmp= 'any length'
+elseif bottShorPrefTmp = 1:
+	$bottShorPrefTmp= 'modest length'
+elseif bottShorPrefTmp = 2:
+	$bottShorPrefTmp= 'slightly short length'
+elseif bottShorPrefTmp = 3:
+	$bottShorPrefTmp= 'really short length'
+end
+
+!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
+if clotThinPrefTmp = 0:
+	$clotThinPrefTmp= ''
+elseif clotThinPrefTmp = 1:
+	$clotThinPrefTmp= 'thick'
+elseif clotThinPrefTmp = 2:
+	$clotThinPrefTmp= 'a little thin'
+elseif clotThinPrefTmp = 3:
+	$clotThinPrefTmp= 'really thin or even see through'
+end
+
+!! 0 - no preference, 1 - Prefers bimbo clothing.
+if bimbPrefTmp = 0:
+	$bimboPref = ''
+else
+	$bimboPref = 'a bimbo'
+end
+
+!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
+if pierPrefTmp = 0:
+	$pierPrefTmp = 'any amount'
+elseif pierPrefTmp = 1:
+	$pierPrefTmp = 'a couple'
+elseif pierPrefTmp = 2:
+	$pierPrefTmp = 'a good amount'
+elseif pierPrefTmp = 3:
+	$pierPrefTmp = 'a lot'
+end
+
+!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
+if tattPrefTmp = 0:
+	$tattPrefTmp = 'any amount'
+elseif tattPrefTmp = 1:
+	$tattPrefTmp = 'a couple'
+elseif tattPrefTmp = 2:
+	$tattPrefTmp = 'a good amount'
+elseif tattPrefTmp = 3:
+	$tattPrefTmp = 'a lot'
+end
+
+!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
+if lipsPrefTmp = 0:
+	$lipsPrefTmp = 'any sized lips'
+elseif lipsPrefTmp = 1:
+	$lipsPrefTmp = 'average sized lips'
+elseif lipsPrefTmp = 2:
+	$lipsPrefTmp = 'thick lips'
+end
+
+!!This is the Players lip description, this allows flexibility when writing
+if pcs_lip = 0:
+	$lipDesc = 'thin'
+elseif pcs_lip = 1:
+	$lipDesc = 'soft'
+elseif pcs_lip = 2:
+	$lipDesc = 'plump'
+elseif pcs_lip = 3:
+	$lipDesc = 'juicy'
+elseif pcs_lip = 4:
+	$lipDesc = 'thick'
+end
+
+
+
+!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
+if bodyPrefTmp = 0:
+	$bodyPrefTmp = 'any weight'
+elseif bodyPrefTmp = 1:
+	$bodyPrefTmp = 'should be skinny'
+elseif bodyPrefTmp = 2:
+	$bodyPrefTmp = ' should be not to skinny or fat'
+elseif bodyPrefTmp = 3:
+	$bodyPrefTmp = 'should be thick and curvy'
+end
+
+!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
+if makePrefTmp = 0:
+	$makePrefTmp = 'any amount of makeup'
+elseif makePrefTmp = 1:
+	$makePrefTmp = 'a sutle amount of makeup'
+elseif makePrefTmp = 2:
+	$makePrefTmp = ' a good amount of makeup'
+elseif makePrefTmp = 3:
+	$makePrefTmp = 'a slutty amount of makeup'
+end
+
+!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
+if IQPrefTmp = 0:
+	$IQPrefTmp = 'nice'
+elseif IQPrefTmp = 1:
+	$IQPrefTmp = 'ditzy'
+elseif IQPrefTmp = 2:
+	$IQPrefTmp = 'with at least a little brain power'
+elseif IQPrefTmp = 3:
+	$IQPrefTmp = 'genius'
+end
+
+!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
+if hairPref = 0:
+	$hairPref = 'black'
+elseif hairPref = 1:
+	$hairPref = 'brown'
+elseif hairPref = 2:
+	$hairPref = 'redhead'
+elseif hairPref = 3:
+	$hairPref = 'blond'
+elseif hairPref = 4:
+	$hairPref = 'any color'
+end
+
+
+!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
+if titBoy = 0:
+	$titBoy = 'petite breasts'
+elseif titBoy = 1:
+	$titBoy = 'good sized breasts'
+elseif titBoy = 2:
+	$titBoy = 'huge breasts'
+end
+
+
+!! manna , mannamax * 50 / 100:
+
+if pcs_hairbsh = 1 and curly > 0:
+	loverrelation[lover_number] += 2 &
+	$meetHair = 'Your hair looks very beautiful.'
+end
+if pcs_hairbsh = 1 and curly = 0:
+	loverrelation[lover_number] += 1 
+	$meetHair = 'You have pretty hair today.'
+end
+if pcs_hairbsh = 0:
+	loverrelation[lover_number] -= 1 
+	$meetHair = 'You look like you were in a hurry.'
+end
+
+!!This are generic things your boyfriend will call you based on how much he likes you.
+if loverrelation[lover_number] > 80:
+	randchan = rand(0,2)
+	if randchan = 0 and haraklover[lover_number] ! 0:
+		$giveNick = 'angel'
+	elseif randchan = 1:
+		$giveNick = 'beautiful'
+	elseif randchan = 2:
+		$giveNick = 'love'
+	end
+elseif loverrelation[lover_number] > 20:
+	randchan = rand(0,1)
+	if randchan = 0:
+		$giveNick = 'babe'
+	elseif randchan = 1:
+		$giveNick = '<<$pcs_nickname>>'
+	end
+else
+	$giveNick = '<<$pcs_firstname>>'
+end
+
+
+--- lover_pref ---------------------------------
+

locations/lover_pronouns

@@ -0,0 +1,24 @@
+# lover_pronouns
+
+!! copy variables for easy of use in long texts
+i = ARGS[0]
+
+if pcs_lovers[i] = 1:
+	$tXe = $loverXe[i] 						&! he/she
+	$tXec = $loverXec[i] 					&! He/She
+	$tXem = $loverXem[i] 					&! him/her
+	$tXemc = $loverXemc[i] 					&! Him/Her
+	$tXyr = $loverXyr[i] 					&! his/her
+	$tXyrc = $loverXyrc[i] 					&! His/Her
+	$tXyrs = $loverXyrs[i] 					&! his/hers
+	$tXyrsc = $loverXyrsc[i] 				&! His/Hers
+	$tXemself = $loverXemself[i] 			&! himself/herself
+	$tXemselfc = $loverXemselfc[i]	 		&! Himself/Herself
+	$loverGenderName = 'man'
+	if loverGender[i] = 1: $loverGenderName = 'woman'
+	$tBoyGirlfriend = 'boyfriend'
+	if loverGender[i] = 1: $tBoyGirlfriend = 'girlfriend'
+end
+
+
+--- lover_pronouns ---------------------------------

locations/lug

@@ -18,7 +18,7 @@ if $ARGS[0] = 'start':
 
 			act 'Tell him your number':
 				cla
-				gs'boyfrend','start'
+				gs'boyfrend', 'start'
 				stopboy = 0
 				'<<$loverdesc[lover_number]>> thanks you and leaves.'
 				act 'Complete outing':gt'lug', 'start'

locations/meet

@@ -15,255 +15,13 @@ if $ARGS[0] = 'start':
 		bcolor = rgb(255, 255, 255)
 		lcolor = rgb(106, 90, 205)
 	end
-	gs 'boyStat', $lover[lover_number]
-	!!$boybody = 1 - tall, 2 - average, 3 - short
-	$boybody = $loverbody[lover_number]
-	!!$boybod = 1 - thin, 2 - athletic, 3 - chunky, 4 - fat
-	$boybod = $loverbod[lover_number]
-	$boyface = $loverface[lover_number]
-	!! sexual force of 0 prior_to 2
-	silaVag = loversilaVag[lover_number]
-	!!security, is responsible for the money and requirements 0 beggar, 1 middle_peasant 2 rich
-	finance = loverfinance[lover_number]
-	!!check in appearance, a parameter vnesh
-	vneshBoy = vneshlover[lover_number]
-	$boyClo = $loverClo[lover_number]
 	
-	
-	!!0 - 0 to 2, 1 - 3 to 5, 2, 5 to 6
-
-	!! These variables will be compared to the player value 'salocatnow'.
-	figurBoy = figurelover[lover_number]
-	
-		
-	if figurBoy = 0:
-		figurePrefMin = 0
-		figurePrefMax = 2
-	elseif figurBoy = 1:
-		figurePrefMin = 3
-		figurePrefMax = 4
-	elseif figurBoy = 2:
-		figurePrefMin = 5
-		figurePrefMax = 77
-	else
-		figurePrefMin = 0
-		figurePrefMax = 99
-	end
+	gs 'lover_pref'
 
-	
-	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
-	titBoy = titlover[lover_number]
-	if titBoy = 0:
-		titMin = 0
-		titMax = 3
-	elseif titBoy = 1:
-		titMin = 3
-		titMax = 4
-	elseif titBoy = 2:
-		titMin = 5
-		titMax = 999
-	end
-	
-	
-	!!favorite hair color 0 - black, 1 - brown, 2 - redhead, 3 - blonde
-	hairBoy = hairlover[lover_number]
-	!!character 0 - soft, 1 -norm 2 - aggressor
-	harakBoy = haraklover[lover_number]
-	!!perversity
-	izvrat = loverizvrat[lover_number]
-	husb_birth_year = year - boyage
-	husbAge = boyage
-	  
-
-	!!new preferences
-	
-	!!renaming perversity constant
-	pervConstant = izvrat
-	
-	!!This is for clothing type preference
-	!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
-	clotTypePrefTmp = clotTypePref[lover_number]
-	
-	!!This is for the quality of clothing
-	!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
-	clotQualPrefTmp = clotQualPref[lover_number]
-	
-	!!Need to add modifiers based on breast size, where larger breasts end up forcing the player to show more cleavage than those with smaller breasts.
-	!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
-	!! The breast size must be adjusted either when the action is being calculeted or we can base it on their ideal breast size :titBoy + 0/3 depending on the players breast size
-	
-	!! How much they want to see your chest USE THIS FOR NOW
-	!! 0 - no preference, 1 - 1 neckline , 2 - 2 or moderate, 3 - 3 to 4 or heavy to severe
-	!! It doesn''t matter if your poor or rich, everyone loves tits.
-	clotTopPrefTmp = clotTopPref[lover_number]
-	
-	!!This part helps calculate the constant to add to the 
-	
-	
-	!!This is to set the max/min of the clotTop variables. This is so you dont need to go through the code changing individual numbers.
-	if clotTopPrefTmp = 1:
-		clotTopMin = 1
-		clotTopMax = 4
-	elseif clotTopPrefTmp = 2:
-		clotTopMin = 3
-		clotTopMax = 5
-	elseif clotTopPrefTmp = 3:
-		clotTopMin = 5
-		clotTopMax = 7
-	else
-		clotTopMin = 0
-		clotTopMax = 999
-	end
-	
-	
-	
-	
-	!!THIS IS THE EQUATION FOR THE TIT ADDITION
-	if tits < 2:
-		titConstant = 0
-	elseif tits >= 2 and tits < 4:
-		titConstant = 1
-	elseif tits >= 4 and tits < 6:
-		titConstant = 2
-	elseif tits >= 6:
-		titConstant = 3
-	else
-		titConstant = 0
-	end
-	
-	
-	
-	
-	!! This is for pants and skirt shortness and will be grouped together as such.
-	!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 5 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
-	bottShorPrefTmp = bottShorPref[lover_number]
-	
-	
-	!!This is to set the max/min of the bottShor variables. This is so you dont need to go through the code changing individual numbers.
-	if bottShorPrefTmp = 1:
-		bottShorMin = 0
-		bottShorMax = 2
-	elseif bottShorPrefTmp = 2:
-		bottShorMin = 3
-		bottShorMax = 5
-	elseif bottShorPrefTmp = 3:
-		bottShorMin = 5
-		bottShorMax = 6
-	else
-		bottShorMin = 0
-		bottShorMax = 999
-	end
-	
-	
-	!! This is for clothes thinness.
-	!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
-	!! I see the moderate to really thin overlapping. Its intentional.
-	
-	!!This is to set the max/min of the clotThinness variables. This is so you dont need to go through the code changing individual numbers.
-	clotThinPrefTmp = clotThinPref[lover_number]
-	if clotThinPrefTmp = 1:
-		clotThinMin = 0
-		clotThinMax = 2
-	elseif clotThinPrefTmp = 2:
-		clotThinMin = 3
-		clotThinMax = 4
-	elseif clotThinPrefTmp = 3:
-		clotThinMin = 4
-		clotThinMax = 6
-	else
-		pierPrefTmpMin = 0
-		clotThinMax = 999
-	end
-	
-	
-	
-	!!This is to find out if they want you to wear bimbo clothing
-	!! 0 - no preference, 1 - Prefers bimbo clothing.
-	bimbPrefTmp = bimbPref[lover_number]
-	
-	!!This is to find out if they want you to wear piercings.
-	!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
-	pierPrefTmp = pierPref[lover_number]
-	
-	!!This is to set the max min
-	if pierPrefTmp = 1:
-		pierPrefTmpMin = 0
-		pierPrefTmpMax = 2
-	elseif pierPrefTmp = 2:
-		pierPrefTmpMin = 3
-		pierPrefTmpMax = 5
-	elseif pierPrefTmp = 3:
-		pierPrefTmpMin = 6
-		pierPrefTmpMax = 999
-	else
-		pierPrefTmpMin = 0
-		pierPrefTmpMax = 999
-	end
-	
-	
-	
-	
-	!!This is to find out if they want you to have tattoos.
-	!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
-	tattPrefTmp = tattPref[lover_number]
-	
-	!!This is to set the max min for tattoos
-	
-	if tattPrefTmp = 1:
-		tattPrefTmpMin = 0
-		tattPrefTmpMax = 2
-	elseif tattPrefTmp = 2:
-		tattPrefTmpMin = 3
-		tattPrefTmpMax = 5
-	elseif tattPrefTmp = 3:
-		tattPrefTmpMin = 6
-		tattPrefTmpMax = 999
-	else
-		tattPrefTmpMin = 0
-		tattPrefTmpMax = 999
-	end
-	
-	!!This is to find out how big they want your lips.
-	!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
-	lipsPrefTmp = lipsPref[lover_number]
-	
-	if lipsPrefTmp = 1:
-		lipsPrefTmpMin = 2
-		lipsPrefTmpMax = 3
-	elseif lipsPrefTmp = 2:
-		lipsPrefTmpMin = 3
-		lipsPrefTmpMax = 99
-	else
-		lipsPrefTmpMin = 0
-		lipsPrefTmpMax = 99
-	end
-	
-	
-	
-	!!This is to find out how big they want YOU.
-	!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
-	!! Notice how this one overlaps. I believe that it should because changing ones weight is very hard.
-	bodyPrefTmp = bodyPref[lover_number]
-	
-	!!This is to find out how much makeup they want you to wear.
-	!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
-	makePrefTmp = makePref[lover_number]
-	
-	
-	!! This is to see if they like a ditz, average, or a smartypants
-	!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
-	IQPrefTmp = IQPref[lover_number]
-	
-	!!This is the new hair color preference
-	!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
-	hairPref = hairBoy
-	
 	!!This keeps track in the change action what it plans to change
 	$changeFind = ''
-	!!This keeps track on how many 
 	
 	!!How many days until the boyfriend starts to comment.
-	
 	clotDay = 3
 	bodyDay = 7
 	
@@ -275,286 +33,8 @@ if $ARGS[0] = 'start':
 	titsDay = 12
 	figureDay = 15
 	
-	
-	if loverlove[lover_number] = 3:
-		'<<$loverdesc[lover_number]>> has hired a wedding limousine and it''s outside waiting for you. This is it, you are getting married today.'
-
-		act 'Sit in the limousine':
-			cla
-			'You get into the limo, and it drives off. Soon you arrive at the wedding, <<$loverdesc[lover_number]>> is waiting for you as you walk down the aisle.'
-
-			act 'Marry husband':
-				cla
-				minut += 60
-				loverslove[lover_number] = 0
-				gs 'lover', 'remove', lover_number
-				husband = 100
-				husbanday = 0
-				$husName = $lover[lover_number]
-				$husHair = $loverface[lover_number]
-				$husBody = $loverbod[lover_number]
-				$husFat = $loverbod[lover_number]
-				husDick = loverdick[lover_number]
-				harakHusb = haraklover[lover_number]
-				izvratH = loverizvrat[lover_number]
-				silavagH = loversilaVag[lover_number]
-				husbFin = loverfinance[lover_number]
-				husbandMark = 1
-				'The wedding reception takes place at a cafe. There aren''t many guests since neither you nor the groom have that many friends or family members. There is a lot of congratulations, toasts, merrymaking and crying. By the evening, everybody is drunk and you and your husband stagger into a taxi, which takes you home.'
-
-				act 'Wedding night':gt 'husbsex', 'room'
-			end
-		end
-
-		exit
-	elseif loverlove[lover_number] = 2:
-		'<<$loverdesc[lover_number]>> looks very excited and suddenly pulls a ring out of a box.'
-		'<<$loverdesc[lover_number]>> says "<<$pcs_nickname>>. I offer you my hand and heart. Would you marry me?"'
-
-		act 'No (turn him down)':
-			minut += 60
-			gs 'lover', 'remove', lover_number
-			pregtalk = 0
-			dynamic $go_home
-			
-		end
-
-		act 'Yes':
-			cla
-			'You agree and put the ring on your finger. <<$loverdesc[lover_number]>> rejoices and happily hugs and kisses you.'
-			'<<$loverdesc[lover_number]>> says "Now you need to find a wedding dress."'
-
-			act 'Go looking for the dress':
-				cla
-				minut += 60
-				loverlove[lover_number] = 3
-				'You get into a taxi with your soon to be husband and go to the store to choose a dress. You choose an expensive and luxurious dress. <<$loverdesc[lover_number]>> pays for the purchase.'
-				'After a long day you feel tired and ask <<$loverdesc[lover_number]>> to drive you home, warning him that the next time you''ll meet you will get married.'
-				dynamic $go_home
-			end
-		end
-
-		exit
-	end
-
-	if pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and loverlove[lover_number] = 1 and haraklover[lover_number] = 0:
-		'<<$loverdesc[lover_number]>> looks very excited. He decides that you are now ready to meet his mother.'
-
-		act 'Meet the parents':gt 'love', 'mother'
-
-		exit
-	elseif pcs_makeup > 1 and ($clothingworntype = 'expensive' or $clothingworntype = 'formal') and curly > 0 and loverlove[lover_number] = 1 and haraklover[lover_number] = 1 and $pantyworntype ! 'none':
-		'<<$loverdesc[lover_number]>> examins you and decides that you are ready to meet his friends.'
-
-		act 'Meet his friends':gt 'love', 'frends'
-
-		exit
-	end
-	
-	
-	!!I WILL START HERE!
-	
-
-	!!0 - none, 1 - cheap, 2 - average, 3 - formal, 4 - fetish.
-	if clotTypePrefTmp = 0:
-		$clotTypePrefTmp = ''
-	elseif clotTypePrefTmp = 1:
-		$clotTypePrefTmp = 'cheap'
-	elseif clotTypePrefTmp = 2:
-		$clotTypePrefTmp = 'average'
-	elseif clotTypePrefTmp = 3:
-		$clotTypePrefTmp = 'formal'
-	elseif clotTypePrefTmp = 4:
-		$clotTypePrefTmp = 'fetish'
-	end
-	
-	!! 0 - no preference, 1 - 1 to 4 units cheap to average (Locked if formal chosen), 2 - 5 to 7 units expensive to ballroom quality (Locked if fetish is chosen)
-	if clotQualPrefTmp = 0:
-		$clotQualPrefTmp = 'any type of'
-	elseif clotQualPrefTmp = 1:
-		$clotQualPrefTmp = 'anything but expensive'
-	elseif clotQualPrefTmp = 2:
-		$clotQualPrefTmp = 'expensive'
-	end
-	
-	!! 0 - no preference, 1 - 1 to 2 or neckline to moderate, 2 - 3 to 4 or heavy to severe, 3 - 5 to 7 or buldging to outpouring 
-	if clotTopPrefTmp = 0:
-		$clotTopPrefTmp = 'any amount of'
-	elseif clotTopPrefTmp = 1:
-		$clotTopPrefTmp = 'a little bit of'
-	elseif clotTopPrefTmp = 2:
-		$clotTopPrefTmp = 'a lot of'
-	elseif clotTopPrefTmp = 3:
-		$clotTopPrefTmp = 'a huge amount of'
-	end
-	
-	!! 0 - no preference, 1 - 1 to 2 units or ankle to calf length, 2 - 3 to 4 units or knee to miniskirt, 3 - 5 units to 6 or slut to hoe.
-	if bottShorPrefTmp = 0:
-		$bottShorPrefTmp= 'any length'
-	elseif bottShorPrefTmp = 1:
-		$bottShorPrefTmp= 'modest length'
-	elseif bottShorPrefTmp = 2:
-		$bottShorPrefTmp= 'slightly short length'
-	elseif bottShorPrefTmp = 3:
-		$bottShorPrefTmp= 'really short length'
-	end
-	
-	!! 0 - no preference, 1 - 0 to 2 (Conservative), 2 - 3 to 4 (Moderate), 3 - 4 to 6 (really thin)
-	if clotThinPrefTmp = 0:
-		$clotThinPrefTmp= ''
-	elseif clotThinPrefTmp = 1:
-		$clotThinPrefTmp= 'thick'
-	elseif clotThinPrefTmp = 2:
-		$clotThinPrefTmp= 'a little thin'
-	elseif clotThinPrefTmp = 3:
-		$clotThinPrefTmp= 'really thin or even see through'
-	end
-	
-	!! 0 - no preference, 1 - Prefers bimbo clothing.
-	if bimbPrefTmp = 0:
-		$bimboPref = ''
-	else
-		$bimboPref = 'a bimbo'
-	end
-	
-	!! 0 - no preference, 1 - 0 to 2 piercings, 2 - 3 to 5 piercings, 3 - 6 or more piercings.	
-	if pierPrefTmp = 0:
-		$pierPrefTmp = 'any amount'
-	elseif pierPrefTmp = 1:
-		$pierPrefTmp = 'a couple'
-	elseif pierPrefTmp = 2:
-		$pierPrefTmp = 'a good amount'
-	elseif pierPrefTmp = 3:
-		$pierPrefTmp = 'a lot'
-	end
-	
-	!! 0 - no preference, 1 - 0 to 2 tattoos, 2 - 3 to 5 tattoos, 3 - 6 or more tattoos.
-	if tattPrefTmp = 0:
-		$tattPrefTmp = 'any amount'
-	elseif tattPrefTmp = 1:
-		$tattPrefTmp = 'a couple'
-	elseif tattPrefTmp = 2:
-		$tattPrefTmp = 'a good amount'
-	elseif tattPrefTmp = 3:
-		$tattPrefTmp = 'a lot'
-	end
-	
-	!! 0 - no preference, 1 - 2 to 3 units (average) , 2 - 4 units (THIC lips)
-	if lipsPrefTmp = 0:
-		$lipsPrefTmp = 'any sized lips'
-	elseif lipsPrefTmp = 1:
-		$lipsPrefTmp = 'average sized lips'
-	elseif lipsPrefTmp = 2:
-		$lipsPrefTmp = 'thick lips'
-	end
-	
-	!!This is the Players lip description, this allows flexibility when writing
-	if pcs_lip = 0:
-		$lipDesc = 'thin'
-	elseif pcs_lip = 1:
-		$lipDesc = 'soft'
-	elseif pcs_lip = 2:
-		$lipDesc = 'plump'
-	elseif pcs_lip = 3:
-		$lipDesc = 'juicy'
-	elseif pcs_lip = 4:
-		$lipDesc = 'thick'
-	end
-	
-	
-	
-	!! 0 - no preference, 1 - 1 to 3 units (Skinny) , 2 - 3 to 6 units (Average), 3 - 6 + units (THIC)
-	if bodyPrefTmp = 0:
-		$bodyPrefTmp = 'any weight'
-	elseif bodyPrefTmp = 1:
-		$bodyPrefTmp = 'should be skinny'
-	elseif bodyPrefTmp = 2:
-		$bodyPrefTmp = ' should be not to skinny or fat'
-	elseif bodyPrefTmp = 3:
-		$bodyPrefTmp = 'should be thick and curvy'
-	end
-	
-	!! 0 - no preference, 1 - 1 (light makeup) , 2 - 2 (moderate makeup), 3 - 3(heavy makeup)
-	if makePrefTmp = 0:
-		$makePrefTmp = 'any amount of makeup'
-	elseif makePrefTmp = 1:
-		$makePrefTmp = 'a sutle amount of makeup'
-	elseif makePrefTmp = 2:
-		$makePrefTmp = 'a good amount of makeup'
-	elseif makePrefTmp = 3:
-		$makePrefTmp = 'a heavy amount of makeup'
-	end
-	
-	!!0 - no preference, 1 - 1 to 30 intelligence, 2 - 30 to 85 intelligence, 3 - 85 + intelligence. 
-	if IQPrefTmp = 0:
-		$IQPrefTmp = 'nice'
-	elseif IQPrefTmp = 1:
-		$IQPrefTmp = 'ditzy'
-	elseif IQPrefTmp = 2:
-		$IQPrefTmp = 'with at least a little brain power'
-	elseif IQPrefTmp = 3:
-		$IQPrefTmp = 'genius'
-	end
-	
-	!! 0 - black, 1 - brown, 2 - redhead, 3 - blonde, 4 - no preference,
-	if hairPref = 0:
-		$hairPref = 'black'
-	elseif hairPref = 1:
-		$hairPref = 'brown'
-	elseif hairPref = 2:
-		$hairPref = 'redhead'
-	elseif hairPref = 3:
-		$hairPref = 'blond'
-	elseif hairPref = 4:
-		$hairPref = 'any color'
-	end
-	
-	
-	!!0 - chest less 3, 1 breast 3-4, 2 breasts bigger 4
-	if titBoy = 0:
-		$titBoy = 'petite breasts'
-	elseif titBoy = 1:
-		$titBoy = 'good sized breasts'
-	elseif titBoy = 2:
-		$titBoy = 'huge breasts'
-	end
-	
-
-	if pcs_hairbsh = 1 and curly > 0:
-		loverrelation[lover_number] += 2 &
-		$meetHair = 'Your hair looks very beautiful.'
-	end
-	if pcs_hairbsh = 1 and curly = 0:
-		loverrelation[lover_number] += 1 
-		$meetHair = 'You have pretty hair today.'
-	end
-	if pcs_hairbsh = 0:
-		loverrelation[lover_number] -= 1 
-		$meetHair = 'You look like you were in a hurry.'
-	end
-	
-	!!This are generic things your boyfriend will call you based on how much he likes you.
-	if loverrelation[lover_number] > 80:
-		randchan = rand(0,2)
-		if randchan = 0 and haraklover[lover_number] ! 0:
-			$giveNick = 'angel'
-		elseif randchan = 1:
-			$giveNick = 'beautiful'
-		elseif randchan = 2:
-			$giveNick = 'love'
-		end
-	elseif loverrelation[lover_number] > 20:
-		randchan = rand(0,1)
-		if randchan = 0:
-			$giveNick = 'babe'
-		elseif randchan = 1:
-			$giveNick = '<<$pcs_nickname>>'
-		end
-	else
-		$giveNick = '<<$pcs_firstname>>'
-	end
-	
-	
+	gs 'lover_love'
+		
 	!! This is the start of the usual talk
 	!!character 0 - soft, 1 -norm 2 - aggressor
 
@@ -660,11 +140,9 @@ if $ARGS[0] = 'start':
 	!!Greeting start
 	
 	'At the entrance <<$meetskin>> stands <<$loverdesc[lover_number]>>. He comes over to you and <<$greet>>'
-	
-	
-	gs 'boy_likes', 'hairPref'
-	gs 'boy_likes', 'makePrefTmp'
-	
+		
+	gs 'lover_likes', 'hairPref'
+	gs 'lover_likes', 'makePrefTmp'
 
 
 	if haraklover[lover_number] = 0:'<<$loverdesc[lover_number]>> looks like a timid and not very confident young man <<$clom>>'
@@ -989,11 +467,11 @@ end
 if $ARGS[0] = 'likes':
 	cla
 	if loverdays[lover_number] >= clotDay:
-		gs 'boy_likes', 'clothesPref'
+		gs 'lover_likes', 'clothesPref'
 		
 	end
 	if loverdays[lover_number] >= bodyDay:
-		gs 'boy_likes', 'bodyPrefTmp'
+		gs 'lover_likes', 'bodyPrefTmp'
 	end
 	
 	xgt 'meet', 'actions'
@@ -1006,7 +484,7 @@ if $ARGS[0] = 'actions':
 
 	act 'Can I ask you how you think I look?':
 		'<<$loverdesc[lover_number]>> says "If you insist" and tells you exactly how he thinks you look based on what he likes:'
-		gs 'boy_likes', 'allPref'
+		gs 'lover_likes', 'allPref'
 		act 'Okay, lets talk about something else':
 			xgt 'meet', 'actions'
 		end
@@ -1089,11 +567,11 @@ if $ARGS[0] = 'actions':
 					'You know you have changed for him before, and you want to avoid to changing into something you are not.'
 				end
 				
-				gs 'boy_likes', 'compliance'
+				gs 'lover_likes', 'compliance'
 				
 				'"And what did you want to change about me?"'
 				!!This is to make a last check on how many piercings they are WEARING
-				gs 'boy_likes', 'checkPier'
+				gs 'lover_likes', 'checkPier'
 
 				if pcs_haircol ! hairPref:
 					'<<$loverdesc[lover_number]>> looks at your hair and says, "can we get your hair dyed?"'
@@ -1107,7 +585,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeHair'
+							gt 'lover_change', 'Hair'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1146,7 +624,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Go to Salon':		
-									gt 'boy_likes', 'changeHair'
+									gt 'lover_change', 'Hair'
 								end
 								exit
 							end
@@ -1165,7 +643,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the makeup you usually wear':
-							gt 'boy_likes', 'changeMake'
+							gt 'lover_change', 'Make'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1204,7 +682,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Continue':		
-									gt 'boy_likes', 'changeMake'
+									gt 'lover_change', 'Make'
 								end
 								exit
 							end
@@ -1227,7 +705,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the amount of piercings you have':
-							gt 'boy_likes', 'changePier'
+							gt 'lover_change', 'Pier'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1266,7 +744,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Continue':		
-									gt 'boy_likes', 'changePier'
+									gt 'lover_change', 'Pier'
 								end
 								exit
 							end
@@ -1289,7 +767,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the amount of tattoos you have':
-							gt 'boy_likes', 'changeTatt'
+							gt 'lover_change', 'Tatt'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1328,7 +806,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Go to tattoo parlor':		
-									gt 'boy_likes', 'changeTatt'
+									gt 'lover_change', 'Tatt'
 								end
 								exit
 							end
@@ -1431,11 +909,11 @@ if $ARGS[0] = 'actions':
 					'You know you have changed for him before, and you want to avoid to changing into something you are not.'
 				end
 				
-				gs 'boy_likes', 'compliance'
+				gs 'lover_likes', 'compliance'
 				
 				'"And what did you want to change about me?"'
 				!!This is to make a last check on how many piercings they are WEARING
-				gs 'boy_likes', 'checkPier'
+				gs 'lover_likes', 'checkPier'
 				
 				
 				
@@ -1452,7 +930,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeHair'
+							gt 'lover_change', 'Hair'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1491,7 +969,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Go to Salon':		
-									gt 'boy_likes', 'changeHair'
+									gt 'lover_change', 'Hair'
 								end
 								exit
 							end
@@ -1510,7 +988,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the makeup you usually wear':
-							gt 'boy_likes', 'changeMake'
+							gt 'lover_change', 'Make'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1549,7 +1027,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Continue':		
-									gt 'boy_likes', 'changeMake'
+									gt 'lover_change', 'Make'
 								end
 								exit
 							end
@@ -1571,7 +1049,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the amount of piercings you have':
-							gt 'boy_likes', 'changePier'
+							gt 'lover_change', 'Pier'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1610,7 +1088,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Continue':		
-									gt 'boy_likes', 'changePier'
+									gt 'lover_change', 'Pier'
 								end
 								exit
 							end
@@ -1632,7 +1110,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the amount of tattoos you have':
-							gt 'boy_likes', 'changeTatt'
+							gt 'lover_change', 'Tatt'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1671,7 +1149,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Go to tattoo parlor':		
-									gt 'boy_likes', 'changeTatt'
+									gt 'lover_change', 'Tatt'
 								end
 								exit
 							end
@@ -1695,7 +1173,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeLips'
+							gt 'lover_change', 'Lips'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1734,7 +1212,7 @@ if $ARGS[0] = 'actions':
 								sub += 4
 								loverrelation[lover_number] += 5
 								act 'Go to the clinic':		
-									gt 'boy_likes', 'changeLips'
+									gt 'lover_change', 'Lips'
 								end
 								exit
 							end
@@ -1758,7 +1236,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeTits'
+							gt 'lover_change', 'Tits'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1797,7 +1275,7 @@ if $ARGS[0] = 'actions':
 								sub += 4
 								loverrelation[lover_number] += 5
 								act 'Go to the clinic':		
-									gt 'boy_likes', 'changeTits'
+									gt 'lover_change', 'Tits'
 								end
 								exit
 							end
@@ -1922,11 +1400,11 @@ if $ARGS[0] = 'actions':
 					'You know you have changed for him before, and you want to avoid to changing into something you are not.'
 				end
 				
-				gs 'boy_likes', 'compliance'
+				gs 'lover_likes', 'compliance'
 				
 				'"And what did you want to change about me?"'
 				!!This is to make a last check on how many piercings they are WEARING
-				gs 'boy_likes', 'checkPier'
+				gs 'lover_likes', 'checkPier'
 				
 				
 				
@@ -1942,7 +1420,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeHair'
+							gt 'lover_change', 'Hair'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -1981,7 +1459,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Go to Salon':		
-									gt 'boy_likes', 'changeHair'
+									gt 'lover_change', 'Hair'
 								end
 								exit
 							end
@@ -1999,7 +1477,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the makeup you usually wear':
-							gt 'boy_likes', 'changeMake'
+							gt 'lover_change', 'Make'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -2038,7 +1516,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Continue':		
-									gt 'boy_likes', 'changeMake'
+									gt 'lover_change', 'Make'
 								end
 								exit
 							end
@@ -2060,7 +1538,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the amount of piercings you have':
-							gt 'boy_likes', 'changePier'
+							gt 'lover_change', 'Pier'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -2099,7 +1577,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Continue':		
-									gt 'boy_likes', 'changePier'
+									gt 'lover_change', 'Pier'
 								end
 								exit
 							end
@@ -2121,7 +1599,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Agree to change the amount of tattoos you have':
-							gt 'boy_likes', 'changeTatt'
+							gt 'lover_change', 'Tatt'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -2160,7 +1638,7 @@ if $ARGS[0] = 'actions':
 								sub += 2
 								loverrelation[lover_number] += 5
 								act 'Go to tattoo parlor':		
-									gt 'boy_likes', 'changeTatt'
+									gt 'lover_change', 'Tatt'
 								end
 								exit
 							end
@@ -2184,7 +1662,7 @@ if $ARGS[0] = 'actions':
 								
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeLips'
+							gt 'lover_change', 'Lips'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -2226,7 +1704,7 @@ if $ARGS[0] = 'actions':
 								sub += 4
 								loverrelation[lover_number] += 5
 								act 'Go to the clinic':		
-									gt 'boy_likes', 'changeLips'
+									gt 'lover_change', 'Lips'
 								end
 								exit
 							end
@@ -2250,7 +1728,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeTits'
+							gt 'lover_change', 'Tits'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -2289,7 +1767,7 @@ if $ARGS[0] = 'actions':
 								sub += 4
 								loverrelation[lover_number] += 5
 								act 'Go to the clinic':		
-									gt 'boy_likes', 'changeTits'
+									gt 'lover_change', 'Tits'
 								end
 								exit
 							end
@@ -2308,7 +1786,7 @@ if $ARGS[0] = 'actions':
 							dynamic $go_home
 						end
 						act 'Go with him':
-							gt 'boy_likes', 'changeFigure'
+							gt 'lover_change', 'Figure'
 						end
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -2347,7 +1825,7 @@ if $ARGS[0] = 'actions':
 								sub += 4
 								loverrelation[lover_number] += 5
 								act 'Go to the clinic':		
-									gt 'boy_likes', 'changeFigure'
+									gt 'lover_change', 'Figure'
 								end
 								exit
 							end

locations/pronouns

@@ -0,0 +1,101 @@
+# pronouns
+
+if ARGS[0] = 0 or ARGS[0] = 3:
+	$pronounTmp[0] = 'he'
+	$pronounTmp[1] = 'He'
+	$pronounTmp[2] = 'him'
+	$pronounTmp[3] = 'Him'
+	$pronounTmp[4] = 'his'
+	$pronounTmp[5] = 'His'
+	$pronounTmp[6] = 'his'
+	$pronounTmp[7] = 'His'
+	$pronounTmp[8] = 'himself'
+	$pronounTmp[9] = 'Himself'
+elseif ARGS[0] = 1 or ARGS[0] = 2:
+	$pronounTmp[0] = 'she'
+	$pronounTmp[1] = 'She'
+	$pronounTmp[2] = 'her'
+	$pronounTmp[3] = 'Her'
+	$pronounTmp[4] = 'her'
+	$pronounTmp[5] = 'Her'
+	$pronounTmp[6] = 'hers'
+	$pronounTmp[7] = 'Hers'
+	$pronounTmp[8] = 'herself'
+	$pronounTmp[9] = 'Herself'
+else
+	$pronounTmp[0] = 'xe'
+	$pronounTmp[1] = 'Xe'
+	$pronounTmp[2] = 'xem'
+	$pronounTmp[3] = 'Xem'
+	$pronounTmp[4] = 'xyr'
+	$pronounTmp[5] = 'Xyr'
+	$pronounTmp[6] = 'xyrs'
+	$pronounTmp[7] = 'Xyrs'
+	$pronounTmp[8] = 'xemself'
+	$pronounTmp[9] = 'Xemself'
+end
+
+if $ARGS[1] = 'a':
+	$xe1 = $pronounTmp[0]
+	$xec1 = $pronounTmp[1]
+	$xem1 = $pronounTmp[2]
+	$xemc1 = $pronounTmp[3]
+	$xyr1 = $pronounTmp[4]
+	$xyrc1 = $pronounTmp[5]
+	$xyrs1 = $pronounTmp[6]
+	$xyrsc1 = $pronounTmp[7]
+	$xemself1 = $pronounTmp[8]
+	$xemselfc1 = $pronounTmp[9]
+elseif $ARGS[1] = 'b':
+	$xe2 = $pronounTmp[0]
+	$xec2 = $pronounTmp[1]
+	$xem2 = $pronounTmp[2]
+	$xemc2 = $pronounTmp[3]
+	$xyr2 = $pronounTmp[4]
+	$xyrc2 = $pronounTmp[5]
+	$xyrs2 = $pronounTmp[6]
+	$xyrsc2 = $pronounTmp[7]
+	$xemself2 = $pronounTmp[8]
+	$xemselfc2 = $pronounTmp[9]
+elseif $ARGS[1] = 'c':
+	$xe3 = $pronounTmp[0]
+	$xec3 = $pronounTmp[1]
+	$xem3 = $pronounTmp[2]
+	$xemc3 = $pronounTmp[3]
+	$xyr3 = $pronounTmp[4]
+	$xyrc3 = $pronounTmp[5]
+	$xyrs3 = $pronounTmp[6]
+	$xyrsc3 = $pronounTmp[7]
+	$xemself3 = $pronounTmp[8]
+	$xemselfc3 = $pronounTmp[9]
+elseif $ARGS[1] = 'd':
+	$xe4 = $pronounTmp[0]
+	$xec4 = $pronounTmp[1]
+	$xem4 = $pronounTmp[2]
+	$xemc4 = $pronounTmp[3]
+	$xyr4 = $pronounTmp[4]
+	$xyrc4 = $pronounTmp[5]
+	$xyrs4 = $pronounTmp[6]
+	$xyrsc4 = $pronounTmp[7]
+	$xemself4 = $pronounTmp[8]
+	$xemselfc4 = $pronounTmp[9]
+else
+	iterat = ARGS[1]
+	$xe[iterat] = $pronounTmp[0]
+	$xec[iterat] = $pronounTmp[1]
+	$xem[iterat] = $pronounTmp[2]
+	$xemc[iterat] = $pronounTmp[3]
+	$xyr[iterat] = $pronounTmp[4]
+	$xyrc[iterat] = $pronounTmp[5]
+	$xyrs[iterat] = $pronounTmp[6]
+	$xyrsc[iterat] = $pronounTmp[7]
+	$xemself[iterat] = $pronounTmp[8]
+	$xemselfc[iterat] = $pronounTmp[9]
+end
+
+killvar 'bstemp'
+killvar '$pronounTmp'
+killvar 'iterat'
+
+
+--- pronouns ---------------------------------

locations/telefon

@@ -39,7 +39,7 @@ if $ARGS[0] = 'mobilaraz':
 				'<<$telsob>>, "See you in the park in an hour."'
 
 				act 'Go':gt 'parksvid'
-			else:
+			else
 				gs 'telefon','telotkaz',$telsob
 			end
 		end
@@ -52,7 +52,7 @@ if $ARGS[0] = 'mobilaraz':
 		if willAgree:
 			'<<$telsob>>, "See you at the movie theater in an hour."'
 			act 'Go':gt 'kinosvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$telsob
 		end
 	end
@@ -65,7 +65,7 @@ if $ARGS[0] = 'mobilaraz':
 			'<<$telsob>>, "See you at the pool hall in an hour."'
 
 			act 'Go':gt 'billsvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$telsob
 		end
 	end
@@ -78,7 +78,7 @@ if $ARGS[0] = 'mobilaraz':
 			'<<$telsob>>, "See you at the cafe in an hour."'
 
 			act 'Go':gt 'kafesvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$telsob
 		end
 	end
@@ -91,7 +91,7 @@ if $ARGS[0] = 'mobilaraz':
 			'<<$telsob>>, "See you in the casino in an hour."'
 
 			act 'Go':gt 'kazinosvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$telsob
 		end
 	end
@@ -120,7 +120,7 @@ if $ARGS[0] = 'callingTheLover':
 				'<<$loverdesc[lover_number]>>, "See you in the park in an hour."'
 
 				act 'Go':gt 'svidboy', 'parksvid'
-			else:
+			else
 				gs 'telefon','telotkaz',$loverdesc[lover_number]
 			end
 		end
@@ -134,7 +134,7 @@ if $ARGS[0] = 'callingTheLover':
 			'<<$loverdesc[lover_number]>>, "See you at the movie theater in an hour."'
 
 			act 'Go':gt 'svidboy', 'kinosvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$loverdesc[lover_number]
 		end
 	end
@@ -147,7 +147,7 @@ if $ARGS[0] = 'callingTheLover':
 			'<<$loverdesc[lover_number]>>, "See you at the pool hall in an hour."'
 
 			act 'Go':gt 'svidboy', 'billsvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$loverdesc[lover_number]
 		end
 	end
@@ -160,7 +160,7 @@ if $ARGS[0] = 'callingTheLover':
 			'<<$loverdesc[lover_number]>>, "See you at the cafe in an hour."'
 
 			act 'Go':gt 'svidboy', 'kafesvid'
-		else:
+		else
 			gs 'telefon','telotkaz',$loverdesc[lover_number]
 		end
 	end