locations/anushkachat.qsrc

@@ -497,7 +497,7 @@ if $ARGS[0] = 'chat':
 				act 'Stop kissing and talk more': gt 'anushkachat', 'chat'
 			end
 		end
-	else
+	elseif anushkaQW['kiss_day'] ! daystart:
 		act 'Kiss her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	if photographyEv = 2 and portfolio_people[5] = 0:

locations/anushkachat_city.qsrc

@@ -457,7 +457,7 @@ if $ARGS[0] = 'chat':
 				act 'Stop kissing and talk more': gt 'anushkachat_city', 'chat'
 			end
 		end
-	else
+	elseif anushkaQW['kiss_day'] ! daystart:
 		act 'Kiss her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	if photographyEv = 2 and portfolio_people[5] = 0:

locations/body.qsrc

@@ -487,9 +487,6 @@ if $ARGS[0] = 'Update_daily_body_other':
 			end
 		end
 	end
-
-	gs 'drugs', 'breastcream', 'cikl'
-	gs 'drugs', 'steroids', 'cikl'
 end
 
 
@@ -591,9 +588,7 @@ if $ARGS[0] = 'Redistribute_Mass':
 	end
 
 
-	if salobustdo = 0 and cheatVars['body_staticAssets'] = 0:
-		!!This controls the movement of pcs_mass['body'] to/from bust in order of precedence
-
+	if salobustdo = 0:
 		!!===============    MAGIC    ===============!!
 		if magikDostup = 0 and magf2bdo = 1 and daystart > pcs_mass['magic_day'] and pcs_mana >= manamax / 2:
 			bodyVars['bust_magic'] += 1
@@ -605,115 +600,124 @@ if $ARGS[0] = 'Redistribute_Mass':
 			pcs_mana -= max(100, 2000 / pcs_magik)
 		end
 
-		!!===============    Low Weight    ===============!!
-		if pcs_mass['body'] < 10:
-			temp_diff = min(pcs_mass['bust'], 3)
-			pcs_mass['bust'] -= temp_diff
-			pcs_mass['body'] += temp_diff
-
-			temp_diff = min(pcs_mass['butt'], 3)
-			pcs_mass['butt'] -= temp_diff
-			pcs_mass['body'] += temp_diff
+		!!This controls the movement of pcs_mass['body'] to/from bust in order of precedence
+		if cheatVars['body_staticAssets'] ! 0:
+			pcs_mass['bust'] = pcs_mass['bust_gen']
+			pcs_mass['bust_message'] = pcs_mass['bust_gen']
 
+			pcs_mass['butt'] = pcs_mass['butt_gen']
+			pcs_mass['butt_message'] = pcs_mass['butt_gen']
 		else
-			temp_total_mass = pcs_mass['body'] + pcs_mass['bust'] + pcs_mass['butt']
-			temp_tot_gen_mass = 60 + pcs_mass['bust_gen'] + pcs_mass['butt_gen']
-
-			!!===============    Bust    ===============!!
-			temp_mass_bust = (pcs_mass['bust_gen'] * temp_total_mass) / temp_tot_gen_mass
-
-				!!----------- Small -----------!!
-			if temp_total_mass >= temp_tot_gen_mass - 10 and pcs_mass['bust'] < pcs_mass['bust_gen']:
-				temp_diff = min(pcs_mass['bust_gen'] - pcs_mass['bust'], 2)
-				pcs_mass['bust'] += temp_diff
-				pcs_mass['body'] -= temp_diff
+			!!===============    Low Weight    ===============!!
+			if pcs_mass['body'] < 10:
+				temp_diff = min(pcs_mass['bust'], 3)
+				pcs_mass['bust'] -= temp_diff
+				pcs_mass['body'] += temp_diff
 
-			elseif temp_total_mass >= temp_tot_gen_mass - 10 and temp_total_mass <= temp_tot_gen_mass and pcs_mass['bust'] = pcs_mass['bust_gen']:
-				!Keep bust at genetic level if pcs_mass['body'] >= 50 and pcs_mass['body'] <= 60
+				temp_diff = min(pcs_mass['butt'], 3)
+				pcs_mass['butt'] -= temp_diff
+				pcs_mass['body'] += temp_diff
 
-				!!-----------    Growth    -----------!!
-			elseif temp_mass_bust > pcs_mass['bust']:
-				pcs_mass['bust'] += 1
-				pcs_mass['body'] -= 1
+			else
+				temp_total_mass = pcs_mass['body'] + pcs_mass['bust'] + pcs_mass['butt']
+				temp_tot_gen_mass = 60 + pcs_mass['bust_gen'] + pcs_mass['butt_gen']
+
+				!!===============    Bust    ===============!!
+				temp_mass_bust = (pcs_mass['bust_gen'] * temp_total_mass) / temp_tot_gen_mass
+
+					!!----------- Small -----------!!
+				if temp_total_mass >= temp_tot_gen_mass - 10 and pcs_mass['bust'] < pcs_mass['bust_gen']:
+					temp_diff = min(pcs_mass['bust_gen'] - pcs_mass['bust'], 2)
+					pcs_mass['bust'] += temp_diff
+					pcs_mass['body'] -= temp_diff
+
+				elseif temp_total_mass >= temp_tot_gen_mass - 10 and temp_total_mass <= temp_tot_gen_mass and pcs_mass['bust'] = pcs_mass['bust_gen']:
+					!Keep bust at genetic level if pcs_mass['body'] >= 50 and pcs_mass['body'] <= 60
+
+					!!-----------    Growth    -----------!!
+				elseif temp_mass_bust > pcs_mass['bust']:
+					pcs_mass['bust'] += 1
+					pcs_mass['body'] -= 1
+
+					!!-----------    Shrink    -----------!!
+				elseif temp_mass_bust < pcs_mass['bust'] and pcs_mass['bust'] > 0:
+					pcs_mass['bust'] -= 1
+					pcs_mass['body'] += 1
+				end
 
-				!!-----------    Shrink    -----------!!
-			elseif temp_mass_bust < pcs_mass['bust'] and pcs_mass['bust'] > 0:
-				pcs_mass['bust'] -= 1
-				pcs_mass['body'] += 1
-			end
 
+				!!===============    Ass    ===============!!
+				temp_mass_ass  = (pcs_mass['butt_gen']  * temp_total_mass) / temp_tot_gen_mass
 
-			!!===============    Ass    ===============!!
-			temp_mass_ass  = (pcs_mass['butt_gen']  * temp_total_mass) / temp_tot_gen_mass
+					!!----------- Small -----------!!
+				if temp_total_mass >= temp_tot_gen_mass - 10 and pcs_mass['butt'] < pcs_mass['butt_gen']:
+					temp_diff = min(pcs_mass['butt_gen'] - pcs_mass['butt'], 2)
+					pcs_mass['butt'] += temp_diff
+					pcs_mass['body'] -= temp_diff
 
-				!!----------- Small -----------!!
-			if temp_total_mass >= temp_tot_gen_mass - 10 and pcs_mass['butt'] < pcs_mass['butt_gen']:
-				temp_diff = min(pcs_mass['butt_gen'] - pcs_mass['butt'], 2)
-				pcs_mass['butt'] += temp_diff
-				pcs_mass['body'] -= temp_diff
+				elseif temp_total_mass >= temp_tot_gen_mass - 10 and temp_total_mass <= temp_tot_gen_mass and pcs_mass['butt'] = pcs_mass['butt_gen']:
+					!Keep butt at genetic level if pcs_mass['body'] >= 50 and pcs_mass['body'] <= 60
 
-			elseif temp_total_mass >= temp_tot_gen_mass - 10 and temp_total_mass <= temp_tot_gen_mass and pcs_mass['butt'] = pcs_mass['butt_gen']:
-				!Keep butt at genetic level if pcs_mass['body'] >= 50 and pcs_mass['body'] <= 60
+					!!-----------    Rest    -----------!!
+				elseif temp_mass_ass > pcs_mass['butt']:
+					pcs_mass['butt'] += 1
+					pcs_mass['body'] -= 1
 
-				!!-----------    Rest    -----------!!
-			elseif temp_mass_ass > pcs_mass['butt']:
-				pcs_mass['butt'] += 1
-				pcs_mass['body'] -= 1
+				elseif temp_mass_ass < pcs_mass['butt'] and pcs_mass['butt'] > 0:
+					pcs_mass['butt'] -= 1
+					pcs_mass['body'] += 1
+				end
 
-			elseif temp_mass_ass < pcs_mass['butt'] and pcs_mass['butt'] > 0:
-				pcs_mass['butt'] -= 1
-				pcs_mass['body'] += 1
+				killvar 'temp_total_mass'
+				killvar 'temp_tot_gen_mass'
+				killvar 'temp_mass_bust'
+				killvar 'temp_mass_ass'
+				killvar 'temp_diff'
 			end
 
-			killvar 'temp_total_mass'
-			killvar 'temp_tot_gen_mass'
-			killvar 'temp_mass_bust'
-			killvar 'temp_mass_ass'
-			killvar 'temp_diff'
-		end
-
-		if bodyresetflag ! 0:
-			pcs_mass['bust_message'] = pcs_mass['bust']
-			pcs_mass['butt_message'] = pcs_mass['butt']
-		else
-			if pcs_mass['bust'] > pcs_mass['bust_message'] + 3:
+			if bodyresetflag ! 0:
 				pcs_mass['bust_message'] = pcs_mass['bust']
+				pcs_mass['butt_message'] = pcs_mass['butt']
+			else
+				if pcs_mass['bust'] > pcs_mass['bust_message'] + 3:
+					pcs_mass['bust_message'] = pcs_mass['bust']
 
-				if pcs_mass['butt'] > pcs_mass['butt_message'] + 3:
-					pcs_mass['butt_message'] = pcs_mass['butt']
-					'<b>Your breasts and ass seem fuller</b>'
+					if pcs_mass['butt'] > pcs_mass['butt_message'] + 3:
+						pcs_mass['butt_message'] = pcs_mass['butt']
+						'<b>Your breasts and ass seem fuller</b>'
 
-				elseif pcs_mass['butt'] < pcs_mass['butt_message'] - 3:
-					pcs_mass['butt_message'] = pcs_mass['butt']
-					'<b>Your breasts seem fuller and ass seems to be getting smaller</b>'
+					elseif pcs_mass['butt'] < pcs_mass['butt_message'] - 3:
+						pcs_mass['butt_message'] = pcs_mass['butt']
+						'<b>Your breasts seem fuller and ass seems to be getting smaller</b>'
 
-				else
-					'<b>Your breasts seem fuller</b>'
-				end
+					else
+						'<b>Your breasts seem fuller</b>'
+					end
 
-			elseif pcs_mass['bust'] < pcs_mass['bust_message'] - 3:
-				pcs_mass['bust_message'] = pcs_mass['bust']
-
-				if pcs_mass['butt'] > pcs_mass['butt_message'] + 3:
-					pcs_mass['butt_message'] = pcs_mass['butt']
-					'<b>Your breasts seem to be getting smaller and your ass seems fuller</b>'
+				elseif pcs_mass['bust'] < pcs_mass['bust_message'] - 3:
+					pcs_mass['bust_message'] = pcs_mass['bust']
 
-				elseif pcs_mass['butt'] < pcs_mass['butt_message'] - 3:
-					pcs_mass['butt_message'] = pcs_mass['butt']
-					'<b>Your breasts and ass seem to be getting smaller</b>'
+					if pcs_mass['butt'] > pcs_mass['butt_message'] + 3:
+						pcs_mass['butt_message'] = pcs_mass['butt']
+						'<b>Your breasts seem to be getting smaller and your ass seems fuller</b>'
 
-				else
-					'<b>Your breasts seem to be getting smaller</b>'
-				end
+					elseif pcs_mass['butt'] < pcs_mass['butt_message'] - 3:
+						pcs_mass['butt_message'] = pcs_mass['butt']
+						'<b>Your breasts and ass seem to be getting smaller</b>'
 
-			else
-				if pcs_mass['butt'] > pcs_mass['butt_message'] + 3:
-					pcs_mass['butt_message'] = pcs_mass['butt']
-					'<b>Your ass seems fuller</b>'
+					else
+						'<b>Your breasts seem to be getting smaller</b>'
+					end
 
-				elseif pcs_mass['butt'] < pcs_mass['butt_message'] - 3:
-					pcs_mass['butt_message'] = pcs_mass['butt']
-					'<b>Your ass seem to be getting smaller</b>'
+				else
+					if pcs_mass['butt'] > pcs_mass['butt_message'] + 3:
+						pcs_mass['butt_message'] = pcs_mass['butt']
+						'<b>Your ass seems fuller</b>'
+
+					elseif pcs_mass['butt'] < pcs_mass['butt_message'] - 3:
+						pcs_mass['butt_message'] = pcs_mass['butt']
+						'<b>Your ass seem to be getting smaller</b>'
+					end
 				end
 			end
 		end

locations/cikl.qsrc

@@ -931,9 +931,7 @@ mosal_time = totminut
 killvar 'last_pee'
 
 !!Drugs reduction
-gs 'drugs', 'cocaine', 'cikl'
-gs 'drugs', 'mentats', 'cikl'
-gs 'drugs', 'aphrodisiac', 'cikl'
+gs 'drugs', 'cikl'
 
 gs 'gad_gpyard', 'cikl'
 

locations/din_van.qsrc

@@ -213,7 +213,7 @@ if $ARGS[0] = 'shower':
 
 		if vanr_lock = 0 and $loc = 'vanrPar':
 			*nl
-			'In your absentmindedness, you have forgotton to close the door.'
+			'In your absentmindedness, you have forgotten to close the door.'
 			'The idea that the door is open occupies your mind while you are showering. It would be very embarrassing if your brother or stepfather looked in at the wrong time.'
 			if locat['Fam_inGad'] = 0: gs 'vanrPar', 'peek'
 		end
@@ -1185,14 +1185,14 @@ if $ARGS[0] = 'private':
 	end
 
 	if mc_inventory['hair_extensioncream'] > 0:
-		'<a href="exec:gs ''drugs'', ''hair_extensioncream'' & gt $loc, $loc_arg">Apply hair extension shampoo.</a> Uses left: <<mc_inventory[''hair_extensioncream'']>>.'
+		'<a href="exec:gs ''drugs'', ''hair_extensioncream''">Apply hair extension shampoo.</a> Uses left: <<mc_inventory[''hair_extensioncream'']>>.'
 	end
 	if mc_inventory['butt_injection'] > 0:
-		'<a href="exec:gs ''drugs'', ''butt_injection'' & gt $loc, $loc_arg">Inject the KBI butt enhancement shot.</a> Uses left: <<mc_inventory[''butt_injection'']>>.'
+		'<a href="exec:gs ''drugs'', ''butt_injection''">Inject the KBI butt enhancement shot.</a> Uses left: <<mc_inventory[''butt_injection'']>>.'
 	end
 
 	if mc_inventory['breastcream'] > 0:
-		'<a href="exec:gs ''drugs'', ''breastcream'' & gt $loc, $loc_arg">Apply breast cream.</a> Uses left: <<mc_inventory[''breastcream'']>>.'
+		'<a href="exec:gs ''drugs'', ''breastcream''">Apply breast cream.</a> Uses left: <<mc_inventory[''breastcream'']>>.'
 	end
 
 	gs 'piercing_management', 'set_manage_string'

locations/drugs.qsrc

@@ -24,6 +24,8 @@ if $ARGS[0] = 'cikl':
 	gs 'drugs', 'aphrodisiac', 'cikl'
 	gs 'drugs', 'hair_extensioncream', 'cikl'
 	gs 'drugs', 'butt_injection', 'cikl'
+	gs 'drugs', 'breastcream', 'cikl'
+	gs 'drugs', 'steroids', 'cikl'
 elseif $ARGS[0] = 'hourly_events':
 	gs 'drugs', 'smoke', 'hourly_events'
 	gs 'drugs', 'joint', 'hourly_events'

locations/foto.qsrc

@@ -1,17 +1,12 @@
 # foto
 !!2021/04/15
 if $ARGS[0] = 'start':
-	$loc = 'foto'
-	$loc_arg = 'start'
-
+	*clr & cla
 	close all
+	menu_off = 0
+	gs 'shortgs', 'setloc', 'foto', 'start'
 	$location_type = 'indoors'
 	if model['status'] = 0:gt 'foto', 'studio'
-	*clr & cla
-
-	$menu_loc = 'foto'
-	$menu_arg = 'start'
-	menu_off = 0
 
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 	if studio_strip = 0:
@@ -24,7 +19,7 @@ if $ARGS[0] = 'start':
 	foto['documentary'] = rand(1,100)
 	act 'Leave': gt'city_center'
 	act'Strip down':
-		cla & *clr
+		*clr & cla
 		menu_off = 1
 		'<center><video autoplay loop src="images/locations/city/citycenter/photo/fullstrip.mp4"></video></center>'
 		studio_strip += 1
@@ -94,7 +89,7 @@ if $ARGS[0] = 'start':
 				lastwornpantynumber['foto'] = pantywornnumber
 				$lastwornbratype['foto'] = $braworntype
 				lastwornbranumber['foto'] = brawornnumber
-				cla & *clr
+				*clr & cla
 				menu_off = 1
 				inhib_exp += 2
 				if studio_strip_talk = 0:
@@ -129,7 +124,7 @@ if $ARGS[0] = 'start':
 					lastwornbranumber['foto'] = brawornnumber
 				end
 				gs 'stat'
-				cla & *clr
+				*clr & cla
 				menu_off = 1
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip3.mp4"></video></center>'
 				inhib_exp += 1
@@ -170,14 +165,14 @@ end
 if $ARGS[0] = 'studio':
 	if hour < 3:gt 'foto', 'studio_closing'
 
-	$loc_arg = 'studio'
-	$menu_loc = 'foto'
-	$menu_arg = 'studio'
+	*clr & cla
 	menu_off = 0
+	gs 'shortgs', 'setloc', 'foto', 'studio'
+	$location_type = 'indoors'
 	practice_session = 0
-	*clr & cla
 	killvar '$modelopt'
 
+
 	minut += 5
 	gs 'stat'
 	gs 'themes', 'indoors'
@@ -313,14 +308,11 @@ if $ARGS[0] = 'studio':
 end
 
 if $ARGS[0] = 'bathroom':
-	$loc_arg = 'bathroom'
-	$menu_loc = 'foto'
-	$menu_arg = 'bathroom'
-	$locM = 'foto'
-	$locM_arg = 'bathroom'
+	*clr & cla
 	menu_off = 0
-	gs'stat'
-	cla & *clr
+	gs 'shortgs', 'setloc', 'foto', 'bathroom'
+	$location_type = 'bathroom'
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/models<<rand(1,2)>>.jpg"></center>'
 	'A gaggle of models crowd the <a href="exec:gt ''mirror'',''start''">mirrors</a> and sinks, loudly chatting, giggling, and generally gossiping about life in the city and the studio.'
 	*nl
@@ -341,34 +333,36 @@ if $ARGS[0] = 'bathroom':
 		end
 	end
 	if AlexandriaQW = 1:
-	    act'Listen to the gossip':
-	        *clr & cla
+		act'Listen to the gossip':
+			*clr & cla
 			AlexandriaQW = 2
 			gs 'stat'
-           	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/models.jpg"></center>'
-            'You are trying to find the "McGuffin" that Tatiana told you was somewhere in the agency and that was cursing the place, but you haven''t had much luck... until now. You feel a magic tingle and snoop on an interesting titbit.'
-            '"Oh my god! You need to meet this girl! She is an incredible mass... massa... masse... Damn! She is good with her hands!"'
-            '"Sorry, I don''t swing that way. Well... except on my boyfriend''s birthday."'
-            '"Huh?! No! Well... maybe? I mean that she can help you with your boob pains!"'
-            '"You mean my BACK pains? Are you feeling alright? You sound a little off today."'
-            '"What? Yes! I''m feeling great! You <i>must</i> meet her! She''s a redhead named Tatiana! She hangs out back there, in the room where we store the... umm... the things that we use for the shoots!"'
-            '"You mean the props room?"'
-            'Okay, that''s a clue! Maybe you should search the props room?'
-            act 'Continue': gt 'foto', 'bathroom'
-        end
-    else
-	    act 'Listen to the gossip': gt 'foto_models', 'model_chatter'
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/models.jpg"></center>'
+			'You are trying to find the "McGuffin" that Tatiana told you was somewhere in the agency and that was cursing the place, but you haven''t had much luck... until now. You feel a magic tingle and snoop on an interesting titbit.'
+			'"Oh my god! You need to meet this girl! She is an incredible mass... massa... masse... Damn! She is good with her hands!"'
+			'"Sorry, I don''t swing that way. Well... except on my boyfriend''s birthday."'
+			'"Huh?! No! Well... maybe? I mean that she can help you with your boob pains!"'
+			'"You mean my BACK pains? Are you feeling alright? You sound a little off today."'
+			'"What? Yes! I''m feeling great! You <i>must</i> meet her! She''s a redhead named Tatiana! She hangs out back there, in the room where we store the... umm... the things that we use for the shoots!"'
+			'"You mean the props room?"'
+			'Okay, that''s a clue! Maybe you should search the props room?'
+			act 'Continue': gt 'foto', 'bathroom'
+		end
+	else
+		act 'Listen to the gossip': gt 'foto_models', 'model_chatter'
 	end
 	if AlexandriaQW = 2:
-	    act'Search the props'' room':gt 'tatiana_missions', 'mission2A'
+		act'Search the props'' room':gt 'tatiana_missions', 'mission2A'
 	end
 end
 
 if $ARGS[0] = 'showers':
-	$loc_arg = 'showers'
-	gs'stat'
-	cla & *clr
+	*clr & cla
 	menu_off = 1
+	gs 'shortgs', 'setloc', 'foto', 'showers'
+	$location_type = 'bathroom'
+	gs 'stat'
+
 	krystal['shower_sex'] = rand(1,7)
 	if krystal['shower_sex'] = 7 and krystal['status'] >= 3:gt 'model_krystal','krystalshower'
 
@@ -380,10 +374,11 @@ if $ARGS[0] = 'showers':
 
 	act 'Go to the studio floor':pcs_shave['free_razor'] = 0 & gt 'foto', 'studio'
 
-	if mc_inventory['shampoo'] > 0:
+	if mc_inventory['shampoo'] <= 0:
+		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
+	else
 		act 'Take a shower (0:15)':
-			cla
-			*clr
+			*clr & cla
 			minut += 15
 			pcs_horny += 1
 			pcs_hairbsh = 0
@@ -395,8 +390,7 @@ if $ARGS[0] = 'showers':
 			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 			if pcs_horny >= 40:
 				act 'Use the showerhead on your pussy':
-					cla
-					*clr
+					*clr & cla
 					$orgasm_or = 'no'
 					gs 'arousal', 'clit_vibe', -5, 'masturbate', 'exhibitionism'
 					$orgasm_or = 'no'
@@ -455,8 +449,6 @@ if $ARGS[0] = 'showers':
 			dynamic $brit
 			act 'Get out of the shower':gt 'foto', 'showers'
 		end
-	else
-		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
 	end
 	'<a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
 	if mesec > 0 and isprok = 0:
@@ -493,14 +485,11 @@ if $ARGS[0] = 'showers':
 end
 
 if $ARGS[0] = 'makeup':
-	gs'stat'
 	*clr & cla
-	$locM = 'foto'
-	$locM_arg = 'makeup'
-	$loc_arg = 'makeup'
-	$menu_loc = 'foto'
-	$menu_arg = 'makeup'
 	menu_off = 0
+	gs 'shortgs', 'setloc', 'foto', 'makeup'
+	$location_type = 'indoors'
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/mirrors.jpg"></center>'
 	'The backstage area where you and the other girls put on your makeup.'
 	act 'Back to the studio': gt 'foto', 'studio'
@@ -521,7 +510,7 @@ if $ARGS[0] = 'makeup':
 		act'Do your own makeup': menu_off = 1 & gt 'mirror', 'start'
 
 		act'Go to the makeup artists (0:30)':
-			cla & *clr
+			*clr & cla
 			menu_off = 1
 			minut += 30
 			pcs_hairbsh = 1
@@ -552,7 +541,10 @@ end
 
 
 if $ARGS[0] = 'manager_talk':
+	*clr & cla
+	menu_off = 1
 	minut += 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 	'You approach the manager''s desk.'
 	'"Something I can help you with <<$model[''firstname'']>>?"'
@@ -627,7 +619,7 @@ end
 
 if $ARGS[0] = 'hiring_ask':
 	act 'Ask about working as a glamor model':
-		cla & *clr
+		*clr & cla
 		menu_off = 1
 		minut += 1
 		gs 'stat'
@@ -713,7 +705,7 @@ if $ARGS[0] = 'hiring_ask':
 end
 
 if $ARGS[0] = 'interview':
-	cla & *clr
+	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 	if anushkaQW['model_referral'] = 1:	'You walk up to the front desk and say Anushka sent you. You only have to wait a few minutes before somebody arrives to interview you.'
@@ -739,7 +731,7 @@ if $ARGS[0] = 'interview':
 end
 
 if $ARGS[0] = 'interview2':
-	cla & *clr
+	*clr & cla
 	menu_off = 1
 	if pcs_inhib > 40:
 		gs 'willpower', 'skill', 'pcs_inhib', 'easy'
@@ -889,7 +881,7 @@ if $ARGS[0] = 'job_decline':
 	if foto_weight >= 25:
 		'"I''m sorry," he says shaking his head. "You did lose weight, I''ll give you that, but it''s not quite enough for our requirements. But you''ve made progress. Give it a few more weeks of effort and come back again. We can still use you if you''re within the limit."'
 		act'Sigh':
-			cla & *clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 			'You sigh in disappointment as you pick your clothes back up and start to get dressed again. Still more weight to lose? Now what are you going to do? Keep trying or give up?'
 			gs 'clothing', 'wear_last_worn'
@@ -902,7 +894,7 @@ if $ARGS[0] = 'job_decline':
 		'The man''s words sting heavily at your confidence and you cover yourself in shame by instinct. He still continues to eye you up and down and you squirm as his gaze roams your breasts, stomach, and pussy.'
 		'"That being said, I can still see that you have some potential. So go running, start working out. If you lose some weight, I could see you getting another shot at working here in the future."'
 		act'React solemnly':
-			cla & *clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 			'You glumly pick your clothes up off the floor and get dressed before leaving. As you do, you stop at the door and look back in.'
 			'<i>Is this it for me? Am I ever going to be able to lose enough weight to work here?</i>'
@@ -915,7 +907,7 @@ if $ARGS[0] = 'job_decline':
 		end
 
 		act'React determinedly':
-			cla & *clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 			'You nod at him, feeling a bit dejected but more determined than ever. You get dressed with purpose and head to the door. As you do, you think to yourself...'
 			'<i>I will be able to do this! I''ll get in shape and I''ll work here one day! I''m not going to lose my shot at this!</i>'
@@ -1029,7 +1021,7 @@ if $ARGS[0] = 'job_offer':
 	elseif age_truth = 1:
 		if fotofit ! 1:
 			act '"Oh. Okay..."':
-				cla & *clr
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 				'You put your clothes back on, slightly annoyed as you get ready to leave. If he knew you were underage, why did he have you strip in the first place?!'
 				gs 'clothing', 'wear_last_worn'
@@ -1040,7 +1032,7 @@ if $ARGS[0] = 'job_offer':
 		end
 
 		act 'Plead':
-			cla & *clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 			fakepassport = 2
 			fotofakepassport = 2
@@ -1150,7 +1142,7 @@ end
 
 
 if $ARGS[0] = 'model_name1':
-	cla & *clr
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 	'"A few more things to fill out your profile. Did you want to have a model name or a pseudonym? Or would you prefer to use your real name?"'
 	gs 'foto', 'model_name2'
@@ -1171,7 +1163,7 @@ if $ARGS[0] = 'model_name2':
 
 	if model['ask_model_name'] = 0:
 		act'Why would I?':
-			cla & *clr
+			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 			'"Why would I want to use a fake name?" you ask. "Is there a reason I should?"'
 			'"Not <i>should</i>," he explains. "But some girls like to have a little distance from their personal lives. Or they use it to sound more professional or to stand out more. A name like ''Elena Ivanova'' isn''t exactly uncommon."'
@@ -1184,7 +1176,7 @@ if $ARGS[0] = 'model_name3':
 	$model['firstname'] = input("What is the first name of your model persona?")
 	$model['nickname'] = input("What is the shortened version or nickname of your model persona?")
 	$model['lastname'] = input("What is the last name of your model persona?")
-	cla & *clr
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 	'"<<$model[''firstname'']>>..." he mutters, slowly typing. "<<$model[''lastname'']>>... Okay, there. Is this correct?"'
 	'He turns the screen around so you can see what he wrote.'
@@ -1224,7 +1216,7 @@ if $ARGS[0] = 'model_profile':
 end
 
 if $ARGS[0] = 'pay_type':
-	cla & *clr
+	*clr & cla
 	'<center><b><font color="maroon">Photographer</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 	'"One last question. How do you want to be paid? Cash on the spot or direct deposit into your bank account?"'
@@ -1349,8 +1341,7 @@ if $ARGS[0] = 'microcamera_ask':
 end
 
 if $ARGS[0] = 'blackm':
-	*clr
-	cla
+	*clr & cla
 	menu_off = 1
 	gs 'stat'
 
@@ -1494,19 +1485,19 @@ if $ARGS[0] = 'underwear':
 end
 
 if $ARGS[0] = 'cikl':
-	if modelfoto['erotic']  >= 10 or (modelfoto['erotic'] > modelfoto['fashion']  and modelfoto['erotic']  > modelfoto['fitness']  and modelfoto['erotic']  > modelfoto['glamour']  and modelfoto['erotic']  > modelfoto['lingerie']  and modelfoto['erotic']  > modelfoto['catalog'] and modelfoto['erotic'] > modelfoto['nude']):
+	if modelfoto['erotic'] >= 10 or (modelfoto['erotic'] > modelfoto['fashion'] and modelfoto['erotic'] > modelfoto['fitness'] and modelfoto['erotic'] > modelfoto['glamour'] and modelfoto['erotic'] > modelfoto['lingerie'] and modelfoto['erotic'] > modelfoto['catalog'] and modelfoto['erotic'] > modelfoto['nude']):
 		$model['type'] = 'erotic'
-	elseif modelfoto['nude']  > modelfoto['fashion']  and modelfoto['nude']  > modelfoto['fitness']  and modelfoto['nude']  > modelfoto['glamour']  and modelfoto['nude']  > modelfoto['lingerie']  and modelfoto['nude']  > modelfoto['catalog'] :
+	elseif modelfoto['nude'] > modelfoto['fashion'] and modelfoto['nude'] > modelfoto['fitness'] and modelfoto['nude'] > modelfoto['glamour'] and modelfoto['nude'] > modelfoto['lingerie'] and modelfoto['nude'] > modelfoto['catalog'] :
 		$model['type'] = 'artistic nude'
-	elseif modelfoto['fitness']  > modelfoto['fashion']  and modelfoto['fitness']  > modelfoto['nude']  and modelfoto['fitness']  > modelfoto['glamour']  and modelfoto['fitness']  > modelfoto['lingerie']  and modelfoto['fitness']  > modelfoto['catalog'] :
+	elseif modelfoto['fitness'] > modelfoto['fashion'] and modelfoto['fitness'] > modelfoto['nude'] and modelfoto['fitness'] > modelfoto['glamour'] and modelfoto['fitness'] > modelfoto['lingerie'] and modelfoto['fitness'] > modelfoto['catalog'] :
 		$model['type'] = 'fitness'
-	elseif modelfoto['glamour']  > modelfoto['fashion']  and modelfoto['glamour']  > modelfoto['nude']  and modelfoto['glamour']  > modelfoto['fitness']  and modelfoto['glamour']  > modelfoto['lingerie']  and modelfoto['glamour']  > modelfoto['catalog'] :
+	elseif modelfoto['glamour'] > modelfoto['fashion'] and modelfoto['glamour'] > modelfoto['nude'] and modelfoto['glamour'] > modelfoto['fitness'] and modelfoto['glamour'] > modelfoto['lingerie'] and modelfoto['glamour'] > modelfoto['catalog'] :
 		$model['type'] = 'glamour'
-	elseif modelfoto['lingerie']  > modelfoto['fashion']  and modelfoto['lingerie']  > modelfoto['nude']  and modelfoto['lingerie']  > modelfoto['fitness']  and modelfoto['lingerie']  > modelfoto['glamour']  and modelfoto['lingerie']  > modelfoto['catalog'] :
+	elseif modelfoto['lingerie'] > modelfoto['fashion'] and modelfoto['lingerie'] > modelfoto['nude'] and modelfoto['lingerie'] > modelfoto['fitness'] and modelfoto['lingerie'] > modelfoto['glamour'] and modelfoto['lingerie'] > modelfoto['catalog'] :
 		$model['type'] = 'lingerie'
-	elseif modelfoto['fashion']  > modelfoto['lingerie']  and modelfoto['fashion']  > modelfoto['nude']  and modelfoto['fashion']  > modelfoto['fitness']  and modelfoto['fashion']  > modelfoto['glamour']  and modelfoto['fashion']  > modelfoto['catalog'] :
+	elseif modelfoto['fashion'] > modelfoto['lingerie'] and modelfoto['fashion'] > modelfoto['nude'] and modelfoto['fashion'] > modelfoto['fitness'] and modelfoto['fashion'] > modelfoto['glamour'] and modelfoto['fashion'] > modelfoto['catalog'] :
 		$model['type'] = 'fashion'
-	elseif modelfoto['catalog']  > 0:
+	elseif modelfoto['catalog'] > 0:
 		$model['type'] = 'catalog'
 	end
 !!	if model = 1 and week = 1 and model['job_reset'] ! daystart: model_job_week = 0 & model['job_reset'] = daystart

locations/gschool_detention.qsrc

@@ -279,7 +279,7 @@ if $ARGS[0] = 'upskirt1':
 	jump_counter = 0
 	'<center><b><font color="maroon">Detention</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/detention/spreadg.jpg"></center>'
-	'You are sitting at a table, bored out of your mind and waiting for detention to end. You start looking around and you notice <<$rand_girl>> sitting at a table across from you. After a few minutes she leans back in her chair and relaxes, spreading her legs slightly as she does. The movement draws your eyes and you are given an eye full. She seems to have forgotton her panties today because her pussy is now on full display for anyone to see.'
+	'You are sitting at a table, bored out of your mind and waiting for detention to end. You start looking around and you notice <<$rand_girl>> sitting at a table across from you. After a few minutes she leans back in her chair and relaxes, spreading her legs slightly as she does. The movement draws your eyes and you are given an eye full. She seems to have forgotten her panties today because her pussy is now on full display for anyone to see.'
 	gs 'arousal', 'erotic', 5
 	gs 'arousal', 'end'
 	gs 'stat'

locations/intro_sg_tg.qsrc

@@ -119,12 +119,16 @@ if $ARGS[0] = 'intro_4':
 	'You did the best you could to repress any resentment towards <<$pcs_nickname>> about how little she appreciated what she had.'
 
 	act 'When she talks about her mother, she calls her ...':
-
-		$npc_nickname['A29'] = '<<$npc_nickname[''A29'']>>'
-		$temp_nickname = $npc_nickname['A29']
-
-		$npc_nickname['A29'] = input('<center>What name does she use to address her mother?<br>Mother (default), Mum, Mom, Mama, etc.</center>')
-		if $npc_nickname['A29'] = '':$npc_nickname['A29'] = '<<$temp_nickname>>'
+		gs 'npcstatic1'
+		gs 'npcstatic2'
+		gs 'npcstatic3'
+		gs 'npcstatic4'
+		gs 'npcstatic5'
+		gs 'npcstatic6'
+
+		$temp_nickname = input('<center>What name does she use to address her mother?<br>Mother (default), Mum, Mom, Mama, etc.</center>')
+		if $temp_nickname = '': $temp_nickname = $npc_nickname['A29']
+		$npc_nickname['A29'] = $temp_nickname
 		killvar '$temp_nickname'
 
 		gt 'intro_sg_tg', 'intro_5'
@@ -167,13 +171,6 @@ if $ARGS[0] = 'settings':
 
 	ml_update_1 = 1
 
-	gs 'npcstatic1'
-	gs 'npcstatic2'
-	gs 'npcstatic3'
-	gs 'npcstatic4'
-	gs 'npcstatic5'
-	gs 'npcstatic6'
-
 	!! default friendship is 30 for all  npcs
 	gs 'npc_relationship', 'default'
 	!! changes the values for family members and old friends

locations/katja_pantyquest.qsrc

@@ -11,7 +11,7 @@
 
 if $ARGS[0] = 'kitchen':
 	katjaQW['kitchen_day'] = daystart
-	minuts += 5
+	minut += 5
 	gs 'npc_relationship', 'modify', 'A14', 'like', 'kitchen', 1
 	if (katjaQW['pantiesQWstage'] < 3 or (katjaQW['pantiesQWstage'] = 3 and katjaQW['slut'] < 65)) and katjaQW['take_of_panties_day'] ! daystart:
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/pantyquest/kitchen_sitting1.jpg"></center>'
@@ -315,7 +315,7 @@ end
 
 if $ARGS[0] = 'uni_hallway':
 	katjaQW['uni_hallway_day'] = daystart
-	minuts += 5
+	minut += 5
 	gs 'npc_relationship', 'modify', 'A14', 'like', 'hallway', 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/pantyquest/uni_hallway.jpg"></center>'
 	'You walk up to the redhead, who is sitting comfortably on a chair. She notices you and smiles.'
@@ -517,7 +517,7 @@ end
 
 if $ARGS[0] = 'uni_exit':
 	katjaQW['uni_hallway_day'] = daystart
-	minuts += 5
+	minut += 5
 	gs 'npc_relationship', 'modify', 'A14', 'like', 'hallway', 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/pantyquest/uni_exit.jpg"></center>'
 	'You walk up to Katja, who is standing next to one of the side doors to the outside. As you approach, she looks to you and smiles.'

locations/kuhrPar.qsrc

@@ -192,7 +192,7 @@ if func('homes_properties', 'can_live_here'):
 			end
 		end
 	else
-		if (hour = 8 or (hour = 7 and locat['Fam_inGad'] = 1)) and breakfast_day ! daystart:
+		if (hour = 8 or (hour = 7 and (minut > 15 or locat['Fam_inGad'] = 1))) and breakfast_day ! daystart:
 			act 'Eat breakfast alone (0:20)':
 				*clr & cla
 				menu_off = 1

locations/npc_set_preference.qsrc

@@ -65,7 +65,7 @@ if isnum(mid($ARGS[0], 2)):
 	if temp_set_preference_trait_value ! 0:
 		if arrsize('$npc_pref_traits') = 0:
 			!!replace(..., '	', '') is there to remove the tabs from the string.
-			$npc_preferences[$ARGS[0]] = replace({killvar '$npc_pref_traits'
+			$npc_preferences[$ARGS[0]] = $replace({killvar '$npc_pref_traits'
 				killvar 'npc_pref_values'
 				$npc_pref_traits[] = } + "'<<$ARGS[1]>>'" + {
 				npc_pref_values} + "['<<$ARGS[1]>>'] = <<temp_set_preference_trait_value>>" + {
@@ -83,7 +83,7 @@ if isnum(mid($ARGS[0], 2)):
 			else
 				!!We have checked that the npc has no preference for the trait.
 				!!We add the preference to the npc.
-				$npc_preferences[$ARGS[0]] += replace({$npc_pref_traits[] = } + "'<<$ARGS[1]>>'" + {
+				$npc_preferences[$ARGS[0]] += $replace({$npc_pref_traits[] = } + "'<<$ARGS[1]>>'" + {
 					npc_pref_values} + "['<<$ARGS[1]>>'] = <<temp_set_preference_trait_value>>" + {
 				}, '	', '')
 			end
@@ -130,7 +130,7 @@ if $ARGS[0] = 'rebuild_preferences':
 
 
 	!!Overwrite the $npc_pref....[$ARGS[1]] strings with the rebuild string.
-	$npc_preferences[$ARGS[1]] = replace($temp_npc_preferences,    '	', '')
+	$npc_preferences[$ARGS[1]] = $replace($temp_npc_preferences,    '	', '')
 
 	killvar '$temp_npc_preferences'
 	killvar 'rebuild_preferences_index'
@@ -356,6 +356,4 @@ end
 !!				stats_strength_manly
 
 
-
-
---- npc_set_preference ---------------------------------
+--- npc_set_preference ---------------------------------

locations/npcgeneratec.qsrc

@@ -4,8 +4,9 @@
 !! You can also set their approx. home location
 !! All data produced is random so if you need a specific value you will have to overwrite it
 
+if $ARGS[0] = '' or isnum($ARGS[0]):
+	if $ARGS[0] ! '': ARGS[0] = val($ARGS[0])
 
-if $ARGS[0] = '':
 	!! npcgen_lastrun is a flag to help track whether npcgeneratec or npcpreservec has been run last
 	!! npcgeneratec is 1
 	!! npcpreservec is 2

locations/pav_disco.qsrc

@@ -353,88 +353,16 @@ if $ARGS[0] = 'disco_dance':
 						gt 'pav_disco', 'albina_too_drunk'
 					end
 				end
-				gs 'stat'
-				act 'Continue': gt 'pav_disco'
-				if alko < 6:
-					verprigrand = rand(0, 100)
-					if verprigrand <= pcs_danc:
-						gs 'pav_disco', 'dance_partner'
-						gs 'stat'
-					end
-				end
-			end
-		end
-		act 'Stand at the wall':
-			*clr & cla
-			menu_off = 1
-			minut += 5
-			!!fat -= 1
-			pcs_mood -= 5
-			frost = 0
-			gs 'stat'
-			'<center><b><font color="maroon">Disco</font></b></center>'
-			if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
-				pav_discocum = daystart
-				gs 'fame', 'pav', 'sex', 5
-				pcs_mood -= 40
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/cumface1.jpg"></center>'
-				'While standing by the wall, a guy notices the cum on your clothes and points and shouts. "Look, this chick is covered in cum! Did you forget to swallow slut?" he says mockingly while laughing. Your cheeks blush with shame and you head for the exit.'
-				act 'Leave': gt 'pav_commcenter'
-				exit
-			end
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/wallflower.jpg"></center>'
-			if alko > 0:
-				if alko = 1:
-					'You''re buzzed and stand against the wall while watching the others dance.'
-				elseif alko < 4:
-					'You''re tipsy and stand against the wall while watching the others dance.'
-				elseif alko < 6:
-					if mid($start_type,1,2) = 'sg' and katjaQW['QWstage']  > 1 and rand(1,10) = 1:
-						gt 'pav_disco', 'katja_too_drunk'
-					elseif mid($start_type,1,2) = 'sg' and npc_rel['A25'] >= 50 and rand(1,10) = 1:
-						gt 'pav_disco', 'sonia_too_drunk'
-					elseif mid($start_type,1,2) = 'sg' and npc_rel['A144'] >= 50 and rand(1,10) = 1 and locat['A144'] = 25:
-						gt 'pav_disco', 'anushka_too_drunk'
-					elseif mid($start_type,1,2) = 'sg' and (AlbinaQW['Friends'] = 2 or (npc_rel['A23'] >= 70 and (grupTipe = 1 or grupTipe = 2 or grupTipe = 3))) and rand (1,10) = 1:
-						gt 'pav_disco', 'albina_too_drunk'
-					else
-						'You''re pretty drunk and stand against the wall for support as you watch the others dance.'
-					end
-				else
-					if mid($start_type,1,2) = 'sg' and katjaQW['QWstage']  > 1 and rand(1,5) = 1:
-						gt 'pav_disco', 'katja_too_drunk'
-					elseif mid($start_type,1,2) = 'sg' and npc_rel['A25'] >= 50 and rand(1,7) = 1:
-						gt 'pav_disco', 'sonia_too_drunk'
-					elseif mid($start_type,1,2) = 'sg' and npc_rel['A144'] >= 50 and rand(1,7) = 1 and locat['A144'] = 25:
-						gt 'pav_disco', 'anushka_too_drunk'
-					elseif mid($start_type,1,2) = 'sg' and (AlbinaQW['Friends'] = 2 or (npc_rel['A23'] >= 70 and (grupTipe = 1 or grupTipe = 2 or grupTipe = 3))) and rand(1,7) = 1:
-						gt 'pav_disco', 'albina_too_drunk'
-					end
-				end
-			else
-
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/wasted_dance.jpg"></center>'
-				'You''re far too drunk and are barely able to stay on your feet. You''re mostly just drunkenly bumping into other people as you try and dance.'
-				if mid($start_type,1,2) = 'sg' and katjaQW['QWstage']  > 1 and rand(1,3) = 1: 
-					gt 'pav_disco', 'katja_too_drunk'
-				elseif mid($start_type,1,2) = 'sg' and npc_rel['A25'] >= 50 and rand(1,5) = 1:
-					gt 'pav_disco', 'sonia_too_drunk' 
-				elseif mid($start_type,1,2) = 'sg' and npc_rel['A144'] >= 50 and rand(1,5) = 1 and locat['A144'] = 25: 
-					gt 'pav_disco', 'anushka_too_drunk'
-				elseif mid($start_type,1,2) = 'sg' and (AlbinaQW['Friends'] = 2 or (npc_rel['A23'] >= 70 and (grupTipe = 1 or grupTipe = 2 or grupTipe = 3))) and rand(1,5) = 1:
-					gt 'pav_disco', 'albina_too_drunk'
-				end
 			end
 			gs 'stat'
 			act 'Continue': gt 'pav_disco'
 			if alko < 6:
-				if rand(0, 100) <= pcs_danc * pcs_hotcat:
+				verprigrand = rand(0, 100)
+				if verprigrand <= pcs_danc:
 					gs 'pav_disco', 'dance_partner'
 					gs 'stat'
 				end
 			end
-			
 		end
 	end
 end
@@ -499,7 +427,6 @@ if $ARGS[0] = 'wall_stand':
 			if rand(0, 10) <= pcs_hotcat:
 				gs 'pav_disco', 'dance_partner'
 				gs 'stat'
-				exit
 			end
 		end
 	end
@@ -509,7 +436,7 @@ if $ARGS[0] = 'dance_partner':
 	cla
 	!!the creation of a partner to dance
 	temp['pav_disco_partner'] = rand(1,300)
-	if temp['pav_disco_partner'] > boynum or (arrsize $hookup_partners = 0):
+	if temp['pav_disco_partner'] > boynum or (arrsize '$hookup_partners' = 0):
 		gs 'npcgeneratec', 0, 'guy from the disco', 0, rand(1,4)
 		if npc_finance[$npcID] = 2 and npc_age[$npcID] < 26: npc_age[$npcID] = rand(26, 45)
 		gs 'boystat', $npclastgenerated

locations/pav_hotelReception.qsrc

@@ -586,9 +586,10 @@ if $ARGS[0] = 'pavgenprosmf':
 	pavproscount += 1
 	guy += 1
 	gs 'fame', 'pav', 'prostitute', rand(2,4)
-	gs'stat'
-	gs 'npcgeneratec', '0', '', rand(18,40)
+	gs 'stat'
+	gs 'npcgeneratec', 0, '', rand(18,40)
 	gs 'boyStat', $npclastgenerated
+
 	'The customer introduces himself as <<$boydesc>>.'
 	'Then you both get undressed and you start doing your job.'
 	picrand = rand(0, 14)

locations/pav_parkev.qsrc

@@ -619,6 +619,7 @@ if $ARGS[0] = 'gopgirls':
 	'Lena, Lera, Alyona and Anushka are sitting at a picnic table, drinking beers and smoking cigarettes and weed. They''re getting wasted and having a good time, laughing and messing around.'
 	act 'Move away':gt 'pav_park', 'deeper_park'
 	act 'Join them':
+		cla
 		'You walk over to them. "Hey guys, mind if I join you?"'
 		if grupTipe = 5:
 			'Lena and Lera give you a look of disgust. "Get lost, loser!" Alyona ignores you, and Anushka sighs, but you can''t tell if the sigh is directed at you or the other girls.'

locations/phone_selfies.qsrc

@@ -238,7 +238,7 @@ if $ARGS[0] = 'open_camera':
 	!! Flashing selfie
 	if $clothingworntype ! 'nude' and $phone_loc <> '':
 		if Enable_Android = 1:
-			locIndex = arrpos('$selfieLoc', $phone_loc,1)
+			locIndex = arrpos('$selfieLoc', $phone_loc, 1)
 		else
 			locIndex = arrpos(1, '$selfieLoc', $phone_loc)
 		end

locations/shop_utils.qsrc

@@ -1,7 +1,5 @@
 # shop_utils
 
-! $result = '<a href="exec:"><img height="250" src="<<$shop_display[''item_img_path'']>>/<<shop_display[''i'']>>.jpg"></a>'
-
 if $ARGS[0] = 'shop':
 	if $ARGS[1] = 'clothing':
 		if dyneval('result = <<$shop_display[''variable'']>>[shop_display[''i'']]') = 0:

locations/shortgs.qsrc

@@ -834,8 +834,8 @@ if $ARGS[0] = 'payments':
 	!! Construct payment call
 
 	if $epayments['item_variable'] ! '':
-		$construct_cash = '<a href="exec: money -= <<epayments[''value'']>> & <<$epayments[''item_variable'']>> += <<epayments[''quantity'']>> & gs ''shortgs'', ''paymentcomplete'' ">Cash</a>'
-		$construct_card = '<a href="exec: karta -= <<epayments[''value'']>> & <<$epayments[''item_variable'']>> += <<epayments[''quantity'']>> & gs ''shortgs'', ''paymentcomplete'' ">Card</a>'
+		$construct_cash = '<a href="exec: $epayments[''method''] = ''cash'' & money -= <<epayments[''value'']>> & <<$epayments[''item_variable'']>> += <<epayments[''quantity'']>> & gs ''shortgs'', ''paymentcomplete'' ">Cash</a>'
+		$construct_card = '<a href="exec: $epayments[''method''] = ''card'' & karta -= <<epayments[''value'']>> & <<$epayments[''item_variable'']>> += <<epayments[''quantity'']>> & gs ''shortgs'', ''paymentcomplete'' ">Card</a>'
 	else
 		$construct_cash = '<a href="exec: $epayments[''method''] = ''cash'' & money -= <<epayments[''value'']>> & gs ''shortgs'', ''paymentcomplete'' ">Cash</a>'
 		$construct_card = '<a href="exec: $epayments[''method''] = ''card'' & karta -= <<epayments[''value'']>> & gs ''shortgs'', ''paymentcomplete'' ">Card</a>'
@@ -864,10 +864,10 @@ end
 if $ARGS[0] = 'paymentcomplete':
 	*clr & cla
 
-	'Thank you for your custom. Please come again!'
+	'Thank you for your purchase! We look forward to seeing you again.'
 	*nl
 
-	'You paid ' + epayments['value'] + '<b>₽</b>' + iif ($epayments['method']  = 'cash',' in cash', ' with your bank card') + ' for your ' + $epayments['description']
+	'You paid ' + epayments['value'] + '<b>₽</b>' + iif($epayments['method'] = 'cash', ' in cash', ' with your bank card') + ' for your ' + $epayments['description']
 
 	gs 'stat'
 	!! clean up all the variables

locations/stat_display.qsrc

@@ -556,9 +556,9 @@ if $clothingworntype ! 'nude':
 			$stat_bra_text = '<br><font color = #0064FF><<$stat_bra_msg>></font>'
 			if PCloThinness = 5 and $braworntype ! 'none':
 				$stat_bra_msg = 'The outline of your bra is visible through your <<iif(PCloDress = 1, ''dress'', ''top'')>>.'
-			elseif CloTopCut = 4 and $braworntype ! 'none':
+			elseif PCloTopCut = 4 and $braworntype ! 'none':
 				$stat_bra_msg = 'Parts of your bra are visible due to your <<iif(PCloDress = 1, ''dress'', ''top'')>>''s cut.'
-			elseif CloTopCut = 3 and $braworntype ! 'none':
+			elseif PCloTopCut = 3 and $braworntype ! 'none':
 				$stat_bra_msg = 'Some glimpses of your bra are visible due to your plunging neckline.'
 			end
 		end
@@ -695,7 +695,7 @@ $stat_clothes_text = ''
 if $clothingworntype = 'nude':
 	$stat_clothes_style = 'nude'
 	if $pantyworntype ! 'none':
-		if PanThinness >= 5:
+		if PPanThinness >= 5:
 			if $braworntype = 'none':
 				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your see-through panties, and your boobs sway invitingly as you walk.</font>'
 				$stat_clothes_tooltip = 'You are wearing your see-through panties.'
@@ -714,7 +714,7 @@ if $clothingworntype = 'nude':
 				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your panties, and your boobs sway invitingly as you walk.</font>'
 				$stat_clothes_tooltip = 'You are wearing your panties.'
 				$stat_clothes_msg = 'You are only wearing your panties, and your boobs sway invitingly as you walk.'
-			elseif BraThinness >= 5:
+			elseif PBraThinness >= 5:
 				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your see-through bra and panties.</font>'
 				$stat_clothes_tooltip = 'You are wearing your see-through bra and panties.'
 				$stat_clothes_msg = 'You are only wearing your see-through bra and panties.'
@@ -1599,7 +1599,9 @@ else
 
 	if recuperation = 1: $statusIconBarTab += '<td><a href="exec: msg ''You are still recovering from major surgery.''"><img title="You are recovering from major surgery." height = <<set_siconht>> src="images/system/icons/status/health.png"></a></td>'
 
+	if drugVars['hair_extensioncream_dose'] = 1: $statusIconBarTab += '<td><a href="exec: msg ''Your scalp feel hot and tingly.''"><img title="Your scalp feel hot and tingly." height = <<set_siconht>> src="images/system/icons/status/hair_cream.png"></a></td>'
 	if drugVars['breastcream_dose'] = 1: $statusIconBarTab += '<td><a href="exec: msg ''Your breasts feel hot and tingly.''"><img title="Your breasts feel hot and tingly." height = <<set_siconht>> src="images/system/icons/status/breast_cream.png"></a></td>'
+	if drugVars['butt_injection_dose'] = 1: $statusIconBarTab += '<td><a href="exec: msg ''Your butt feel hot and tingly.''"><img title="Your butt feel hot and tingly." height = <<set_siconht>> src="images/system/icons/status/butt_injection.png"></a></td>'
 
 	if cumcondslip > 0: $statusIconBarTab += '<td><a href="exec: msg ''You feel sick, and you are wondering about the used condom you never found. Maybe those two things are related?''"><img title="You feel sick. Click to find out more." height = <<set_siconht>> src="images/system/icons/status/stuck_condom.png"></a></td>'
 

locations/zoomagazine.qsrc

@@ -43,7 +43,7 @@ if $ARGS[0] = 'start':
 				gt 'city_mall'
 			end
 			act 'Show your body':
-				gs 'npcgeneratec', '0'
+				gs 'npcgeneratec', 0
 				gs 'boyStat', $npclastgenerated
 				cla & *clr
 				minut += 5