glife/sugarcube/src/activities/dating/lover_meet.tw

:: lover_meet
<<passageType 'quest'>>

<<set $date = {npc: $dateNPCID}>>

<<image $npcs.get($date.npc,'image')>>
<p>You walk towards <<npc $date.npc>><</npc>>. <<npcDecription $dateNPCId>> It doesn't take long before he realizes your presence and turns around to you.</p>

<<run $npcs.inc($date.npc,'date.count',1)>>
<<set _currentDateCount = $npcs.get($date.npc,'date.count')>>





<!--
	He will comment pcs appearance
 -->
 <<set _currentHotcat = $pc.hotcat>>

<<set _rememberedHotcat = $npcs.get($date.npc,'rememberedHotcat',5)>>
<<set _hotcatDifference = _currentHotcat - _rememberedHotcat>>

<<set _expectedHotcat = $npcs.get($date.npc,'date.expectedHotcat',5)>>
<<set _hotcatExpectedDifference = _currentHotcat - _expectedHotcat>>

<p>
	As he comes closer, you feel his eyes rushing over you as if he was inspecting your appearance.
	<<set $date.appearanceSatisfaction = 0>>
	<!-- He expects you to look a certain way. That's static. -->
	<<if _hotcatExpectedDifference <= -3>>
		<<set $date.appearanceSatisfaction = -40>>
		<<run $npcs.dec($date.npc,'rememberedHotcat',0.3)>>
		<<negative 2>>He looks at you with disgust and makes a some vicious comments about his standards being higher than this.<</negative>>
	<<elseif _hotcatExpectedDifference <= -2>>
		<<set $date.appearanceSatisfaction = -30>>
		<<run $npcs.dec($date.npc,'rememberedHotcat',0.3)>>
		<<negative 2>>He is obviously not happy with what he sees and makes a little comment about his standards being higher than this.<</negative>>
	<<elseif _hotcatDifference <= -2.5>>
		<<set $date.appearanceSatisfaction = -30>>
		<<run $npcs.dec($date.npc,'rememberedHotcat',0.3)>>
		<<negative 2>>He is obviously not happy with what he sees. He remembers you being way hotter.<</negative>>
	<<elseif _hotcatDifference <= -1.5>>
		<<set $date.appearanceSatisfaction = -20>>
		<<run $npcs.dec($date.npc,'rememberedHotcat',0.2)>>
		<<negative 1>>He seems to be not happy with what he sees. He remembers you being hotter.<</negative>>
	<<elseif _hotcatDifference <= -0.5>>
		<<set $date.appearanceSatisfaction = -10>>
		<<run $npcs.dec($date.npc,'rememberedHotcat',0.1)>>
		<<negative>>He make a compliment about your appearance that is obviously not honest. He remembers you being a little hotter.<</negative>>
	<<elseif _hotcatDifference <= 0.5>>
		He make a compliment about your appearance that appears to be honest. You are about as hot as he remembers you.
	<<elseif _hotcatDifference <= 1.5>>
		<<set $date.appearanceSatisfaction = 10>>
		<<run $npcs.inc($date.npc,'rememberedHotcat',0.1)>>
		<<positive>>He makes you a compliment. He really seems to like your appearance today. You are a little hotter than he remembers you.<</positive>>
	<<elseif _hotcatDifference <= 2.5>>
		<<set $date.appearanceSatisfaction = 20>>
		<<run $npcs.inc($date.npc,'rememberedHotcat',0.2)>>
		<<positive 1>>He makes you a compliment. He seems to really like your appearance today. You are hotter than he remembers you.<</positive>>
	<<else>>
		<<set $date.appearanceSatisfaction = 30>>
		<<run $npcs.inc($date.npc,'rememberedHotcat',0.3)>>
		<<positive 2>>He makes you an euphoric compliment. You are way hotter than he remembers you.<</positive>>
	<</if>>
</p>

<<set $date.startingAttitude = $npcs.get($date.npc,'rel') + $date.appearanceSatisfaction>>

<<if $date.startingAttitude <= -10>>
	<p>He stops right in front of you. <<say $date.npc>>I think this won't work out. This has clearly been a mistake.<</say>> As he turns around he say <<say $date.npc>>Don't call me.<</say>></p>
	<<set $date.meetAction = 'abort'>>
<<elseif $date.startingAttitude <= 0>>
	<p>He stops right in front of you. <<say $date.npc>>Sorry $pc.name_nick, but I don't think this will work out. I think we sould start seeing other people.<</say>></p>
	<<set $date.meetAction = 'abort'>>
<<elseif $date.startingAttitude <= 10>>
	<p><<say $date.npc>>Hello $pc.name_nick.<</say>> He doesn't smile. He doesn't seem to be too happy to be here.</p>
	<<set $date.meetAction = 'none'>>
<<elseif $date.startingAttitude <= 20>>
	<p><<say $date.npc>>Hello $pc.name_nick.<</say>> He forces a smile on his face. At least he pretends to be happy to be here.</p>
	<<set $date.meetAction = 'smile'>>
<<elseif $date.startingAttitude <= 40>>
	<p><<say $date.npc>>Hello $pc.name_nick.<</say>> He greets you with a smile and steps forward with his hand stretched out, apperently wanting to shake your hand.</p>
	<<set $date.meetAction = 'handshake'>>
<<elseif $date.startingAttitude <= 50>>
	<p><<say $date.npc>>Hello $pc.name_nick.<</say>> He greets you with a smile and steps forward with his arms stretched, apperently wanting to give you an embrace.</p>
	<<set $date.meetAction = 'embrace'>>
<<else>>
	ERROR
<</if>>




<<switch $date.meetAction>>
	<<case 'abort'>>
		<<set $date.meetActionReturn = ['leave']>>
	<<case 'smile'>>
		<<set $date.meetActionReturn = ['none','smile','handshake']>>
	<<case 'handshake'>>
		<<set $date.meetActionReturn = ['smile','handshake','embrace']>>
	<<case 'embrace'>>
		<<set $date.meetActionReturn = ['handshake','embrace','hug']>>
	<<default>>
		<<set $date.meetActionReturn = ['hug']>>
<</switch>>

<<if $date.meetActionReturn.includes('none')>>
	<<actCLA 'Just stare at him'>>
		<<set $date.meetActionReturnChosen = 'none'>>
		<<gt 'lover_meet_greet_reaction'>>
	<</actCLA>>
<</if>>
<<if $date.meetActionReturn.includes('smile')>>
	<<actCLA 'Greet him with a smile'>>
		<<set $date.meetActionReturnChosen = 'smile'>>
		<<gt 'lover_meet_greet_reaction'>>
	<</actCLA>>
<</if>>
<<if $date.meetActionReturn.includes('handshake')>>
	<<actCLA 'Shake his hand'>>
		<<set $date.meetActionReturnChosen = 'handshake'>>
		<<gt 'lover_meet_greet_reaction'>>
	<</actCLA>>
<</if>>
<<if $date.meetActionReturn.includes('embrace')>>
	<<actCLA 'Embrace him'>>
		<<set $date.meetActionReturnChosen = 'embrace'>>
		<<gt 'lover_meet_greet_reaction'>>
	<</actCLA>>
<</if>>
<<if $date.meetActionReturn.includes('hug')>>
	<<actCLA 'Hug him'>>
		<<set $date.meetActionReturnChosen = 'hug'>>
		<<gt 'lover_meet_greet_reaction'>>
	<</actCLA>>
<</if>>
<<if $date.meetActionReturn.includes('kiss')>>
	<<actCLA 'Kiss him'>>
		<<set $date.meetActionReturnChosen = 'kiss'>>
		<<gt 'lover_meet_greet_reaction'>>
	<</actCLA>>
<</if>>

:: lover_meet_greet_reaction
<<passageType 'quest'>>
<<debug>>
	<pre>
		<<=JSON.stringify($npcs.getDynamicData($date.npc),null,'\t')>>
	</pre>
<</debug>>

<<image $npcs.get($date.npc,'image')>>
<<switch $date.meetActionReturnChosen>>
	<<case 'handshake'>>
		<<switch $date.meetAction>>
			<<case 'hug'>>
				<p>
					Realizing that you won't return his hug, <<npc $date.npc>><</npc>> takes your hand and shakes it.
					He appears to be a little bit dissapointed.
				</p>
		<</switch>>
	<<case 'hug'>>
		<<switch $date.meetAction>>
			<<case 'hug'>>
				<p>
					You return the hug of <<npc $date.npc>><</npc>>.
					As you let lose, you see that he appears to be happy about your reaction.
				</p>
		<</switch>>
	<<case 'kiss'>>
		<<run $npcs.inc($date.npc,'date.kissed',1)>>
		<<switch $date.meetAction>>
			<<case 'hug'>>
				<p>
					You kiss <<npc $date.npc>><</npc>> on his lips.
					As you back off, you see that he is grinning.
				</p>
				<<if $npcs.get($date.npc,'date.kissed') == 1>>
					<p><<say $date.npc>>Wow, I didn't expect our first kiss to be like this.<</say>></p>
				<</if>>

		<</switch>>
<</switch>>
<!-- TODO: Extend -->



:: lover_meet_old
<<if $location_var[$here][0] == 'start_old'>>
	<<set $menu_off = 1>>
	<<set $location_type = 'event'>>
	<<set $time.minutes += 15>>
	<<setinit $loverdays[$lover_number] += 1>>
	<<setinit $svidanie[$lover_number] = 0>>
	<<set $giftNum = $giftNum[$lover_number]>>
	<<gs 'themes' 'indoors'>>
	<<gs 'lover_pronouns'>>
	<<gs 'lover_pref'>>
	<!-- !!This keeps track in the change action what it plans to change-->
	<<set $changeFind = ''>>
	<!-- !!How many days until the lover starts to comment.-->
	<<set $clotDay = 3>>
	<<set $pc.bodyDay = 7>>
	<!-- !!How many days until they want you to change.-->
	<<set $pierDay = 7>>
	<<set $tattDay = 7>>
	<<set $lipsDay = 9>>
	<<set $pc.titsDay = 12>>
	<<set $figureDay = 15>>
	<!-- !! This is the start of the usual talk-->
	<!-- !!character 0 - soft, 1 -norm 2 - aggressor-->
	<<if getvar("$haraklover["+$lover_number+"]") == 0>>
		<<if getvar("$loverrelation["+$lover_number+"]") > 70>>
			<<set $randchan = rand(0, 2)>>
			<<if getvar("$randchan") == 0>>
				<<set $greet = 'says with love in $tXyr eyes, "Hey $pc.name_nick."'>>
			<<elseif getvar("$randchan") == 1>>
				<<set $greet = 'says lovingly, "Hello love. I`m glad so see you."'>>
			<<elseif getvar("$randchan") == 2>>
				<<set $greet = 'says quietly while looking into your eyes, "Hello love." '>>
			<</if>>
		<<elseif getvar("$loverrelation["+$lover_number+"]") > 20>>
			<<set $randchan = rand(0, 1)>>
			<<if getvar("$randchan") == 0>>
				<<set $greet = 'says with a faint smile, "Hey $pc.name_nick."'>>
			<<elseif getvar("$randchan") == 1>>
				<<set $greet = 'says with a smile, "Hi $pc.name_nick."'>>
			<</if>>
		<<else>>
			<<set $greet = 'says, "Hi $pc.name_first."'>>
		<</if>>
	<</if>>
	<<if getvar("$haraklover["+$lover_number+"]") == 1>>
		<<if getvar("$loverrelation["+$lover_number+"]") > 70>>
			<<set $randchan = rand(0, 2)>>
			<<if getvar("$randchan") == 0>>
				<<set $greet = 'says, "Hey love. I am so happy to see you."'>>
			<<elseif getvar("$randchan") == 1>>
				<<set $greet = 'says intimately, "Hello my angel."'>>
			<<elseif getvar("$randchan") == 2>>
				<<set $greet = 'says while admiring you, "Hello $pc.name_nick beautiful."'>>
			<</if>>
		<<elseif getvar("$loverrelation["+$lover_number+"]") > 20>>
			<<set $randchan = rand(0, 1)>>
			<<if getvar("$randchan") == 0>>
				<<set $greet = 'says with a smile, "Hey $pc.name_nick, glad to see you."'>>
			<<elseif getvar("$randchan") == 1>>
				<<set $greet = 'says with a soft tone, "Hello beautiful."'>>
			<</if>>
		<<else>>
			<<set $greet = 'says, "Hello $pc.name_nick."'>>
		<</if>>
	<</if>>
	<<if getvar("$haraklover["+$lover_number+"]") == 2>>
		<<if getvar("$loverrelation["+$lover_number+"]") > 70>>
			<<set $randchan = rand(0, 2)>>
			<<if getvar("$randchan") == 0>>
				<<set $greet = 'says with a loving voice, "Theres my sexy gal."'>>
			<<elseif getvar("$randchan") == 1>>
				<<set $greet = 'says with a toothful grin, "There is my goddess."'>>
			<<elseif getvar("$randchan") == 2>>
				<<set $greet = 'says with a rather loud enduring voice, "Hey babe!"'>>
			<</if>>
		<<elseif getvar("$loverrelation["+$lover_number+"]") > 20>>
			<<set $randchan = rand(0, 1)>>
			<<if getvar("$randchan") == 0>>
				<<set $greet = 'says with a grin, "Hey $pc.name_nick."'>>
			<<elseif getvar("$randchan") == 1>>
				<<set $greet = 'says with a chuckle, "Hey'ya $pc.name_nick."'>>
			<</if>>
		<<else>>
			<<set $greet = 'says, "Hey $pc.name_nick."'>>
		<</if>>
	<</if>>
	<<gs 'lover_love'>>
	<!-- !! QUEST VARIABLES!!! WOOOT ALMOST TIME!-->
	<<set $didPushAway = 0>>
	<!-- !!How beautiful you are-->
	<<if $pc.pcs_skin < 20>>
		<<setinit $loverrelation[$lover_number] -= 2>> <<set $meetskin = 'looking at $tXyr feet'>>
	<<elseif $pc.pcs_skin < 40>>
		<<setinit $loverrelation[$lover_number] -= 1>> <<set $meetskin = 'giving you a quick glance'>>
	<<elseif $pc.pcs_skin < 60>>
		<<set $meetskin = 'looking at you'>>
	<<elseif $pc.pcs_skin < 80>>
		<<setinit $loverrelation[$lover_number] += 1>> <<set $meetskin = 'smiling at you'>>
	<<else>>
		<<setinit $loverrelation[$lover_number] += 2>> <<set $meetskin = 'smiling at you'>>
	<</if>>
	<!-- !! Your lip size-->
	<<if $pc.lip_size == 0>>
		<<set $meetlip = 'thin lips'>>

	<</if>>
	<<if $pc.lip_size == 1>>
		<<set $meetlip = 'soft lips'>>

	<</if>>
	<<if $pc.lip_size == 2>>
		<<set $meetlip = 'plump lips'>>

	<</if>>
	<<if $pc.lip_size == 3>>
		<<set $meetlip = 'large, plump lips'>>

	<</if>>
	<<if $pc.lip_size == 4>>
		<<set $meetlip = 'thick and huge lips'>>

	<</if>>
	<<if getvar("$loverfinance["+$lover_number+"]") == 0>>
		<<set $clom = 'dressed in a tracksuit.'>>

	<</if>>
	<<if getvar("$loverfinance["+$lover_number+"]") == 1>>
		<<set $clom = 'dressed in jeans and a sweater.'>>

	<</if>>
	<<if getvar("$loverfinance["+$lover_number+"]") == 2 and getvar("$loverGender["+$lover_number+"]") == 0>>
		<<set $clom = 'dressed in a respectable and expensive jacket.'>>

	<</if>>
	<<if getvar("$loverfinance["+$lover_number+"]") == 2 and getvar("$loverGender["+$lover_number+"]") == 1>>
		<<set $clom = 'dressed in a beautiful and expensive dress.'>>

	<</if>>
	<!-- !!Greeting start-->
	<p>At the entrance $meetskin stands $loverdesc[$lover_number]. $tXec comes over to you and $greet</p>
	<<gs 'lover_likes' 'hairPref'>>
	<<gs 'lover_likes' 'makePrefTmp'>>
	<<if getvar("$haraklover["+$lover_number+"]") == 0>>
		<<$loverdesc[$lover_number]>> looks like a timid and not very confident young <<$loverGenderName>> <<$clom>>

	<</if>>
	<<if getvar("$haraklover["+$lover_number+"]") == 1>>
		<<$loverdesc[$lover_number]>> looks like an average young <<$loverGenderName>> <<$clom>>

	<</if>>
	<<if getvar("$haraklover["+$lover_number+"]") == 2>>
		<<$loverdesc[$lover_number]>> looks like a cocky and brash young <<$loverGenderName>> <<$clom>>

	<</if>>
	<!-- !!This is to reset the like part later-->
	<<set $likeCount = 0>>
	<<set $like1 = 99>>
	<<set $like2 = 99>>
	<<set $like3 = 99>>
	<!-- !! This is the greeting kissy part-->
	<<if getvar("$haraklover["+$lover_number+"]") >= 0>>
		<<if getvar("$loverrelation["+$lover_number+"]") > -20>>
			<<setinit $loverrelation[$lover_number] += 0>>
			<p>$loverdesc[$lover_number] gets close to you, and you can tell by $tXyr body movements $tXe wants to kiss you.</p>
			<<actCLA 'Kiss with tongue'>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>You take the initiative and when $tXe opens $tXyr mouth you thrust your tongue into $tXyr mouth.</p>
				<<arouse 'kiss' 5 >>
				<<set $pc.mood += 10>>
				<<if getvar("$venera") > 4>>
					<<gs 'lover' 'remove' $lover_number>>
					<p>$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."</p>
					<<set $pc.mood -= 20>>
					<<gt 'homes_properties' 'go_home'>>
					$exit
				<<elseif getvar("$venera") < 4 and $pc.cumAtLocation(11) == 0 and ($pc.cumAtLocation(6) == 0 and $pc.cumAtLocation(7) == 0)>>
					<<if getvar("$haraklover["+$lover_number+"]") == 0>>
						<<setinit $loverrelation[$lover_number] += 2>>
						<p>Normally this would have made $tXem feel uncomfortable, but as you pull away $tXe smiles and sighs contently.</p>
					<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
						<<setinit $loverrelation[$lover_number] += 1>>
						<p>$tXec goes with it a blink and in moments your tongues are intertwined.</p>
					<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
						<p>It seems as $loverdesc[$lover_number] had the same idea, as $tXe pushes $tXyr tongue into your mouth as much as you push into $tXyr.</p>
						<<setinit $loverrelation[$lover_number] += 2>>
					<<else>>
						This should not fire off at all: TongueKiss
					<</if>>
				<<elseif ($pc.cumAtLocation(11) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1) and getvar("$pervConstant") == 1 and getvar("$loverGender["+$lover_number+"]") == 0>>
					<<if $pc.cumAtLocation(11) == 1>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<p>$tXec can see sperm on your face, but by the bulge in $tXyr pants you know it only turns $tXem on.</p>
						<</if>>
					<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<<setinit $loverrelation[$lover_number] += 3>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but by the bulge in $tXyr pants you know it only turns $tXem on.</p>
						<</if>>
					<</if>>
				<<elseif ($pc.cumAtLocation(11) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1) and (getvar("$pervConstant") != 1 or getvar("$loverGender["+$lover_number+"]") == 0)>>
					<<if $pc.cumAtLocation(11) == 1>>
						<<gs 'lover' 'remove' $lover_number>>
						<p>$tXec notices the sperm on your face, "H-Hey- $pc.name_first! What the...?! You dirty whore!", $tXe then pushes you out of $tXyr face. "We are through, I don't want to see your face again!</p>
						<<set $pc.mood -= 20>>
						<<gt 'homes_properties' 'go_home'>>
						$exit
					<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
						<<setinit $loverrelation[$lover_number] += 2>>
						<p>$tXec notices the sperm on your ass, "$pc.name_first! What the...?! You dirty whore!", $tXe then pushes you away. "We are through, I don't want to see your face again!</p>
						<<set $pc.mood -= 20>>
						<<gt 'homes_properties' 'go_home'>>
						$exit
					<</if>>
				<</if>>
				<<actCLA 'Continue'>>
					<<xgt 'lover_meet' 'likes'>>
				<</actCLA>>
			<</actCLA>>
			<<actCLA 'Kiss with lips'>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>You press your $meetlip softly against $tXyr, and for a split second time seems to stop.</p>
				<<set $pc.mood += 10>>
				<<if $pc.cumAtLocation(11) == 0 and ($pc.cumAtLocation(6) == 0 and $pc.cumAtLocation(7) == 0)>>
					<<if getvar("$haraklover["+$lover_number+"]") == 0>>
						<<setinit $loverrelation[$lover_number] += 2>>
						<p>$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.</p>
						<<arouse 'kiss' 5 >>
					<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
						<<setinit $loverrelation[$lover_number] += 2>>
						<p>$tXec kisses you back with such skill it turns you on.</p>
						<<arouse 'kiss' 5 >>
					<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
						<<setinit $loverrelation[$lover_number] += 2>>
						<p>$tXec kisses you back with such passion you feel a tingle within you.</p>
						<<arouse 'kiss' 5 >>
					<</if>>
				<<elseif ($pc.cumAtLocation(11) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1 or $pc.cumAtLocation(12) == 1) and getvar("$pervConstant") == 1>>
					<<if $pc.cumAtLocation(11) == 1>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<<setinit $loverrelation[$lover_number] += 3>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but by the bulge in $tXyr pants you know it only turns $tXem on.</p>
						<</if>>
					<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<<setinit $loverrelation[$lover_number] += 3>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but by the bulge in $tXyr pants you know it only turns $tXem on.</p>
						<</if>>
					<<elseif $pc.cumAtLocation(12) == 1>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can smell the scent of sperm on you, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can smell the scent of sperm on you, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<<setinit $loverrelation[$lover_number] += 3>>
							<<set $pc.horny += 5>>
							<p>$tXec can smell the scent of sperm on you, but you know by the bulge in $tXyr pants it only turns $tXem on more.</p>
						<</if>>
					<</if>>
				<<else>>
					<<if ($pc.cumAtLocation(11) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1) and getvar("$pervConstant") != 1>>
						<<if $pc.cumAtLocation(11) == 1>>
							<<gs 'lover' 'remove' $lover_number>>
							<p>$tXec notices the sperm on your face, "$pc.name_first! What the...?! You dirty whore!", $tXe then pushes you out of $tXyr face. "We are through, I don't want to see your face again!</p>
							<<set $pc.mood -= 20>>
							<<gt 'homes_properties' 'go_home'>>
							$exit
						<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
							<<gs 'lover' 'remove' $lover_number>>
							<p>$tXec notices the sperm on your ass, "$pc.name_first! What the...?! You dirty whore!", $tXe then pushes you away. "We are through, I don't want to see your face again!</p>
							<<set $pc.mood -= 20>>
							<<gt 'homes_properties' 'go_home'>>
							$exit
						<</if>>
					<</if>>
				<</if>>
				<<actCLA 'Continue'>>
					<<xgt 'lover_meet' 'likes'>>
				<</actCLA>>
			<</actCLA>>
			<<actCLA 'Hint for a kiss on the cheek'>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>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</p>
				<<set $pc.mood += 10>>
				<<if $pc.cumAtLocation(11) == 0 and ($pc.cumAtLocation(6) == 0 and $pc.cumAtLocation(7) == 0)>>
					<<if getvar("$haraklover["+$lover_number+"]") == 0>>
						<<setinit $loverrelation[$lover_number] += 2>>
						<p>$tXec gives you a soft kiss on the cheek, and you can tell $tXe finds this act very cute.</p>
						<<arouse 'kiss' 5 >>
					<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
						<<setinit $loverrelation[$lover_number] += 1>>
						<p>$tXec kisses you on the cheek and before $tXe pulls away you feel a quick kiss on the forhead.</p>
						<<arouse 'kiss' 5 >>
					<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
						<<setinit $loverrelation[$lover_number] += 0>>
						<p>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.</p>
						<<arouse 'kiss' 5 >>
					<</if>>
				<<elseif ($pc.cumAtLocation(11) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1 or $pc.cumAtLocation(12) == 1) and getvar("$pervConstant") == 1>>
					<<if $pc.cumAtLocation(11) == 1>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 2>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<<setinit $loverrelation[$lover_number] += 3>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your face, but by the bulge in $tXyr pants you know it only turns $tXem on.</p>
						<</if>>
					<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
						<<if getvar("$haraklover["+$lover_number+"]") == 0>>
							<<setinit $loverrelation[$lover_number] += 1>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but underneath $tXyr shy demener you know that it only turns $tXem on.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
							<<setinit $loverrelation[$lover_number] += 1>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but you know that it only turns $tXem on more.</p>
						<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
							<<setinit $loverrelation[$lover_number] += 1>>
							<<set $pc.horny += 5>>
							<p>$tXec can see sperm on your ass, but by the bulge in $tXyr pants you know it only turns $tXem on.</p>
						<</if>>
					<</if>>
				<<elseif ($pc.cumAtLocation(11) == 1 or $pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1) and getvar("$pervConstant") != 1>>
					<<if $pc.cumAtLocation(11) == 1>>
						<<gs 'lover' 'remove' $lover_number>>
						<p>$tXec notices the sperm on your face, "H-Hey- $pc.name_first! What the...?! You dirty whore!", $tXe then pushes you out of $tXyr face. "We are through, I don't want to see your face again!</p>
						<<set $pc.mood -= 20>>
						<<gt 'homes_properties' 'go_home'>>
						$exit
					<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
						<<gs 'lover' 'remove' $lover_number>>
						<p>$tXec notices the sperm on your ass, "H-Hey- $pc.name_first! What the...?! You dirty whore!", $tXe then pushes you away. "We are through, I don't want to see your face again!</p>
						<<set $pc.mood -= 20>>
						<<gt 'homes_properties' 'go_home'>>
						$exit
					<<elseif ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
						<<gs 'lover' 'remove' $lover_number>>
						<p>$tXec realizes your mouth smells like sperm, "H-Hey- $pc.name_first! What the...?! You dirty whore!", $tXe then pushes you away. "We are through, I don't want to see your face again!"</p>
						<<set $pc.mood -= 20>>
						<<gt 'homes_properties' 'go_home'>>
						$exit
					<</if>>
				<</if>>
				<<actCLA 'Continue'>>
					<<xgt 'lover_meet' 'likes'>>
				<</actCLA>>
			<</actCLA>>
			<<actCLA 'Push $tXyr face away'>>
				<<set $didPushAway = 1>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>Maybe you had a bad day, maybe you don't want a kiss, you rudely push $tXyr face away, and by the looks of it, hurting $tXyr feelings in the process.</p>
				<<if getvar("$haraklover["+$lover_number+"]") == 0>>
					<<setinit $loverrelation[$lover_number] -= 7>>
					<p>$tXec stands there slightly embarrassed, and you can tell this hurt your relationship a good amount.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
					<<setinit $loverrelation[$lover_number] -= 5>>
					<p>$tXec looks at you slightly concerned, but backs off and gives you your space.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
					<<setinit $loverrelation[$lover_number] -= 10>>
					<p>$tXec begins to get angry, $tXe takes a deep breath and gives you space.</p>
				<</if>>
				<<actCLA 'Continue'>>
					<<xgt 'lover_meet' 'likes'>>
				<</actCLA>>
			<</actCLA>>
		<<else>>
			<<actCLA 'Continue'>>
				<<xgt 'lover_meet' 'likes'>>
			<</actCLA>>
		<</if>>
	<<else>>
		<<actCLA 'Continue'>>
			<<xgt 'lover_meet' 'likes'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'likes'>>
	<<if $loverdays[$lover_number] >= $clotDay>>
		<<gs 'lover_likes' 'clothesPref'>>
	<</if>>
	<<if $loverdays[$lover_number] >= $pc.bodyDay>>
		<<gs 'lover_likes' 'bodyPrefTmp'>>
	<</if>>
	<<xgt 'lover_meet' 'actions'>>
<</if>>
<<if $location_var[$here][0] == 'actions'>>
	<<actCLA 'Can I ask you how you think I look?'>>
		<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
		<p>$loverdesc[$lover_number] says "If you insist" and tells you exactly how $tXe thinks you look based on what $tXe likes:</p>
		<<gs 'lover_likes' 'allPref'>>
		<<actCLA 'Okay, lets talk about something else'>>
			<<xgt 'lover_meet' 'actions'>>
		<</actCLA>>
	<</actCLA>>
	<<actCLA 'What do you want to do today?'>>
		<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
		<p>You tell $tXem you would rather $tXem decide what we do today.</p>
		<<if getvar("$haraklover["+$lover_number+"]") == 0>>
			<<setinit $loverrelation[$lover_number] += 0>>
			<p>Not used to being given the opportunity to choose, $tXe thinks what to do...</p>
		<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
			<<setinit $loverrelation[$lover_number] += 0>>
			<p>$tXec thinks about what to do today.</p>
		<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
			<<setinit $loverrelation[$lover_number] += 1>>
			<p>You can tell $tXe is happy you gave $tXem the ability to choose what to do today.</p>
		<</if>>
		<!-- !!This is the choice maker!-->
		<!-- !!Willpower checks for resistance-->
		<<if getvar("$loverscompliance["+$lover_number+"]") <= 2>>
			<<set $loverResist = 'easy'>>
		<<elseif getvar("$loverscompliance["+$lover_number+"]") <= 4>>
			<<set $loverResist = 'medium'>>
		<<else>>
			<<set $loverResist = 'hard'>>
		<</if>>
		<<gs 'willpower' 'misc' 'self' $loverResist>>
		<<if getvar("$loverfinance["+$lover_number+"]") == 0>>
			<!-- !! 0 - change player, 1 - beer in stairwell, 2 - walk in park,-->
			<<set $randchan = rand(0, 2)>>
			<!-- !! 1 = does like, 0 = not like-->
			<<if ($pierWearCount >= $pierPrefTmpMin and $pierWearCount <= $pierPrefTmpMax) or getvar("$pierPrefTmp") == 0>>
				<<set $pierCheck = 1>>
			<<else>>
				<<set $pierCheck = 0>>
			<</if>>
			<<if ($tattCount >= $tattPrefTmpMin and $tattCount <= $tattPrefTmpMax) or getvar("$tattPrefTmp") == 0>>
				<<set $tattCheck = 1>>
			<<else>>
				<<set $tattCheck = 0>>
			<</if>>
			<<if $makeupSetting == $makePrefTmp or getvar("$makePrefTmp") == 0>>
				<<set $makeupCheck = 1>>
			<<else>>
				<<set $makeupCheck = 0>>
			<</if>>
			<<if $pc.hairColor == $hairPref>>
				<<set $hairCheck = 1>>
			<<else>>
				<<set $hairCheck = 0>>
			<</if>>
			<<if ($pierWearCount >= $pierPrefTmpMin and $pierWearCount <= $pierPrefTmpMax) or getvar("$pierPrefTmp") == 0>>
				<<set $pierCheck = 1>>
			<<else>>
				<<set $pierCheck = 0>>
			<</if>>
			<<if ($tattCount >= $tattPrefTmpMin and $tattCount <= $tattPrefTmpMax) or getvar("$tattPrefTmp") == 0>>
				<<set $tattCheck = 1>>
			<<else>>
				<<set $tattCheck = 0>>
			<</if>>
			<<if getvar("$randchan") == 0 and ($pierCheck + $tattCheck + $makeupCheck + $hairCheck) == 4>>
				<<set $randchan = rand(1, 2)>>

			<</if>>
			<<if getvar("$randchan") == 0>>
				<!-- !!Some things you can change.-->
				<!-- !!loverfinance[$lover_number] = 0 - hair, makeup, tattoo, piercings.-->
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<<if getvar("$haraklover["+$lover_number+"]") == 0>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<</if>>
				<p>"Whats up $loverdesc[$lover_number]?"</p>
				<p>"There is just a trait about you that bugs me, can we change that?"</p>
				<<if getvar("$loverscompliance["+$lover_number+"]") > 0>>
					<p>You know you have changed for $tXem before, and you want to avoid to changing into something you are not.</p>

				<</if>>
				<<gs 'lover_likes' 'compliance'>>
				<p>"And what did you want to change about me?"</p>
				<!-- !!This is to make a last check on how many piercings they are WEARING-->
				<<gs 'lover_likes' 'checkPier'>>
				<<if $pc.hairColor != $hairPref>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] looks at your hair and says, "can we get your hair dyed?"</p>
					<!-- change 'hair'  'Hair' -->
				<<elseif $makeupSetting != $makePrefTmp and getvar("$makePrefTmp") != 0>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] thinks about it and says "Can you wear $makePrefTmp from now on?"</p>
					<!-- change 'makeup'  'Make' -->
				<<elseif $pierWearCount < $pierPrefTmpMin or $pierWearCount > $pierPrefTmpMax and getvar("$pierPrefTmp") != 0 and $pierDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] talks about how you just don't have the right amount of piercings.</p>
					<<if $pierWearCount < $pierPrefTmpMin>>
						<p>$tXec tells you that you should have more piercings.</p>
					<<else>>
						<p>$tXec tells you that you should have less piercings.</p>
					<</if>>
					<!-- change 'piercings'  'Pier' -->
				<<elseif $tattCount < $tattPrefTmpMin or $tattCount > $tattPrefTmpMax and getvar("$tattPrefTmp") != 0 and $tattDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] talks about how you just don't have the right amount of tattoos.</p>
					<<if $tattCount < $tattPrefTmpMin>>
						<p>$tXec tells you that you should have more tattoos.</p>
					<<else>>
						<p>$tXec tells you that you should have less tattoos.</p>
					<</if>>
					<!-- change 'tattoos'  'Tatt' -->
				<<else>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					Erm... Nothing...
					<<actCLA 'Well then...'>>
						<<xgt 'lover_meet' 'actions'>>
					<</actCLA>>
				<</if>>
			<<elseif getvar("$randchan") == 1 and getvar("$loverGender["+$lover_number+"]") == 0>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggest you and $tXem drink a beer in the stairwell.</p>
				<<actCLA 'Sorry, but I need to go'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<gt 'podezdM' 'start'>>
				<</actCLA>>
			<<elseif getvar("$randchan") == 2 or getvar("$loverGender["+$lover_number+"]") == 1>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggests that you take a walk in the park.</p>
				<<actCLA 'Sorry, but I need to go'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'parkM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'parksvid'>>

					<</if>>
				<</actCLA>>
			<</if>>
		<<elseif getvar("$loverfinance["+$lover_number+"]") == 1>>
			<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
			<!-- !! 0 - change player, 1 - go to the movies, 2 - walk in park, 3 , suggests that you go to a cafe.-->
			<<set $randchan = rand(0, 3)>>
			<!-- !! 1 = does like, 0 = not like-->
			<<if ($pierWearCount >= $pierPrefTmpMin and $pierWearCount <= $pierPrefTmpMax) or getvar("$pierPrefTmp") == 0>>
				<<set $pierCheck = 1>>
			<<else>>
				<<set $pierCheck = 0>>
			<</if>>
			<<if ($tattCount >= $tattPrefTmpMin and $tattCount <= $tattPrefTmpMax) or getvar("$tattPrefTmp") == 0>>
				<<set $tattCheck = 1>>
			<<else>>
				<<set $tattCheck = 0>>
			<</if>>
			<<if $makeupSetting == $makePrefTmp or getvar("$makePrefTmp") == 0>>
				<<set $makeupCheck = 1>>
			<<else>>
				<<set $makeupCheck = 0>>
			<</if>>
			<<if $pc.hairColor == $hairPref>>
				<<set $hairCheck = 1>>
			<<else>>
				<<set $hairCheck = 0>>
			<</if>>
			<<if $pc.tits >= $titMin and $pc.tits <= $titMax>>
				<<set $titCheck = 1>>
			<<else>>
				<<set $titCheck = 0>>
			<</if>>
			<<if $pc.lip_size >= $lipsPrefTmpMin and $pc.tits <= $lipsPrefTmpMax>>
				<<set $lipsCheck = 1>>
			<<else>>
				<<set $lipsCheck = 0>>
			<</if>>
			<<if getvar("$randchan") == 0 and ($pierCheck + $tattCheck + $makeupCheck + $hairCheck + $titCheck + $lipsCheck) == 6>>
				Takes one look at your body and loves every part of it.
				<<set $randchan = rand(1, 3)>>
			<</if>>
			<<if getvar("$randchan") == 0>>
				<!-- !!Some things you can change.-->
				<!-- !!loverfinance[$lover_number] = 1 - hair, makeup, tattoo, piercings, lips, tits.-->
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<<if getvar("$haraklover["+$lover_number+"]") == 0>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<</if>>
				<p>"Whats up $loverdesc[$lover_number]?"</p>
				<p>"There is just a trait about you that bugs me, can we change that?"</p>
				<<if getvar("$loverscompliance["+$lover_number+"]") > 0>>
					<p>You know you have changed for $tXem before, and you want to avoid to changing into something you are not.</p>

				<</if>>
				<<gs 'lover_likes' 'compliance'>>
				<p>"And what did you want to change about me?"</p>
				<!-- !!This is to make a last check on how many piercings they are WEARING-->
				<<gs 'lover_likes' 'checkPier'>>
				<<if $pc.hairColor != $hairPref>>
					<p>$loverdesc[$lover_number] looks at your hair and says, "can we get your hair dyed?"</p>
					<!-- change 'hair'  'Hair' -->
				<<elseif $makeupSetting != $makePrefTmp and getvar("$makePrefTmp") != 0>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] thinks about it and says "Can you wear $makePrefTmp from now on?"</p>
					<!-- change 'makeup'  'Make' -->
				<<elseif $pierWearCount < $pierPrefTmpMin or $pierWearCount > $pierPrefTmpMax and getvar("$pierPrefTmp") != 0 and $pierDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] talks about how you just don't have the right amount of piercings.</p>
					<<if $pierWearCount < $pierPrefTmpMin>>
						<p>$tXec tells you that you should have more piercings.</p>
					<<else>>
						<p>$tXec tells you that you should have less piercings.</p>
					<</if>>
					<!-- change 'piercings'  'Pier' -->
				<<elseif $tattCount < $tattPrefTmpMin or $tattCount > $tattPrefTmpMax and getvar("$tattPrefTmp") != 0 and $tattDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] talks about how you just don't have the right amount of tattoos.</p>
					<!-- change 'tattoos'  'Tatt' -->
				<<elseif $pc.lip_size < $lipsPrefTmpMin or $pc.lip_size > $lipsPrefTmpMax and $lipsDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] tells you your lips are just not the right size.</p>
					<<if $pc.lip_size < $lipsPrefTmpMin>>
						<p>$tXec tells you that you should get lip injections.</p>
					<<else>>
						<p>$tXec tells you that you should have lip reduction.</p>
					<</if>>
					<!-- change 'lips'  'Lips' -->
				<<elseif $pc.tits < $titMin or $pc.tits > $titMax and $pc.titsDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] tells you your breasts are just not right.</p>
					<<if $pc.tits < $titMin>>
						<p>$tXec tells you that you should get breast implants.</p>
					<<else>>
						<p>$tXec tells you that you should have a breast reduction.</p>
					<</if>>
					<!-- change 'breasts'  'Tits' -->
				<<else>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					"Erm... Nothing..."
					<<actCLA '"Well then..."'>>
						<<xgt 'lover_meet' 'actions'>>
					<</actCLA>>
				<</if>>
			<<elseif getvar("$randchan") == 1>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggests that you go to the movies.</p>
				<<actCLA 'Sorry, but I need to go'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'kinoM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'kinosvid'>>

					<</if>>
				<</actCLA>>
			<<elseif getvar("$randchan") == 2>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggest that you take a walk in the park</p>
				<<actCLA 'Sorry, but I need to go'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'parkM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'parksvid'>>

					<</if>>
				<</actCLA>>
			<<elseif getvar("$randchan") == 3>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggests that you go to a cafe.</p>
				<<actCLA 'Sorry, but I need to go'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'kafeM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'kafesvid'>>

					<</if>>
				<</actCLA>>
			<</if>>
		<<elseif getvar("$loverfinance["+$lover_number+"]") == 2>>
			<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
			<!-- !!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.-->
			<<set $randchan = rand(0, 3)>>
			<!-- !! 1 = does like, 0 = not like-->
			<<if ($pierWearCount >= $pierPrefTmpMin and $pierWearCount <= $pierPrefTmpMax) or getvar("$pierPrefTmp") == 0>>
				<<set $pierCheck = 1>>
			<<else>>
				<<set $pierCheck = 0>>
			<</if>>
			<<if ($tattCount >= $tattPrefTmpMin and $tattCount <= $tattPrefTmpMax) or getvar("$tattPrefTmp") == 0>>
				<<set $tattCheck = 1>>
			<<else>>
				<<set $tattCheck = 0>>
			<</if>>
			<<if $makeupSetting == $makePrefTmp or getvar("$makePrefTmp") == 0>>
				<<set $makeupCheck = 1>>
			<<else>>
				<<set $makeupCheck = 0>>
			<</if>>
			<<if $pc.hairColor == $hairPref>>
				<<set $hairCheck = 1>>
			<<else>>
				<<set $hairCheck = 0>>
			<</if>>
			<<if $pc.tits >= $titMin and $pc.tits <= $titMax>>
				<<set $titCheck = 1>>
			<<else>>
				<<set $titCheck = 0>>
			<</if>>
			<<if $pc.lip_size >= $lipsPrefTmpMin and $pc.tits <= $lipsPrefTmpMax>>
				<<set $lipsCheck = 1>>
			<<else>>
				<<set $lipsCheck = 0>>
			<</if>>
			<<if $pc.salocatnow <= $figurePrefMax>>
				<<set $figureCheck = 1>>
			<<else>>
				<<set $figureCheck = 0>>
			<</if>>
			<<if getvar("$randchan") == 0 and ($pierCheck + $tattCheck + $makeupCheck + $hairCheck + $titCheck + $lipsCheck + $figureCheck) == 7>>
				Takes one look at your body and loves every part of it.
				<<set $randchan = rand(1, 3)>>
			<</if>>
			<<if getvar("$randchan") == 0>>
				<!-- !!Some things you can change.-->
				<!-- !!loverfinance[$lover_number] = 2 - hair, makeup, tattoo, piercings, lips, tits, figure.-->
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<<if getvar("$haraklover["+$lover_number+"]") == 0>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 1>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<<elseif getvar("$haraklover["+$lover_number+"]") == 2>>
					<p>"Actually can I talk to you about something?", $loverdesc[$lover_number] asks you.</p>
				<</if>>
				<p>"Whats up $loverdesc[$lover_number]?"</p>
				<p>"There is just a trait about you that bugs me, can we change that?"</p>
				<<if getvar("$loverscompliance["+$lover_number+"]") > 0>>
					<p>You know you have changed for $tXem before, and you want to avoid to changing into something you are not.</p>

				<</if>>
				<<gs 'lover_likes' 'compliance'>>
				<p>"And what did you want to change about me?"</p>
				<!-- !!This is to make a last check on how many piercings they are WEARING-->
				<<gs 'lover_likes' 'checkPier'>>
				<<if $pc.hairColor != $hairPref>>
					<p>$loverdesc[$lover_number] looks at your hair and says, "can we get your hair dyed?"</p>
					<!-- change 'hair'  'Hair' -->
				<<elseif $makeupSetting != $makePrefTmp and getvar("$makePrefTmp") != 0>>
					<p>$loverdesc[$lover_number] thinks about it and says "Can you wear $makePrefTmp from now on?"</p>
					<!-- change 'makeup'  'Make' -->
				<<elseif $pierWearCount < $pierPrefTmpMin or $pierWearCount > $pierPrefTmpMax and getvar("$pierPrefTmp") != 0 and $pierDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] talks about how you just don't have the right amount of piercings.</p>
					<<if $pierWearCount < $pierPrefTmpMin>>
						<p>$tXec tells you that you should have more piercings.</p>
					<<else>>
						<p>$tXec tells you that you should have less piercings.</p>
					<</if>>
					<!-- change 'piercings'  'Pier' -->
				<<elseif $tattCount < $tattPrefTmpMin or $tattCount > $tattPrefTmpMax and getvar("$tattPrefTmp") != 0 and $tattDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] talks about how you just don't have the right amount of tattoos.</p>
					<<if $tattCount < $tattPrefTmpMin>>
						<p>$tXec tells you that you should have more tattoos.</p>
					<<else>>
						<p>$tXec tells you that you should have less tattoos.</p>
					<</if>>
					<!-- change 'tattoos'  'Tatt' -->
				<<elseif $pc.lip_size < $lipsPrefTmpMin or $pc.lip_size > $lipsPrefTmpMax and $lipsDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] tells you your lips are just not the right size.</p>
					<<if $pc.lip_size < $lipsPrefTmpMin>>
						<p>$tXec tells you that you should get lip injections.</p>
					<<else>>
						<p>$tXec tells you that you should have lip reduction.</p>
					<</if>>
					<!-- change 'lips'  'Lips' -->
				<<elseif $pc.tits < $titMin or $pc.tits > $titMax and $pc.titsDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] tells you your breasts are just not right.</p>
					<<if $pc.tits < $titMin>>
						<p>$tXec tells you that you should get breast implants.</p>
					<<else>>
						<p>$tXec tells you that you should have a breast reduction.</p>
					<</if>>
					<!-- change 'breasts'  'Tits' -->
				<<elseif $pc.salocatnow > $figurePrefMax and $figureDay <= $loverdays[$lover_number]>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					<p>$loverdesc[$lover_number] tells you your body is just too thick.</p>
					<p>$tXec offers to pay for you to get lyposuction.</p>
					<!-- change 'body weight'  'Figure' -->
				<<else>>
					<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
					"Erm... Nothing..."
					<<actCLA '"Well then..."'>>
						<<xgt 'lover_meet' 'actions'>>
					<</actCLA>>
				<</if>>
			<<elseif getvar("$randchan") == 1>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggests that you go to a cafe.</p>
				<<actCLA 'Sorry, but I need to leave'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'kafeM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'kafesvid'>>

					<</if>>
				<</actCLA>>
				$exit
			<<elseif getvar("$randchan") == 2>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggests that you go to a restaurant.</p>
				<<actCLA 'Sorry, but I need to leave'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'restoranM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'kafesvid'>>

					<</if>>
				<</actCLA>>
				$exit
			<<elseif getvar("$randchan") == 3>>
				<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
				<p>$loverdesc[$lover_number] suggests that you go to the movies.</p>
				<<actCLA 'Sorry, but I need to go'>>
					<<setinit $loverrelation[$lover_number] -= ($haraklover[$lover_number] + 1)>>
					<<gt 'homes_properties' 'go_home'>>
				<</actCLA>>
				<<actCLA 'Go with $tXem'>>
					<<if getvar("$loverGender["+$lover_number+"]") == 0>>
						<<gt 'kinoM' 'start'>>

					<</if>>
					<<if getvar("$loverGender["+$lover_number+"]") == 1>>
						<<set $telsob = '$loverdesc[$lover_number]'>> <<gt 'kinosvid'>>

					<</if>>
				<</actCLA>>
				$exit
			<</if>>
		<</if>>
	<</actCLA>>
	<<actCLA 'I want to do something today'>>
		<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
		<p>"What do you want to do?", $tXe asks</p>
		<<if getvar("$loverGender["+$lover_number+"]") == 0>>
			<<actCLA '"Let`s go just relax in the stairwell and drink some beer."'>>
				<<gt 'podezdM' 'start'>>
			<</actCLA>>
			<<actCLA '"Let`s take a walk in the park"'>>
				<<gt 'parkM' 'start'>>
			<</actCLA>>
			<<actCLA '"Let`s go see a movie"'>>
				<<gt 'kinoM' 'start'>>
			<</actCLA>>
			<<actCLA '"Let`s go to the cafe."'>>
				<<gt 'kafeM' 'start'>>
			<</actCLA>>
		<<elseif getvar("$loverGender["+$lover_number+"]") == 1>>
			<<set $telsob = '$loverdesc[$lover_number]'>>
			<<if $time.month > 5 and getvar("$temper") > 20 and getvar("$sunWeather") == 1>>
				<<actCLA 'Invite to the park'>>
					<<gt 'parksvid'>>
				<</actCLA>>
			<</if>>
			<<actCLA 'Invite to a movie'>>
				<<gt 'kinosvid'>>
			<</actCLA>>
			<<actCLA 'Invite to the pool hall'>>
				<<gt 'billsvid'>>
			<</actCLA>>
			<<actCLA 'Invite to the cafe'>>
				<<gt 'kafesvid'>>
			<</actCLA>>
			<<actCLA 'Invite to the casino'>>
				<<gt 'kazinosvid'>>
			<</actCLA>>
		<</if>>
		<<actCLA 'Never mind...'>>
			<<gt 'lover_meet' 'actions'>>
			$exit
		<</actCLA>>
	<</actCLA>>
	<<actCLA 'I think we should break up...'>>
		<<image `'characters/shared/headshots_generic/'+lover_picture[$lover_number]+'.jpg'`>>
		<p>$tXec looks hurt, but you insist it is for the best. You both say goodbye and part ways.</p>
		<<gs 'lover' 'remove' $lover_number>>
		<<actCLA 'Continue'>>
			<<gt 'homes_properties' 'go_home'>>
			$exit
		<</actCLA>>
	<</actCLA>>
<</if>>