- fixes and small improvements

- you couldn't choose to get piercings, tattoos etc. paid by your boyfriend if you knew him BETTER

locations/arturdin.qsrc

@@ -24,12 +24,12 @@ if $ARGS[0] = 'facefuck':
 		gs 'stat'
 	end
 
-	if artfacefucktimes < 4:
+	if artfacefucktimes < 2:
 		tipsexart = rand(0, 1)
 
 		if tipsexart = 0:act 'Continue': gt 'arturdin', 'artlick'
 		if tipsexart = 1:act 'Continue': gt 'arturdin', 'artchik'
-	elseif artfacefucktimes >= 4:
+	elseif artfacefucktimes >= 2:
 		tipsexart = rand(0, 1)
 
 		if tipsexart = 0:act 'Continue': gt 'arturdin', 'bed'
@@ -74,13 +74,13 @@ if $ARGS[0] = 'bed':
 	gs 'arousal', 5, 'foreplay'
 	gs 'stat'
 	
-	if artfucktimes < 4:
+	if artfucktimes < 2:
 		artrand = rand(0, 2)
 
 		if artrand = 0:act 'Continue': gt 'arturdin', 'sexdog'
 		if artrand = 1:act 'Continue': gt 'arturdin', 'anal'
 		if artrand = 2:act 'Continue': gt 'arturdin', 'fist'
-	elseif artfucktimes >= 4:
+	elseif artfucktimes >= 2:
 		artrand = rand(0, 2)
 
 		if artrand = 0:act 'Continue': gt 'arturdin', 'sexdog_cum'
@@ -96,9 +96,9 @@ if $ARGS[0] = 'bedmiss':
 	gs 'arousal', 5, 'foreplay'
 	gs 'stat'
 
-	if artfucktimes < 4:
+	if artfucktimes < 2:
 		act 'Continue': gt 'arturdin', 'sexmiss'
-	elseif artfucktimes >= 4:
+	elseif artfucktimes >= 2:
 		artrand = rand(0, 1)
 
 		if artrand = 0:act 'Continue': gt 'arturdin', 'sexmiss_cum'

locations/clothing.qsrc

@@ -150,6 +150,8 @@ if $ARGS[0] = 'view_clothing_list':
 			act 'Return': killvar '$ward_list_store' & gt 'wardrobe', 'start'
 		elseif $ARGS[1] = 'sell' or $ARGS[1] = 'resize':
 			act 'Leave': killvar '$ward_list_store' & gt $loc, $metka
+		else
+			act 'Leave': killvar '$ward_list_store' & gt $loc, $metka			
 		end
 	end
 	*nl

locations/lover_meet.qsrc

@@ -9,29 +9,29 @@ if $ARGS[0] = 'start':
 	svidanie[lover_number] = 0
 	giftNum = giftNum[lover_number]
 	gs 'themes', 'indoors'
-	
+
 	gs 'lover_pronouns'
 	gs 'lover_pref'
-	
+
 	gs 'stat'
 
 	!!This keeps track in the change action what it plans to change
 	$changeFind = ''
-	
+
 	!!How many days until the lover starts to comment.
 	clotDay = 3
 	bodyDay = 7
-	
+
 	!!How many days until they want you to change.
 	pierDay = 7
 	tattDay = 7
 	lipsDay = 9
 	titsDay = 12
 	figureDay = 15
-		
+
 	!! This is the start of the usual talk
 	!!character 0 - soft, 1 -norm 2 - aggressor
-	
+
 	'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 
 	if haraklover[lover_number] = 0:
@@ -99,12 +99,12 @@ if $ARGS[0] = 'start':
 			$greet = 'says, "Hey <<$pcs_nickname>>."'
 		end
 	end
-	
+
 	gs 'lover_love'
-	
+
 	!! QUEST VARIABLES!!! WOOOT ALMOST TIME!
 	didPushAway = 0
-		
+
 	!!How beautiful you are
 	if pcs_skin < 20:
 		loverrelation[lover_number] -= 2 & $meetskin = 'looking at <<$tXyr>> feet'
@@ -117,37 +117,37 @@ if $ARGS[0] = 'start':
 	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 an 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 part
 
 	if haraklover[lover_number] >= 0:
@@ -155,7 +155,7 @@ if $ARGS[0] = 'start':
 			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 & cla 
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 				'You take the initiative and when <<$tXe>> opens <<$tXyr>> mouth you thrust your tongue into <<$tXyr>> mouth.'
 				gs 'arousal', 'kiss', 5
@@ -224,10 +224,10 @@ if $ARGS[0] = 'start':
 						exit
 					end
 				end
-				
+
 				act 'Continue':	xgt 'lover_meet', 'likes'
 			end
-			
+
 			act 'Kiss with lips':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -295,7 +295,7 @@ if $ARGS[0] = 'start':
 							'<<$tXec>> can smell the scent of sperm on you, but you know by the bulge in <<$tXyr>> pants it only turns <<$tXem>> on more.'
 						end
 					end
-				else 
+				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
@@ -312,13 +312,13 @@ if $ARGS[0] = 'start':
 						end
 					end
 				end
-				
+
 				act 'Continue': xgt 'lover_meet', 'likes'
 			end
 
 			act 'Hint for a kiss on the cheek':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'				
+				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 				'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):
@@ -388,12 +388,12 @@ if $ARGS[0] = 'start':
 						dynamic $go_home
 						exit
 					end
-				end	
-				
+				end
+
 				act 'Continue': xgt 'lover_meet', 'likes'
 			end
-			
-			act 'Push <<$tXyr>> face away': 
+
+			act 'Push <<$tXyr>> face away':
 				*clr & cla
 				didPushAway = 1
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -408,25 +408,25 @@ if $ARGS[0] = 'start':
 					loverrelation[lover_number] -= 10
 					'<<$tXec>> begins to get angry, <<$tXe>> takes a deep breath and gives you space.'
 				end
-				 
+
 				act 'Continue': xgt 'lover_meet', 'likes'
 			end
 		end
 	end
-end	
-	
+end
+
 if $ARGS[0] = 'likes':
 	cla
 	if loverdays[lover_number] >= clotDay:
-		gs 'lover_likes', 'clothesPref'	
+		gs 'lover_likes', 'clothesPref'
 	end
 	if loverdays[lover_number] >= bodyDay:
 		gs 'lover_likes', 'bodyPrefTmp'
 	end
-	
-	xgt 'lover_meet', 'actions'	
+
+	xgt 'lover_meet', 'actions'
 end
-	
+
 if $ARGS[0] = 'actions':
 	act 'Can I ask you how you think I look?':
 		*clr & cla
@@ -435,9 +435,9 @@ if $ARGS[0] = 'actions':
 		gs 'lover_likes', 'allPref'
 		act 'Okay, lets talk about something else':	xgt 'lover_meet', 'actions'
 	end
-	
+
 	act 'What do you want to do today?':
-		*clr & cla 
+		*clr & cla
 		if rand(0,1) = 0: sub += 1
 		'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 		'You tell <<$tXem>> you would rather <<$tXem>> decide what we do today.'
@@ -455,7 +455,7 @@ if $ARGS[0] = 'actions':
 		!!This is the choice maker!
 
 		if loverfinance[lover_number] = 0:
-			!! 0 - change player, 1 - beer in stairwell, 2 - walk in park, 
+			!! 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:
@@ -463,41 +463,41 @@ if $ARGS[0] = 'actions':
 			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)
-			
+
  			if randchan = 0:
-				*clr & cla 
+				*clr & cla
 				!!Some things you can change.
 				!!loverfinance[lover_number] = 0 - hair, makeup, tattoo, piercings.
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -508,13 +508,13 @@ if $ARGS[0] = 'actions':
 				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.'
-				
+
 				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'
@@ -532,7 +532,6 @@ if $ARGS[0] = 'actions':
 							'<<$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_change', 'Hair'
 						exit
 					elseif loverrelation[lover_number] <= 60 and loverscompliance[lover_number] < 6:
@@ -554,6 +553,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Hair'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -565,7 +565,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> smiles happily and takes you to the salon.'
 								sub += 2
@@ -573,6 +573,7 @@ if $ARGS[0] = 'actions':
 								act 'Go to Salon': gt 'lover_change', 'Hair'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Hair'
 					end
 				elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -606,6 +607,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the makeup you usually wear': gt 'lover_change', 'Make'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "What''s wrong with my makeup...?"':
@@ -625,6 +627,7 @@ if $ARGS[0] = 'actions':
 								act 'Continue': gt 'lover_change', 'Make'
 							end
 						end
+						act 'Agree to change the makeup you usually wear': gt 'lover_change', 'Make'
 					end
 				elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -663,6 +666,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the amount of piercings you have':	gt 'lover_change', 'Pier'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -674,7 +678,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> smiles happily and then gets down to how to get the right amount of piercings.'
 								sub += 2
@@ -682,6 +686,7 @@ if $ARGS[0] = 'actions':
 								act 'Continue':	gt 'lover_change', 'Pier'
 							end
 						end
+						act 'Agree to change the amount of piercings you have':	gt 'lover_change', 'Pier'
 					end
 				elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -720,6 +725,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the amount of tattoos you have': gt 'lover_change', 'Tatt'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -731,7 +737,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, 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
@@ -739,7 +745,8 @@ if $ARGS[0] = 'actions':
 								act 'Go to tattoo parlor': gt 'lover_change', 'Tatt'
 							end
 						end
-					end				
+						act 'Agree to change the amount of tattoos you have': gt 'lover_change', 'Tatt'
+					end
 				else
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -753,7 +760,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home			
+					dynamic $go_home
 				end
 				act 'Go with <<$tXem>>':gt 'podezdM', 'start'
 			elseif randchan = 2 or loverGender[lover_number] = 1:
@@ -782,42 +789,42 @@ if $ARGS[0] = 'actions':
 			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:
 				*clr & cla
 				!!Some things you can change.
@@ -830,18 +837,18 @@ if $ARGS[0] = 'actions':
 				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.'
-				
+
 				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...':
@@ -874,6 +881,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Hair'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -885,7 +893,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> smiles happily and takes you to the salon.'
 								sub += 2
@@ -893,6 +901,7 @@ if $ARGS[0] = 'actions':
 								act 'Go to Salon':	gt 'lover_change', 'Hair'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Hair'
 					end
 				elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
 					*clr & cla
@@ -928,6 +937,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the makeup you usually wear': gt 'lover_change', 'Make'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "What''s wrong with my makeup...?"':
@@ -939,7 +949,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. You tell <<$tXem>> from now on you will wear <<$makePrefTmp>>.'
 								sub += 2
@@ -947,6 +957,7 @@ if $ARGS[0] = 'actions':
 								act 'Continue': gt 'lover_change', 'Make'
 							end
 						end
+						act 'Agree to change the makeup you usually wear': gt 'lover_change', 'Make'
 					end
 				elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
 					*clr & cla
@@ -986,6 +997,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the amount of piercings you have': gt 'lover_change', 'Pier'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -997,7 +1009,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> smiles happily and then gets down to how to get the right amount of piercings.'
 								sub += 2
@@ -1005,6 +1017,7 @@ if $ARGS[0] = 'actions':
 								act 'Continue':	gt 'lover_change', 'Pier'
 							end
 						end
+						act 'Agree to change the amount of piercings you have': gt 'lover_change', 'Pier'
 					end
 				elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
 					*clr & cla
@@ -1044,6 +1057,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the amount of tattoos you have': gt 'lover_change', 'Tatt'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -1055,7 +1069,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, 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
@@ -1063,8 +1077,9 @@ if $ARGS[0] = 'actions':
 								act 'Go to tattoo parlor': gt 'lover_change', 'Tatt'
 							end
 						end
-					end	
-				elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]: 
+						act 'Agree to change the amount of tattoos you have': gt 'lover_change', 'Tatt'
+					end
+				elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]:
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 					'<<$loverdesc[lover_number]>> tells you your lips are just not the right size.'
@@ -1102,6 +1117,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Lips'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You squeek, "But I like the size of my lips..."':
@@ -1113,7 +1129,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
 								sub += 4
@@ -1121,6 +1137,7 @@ if $ARGS[0] = 'actions':
 								act 'Go to the clinic':	gt 'lover_change', 'Lips'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Lips'
 					end
 				elseif tits < titMin or tits > titMax and titsDay <= loverdays[lover_number]:
 					*clr & cla
@@ -1160,6 +1177,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Tits'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You squeek, "But I like the size of my breasts..."':
@@ -1171,7 +1189,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
 								sub += 4
@@ -1179,10 +1197,11 @@ if $ARGS[0] = 'actions':
 								act 'Go to the clinic':	gt 'lover_change', 'Tits'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Tits'
 					end
 				else
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'	
+					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 					'"Erm... Nothing..."'
 					act '"Well then..."': xgt 'lover_meet', 'actions'
 				end
@@ -1209,7 +1228,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home	
+					dynamic $go_home
 				end
 
 				act 'Go with <<$tXem>>':
@@ -1224,7 +1243,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to go':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home	
+					dynamic $go_home
 				end
 
 				act 'Go with <<$tXem>>':
@@ -1237,7 +1256,7 @@ if $ARGS[0] = 'actions':
 			'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 			!!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. 
+			!! 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:
@@ -1245,37 +1264,37 @@ if $ARGS[0] = 'actions':
 			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
@@ -1286,9 +1305,9 @@ if $ARGS[0] = 'actions':
 				'Takes one look at your body and loves every part of it.'
 				randchan = rand(1, 3)
 			end
-			
+
 			if randchan = 0:
-				*clr & cla 
+				*clr & cla
 				!!Some things you can change.
 				!!loverfinance[lover_number] = 2 - hair, makeup, tattoo, piercings, lips, tits, figure.
 				'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
@@ -1299,18 +1318,18 @@ if $ARGS[0] = 'actions':
 				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.'
-				
+
 				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...':
@@ -1343,6 +1362,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Hair'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -1354,7 +1374,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> smiles happily and takes you to the salon.'
 								sub += 2
@@ -1362,6 +1382,7 @@ if $ARGS[0] = 'actions':
 								act 'Go to Salon': gt 'lover_change', 'Hair'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Hair'
 					end
 				elseif makeupSetting ! makePrefTmp and makePrefTmp ! 0:
 					'<<$loverdesc[lover_number]>> thinks about it and says "Can you wear <<$makePrefTmp>> from now on?"'
@@ -1395,6 +1416,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the makeup you usually wear': gt 'lover_change', 'Make'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "What''s wrong with my makeup...?"':
@@ -1406,7 +1428,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. You tell <<$tXem>> from now on you will wear <<$makePrefTmp>>.'
 								sub += 2
@@ -1414,18 +1436,19 @@ if $ARGS[0] = 'actions':
 								act 'Continue':	gt 'lover_change', 'Make'
 							end
 						end
+						act 'Agree to change the makeup you usually wear': gt 'lover_change', 'Make'
 					end
 				elseif pierWearCount < pierPrefTmpMin or pierWearCount > pierPrefTmpMax and pierPrefTmp ! 0 and pierDay <= loverdays[lover_number]:
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 					'<<$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!':
 							*clr & cla
@@ -1455,6 +1478,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the amount of piercings you have': gt 'lover_change', 'Pier'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -1474,6 +1498,7 @@ if $ARGS[0] = 'actions':
 								act 'Continue': gt 'lover_change', 'Pier'
 							end
 						end
+						act 'Agree to change the amount of piercings you have': gt 'lover_change', 'Pier'
 					end
 				elseif tattCount < tattPrefTmpMin or tattCount > tattPrefTmpMax and tattPrefTmp ! 0 and tattDay <= loverdays[lover_number]:
 					*clr & cla
@@ -1513,6 +1538,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Agree to change the amount of tattoos you have': gt 'lover_change', 'Tatt'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You mumble "I would rather not..."':
@@ -1524,7 +1550,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, 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
@@ -1532,25 +1558,26 @@ if $ARGS[0] = 'actions':
 								act 'Go to tattoo parlor': gt 'lover_change', 'Tatt'
 							end
 						end
-					end	
-				elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]: 
+						act 'Agree to change the amount of tattoos you have': gt 'lover_change', 'Tatt'
+					end
+				elseif pcs_lip < lipsPrefTmpMin or pcs_lip > lipsPrefTmpMax and lipsDay <= loverdays[lover_number]:
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 					'<<$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':
 							*clr & cla
 							loverrelation[lover_number] -= 3
 							'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 							'<<$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		
+							dynamic $go_home
 						end
 						act 'Go with <<$tXem>>': gt 'lover_change', 'Lips'
 						exit
@@ -1561,7 +1588,7 @@ if $ARGS[0] = 'actions':
 							loverrelation[lover_number] -= 3
 							'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 							'<<$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	
+							dynamic $go_home
 						end
 						exit
 					elseif sub <= 20 and loverscompliance[lover_number] < 6:
@@ -1573,6 +1600,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Lips'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You squeek, "But I like the size of my lips..."':
@@ -1584,7 +1612,7 @@ if $ARGS[0] = 'actions':
 							if wantRand > sub:
 								'<<$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.'
 								*nl
-								dynamic $go_home		
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
 								sub += 4
@@ -1592,18 +1620,19 @@ if $ARGS[0] = 'actions':
 								act 'Go to the clinic':	gt 'lover_change', 'Lips'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Lips'
 					end
 				elseif tits < titMin or tits > titMax and titsDay <= loverdays[lover_number]:
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 					'<<$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':
 							*clr & cla
@@ -1633,6 +1662,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Tits'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You squeek, "But I like the size of my breasts..."':
@@ -1652,6 +1682,7 @@ if $ARGS[0] = 'actions':
 								act 'Go to the clinic':	gt 'lover_change', 'Tits'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Tits'
 					end
 				elseif salocatnow > figurePrefMax and figureDay <= loverdays[lover_number]:
 					*clr & cla
@@ -1687,6 +1718,7 @@ if $ARGS[0] = 'actions':
 							'<<$loverdesc[lover_number]>> realizes you will not give in this situation, and walks away mumbling to <<$tXemself>>.'
 							dynamic $go_home
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Figure'
 						exit
 					elseif sub > 20 or loverscompliance[lover_number] >= 6:
 						act 'You squeek, "But I like being this weight..."':
@@ -1697,8 +1729,8 @@ if $ARGS[0] = 'actions':
 							'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 							if wantRand > sub:
 								'<<$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.'
-								*nl	
-								dynamic $go_home		
+								*nl
+								dynamic $go_home
 							elseif wantRand <= sub:
 								'<<$loverdesc[lover_number]>> keeps up the pressure, and because of your demeanor, and you give in. <<$tXec>> grins widely and takes you to the clinic.'
 								sub += 4
@@ -1706,6 +1738,7 @@ if $ARGS[0] = 'actions':
 								act 'Go to the clinic':	gt 'lover_change', 'Figure'
 							end
 						end
+						act 'Go with <<$tXem>>': gt 'lover_change', 'Figure'
 					end
 				else
 					*clr & cla
@@ -1721,7 +1754,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to leave':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home	
+					dynamic $go_home
 				end
 
 				act 'Go with <<$tXem>>':
@@ -1737,7 +1770,7 @@ if $ARGS[0] = 'actions':
 				act 'Sorry, but I need to leave':
 					cla
 					loverrelation[lover_number] -= (haraklover[lover_number] + 1)
-					dynamic $go_home	
+					dynamic $go_home
 				end
 
 				act 'Go with <<$tXem>>':
@@ -1777,7 +1810,7 @@ if $ARGS[0] = 'actions':
 			act '"Let''s go to the cafe."': gt 'kafeM', 'start'
 		elseif loverGender[lover_number] = 1:
 			$telsob = '<<$loverdesc[lover_number]>>'
-			
+
 			if month > 5 and temper > 20 and sunWeather = 1:
 				act 'Invite to the park': gt 'parksvid'
 			end
@@ -1793,14 +1826,14 @@ if $ARGS[0] = 'actions':
 		end
 	end
 	act 'I think we should break up...':
-		*clr & cla 
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/shared/'+lover_picture[lover_number]+'.jpg"></center>'
 		'<<$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
 end
 

locations/obj_din.qsrc

@@ -2297,7 +2297,7 @@ if $ARGS[0] = 'piercing':
 		*p 'Tongue | '
 		end
 		if pirsB > 0 and pirsB < 10000:
-			*p '<a href="exec:gs ''obj_din'', ''pirsB''">lips</a> | '
+			*p '<a href="exec:gs ''obj_din'', ''pirsB''">Lips</a> | '
 		else
 		*p 'lips | '
 		end
@@ -2483,7 +2483,7 @@ if $ARGS[0] = 'records':
 		$obj_loverintro = 'Your girlfriend'
 		$obj_loverpron = 'She'
 	end		
-	if pcs_lovers[1] = 1:'<<$obj_loverintro>> <<$loverdesc[0]>> is <<$loverbody[0]>> height and <<$loverbod[0]>> build with <<$loverface[0]>> hair. <<$loverdesc[0]>> is <<$loverClo[0]>>. Your relationship is <<loverrelation[0]>> after <<loverdays[0]>> days dating.'
+	if pcs_lovers[1] = 1:'<<$obj_loverintro>> <<$loverdesc[1]>> is <<$loverbody[1]>> height and <<$loverbod[1]>> build with <<$loverface[1]>> hair. <<$loverdesc[1]>> is <<$loverClo[1]>>. Your relationship is <<loverrelation[1]>> after <<loverdays[1]>> days dating.'
 	if haraklover[1] = 0 and loverrelation[1] > 1:'<<$obj_loverpron>>''s timid and lacks confidence.'
 	if haraklover[1] = 1 and loverrelation[1] > 1:'<<$obj_loverpron>> has a cheerful and sociable personality.'
 	if haraklover[1] = 2 and loverrelation[1] > 1:'<<$obj_loverpron>>''s short-tempered and strict.'
@@ -2495,7 +2495,7 @@ if $ARGS[0] = 'records':
 		$obj_loverintro = 'Your girlfriend'
 		$obj_loverpron = 'She'
 	end		
-	if pcs_lovers[2] = 1:'<<$obj_loverintro>> <<$loverdesc[0]>> is <<$loverbody[0]>> height and <<$loverbod[0]>> build with <<$loverface[0]>> hair. <<$loverdesc[0]>> is <<$loverClo[0]>>. Your relationship is <<loverrelation[0]>> after <<loverdays[0]>> days dating.'
+	if pcs_lovers[2] = 1:'<<$obj_loverintro>> <<$loverdesc[2]>> is <<$loverbody[2]>> height and <<$loverbod[2]>> build with <<$loverface[2]>> hair. <<$loverdesc[2]>> is <<$loverClo[2]>>. Your relationship is <<loverrelation[2]>> after <<loverdays[2]>> days dating.'
 	if haraklover[2] = 0 and loverrelation[2] > 1:'<<$obj_loverpron>>''s timid and lacks confidence.'
 	if haraklover[2] = 1 and loverrelation[2] > 1:'<<$obj_loverpron>> has a cheerful and sociable personality.'
 	if haraklover[2] = 2 and loverrelation[2] > 1:'<<$obj_loverpron>>''s short-tempered and strict.'

locations/pavSharedApt.qsrc

@@ -700,7 +700,7 @@ if $ARGS[0] = 'pcsRoom':
 	if TV = 1:$TV = 'an old CRT <a href="exec:gt ''TV'', ''start''">TV</a> sits on the shelf'
 	'There is an wall unit at the other side of the room, <<$TV>>. Everyone in the household spends their time in their own rooms, so there was never a reason to use the living room for its intended purpose.'
 	*nl
-	'On the other side of the sofa bed are your old <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">suitcases</a>, which you could use to store the clothes you don''t often wear.'
+	'On the other side of the sofa bed are your old <a href="exec:gt ''wardrobe'', ''start''">suitcases</a>, which you could use to store the clothes you don''t often wear.'
 	*nl
 	'There is no door to the living room, instead there''s <a href="exec:view''images/shared/sharedapt/bedroom/curtain.jpg''">curtain</a> covering entry to the room, which gives you a modicum of privacy; not much better than the state of the non-existant window curtains'
 

locations/pavShared_gp.qsrc

@@ -8,7 +8,7 @@ if $ARGS[0] = 'gp':
 	'<h3><center><font color=#<<$gp_font>>><<$gp_name>></font></h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
 	''
-	'He is a gopnik, showing violent and aggresive behaviour. You feel something like a bad aura coming from him.'
+	'He is a gopnik, showing violent and aggressive behaviour. You feel something like a bad aura coming from him.'
 	if gp_hadSex = 1:'As you know very well, <<$gp_name>> has <<gpDick>> cm long <a href="exec:gt ''pavShared_gp'', ''gpDick''">dick</a> with somehow maintained pubic hair.'
 	''
 	'<b>Today he looks to be in a <<$gp_mood>> mood.</b>'

locations/pavShared_sp.qsrc

@@ -839,7 +839,7 @@ if $ARGS[0] = 'spSexAnal':
 			'<<$sp_name>> kneels between those, gently spreading them a bit wider with his hands.'
 			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
 			'He rubs the tip of his phallus around your sphincter, making it wet and preparing to penetrate it.'		
-			'Before doing so, he takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated.'
+			'Before doing so, he takes some more lube on his fingers and one by one he stretches your anus with them. Making it easier for you to be penetrated.'
 			'He gently starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
 			gs 'arousal', 'anal', 10, 'lube'
 			gs 'stat'

locations/stwork.qsrc

@@ -40,6 +40,7 @@ if $ARGS[0] = 'start':
 				'<h3>Staff Bathroom</h3>'
 				'<h5>Shower</h5>'
 				'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
+				dynamic $brit
 				*nl
 				'After taking off all of your clothes, you gather up your towel, washcloth and soap, then head to the shower. You wash yourself thoroughly.'
 			end
@@ -52,7 +53,6 @@ if $ARGS[0] = 'start':
 				'You brush your hair and put on heavy you makeup for the customers.'
 			end
 			pcs_hairbsh = 1
-			dynamic $brit
 
 			if pcs_leghair <= 3 and pcs_pubes <= 3:
 				if fingal <= 0: