use $fuckbuddy instead $lover

locations/booty_call.qsrc

@@ -5,7 +5,7 @@ if $ARGS[0] = 'draw':
 	! but I cannnot randomize the time because the probability is 100 % now
 	! I suppose that the routine will be modified later to take in account the lovers preferences
 	if booty_call['A0'] ! daystart :
-		$lover_drawn = $lover[rand(0,arrsize('$lover')-1)]
+		$lover_drawn = $fuckbuddy[rand(0,arrsize('$fuckbuddy')-1)]
 		gs 'booty_call_sms', 'start',$lover_drawn
 		gs 'booty_call_sms', 'Add SMS', $lover_drawn
 		booty_call['A0'] = daystart

locations/booty_call_start.qsrc

@@ -224,7 +224,7 @@ if $ARGS[0] = 'draw':
 	! but I cannnot randomize the time because the probability is 100 % now
 	! I suppose that the routine will be modified later to take in account the lovers preferences
 	if booty_call['A0'] ! daystart :
-		$lover_drawn = $lover[rand(0,arrsize('$lover')-1)]
+		$lover_drawn = $fuckbuddy[rand(0,arrsize('$fuckbuddy')-1)]
 		gs 'booty_call_sms', 'start',$lover_drawn
 		gs 'booty_call_sms', 'Add SMS', $lover_drawn
 		booty_call['A0'] = daystart

locations/hookup_after.qsrc

@@ -7,7 +7,7 @@ if $ARGS[0] = 'exit':
 	
 	if $clothingworntype = 'nude': gs'shortgs','dress'
 	if npc_QW[$npclastsaved] > 0:
-		gs'lover','add',$npclastsaved
+		gs'lover','add fuckbuddy',$npclastsaved
 		know_virgin[$npclastsaved] = hookup['virgin']
 	end
 	killvar 'hookup'

locations/hookup_morning.qsrc

@@ -282,7 +282,7 @@ if $ARGS[0] = 'mom':
 				*nl
 				'Hastily signing it, you grab your stuff and rush out the door, accidentally slamming it behind you along the way.'
 				
-				if npc_goal[$npclastsaved] = 1:gs'lover','add',$boy
+				if npc_goal[$npclastsaved] = 1:gs'lover','add fuckbuddy',$boy
 				
 				act'Leave':gs'hookup_after','exit'
 			end
@@ -299,7 +299,7 @@ if $ARGS[0] = 'mom':
 				*nl
 				'Hastily signing it, you grab your stuff and rush out the door, accidentally slamming it behind you along the way.'
 				
-				if npc_goal[$npclastsaved] > 1:gs'lover','add',$boy
+				if npc_goal[$npclastsaved] > 1:gs'lover','add fuckbuddy',$boy
 				
 				act'Leave':gs'hookup_after','exit'
 			end
@@ -329,7 +329,7 @@ if $ARGS[0] = 'mom':
 				*nl
 				'Hastily signing it, you leave it on his nightstand and grab your stuff before sneaking towards the door as quickly as possible, trying not to slam it behind you on your way out.'
 				
-				if npc_goal[$npclastsaved] = 1:gs'lover','add',$boy
+				if npc_goal[$npclastsaved] = 1:gs'lover','add fuckbuddy',$boy
 				
 				act'Leave':gs'hookup_after','exit'
 			end
@@ -346,7 +346,7 @@ if $ARGS[0] = 'mom':
 				*nl
 				'Hastily signing it, you leave it on his nightstand and grab your stuff before sneaking towards the door as quickly as possible, trying not to slam it behind you on your way out.'
 				
-				if npc_goal[$npclastsaved] > 1:gs'lover','add',$boy
+				if npc_goal[$npclastsaved] > 1:gs'lover','add fuckbuddy',$boy
 				
 				act'Leave':gs'hookup_after','exit'
 			end
@@ -377,7 +377,7 @@ if $ARGS[0] = 'mom':
 						'"Yeah, just like that," you say, finally finding it under the bed somehow.'
 						'"Sure, I''ll sleep with you again if you''re offering."'
 						'"Great!" You pull out a pen and frantically scribble your number down on a piece of paper you found while you were looking around. "Text me when you want to hook up!" you shout over your shoulder as you run out the door.'
-						gs'lover','add',$boy
+						gs'lover','add fuckbuddy',$boy
 					elseif rand(1,3) = 1:
 						'"Nah, this was a one time thing. I never fuck the same girl twice."'
 						'Despite the desperation of your situation, his comment gives you pause for a moment and you turn to give him a look. "Seriously?"'
@@ -402,7 +402,7 @@ if $ARGS[0] = 'mom':
 						'"Great!" Despite the desperation of your situation, you can''t help but smile at his words when you finally find your bag hiding underneath his bed. How did it get down there anyways?! You pull out a pen and frantically scribble your number down on a piece of paper you found earlier and rush towards the door.'
 						*nl
 						'"Call me sometime!" you shout over your shoulder as you slam it behind you.'
-						gs'lover','add',$boy
+						gs'lover','add fuckbuddy',$boy
 					elseif rand(1,3) = 1:
 						'"Nah, this was a one time thing. I never fuck the same girl twice."'
 						'Despite the desperation of your situation, his comment gives you pause for a moment and you turn to give him a look. "Seriously?"'

locations/lover.qsrc

@@ -133,4 +133,22 @@ if $ARGS[0] = 'remove':
 	pcs_lover -=1
 end
 
+if $ARGS[0] = 'add fuckbuddy':
+	if mid($ARGS[1],1,1) = 'C' :
+		gs 'npcpreservec', $ARGS[1]
+		gs 'boyStat', $npclastsaved
+	else
+		gs 'boyStat',$ARGS[1]
+	end
+	$fuckbuddy[] = $boy
+	gs 'telefon', 'AddContact', $boy, $npc_pic[$boy]
+end
+
+if $ARGS[0] = 'remove fuckbuddy':
+	gs 'telefon', 'DeleteContact', $ARGS[1]
+	killvar '$fuckbuddy', arrpos('$fuckbuddy',$ARGS[1])
+end
+
+
+
 --- lover ---------------------------------

locations/pav_residential.qsrc

@@ -192,15 +192,15 @@ if (hour > 20 or hour < 4) and succubusQW = 5 and suchuntday ! daystart:
 	end
 end
 
-if booty_call['A0'] = daystart:
+if booty_call['A0'] = daystart :
 	i=0
 	*nl
 	:loopBC
-	if booty_call[$lover[i]] = daystart and npc_residence[$lover[i]] = 1:   
-		dynamic(' ''<a href="exec: minut += 2 & gt ''''booty_call_start'''',''''start'''',''''<<$lover[i]>>'''' "><<$npc_firstname[$lover[i]]>>''''s</a> apartment is nearby.'' ')
+	if booty_call[$fuckbuddy[i]] = daystart and npc_residence[$fuckbuddy[i]] = 1 :
+		dynamic(' ''<a href="exec: minut += 2 & gt ''''booty_call_start'''',''''start'''',''''<<$fuckbuddy[i]>>'''' "><<$npc_firstname[$fuckbuddy[i]]>>''''s</a> apartment is nearby.'' ')
 	end
 	 i +=1
-	if i < arrsize('$lover') : jump 'loopBC'
+	if i < arrsize('$fuckbuddy') : jump 'loopBC'
 end
 
 !!Uncle Misha is npcstatic number 54

locations/stat.qsrc

@@ -1263,8 +1263,8 @@ end
 
 !!--------------------------Booty Call SMSs--------------------------------
 
-!! if (week=5 or week=6) and (hour >= 15 and hour < 19) and arrsize('$lover') > 0: gs 'booty_call','draw'
-if (hour >= 15 and hour <= 19) and arrsize('$lover') > 0: gs 'booty_call_start','draw'
+!! if (week=5 or week=6) and (hour >= 15 and hour < 19) and arrsize('$fuckbuddy') > 0 : gs 'booty_call','draw'
+if (hour >= 15 and hour <= 19) and arrsize('$fuckbuddy') > 0 : gs 'booty_call_start','draw'
 
 --- stat ---------------------------------