4 Commits f0ad1b196b ... 5c131ee50b

Auteur SHA1 Message Date
  anjuna krokus 5c131ee50b [added/fixed/changed] Added new content to the fuckbudy and sugar daddy stuff. An entirely new dialogue written by HornGuy (most of it is currently still not available in game, but the content is added in preparation). Added a new dialogue after declining a booty call (50% chance of triggering) where they will ask for a nudie :). Bug fixes to `SMS_selfies` (caught by debugging the new content). Changed some parts of the telefon selfie system that did not need to be dynamic code. il y a 3 semaines
  anjuna krokus a19f59b037 [changed] moved the SMS schedules to their dedicated file on BGK's request il y a 3 semaines
  anjuna krokus a7866ead93 Merge remote-tracking branch 'master/master' il y a 3 semaines
  anjuna krokus acdd28a784 [changed] moved the `SMS_selfies_popup` to `phone_selfies_popup`. Resulting file remains small (since its called often), but reduces the file count. il y a 3 semaines

+ 1 - 1
glife.qproj

@@ -246,7 +246,7 @@
 		<Location name="phone_selfies_popup"/>
 		<Location name="SMStext_builder"/>
 		<Location name="SMS_selfies"/>
-		<Location name="SMS_selfies_popup"/>
+		<Location name="SMS_schedules"/>
 	</Folder>
 	<Folder name="Prostitution">
 		<Location name="street_walker"/>

+ 27 - 0
locations/SMS_schedules.qsrc

@@ -0,0 +1,27 @@
+# SMS_schedules
+
+if $ARGS[0] = 'cikl':
+	if nerd_game['invite_day'] < daystart and week = 1:
+		if nerd_game['first_SMS_received'] = 0: if arrpos('$contact', 'A152') = -1: gs 'telefon', 'AddContact', 'A152', 'icon_na', 1
+		gs 'telefon', 'SetSMSSchedule', 'A152', "", "0", "gs 'nerd_game_night', 'game_invite_sms_switch'", "totminut > <<totminut + (11 - hour) * 60 + rand(20, 280) - minut>>"
+	end
+
+	if year = 2017 and month = 6 and gopnikbandQW['on_tour'] = 0:
+		gopnikbandQW['on_tour'] = 1
+		if npc_rel['A144'] >= 50 and arrpos('$contact', 'A144') < 0: gs 'telefon', 'AddContact', 'A144', 'icon_na', 1
+	elseif gopnikbandQW['on_tour'] = 1 and year = 2017 and month = 8 and day => 19:
+		gopnikbandQW['on_tour'] = 0
+	end
+
+	if gopnikbandQW['on_tour'] = 1 and npc_rel['A144'] >= 50 and anushkaQW['tour_SMS_send'] < daystart and anushkaQW['num_tour_SMS_send'] < 11:
+		if anushkaQW['num_tour_SMS_send'] <= 9 and week = 6:
+			gs 'telefon', 'SetSMSSchedule', 'A144', "", "0", "gs 'band_tour_anushka_SMS', 'start'", "totminut > <<totminut + (12 - hour) * 60 + rand(20, 100) - minut>>"
+
+		elseif anushkaQW['num_tour_SMS_send'] = 10 and week = 2:
+			gs 'telefon', 'SetSMSSchedule', 'A144', "", "0", "gs 'band_tour_anushka_SMS', 'start'", "totminut > <<totminut + (19 - hour) * 60 + rand(20, 100) - minut>>"
+		end
+	end
+end
+
+
+--- SMS_schedules ------------------------------------------

+ 256 - 14
locations/SMS_selfies.qsrc

@@ -54,6 +54,16 @@ if $ARGS[0] = 'exit':
 	gs 'telefon', 'show_sms', ARGS[1]
 end
 
+
+
+
+	!!===========================================================!!
+	!!                                                           !!
+	!!                     RETREIVE A SELFIE                     !!
+	!!                                                           !!
+	!!===========================================================!!
+
+
 ! $ARGS[1] = control string
 !  ARGS[2] = telefon['SMSid']
 ! $ARGS[3] -> onward = return string
@@ -82,8 +92,8 @@ if $ARGS[0] = 'selfie_menu':
 		temp_locationCnt += 1
 	if temp_locationCnt < arrsize('$selfieLoc'): jump 'LocationLoop'
 
-	$temp_SMS_selfietext += '<a href="exec: gs ''SMS_selfies'', ''exit''">Exit</a></td></tr></table>'
-	gs 'SMS_selfies', 'show_sms', ARGS[3]
+	$temp_SMS_selfietext += '<a href="exec: gs ''SMS_selfies'', ''exit'', <<ARGS[2]>>">Exit</a></td></tr></table>'
+	gs 'SMS_selfies', 'show_sms', ARGS[2]
 
 	killvar 'temp_locationCnt'
 	killvar '$temp_return_string'
@@ -113,10 +123,10 @@ if $ARGS[0] = 'showlocation':
 
 	gs 'SMS_selfies', 'listretrieve', ARGS[1], $selfieLoc[ARGS[1]], $ARGS[2], ARGS[3], $temp_return_string
 
-	$temp_SMS_selfietext += '<tr><td colspan=3><a href="exec: gs ''SMS_selfies'', ''selfie_menu'', ''<<$ARGS[2]>>'', ''<<ARGS[3]>>'', <<$temp_return_string>>">Go Back</a></td></tr>'
-	$temp_SMS_selfietext += '<tr><td colspan=3><a href="exec: gs ''SMS_selfies'', ''exit''">Exit</a></td></tr></table>'
+	$temp_SMS_selfietext += '<tr><td colspan=3><a href="exec: gs ''SMS_selfies'', ''selfie_menu'', ''<<$ARGS[2]>>'', <<ARGS[3]>>, <<$temp_return_string>>">Go Back</a></td></tr>'
+	$temp_SMS_selfietext += '<tr><td colspan=3><a href="exec: gs ''SMS_selfies'', ''exit'', <<ARGS[3]>>">Exit</a></td></tr></table>'
 
-	gs 'SMS_selfies', 'show_sms', ARGS[4]
+	gs 'SMS_selfies', 'show_sms', ARGS[3]
 
 	killvar '$temp_return_string'
 	killvar 'sms_s_i'
@@ -158,7 +168,7 @@ if $ARGS[0] = 'retrieve_clothed_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 3: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'clothed', ARGS[1], temp_clocnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'clothed', ARGS[1], temp_clocnt) + '</td>'
 			end
 			temp_clocnt += 1
 		if temp_clocnt <= selfieClotot[ARGS[1]]: jump 'temp_loop'
@@ -182,7 +192,7 @@ elseif $ARGS[0] = 'retrieve_swim_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'bikini', ARGS[1], temp_swicnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'bikini', ARGS[1], temp_swicnt) + '</td>'
 			end
 			temp_swicnt += 1
 		if temp_swicnt <= selfieClotot[ARGS[1]]: jump 'temp_loop1'
@@ -204,7 +214,7 @@ elseif $ARGS[0] = 'retrieve_underwear_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'underwear', ARGS[1], temp_undcnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'underwear', ARGS[1], temp_undcnt) + '</td>'
 			end
 			temp_undcnt += 1
 		if temp_undcnt <= selfieUndtot[ARGS[1]]: jump 'temp_loop2'
@@ -227,7 +237,7 @@ elseif $ARGS[0] = 'retrieve_nude_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'nude', ARGS[1], temp_nudcnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'nude', ARGS[1], temp_nudcnt) + '</td>'
 			end
 			temp_nudcnt += 1
 		if temp_nudcnt <= selfieNudtot[ARGS[1]]: jump 'temp_loop3'
@@ -250,7 +260,7 @@ elseif $ARGS[0] = 'retrieve_bath_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'bath', ARGS[1], temp_bathcnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'bath', ARGS[1], temp_bathcnt) + '</td>'
 			end
 			temp_bathcnt += 1
 		if temp_bathcnt <= selfieBathtot[ARGS[1]]: jump 'temp_loop4'
@@ -273,7 +283,7 @@ elseif $ARGS[0] = 'retrieve_shower_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'shower', ARGS[1], temp_showercnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'shower', ARGS[1], temp_showercnt) + '</td>'
 			end
 			temp_showercnt += 1
 		if temp_showercnt <= selfieShowertot[ARGS[1]]: jump 'temp_loop5'
@@ -296,7 +306,7 @@ elseif $ARGS[0] = 'retrieve_titflash_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'titflash', ARGS[1], temp_flashtitscnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'titflash', ARGS[1], temp_flashtitscnt) + '</td>'
 			end
 			temp_flashtitscnt += 1
 		if temp_flashtitscnt <= selfieTitflash[ARGS[1]]: jump 'temp_loop6'
@@ -319,7 +329,7 @@ elseif $ARGS[0] = 'retrieve_assflash_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'assflash', ARGS[1], temp_flashasscnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'assflash', ARGS[1], temp_flashasscnt) + '</td>'
 			end
 			temp_flashasscnt += 1
 		if temp_flashasscnt <= selfieAssflash[ARGS[1]]: jump 'temp_loop7'
@@ -342,7 +352,7 @@ elseif $ARGS[0] = 'retrieve_pussyflash_selfies':
 			if phone_locval = 1:
 				if temp_cnum = 2: $temp_SMS_selfietext += '</tr><tr>' & temp_cnum = 0
 				temp_cnum += 1
-				$temp_SMS_selfietext += '<td width="33%">' + func('SMS_selfies_popup', 'set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'pussyflash', ARGS[1], temp_flashpussycnt) + '</td>'
+				$temp_SMS_selfietext += '<td width="33%">' + func('phone_selfies_popup', 'SMS_set_selfie', $ARGS[3], ARGS[4], $ARGS[2], 'pussyflash', ARGS[1], temp_flashpussycnt) + '</td>'
 			end
 			temp_flashpussycnt += 1
 		if temp_flashpussycnt <= selfiePussyflash[ARGS[1]]: jump 'temp_loop8'
@@ -356,4 +366,236 @@ end
 
 
 
+
+	!!===========================================================!!
+	!!                                                           !!
+	!!                       TAKE A SELFIE                       !!
+	!!                                                           !!
+	!!===========================================================!!
+
+!{
+if $ARGS[0] = 'take_selfie_menu':
+	gs 'phone_selfies', 'Phone_selfie_totals'
+	if $locclass = 'bedr':
+		$phone_loc = 'bedroom'
+	elseif $locclass = 'kitr':
+		$phone_loc = 'kitchen'
+	elseif $locclass = 'livingr':
+		$phone_loc = 'livingroom'
+	elseif $locclass = 'changingroom':
+		$phone_loc = 'changingroom'
+	elseif $locclass = 'city_park':
+		$phone_loc = 'park'
+	elseif $locclass = 'locker':
+		$phone_loc = 'locker'
+	elseif $locclass = 'beach':
+		$phone_loc = 'beach'
+	elseif $locclass = 'classroom':
+		$phone_loc = 'classroom'
+	elseif $locclass = 'school_bathroom':
+		$phone_loc = 'school_bathroom'
+	elseif $locclass = 'restroom':
+		$phone_loc = 'restroom'
+	elseif $location_type = 'bathroom':
+		$phone_loc = 'bathroom'
+	else
+		$phone_loc = ''
+	end
+
+	!! Create the return string
+	$temp_return_string = ''
+	sms_s_n_args = arrsize('$ARGS')
+	sms_s_i = 3
+	:add_rest_ARGS_loop
+	if sms_s_i < sms_s_n_args:
+		$temp_return_string += '''<<$ARGS[sms_s_i]>>'', '
+		sms_s_i += 1
+		jump 'add_rest_ARGS_loop'
+	end
+	$temp_return_string = mid($temp_return_string, 1, len($temp_return_string)-2)
+
+
+	$temp_SMS_selfietext = '<table width=80%><th>Camera</th><tr><td>'
+	if $phone_loc ! '' or strpos($ARGS[1], 'c') > 0:
+		$temp_SMS_selfietext += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''SMS_selfies'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', '''', ''<<$ARGS[1]>>'', ARGS[2], <<$temp_return_string>>"><b>Take a selfie</b></a>'
+		$temp_SMS_selfietext += '</tr></td><tr><td>'
+	end
+	!! Flashing selfie
+	if $clothingworntype ! 'nude' and $phone_loc <> '':
+		if Enable_Android = 1:
+			locIndex = arrpos('$selfieLoc', $phone_loc, 1)
+		else
+			locIndex = arrpos(1, '$selfieLoc', $phone_loc)
+		end
+		if strpos($ARGS[1], 'ft') > 0 and (pcs_inhib >= 35 or exhibitionist_lvl > 0 or $phone_loc = 'bedroom') and selfieTitflash[locIndex] > 0:
+			$temp_SMS_selfietext += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''SMS_selfies'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', ''tits'', ''<<$ARGS[1]>>'', ARGS[2], <<$temp_return_string>> "><b>Flash your tits for a selfie</b></a><br>'
+			$temp_SMS_selfietext += '</tr></td><tr><td>'
+		end
+		if strpos($ARGS[1], 'fa') > 0 and (exhibitionist_lvl > 0 or $phone_loc = 'bedroom') and selfieAssflash[locIndex] > 0:
+			$temp_SMS_selfietext += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''SMS_selfies'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', ''ass'', ''<<$ARGS[1]>>'', ARGS[2], <<$temp_return_string>> "><b>Flash your ass for a selfie</b></a><br>'
+			$temp_SMS_selfietext += '</tr></td><tr><td>'
+		end
+		if strpos($ARGS[1], 'fp') > 0 and (exhibitionist_lvl > 1 or $phone_loc = 'bedroom') and selfiePussyflash[locIndex] > 0:
+			$temp_SMS_selfietext += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''SMS_selfies'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', ''pussy'', ''<<$ARGS[1]>>'', ARGS[2], <<$temp_return_string>> "><b>Flash your pussy for a selfie</b></a><br>'
+			$temp_SMS_selfietext += '</tr></td><tr><td>'
+		end
+	end
+
+	$temp_SMS_selfietext += '<a href="exec: gs ''SMS_selfies'', ''exit'', <<ARGS[2]>>">Exit</a></td></tr></table>'
+	gs 'SMS_selfies', 'show_sms', ARGS[3]
+end
+
+if $ARGS[0] = 'Phone_camera_selfie':
+	$temp_return_string = ''
+	sms_s_n_args = arrsize('$ARGS')
+	sms_s_i = 5
+	:add_rest_ARGS_loop2
+	if sms_s_i < sms_s_n_args:
+		$temp_return_string += '''<<$ARGS[sms_s_i]>>'', '
+		sms_s_i += 1
+		jump 'add_rest_ARGS_loop2'
+	end
+	$temp_return_string = mid($temp_return_string, 1, len($temp_return_string)-2)
+
+
+	if $ARGS[1] ! '':
+		if Enable_Android = 1:
+			temp_pos = arrpos('$selfieLoc', $ARGS[1], 1)
+		else
+			temp_pos = arrpos(1, '$selfieLoc', $ARGS[1])
+		end
+		dynamic 'gs ''SMS_selfies'', ''Phone_selfie_image'', ''<<$ARGS[1]>>'', ''<<$ARGS[2]>>'', <<temp_pos>>, ''<<$ARGS[3]>>'', <<ARGS[4]>>, <<$temp_return_string>>'
+		killvar 'temp_pos'
+	else
+		phone_rand = rand(1, selfieClotot[0])
+		dynamic '<<$selfieLoc[0]>>_closelfie[<<phone_rand>>] = 1'
+		gs 'stat'
+		$temp_imloc = 'images/pc/activities/phone/selfies/<<$selfieLoc[0]>>/clothed/<<$selfieFilePrefix[0]>><<phone_rand>>.jpg'
+		dynamic 'gs <<$temp_return_string>>, <<ARGS[4]>>, ''<<$temp_imloc>>'', ''<<$selfieLoc[0]>>'', ''clothed'', 0, <<phone_rand>>'
+		killvar 'phone_rand'
+		killvar 'temp_imloc'
+	end
+	!if cumsumbod-cumsumvag-cumsumass > 0: phone_rand = RAND (m,n) - for SELF in the semen
+	!if photo_event_pic = x: phone_rand = RAND (x,y) - for photos during the events (by heart)
+	!msg '<img src="images/system/phone/phone_selfie<<phone_rand>>.jpg">'
+end
+
+if $ARGS[0] = 'Phone_selfie_image':
+	$temp_return_string = ''
+	sms_s_n_args = arrsize('$ARGS')
+	sms_s_i = 6
+	:add_rest_ARGS_loop2
+	if sms_s_i < sms_s_n_args:
+		$temp_return_string += '''<<$ARGS[sms_s_i]>>'', '
+		sms_s_i += 1
+		jump 'add_rest_ARGS_loop2'
+	end
+	$temp_return_string = mid($temp_return_string, 1, len($temp_return_string)-2)
+
+
+	if $ARGS[2] = '':
+		if PCloswimwear = 1:
+			!!changing to and unmixed variable so the rng will work
+			
+			temp_swim = selfieSwimtot[ARGS[3]]
+			if temp_swim > 0:
+				phone_rand = rand(1, temp_swim)
+				!!Setting the image owned flag to 1
+				dynamic '<<$ARGS[1]>>_swim[<<phone_rand>>] = 1'
+				gs 'stat'
+				$temp_imloc = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/bikini/<<$selfieFilePrefix[ARGS[3]]>><<phone_rand>>.jpg'
+				dynamic 'gs <<$temp_return_string>>, <<ARGS[5]>>, ''<<$temp_imloc>>'', ''<<$ARGS[1]>>'', ''bikini'', <<ARGS[3]>>, <<phone_rand>>'
+				killvar 'phone_rand'
+				killvar 'temp_imloc'
+			end
+			killvar 'temp_swim'
+
+		elseif $clothingworntype ! 'nude':
+			!!changing to and unmixed variable so the rng will work
+			temp_clotot = selfieClotot[ARGS[3]]
+			if temp_clotot > 0:
+				phone_rand = rand(1, temp_clotot)
+				!!Setting the image owned flag to 1
+				dynamic '<<$ARGS[1]>>_closelfie[<<phone_rand>>] = 1'
+				gs 'stat'
+				$temp_imloc = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/clothed/<<$selfieFilePrefix[ARGS[3]]>><<phone_rand>>.jpg'
+				dynamic 'gs <<$temp_return_string>>, <<ARGS[5]>>, ''<<$temp_imloc>>'', ''<<$ARGS[1]>>'', ''clothed'', <<ARGS[3]>>, <<phone_rand>>'
+				killvar 'phone_rand'
+				killvar 'temp_imloc'
+			end
+			killvar 'temp_clotot'
+
+		elseif $pantyworntype ! 'none':
+			temp_undtot = selfieUndtot[ARGS[3]]
+			if temp_undtot > 0:
+				phone_rand = rand(1, temp_undtot)
+				dynamic '<<$ARGS[1]>>_undselfie[<<phone_rand>>] = 1'
+				gs 'stat'
+				$temp_imloc = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/underwear/<<$selfieFilePrefix[ARGS[3]]>><<phone_rand>>.jpg'
+				dynamic 'gs <<$temp_return_string>>, <<ARGS[5]>>, ''<<$temp_imloc>>'', ''<<$ARGS[1]>>'', ''underwear'', <<ARGS[3]>>, <<phone_rand>>'
+				killvar 'phone_rand'
+				killvar 'temp_imloc'
+			end
+			killvar 'temp_undtot'
+
+		else
+			temp_nudtot = selfieNudtot[ARGS[3]]
+			if temp_nudtot > 0:
+				phone_rand = rand(1, temp_nudtot)
+				dynamic '<<$ARGS[1]>>_nudselfie[<<phone_rand>>] = 1'
+				gs 'stat'
+				$temp_imloc = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/nude/<<$selfieFilePrefix[ARGS[3]]>><<phone_rand>>.jpg'
+				dynamic 'gs <<$temp_return_string>>, <<ARGS[5]>>, ''<<$temp_imloc>>'', ''<<$ARGS[1]>>'', ''nude'', <<ARGS[3]>>, <<phone_rand>>'
+				killvar 'phone_rand'
+				killvar 'temp_imloc'
+			end
+			killvar 'temp_nudtot'
+		end
+	else
+		if $ARGS[2] = 'tits':
+			temp_titflash = selfieTitflash[ARGS[3]]
+			if temp_titflash > 0:
+				phone_rand = rand(1, temp_titflash)
+				dynamic '<<$ARGS[1]>>_titflash[<<phone_rand>>] = 1'
+				gs 'stat'
+				$temp_imloc = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/titflash/<<$selfieFilePrefix[ARGS[3]]>><<phone_rand>>.jpg'
+				dynamic 'gs <<$temp_return_string>>, <<ARGS[5]>>, ''<<$temp_imloc>>'', ''<<$ARGS[1]>>'', ''titflash'', <<ARGS[3]>>, <<phone_rand>>'
+				killvar 'phone_rand'
+				killvar 'temp_imloc'
+			end
+			killvar 'temp_titflash'
+
+		elseif $ARGS[2] = 'ass':
+			temp_assflash = selfieAssflash[ARGS[3]]
+			if temp_assflash > 0:
+				phone_rand = rand(1, temp_assflash)
+				dynamic '<<$ARGS[1]>>_assflash[<<phone_rand>>] = 1'
+				gs 'stat'
+				if usePopUps = 1:
+					msg '<img src="images/pc/activities/phone/selfies/<<$ARGS[1]>>/assflash/<<phone_rand>>.jpg">'
+				else
+					view 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/assflash/<<phone_rand>>.jpg'
+				end
+			end
+		elseif $ARGS[2] = 'pussy':
+			if Enable_Android = 1:
+				temp_pussyflash = selfiePussyflash[arrpos('$selfieLoc', $ARGS[1], 1)]
+			else
+				temp_pussyflash = selfiePussyflash[arrpos(1, '$selfieLoc', $ARGS[1])]
+			end
+			if temp_pussyflash > 0:
+				phone_rand = rand(1, temp_pussyflash)
+				dynamic '<<$ARGS[1]>>_pussyflash[<<phone_rand>>] = 1'
+				gs 'stat'
+				if usePopUps = 1:
+					msg '<img src="images/pc/activities/phone/selfies/<<$ARGS[1]>>/pussyflash/<<phone_rand>>.jpg">'
+				else
+					view 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/pussyflash/<<phone_rand>>.jpg'
+				end
+			end
+		end
+	end
+end
+}
+
 --- SMS_selfies ---------------------------------

+ 0 - 21
locations/SMS_selfies_popup.qsrc

@@ -1,21 +0,0 @@
-# SMS_selfies_popup
-
-
-!	$ARGS[1] = Return string
-!	$ARGS[2] = telefon['SMSid']
-!!	$ARGS[3] = Location where the selfie is taken
-!!	$ARGS[4] = State of dress in the selfie
-!!	 ARGS[5] = is the index of the location in $selfieLoc[] and $selfieFilePrefix
-!!	 ARGS[6] = the selfie number
-if $ARGS[0] = 'set_selfie':
-	$temp_imloc = func('SMS_selfies_popup', 'get_imloc', $ARGS[3], $ARGS[4], ARGS[5], ARGS[6])
-	$result = '<a href="exec: gs <<$ARGS[1]>>, <<ARGS[2]>>, ''<<$temp_imloc>>'', ''<<$ARGS[3]>>'', ''<<$ARGS[4]>>'', <<ARGS[5]>>, <<ARGS[6]>>"><img src="<<$temp_imloc>>" style="horizontal-align:center; max-height:90%; max-width:90%"></a>'
-	killvar '$temp_imloc'
-end
-
-if $ARGS[0] = 'get_imloc':
-	$result = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg'
-end
-
-
---- SMS_selfies_popup ---------------------------------

+ 32 - 1
locations/SMStext_builder.qsrc

@@ -89,7 +89,7 @@
 !				gs 'SMStext_builder', 'show_sms', ARGS[2]
 !				wait 500
 !
-!				$ARGS[5] is the state of dress:
+!				!$ARGS[5] is the state of dress:
 !				if $ARGS[5] = 'clothed':
 !					gs 'SMStext_builder', 'receive', 'disapointing, but better than nothin i sup'
 !				elseif $ARGS[5] = 'nude' or $ARGS[5] = 'pussyflash':
@@ -321,5 +321,36 @@ if $ARGS[0] = 'send_selfie':
 end
 
 
+!!	Might add directly taking a selfie in the future.
+!{
+! $ARGS[1] = displayed text
+! $ARGS[2] = control string = 'c|sw|u|n|b|sh|ft|fa|fp'
+!		c: clothed | sw: swim | u: underwear
+!		n: nude | b: bath | sh: shower
+!		ft: flash tits | fa: flash ass | fp: flash pussy
+! $ARGS[3] -> onward = the return location.
+! gs 'SMStext_builder', 'take_selfie', 'Send a sexy selfie', 'c|b|ft', 'band_tour_anushka_SMS', 'Week8', 'Choice_a'
+if $ARGS[0] = 'take_selfie':
+	$temp_reply_str = '[Selfie] <a href="exec: gs ''SMS_selfies'', ''take_selfie_menu'', ''<<lcase($ARGS[2])>>'', telefon[''SMSid'']'
+
+	stb_n_args = arrsize('$ARGS')
+	stb_i = 3
+	:SMS_build_send_selfie_loop
+	if stb_i < stb_n_args:
+		$temp_reply_str += ', ''<<$ARGS[stb_i]>>'''
+		stb_i += 1
+		jump 'SMS_build_send_selfie_loop'
+	end
+
+	$temp_reply_str += '"><<$ARGS[1]>></a>'
+	$temp_SMSreplies[] = $temp_reply_str
+
+	killvar 'temp_reply_str'
+	killvar 'stb_i'
+	killvar 'stb_n_args'
+end
+}
+
+
 
 --- SMStext_builder ---------------------------------

+ 438 - 86
locations/booty_call_sms.qsrc

@@ -34,13 +34,25 @@ if $ARGS[0] = 'start':
 		gs 'booty_call_sms', 'Add SMS2', 'pre_planned_booty_call', $ARGS[1]
 	elseif sugar_daddy_call[$ARGS[1]] = 1:
 		gs 'booty_call_sms', 'Add SMS', 'sugar_daddy_booty_call', $ARGS[1]
+		!gs 'booty_call_sms', 'Add SMS3', 'new_booty_call_sms', $ARGS[1]
 	elseif npc_std_test[$ARGS[1]] = 1:
 		gs 'booty_call_sms', 'Add SMS', 'std_free', $ARGS[1]
 	else
 		gs 'booty_call_sms', 'Add SMS', 'default_booty_call', $ARGS[1]
+		!gs 'booty_call_sms', 'Add SMS3', 'new_booty_call_sms', $ARGS[1]
 	end
 end
 
+
+
+
+	!!===============================================================!!
+	!!                                                               !!
+	!!                            SMSTREE                            !!
+	!!                                                               !!
+	!!===============================================================!!
+
+
 if $ARGS[0] = 'default_booty_call':
 !!	Structure:
 !!		0: boy
@@ -370,6 +382,197 @@ if $ARGS[0] = 'sugar_daddy_booty_call':
 end
 
 
+if $ARGS[0] = 'new_booty_call_sms':
+!!	Structure:
+!!		0: boy
+!!			1: player
+!!				2: player
+!!					3: player
+!!
+!!
+
+
+	!!==============   PART 1   ==============!!
+
+	$SMSTree['0'] = 'hey <<$pcs_nickname>>'
+		$SMSTree['1'] = 'hey <<$npc_nickname[$ARGS[1]]>>'
+			$SMSTree['a2'] = 'what''s up?'
+			$SMSTree['b2'] = 'hey sexy'
+
+			!! hour > 20 or hour < 4
+			$SMSTree['c2'] = 'its late. but ive always got time for you :)'
+			$SMSTree['d2'] = 'its late. what do you want?'
+			$SMSTree['e2'] = 'its late. text me earlier next time.'
+
+			!! hour - message_received_hour >= 3
+			$SMSTree['f2'] = 'sorry'
+				$SMSTree['fa3'] = 'didn''t see your message until now'
+					$SMSTree['fa4'] = 'whatsup?'
+				$SMSTree['fb3'] = 'i was doing something'
+					$SMSTree['fb4'] = $SMSTree['fa3']
+				$SMSTree['fc3'] = 'i was at the gym'
+					$SMSTree['fc4'] = $SMSTree['fa3']
+				$SMSTree['fd3'] = 'i was in class'
+					$SMSTree['fd4'] = $SMSTree['fa3']
+
+
+	!!==============   PART 2   ==============!!
+
+	if 0:
+		! Date invite
+
+	elseif npc_rel_type[$ARGS[1]] = 'sugar_daddy':
+		$SMSTree['10'] = 'i want to see you'
+			$SMSTree['11'] = 'ive booked a hotel room'
+
+	elseif npc_rel_type[$ARGS[1]] = 'casual_date' or npc_rel_type[$ARGS[2]] = 'fuckbuddy':
+		$SMSTree['10'] = 'ive been thinking about you'
+				!! player response 1 option 1
+			$SMSTree['a11'] = 'what were you thinking about?'
+					!! boy response 1
+				if npc_finance[$ARGS[1]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[1]] >= 3:
+					$SMSTree['a12'] = 'i booked a hotel room in Pav. why dont you come by?'
+				else
+					if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0, 2) = 0:
+						$SMSTree['a12'] = 'your mouth around my cock'
+					elseif npc_know_virgin[$ARGS[1]] ! 1:
+						if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'your pussy filled with my cum'
+						elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'fucking you bowlegged'
+						elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'your pretty face covered in my cum'
+						elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'watching you swallow my cum'
+						elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'my cum all over your tits'
+						elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'pounding you on all fours'
+						elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0, 2) = 0:
+							$SMSTree['a12'] = 'you riding my cock like crazy'
+						else
+							if rand(0, 1) = 0:
+								$SMSTree['a12'] = 'you naked on my bed'
+							else
+								$SMSTree['a12'] = 'want to come over and have some fun?'
+							end
+						end
+					end
+				end
+
+				!! player response 1 option 2
+			$SMSTree['b11'] = 'me too'
+					!! boy response 2
+				if npc_finance[$ARGS[1]] = 2 and func('homes_properties_attr', 'get_property_attribute', '$town', $home['current']) ! 'city' and npc_residence[$ARGS[1]] >= 3: 
+					$SMSTree['b12'] = 'i booked a hotel room in Pav. why dont you come by?'
+				else
+					if $npc_fav_pos[$ARGS[1]] = 'blowjob' and rand(0, 2) = 0:
+						$SMSTree['b12'] = 'i want to feel your mouth around my cock'
+					elseif npc_know_virgin[$ARGS[1]] ! 1:
+						if $npc_cum_pref[$ARGS[1]] = 'creampie' and (npc_condom_conscious[$ARGS[1]] = 0 or npc_bareback[$ARGS[1]] = 1) and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'i want to pump you full of cum'
+						elseif npc_sex_speed[$ARGS[1]] = 3 and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'come over i want to hear you screaming my name'
+						elseif $npc_cum_pref[$ARGS[1]] = 'facial' and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'i want to cum all over your face'
+						elseif $npc_cum_pref[$ARGS[1]] = 'mouth' and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'i want to watch you swallow my cum'
+						elseif $npc_cum_pref[$ARGS[1]] = 'tits' and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'let me glaze your tits with my cum'
+						elseif $npc_fav_pos[$ARGS[1]] = 'doggy' and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'i want to pound you on all fours'
+						elseif $npc_fav_pos[$ARGS[1]] = 'cowgirl' and rand(0, 2) = 0:
+							$SMSTree['b12'] = 'i want you to ride my cock like theres no tomorrow'
+						else
+							if rand(0, 1) = 0:
+								$SMSTree['b12'] = 'lets fuck like bunnies today'
+							else
+							end
+						end
+					end
+				end
+
+	elseif npc_rel_type[$ARGS[1]] = 'boyfriend' or npc_rel_type[$ARGS[2]] = 'girlfriend' or npc_rel_type[$ARGS[2]] = 'husband' or npc_rel_type[$ARGS[2]] = 'wife':
+		if 0:
+			!living with husband/wife
+		else
+			if npc_dirty_lover[$ARGS[1]] = 1:
+				$SMSTree['a10'] = 'come over'
+					$SMSTree['a11'] = 'i want to fuck you senseless'
+			elseif npc_snesual_lover[$ARGS[1]] = 1:
+				$SMSTree['a10'] = 'i want to see you'
+					$SMSTree['a11'] = 'lets make love'
+			else
+				$SMSTree['a10'] = 'you should come over'
+					$SMSTree['a11'] = 'lets get naughty'
+			end
+		end
+	end
+
+
+
+	!!==============   PART 3   ==============!!
+
+	!! Final Choice
+			!! player response 2 option 1
+	if hour < 21:
+		$SMSTree['a20'] = 'sorry, i cant. i have stuff to do'
+	else
+		$SMSTree['a20'] = 'its late. text me sooner if you want me to come over.'
+	end
+				!! boy response 2 option 1
+			$SMSTree['a21'] = 'shit, maybe next time then'
+
+			!! player response 2 option 2
+		$SMSTree['b20'] = 'ill come right now ;)'
+				!! boy response 2 option 1
+			if npc_humor[$ARGS[1]] <= 1 and rand(0, 1) = 0:
+				$SMSTRee['b21'] = 'im already hard'
+			elseif npc_humor[$ARGS[1]] = 2 and rand(0, 1) = 0:
+				if rand(0, 1) = 0:
+					$SMSTRee['b21'] = 'in the street?? damn! keep it in your pants till you get here!'
+				else
+					$SMSTRee['b21'] = 'as long as you make me cum later'
+				end
+			elseif npc_humor[$ARGS[1]] = 3 and rand(0, 1) = 0:
+				$SMSTRee['b21'] = 'phrasing'
+			else
+				$SMSTRee['b21'] = 'cant wait'
+			end
+	
+	$SMSTree['c20'] = 'its kind of late'
+		$SMSTree['c21'] = 'sorry'
+			$SMSTree['c22'] = 'maybe another time?'
+end
+
+if $ARGS[0] = 'new_sexting':
+	$SMSTree['0'] = 'send me a pic then?'
+		$SMSTree['a1'] = 'refuse'
+			$SMSTree['a2'] = 'no'
+		$SMSTree['b1'] = 'next time tiger'
+		$SMSTree['c1'] = 'im not at home!'
+			if npc_dirty_lover[$ARGS[1]] = 1:
+				if rand(0, 1) = 0:
+					$SMSTree['c2'] = 'hot'
+				else
+					$SMSTree['c2'] = 'so?'
+				end
+			else
+				$SMSTree['c2'] = 'ill use my imagination then'
+			end
+		$SMSTree['s1'] = 'Send a selfie from your gallery'
+end
+
+
+
+
+	!!===============================================================!!
+	!!                                                               !!
+	!!                           BUILD SMS                           !!
+	!!                                                               !!
+	!!===============================================================!!
+
+
 !Does not work with pre-planned?
 if $ARGS[0] = 'Add SMS':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
@@ -387,178 +590,252 @@ if $ARGS[0] = 'SMS_Base':
 	gs 'SMStext_builder', 'start'
 		gs 'SMStext_builder', 'send', $SMSTree['1']
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
+
 		wait 500
 
 		gs 'SMStext_builder', 'receive', $SMSTree['2']
-		gs 'SMStext_builder', 'add_reply', $SMSTree['a3'], 'booty_call_sms', 'Choice_a', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'add_reply', $SMSTree['b3'], 'booty_call_sms', 'Choice_b', $ARGS[1], $ARGS[2]
+		gs 'SMStext_builder', 'add_reply', $SMSTree['a3'], 'booty_call_sms', 'bc_choice1', $ARGS[1], $ARGS[2], 'a'
+		gs 'SMStext_builder', 'add_reply', $SMSTree['b3'], 'booty_call_sms', 'bc_choice1', $ARGS[1], $ARGS[2], 'b'
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
 	gs 'SMStext_builder', 'end'
 end
 
-
-if $ARGS[0] = 'Choice_a':
+if $ARGS[0] = 'bc_choice1':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['a3']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3] + '3']
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
+
 		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['a4']
-		gs 'SMStext_builder', 'add_reply', $SMSTree['aa5'], 'booty_call_sms', 'Choice_aa', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'add_reply', $SMSTree['ab5'], 'booty_call_sms', 'Choice_ab', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[3] + '4']
+		gs 'SMStext_builder', 'add_reply', $SMSTree[$ARGS[3] + 'a5'], 'booty_call_sms', 'bc_choice2', $ARGS[1], $ARGS[2], $ARGS[3] + 'a', 'decline_booty_call'
+		gs 'SMStext_builder', 'add_reply', $SMSTree[$ARGS[3] + 'b5'], 'booty_call_sms', 'bc_choice2', $ARGS[1], $ARGS[2], $ARGS[3] + 'b', 'accept_booty_call'
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
 	gs 'SMStext_builder', 'end'
 
-
-elseif $ARGS[0] = 'Choice_aa':
-	!! booty call is declined
-
+elseif $ARGS[0] = 'bc_choice2':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['aa5']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3] + '5']
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
+
 		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['aa6']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[3] + '6']
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
 	gs 'SMStext_builder', 'end'
 
-	gs 'booty_call_sms', 'decline_booty_call', $ARGS[2]
+	gs 'booty_call_sms', $ARGS[4], $ARGS[2], ARGS[5]
+end
 
-elseif $ARGS[0] = 'Choice_ab':
-	!! booty call is accepted
 
-	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
-	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['ab5']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
 
-		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['ab6']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
-	gs 'SMStext_builder', 'end'
 
-	gs 'booty_call_sms', 'accept_booty_call', $ARGS[2]
+! For pre-planned
+if $ARGS[0] = 'Add SMS2':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'receive', $SMSTree['0']
+		gs 'SMStext_builder', 'add_reply', $SMSTree['a1'], 'booty_call_sms', 'Choice2_a', $ARGS[1], $ARGS[2]
+		gs 'SMStext_builder', 'add_reply', $SMSTree['b1'], 'booty_call_sms', 'Choice2_b', $ARGS[1], $ARGS[2]
+		gs 'SMStext_builder', 'add_sms', $ARGS[2]
+	gs 'SMStext_builder', 'end'
 end
 
 
-
-if $ARGS[0] = 'Choice_b':
+if $ARGS[0] = 'Choice2_a':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['b3']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
-		wait 500
-
-		gs 'SMStext_builder', 'receive', $SMSTree['b4']
-		gs 'SMStext_builder', 'add_reply', $SMSTree['ba5'], 'booty_call_sms', 'Choice_ba', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'add_reply', $SMSTree['bb5'], 'booty_call_sms', 'Choice_bb', $ARGS[1], $ARGS[2]
+		gs 'SMStext_builder', 'send', $SMSTree['a1']
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
 	gs 'SMStext_builder', 'end'
+end
 
 
-elseif $ARGS[0] = 'Choice_ba':
-	!! booty call is declined
 
+if $ARGS[0] = 'Choice2_b':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['ba5']
+		gs 'SMStext_builder', 'send', $SMSTree['b1']
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
+
 		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['ba6']
+		gs 'SMStext_builder', 'receive', $SMSTree['b2']
+		gs 'SMStext_builder', 'add_reply', $SMSTree['ba3'], 'booty_call_sms', 'Choice2_ba', $ARGS[1], $ARGS[2], 'ba', 'decline_booty_call'
+		gs 'SMStext_builder', 'add_reply', $SMSTree['bb3'], 'booty_call_sms', 'Choice2_bb', $ARGS[1], $ARGS[2], 'bb', 'accept_booty_call'
 		gs 'SMStext_builder', 'show_sms', ARGS[3]
 	gs 'SMStext_builder', 'end'
 
-	gs 'booty_call_sms', 'decline_booty_call', $ARGS[2]
-
-elseif $ARGS[0] = 'Choice_bb':
-	!! booty call is accepted
+elseif $ARGS[0] = 'Choice2_b2':
+	!! booty call is declined
 
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['bb5']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3] + '3']
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
+
 		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['bb6']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[3] + '4']
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
 	gs 'SMStext_builder', 'end'
 
-	gs 'booty_call_sms', 'accept_booty_call', $ARGS[2]
+	gs 'booty_call_sms', $ARGS[4], $ARGS[2], ARGS[5]
 end
 
 
 
 
-! For pre-planned
-if $ARGS[0] = 'Add SMS2':
+	!!=====================================================================!!
+	!!                                                                     !!
+	!!                           NEW BOOTY CALLS                           !!
+	!!                                                                     !!
+	!!=====================================================================!!
+
+
+if $ARGS[0] = 'Add SMS3':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
 		gs 'SMStext_builder', 'receive', $SMSTree['0']
-		gs 'SMStext_builder', 'add_reply', $SMSTree['a1'], 'booty_call_sms', 'Choice2_a', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'add_reply', $SMSTree['b1'], 'booty_call_sms', 'Choice2_b', $ARGS[1], $ARGS[2]
+		gs 'SMStext_buider', 'add_reply', $SMSTree['1'], 'booty_call_sms', 'new_routing1', $ARGS[1], $ARGS[2], '<<totminut>>'
 		gs 'SMStext_builder', 'add_sms', $ARGS[2]
 	gs 'SMStext_builder', 'end'
 end
 
-
-if $ARGS[0] = 'Choice2_a':
+if $ARGS[0] = 'new_routing1':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['a1']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'send', $SMSTree['1']
+		if totminut >= ARGS[3] + 180:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['f2'], 'booty_call_sms', 'new_delayed', '1', $ARGS[1], $ARGS[2]
+		elseif hour > 20 or hour < 4:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['c2'], 'booty_call_sms', 'new_routing2', $ARGS[1], $ARGS[2], 'c2', 'npc_rel[''<<$ARGS[2]>>''] += 2'
+			gs 'SMStext_builder', 'add_reply', $SMSTree['d2'], 'booty_call_sms', 'new_routing2', $ARGS[1], $ARGS[2], 'd2', 'npc_rel[''<<$ARGS[2]>>''] -= 2'
+			gs 'SMStext_builder', 'add_reply', $SMSTree['e2'], 'booty_call_sms', 'end', $ARGS[1], $ARGS[2], 'e2', 'decline_booty_call', ''
+		else
+			gs 'SMStext_builder', 'add_reply', $SMSTree['a2'], 'booty_call_sms', 'new_routing2', $ARGS[1], $ARGS[2], 'a2', ''
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b2'], 'booty_call_sms', 'new_routing2', $ARGS[1], $ARGS[2], 'b2', ''
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
 	gs 'SMStext_builder', 'end'
 end
 
+if $ARGS[0] = 'new_delayed1':
+	gs 'booty_call_sms', $ARGS[2], $ARGS[3]
+	gs 'SMStext_builder', 'start'
+		if $ARGS[1] = '1':
+			gs 'SMStext_builder', 'send', $SMSTree['f2']
+			gs 'SMStext_builder', 'add_reply', $SMSTree['f3'], 'booty_call_sms', 'new_delayed1', '2', $ARGS[2], $ARGS[3]
+		elseif $ARGS[2] = '2':
+			gs 'SMStext_builder', 'send', $SMSTree['f3']
+			gs 'SMStext_builder', 'add_reply', $SMSTree['fa4'], 'booty_call_sms', 'new_routing2', $ARGS[2], $ARGS[3], 'fa4', ''
+			gs 'SMStext_builder', 'add_reply', $SMSTree['fb4'], 'booty_call_sms', 'new_routing2', $ARGS[2], $ARGS[3], 'fb4', ''
+			gs 'SMStext_builder', 'add_reply', $SMSTree['fc4'], 'booty_call_sms', 'new_routing2', $ARGS[2], $ARGS[3], 'fc4', ''
+			gs 'SMStext_builder', 'add_reply', $SMSTree['fd4'], 'booty_call_sms', 'new_routing2', $ARGS[2], $ARGS[3], 'fd4', ''
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
+	gs 'SMStext_builder', 'end'
+end
 
-
-if $ARGS[0] = 'Choice2_b':
+if $ARGS[0] = 'new_routing2':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	dynamic $ARGS[4]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['b1']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
-		wait 500
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3]]
+
+		if 0:
+			! Date invite
+			gs 'SMStext_builder', 'receive', $SMSTree['10']
+			gs 'SMStext_builder', 'receive', $SMSTree['11']
+			gs 'SMStext_builder', 'add_reply', $SMSTree['a20'], 'booty_call_sms', 'new_routing3', $ARGS[1], $ARGS[2], 'a', 'decline_booty_call', 'npc_rel[''<<$ARGS[2]>>''] -= 2'
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b20'], 'booty_call_sms', 'new_routing3', $ARGS[1], $ARGS[2], 'b', 'accept_booty_call', ''
+			if hour > 20 or hour <= 4: gs 'SMStext_builder', 'add_reply', $SMSTree['c20'], 'booty_call_sms', 'late_apology', '1', $ARGS[1], $ARGS[2], 'c20'
+
+		elseif npc_rel_type[$ARGS[1]] = 'sugar_daddy':
+			gs 'SMStext_builder', 'receive', $SMSTree['10']
+			gs 'SMStext_builder', 'receive', $SMSTree['11']
+			gs 'SMStext_builder', 'add_reply', $SMSTree['a20'], 'booty_call_sms', 'new_routing3', $ARGS[1], $ARGS[2], 'a', 'decline_booty_call', 'npc_rel[''<<$ARGS[2]>>''] -= 2'
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b20'], 'booty_call_sms', 'new_routing3', $ARGS[1], $ARGS[2], 'b', 'accept_booty_call', ''
+			if hour > 20 or hour <= 4: gs 'SMStext_builder', 'add_reply', $SMSTree['c20'], 'booty_call_sms', 'late_apology', '1', $ARGS[1], $ARGS[2], 'c20'
+
+		elseif npc_rel_type[$ARGS[1]] = 'casual_date' or npc_rel_type[$ARGS[2]] = 'fuckbuddy':
+			gs 'SMStext_builder', 'receive', $SMSTree['10']
+			gs 'SMStext_builder', 'add_reply', $SMSTree['a11'], 'booty_call_sms', 'new_bootycall1', $ARGS[1], $ARGS[2], 'a'
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b11'], 'booty_call_sms', 'new_bootycall1', $ARGS[1], $ARGS[2], 'b'
+
+		elseif npc_rel_type[$ARGS[1]] = 'boyfriend' or npc_rel_type[$ARGS[2]] = 'girlfriend' or npc_rel_type[$ARGS[2]] = 'husband' or npc_rel_type[$ARGS[2]] = 'wife':
+			if 0:
+				!living with husband/wife
+			else
 
-		gs 'SMStext_builder', 'receive', $SMSTree['b2']
-		gs 'SMStext_builder', 'add_reply', $SMSTree['ba3'], 'booty_call_sms', 'Choice2_ba', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'add_reply', $SMSTree['bb3'], 'booty_call_sms', 'Choice2_bb', $ARGS[1], $ARGS[2]
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+			end
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
 	gs 'SMStext_builder', 'end'
+end
 
+if $ARGS[0] = 'new_bootycall1':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3] + '11']
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
 
-elseif $ARGS[0] = 'Choice2_ba':
-	!! booty call is declined
+		wait 500
 
-	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[3] + '12']
+		gs 'SMStext_builder', 'add_reply', $SMSTree['a20'], 'booty_call_sms', 'new_routing3', $ARGS[1], $ARGS[2], 'a', 'decline_booty_call', ''
+		gs 'SMStext_builder', 'add_reply', $SMSTree['b20'], 'booty_call_sms', 'new_routing3', $ARGS[1], $ARGS[2], 'b', 'accept_booty_call', ''
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
+	gs 'SMStext_builder', 'end'
+end
+
+if $ARGS[0] = 'late apology':
+	gs 'booty_call_sms', $ARGS[2], $ARGS[3]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['ba3']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[4]]
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
+
 		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['ba4']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		if $ARGS[1] = '1':
+			gs 'SMStext_builder', 'add_reply', $SMSTree['c22'], 'booty_call_sms', 'late_apology', '2', $ARGS[2], $ARGS[3], 'c22'
+		elseif $ARGS[1] = '2':
+			gs 'SMStext_builder', 'add_reply', $SMSTree['c23'], 'booty_call_sms', 'new_routing3', $ARGS[2], $ARGS[3], 'c23'
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[5]
 	gs 'SMStext_builder', 'end'
+end
 
-	gs 'booty_call_sms', 'decline_booty_call', $ARGS[2]
 
-elseif $ARGS[0] = 'Choice2_bb':
-	!! booty call is accepted
 
+if $ARGS[0] = 'new_routing3':
 	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
-
+	dynamic $ARGS[5]
 	gs 'SMStext_builder', 'start'
-		gs 'SMStext_builder', 'send', $SMSTree['bb3']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3] + '20']
+		gs 'SMStext_builder', 'show_sms', ARGS[6]
+
 		wait 500
 
-		gs 'SMStext_builder', 'receive', $SMSTree['bb4']
-		gs 'SMStext_builder', 'show_sms', ARGS[3]
+		gs 'SMStext_builder', 'receive', $SMSTree[$ARGS[3] + '21']
+		gs 'SMStext_builder', 'show_sms', ARGS[6]
 	gs 'SMStext_builder', 'end'
+	gs 'booty_call_sms', $ARGS[4], $ARGS[2], ARGS[6]
+end
+
 
-	gs 'booty_call_sms', 'accept_booty_call', $ARGS[2]
+
+if $ARGS[0] = 'end':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	dynamic $ARGS[5]
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree[$ARGS[3]]
+		gs 'SMStext_builder', 'show_sms', ARGS[6]
+	gs 'SMStext_builder', 'end'
+	gs 'booty_call_sms', $ARGS[4], $ARGS[2], ARGS[6]
 end
 
 
@@ -579,10 +856,85 @@ elseif $ARGS[0] = 'decline_booty_call':
 		npc_rel[$ARGS[1]] -= 2
 		sugar_daddy_call[$ARGS[1]] = 0
 	end
+
+	if rand(0, 1) = 0: gs 'booty_call_sms', 'sexting1', 'new_sexting', $ARGS[1], ARGS[2]
+end
+
+
+if $ARGS[0] = 'sexting1':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'receive', $SMSTree['0']
+		gs 'SMStext_builder', 'add_reply', $SMSTree['a1'], 'booty_call_sms', 'sexting_refuse', $ARGS[1], $ARGS[2], 'refuse'
+		gs 'SMStext_builder', 'add_reply', $SMSTree['b1'], 'booty_call_sms', 'sexting_refuse', $ARGS[1], $ARGS[2], 'next'
+		if strpos($location_type, 'outdoors') > 0 or strpos($location_type, 'public') > 0:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['c1'], 'booty_call_sms', 'sexting_public', $ARGS[1], $ARGS[2]
+		end
+		gs 'SMStext_builder', 'send_selfie', $SMSTree['s1'], 'n|b|sh|ft|fa|fp', 'booty_call_sms', 'sexting_send', $ARGS[1], $ARGS[2]
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+	gs 'SMStext_builder', 'end'
 end
 
+if $ARGS[0] = 'sexting_not_at_home':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send', $SMSTree['c1']
+		gs 'SMStext_builder', 'show_sms', ARGS[2]
+
+		wait 500
+
+		gs 'SMStext_builder', 'receive', $SMSTree['c2']
+
+		if npc_dirty_lover[$ARGS[1]] = 1:
+			gs 'SMStext_builder', 'add_reply', $SMSTree['a1'], 'booty_call_sms', 'sexting_refuse', $ARGS[1], $ARGS[2], 'refuse'
+			gs 'SMStext_builder', 'add_reply', $SMSTree['b1'], 'booty_call_sms', 'sexting_refuse', $ARGS[1], $ARGS[2], 'next'
+			gs 'SMStext_builder', 'send_selfie', $SMSTree['s1'], 'n|b|sh|ft|fa|fp', 'booty_call_sms', 'sexting_send', $ARGS[1], $ARGS[2]
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+	gs 'SMStext_builder', 'end'
+end
+
+if $ARGS[0] = 'sexting_refuse':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	gs 'SMStext_builder', 'start'
+		if $ARGS[3] = 'refuse':
+			gs 'SMStext_builder', 'send', $SMSTree['a2']
+			npc_rel[$ARGS[1]] -= 1
+		else
+			gs 'SMStext_builder', 'send', $SMSTree['b1']
+		end
+		gs 'SMStext_builder', 'show_sms', ARGS[4]
+	gs 'SMStext_builder', 'end'
+end
+
+
+if $ARGS[0] = 'sexting_send':
+	gs 'booty_call_sms', $ARGS[1], $ARGS[2]
+	gs 'SMStext_builder', 'start'
+		gs 'SMStext_builder', 'send_img', $ARGS[4]
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+
+		wait 500
+
+		gs 'SMStext_builder', 'receive', 'damn!!'
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+
+		wait 500
+		gs 'SMStext_builder', 'send', ':)'
+		! Add responses based on the result??
+		!{
+		if $ARGS[5] = 'clothed':
+		elseif $ARGS[5] = 'nude' or $ARGS[5] = 'pussyflash':
+		end
+		}
+		gs 'SMStext_builder', 'show_sms', ARGS[3]
+	gs 'SMStext_builder', 'end'
+end
+
+
+
 
-if $ARGS[0] ! 'default_booty_call' and $ARGS[0] ! 'pre_planned_booty_call' and $ARGS[0] ! 'std_free' and $ARGS[0] ! 'sugar_daddy_booty_call':
+if $ARGS[0] ! 'default_booty_call' and $ARGS[0] ! 'pre_planned_booty_call' and $ARGS[0] ! 'std_free' and $ARGS[0] ! 'sugar_daddy_booty_call' and $ARGS[0] ! 'new_booty_call' and $ARGS[0] ! 'new_sexting':
 	killvar '$SMSTree'
 end
 

+ 1 - 31
locations/cikl.qsrc

@@ -960,37 +960,7 @@ end
 	!!                                                                    !!
 	!!====================================================================!!
 
-
-!{
-!! Anushka''s band is on tour from Thursday 01-06 until Saturday 19-08. Blame Nutluck
-if year = 2017 and ( month = 6 or month = 7 or (month = 8 and day < 19) ):
-	gopnikbandQW['on_tour'] = 1
-else
-	gopnikbandQW['on_tour'] = 0
-end
-}
-
-if nerd_game['invite_day'] < daystart and week = 1:
-	if nerd_game['first_SMS_received'] = 0: if arrpos('$contact', 'A152') = -1: gs 'telefon', 'AddContact', 'A152', 'icon_na', 1
-	gs 'telefon', 'SetSMSSchedule', 'A152', "", "0", "gs 'nerd_game_night', 'game_invite_sms_switch'", "totminut > <<totminut + (11 - hour) * 60 + rand(20, 280) - minut>>"
-end
-
-
-if year = 2017 and month = 6 and gopnikbandQW['on_tour'] = 0:
-	gopnikbandQW['on_tour'] = 1
-	if npc_rel['A144'] >= 50 and arrpos('$contact', 'A144') < 0: gs 'telefon', 'AddContact', 'A144', 'icon_na', 1
-elseif gopnikbandQW['on_tour'] = 1 and year = 2017 and month = 8 and day => 19:
-	gopnikbandQW['on_tour'] = 0
-end
-
-if gopnikbandQW['on_tour'] = 1 and npc_rel['A144'] >= 50 and anushkaQW['tour_SMS_send'] < daystart and anushkaQW['num_tour_SMS_send'] < 11:
-	if anushkaQW['num_tour_SMS_send'] <= 9 and week = 6:
-		gs 'telefon', 'SetSMSSchedule', 'A144', "", "0", "gs 'band_tour_anushka_SMS', 'start'", "totminut > <<totminut + (12 - hour) * 60 + rand(20, 100) - minut>>"
-
-	elseif anushkaQW['num_tour_SMS_send'] = 10 and week = 2:
-		gs 'telefon', 'SetSMSSchedule', 'A144', "", "0", "gs 'band_tour_anushka_SMS', 'start'", "totminut > <<totminut + (19 - hour) * 60 + rand(20, 100) - minut>>"
-	end
-end
+gs 'SMS_schedules', 'cikl'
 
 
 

+ 19 - 0
locations/phone_selfies_popup.qsrc

@@ -44,5 +44,24 @@ end
 
 
 
+
+!	$ARGS[1] = Return string
+!	$ARGS[2] = telefon['SMSid']
+!!	$ARGS[3] = Location where the selfie is taken
+!!	$ARGS[4] = State of dress in the selfie
+!!	 ARGS[5] = is the index of the location in $selfieLoc[] and $selfieFilePrefix
+!!	 ARGS[6] = the selfie number
+if $ARGS[0] = 'SMS_set_selfie':
+	$temp_imloc = func('phone_selfies_popup', 'SMS_get_imloc', $ARGS[3], $ARGS[4], ARGS[5], ARGS[6])
+	$result = '<a href="exec: gs <<$ARGS[1]>>, <<ARGS[2]>>, ''<<$temp_imloc>>'', ''<<$ARGS[3]>>'', ''<<$ARGS[4]>>'', <<ARGS[5]>>, <<ARGS[6]>>"><img src="<<$temp_imloc>>" style="horizontal-align:center; max-height:90%; max-width:90%"></a>'
+	killvar '$temp_imloc'
+end
+
+if $ARGS[0] = 'SMS_get_imloc':
+	$result = 'images/pc/activities/phone/selfies/<<$ARGS[1]>>/<<$ARGS[2]>>/<<$selfieFilePrefix[ARGS[3]]>><<ARGS[4]>>.jpg'
+end
+
+
+
 --- phone_selfies_popup ---------------------------------
 

+ 32 - 32
locations/telefon.qsrc

@@ -539,12 +539,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 		if PCloswimwear = 1:
 			!!changing to and unmixed variable so the rng will work
 			if Enable_Android = 1:
-				dynamic 'temp_swim = <<selfieSwimtot[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_swim = selfieSwimtot[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_swim = <<selfieSwimtot[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_swim = selfieSwimtot[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_swim > 0:
-				phone_rand = rand(1,temp_swim)
+				phone_rand = rand(1, temp_swim)
 				!!Setting the image owned flag to 1
 				dynamic '<<$ARGS[1]>>_swim[<<phone_rand>>] = 1'
 				gs 'stat'
@@ -557,12 +557,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 		elseif $clothingworntype ! 'nude':
 			!!changing to and unmixed variable so the rng will work
 			if Enable_Android = 1:
-				dynamic 'temp_clotot = <<selfieClotot[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_clotot = selfieClotot[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_clotot = <<selfieClotot[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_clotot = selfieClotot[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_clotot > 0:
-				phone_rand = rand(1,temp_clotot)
+				phone_rand = rand(1, temp_clotot)
 				!!Setting the image owned flag to 1
 				dynamic '<<$ARGS[1]>>_closelfie[<<phone_rand>>] = 1'
 				gs 'stat'
@@ -574,12 +574,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 			end
 		elseif $pantyworntype ! 'none':
 			if Enable_Android = 1:
-				dynamic 'temp_undtot = <<selfieUndtot[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_undtot = selfieUndtot[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_undtot = <<selfieUndtot[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_undtot = selfieUndtot[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_undtot > 0:
-				phone_rand = rand(1,temp_undtot)
+				phone_rand = rand(1, temp_undtot)
 				dynamic '<<$ARGS[1]>>_undselfie[<<phone_rand>>] = 1'
 				gs 'stat'
 				if usePopUps = 1:
@@ -590,12 +590,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 			end
 		else
 			if Enable_Android = 1:
-				dynamic 'temp_nudtot = <<selfieNudtot[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_nudtot = selfieNudtot[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_nudtot = <<selfieNudtot[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_nudtot = selfieNudtot[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_nudtot > 0:
-				phone_rand = rand(1,temp_nudtot)
+				phone_rand = rand(1, temp_nudtot)
 				dynamic '<<$ARGS[1]>>_nudselfie[<<phone_rand>>] = 1'
 				gs 'stat'
 				if usePopUps = 1:
@@ -608,12 +608,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 	else
 		if $ARGS[2] = 'tits':
 			if Enable_Android = 1:
-				dynamic 'temp_titflash = <<selfieTitflash[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_titflash = selfieTitflash[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_titflash = <<selfieTitflash[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_titflash = selfieTitflash[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_titflash > 0:
-				phone_rand = rand(1,temp_titflash)
+				phone_rand = rand(1, temp_titflash)
 				dynamic '<<$ARGS[1]>>_titflash[<<phone_rand>>] = 1'
 				gs 'stat'
 				if usePopUps = 1:
@@ -624,12 +624,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 			end
 		elseif $ARGS[2] = 'ass':
 			if Enable_Android = 1:
-				dynamic 'temp_assflash = <<selfieAssflash[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_assflash = selfieAssflash[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_assflash = <<selfieAssflash[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_assflash = selfieAssflash[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_assflash > 0:
-				phone_rand = rand(1,temp_assflash)
+				phone_rand = rand(1, temp_assflash)
 				dynamic '<<$ARGS[1]>>_assflash[<<phone_rand>>] = 1'
 				gs 'stat'
 				if usePopUps = 1:
@@ -640,12 +640,12 @@ if $ARGS[0] = 'Phone_selfie_image':
 			end
 		elseif $ARGS[2] = 'pussy':
 			if Enable_Android = 1:
-				dynamic 'temp_pussyflash = <<selfiePussyflash[arrpos(''$selfieLoc'', $ARGS[1],1)]>>'
+				temp_pussyflash = selfiePussyflash[arrpos('$selfieLoc', $ARGS[1], 1)]
 			else
-				dynamic 'temp_pussyflash = <<selfiePussyflash[arrpos(1, ''$selfieLoc'', $ARGS[1])]>>'
+				temp_pussyflash = selfiePussyflash[arrpos(1, '$selfieLoc', $ARGS[1])]
 			end
 			if temp_pussyflash > 0:
-				phone_rand = rand(1,temp_pussyflash)
+				phone_rand = rand(1, temp_pussyflash)
 				dynamic '<<$ARGS[1]>>_pussyflash[<<phone_rand>>] = 1'
 				gs 'stat'
 				if usePopUps = 1:
@@ -664,13 +664,13 @@ if $ARGS[0] = 'Phone_selfie_image_bathing':
 	if $ARGS[1] = 'shower':
 		!!changing to and unmixed variable so the rng will work
 		if Enable_Android = 1:
-			dynamic 'temp_showertot = <<selfieShowertot[arrpos(''$selfieLoc'', ''bathroom'',1)]>>'
+			temp_showertot = selfieShowertot[arrpos('$selfieLoc', 'bathroom', 1)]
 		else
-			dynamic 'temp_showertot = <<selfieShowertot[arrpos(1, ''$selfieLoc'', ''bathroom'')]>>'
+			temp_showertot = selfieShowertot[arrpos(1, '$selfieLoc', 'bathroom')]
 		end
-		phone_rand = rand(1,temp_showertot)
+		phone_rand = rand(1, temp_showertot)
 		!!Setting the image owned flag to 1
-		dynamic 'bathroom_showerselfie[<<phone_rand>>] = 1'
+		bathroom_showerselfie[phone_rand] = 1
 		gs 'stat'
 		if usePopUps = 1:
 			msg '<img src="images/pc/activities/phone/selfies/bathroom/shower/<<phone_rand>>.jpg">'
@@ -679,12 +679,12 @@ if $ARGS[0] = 'Phone_selfie_image_bathing':
 		end
 	elseif $ARGS[1] = 'bath':
 		if Enable_Android = 1:
-			dynamic 'temp_bathtot = <<selfieBathtot[arrpos(''$selfieLoc'', ''bathroom'',1)]>>'
+			temp_bathtot = selfieBathtot[arrpos('$selfieLoc', 'bathroom', 1)]
 		else
-			dynamic 'temp_bathtot = <<selfieBathtot[arrpos(1, ''$selfieLoc'', ''bathroom'')]>>'
+			temp_bathtot = selfieBathtot[arrpos(1, '$selfieLoc', 'bathroom')]
 		end
-		phone_rand = rand(1,temp_bathtot)
-		dynamic 'bathroom_bathselfie[<<phone_rand>>] = 1'
+		phone_rand = rand(1, temp_bathtot)
+		bathroom_bathselfie[phone_rand] = 1
 		gs 'stat'
 		if usePopUps = 1:
 			msg '<img src="images/pc/activities/phone/selfies/bathroom/bath/<<phone_rand>>.jpg">'
@@ -733,13 +733,13 @@ if $ARGS[0] = 'Phone_camera':
 		else
 			locIndex = arrpos(1, '$selfieLoc', $phone_loc)
 		end
-		if (pcs_inhib >= 35 or exhibitionist_lvl > 0 or $phone_loc = 'bedroom') and dyneval("result = <<selfieTitflash[locIndex]>>") > 0:
+		if (pcs_inhib >= 35 or exhibitionist_lvl > 0 or $phone_loc = 'bedroom') and selfieTitflash[locIndex] > 0:
 			$telefon['body'] += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''telefon'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', ''tits'' "><b>Flash your tits for a selfie</b></a><br>'
 		end
-		if (exhibitionist_lvl > 0 or $phone_loc = 'bedroom') and dyneval("result = <<selfieAssflash[locIndex]>>") > 0:
+		if (exhibitionist_lvl > 0 or $phone_loc = 'bedroom') and selfieAssflash[locIndex] > 0:
 			$telefon['body'] += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''telefon'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', ''ass'' "><b>Flash your ass for a selfie</b></a><br>'
 		end
-		if (exhibitionist_lvl > 1 or $phone_loc = 'bedroom') and dyneval("result = <<selfiePussyflash[locIndex]>>") > 0:
+		if (exhibitionist_lvl > 1 or $phone_loc = 'bedroom') and selfiePussyflash[locIndex] > 0:
 			$telefon['body'] += '<a href="exec:gs ''exp_gain'', ''photoskl'', 1 & gs ''telefon'', ''Phone_camera_selfie'', ''<<$phone_loc>>'', ''pussy'' "><b>Flash your pussy for a selfie</b></a><br>'
 		end
 	end