19 次代碼提交 21680c23b4 ... 85535de3a7

作者 SHA1 備註 提交日期
  Zedrt 85535de3a7 Merge branch 'master' of https://git.tfgames.site/Kevin_Smarts/glife 2 月之前
  Kevin_Smarts a425c1acfb Merge remote-tracking branch 'Anjuna/master' 2 月之前
  anjuna krokus 47ac938918 [fixed] npcStat naming issues for D0-D7 as pointed out by BGK 2 月之前
  anjuna krokus 47f467ef91 Merge remote-tracking branch 'master/master' 2 月之前
  Awesome 1067ac66ef [Fixed] Schoolgirl TG defaulting to wrong birthyear also changed the date format to DD/MM/YYYY 2 月之前
  Awesome 2dc91818db Merge branch 'master' of https://git.tfgames.site/Kevin_Smarts/glife 2 月之前
  Vengeance_11 e4dabcb9da Fixes and tweaks to the strip club/Journal updated with new variables 2 月之前
  Awesome dfbb737018 Merge branch 'master' of https://git.tfgames.site/Kevin_Smarts/glife 2 月之前
  Awesome 4bc227d234 [Fixed] Missing `$` 2 月之前
  anjuna krokus 6c13437543 [fixed] incoming calls not showing up on the additional desc window 2 月之前
  anjuna krokus e674a5018d [fixed] couple of forgotten edits 2 月之前
  Kevin_Smarts cebf87086a Merge remote-tracking branch 'Awesome/master' 2 月之前
  Awesome f8fd6226aa [Fixed] Missing Willpower reduction 2 月之前
  anjuna krokus e5509bc22c [fixed] stripclub checked the outdated hotcat variable. Found by Arairon 2 月之前
  anjuna krokus ec22934151 [added] Strip Club overhaul. Written and Coded by Vengeance and HornGuy6. Updated by Anjuna 2 月之前
  anjuna krokus fb2328c94d [added] calling `gs 'cum_cleanup', number` now has the function of `cumspclnt = number & gs 'cum_cleanup'` 2 月之前
  anjuna krokus 1514ce71dc [fixed] bug related to repeated stat display. Fix found in collaboration with Awesome and Felix 2 月之前
  anjuna krokus e1dea73530 [fixed] get_class function now properly defaults to your bmi and strength as expected. Found by Jack Lagas 2 月之前
  anjuna krokus bfd61518e6 [fixed] forgotten dating site update. Reported by Eogran 2 月之前

+ 3 - 0
glife.qproj

@@ -1054,10 +1054,13 @@
 		<Location name="bordelv"/>
 		<Location name="shop_erotomaniac"/>
 		<Location name="stripclub"/>
+		<Location name="stripclub_schedule"/>
 		<Location name="cfnm"/>
 		<Location name="stwork"/>
 		<Location name="stwork2"/>
+		<Location name="stwork3"/>
 		<Location name="hookahlounge"/>
+		<Location name="viktor_sex"/>
 	</Folder>
 	<Folder name="City_Island">
 		<Location name="city_island"/>

+ 30 - 29
locations/Komp.qsrc

@@ -139,7 +139,7 @@ if $ARGS[0] = 'sale':
 				cla
 				if obkvsdam = 1:
 					'Nobody has responded to your offer to rent out your apartment yet.'
-				elseif obkvsdam > 1: 
+				elseif obkvsdam > 1:
 					predsum = 14000 + (obkvsdam*1000)
 					'Someone wants to stay in your apartment for a month! They''re offering you <<predsumm>> <b>₽</b> in cash.'
 
@@ -362,39 +362,40 @@ if $ARGS[0] = 'znak':
 		'You spend time looking at the various profiles, but it won''t let you register unless you have your own home.'
 		'Still, some of the pictures were quite raunchy and the more desperate profiles were really funny.'
 	else
-		if pcs_lover < 3:
-			act 'Look for a kind man':
-				cla
-				gs 'npcgeneratec', 0
-				gs 'boyStat', $npclastgenerated
-				gs 'boyfrend', 'start'
-				haraklover[lover_number] = 0
-				'You find a guy named <<$loverdesc[lover_number]>> and send him your number after checking out his profile. You hope he''ll call you!'
+		act 'Look for a kind man':
+			cla
+			gs 'npcgeneratec', 0
+			gs 'npcStat', $npclastgenerated
+			npc_gentle[$npcID] = 1
+			npc_rough[$npcID] = 0
+			gs 'lover', 'add_boyfriend', $npcID
+			'You find a guy named <<$npcdesc>> and send him your number after checking out his profile. You hope he''ll call you!'
 
-				act 'Leave this website': gt 'komp', 'browse'
-			end
+			act 'Leave this website': gt 'komp', 'browse'
+		end
 
-			act 'Look for a normal guy':
-				cla
-				gs 'npcgeneratec', 0
-				gs 'boyStat', $npclastgenerated
-				gs 'boyfrend', 'start'
-				haraklover[lover_number] = 1
-				'You find a guy named <<$loverdesc[lover_number]>> and send him your number after checking out his profile. You hope he''ll call you!'
+		act 'Look for a normal guy':
+			cla
+			gs 'npcgeneratec', 0
+			gs 'npcStat', $npclastgenerated
+			npc_gentle[$npcID] = 0
+			npc_rough[$npcID] = 0
+			gs 'lover', 'add_boyfriend', $npcID
+			'You find a guy named <<$npcdesc>> and send him your number after checking out his profile. You hope he''ll call you!'
 
-				act 'Leave this website': gt 'komp', 'browse'
-			end
+			act 'Leave this website': gt 'komp', 'browse'
+		end
 
-			act 'Look for a strong man':
-				cla
-				gs 'npcgeneratec', 0
-				gs 'boyStat', $npclastgenerated
-				gs 'boyfrend', 'start'
-				haraklover[lover_number] = 2
-				'You find a guy named <<$loverdesc[lover_number]>> and send him your number after checking out his profile. You hope he''ll call you!'
+		act 'Look for a strong man':
+			cla
+			gs 'npcgeneratec', 0
+			gs 'npcStat', $npclastgenerated
+			npc_gentle[$npcID] = 0
+			npc_rough[$npcID] = 1
+			gs 'lover', 'add_boyfriend', $npcID
+			'You find a guy named <<$npcdesc>> and send him your number after checking out his profile. You hope he''ll call you!'
 
-				act 'Leave this website': gt 'komp', 'browse'
-			end
+			act 'Leave this website': gt 'komp', 'browse'
 		end
 	end
 	act 'Leave this website': gt 'komp', 'browse'

+ 16 - 16
locations/arousal.qsrc

@@ -46,8 +46,8 @@ finally
 
 ARGS[1] for time taken in minutes - it is use partly for arousal calculation and partly for moving time ahead. If you want to calculate just the arousal and do not move time (simultaneous stimulation), use negative value.
 
-$ARGS[2] can be used for passing the name of boys dick variable .. 'dick' is default, which belong to $boy, else can be passed 'dick1' .. 'dick4' or 'dick[i]' along the boys parameters activation 
-The variables used can be set by calling boyStat e.g. gs 'boyStat', 'A75', 'a'  will set dick1 for NPC A75 
+$ARGS[2] can be used for passing the name of boys dick variable .. 'dick' is default, which belong to $boy, else can be passed 'dick1' .. 'dick4' or 'dick[i]' along the boys parameters activation
+The variables used can be set by calling boyStat e.g. gs 'boyStat', 'A75', 'a'  will set dick1 for NPC A75
 
 $ARGS[2] - [8] Are optional but can be upto 7 themes involved in the act and can be any of the following:
 'maso' 'bound' 'beast' 'exhibitionism' 'rough' 'prostitution' 'dom' 'sub' 'incest' 'feet' 'lesbian' 'group' 'gangbang' 'humiliation' 'deepthroat' 'unknown' 'gloryhole' 'rape' 'shemale' 'masturbate'
@@ -73,7 +73,7 @@ $orgasm_or = 'no' to prevent orgasm, it will remain in place until manually chan
 $orgasm_txt is used to add custom text that will be called if Sveta orgasms in the next arousal call. It will remain until cleared or orgasm so you must clear it if not forcing orgasm and don''t want it to be used on next orgasm.
 You can also add 'no_orgasm_msg' to the list of themes to prevent any orgasm message from being shown
 }
- 
+
 !!------------------------------------Virginity checks----------------------------------
 !!{
 	pcs_vag > 0: Hymen broken
@@ -98,11 +98,11 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 
 	if arrpos('$ARGS', 'unaware') >= 0: temp_unaware = 1
 	if arrpos('$ARGS', 'no_orgasm_msg') >= 0: temp_text = 1
-	
+
 	if mid($ARGS[2],1,4) = 'dick':
 		temp_dick = dyneval('result='+$ARGS[2])
-		temp_silavag = dyneval('result=silavag'+mid($ARGS[2],5,len($ARGS[2])-4))
-		$temp_dick_girth = dyneval('$result=$dick_girth'+mid($ARGS[2],5,len($ARGS[2])-4))
+		temp_silavag = dyneval('result=silavag'+mid($ARGS[2],5))
+		$temp_dick_girth = dyneval('$result=$dick_girth'+mid($ARGS[2],5))
 	else
 		temp_dick = dick
 		temp_silavag = silavag
@@ -171,7 +171,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 	end
 
 !!set a magnitude as a random
-	stim['mag'] = rand(0,3) + rand(0,3) + rand(0,3) 
+	stim['mag'] = rand(0,3) + rand(0,3) + rand(0,3)
 
 !! set up pain coefficient
 	pain_coeff = 0
@@ -708,7 +708,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 			stim['act'] += 20
 		end
 	end
-	
+
 	if pcs_hairbsh >= 0:
 		if arrpos('$ARGS', 'rape') >= 0:          pcs_hairbsh = iif(rand(30, pcs_hairlng)>30,-1,pcs_hairbsh)
 		if arrpos('$ARGS', 'rough') >= 0:         pcs_hairbsh = iif(rand(30, pcs_hairlng)>40,-1,pcs_hairbsh)
@@ -746,7 +746,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 			if (arrpos('$ARGS', 'bj') >= 0 or arrpos('$ARGS', 'cuni_give') >= 0):  pcs_makeup = iif(rand(pcs_makeup, pcs_makupskl/10)<3,rand(0,1),pcs_makeup)
 		end
 	end
-	
+
 	if stim['mag'] > 9: stim['mag'] = 9
 
 	if ARGS[1] > 0: minut += ARGS[1]
@@ -1028,7 +1028,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 	killvar 'grdif' & killvar 'ltdif'
 
 	gs 'nichUtil','onArouse',$ARGS[0]
-	
+
 end
 
 !!-----------------------------------------------
@@ -1071,7 +1071,7 @@ if $ARGS[0] = 'end':
 			stat['herm_sexual_partners'] += 1
 		end
 	end
-	
+
 	if npc_sex[$boy] = 0 and (count['vaginal'] + stim['lesbian']) > 0:
 		if npc_sexual[$boy] = 1 and npc_sex[$boy] = 0: stat['sexual_partners'] -= 1
 		if npc_sex[$boy] = 0:
@@ -1087,7 +1087,7 @@ if $ARGS[0] = 'end':
 		end
 		stat['vaginal_partners'] += 1
 	end
-	
+
 	if npc_anal_fucked[$boy] = 0 and count['anal'] > 0:
 		npc_anal_fucked[$boy] = 1
 		if npc_sexual[$boy] = 1 and npc_sex[$boy] = 0: stat['sexual_partners'] -= 1
@@ -1152,7 +1152,7 @@ if $ARGS[0] = 'end':
 	gs 'arousal', 'checks', 'shemale'
 	gs 'arousal', 'checks', 'hidden_shemale'
 	gs 'arousal', 'checks', 'masturbate'
-	
+
 	stim['event'] = 0
 
 !!Adding to counts for character stats
@@ -1219,7 +1219,7 @@ if $ARGS[0] = 'end':
 	gs 'arousal', 'count2', 'voyeur'
 	gs 'arousal', 'count2', 'voyeur_sex'
 	gs 'arousal', 'count2', 'erotic_nudity'
-	
+
 	!! Thats here because there is currently a variable zoo.
 		if zoo > beast['exp']: beast['exp'] = zoo
 		if beast['exp'] > zoo: zoo = beast['exp']
@@ -1256,7 +1256,7 @@ end
 if $ARGS[0] = 'auto_lube':
 	if $ARGS[1] = 'anal' and auto_anal_lube = 1 and anal_slip < 8 + pain['asshole']/2 - pcs_ass:
 		if mc_inventory['lubricant'] > 0:
-			if $ARGS[2] ! 'custom': 
+			if $ARGS[2] ! 'custom':
 				'You rub some lube in and around your anus.'
 			elseif $lube_txt ! '':
 				$lube_txt
@@ -1271,7 +1271,7 @@ if $ARGS[0] = 'auto_lube':
 	end
 	if $ARGS[1] = 'vag' and auto_vag_lube = 1 and vaginal_slip < 8 + pain['vaginal']/2 - pcs_vag:
 		if mc_inventory['lubricant'] > 0:
-			if $ARGS[2] ! 'custom': 
+			if $ARGS[2] ! 'custom':
 				'You rub some lube in and around your vagina.'
 			elseif $lube_txt ! '':
 				$lube_txt

+ 3 - 0
locations/body_structure.qsrc

@@ -4,6 +4,9 @@
 !	Get the bmi-strength class
 !	bs_class = func('body_structure', 'get_class', pcs_bmi, strenbuf)
 if $ARGS[0] = 'get_class':
+	if arrsize('ARGS') = 1: ARGS[1] = pcs_bmi
+	if arrsize('ARGS') = 2: ARGS[2] = strenbuf
+
 	!	bmi
 	if ARGS[1] < 16:
 		result = 0

+ 9 - 8
locations/cum_cleanup.qsrc

@@ -139,6 +139,7 @@ elseif $ARGS[0] = 'reset':
 	cumsumass = 0
 	Enable_clearcum = 0
 elseif $ARGS[0] = '':
+	if ARGS[0] ! 0: cumspclnt = ARGS[0]
 	if cumspclnt = 0: exit
 	KILLVAR 'spafinloc'
 	killvar 'toclean'
@@ -276,8 +277,8 @@ elseif $ARGS[0] = '':
 			!! vagina
 			if sparrloc[n] = 0:
 				!! cannot be completely cleaned with tissues\toilet use\hypno block\no enema kit
-				if FUNC('Cum_Manage', 'check_innards', sparrloc[n]) = 1 _ 
-				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _ 
+				if FUNC('Cum_Manage', 'check_innards', sparrloc[n]) = 1 _
+				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _
 				and (cumspclnt = 10 or cumspclnt = 1 or cumspclnt = 3)))):
 					cumsumbod -= sparrvol[n] & cumsumvag -= sparrvol[n]
 					sparrslc[n] = 0 & sparrvol[n] = 0
@@ -285,8 +286,8 @@ elseif $ARGS[0] = '':
 				end
 			!! ass
 			elseif sparrloc[n] = 3:
-				if FUNC('Cum_Manage', 'check_innards', sparrloc[n]) = 1 or cumspclnt = 7 _ 
-				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _ 
+				if FUNC('Cum_Manage', 'check_innards', sparrloc[n]) = 1 or cumspclnt = 7 _
+				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _
 				and (cumspclnt = 10 or cumspclnt = 1 or cumspclnt = 3)))):
 					cumsumbod -= sparrvol[n] & cumsumass -= sparrvol[n]
 					sparrslc[n] = 0 & sparrvol[n] = 0
@@ -302,16 +303,16 @@ elseif $ARGS[0] = '':
 		if tmp ! -1 and tmp < arrsize('toclean') and sparrvol[n] > 0:
 			!! vagina
 			if sparrloc[n] = 0:
-				if cumsumvag * rand(6, 9) / 6 >= FUNC('Cum_Manage', 'check_innards', sparrloc[n], 1) and isprok = 0 and vibratorIN = 0 _ 
-				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _ 
+				if cumsumvag * rand(6, 9) / 6 >= FUNC('Cum_Manage', 'check_innards', sparrloc[n], 1) and isprok = 0 and vibratorIN = 0 _
+				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _
 				and (cumspclnt = 10 or cumspclnt = 1 or cumspclnt = 3)))):
 					gs 'cum_cleanup', 'cleandeposit', n
 					if cumspclnt = 3: isprok = 0 & vibratorIN = 0
 				end
 			!! ass
 			elseif sparrloc[n] = 3:
-				if (cumsumass * rand(6, 9) / 6 >= FUNC('Cum_Manage', 'check_innards', sparrloc[n], 1) and analplugin = 0) or cumspclnt = 7 _ 
-				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _ 
+				if (cumsumass * rand(6, 9) / 6 >= FUNC('Cum_Manage', 'check_innards', sparrloc[n], 1) and analplugin = 0) or cumspclnt = 7 _
+				or (hypnoAddict = 0 and (cheatVars['enema'] = 1 or (mc_inventory['enema_kit'] = 1 _
 				and (cumspclnt = 10 or cumspclnt = 1 or cumspclnt = 3)))):
 					gs 'cum_cleanup', 'cleandeposit', n
 					if cumspclnt = 3 or cumspclnt = 7: analplugin = 0

+ 1 - 9
locations/intro_city_select.qsrc

@@ -90,16 +90,8 @@ if $ARGS[0] = 'start2':
 !!make sure this image shows up above the text that shows your birthday
 	!date_toggle = args[1]
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_2.jpg"></center>'
-	if birthday < 10 and birthmonth < 10:
-		$startdob = 'Your birthday: <B>0<<birthmonth>>/0<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	elseif birthday < 10 and birthmonth >= 10:
-		$startdob = 'Your birthday: <B><<birthmonth>>/0<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	elseif birthday >= 10 and birthmonth < 10:
-		$startdob = 'Your birthday: <B>0<<birthmonth>>/<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	elseif birthday >= 10 and birthmonth >= 10:
-		$startdob = 'Your birthday: <B><<birthmonth>>/<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	end
 
+	$startdob = 'Your birthday: <B><<mid(100 + birthday, 2, 2)>>/<<mid(100 + birthmonth, 2, 2)>>/<<birthyear>></B> (DD/MM/YYYY)'
 	'<a href="exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
 
 	act 'Confirm':

+ 3 - 9
locations/intro_sg_select.qsrc

@@ -76,15 +76,9 @@ if $ARGS[0] = 'SGStart2':
 !!make sure this image shows up above the text that shows your birthday
 	!date_toggle = args[1]
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_2.jpg"></center>'
-	if birthday < 10 and birthmonth < 10:
-		$startdob = 'Your birthday: <B>0<<birthmonth>>/0<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	elseif birthday < 10 and birthmonth >= 10:
-		$startdob = 'Your birthday: <B><<birthmonth>>/0<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	elseif birthday >= 10 and birthmonth < 10:
-		$startdob = 'Your birthday: <B>0<<birthmonth>>/<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	elseif birthday >= 10 and birthmonth >= 10:
-		$startdob = 'Your birthday: <B><<birthmonth>>/<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
-	end
+
+	$startdob = 'Your birthday: <B><<mid(100 + birthday, 2, 2)>>/<<mid(100 + birthmonth, 2, 2)>>/<<birthyear>></B> (DD/MM/YYYY)'
+
 
 	'<a href="exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
 

+ 2 - 2
locations/intro_sg_tg.qsrc

@@ -15,9 +15,9 @@ if $ARGS[0] = 'start':
 
 	if birthmonth = 0: birthmonth = 4
 	if birthday = 0: birthday = 1
-	if birthyear = 0: birthyear = 1969
+	if birthyear = 0: birthyear = 1999
 	!date_toggle = args[1]
-	$startdob = 'Your birthday: <B><<mid(100 + birthmonth, 2, 2)>>/<<mid(100 + birthday, 2, 2)>>/<<birthyear>></B> (MM/DD/YYYY)'
+	$startdob = 'Your birthday: <B><<mid(100 + birthday, 2, 2)>>/<<mid(100 + birthmonth, 2, 2)>>/<<birthyear>></B> (DD/MM/YYYY)'
 	'<a href= "exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
 
 	act 'Continue':

+ 5 - 6
locations/journal_work.qsrc

@@ -41,18 +41,17 @@ if $ARGS[0] = 'start':
 		if gpoliuborka > 1: 'You work part-time as a cleaner in the Pavlovsk clinic. Your schedule is from '+func('time', 'get_time_string', 14, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 21, 0, cheatVars['time_format'])+'.'
 !!		if TourGuide = 1: 'You work as a tour guide in the Pavlovsk park. Work is any day during the summer holidays for 8 hours, starting between 08:00 and 12:00. Salary is 1,000 <b>₽</b>.'
 	end
-	if workrin = 1: 'You are working in Arthur''s tent at the market as a clothing saleswoman. You work on Tuesday, Thursday and Saturday with a start time of '+func('time', 'get_time_string', 8, 0, cheatVars['time_format'])+'. Salary depends on sales.'
+	if workrin = 1: 'You work as a clothing saleswoman in Arthur''s tent at the market each Tuesday, Thursday and Saturday with a start time of '+func('time', 'get_time_string', 8, 0, cheatVars['time_format'])+'. Salary depends on sales.'
 	if maidqw = 1:
 		'You work in the Pavlovsk hotel as a maid. Your work schedule is every day from '+func('time', 'get_time_string', 16, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 19, 0, cheatVars['time_format'])+' and your salary is 250 <b>₽</b> plus tips.'
 	elseif GermanQW = 1:
 		'You can find out more about becoming a maid at the Pavlovsk hotel if you visit the manager between '+func('time', 'get_time_string', 12, 0, cheatVars['time_format'])+' and '+func('time', 'get_time_string', 14, 0, cheatVars['time_format'])+'.'
 	end
 	if postjobQW = 2 or postjobQW = 4: 'You deliver mail for the postmaster. The work day starts each Saturday between '+func('time', 'get_time_string', 11, 0, cheatVars['time_format'])+' and '+func('time', 'get_time_string', 12, 0, cheatVars['time_format'])+'. Salary is 450 <b>₽</b>.'
-	if stripwork >= 1: 'You work as a stripper at the Fuzzy Dice strip club every Wednesday and Thursday from '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'. No salary as you earn tips.'
-	if stripwork1 >= 1: 'You work as a stripper at the Fuzzy Dice strip club every Friday and Saturday from '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'. No salary as you earn tips.'
-!!	if stripbarwork >= 1: 'You work as a bargirl at the Fuzzy Dice strip club every Wednesday and Thursday from 18:00 to 03:00. Salary is automatically transferred on the 25th of each month.'
-!!	if stripbarwork1 >= 1: 'You work as a bargirl at the Fuzzy Dice strip club every Friday and Saturday from 18:00 to 03:00. Salary is automatically transferred on the 25th of each month.'
-	if film > 0: 'You are working as a pornographic actress under the name <<$pfname>>.'
+	if strip_club['stripwork'] = 1: 'You work as a stripper at the Golden Girls strip club. No salary as you earn tips.'
+	if strip_club['stripbarwork'] = 1: 'You work as a bargirl at the Golden Girls strip club every Wednesday and Thursday from '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'. Salary is automatically transferred on the 25th of each month. but you can earn tips from customers.'
+	if strip_club['stripbarwork1'] = 1: 'You work as a bargirl at the Golden Girls strip club every Friday and Saturday from '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'. Salary is automatically transferred on the 25th of each month, but you can earn tips from customers.'
+	if film > 0: 'You work as a pornographic actress under the name <<$pfname>>.'
 	if bumtolik = 4: 'You have been asked to help the homeless at the Mercy Clinic in the city industrial region.'
 	if bumtolik >= 5: 'You volunteer at the Mercy Clinic in the city industrial region and work with the homeless. Working hours are from '+func('time', 'get_time_string', 9, 0, cheatVars['time_format'])+' to '+func('time', 'get_time_string', 17, 0, cheatVars['time_format'])+' on Saturday and Sunday.'
 

+ 1 - 1
locations/lover_call.qsrc

@@ -8,7 +8,7 @@ if $ARGS[0] = 'scheduler':
 			$temp_npcid = $lover[ts_temp_i]
 			if $npc_rel_type[$temp_npcid] = 'boyfriend' or $npc_rel_type[$temp_npcid] = 'girlfriend':
 				if rand(0, 1) = 1:
-					gs 'telefon', 'SetCallSchedule', $temp_npcid, "gt 'lover_call', 'callingTheLover', '<<$temp_npcid>>'", "npc_meetday['<<$temp_npcid>>'] < <<daystart>> and hour >= 7 and hour <= 19", "gs 'lover_call', 'lover', '<<$temp_npcid>>'", "hour >= 6 and hour <= 19"
+					gs 'telefon', 'SetCallSchedule', $temp_npcid, "gt 'lover_call', 'callingTheLover', '<<$temp_npcid>>'", "npc_meetday['<<$temp_npcid>>'] < <<daystart>> and hour >= 7 and hour <= 19", "gs 'lover_call', 'lover', '<<$temp_npcid>>'", "totminut > <<totminut + (9 - hour) * 24 + rand(0, 600) - minut>>"
 				else
 					gs 'telefon', 'SetCallSchedule', $temp_npcid, "gt 'lover_call', 'callingTheLover', '<<$temp_npcid>>'", "npc_meetday['<<$temp_npcid>>'] < <<daystart>> and hour >= 7 and hour <= 19", "", "0"
 				end

+ 7 - 7
locations/npcStat.qsrc

@@ -52,37 +52,37 @@ else
 	npclastcalledn = val(mid($npcStatVars['tempID'], 2))
 	npcStatVars['gender'] = 0
 	if npclastcalledn = 1:
-		$npcStatVars['name'] = 'a small sized man'
+		$npcStatVars['name'] = 'a small sized'
 		npcStatVars['dick_length'] = 10
 		npcStatVars['dick_girth'] = 9
 		npcStatVars['sexskill'] = rand(0, 50)
 	elseif npclastcalledn = 2:
-		$npcStatVars['name'] = 'a medium sized man'
+		$npcStatVars['name'] = 'a medium sized'
 		npcStatVars['dick_length'] = 15
 		npcStatVars['dick_girth'] = 10
 		npcStatVars['sexskill'] = rand(30, 60)
 	elseif npclastcalledn = 3:
-		$npcStatVars['name'] = 'a large sized man'
+		$npcStatVars['name'] = 'a large sized'
 		npcStatVars['dick_length'] = 20
 		npcStatVars['dick_girth'] = 11
 		npcStatVars['sexskill'] = rand(40, 60)
 	elseif npclastcalledn = 4:
-		$npcStatVars['name'] = 'a huge sized man'
+		$npcStatVars['name'] = 'a huge sized'
 		npcStatVars['dick_length'] = 25
 		npcStatVars['dick_girth'] = 12
 		npcStatVars['sexskill'] = rand(35, 70)
 	elseif npclastcalledn = 5:
-		$npcStatVars['name'] = 'a giant sized man'
+		$npcStatVars['name'] = 'a giant sized'
 		npcStatVars['dick_length'] = 30
 		npcStatVars['dick_girth'] = 13
 		npcStatVars['sexskill'] = rand(30, 80)
 	elseif npclastcalledn = 6:
-		$npcStatVars['name'] = 'a humongous sized man'
+		$npcStatVars['name'] = 'a humongous sized'
 		npcStatVars['dick_length'] = 35
 		npcStatVars['dick_girth'] = 14
 		npcStatVars['sexskill'] = rand(20, 90)
 	else
-		$npcStatVars['name'] = 'a horse sized man'
+		$npcStatVars['name'] = 'a horse sized'
 		npcStatVars['dick_length'] = 40
 		npcStatVars['dick_girth'] = 15
 		npcStatVars['sexskill'] = rand(0, 100)

+ 26 - 26
locations/npcgeneratec.qsrc

@@ -552,11 +552,11 @@ if $ARGS[0] = 'set_lifestyle':
 		end
 
 		npc_apt_number[$ARGS[1]] = rand(1,2)
-		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
-		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
+		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/high_rise/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
 
 	elseif npc_apt_type[$ARGS[1]] = 4 or npc_apt_type[$ARGS[1]] = 5:
 		!! multi-bedroom
@@ -579,42 +579,42 @@ if $ARGS[0] = 'set_lifestyle':
 
 		npc_apt_number[$ARGS[1]] = rand(1,2)
 
-		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/kitchen.jpg"></center>'
-		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
-		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
-		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
-		$npc_apt_spare[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/<<$npc_apt_sparetype[$ARGS[1]]>>.jpg"></center>'
+		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/kitchen.jpg"></center>'
+		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
+		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
+		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
+		$npc_apt_spare[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/multibedroom/<<npc_apt_number[$ARGS[1]]>>/<<$npc_apt_sparetype[$ARGS[1]]>>.jpg"></center>'
 
 	elseif npc_apt_type[$ARGS[1]] = 3:
 		!! one bedroom
 		npc_apt_number[$ARGS[1]] = rand(1, 3)
 
-		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/kitchen.jpg"></center>'
-		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
-		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
-		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
+		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/kitchen.jpg"></center>'
+		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
+		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
+		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
 
 	elseif npc_apt_type[$ARGS[1]] = 2:
 		!! studio apartment
 		npc_apt_number[$ARGS[1]] = rand(1, 2)
 
-		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
-		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
+		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
 
 	elseif npc_apt_type[$ARGS[1]] = 1:
 		!! student dorm
 		npc_apt_number[$ARGS[1]] = rand(1, 3)
 
-		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
-		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/kitchen.jpg"></center>'
-		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
-		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
-		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
+		$npc_apt_bedroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bedroom.jpg"></center>'
+		$npc_apt_kitchen[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/kitchen.jpg"></center>'
+		$npc_apt_livingroom[$ARGS[1]]	= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
+		$npc_apt_bathroom[$ARGS[1]]		= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/1bedroom/<<npc_apt_number[$ARGS[1]]>>/bath.jpg"></center>'
+		$npc_apt_hall[$ARGS[1]]			= '<center><img <<$set_imgh>> src="<<$npcgeneratecVars[''home_path'']>>/studio/<<npc_apt_number[$ARGS[1]]>>/living.jpg"></center>'
 	end
 
 

+ 2 - 0
locations/pav_disco_sex.qsrc

@@ -998,6 +998,8 @@ if $ARGS[0] = 'fuck_pre1':
 				if will_cost <= pcs_willpwr:
 					act 'Insist (<<will_cost>> Willpower)':
 						cla & *clr
+						gs 'willpower', 'pay', 'self'
+						gs 'stat'
 						gdk['condom'] = 1
 						'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
 						'"Come on! Please!"'

+ 21 - 24
locations/stat.qsrc

@@ -3,11 +3,8 @@
 !!This is error catching to prevent stat from running too early
 if opPRE > 0: exit
 
-if Enable_Android = 0:
-	clr
-	!only clear status and renew object in non-Android mode
-	gs 'obj_din', 'old'
-end
+if Enable_Android = 0: gs 'obj_din', 'old'
+
 
 if daystart_start < 100:
 	pl '<BR>Did you start at the <a href="exec:daystart_start = 239 & gs ''time'' & gs''stat''">end of August</a> or <a href="exec:daystart_start = 153 & gs ''time'' & gs''stat''">beginning of June</a>?'
@@ -18,7 +15,7 @@ $BACKIMAGE = ''
 
 view
 rand1 = rand(0,100)
-$stat_msg=''
+$stat_msg[1] = ''
 
 if daystage = 1:
 	$daystage['desc'] = 'dawn'
@@ -149,7 +146,7 @@ if $start_type[1] ! 'nomagic':
 	if pcs_magik > magikhigh:
 		magikhigh = pcs_magik
 		rikudo += pcs_magik * 100
-		$stat_msg += '<BR><b>You feel like a strength has been revealed within you, and you gush with magic, lifting you to a new energy level.</b>'
+		$stat_msg[1] += '<BR><b>You feel like a strength has been revealed within you, and you gush with magic, lifting you to a new energy level.</b>'
 !!		This will be replaced when a more advanced physical system is made
 		if (pcs_magik mod 2 ! 0) and pcs_eyesize < 2: pcs_eyesize += 1
 		if (pcs_magik mod 2 = 0) and pcs_lashes < 2: pcs_lashes += 1
@@ -397,13 +394,6 @@ if totminut >= heelsminut + 30:
 end
 !!!!!!!!!!!!!!! End heels
 
-
-! Determine Incoming Telephone Calls and SMS
-if prevtotmin ! totminut:
-	gs 'telefon', 'IncomingCheck', prevtotmin, totminut
-	gs 'telefon', 'IncomingSMSCheck'
-end
-
 if minut < 10:
 	$nilmin = '0'
 else
@@ -592,7 +582,7 @@ else
 							sucabscum = 1
 							gs 'cum_cleanup', 'cleandeposit', suctemparr
 							cumloc[suctempi] = 0
-							!debug code $stat_msg += '<BR>Absorb ext <<sexnutrition>>'
+							!debug code $stat_msg[1] += '<BR>Absorb ext <<sexnutrition>>'
 						end
 					end
 					if suctempi < 17:jump 'SuccAbsorbLoop'
@@ -616,9 +606,9 @@ else
 						$sucabs1 = 'absorbed energy from the woman you had sex with'
 					else
 						!!Debug code
-						$stat_msg += '<BR>SOMETHING HAPPENED!'
+						$stat_msg[1] += '<BR>SOMETHING HAPPENED!'
 					end
-					$stat_msg += '<BR>You <<$sucabs1>><<$sucabs2>><<$sucabs3>>, gaining nourishment.'
+					$stat_msg[1] += '<BR>You <<$sucabs1>><<$sucabs2>><<$sucabs3>>, gaining nourishment.'
 					sucabslez = 0 & sucabscum = 0
 					$sucabs1 = '' & $sucabs2 = '' & $sucabs3 = ''
 					if (pcs_mood < 100): pcs_mood += ((pcs_mood / 100) * 5)
@@ -689,7 +679,7 @@ if pcs_energy < 0:
 		pcs_energy += 8
 	elseif pcs_mass['body'] = 0 and pcs_stren + pcs_vital <= 0:
 		gs 'gameover', 'check', 3
-		$stat_msg += '<br><font color=red><b>You starved to death, but Cheat Mode keeps you Alive.</b></font>'
+		$stat_msg[1] += '<br><font color=red><b>You starved to death, but Cheat Mode keeps you Alive.</b></font>'
 		fat = 1
 	elseif pcs_mass['body'] > 0:
 		if cheatVars['fat'] = 0: fat -= 1
@@ -712,7 +702,7 @@ end
 
 if pcs_health < 0:
 	gs 'gameover', 'check', 1
-	$stat_msg += '<br><font color=red><b>You died from injuries, but Cheat Mode keeps you Alive.</b></font>'
+	$stat_msg[1] += '<br><font color=red><b>You died from injuries, but Cheat Mode keeps you Alive.</b></font>'
 	pcs_health = 0
 end
 
@@ -720,7 +710,7 @@ if pcs_willpwr <= 0 :
 	!this will set willpower to 0 correctly; then check mana =1 for insane-gameover(pcs_willpwr=0&mana=1).
 	if pcs_mood <= 1:
 		gs 'gameover', 'check', 2
-		$stat_msg += '<br><font color=red><b>You are insane, but Cheat Mode keeps you Alive.</b></font>'
+		$stat_msg[1] += '<br><font color=red><b>You are insane, but Cheat Mode keeps you Alive.</b></font>'
 		!pcs_mood already checked for >=1 in line 1113 if pcs_mood <= 0, no need to set another one
 	end
 	pcs_willpwr = 0
@@ -866,9 +856,9 @@ end
 
 if hotelRoom['pav'] > 0:
 	if hotelRoomDays['pav'] - 1 = daystart:
-		$stat_msg += '<BR>You have 1 night left on your Pavlosk hotel booking.'
+		$stat_msg[1] += '<BR>You have 1 night left on your Pavlosk hotel booking.'
 	elseif hotelRoomDays['pav'] = daystart and hour < 11:
-		$stat_msg += '<BR>Your room at the Pavlosk hotel has check out today at '+func('time', 'get_time_string', 11, 0, cheatVars['time_format'])+''
+		$stat_msg[1] += '<BR>Your room at the Pavlosk hotel has check out today at '+func('time', 'get_time_string', 11, 0, cheatVars['time_format'])+''
 	elseif hotelRoomDays['pav'] = daystart:
 		hotelRoom['pav'] = 0
 	end
@@ -876,9 +866,9 @@ end
 
 if hotelRoom['city'] > 0:
 	if hotelRoomDays['city'] - 1 = daystart:
-		$stat_msg += '<BR>You have 1 night left on your St Petersburg hotel booking.'
+		$stat_msg[1] += '<BR>You have 1 night left on your St Petersburg hotel booking.'
 	elseif hotelRoomDays['city'] = daystart and hour < 11:
-		$stat_msg += '<BR>Your room at the St Petersburg hotel has check out today at '+func('time', 'get_time_string', 11, 0, cheatVars['time_format'])+''
+		$stat_msg[1] += '<BR>Your room at the St Petersburg hotel has check out today at '+func('time', 'get_time_string', 11, 0, cheatVars['time_format'])+''
 	elseif hotelRoomDays['city'] = daystart:
 		hotelRoom['city'] = 0
 	end
@@ -949,4 +939,11 @@ if hypnoSchedule = 1:
 end
 
 
+! Determine Incoming Telephone Calls and SMS
+if prevtotmin ! totminut:
+	gs 'telefon', 'IncomingCheck', prevtotmin, totminut
+	gs 'telefon', 'IncomingSMSCheck'
+end
+
+
 --- stat ---------------------------------

+ 4 - 1
locations/stat_display.qsrc

@@ -1,9 +1,12 @@
 # stat_display
 !!2021/04/04
 
+if Enable_Android = 0: clear
+
+$stat_msg = $stat_msg[1]
+
 !! --- CALL TRACE, when enabled (`debug['trace_shown'] = 1`) replaces stat_display
 if debug['trace_shown'] ! 0:
-	clear
 	p '<center>'
 	if $git_hash ! '': pl '<<$git_hash>>'
 	if debug['call_trace_selector'] = 0:

+ 827 - 560
locations/stripclub.qsrc

@@ -1,6 +1,6 @@
 # stripclub
-!!2021/04/15
-close all
+!!2024/08/10
+close ALL
 
 if $ARGS[0] = 'start':
 	*clr & cla
@@ -19,577 +19,366 @@ if $ARGS[0] = 'start':
 	end
 	gs 'stat'
 	gs 'themes', 'indoors'
-	'<center><b><font color="maroon">Fuzzy Dice Strip Club</font></b></center>'
+	'<center><b><font color="maroon">Strip Club</font></b></center>'
 	if month >= 11 and month <= 12 or month >= 1 and month <= 3:
 		if hour >= 19 or hour <= 5: '<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_night_winter.jpg"></center>'
 		if hour >= 6 and hour <= 18: '<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_day_winter.jpg"></center>'
 	else
-		if hour >= 20 and hour <= 23: '<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_night_summer_1.jpg"></center>'
-		if hour >= 0 and hour <= 5: '<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_night_summer_2.jpg"></center>'
+		if hour >= 20 and hour <= 5: '<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_night_summer.jpg"></center>'
 		if hour >= 6 and hour <= 19: '<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_day_summer.jpg"></center>'
 	end
 	*nl
 
 	act 'Leave': gt 'city_redlight', 'start'
 
-	'There are other strip clubs in the area, the <a href="exec:view''images/locations/city/redlight/stripclub/macho.jpg''">Macho</a>, the <a href="exec:view''images/locations/city/redlight/stripclub/maximus_night.jpg''">Maximus</a> and the <a href="exec:view''images/locations/city/redlight/stripclub/penthouse_night.jpg''">Penthouse</a>, but they are not as popular as the Fuzzy Dice.'
-
 	if hour = 3:
-		'The strip club is closing, and a security guard ushers everyone out.'
+		'The strip club is closing, and the security guards are ushering everyone out.'
 	elseif hour > 3 and hour < 18:
-		'The strip club is closed. You notice a sign on the door stating that business hours are between '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' and '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'.'
+		'The strip club is closed. You notice a sign on the door stating that business hours are between 18:00 and 03:00.'
 	else
-		if stripdolg > 0:
-			if money >= 50000:
-				act 'Pay off your fine (50,000 <b>₽</b>)':
-					stripdolg = 0
-					money -= 50000
-					gt 'stripclub', 'start'
-				end
-			else
-				*nl
-				'You still owe a 50,000 <b>₽</b> fine for your illegal actions. You can''t return to the club until you''ve paid it off.'
-			end
-		else
-			if age >= 18 or fakepassport = 1:
-				if ((week = 3 or week = 4) and stripwork = 1) or ((week = 5 or week = 6) and stripwork1 = 1):
-					'"Evening, <<$pcs_stagename>>. You working tonight?" he asks.'
-					'You give him a quick nod as you head for the employee entrance.'
-					act 'Use the employee''s entrance':frost = 0 & gt 'stwork', 'start'
-				elseif (stripwork = 1 or stripwork1 = 1) or (stripbarwork = 1 or stripbarwork1 = 1):
-					'Hey, <<$pcs_stagename>>. Paying us a visit on your night off?" he asks.'
-					'You nod and he stands aside to let you in. "I''m sure the patrons won''t recognize you with clothes on," he says with a smile.'
-				else
-					'The security guard stops you and, looking you up and down, asks to see your ID.'
-					'He looks it over before nodding. "You''re free to enter," he says and stands aside to let you in.'
-				end
-				if stripdolg = 0:
-					if cfnm = 1 and (stripwork = 1 or stripwork1 = 1) or (stripbarwork = 1 or stripbarwork1 = 1):
-						act 'Enter the club':
-							cla
-							minut += 5
-							frost = 0
-							'"As you know, it''s Ladies Night tonight. Enjoy," he says with a smile.'
-							gt 'stripclub', 'forwoman'
-						end
-					elseif cfnm = 0 and (stripwork = 1 or stripwork1 = 1) or (stripbarwork = 1 or stripbarwork1 = 1):
-							act 'Enter the club':
-							cla
-							minut += 5
-							frost = 0
-							'"Enjoy the girls tonight," he says with a smile.'
-							gt 'stripclub', 'forman'
-						end
-					elseif cfnm = 1 and money >= 500:
-						act 'Enter the club (500 <b>₽</b>)':
-							cla
-							money -= 500
-							minut += 5
-							frost = 0
-							'"It''s Ladies Night tonight. Enjoy," he says with a smile.'
-							gt 'stripclub', 'forwoman'
-						end
-					elseif cfnm = 0 and money >= 300:
-						act 'Enter the club (300 <b>₽</b>)':
-							cla
-							money -= 300
-							minut += 5
-							frost = 0
-							'"Enjoy the girls tonight," he says with a smile.'
-							gt 'stripclub', 'forman'
-						end
-					else
-						*nl
-						'You don''t have enough money to pay the entry fee.'
-					end
-				end
-				if pcs_dancero > 0 and stripwork = 0 and pcs_inhib >= 50 and stripwork1 = 0:
-					act 'Ask the manager about working as a stripper': gt 'stripclub', 'manager_stripper'
-				elseif stripwork = 0 and pcs_inhib < 50 and stripwork1 = 0:
-					'You could ask the manager for a job, but you don''t feel confident enough to be a stripper. You should get more used to showing off your body first.'
-				end
-				!!if pcs_inhib >= 60 and (stripbarwork = 0 or stripbarwork1 = 0):
-					!!act 'Ask the manager about working in the bar': gt 'stripclub', 'manager_bargirl'
-				!!elseif pcs_inhib < 60 and (stripbarwork = 0 or stripbarwork1 = 0):
-					!!'You could ask the manager for a job, but you don''t feel confident enough to work in a strip club, even if it is just in the bar.'
-				!!end
-			else
-				'The security guard stops you and, looking you up and down, asks to see your ID.'
-				'You make a show of rummaging through your purse. "Sorry, I must have left it at home."'
-				'"You need to leave, but be sure to come back when you''re old enough," he replies.'
-			end
-		end
+		gs 'stripclub', 'entry'
+		if strip_club['stripwork'] = 1 or strip_club['stripbarwork'] = 1 or strip_club['stripbarwork1'] = 1: gs 'stripclub', 'employee_entrance'
 	end
 end
 
-if $ARGS[0] = 'manager_stripper':
-	*clr & cla
-	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/tryout.jpg"></center>'
-	minut += 15
-	gs 'stat'
-	'You enter the manager''s office and he greets you with a smile. "Hello and welcome to the Fuzzy Dice. How can I help you?"'
-	'You return the smile. "Hi, I was wondering if I could get a job here as a stripper?"'
-	'The manager looks you over. "Are you at least 18 years old? I had a visit from the police last week, and they found an underage girl working here. I was fortunate enough that the officers could be bribed."'
+if $ARGS[0] = 'employee_entrance':
+	act 'Head around to the back':
+		!! Possible to recognize that Sveta is working a stripper shift that night?
+		if strip_club['stripwork'] = 1:
+			'"Evening, <<$pcs_strippername>>. Good crowd tonight," the bouncer says with a smile.'
+			'You give him a quick nod as you head for the stripper entrance round back.'
+			act 'Use the stripper''s entrance': frost = 0 & gt 'stwork', 'start'
+		elseif (strip_club['stripbarwork'] = 1 and (week = 3 or week = 4)) or (strip_club['stripbarwork1'] = 1 and (week = 5 or week = 6)):
+			'"Evening, <<$pcs_nickname>>. Good crowd. Should be a busy bar tonight," the bouncer says with a smile.'
+			'You give him a nod as he stands aside and lets you enter.'
+			act 'Head to the bar': frost = 0 & gt 'stwork3', 'start'
+		elseif (strip_club['stripwork'] = 1 or strip_club['stripwork1'] = 1) or (strip_club['stripbarwork'] = 1 or strip_club['stripbarwork1'] = 1):
+			'"Decided to pay us a visit on your night off?" the bouncer asks.'
+			'You nod and he stands aside to let you in.'
+			if strip_club['stripwork'] = 1: '"I''m sure the customers won''t recognize you with clothes on," he says with a smile.'
+			if strip_club['stripbarwork'] = 1 or strip_club['stripbarwork1'] = 1: '"Have fun spending the night on the other side of the bar," he says with a smile.'
+			act 'Enter the club': gt 'stripclub', 'main_floor'
+		end
+	end
+end
 
-	if age >= 18 or fakepassport = 1:
-		if age >= 18:
-			'"Yes I am," you confidently reply and hand him your ID.'
+if $ARGS[0] = 'entry':
+	act 'Enter the club':
+		*clr & cla
+		'<center><b><font color="maroon">Strip Club</font></b></center>'
+		if month >= 11 and month <= 12 or month >= 1 and month <= 3:
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_night_winter.jpg"></center>'
 		else
-			'"Yes I am," you answer, handing him your fake passport.'
-			'You see him frown as he checks your passport with suspicion. "Well, I guess everything is in order."'
-		end
-		'He leads you to one of the private booths and points to the pole. "Show me what you can do."'
-		if pcs_dancero >= 40 and pcs_dancpol >= 30:
-			'You dance sensually, and clearly he''s smitten by you as he asks you to sit down. "Our business hours are between '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' and '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'. We don''t pay you, but the customers tip generously. Think of it as an incentive; perform well and you''ll earn a tip."'
-			'"Strippers can perform lap dances for clients at their request for 1000 <b>₽</b> per dance. The stripper gets 400 <b>₽</b>, and the rest goes to the club. Some clients may want to pay extra for further ''entertainment'', but we are <i>not</i> a brothel. A quick blowjob is fine, but anything further will arouse suspicion. You''re not forced to do this by the way, so call for security if they start getting too pushy with you. You''re free to do whatever you want with them outside of business hours though."'
-			'"One last thing. Dancing on stage involves a lot of work on the pole, so unless you can do that, it''s unlikely you will earn anything. We have a set schedule, so you can choose whether you wish to work Wednesday and Thursday nights, or Friday and Saturday nights. Tuesday is Ladies'' Night and is for male strippers only, so it''s a night off for all the girls. So what do you say? Interested?"'
-			act 'Take the weekday shifts':
-				*clr & cla
-				stripwork = 1
-				gs 'stat'
-				'You think about it for a minute and smile at him as you accept his offer, choosing to work on Wednesday and Thursday nights.'
-				'The manager leads you to the dressing room and tells a woman responsible for the costumes that you''re going to join the club. He also introduces you to the chief of security, who takes your picture and makes you sign some documents.'
-				if $pcs_stagename = '':
-					'"Our girls don''t perform under their real name for obvious reasons. What would you like your stage name to be?"'
-						$pcs_stagename = input("What name would you like to use at the strip club? (Leave blank for Sapphire)")
-					if $pcs_stagename = '':$pcs_stagename = 'Sapphire'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/club_night_summer.jpg"></center>'
+		end
+		if strip_club['id_check'] ! 0:
+			'Recognizing you from your previous visit, the bouncer nods and stands aside to let you enter.'
+			gs 'stripclub', 'pay_enter'
+		else
+			'You try to enter the club, but the bouncer stops you at the door. "Hold up. I''m gonna need to see some ID."'
+			if age >= 21:
+				act 'Seriously?':
+					cla & *nl
+					strip_club['id_check'] = 1
+					'You roll your eyes. "Are you being serious? Do I look like some snot nosed teenager trying to sneak in and see some tits?"'
+					'"Deadly," he replies. "ID or you''re not getting in to ''see some tits.''"'
+					'You begrudingly rummage through your purse and pull out your passport. The bouncer takes a look at it and nods.'
+					*nl
+					'"Nice picture," he laughs as he hands it back to you. "I was just messing with you. You''re free to come in."'
+					'You just roll your eyes at him as you stuff your passport back in your bag.'
+					gs 'stripclub', 'pay_enter'
 				end
-				'"<<$pcs_stagename>>. I like it," the manager says with a smile.'
-				'Once you''re done with the forms, you''re sent back to the manager''s office.'
-				'"Before you go on stage, I expect you to drop by my office so I can see if you''re up to our club standards. It''s just a routine check to make sure that the club''s reputation stays intact. Nothing to worry about," he says before ushering you out of his office again.'
-
-				if cfnm = 0:act 'Head to the dressing room':gt 'stwork', 'start'
-					if cfnm = 1:
-					'There are only males performing tonight, so the room is full of guys getting ready to perform.'
-					act 'Leave':gt 'stripclub', 'work_leave'
+			elseif age >= 18 and age < 21:
+				act 'Show him your passport':
+					cla & *nl
+					strip_club['id_check'] = 1
+					'You rummage through your purse and pull out your passport, showing him you''re of legal age. The bouncer takes a look at it and nods.'
+					'"Okay, you check out."'
+					gs 'stripclub', 'pay_enter'
 				end
-			end
-
-			act 'Take the weekend shifts':
-				*clr & cla
-				stripwork1 = 1
-				gs 'stat'
-				'You think about it for a minute and smile at him as you accept his offer, choosing to work on Friday and Saturday nights.'
-				'The manager leads you to the dressing room and tells a woman responsible for the costumes that you''re going to join the club. He also introduces you to the chief of security, who takes your picture and makes you sign some documents.'
-				if $pcs_stagename = '':
-					'"Our girls don''t perform under their real name for obvious reasons. What would you like your stage name to be?"'
-						$pcs_stagename = input("What name would you like to use at the strip club? (Leave blank for Sapphire)")
-					if $pcs_stagename = '':$pcs_stagename = 'Sapphire'
+			elseif fakepassport = 1:
+				act 'Show him your fake passport':
+					cla & *nl
+					strip_club['id_check'] = 1
+					'You rummage through your purse and pull out your fake passport, showing him you''re of "legal age." The bouncer takes a long look at it before he nods.'
+					'"Okay, you check out."'
+					gs 'stripclub', 'pay_enter'
 				end
-				'"<<$pcs_stagename>>. I like it," the manager says with a smile.'
-				'Once you''re done with the forms, you''re sent back to the manager''s office.'
-				'"Before you go on stage, I expect you to drop by my office so I can see if you''re up to our club standards. It''s just a routine check to make sure that the club''s reputation stays intact. Nothing to worry about," he says before ushering you out of his office again.'
-
-				if cfnm = 0:act 'Head to the dressing room':gt 'stwork', 'start'
-					if cfnm = 1:
-					'There are only males performing tonight, so the room is full of guys getting ready to perform.'
-					act 'Leave':gt 'stripclub', 'work_leave'
+			else
+				act 'Uhh...':
+					cla & *nl
+					'"Uhhh..." You awkwardly make a show of rummaging through your purse before coming up empty handed. "Sorry, I must have left my ID at home. Can I-"'
+					'"No." He pushes you away. "No under 18s allowed. Come back when you''re old enough."'
+					act 'Leave': gt 'stripclub', 'start'
 				end
 			end
+		end
+	end
 
-			act 'Reject his offer':
-				*clr & cla
-				gs 'stat'
-				'You thank him for the offer, but you''re not ready to commit to anything yet.'
-				'You can see on his face that he''s disappointed, but he can''t really do anything about your decision. He thanks you and tells you if you ever change your mind you''re welcome back.'
-				act 'Leave':gt 'stripclub', 'work_leave'
+	if pcs_dancero > 0 and strip_club['stripwork'] = 0:
+		act 'Ask about working here': gt 'stripclub', 'hire1'
+	elseif strip_club['stripwork'] = 0:
+		if pcs_inhib >= 40:
+			act 'Ask about working here':
+				gs 'willpower', 'pay', 'force'
+				gt 'stripclub', 'hire1'
 			end
-		elseif pcs_dancero >= 40:
-			'After a minute, he stops you and shakes his head. "Your pole-dancing is still lacking <<$pcs_nickname>>. If you want this job, you''ll have to take some dance classes first. I believe you can do that at the gym."'
-			'"Come back when you can handle the pole, and I''ll give you another chance."'
-			act 'Leave':gt 'stripclub', 'work_leave'
 		else
-			'After a minute he stops you and shakes his head. "Your dancing is very lacking <<$pcs_nickname>>. If you want this job, you''ll have to take some dance classes first. I believe you can do that at the gym."'
-			'"Come back when you can dance on stage without me worrying you''ll fall off, and I''ll give you another chance."'
-			act 'Leave':gt 'stripclub', 'work_leave'
-		end
-!! For when bar work as a job is available will need to be moved so it is checked for first
-!!{
-	elseif stripbarwork = 1 or stripbarwork1 = 1:
-		'You enter the manager''s office and he greets you with a smile. "Hey there <<$pcs_nickname>>, how can I help you?"'
-		'You return the smile. "Hi, I was wondering if I could get a job as a stripper?"'
-		'The manager chuckles. "Bored of watching the action and wanting to get in on it?"'
-		'He leads you to one of the private booths and points to the pole. "Okay. Show me what you can do."'
-		if pcs_dancero >= 40 and pcs_dancpol >= 30:
-			'You dance sensually, and clearly he''s smitten by you as he asks you to sit down. "As you know, our business hours are between '+func('time', 'get_time_string', 18, 0, cheatVars['time_format'])+' and '+func('time', 'get_time_string', 3, 0, cheatVars['time_format'])+'. We don''t pay you, but the customers tip generously. Think of it as an incentive; perform well and you''ll earn a tip."'
-			'"Strippers can perform lap dances for clients at their request for 1000 <b>₽</b> per dance. The stripper gets 400 <b>₽</b>, and the rest goes to the club. Some clients may want to pay extra for further ''entertainment'', but we are <i>not</i> a brothel. A quick blowjob is fine, but anything further will arouse suspicion. You''re not forced to do this by the way, so call for security if they start getting too pushy with you. You''re free to do whatever you want with them outside of business hours though."'
-			'"One last thing. Dancing on stage involves a lot of work on the pole, so unless you can do that, it''s unlikely you will earn anything. Coincidentally, my current schedule for strippers is the same for the bar, so you can choose when you want to work. You''ll remember that Tuesday night is Ladies Night and is for male strippers only. So what do you say? Interested?"'
-			act 'Take the weekday shifts':
-				*clr & cla
-				stripwork = 1
-				gs 'stat'
-				'You think about it for a minute and smile at him as you accept his offer, choosing to work on Wednesday and Thursday nights.'
-				'The manager leads you to the dressing room and tells a woman responsible for the costumes that you''re going to join the club. He also introduces you to the chief of security, who takes your picture and makes you sign some documents.'
-				if $pcs_stagename = '':
-					'"Our girls don''t perform under their real name for obvious reasons. What would you like your stage name to be?"'
-						$pcs_stagename = input("What name would you like to use at the strip club? (Leave blank for Sapphire)")
-					if $pcs_stagename = '':$pcs_stagename = 'Sapphire'
-				end
-				'"<<$pcs_stagename>>. I like it," the manager says with a smile.'
-				'Once you''re done with the forms, you''re sent back to the manager''s office.'
-				'"Before you go on stage, I expect you to drop by my office so I can see if you''re up to our club standards. It''s just a routine check to make sure that the club''s reputation stays intact. Nothing to worry about," he says before ushering you out of his office again.'
-
-				if cfnm = 0:act 'Head to the dressing room':gt 'stwork', 'start'
-					if cfnm = 1:
-					'There are only males performing tonight, so the room is full of guys getting ready to perform.'
-					act 'Leave':gt 'stripclub', 'work_leave'
+			gs 'willpower', 'pcs_inhib', 'self', 'medium'
+			if pcs_willpwr < will_cost:
+				act 'Ask about working here (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			else
+				act 'Ask about working here (<<will_cost>> Willpower)':
+					gs 'willpower', 'pay', 'force'
+					gt 'stripclub', 'hire1'
 				end
 			end
+		end
+	end
+end
 
-			act 'Take the weekend shifts':
-				*clr & cla
-				stripwork1 = 1
-				gs 'stat'
-				'You think about it for a minute and smile at him as you accept his offer, choosing to work on Friday and Saturday nights.'
-				'The manager leads you to the dressing room and tells a woman responsible for the costumes that you''re going to join the club. He also introduces you to the chief of security, who takes your picture and makes you sign some documents.'
-				if $pcs_stagename = '':
-					'"Our girls don''t perform under their real name for obvious reasons. What would you like your stage name to be?"'
-						$pcs_stagename = input("What name would you like to use at the strip club? (Leave blank for Sapphire)")
-					if $pcs_stagename = '':$pcs_stagename = 'Sapphire'
-				end
-				'"<<$pcs_stagename>>. I like it," the manager says with a smile.'
-				'Once you''re done with the forms, you''re sent back to the manager''s office.'
-				'"Before you go on stage, I expect you to drop by my office so I can see if you''re up to our club standards. It''s just a routine check to make sure that the club''s reputation stays intact. Nothing to worry about," he says before ushering you out of his office again.'
-
-				if cfnm = 0:act 'Head to the dressing room':gt 'stwork', 'start'
-					if cfnm = 1:
-					'There are only males performing tonight, so the room is full of guys getting ready to perform.'
-					act 'Leave':gt 'stripclub', 'work_leave'
+if $ARGS[0] = 'pay_enter':
+	if strip_club['pay_fee'] = 0:
+		'He stops you just as you''re about to walk past him. "Not so fast. There''s a 300 <b>₽</b> cover charge."'
+		act 'Seriously?!':
+			cla & *nl
+			'"Ugh, are you kidding me?"'
+			'"Rules are rules," he shrugs.'
+
+			act 'Leave': gt 'city_redlight', 'start'
+			if money >= 300:
+				act 'Pay up (300 <b>₽</b>)':
+					cla & *nl
+					'You dig through your purse a second time and pull out a small wad of cash. Handing it to the bouncer, he takes it from you and waves you inside.'
+					money -= 300
+					minut += 1
+					strip_club['pay_fee'] = 1
+					frost = 0
+					act 'Go inside': gt 'stripclub', 'main_floor'
 				end
 			end
-
-			act 'Reject his offer':
-				*clr & cla
-				gs 'stat'
-				'You thank him for the offer, but you''re not ready to commit to anything yet.'
-				'You can see on his face that he''s disappointed, but he can''t really do anything about your decision. He thanks you and tells you if you ever change your mind you''re welcome back.'
-				act 'Leave':gt 'stripclub', 'work_leave'
-			end
-		elseif pcs_dancero >= 40:
-			'After a minute, he stops you and shakes his head. "Your pole-dancing is still lacking <<$pcs_nickname>>. If you want this job, you''ll have to take some dance classes first. I believe you can do that at the gym."'
-			'"Come back when you can handle the pole, and I''ll give you another chance."'
-			act 'Leave':gt 'stripclub', 'work_leave'
-		else
-			'After a minute he stops you and shakes his head. "Your dancing is very lacking <<$pcs_nickname>>. If you want this job, you''ll have to take some dance classes first. I believe you can do that at the gym."'
-			'"Come back when you can dance on stage without me worrying you''ll fall off, and I''ll give you another chance."'
-			act 'Leave':gt 'stripclub', 'work_leave'
 		end
-}
 	else
-		'"Nearly..." you say dejectedly.'
-		'"Right. You need to leave, but be sure to come back when you''re old enough," he replies.'
-
-		act 'Leave':gt 'city_redlight', 'start'
+		'The bouncer clears his throat and holds out his hand.'
+
+		act 'Leave': gt 'city_redlight', 'start'
+		if money >= 300:
+			act 'Pay up (300 <b>₽</b>)':
+				cla & *nl
+				'You sigh before digging through your purse and pulling out a small wad of cash. Handing it to the bouncer, he takes it from you and waves you inside.'
+				money -= 300
+				minut += 1
+				frost = 0
+				gt 'stripclub', 'main_floor'
+			end
+		end
 	end
 end
 
-!!if ARGS[0] = 'manager_bargirl'
-	!!*clr & cla
-	!!'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/tryout.jpg"></center>'
-	!!minut += 15
-	!!gs 'stat'
-	!!'You enter the manager''s office and he greets you with a smile. "Hello and welcome to the Fuzzy Dice. How can I help you?"'
-	!!'You return the smile. "Hi, I was wondering if I could get a job working in your bar?"'
-	!!'The manager looks you over. "Are you at least 18 years old? I had a visit from the police last week, and they found an underage girl working here. I was fortunate enough that the officers could be bribed."'
-	!!*nl
-
-	!!if age >= 18 or fakepassport = 1:
-		!!if age >= 18:
-			!!'"Yes I am," you confidently reply and hand him your ID.'
-		!!else
-			!!'"Yes I am," you answer, handing him your fake passport.'
-			!!'You see him frown as he checks your passport with suspicion. "Well, I guess everything is in order."'
-		!!end
-		!!'He leads you to the bar and passes you over to who you assume to be the bar manager, a woman you would estimate to be around the same age as your mother.'
-		!!'"Got a potential recruit here, Nina," he says and motions for you to introduce yourself before heading back to his office.'
-		!!'The woman smiles at you and offers you her hand. "Nina."'
-		!!'You shake her hand. "<<$pcs_firstname>>, but most people just call me <<$pcs_nickname>>."'
-		!!*nl
-		!!'"Okay, <<$pcs_nickname>>. Do you have any experience working in a bar?"'
-			!!if Worked in the Roadhouse and such
-				!!'"Somewhat," you reply. "I used to work in a diner."'
-				!!'"So you would have no issues running drinks to patrons, but you''ll need training before you can work behind the bar."'
-				!!'"Is that a problem?" you ask.'
-				!!'"Not at all," she replies. "As you can see, this is a fast paced work environment. Our patrons get thristy, and not just for drinks. If you can run drinks without any trouble, then I''ll find the time to train you to work the bar."'
-			!!else
-				!!'You shake your head. "No, I''ve never had a job like this before. Is that a problem?"'
-				!!'She frowns. "It''s not ideal. I can''t let you work in such a fast paced bar with zero experience. You would have to settle for running drinks on the floor until I can find the time to train you. Our patrons get very thirsty, and not just for drinks, so it would be some very intense on the job learning for you."'
-			!!end
-		!!'"We''ll deal with these hurdles when we reach them. Did you have any questions for me?"'
-		!!'"A few," you reply. "When do I work, what do I get paid and what type of alcohol do you sell?"'
-		!!'She smiles. "The obvious ones I see. The club operates between 18:00 and 03:00 and I currently have two shift patterns open. Wednesday and Thursday nights, or weekend work on Friday and Saturday. You get paid monthly plus tips. As for what we sell, it''s mostly spirits, cocktails and bottled beer. You can worry about that when you get your training. So, are you interested?"'
-
-			!! act 'Take the job'
-				!!*clr & cla
-				!!gs 'stat'
-
-				!!'"I''ll take it," you say with a smile.'
-				!!"Excellent," she replies. "Which shift pattern suits you?"'
-
-					!!act 'Take the weekday shifts'
-					!!stripbarwork = 1
-					!!'"Great. Come see me next week for your first shift and I''ll get you set up."'
-					!!act 'Leave': gt 'stripclub', 'work_leave'
-
-					!!act 'Take the weekend shifts'
-					!!stripbarwork1 = 1
-					!!'"Great. Come see me next week for your first shift and I''ll get you set up."'
-					!!act 'Leave': gt 'stripclub', 'work_leave'
-			!!end
-
-			!!act 'Reject her offer'
-				!!*clr & cla
-				!!gs 'stat'
-				!!'"Sorry, but I don''t feel like I''m quite ready for a job like this yet," you say and she smiles.'
-				!!"That''s fine," she replies. "Come back when you are."'
-				!!act 'Leave': gt 'stripclub', 'work_leave'
-			!!end
-	!!else
-		!!'"Nearly..." you say dejectedly.'
-		!!'"Right. You need to leave, but be sure to come back when you''re old enough," he replies.'
-
-		!!act 'Leave':gt 'city_redlight', 'start'
-	!!end
-!!end
 if $ARGS[0] = 'work_leave':
-	if stripwork+stripwork1+stripbarwork+stripbarwork1 = 0:
-		gt 'city_redlight', 'start'
-	elseif cfnm = 0:
-		gt 'stripclub', 'forman'
-	elseif cfnm = 1:
-		gt 'stripclub', 'forwoman'
-	end
+	if $clothingworntype = 'nude': gs 'clothing', $lastwornclothingtype['strip_club'], lastwornclothingnumber['strip_club']
+	!!	if $pantyworntype = 'none' and $lastwornpantytype ! 'none' and $lastwornpantytype ! '':
+	if $pantyworntype = 'none' and $lastwornpantytype['strip_club'] ! 'none': gs 'panties', 'wear', $lastwornpantytype['strip_club'], lastwornpantynumber['strip_club']
+!!	if $braworntype = 'none' and $lastwornbratype ! 'none' and $lastwornbratype ! '':
+	if $braworntype = 'none' and $lastwornbratype['strip_club'] ! 'none': gs 'bras', 'wear', $lastwornbratype['strip_club'], lastwornbranumber['strip_club']
+	gt 'stripclub', 'main_floor'
 end
 
-if $ARGS[0] = 'forman':
+if $ARGS[0] = 'main_floor':
 	*clr & cla
 	minut += 5
 	$menu_loc = 'stripclub'
-	$menu_arg = 'forman'
+	$menu_arg = 'main_floor'
+	gs 'schedule', 'A23'
 	gs 'stat'
 	'<center><b><font color="maroon">Strip Club</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub1.jpg"></center>'
-	'There are some girls on the stage dancing to the music. You notice a sign offering private dances, costing 1000 <b>₽</b> per dance.'
-
-	act 'Leave': minut += 5 & gt 'stripclub', 'start'
-	if hour < 2 or hour >= 18:
-		act 'Watch a striptease':gt 'stripclub', 'stol'
-		if money >= 1000: act 'Order a private dance (1,000 <b>₽</b>)':gt 'stripclub', 'privat'
-		!! if money >= 1000 and AlbinaQW['stripper'] = 1 and (day = 5 or day = 6): act 'Order a private dance from Albina (1,000 <b>₽</b>)':gt 'stripclub', 'albina_dance'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub_interior.jpg"></center>'
+	'As you enter the club, you see a half naked girl performing on the stage to the loud, booming music as others walk around trying to entice customers into buying a private dance. You notice a sign stating that private dances cost 1000 <b>₽</b>.'
+
+	act 'Leave': minut += 2 & gt 'stripclub', 'start'
+	if hour < 2 or (hour = 2 and minut < 45): act 'Watch a striptease': gt 'stripclub', 'striptease'
+	if money >= 1000: act 'Order a private dance (1,000 <b>₽</b>)': gt 'stripclub', 'private_dance'
+	if money >= 1000 and (AlbinaQW['seen_strip'] = 1 or AlbinaQW['working_stripclub'] = 1) and locat['A23'] = 21: act 'Order a private dance from Albina (1,000 <b>₽</b>)': gt 'stripclub', 'albina_dance'
+	if hour < 2 or (hour = 2 and minut < 30): act 'Get a drink at the bar': gt 'stripclub', 'bar'
+	if strip_club['stripwork'] = 0:
+		act 'Ask the manager about working as a stripper':
+			cla
+			if pcs_inhib < 50:
+				'You could ask the manager for a job, but you don''t feel confident enough to be a stripper. You should get more used to showing off your body first.'
+				act 'Continue': gt 'stripclub', 'main_floor'
+			elseif pcs_dancero <= 0:
+				'You could ask the manager for a job, but you don''t have the dance skills to be a stripper. You should get some erotic dance lessons.'
+				act 'Continue': gt 'stripclub', 'main_floor'
+			else
+				gt 'stripclub', 'hire2'
+			end
+		end
+	end
+	if strip_club['stripbarwork'] = 0 and strip_club['stripbarwork1'] = 0:
+		act 'Ask the manager about working in the bar':
+			cla
+			if pcs_inhib < 60:
+				'You could ask the manager for a job, but you don''t feel confident enough to work in a strip club, even if it is just in the bar.'
+				act 'Continue': gt 'stripclub', 'main_floor'
+			else
+				gt 'stripclub', 'hire3'
+			end
+		end
 	end
-	!!if (hour < 2 and minut < 30) or hour >= 18: act 'Get a drink at the bar': gt 'stripclub', 'bar'
 end
 
-if $ARGS[0] = 'privat':
+if $ARGS[0] = 'bar':
 	*clr & cla
-	money -= 1000
-	minut += 60
-	pcs_horny += 25
-
 	gs 'stat'
-	privrand = rand(0, 4)
-
-	if privrand = 0:
-		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/priv2.jpg"></center>'
-		'You order a private dance and one of the dancers leads you to a private room, where you''re joined by another girl. They seem to enjoy the female company as they give you a double dance and you can feel your pussy growing slightly wet.'
-		'When they finish their dance, one of them climbs onto your lap and whispers in your ear. "2000 <b>₽</b> and I''ll eat your pussy, right here, right now..."'
-		if money >= 2000: act 'Accept':gt 'stripclub', 'privsex'
-		act 'Leave':gt 'stripclub', 'forman'
-
-	elseif privrand > 0:
-		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/privat.jpg"></center>'
-		'You order a private dance and two very hot girls lead you to a private room. They push you down into the chair and start dancing around you in a very erotic manner as they strip each other. You feel your heart starting to race and your pussy growing slightly wet.'
-
-		act 'Finish':gt 'stripclub', 'forman'
-		if money >= 1000: act 'Order another dance (1,000 <b>₽</b>)':gt 'stripclub', 'privat'
+	if week < 5:
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/lev.jpg"></center>'
+		'You head over to the bar, where ' + iif(strip_club['stripbarwork'] = 1 or strip_club['stripbarwork1'] = 1, 'Lev', 'the bartender') + ' is taking orders while checking out the girl on stage. You decide what you want to drink as you wait your turn.'
+	else
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/nadia.jpg"></center>'
+		'You head over to the bar, where ' + iif(strip_club['stripbarwork'] = 1 or strip_club['stripbarwork1'] = 1, 'Nadia', 'a girl wearing a skimpy outfit') + ' is taking orders, her large breasts drawing your attention as they jiggle with each of her movements. You decide what you want to drink as you wait your turn.'
 	end
-end
+	act 'Leave': gt 'stripclub', 'main_floor'
 
-if $ARGS[0] = 'stol':
-	*clr & cla
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub2.jpg"></center>'
-	'The stage is lit up as a girl walks out before a strenuous male audience.'
-
-	act 'Watch the striptease':
-		!!if rand (0,3) = 0:
-			!!if (year = 2017 and month > 8) and AlbinaQW['stripper'] = 0 and (day = 5 or day = 6):
-				!!*clr & cla
-				!!gs 'stat'
-				!!pcs_horny += 5
-				!!minut += 15
-				!!AlbinaQW['stripper'] = 1:
-				!!'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub4.jpg"></center>'
-				!!'As you look at the girl on stage, you can''t help but think that she looks familiar. You then look closer and notice that it''s Albina!'
-				!!if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
-					!!'She smiles when she sees you and dances up close to you as she strips, wiggling her bubble butt in your face.'
-					!!if money >= 50: 'You throw 50 <b>₽</b> onto the stage in front of her and she gives you a wink before moving back into the middle of the stage.'
-					!!'She teasingly tugs at her skimpy thong before slowly peeling it off, much to the delight of the patrons around you who ogle at her naked body. Her show soon ends and she gathers her clothes and tips up before strutting off the stage as men hoot and holler.'
-				!!else
-					!!'You make eye contact and notice a flash of recognition in her eyes, but other than that she doesn''t acknowledge you in the slightest, continuing her performance and stripping down.'
-					!!if money >= 50: 'You throw 50 <b>₽</b> onto the stage in front of her, but she just rolls her eyes and moves over to dance in front of a group of men offering her far more generous tips.'
-					!!'She finishes her show by teasingly tugging off her thong, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
-				!!end
-				!!'A few minutes later, Albina walks out onto the floor wearing her skimpy outfit and immediately grabs your arm before dragging you into a private room.'
-				!!gt 'stripclub', 'albina_confront'
-			!!elseif AlbinaQW['stripper'] = 1 and (day = 5 or day = 6):
-				!!*clr & cla
-				!!gs 'stat'
-				!!pcs_horny += 5
-				!!minut += 15
-				!!AlbinaQW['stripper'] = 1:
-				!!'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub4.jpg"></center>'
-				!!'You smile when you see Albina strutting up to start her show.'
-				!!if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
-					!!'She smiles when she sees you and dances up close to you as she strips, wiggling her bubble butt in your face.'
-					!!if money >= 50: 'You throw 50 <b>₽</b> onto the stage in front of her and she gives you a wink before moving back into the middle of the stage.'
-					!!'She teasingly tugs at her skimpy thong before slowly peeling it off, much to the delight of the patrons around you who ogle at her naked body. Her show soon ends and she gathers her clothes and tips up before strutting off the stage as men hoot and holler.'
-				!!else
-					!!'She doesn''t return your smile when she sees you, however, and barely acknowledges you as she starts stripping down and dancing on the pole.'
-					!!if money >= 50: 'You throw 50 <b>₽</b> onto the stage in front of her, but she just rolls her eyes and moves over to dance in front of a group of men offering her far more generous tips.'
-					!!'She finishes her show by teasingly tugging off her thong, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
-				!!end
-				!!gt 'stripclub', 'forman'
-		!!else
-		'The girl on stage starts her performance, slowly stripping down as she dances on the pole. The men in the crowd throw fistfuls of rubles on the stage while hooting and hollering.'
-
-		if money >= 50:
-			act 'Give her 50 <b>₽</b>':
-				*clr & cla
-				pcs_horny += 5
-				minut += 10
-				money -= 50
-				'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub6.jpg"></center>'
-				'You stick 50 <b>₽</b> in her panties and she invitingly starts wiggling her hips and shaking her tits in front of you. You feel yourself slowly getting excited.'
-				'The girl soon finishes her show and gathers up her clothing and tips before walking off stage as the men cheer at her.'
-				act 'Move away':gt 'stripclub', 'forman'
-			end
+	act 'Order a glass of water':
+		*clr & cla
+		if alko > 0: alko -= 1
+		if pcs_hydra >= 100:
+			pcs_hydra += 25
+		else
+			pcs_hydra += 50
 		end
+		minut += 5
+		gs 'beverage', 'afterdrink'
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/bar.jpg"></center>'
+		'You order a glass of water and take a seat at the bar to drink it, taking in the sights of the club as you do.'
+		act 'Leave': gt 'stripclub', 'main_floor'
+	end
 
-		act 'Watch the show':
+	if money >= 80:
+		act 'Order a beer (80 <b>₽</b>)':
 			*clr & cla
-			pcs_horny += 5
-			minut += 10
-			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub6.jpg"></center>'
-			'You feel yourself slowly getting excited as you watch the girl perform until she finally peels off her thong before gathering up her clothing and tips and walking off stage as the men cheer at her.'
-
-			act 'Move away':gt 'stripclub', 'forman'
+			money -= 80
+			minut += 5
+			gs 'drugs', 'alcohol', 'beer'
+			gs 'beverage', 'afteralcohol'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/bar.jpg"></center>'
+			'You order a bottle of beer and take a seat at the bar to drink it, taking in the sights of the club as you do.'
+			act 'Leave': gt 'stripclub', 'main_floor'
 		end
+	end
 
-		act 'Look away':
+	if money >= 120:
+		act 'Order a shot of vodka (120 <b>₽</b>)':
 			*clr & cla
-			pcs_horny -= 5
-			minut += 15
-			'You decide not to give any money to the stripper and look away from her. You feel a little ashamed as your arousal goes down.'
-
-			act 'Move away':gt 'stripclub', 'forman'
+			money -= 120
+			minut += 2
+			gs 'drugs', 'alcohol', 'vodka'
+			gs 'beverage', 'afteralcohol'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/bar.jpg"></center>'
+			'You order a shot of vodka and gulp it down, feeling it burn down your throat as you place the empty glass back on the bartop.'
+			act 'Leave': gt 'stripclub', 'main_floor'
 		end
 	end
-end
 
-if $ARGS[0] = 'forwoman':
-	*clr & cla
-	stripguy = 0
-	minut += 5
-	$menu_loc = 'stripclub'
-	$menu_arg = 'forwoman'
-	gs 'stat'
-	'<center><b><font color="maroon">Strip Club</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub1.jpg"></center>'
-
-	act 'Leave': minut += 5 & gt 'stripclub', 'start'
-
-	if hour ! 2 and mc_inventory['tech_camera'] > 0 and mc_inventory['tech_hidden_cam'] = 0:
-		act 'Photograph':
+	if money >= 300:
+		act 'Order a glass of wine (300 <b>₽</b>)':
+			*clr & cla
+			money -= 300
 			minut += 10
-			'As soon as you take your camera out, you are immediately approached by a security guard who informs you that there is no photography allowed. You apologize and put the camera back in your purse.'
+			gs 'drugs', 'alcohol', 'wine'
+			gs 'beverage', 'afteralcohol'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/bar.jpg"></center>'
+			'You order a glass of wine and take a seat at the bar to drink it, taking in the sights of the club as you do.'
+			act 'Leave': gt 'stripclub', 'main_floor'
 		end
+	end
+end
 
-	elseif hour ! 2 and mc_inventory['tech_hidden_cam'] > 0:
-		act 'Photograph':
-			*clr & cla
-			minut += 60
-			'You put on the mini camera, keeping it half hidden by your chest, and discreetly start walking through the club.'
-			stripfotorand = rand(0, 10)
 
-			if stripfotorand < 2:
-				mc_inventory['tech_hidden_cam'] = 0
-				stripdolg = 1
-				'You fail to hide the camera well enough and are spotted by the security guard. He grabs you by the hand and leads you to his office, where the owner is already waiting. He takes your camera and says that you owe him 50,000 <b>₽</b> for snooping around and that you''re barred from the club until you pay up.'
 
-				act 'Leave':gt 'stripclub', 'start'
-			elseif stripfotorand >= 2 and stripfotorand < 6:
-				shantfoto += 1
-				'You struggle to take a normal picture. The girls surrounding you are moving obscurely while they strip, and the guard is very close, so you have to be careful. You finally manage to take a normal picture in the end.'
 
-				act 'Return':gt 'stripclub', 'forwoman'
-			elseif stripfotorand >= 6:
-				'You struggle to take a normal picture. The girls surrounding you are moving obscurely while they strip, and the guard is very close, so you decide that you don''t want to risk anything.'
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                              EVENTS                               !!
+	!!                                                                   !!
+	!!===================================================================!!
 
-				act 'Return':gt 'stripclub', 'forwoman'
-			end
-		end
-	end
 
-	if hour < 2 or hour >= 18: act 'Watch a striptease': gt 'stripclub', 'stolW'
-	!!if (hour < 2 and minut < 30) or hour >= 18: act 'Get a drink at the bar': gt 'stripclub', 'bar'
-	if pcs_dancero > 0 and stripwork = 0 and pcs_inhib >= 50 and stripwork1 = 0:
-		act 'Ask the manager about working as a stripper': gt 'stripclub', 'manager_stripper'
-	elseif stripwork = 0 and pcs_inhib < 50 and stripwork1 = 0:
-		'You could ask the manager for a job, but you don''t feel confident enough to be a stripper. You should get more used to showing off your body first.'
+if $ARGS[0] = 'private_dance':
+	*clr & cla
+	money -= 1000
+	minut += 60
+	pcs_horny += 25
+	gs 'stat'
+	privrand = rand(0,4)
+	if privrand = 0:
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/private_dance.jpg"></center>'
+		'You order a private dance from one of the strippers and she leads you to a private room, where you''re joined by another girl. They seem to enjoy the female company as they give you a double dance and you can feel your pussy growing slightly wet.'
+		'When they finish their dance, one of them climbs onto your lap and whispers in your ear. "2000 <b>₽</b> and I''ll eat your pussy, right here, right now..."'
+		if money >= 2000: act 'Accept': gt 'stripclub', 'private_sex'
+		act 'Leave': gt 'stripclub', 'main_floor'
+	else
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/private_dance2.jpg"></center>'
+		'You order a private dance and two girls lead you to a private room. They push you down into the chair and start dancing around you in a very erotic manner as they strip each other. You feel your heart starting to race and your pussy growing slightly wet.'
+		act 'Finish': gt 'stripclub', 'main_floor'
 	end
-	!!if pcs_inhib >= 60 and (stripbarwork = 0 or stripbarwork1 = 0):
-		!!act 'Ask the manager about working in the bar': gt 'stripclub', 'manager_bargirl'
-	!!elseif pcs_inhib < 60 and (stripbarwork = 0 or stripbarwork1 = 0):
-		!!'You could ask the manager for a job, but you don''t feel confident enough to work in a strip club, even if it is just in the bar.'
-	!!end
 end
 
-if $ARGS[0] = 'stolW':
+if $ARGS[0] = 'striptease':
 	*clr & cla
-	stripguy = 0
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripw.jpg"></center>'
-	'There are some athletic guys performing on the stage. The women are all excited, squealing and shoving money down their pants.'
-
-	if hour < 2 or hour >= 18:
-		act 'Watch a striptease':
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub6.jpg"></center>'
+	'The stage is lit up and music booms as a girl walks out before a strenuous male audience.'
+
+	act 'Watch the show':
+		gs 'schedule', 'A23'
+		if rand(0,3) = 0 and AlbinaQW['seen_strip'] = 0 and locat['A23'] = 21:
+			gs 'stripclub', 'albina_first_dance1'
+		elseif rand(0,3) = 0 and AlbinaQW['seen_strip'] = 1 and locat['A23'] = 21:
+			gs 'stripclub', 'albina_recurrent_dance'
+		else
 			*clr & cla
-			minut += 15
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripw1.jpg"></center>'
-			'A male stripper walks over to you and begins moving his hips in a circular movement. He''s trying to get you excited enough so you''ll give him a tip.'
+			'<center><video autoplay loop src="images/.mp4"></video></center>'
+			'The girl on stage starts her performance, slowly stripping down as she dances on the pole. The men in the crowd throw fistfuls of rubles on the stage while hooting and hollering.'
 
-			if money >= 50:
-				act 'Shove 50 <b>₽</b> down his pants':
+			if money >= 100:
+				act 'Give her 100 <b>₽</b>':
 					*clr & cla
 					pcs_horny += 5
-					minut += 10
-					money -= 50
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripw2.jpg"></center>'
-					'You shove 50 <b>₽</b> down his pants, and he leads you over to sit on a chair and starts dancing in front of you. Before you know it, he is completely naked, and you have a great view of his cock as he dances in front of you. You feel your pussy growing slightly wet.'
-					'He soon finishes his dance and you''re left feeling a little aroused by his show.'
-					act 'Continue':gt 'stripclub', 'stolW'
-
+					minut += 5
+					money -= 100
+					'<center><video autoplay loop src="images/.mp4"></video></center>'
+					'You stick 100 <b>₽</b> in her thong and she invitingly starts wiggling her hips and shaking her breasts in front of you. You feel yourself slowly getting excited.'
+					'The girl soon finishes her show and gathers up her clothing and tips before walking off stage as the men cheer at her.'
+					act 'Move away': gt 'stripclub', 'main_floor'
 				end
 			end
 
+			act 'Watch the show':
+				*clr & cla
+				pcs_horny += 5
+				minut += 5
+				'<center><video autoplay loop src="images/.mp4"></video></center>'
+				'You feel yourself slowly getting excited as you watch the girl perform until she finally peels off her thong and does one final spin on the pole before gathering up her clothing and tips and walking off stage as the men cheer at her.'
+				act 'Move away': gt 'stripclub', 'main_floor'
+			end
+
 			act 'Look away':
 				cla
 				pcs_horny -= 5
-				minut += 15
-				'You decide not to give any money to the stripper and look away from him. You feel a little ashamed as your arousal goes down.'
-
-				act 'Move away':gt 'stripclub', 'stolW'
+				'You decide not to give any money to the stripper and look away from her. You feel a little ashamed as your arousal goes down.'
+				act 'Move away': gt 'stripclub', 'main_floor'
 			end
 		end
 	end
-
-	act 'Move away':gt 'stripclub', 'forwoman'
 end
 
-if $ARGS[0] = 'privsex':
+if $ARGS[0] = 'private_sex':
 	*clr & cla
 	girl += 2
 	lesbian += 1
@@ -598,15 +387,14 @@ if $ARGS[0] = 'privsex':
 	$orgasm_or = 'yes'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/priv3.jpg"></center>'
-	'The girls lead you away from the center stage into a private booth. Before you know it, they''ve taken off your clothes and have you widely spreading your legs as one of them licks your pussy, bringing you to orgasm while the other girl continues to caress your body.'
-
-	act 'Finish':gt 'stripclub', 'forman'
-	act 'More':gt 'stripclub', 'privsex1'
+	'The girls lead you away from the stage and into a private booth. Before you know it, they''ve taken off your clothes and have you spreading your legs as one of them licks your pussy, quickly and expertly bringing you to orgasm while the other girl continues to caress your body.'
+	act 'Finish': gt 'stripclub', 'main_floor'
+	act 'More': gt 'stripclub', 'private_sex1'
 end
 
-if $ARGS[0] = 'privsex1':
+if $ARGS[0] = 'private_sex1':
 	*clr & cla
-	privpicrand = rand(4, 7)
+	privpicrand = rand(4,7)
 	girl += 2
 	lesbian += 1
 	gs 'arousal', 'cuni', 15, 'lesbian', 'group'
@@ -614,131 +402,610 @@ if $ARGS[0] = 'privsex1':
 	gs 'arousal', 'end'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/priv<<privpicrand>>.jpg"></center>'
-	'The other girl lets out a sigh and gently pushes her friend away. "You''ve already made her cum. I want in on the action now," she says and starts eating you out. It doesn''t take long before you have another orgasm. When you recover, you notice that you''re now alone in the booth.'
+	'The other girl lets out a sigh and gently pushes her friend away. "You''ve already made her cum. I want in on the action now," she says and starts eating you out, quickly bringing you to orgasm a second time. When you recover, you notice that you''re now alone in the room.'
+	act 'Finish': gt 'stripclub', 'main_floor'
+end
+
+
+
 
-	act 'Finish':gt 'stripclub', 'forman'
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                         HIRING & TRYOUTS                          !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'hire1':
+	*clr & cla
+	'<center><b><font color="maroon">Strip Club</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub.jpg"></center>'
+	'"Hey," you say to the bouncer. "I want to get a job here. Can I see the manager?"'
+	if pcs_hotcat > 5:
+		'"Hrmph," he grunts. "ID?"'
+		if age >= 18:
+			act 'Show him your passport':
+				cla & *nl
+				'You rummage through your purse and pull out your passport, showing him you''re of legal age. The bouncer takes a look at it and nods.'
+				'"You check out. Go ahead," he says, waving you past him. "You''re looking for Sasha. Knock on the door that says ''manager'' on it."'
+				act 'Head inside': gt 'stripclub', 'hire2'
+			end
+		elseif fakepassport = 1:
+			cla & *nl
+			'You rummage through your purse and pull out your fake passport, showing him you''re of "legal age." The bouncer takes a look at it and nods.'
+			'"You check out. Go ahead," he says, waving you past him. "You''re looking for Sasha. Knock on the door that says ''manager'' on it."'
+			act 'Head inside': gt 'stripclub', 'hire2'
+		else
+			act 'Uhh...':
+				cla & *nl
+				'"Uhhh..." You awkwardly make a show of rummaging through your purse. "Sorry, I must have left my ID at home. Can I-"'
+				'"No." He pushes you away. "Come back when you find it."'
+				act 'Leave': gt 'stripclub', 'start'
+			end
+		end
+	else
+		'"Hrmph," he snickers. "You serious?"'
+		'"Yeah, I want to work here."'
+		'"Well we only hire pretty girls here." He pushes you away. "Now back off. You''re scaring away the customers."'
+		act 'Leave': gt 'stripclub', 'start'
+	end
 end
 
-!!if $ARGS[0] = 'bar'
-!!!!!!!!!!!!!!!!!!!!!
+if $ARGS[0] = 'hire2':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+	minut += 15
+	gs 'stat'
+	if strip_club['stripbarwork'] = 1 or strip_club['stripbarwork1'] = 1:
+		'You enter Sasha''s office and he greets you with a smile. "Hey there <<$pcs_nickname>>, how can I help you?"'
+		'You return the smile. "Hi, I was wondering if I could work as a stripper instead?"'
+		'He chuckles. "Bored of watching the action and wanting to get in on it?"'
+		gs 'stripclub', 'stripper_tryout1'
+	elseif strip_club['stripwork'] = 1:
+		'You enter Sasha''s office and he greets you with a smile. "Hey there <<$pcs_nickname>>, how can I help you?"'
+		'You return the smile. "Hi, I was wondering if I could work as a waitress instead?"'
+		'He chuckles. "Got bored of working the pole and want an easier job?"'
+		'"You could say that," you smile.'
+		act 'Continue': gt 'stripclub', 'hire3'
+	else
+		'You enter the manager''s office and see a rather imposing middle aged man in an expensive looking suit sitting behind a desk. "Yes? How can I help you?"'
+		'You give him a smile which he doesn''t return. "Are you Sasha? I was told to ask you if I could get a job here?"'
+		'"That''s me," he nods before he looks you over. "Are you at least 18 years old? I had a visit from the police last week, and they found an underage girl working here. I was fortunate enough that the officers could be bribed."'
+	end
 
-if $ARGS[0] = 'albina_confront':
+	if age >= 18 or fakepassport = 1:
+		if age >= 18:
+			'"Yes I am," you confidently reply and hand him your ID.'
+			'You see him smile as he checks it. "Looks like everything is in order. So what kind of work were you looking for? Stripping or waitressing?"'
+		else
+			'"Yes..." you answer while handing him your fake passport.'
+			'You see him frown as he checks it with suspicion. "Well, I guess everything is in order. So what kind of work were you looking for? Stripping or waitressing?"'
+		end
+
+		act 'Stripping':
+			cla & *nl
+			'"I want to be a stripper," you reply.'
+			gs 'stripclub', 'stripper_tryout1'
+		end
+
+		act 'Waitressing':
+			cla & *nl
+			'"I want to be a waitress," you reply.'
+			act 'Continue': gt 'stripclub', 'hire3'
+		end
+
+		act 'Can''t I bartend?':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/office.jpg"></center>'
+			'"Do I have to be a waitress? Can''t I tend bar?"'
+			'"That''s an important position that''s highly coveted. If you want that, you''ll have to work up to it. I need to know I can trust you. So stripping or waitressing?"'
+			'"Waitress I guess," you shrug in disappointment.'
+			act 'Continue': gt 'stripclub', 'hire3'
+		end
+	else
+		'"Nearly..." you say dejectedly.'
+		'"Right. You need to leave, but be sure to come back when you''re old enough," he replies.'
+		act 'Leave': gt 'city_redlight', 'start'
+	end
+end
+
+if $ARGS[0] = 'hire3':
 	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+	minut += 15
 	gs 'stat'
+	'"Do you have any experience working in a bar?" he asks as he hands your passport back to you.'
+	if workKafe['job'] = -1:
+		'"Somewhat," you reply. "I used to work in a diner with a bar."'
+		'"The Roadhouse?" he asks. "Excellent. You''ll be able to handle yourself on the floor, but you''ll need training before you can work behind the bar."'
+		'"How long would that take?" you ask.'
+		'He smiles. "If you can do this without any trouble, then I''ll find the time to train you to work the bar."'
+	else
+		'You shake your head. "No, I''ve never had a job like this before. Is that a problem?"'
+		'He frowns. "It''s not ideal. Our patrons get very thirsty, and not just for drinks, so it would be some very intense on the job learning for you."'
+		'"Oh," you reply dejectedly, but he smiles.'
+		'Don''t worry. Our bar staff will show you the ropes and keep you right."'
+	end
+	'"Did you have any questions for me?" he asks.'
+	'"Just two," you reply. "When do I work and what do I get paid?"'
+	'He chuckles. "Straight to the point I see. The club operates between 18:00 and 03:00 and I currently have two shift patterns open. Wednesday and Thursday nights, or Friday and Saturday nights. You get paid monthly plus tips. Interested?"'
+
+	act 'Take the job':
+		cla
+		gs 'stat'
+		'"I''ll take it," you say with a smile.'
+		'"Excellent," he replies. "Which shift pattern suits you?"'
+		act 'Take the weekday shifts':
+			cla
+			if strip_club['stripwork'] = 1: strip_club['stripwork'] = 0
+			!! Set this for the following Wednesday
+			strip_club['stripbarwork'] = 1
+			'"Great. Come see me next week for your first shift and I''ll get you set up."'
+			act 'Leave': gt 'stripclub', 'work_leave'
+		end
+
+		act 'Take the weekend shifts':
+			cla
+			if strip_club['stripwork'] = 1: strip_club['stripwork'] = 0
+			!! Set this for the following Friday
+			strip_club['stripbarwork1'] = 1
+			'"Great. Come see me next week for your first shift and I''ll get you set up."'
+			act 'Leave': gt 'stripclub', 'work_leave'
+		end
+
+		act 'Reject his offer':
+			cla
+			gs 'stat'
+			'"Sorry, but I don''t feel like I''m quite ready for a job like this yet," you say and he smiles.'
+			'"That''s fine," he replies. "Come back when you are."'
+			act 'Leave': gt 'stripclub', 'work_leave'
+		end
+	end
+end
+
+if $ARGS[0] = 'stripper_tryout1':
+	*nl
+	'"Okay, first thing''s first. Get naked."'
+	act 'Panic':
+		cla & *nl
+		'A chill runs through your spine.'
+		'"<i>What?</i>"'
+		'"Oh, for fuck''s sake. Not another one..." He rolls his eyes. "If you want to be a stripper, then people are going to see you naked. Which means <i>I</i> have to see you naked to make sure you''re hot enough to dance in my club and won''t pussy out <i>just like this</i>. Now get those clothes off or fuck off."'
+		act 'Strip': gt 'stripclub', 'stripper_tryout2'
+	end
+
+	act 'Surprise':
+		cla & *nl
+		'"Huh?" you blink. "Right now?"'
+		'"Why not?" he shrugs. "If you want to be a stripper, then people are going to see you naked. Which means <i>I</i> have to see you naked to make sure you''re hot enough to dance in my club. So strip."'
+		act 'Strip': gt 'stripclub', 'stripper_tryout2'
+	end
+	act 'Strip': gt 'stripclub', 'stripper_tryout2'
+end
+
+if $ARGS[0] = 'stripper_tryout2':
+	gs 'stwork', 'strip_clothing'
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripinspection.jpg"></center>'
+	'You take off your clothes and stand naked before Sasha, who stands up to take a closer look.'
+	if pcs_leghair <= 3:
+		'He admires your legs.'
+		'"Smooth legs. Very good."'
+	else
+		'He frowns at your legs.'
+		'"You''ll need to shave those."'
+	end
+	'He places his hand on your mound and slowly rubs it. You feel your pussy get a little wet from his touch and hope that he doesn''t notice.'
+	gs 'arousal', 'foreplay', 2
+	gs 'stat'
+	!! This allows different pubic styles, but anything from small bush up is not permitted.
+	if (pubestyle = 1 and pcs_pubes <= 3) or lashair = 1:
+		'"Cleanshaven. Nice."'
+	elseif ((pubestyle >= 2 and pubestyle <=7) or (pubestyle >= 12 and pubestyle <= 14)) and pcs_pubes <= 25:
+		strippermission = 1
+		'"Nice pubes," he smirks. "I''m sure the customers will love them."'
+		strip_club['dancing_rounds'] = 3
+	elseif pcs_leghair <= 3:
+		'"You''ll need to shave this," he grunts, running his fingers through your thick bush. "Or at least trim it. Something cute."'
+	else
+		'"And this too," he scowls, running his fingers through your thick bush. "What are you, some kind of hippie? This is a strip club, not a zoo."'
+	end
+
+	if tits >= 5:
+		'He takes in the sight of your enormous breasts.'
+		'"Not many girls working here can brag about having tits the size of their head," he says as he kneads them in his hand. "Opal might have a rival on her hands here."'
+		gs 'arousal', 'foreplay', 2
+		gs 'stat'
+	elseif tits = 4:
+		'He admires your large breasts.'
+		'"Nice tits. Are they natural?" he asks as he gently fondles them in his hand.'
+		gs 'arousal', 'foreplay', 2
+		gs 'stat'
+	elseif tits = 3:
+		'He checks out your breasts.'
+		'"Your tits are decent enough."'
+	else
+		'He frowns at the sight of your tiny breasts.'
+		'"Shame about the tits."'
+	end
+	if func('pcs_has_attr', 'body_ass_big'):
+		'He spins you round and inspects your ass.'
+		'"Nice bubble butt," he says as his hand paws at your rear. "This will earn you extra tips for sure."'
+		if (year = 2017 and month > 8): '"I think Amber might actually have a rival for best ass in the club."'
+	elseif func('pcs_has_attr', 'body_ass_flat'):
+		'He spins you round and inspects your ass.'
+		'"Hhhm..." he says. "You should do some squats and pad this out. The customers need something to look at."'
+	else
+		'He spins you round and inspects your ass.'
+		'"Not bad, but some squats to pad it out wouldn''t hurt."'
+	end
+	'He leads you to one of the private booths and points to the pole.'
+	'"Alright. Now show me what you can do."'
+
+	act 'Dance for him': gt 'stripclub', 'stripper_tryout3'
+end
+
+if $ARGS[0] = 'stripper_tryout3':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/tryout.jpg"></center>'
+	if pcs_dancero >= 40 and pcs_dancpol >= 30:
+		gs 'stripclub', 'stripper_accept1'
+	elseif pcs_dancero >= 40:
+		'After a minute, he stops you and shakes his head. "Your poledancing ability is still lacking. If you want this job, you''ll have to take some classes first. I believe you can do that at the gym. Come back when you can handle the pole, and I''ll give you another chance."'
+		act 'Leave': gt 'stripclub', 'work_leave'
+	else
+		'After a minute, he stops you and shakes his head. "Your dancing skills are lacking. If you want this job, you''ll have to take some classes first. I believe you can do that at the gym. Come back when you can dance on stage without me worrying you''ll fall off, and I''ll give you another chance."'
+		act 'Leave': gt 'stripclub', 'work_leave'
+	end
+end
+
+if $ARGS[0] = 'stripper_accept1':
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
-	if npc_rel['A23'] > 70 or AlbinaQW['Friends'] = 2:
+	'You dance sensually and he''s clearly smitten by you before he asks you to sit down.'
+	'"Our business hours are between 18:00 and 03:00. We operate two six hour shifts. 18:00 to midnight, 21:00 to 03:00. Shift priority is first come first serve. Whiteboard with the schedule is backstage."'
+	'He pulls some papers out of a cabinet behind him.'
+	'"Any tips you get are yours, but we''re not paying you hourly. Think of it as an incentive to perform well. If a customer wants a lap dance it''s 1000 <b>₽</b> a dance. You get 40% and the rest goes to the club. Some clients may want to pay extra for further ''entertainment'', but this isn''t a brothel. If you want to turn tricks, then go and stand on the corner outside. Otherwise call Viktor. Now sign here."'
+	act 'Change your mind':
+		*clr & cla
+		gs 'stat'
+		'"On second thought, I don''t know if I can do this," you say hesitantly.'
+		'"Ugh, another fucking flake." He rolls his eyes before throwing the papers into a drawer and slamming it shut. "Come back when you''re ready to get serious. Until then, get the fuck out."'
+		act 'Leave': gt 'stripclub', 'main_floor'
+	end
+
+	act 'Sign':
+		*clr & cla
+		if strip_club['stripbarwork'] = 1: strip_club['stripbarwork'] = 0
+		if strip_club['stripbarwork1'] = 1: strip_club['stripbarwork1'] = 0
+
+		strip_club['stripwork'] = 1
+		!! Needs a block of sorts that will prevent the player from immediately being able to start work
+		gs 'stat'
+		!! IMAGE HERE
+		'You think about it for a minute and smile at him as you accept his offer.'
+		'The manager leads you to the dressing room and tells a woman responsible for the costumes that you''re going to join the club. He also introduces you to the chief of security, who takes your picture and makes you sign some documents.'
+		if $pcs_strippername = '':
+			'"Our girls don''t perform under their real name for obvious reasons. We have a bit of a gemstone theme going on, but you can choose whatever stage name you want. So what will it be?"'
+
+			$pcs_strippername = input("What name would you like to use at the strip club? (Leave blank for Sapphire)")
+			if $pcs_strippername = '':
+				$pcs_strippername = 'Sapphire'
+				'"Uhh, I don''t know..." you say dully and Sasha rolls his eyes.'
+				'"Whatever. You''re Sapphire from now on. Now fill out these forms."'
+			else
+				'"Can I be called <<$pcs_strippername>>?"'
+				'"Sure," he shrugs. "Now fill out these forms."'
+			end
+			'You scribble out your information and sign it as Sasha keeps talking to you.'
+			'"Before you go on stage, I expect you to drop by my office so I can see if you''re up to our club standards. It''s just a routine check to make sure that the club''s reputation stays intact. Nothing to worry about," he says before ushering you out of his office.'
+			act 'Leave': gt 'stripclub', 'work_leave'
+		end
+	end
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                              ALBINA                               !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'albina_first_dance1':
+	*clr & cla
+	pcs_horny += 5
+	minut += 15
+	AlbinaQW['seen_strip'] = 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub4.jpg"></center>'
+	if AlbinaQW['Friends'] = 2:
+		'"Give it up for the fine piece of ass that is AAMMMBBERRR!" the DJ announces over the speakers and the crowd loudly cheers.'
+		'Your jaw drops as the girl struts onto the stage to loud cheers. Is that Albina?!'
+	else
+		'"Give it up for the fine piece of ass that is AAMMMBBERRR!" the DJ announces over the speakers and the crowd loudly cheers.'
+		'As you look up at the girl on stage, you can''t help but notice that she looks familiar... You look closer and notice that it''s Albina!'
+	end
+	if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+		'She smiles when she sees you and dances up close to you, wiggling her bubble butt in your face.'
+
+		act 'Watch her show':
+			*clr & cla
+			pcs_horny += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub4.jpg"></center>'
+			'You watch in silence as Albina entices the crowd with her moves as she strips down to the music, shaking her ass in their faces as they throw piles of rubles onto the stage. She occasionally struts over and dances in front of you, causing the men to throw even more money on the stage so she''ll return her attention to them.'
+			'She finishes her show by teasingly tugging off her g-string, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
+			'A few minutes later, she walks out onto the floor and immediately grabs you by the arm before dragging you into a private room.'
+			act 'Go with her': gt 'stripclub', 'albina_confront'
+		end
+
+		if money >= 100:
+			act 'Give her 100 <b>₽</b>':
+				cla
+				money -= 100
+				minut += 5
+				gs 'stat'
+				'You throw 100 <b>₽</b> onto the stage in front of her and she gives you a wink before moving back into the middle of the stage, enticing the crowd with her moves as they throw piles of rubles onto the stage.'
+				'She finishes her show by teasingly tugging at her g-string before slowly peeling it off, much to the delight of the patrons around you, who ogle at her naked body as she gathers her clothes and tips up before strutting off the stage as the men hoot and holler.'
+				'A few minutes later, she walks out onto the floor and immediately grabs you by the arm before dragging you into a private room.'
+				act 'Go with her': gt 'stripclub', 'albina_confront'
+			end
+		end
+	else
+		'You make eye contact and notice a flash of recognition in her eyes, but other than that she doesn''t acknowledge you in the slightest, continuing her performance and stripping down.'
+
+		act 'Watch her show':
+			*clr & cla
+			pcs_horny += 5
+			minut += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub4.jpg"></center>'
+			'You watch in silence as Albina entices the crowd with her moves as she strips down to the music, shaking her ass in their faces as they throw piles of rubles onto the stage.'
+			'She finishes her show by teasingly tugging off her g-string, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
+			'A few minutes later, she walks out onto the floor and immediately grabs you by the arm before dragging you into a private room.'
+			act 'Go with her': gt 'stripclub', 'albina_confront'
+		end
+
+		if money >= 100:
+			act 'Give her 100 <b>₽</b>':
+				cla
+				money -= 100
+				minut += 5
+				gs 'stat'
+				'You throw 100 <b>₽</b> onto the stage in front of her, but she just rolls her eyes and moves over to dance in front of a group of men offering her far more generous tips.'
+				'She finishes her show by teasingly tugging off her g-string, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
+				'A few minutes later, she walks out onto the floor and immediately grabs you by the arm before dragging you into a private room.'
+				act 'Go with her': gt 'stripclub', 'albina_confront'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'albina_recurrent_dance':
+	*clr & cla
+	pcs_horny += 5
+	minut += 15
+	gs 'stat'
+	'<center><video autoplay loop src="images/locations/city/redlight/stripclub/albina_show.mp4"></video></center>'
+	'You smile when you see Albina strutting up to start her show.'
+	if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+		'She smiles when she sees you and dances up close to you as she strips, wiggling her bubble butt in your face.'
+		if money >= 100:
+			act 'Give her 100 <b>₽</b>':
+				*clr & cla
+				money -= 100
+				minut += 5
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/city/redlight/stripclub/albina_show.mp4"></video></center>'
+				'You throw 100 <b>₽</b> onto the stage in front of her and she gives you a wink before moving back into the middle of the stage, enticing the crowd with her moves as they throw piles of rubles onto the stage.'
+				'She slowly strips from her outfit and dances on the pole before teasingly tugging at her g-string and slowly peeling it off, much to the delight of the patrons around you, who ogle and cheer at her as she rolls around naked on the stage.'
+				'Her show over, the music stops and she gathers her clothes and tips up before strutting off the stage, swaying her hips and showing off her naked ass as the men hoot and holler.'
+				act 'Move away': gt 'stripclub', 'main_floor'
+			end
+		end
+
+		act 'Watch her show':
+			*clr & cla
+			pcs_horny += 5
+			minut += 5
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/city/redlight/stripclub/albina_show.mp4"></video></center>'
+			'You watch in silence as Albina entices the crowd with her moves as she strips down to the music, shaking her ass in their faces as they throw piles of rubles onto the stage. She occasionally struts over and dances in front of you, causing the men to throw even more money on the stage so Albina will return her attention to them.'
+			'She finishes her show by teasingly tugging off her g-string, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
+			act 'Move away': gt 'stripclub', 'main_floor'
+		end
+	else
+		'She doesn''t return your smile when she sees you, however, and barely acknowledges you as she starts stripping down and dancing on the pole.'
+		if money >= 100:
+			act 'Give her 100 <b>₽</b>':
+				*clr & cla
+				money -= 100
+				minut += 5
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/city/redlight/stripclub/albina_show.mp4"></video></center>'
+				'You throw 100 <b>₽</b> onto the stage in front of her, but she just rolls her eyes and moves over to dance in front of a group of rowdy men offering her far more generous tips.'
+				'She slowly strips from her outfit and dances on the pole before teasingly tugging at her g-string and slowly peeling it off, much to the delight of the patrons around you, who ogle and cheer at her as she rolls around naked on the stage.'
+				'Her show over, the music stops and she gathers her clothes and tips up before strutting off the stage, swaying her hips and showing off her naked ass as the men hoot and holler.'
+				act 'Move away': gt 'stripclub', 'main_floor'
+			end
+		end
+
+		act 'Watch her show':
+			*clr & cla
+			pcs_horny += 5
+			minut += 5
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/city/redlight/stripclub/albina_show.mp4"></video></center>'
+			'You watch in silence as Albina entices the crowd with her moves as she strips down to the music, shaking her ass in their faces as they throw piles of rubles onto the stage.'
+			'She finishes her show by teasingly tugging off her g-string, much to the delight of the patrons around you who ogle at her naked body as she gathers her clothing and tips before strutting off stage without even looking in your direction.'
+			act 'Move away': gt 'stripclub', 'main_floor'
+		end
+	end
+end
+
+if $ARGS[0] = 'albina_confront':
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
+	if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
 		'"What are you doing here, <<$pcs_nickname>>?" she asks.'
-		'"Me? What are <i>you</i> doing here?" you retort and she smiles.'
-		'"My job, <<$pcs_nickname>>! Stripping is easy money, you know?" A sly grin then appears on her face. "Maybe I can interest you in a private dance?"'
+		'"What are <i>you</i> doing here?" you retort and she smiles.'
+		'"What does it look like? Stripping is easy money, you know?" A sly grin then appears on her face. "Maybe I can interest you in a private dance?"'
 		if money >= 1000:
 			act 'Yes':
+				*clr & cla
 				minut += 10
 				pcs_horny += 5
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
 				'"Yes!" you reply a little too enthusiastically. "1000 <b>₽</b>, right?"'
-				'She waves her hand. "It''s on the house, this one time anyway. if you want my services in the future, you have to pay like everyone else. Also, no telling anyone I work here."'
-				'You nod and Albina pushes you into the chair before the music starts playing and she starts her show. She seductively dances while slowly peeling her clothes off, all while giving you a teasing smile.'
+				'She waves her hand. "It''s on the house, this one time anyway. You want my services in the future, then you have to pay like everyone else. Also, no telling anyone I work here."'
+				'You nod and Albina pushes you into the chair before music starts playing and she starts her show. She seductively dances while slowly peeling her clothes off, all while giving you a teasing smile.'
 				'Once down to her thong, she climbs into your lap and starts grinding against you as her perky breasts jiggle in your face. You''re feeling rather aroused by the time she finishes by bending over in front of you and tugging off her thong.'
 				'The song then ends and a naked Albina smiles before sitting in your lap.'
-				if hour < 2 or hour >= 18:
-					'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too, but I need to get back to work."'
-					'You nod and she gets dressed again before she walks you back out onto the floor.'
-					act 'Return to the floor': gt 'stripclub', 'forman'
-				else
-					'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too. My shift is almost over, so why don''t you walk me home?"'
-					act 'Sure':
-						'"Sure," you nod and she starts getting dressed again before walking you back out onto the floor.'
-						'"Just wait for me out here. I won''t be long," Albina says before disappearing backstage. You take a seat and scroll through your phone until she returns and you head out together.'
-						act 'Wait for Albina': gt 'albina_uni', 'walk_home'
-					end
+				if week = 6:
+					if hour < 23:
+						'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too, but I need to get back to work."'
+						'You nod and she gets dressed again before she walks you back out onto the floor.'
+						act 'Return to the floor': gt 'stripclub', 'main_floor'
+					else
+						'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too. My shift''s almost over, so why don''t you walk me home?"'
+						act 'Sure':
+							cla
+							'"Sure," you nod and she starts getting dressed again before walking you back out onto the floor.'
+							'"Just wait for me out here. I won''t be long," Albina says before disappearing backstage. You take a seat and scroll through your phone until she returns and you head out together.'
+							act 'Wait for Albina': gt 'albina_uni', 'walk_home'
+						end
 
-					act 'No thanks':
-						'"Sorry, but I need to get going," you reply and she just shrugs.'
-						'"Suit yourself, but remember; no more free shows."'
-						'She gathers up her clothes and gets dressed before heading back out onto the floor.'
-						act 'Return to the floor': gt 'stripclub', 'forman'
+						act 'No thanks':
+							cla
+							'"Sorry, but I need to get going," you reply and she just shrugs.'
+							'"Suit yourself, but remember; no more free shows."'
+							'She gathers up her clothes and gets dressed before heading back out onto the floor.'
+							act 'Return to the floor': gt 'stripclub', 'main_floor'
+						end
 					end
-			    end
+				else
+					'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too, but I need to get back to work."'
+					'You nod and she gets dressed again before she walks you back out onto the floor.'
+					act 'Return to the floor': gt 'stripclub', 'main_floor'
+				end
 			end
 		else
 			act 'No money':
+				*clr & cla
 				minut += 10
 				pcs_horny += 5
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
 				'"I don''t have any money," you reply.'
-				'"Then why are you here?" she asks with a puzzled stare. "Never mind, this is on the house this one time. if you want my services in the future, you have to pay like everyone else. Also, no telling anyone I work here."'
+				'"Then why are you here?" she asks with a puzzled stare. "Never mind, this is on the house this one time. You want my services in the future, then you have to pay like everyone else. Also, no telling anyone I work here."'
 				'You nod and Albina pushes you into the chair before music starts playing and she starts her show. She seductively dances while slowly peeling her clothes off, all while giving you a teasing smile.'
-				'Once down to her thong, she climbs into your lap and starts grinding against you as her perky breasts jiggle in your face. You''re feeling rather aroused by the time she finishes by bending over in front of you and tugging off her thong.'
+				'Once down to her g-string, she climbs into your lap and starts grinding against you as her perky breasts jiggle in your face. You''re feeling rather aroused by the time she finishes by bending over in front of you and tugging off her thong.'
 				'The song ends and a naked Albina smiles before sitting in your lap.'
-				if hour < 2 or hour >= 18:
+				if week = 6:
+					if hour < 23:
+						'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too, but I need to get back to work."'
+						'You nod and she gets dressed again before she walks you back out onto the floor.'
+						act 'Return to the floor': gt 'stripclub', 'main_floor'
+					else
+						'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too. My shift''s almost over, so why don''t you walk me home?"'
+						act 'Sure':
+							cla
+							'"Sure," you nod and she starts getting dressed again before walking you back out onto the floor.'
+							'"Just wait for me out here. I won''t be long," Albina says before disappearing backstage. You take a seat and scroll through your phone until she returns and you head out together.'
+							act 'Wait for Albina': gt 'albina_uni', 'walk_home'
+						end
+
+						act 'No thanks':
+							cla
+							'"Sorry, but I need to get going," you reply and she just shrugs.'
+							'"Suit yourself, but remember; no more free shows."'
+							'She gathers up her clothes and gets dressed before heading back out onto the floor.'
+							act 'Return to the floor': gt 'stripclub', 'main_floor'
+						end
+					end
+				else
 					'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too, but I need to get back to work."'
 					'You nod and she gets dressed again before she walks you back out onto the floor.'
-					gt 'stripclub', 'forman'
+					act 'Return to the floor': gt 'stripclub', 'main_floor'
+				end
+			end
+		end
+
+		act 'No thanks':
+			*clr & cla
+			minut += 2
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+			'"No thanks," you reply. "I need to get going."'
+			if week = 6:
+				if hour < 23:
+					'She just shrugs. "Your loss. I need to get back to work."'
+					'She walks you back out onto the floor, leaving you behind in the room.'
+					act 'Return to the floor': gt 'stripclub', 'main_floor'
 				else
-					'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too. My shift is almost over, so why don''t you walk me home?"'
+					'"Your loss. My shift is almost over, so why don''t you walk me home?"'
 					act 'Sure':
-						'"Sure," you nod and she starts getting dressed again before walking you back out onto the floor.'
-						'"Just wait for me out here. I won''t be long," Albina says before disappearing backstage. You take a seat and scroll through your phone until she returns and you head out together.'
+						cla
+						'"Sure," you nod and she walks you back out onto the floor.'
+						'"Just wait for me out here. I won''t be long," Albina says before disappearing backstage. You take a seat and scroll through your phone until she returns in her normal clothes and you head out together.'
 						act 'Wait for Albina': gt 'albina_uni', 'walk_home'
 					end
+
 					act 'No thanks':
+						cla
 						'"Sorry, but I need to get going," you reply and she just shrugs.'
 						'"Suit yourself, but remember; no more free shows."'
 						'She gathers up her clothes and gets dressed before heading back out onto the floor.'
-						act 'Return to the floor': gt 'stripclub', 'forman'
+						act 'Return to the floor': gt 'stripclub', 'main_floor'
 					end
 				end
-			end
-		end
-
-		act 'No thanks':
-			'"No thanks," you reply. "I need to get going."'
-			if hour < 2 or hour >= 18:
-				'She just shrugs. "Your loss. I need to get back to work."'
-				'She walks you back out onto the floor, leaving you behind in the room.'
-				gt 'stripclub', 'forman'
 			else
-				'"Your loss. My shift is almost over, so why don''t you walk me home?"'
-				act 'Sure':
-					'"Sure," you nod and she walks you back out onto the floor.'
-					'"Just wait for me out here. I won''t be long," Albina says before disappearing backstage. You take a seat and scroll through your phone until she returns in her normal clothes and you head out together.'
-					act 'Wait for Albina': gt 'albina_uni', 'walk_home'
-				end
-
-				act 'No thanks':
-					'"Sorry, but I need to get going," you reply and she just shrugs.'
-					'"Suit yourself, but remember; no more free shows."'
-					'She gathers up her clothes and gets dressed before heading back out onto the floor.'
-					act 'Return to the floor': gt 'stripclub', 'forman'
-				end
+				'"I can tell you enjoyed that <<$pcs_nickname>>, and I did too, but I need to get back to work."'
+				'You nod and she gets dressed again before she walks you back out onto the floor.'
+				act 'Return to the floor': gt 'stripclub', 'main_floor'
+			end
 		end
-	end
-
 	else
 		'"What the fuck are you doing here, <<$pcs_nickname>>?!" she asks sternly.'
-		'"What are <i>you</i> doing here?" you retort and she rolls her eyes.'
-		'"Me? I''m their new cleaner, but they asked me to fill in for one of the girls tonight. What does it look like I''m doing, you fucking idiot?! I don''t know or care why you came here, but don''t expect a private dance from me."'
+		'"<i>Me<i>? What are <i>you</i> doing here?" you retort and she rolls her eyes.'
+		'"I''m their new cleaner, but they asked me to fill in for one of the girls tonight. What does it look like I''m doing, you fucking idiot?! I don''t know or care why you came here, but don''t expect a private dance from me."'
 		'"I wasn-" you start to reply, but she cuts you off.'
-		'"I need to get back to work," she says before leaving the room and heading back out to the floor.'
-		act 'Return to the floor': gt 'stripclub', 'forman'
+		'"Whatever. I need to get back to work," she says before leaving the room.'
+		act 'Return to the floor': gt 'stripclub', 'main_floor'
 	end
 end
 
 if $ARGS[0] = 'albina_dance':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
 	'You hand over the money and are taken to one of the private rooms, where you take a seat and wait for Albina to arrive.'
 	if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+		*clr & cla
 		minut += 10
 		pcs_horny += 5
+		money -= 1000
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
 		'Her face lights up when she walks into the room. "<<$pcs_nickname>>! I should take it as a compliment if you want a dance from me."'
-		'All you can do is grin and nod as she seductively walks over to you. "Well then, we better get this show started..."'
+		'All you can do is grin as she seductively struts over to you. "Well then, we better get this show started..."'
 		'Music starts playing and she starts her show. She seductively dances and twerks while slowly peeling her clothes off, all while giving you a teasing smile.'
-		'Once down to her thong, she climbs into your lap and starts grinding against you as her perky breasts jiggle in your face. You''re feeling rather aroused by the time she finishes by bending over in front of you and tugging off her thong. You notice her pussy is a little wet; it seems she''s enjoying this as much as you.'
-		'The song ends and a naked Albina smiles at you.'
-		if npc_sex['A23'] >= 1: 'She proceeds to climb into your lap and starts passionately making out with you while grinding her naked body against you. Once she''s done, she climbs off you and turns to wiggle her naked ass at you.'
-		'She gathers up her clothes and starts getting dressed before walking back out to the main floor with you.'
-		act 'Return to the floor' :gt 'stripclub', 'forman'
+		'Once down to her g-string, she climbs into your lap and starts grinding against you as her perky breasts jiggle in your face. You''re feeling rather aroused by the time she finishes by bending over in front of you and tugging the skimpy thong down her legs. You notice her pussy is a little wet; it seems she''s enjoying this as much as you.'
+		'The song ends and a naked Albina smiles while wiggling her naked ass at you.'
+		*nl
+		'Her show over, she gathers up her clothes and starts getting dressed before strutting out of the room, leaving you to walk back out to the main area.'
+		act 'Return to the floor': gt 'stripclub', 'main_floor'
 	else
+		cla
+		minut += 2
+		gs 'stat'
 		'A few minutes later, Albina walks in and rolls her eyes when she sees you. "I''m not giving you of all people a fucking lapdance!" She throws your money on the floor. "Here''s your refund. Now fuck off before I call security."'
 		'She crosses her arms and glares at you intently until you leave the room.'
-		act 'Return to the floor': gt 'stripclub', 'forman'
+		act 'Return to the floor': gt 'stripclub', 'main_floor'
 	end
 end
 

+ 334 - 0
locations/stripclub_schedule.qsrc

@@ -0,0 +1,334 @@
+# stripclub_schedule
+
+
+!!{if $ARGS[0] = 'schedule_reset':
+	i = 1
+	if strip_club['shifts_required'] = 5:
+		:loop_strip_club_sched_part
+		if strip_club['<<i>>_shift_1'] ! 1:
+			strip_club['<<i>>_shift_1'] = 0
+			strip_club['<<i>>_shift_1_taken'] = rand(0,2)
+		end
+		if strip_club['<<i>>_shift_2'] ! 1:
+			strip_club['<<i>>_shift_2'] = 0
+			strip_club['<<i>>_shift_2_taken'] = rand(0,2)
+		end
+!!		if strip_club['<<i>>_shift_3'] ! 1:
+!!			strip_club['<<i>>_shift_3'] = 0
+!!			strip_club['<<i>>_shift_3_taken'] = rand(-1,2)
+!!		end
+		i += 1
+		if i < 8: jump 'loop_strip_club_sched_part'
+	elseif strip_club['shifts_required'] = 10:
+		:loop_strip_club_sched_full
+		if strip_club['<<i>>_shift_1'] ! 1:
+			strip_club['<<i>>_shift_1'] = 0
+			strip_club['<<i>>_shift_1_taken'] = rand(-3,2)
+		end
+		if strip_club['<<i>>_shift_2'] ! 1:
+			strip_club['<<i>>_shift_2'] = 0
+			strip_club['<<i>>_shift_2_taken'] = rand(-3,2)
+		end
+!!		if strip_club['<<i>>_shift_3'] ! 1:
+!!			strip_club['<<i>>_shift_3'] = 0
+!!			strip_club['<<i>>_shift_3_taken'] = rand(-3,2)
+!!		end
+		i += 1
+		if i < 8: jump 'loop_strip_club_sched_full'
+	end
+end}
+
+
+if $ARGS[0] = 'schedule_reset':
+	if strip_club['shifts_required'] > 0:
+		scs_i = 1
+		:loop_strip_club_sched_part
+			strip_club['<<scs_i>>_shift_1'] = strip_club['next_<<scs_i>>_shift_1']
+			strip_club['<<scs_i>>_shift_1'] = strip_club['next_<<scs_i>>_shift_1_taken']
+			if strip_club['<<scs_i>>_shift_1'] ! 1: strip_club['<<scs_i>>_shift_1'] = 0
+			if strip_club['<<scs_i>>_shift_1_taken'] ! 2: strip_club['<<scs_i>>_shift_1_taken'] = rand(-3,2)
+
+			strip_club['<<scs_i>>_shift_2'] = strip_club['next_<<scs_i>>_shift_2']
+			strip_club['<<scs_i>>_shift_2_taken'] = strip_club['next_<<scs_i>>_shift_2_taken']
+			if strip_club['<<scs_i>>_shift_2'] ! 1: strip_club['<<scs_i>>_shift_2'] = 0
+			if strip_club['<<scs_i>>_shift_2_taken'] ! 2: strip_club['<<scs_i>>_shift_2_taken'] = rand(-3,2)
+			scs_i += 1
+		if scs_i < 8: jump 'loop_strip_club_sched_part'
+		killvar 'scs_i'
+	end
+end
+
+if $ARGS[0] = 'next_week_schedule':
+	scs_i = 1
+	if strip_club['shifts_required'] = 5:
+		:loop_strip_club_next_week_part
+			strip_club['next_<<scs_i>>_shift_1_taken'] = rand(-3,2)
+			strip_club['next_<<scs_i>>_shift_2_taken'] = rand(-3,2)
+	!!		strip_club['next_<<scs_i>>_shift_3_taken'] = rand(-3,2)
+			scs_i += 1
+		if scs_i < 8: jump 'loop_strip_club_next_week_part'
+	elseif strip_club['shifts_required'] = 10:
+		:loop_strip_club_next_week_full
+			strip_club['next_<<scs_i>>_shift_1_taken'] = rand(-5,2)
+			strip_club['next_<<scs_i>>_shift_2_taken'] = rand(-5,2)
+	!!		strip_club['next_<<scs_i>>_shift_3_taken'] = rand(-5,2)
+			scs_i += 1
+		if scs_i < 8: jump 'loop_strip_club_next_week_full'
+	end
+	killvar 'scs_i'
+end
+
+
+if $ARGS[0] = 'exit_schedule':
+	act 'Finish scheduling': gt 'stwork','bar_manager'
+	!!{
+	if $emp_job_title[5] = 'Waitress':
+		gt 'stripclub', 'waitress_manager'
+	elseif $emp_job_title[5] = 'Stripper':
+		gt 'stripclub', 'stripper_manager'
+	elseif $emp_job_title[5] = 'Bartender':
+		gt 'stripclub', 'bar_manager'
+	end}
+end
+
+
+
+! ARGS[1] = week (1: monday, ..., 7: sunday)
+! ARGS[2] = shift (1: 18-00, 2: 21-03)
+! ARGS[3] = next_week (0: this week, 1: next week)
+if $ARGS[0] = 'display_single_shift':
+	if ARGS[3] = 0:
+		$scs_arg_string = '<<ARGS[1]>>_shift_<<ARGS[2]>>'
+		$scs_return_arg = 'set_schedule'
+	elseif ARGS[3] = 1:
+		$scs_arg_string = 'next_<<ARGS[1]>>_shift_<<ARGS[2]>>'
+		$scs_return_arg = 'next_week_set_schedule'
+	end
+
+	if ARGS[2] = 1:
+		$scs_time_string = '18:00-00:00'
+		scs_hour1 = 9
+		scs_hour2 = 13
+	elseif ARGS[2] = 2:
+		$scs_time_string = '21:00-03:00'
+		scs_hour1 = 13
+		scs_hour2 = 17
+	end
+
+
+	$result +=	'<tr><td>'
+	if strip_club[$scs_arg_string] = 0 and strip_club[$scs_arg_string + '_taken'] < 2 and no (week = ARGS[1] and hour >= scs_hour1 and hour < scs_hour2):
+		$result +=		'<a href="exec:strip_club[''<<$scs_arg_string>>''] = 1 & gt ''stripclub_schedule'', ''<<$scs_return_arg>>''"><<$scs_time_string>> shift</a>'
+	elseif strip_club[$scs_arg_string + '_taken'] = 2 or (week = ARGS[1] and hour >= scs_hour1 and hour < scs_hour2):
+		$result +=		'<<$scs_time_string>> shift'
+		$result +=	'</td></tr><tr><td>'
+		$result +=		func('stripclub_schedule', 'random_stripper_name')
+		$result +=	'</td></tr><tr><td>'
+		$result +=		func('stripclub_schedule', 'random_stripper_name')
+	elseif strip_club[$scs_arg_string] = 2:
+		$result +=		'<<$scs_time_string>> shift'
+		$result +=	'</td></tr><tr><td>'
+		$result +=		'<i>already worked</i>'
+	else
+		$result +=		'<<$scs_time_string>> shift'
+		$result +=	'</td></tr><tr><td>'
+		$result +=		'<a href="exec:strip_club[''<<$scs_arg_string>>''] = 0 & gt ''stripclub_schedule'', ''<<$scs_return_arg>>''">Cancel Shift</a>'
+	end
+	$result +=	'</td></tr>'
+
+	killvar '$scs_arg_string'
+	killvar '$scs_return_arg'
+	killvar '$scs_time_string'
+	killvar 'scs_hour1'
+	killvar 'scs_hour2'
+end
+
+if $ARGS[0] = 'random_stripper_name':
+	temp_rand = rand(0, 7)
+	if temp_rand = 0:
+		$result = '<i>Ruby</i>'
+	elseif temp_rand = 1:
+		$result = '<i>Onyx</i>'
+	elseif temp_rand = 2:
+		$result = '<i>Jade</i>'
+	elseif temp_rand = 3:
+		$result = '<i>Emerald</i>'
+	elseif temp_rand = 4:
+		!! Amythest
+		$result = '<i>Amy</i>'
+	elseif temp_rand = 5:
+		$result = '<i>Diamond</i>'
+	elseif temp_rand = 6:
+		$result = '<i>Lapis</i>'
+	else
+		$result = '<i>Opal</i>'
+	end
+	killvar 'temp_rand'
+end
+
+
+
+if $ARGS[0] = 'set_schedule_base':
+	if strip_club['schedule_update'] = 0:
+		strip_club['schedule_update'] = daystart
+		gs 'stripclub_schedule', 'schedule_reset'
+	end
+	gs 'stat'
+
+	$temp_table =	'<table border=1>'
+	$temp_table +=		'<tr>'
+	$temp_table +=			'<th></th>'
+	$temp_table +=			'<th>Sunday</th>'
+	$temp_table +=			'<th>Monday</th>'
+	$temp_table +=			'<th>Tuesday</th>'
+	$temp_table +=			'<th>Wednesday</th>'
+	$temp_table +=			'<th>Thursday</th>'
+	$temp_table +=			'<th>Friday</th>'
+	$temp_table +=			'<th>Saturday</th>'
+	$temp_table +=		'</tr>'
+
+	!! ---------------------------------------------- 18:00 Shifts ---------------------------------------------------------------------------------
+
+	$temp_table +=		'<tr>'
+	$temp_table +=			'<th>First shift</th>'
+
+	!! First Sunday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 7, 1, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! First Monday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 1, 1, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! First Tuesday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 2, 1, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! First Wednesday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 3, 1, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! First Thursday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 4, 1, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! First Friday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 5, 1, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! First Saturday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 6, 1, ARGS[1])
+	if AlbinaQW['working_stripclub'] = 1:
+		$temp_table +=				'<tr>'
+		$temp_table +=					'<td>'
+		$temp_table +=						'<i>Amber</i>'
+		$temp_table +=					'</td>'
+		$temp_table +=				'</tr>'
+	end
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	$temp_table +=		'</tr>'
+
+	!! ---------------------------------------------- 21:00 Shifts ---------------------------------------------------------------------------------
+
+	$temp_table +=		'<tr>'
+	$temp_table +=			'<th>Second shift</th>'
+
+	!! Second Sunday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 7, 2, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! Second Monday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 1, 2, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! Second Tuesday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 2, 2, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! Second Wednesday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 3, 2, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! Second Thursday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 4, 2, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! Second Friday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 5, 2, ARGS[1])
+	if AlbinaQW['working_stripclub'] = 1:
+		$temp_table +=				'<tr>'
+		$temp_table +=					'<td>'
+		$temp_table +=						'<i>Amber</i>'
+		$temp_table +=					'</td>'
+		$temp_table +=				'</tr>'
+	end
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	!! Second Saturday Shift
+	$temp_table +=			'<td>'
+	$temp_table +=				'<table>'
+	$temp_table +=					func('stripclub_schedule', 'display_single_shift', 6, 2, ARGS[1])
+	$temp_table +=				'</table>'
+	$temp_table +=			'</td>'
+
+	$temp_table +=		'</tr>'
+	$temp_table +=	'</table>'
+
+	'<<$temp_table>>'
+	killvar '$temp_table'
+end
+
+
+
+if $ARGS[0] = 'set_schedule':
+	gs 'stripclub_schedule', 'set_schedule_base', 0
+end
+
+
+
+if $ARGS[0] = 'next_week_set_schedule':
+	gs 'stripclub_schedule', 'set_schedule_base', 1
+end
+
+
+--- stripclub_schedule ---------------------------------

+ 534 - 191
locations/stwork.qsrc

@@ -1,197 +1,137 @@
 # stwork
-!!2021/04/15
+!!2024/08/10
+
 if $ARGS[0] = 'start':
-	$loc = 'stwork'
-	$loc_arg = 'start'
-	$locM = 'stwork'
-	$locM_arg = 'start'
-	$sexloc = 'stwork'
-	$menu_loc = 'stwork'
-	$menu_arg = 'start'
 	menu_off = 0
 	$location_type = 'private'
-	clr
 	minut += 5
+	gs 'shortgs', 'setloc', 'stwork', 'start'
+	$sexloc = 'stwork'
 	stripMir = 1
+	!! gs 'schedule', 'A23'
 	gs 'stat'
 	gs 'themes', 'indoors'
 	killvar '$sexloc'
 	CLOSE 'sound/street_club.mp3'
-	'<center><b><font color="maroon">Dressing room for strippers</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/backstage' + rand(1,7) + '.jpg"></center>'
-	''
-	'There are several <a href="exec:gt ''mirror'', ''start''">mirrors</a> hanging on the wall, where you can <a href="exec:gt ''mirror'', ''brush''">brush</a> your hair, and a selection of <a href="exec:gt ''wardrobe'', ''start''">clothes</a> hanging on rails for the girls to dress in.'
+	'<center><b><font color="maroon">Dressing Room</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/backstage.jpg"></center>'
+	'The room has <a href="exec:gt ''mirror'', ''start''">mirrors</a> all along the walls, where you can <a href="exec:gt ''mirror'', ''brush''">brush</a> your hair, and a selection of <a href="exec:gt ''wardrobe'', ''start''">clothes</a> hanging on rails for the girls to dress in. The whiteboard serving as the signup sheet for <a href="exec:gt ''stripclub_schedule'', ''set_schedule''">this week</a> and <a href="exec:gt ''stripclub_schedule'', ''next_week_set_schedule''">next week</a> is suctioned to one of the mirrors with a pen on top.'
 	'There are some stairs leading to the <a href="exec:gt ''stwork'', ''stripgirl''">stage</a> where you can head out to perform.'
 	if $clothingworntype = 'nude':
-		'To the side is a door which overlooks the back yard, used as a staff entrance to save girls from having to deal with scummy customers. Always standing by this entrance is a <a href="exec:gt ''stwork'', ''guard''">security guard</a>, who isn''t going to let you walk outside unless you put some clothes on.'
+		'To the side is a door which overlooks the staff parking lot to the rear, used as a private entrance so girls don''t to deal with scummy customers queuing out front. Always standing by this entrance is a <a href="exec:gt ''stwork'', ''guard''">security guard</a>, who isn''t going to let you walk outside unless you put some clothes on.'
 	else
-		'To the side is a <a href="exec:stripMir = 0 & gt ''stripclub'', ''start''">door</a> which overlooks the back yard, used as a staff entrance to save girls from meeting scummy customers. Always standing by this entrance is a <a href="exec:gt ''stwork'', ''guard''">security guard</a> keeping the girls safe.'
+		'To the side is a <a href="exec:stripMir = 0 & gt ''stripclub'', ''start''">door</a> which overlooks the staff parking lot to the rear, used as a private entrance so girls don''t to deal with scummy customers queuing out front. Always standing by this entrance is a <a href="exec:gt ''stwork'', ''guard''">security guard</a> keeping the girls safe.'
 	end
 	'Near the exit door is a vending machine selling '+iif(money >= 100,'<a href="exec:money -= 100 & gt ''food'', ''snack''">snacks</a>','snacks')+' and a <a href="exec:gt ''beverage'', ''bev_wat''">water cooler</a> which is used heavily by girls coming off stage.'
 	'A wooden door leads to the <a href="exec:gt ''stwork'', ''toilet''">staff bathroom</a>.'
 
-	! Tattoos increase your desireability as a stripper
-	stripKoef = 0
-	if pcs_tattoos['shoulder'] > 0: stripKoef += rand(1, 3)
-	if pcs_tattoos['back'] > 0: stripKoef += rand(1, 3)
-	if pcs_tattoos['belly'] > 0: stripKoef += rand(1, 3)
-	if pcs_tattoos['tramp'] > 0: stripKoef += rand(3, 6)
-	if pcs_tattoos['leg'] > 0: stripKoef += rand(1, 3)
-	if pcs_tattoos['arm'] > 0: stripKoef += rand(1, 3)
-	if pcs_tattoos['side'] > 0: stripKoef += rand(1, 3)
+	!! Tattoos increase your desireability as a stripper
+	if pcs_tattoos['shoulder'] > 0: stripKoef1 = rand(1,3)
+	if pcs_tattoos['back'] > 0: stripKoef2 = rand(1,3)
+	if pcs_tattoos['belly'] > 0: stripKoef3 = rand(1,3)
+	if pcs_tattoos['tramp'] > 0: stripKoef4 = rand(3,6)
+	if pcs_tattoos['leg'] > 0: stripKoef5 = rand(1,3)
+	if pcs_tattoos['arm'] > 0: stripKoef6 = rand(1,3)
+	if pcs_tattoos['side'] > 0: stripKoef7 = rand(1,3)
+	stripKoef = stripKoef1 + stripKoef2 + stripKoef3 + stripKoef4 + stripKoef5 + stripKoef6 + stripKoef7
 	if countmoney = 1:
 		countmoney = 0
 		gs 'stwork', 'tipcalculator'
 	end
 
-	act 'Exit the club':
-		if $clothingworntype ! 'nude':
-			gt 'stripclub', 'start'
-		else
-			msg'<b><font color = red>You need to get dressed.</font></b>'
-			gt 'stwork', 'start'
-		end
+	if strip_club['<<week>>_shift_1'] > 0 and (hour >= 18 or hour = 17 and minut >= 30):
+		gs 'stwork', 'set_perform_acts'
+	elseif strip_club['<<week>>_shift_2'] > 0 and (hour >= 21 or hour = 20 and minut >= 30 or hour < 3):
+		gs 'stwork', 'set_perform_acts'
+	else
+		gs 'stwork', 'set_shift_over_act'
 	end
-	act 'Go to the staff bathroom':gt 'stwork', 'toilet'
-	act 'Change your clothes':gt 'wardrobe', 'start'
+
+	act 'Go to the staff bathroom': gt 'stwork', 'toilet'
+	act 'Change your clothes': gt 'wardrobe', 'start'
 	act 'Look in the mirror': gt 'mirror', 'start'
 	if money >= 100: act 'Have a snack (0:15) (100 <b>₽</b>)': money -= 100 & gs 'food', 'snack'
-	act 'Have a cup of water (0:05)':gs 'beverage', 'bev_wat'
+	act 'Have a cup of water (0:05)': gs 'beverage', 'bev_wat'
+	if hour < 3 or (hour = 2 and minut < 45): act 'Take a break': gt 'stwork', 'rest'
+end
 
+if $ARGS[0] = 'set_perform_acts':
 	!! Private dance available
-	if stprivatechance > 0:
+	if strip_club['lapdance_chance'] > 0:
 		stpriv = stripKoef + (pcs_apprnc / 3)
-		! Bonus for pole-dancing
-		if stprivatechance = 2:
-			stpriv += 20
+		!! Bonus for poledancing
+		if strip_club['lapdance_chance'] = 2:
+			stprive += 20
 		end
-		if stpriv > rand (0, 100):
+		if stpriv > rand (0,100):
 		*nl
-			'One of the bouncers walks up to you, telling you that a customer is waiting for you in one of the private rooms.'
+			'One of the bouncers walks up and tells you that a customer is waiting for you in one of the private rooms.'
 			act 'Perform a private dance':
-				stprivatechance = 0
+				strip_club['lapdance_chance'] = 0
 				gt 'stwork2', 'privatdance'
 			end
 		end
 	end
 
-	if 	hour >= 11 or hour <= 2:
-		if (mc_inventory['cosmetics'] >= 3 or pcs_makeup >= 4):
-			act 'Prepare for your show':
-				*clr & cla
-				if pcs_sweat >= 20 or (pcs_leghair > 3 or ((pcs_pubes > 3 and pubestyle = 1) or (pubestyle >= 2 and pubestyle <=7) and pcs_pubes > 11)):
-					dynamic $showerdin
-					minut += 5
-					'<h3>Staff Bathroom</h3>'
-					'<h5>Shower</h5>'
-					'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
-					dynamic $brit
-					*nl
-					'After stripping from your clothes, you gather up your towel, washcloth and soap and head to the shower, where you thoroughly wash yourself.'
-					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
-				end
-				if pcs_makeup < 4:
-					if mc_inventory['cosmetics'] < 3:
-						*nl
-						'Once showered, you realize you don''t have enough makeup to go on stage.'
-						act 'Go back to the dressing room':gt 'stwork', 'start'
-						exit
-					end
-					gs 'exp_gain', 'makupskl', rand(1,3)
-					mc_inventory['cosmetics'] -= 3
-					vidageday -= 1
-					pcs_makeup = 4
-					minut += 5
-					'You brush your hair and put on heavy makeup for the customers.'
-				end
-				pcs_hairbsh = 1
-				!!gs 'clothing', 'wear_last_worn'
-				!!'You put your clothes back on before heading back onto the stage.'
-				if pcs_leghair <= 3:
-					if fingal <= 0:
-						if strippermission = 0:
-							act 'Go to the manager':
-								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripinspection.jpg"></center>'
-								'Before going on stage, you head to the manager''s office for your inspection.'
-								if $clothingworntype ! 'nude':
-									'"Take off your clothes," he sternly demands.'
-									'Once you''re done undressing, he walks up to you and inspects you closely.'
-									if pcs_sweat < 20:
-										'"Good, you have a clean scent. That is very important in this business."'
-										'He briefly runs his hand over your legs.'
-										if pcs_leghair <= 3:
-											'"Smooth legs. Very good."'
-											'He walks around you, looking you up and down from every side.'
-											if fingal <= 0:
-												'"No bruises. Good. The better you look, the easier it is to make money once you''re on that stage."'
-												'"And the last thing. I need to check if you''ve rid yourself of all your pubic hair."'
-												'He places his hand on your mound and slowly starts rubbing it, taking a little longer than he did on your legs.'
-												'You feel your pussy get a little wet from his touch and hope that he doesn''t notice.'
-												gs 'arousal', 'foreplay', 2
-												gs 'stat'
-												!! This allows different pubic styles but anything from small bush up is still not permitted.
-												if (pubestyle = 1 and pcs_pubes <= 3) or lashair = 1:
-													strippermission = 1
-													'"Very smooth. Good. Looks like you''re ready to get on the stage. You can get to work," he says and ushers you out of his office.'
-													stpredmet = 3
-													act 'Go back stage': gt 'stwork2', 'strip'
-												elseif ((pubestyle >= 2 and pubestyle <=7) or (pubestyle >= 12 and pubestyle <=14)) and pcs_pubes <= 25:
-													strippermission = 1
-													'"Very cute pubic hair, I''m sure the customers will appreciate it. Now get on stage. You can work," he says and ushers you out of his office.'
-													stpredmet = 3
-													act 'Go back stage': gt 'stwork2', 'strip'
-												else
-													'"You need to shave everything off <<$pcs_stagename>>, although a small and cute pubic style is popular at the moment if you feel creative." He smiles and pats you on the ass as he says "Go take care of that and then come back."'
-													act 'Go to the dressing room': gt 'stwork', 'start'
-												end
-											else
-												'"I can''t let you up on the stage with a black eye like that. You''ll have to wait until it''s gone. Come back when it''s healed."'
-												act 'Go to the dressing room': gt 'stwork', 'start'
-											end
-										else
-											'"Shave your legs! A customer doesn''t want to feel any stubble during a lap dance. Go take care of that and then come back."'
-											act 'Go to the dressing room': gt 'stwork', 'start'
-										end
-									else
-										'"Damn it <<$pcs_stagename>>, you stink! Go and take a shower. We can''t have the club smelling like a locker room."'
-										act 'Go to the dressing room': gt 'stwork', 'start'
-									end
-								else
-									'You can''t do a striptease if you haven''t got any clothes to strip out of <<$pcs_stagename>>. Find something sexy in the wardrobe first.'
-									act 'Go to the dressing room': gt 'stwork', 'start'
-								end
-							end
-						else
-							act 'Go back stage':
-								stpredmet = 3 & gt 'stwork2', 'strip'
-							end
-						end
+	if kosmetica >= 3 or pcs_makeup >= 4:
+		act 'Prepare for your show':
+			*clr & cla
+			if pcs_sweat >= 20 or (pcs_leghair > 3 or ((pcs_pubes > 3 and pubestyle = 1) or (pubestyle >= 2 and pubestyle <=7) and pcs_pubes > 11)):
+				dynamic $showerdin
+				minut += 5
+				'<h3>Staff Bathroom</h3>'
+				'<h5>Shower</h5>'
+				'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
+				dynamic $brit
+				*nl
+				'After stripping from your clothes, you gather up your towel, washcloth and soap and head to the shower, where you thoroughly wash yourself.'
+				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
+			end
+			if pcs_makeup < 4:
+				gs 'exp_gain', 'makupskl', rand(1,3)
+				kosmetica -= 3
+				vidageday -= 1
+				pcs_makeup = 4
+				minut += 5
+				'You brush your hair and put on heavy makeup for the customers.'
+			end
+			pcs_hairbsh = 1
+			!!gs 'clothing', 'wear_last_worn'
+			!!'You put your clothes back on before heading back onto the stage.'
+			act 'Go on stage':
+				if pcs_leghair <= 3 and pcs_pubes <= 25:
+					gt 'stwork2', 'strip'
+				else
+					*clr & cla
+					!! IMAGE
+					'You start climbing the steps to the stage when a shout from behind makes you stop.'
+					'"You''re gonna go on stage like that?"'
+					'Turning, you see all the other strippers snickering at you.'
+					if pcs_leghair > 3 and pcs_pubes > 25:
+						'"Nobody wants to see a stripper with hairy legs and untrimmed pubes!" one of them laughs. "Have a shave before you go on stage!"'
+					elseif pcs_pubes > 25:
+						'"Nobody wants to see a stripper with a jungle between her legs!" one of them laughs. "Have a shave before you go on stage!"'
 					else
-						'You aren''t allowed on stage because of your black eye.'
+						'"Nobody wants to see a stripper with hairy legs!" one of them laughs. "Have a shave before you go on stage!"'
 					end
-				else
-					'Nobody wants to see a stripper with hairy legs and untrimmed pubes. Have a shave before you go on stage!'
+					act 'Leave': gt $loc, $loc_arg
 				end
-				act 'Leave':gt $loc, $loc_arg
 			end
-		else
-			*nl
-			'<font color="red">You don''t have enough make-up to get ready.</font>'
 		end
 	else
 		*nl
-		'There are no shows at this time, the stage is open between '+func('time', 'get_time_string', 11, 0, cheatVars['time_format'])+' and '+func('time', 'get_time_string', 2, 0, cheatVars['time_format'])+'.'
+		'<font color="red">You don''t have enough make-up to get ready.</font>'
 	end
-	!act '<b>Go back stage</b>':
-	!	if hour >= 11 or hour <= 2:
+
+	!act 'Go backstage':
+	!	if hour >= 2 or hour <= 3:
 	!		if cumloc[1] = 0 and cumloc[2] = 0 and cumloc[4] = 0 and cumloc[5] = 0 and cumloc[6] = 0 and cumloc[7] = 0 and cumloc[11] = 0 and cumloc[14] = 0:
 	!			if pcs_makeup >= 4:
 	!				if pcs_hairbsh = 1:
 	!					if pcs_sweat < 20:
 	!						if pcs_leghair <= 3 and pcs_pubes <= 31:
 	!							if fingal <= 0:
-	!								stpredmet = 3 & gt 'stwork2', 'strip'
+	!								strip_club['dancing_rounds'] = 3 & gt 'stwork2', 'strip_show_start'
 	!							else
 	!								'You aren''t allowed on stage due to your black eye.'
 	!							end
@@ -199,7 +139,7 @@ if $ARGS[0] = 'start':
 	!							'Nobody wants to see a stripper with hairy legs and untrimmed pubes. Have a shave before you go on stage!'
 	!						end
 	!					else
-	!						'Damn, you stink like a pigsty! Take a shower before going on stage.'
+	!						'You should have a shower before going on stage.'
 	!					end
 	!				else
 	!					'The least you can do is brush your hair!'
@@ -211,25 +151,91 @@ if $ARGS[0] = 'start':
 	!			'There is some visible semen on your body. Wash yourself before going on stage.'
 	!		end
 	!	else
-	!		'You''re done for today. Time to head home.'
+	!		'Your shift is over and the club will be closing soon. Time to head home.'
 	!	end
 	!end
 end
 
+
+if $ARGS[0] = 'set_shift_over_act':
+	act 'Shift over':
+		'Your shift is over, so you prepare to leave for the night.'
+
+		if $clothingworntype = 'nude':
+			if strip_club['guard_meet'] = 0:
+				'The muscular security guard stops you in your tracks. "You only need to be naked inside the club, girl. Get dressed before you leave."'
+				'His eyes dart up and down as he checks you out.'
+			else
+				'Viktor grins as you approach. "Looking fine, <<$pcs_strippername>>! As much as I hate to say it, you need to put your clothes on first."'
+				'His eyes dart up and down as he checks you out.'
+			end
+
+			act 'Return to dressing room': gt 'stwork', 'start'
+			exit
+		end
+
+		if strip_club['guard_hookup'] = 0:
+			if strip_club['guard_meet'] = 0:
+				'The muscular security guard silently nods at you as you walk past, but you sense him checking you out as you leave.'
+			else
+				'Viktor grins as you approach. "Looking fine, <<$pcs_strippername>>!"'
+				'You sense him checking you out as you head out the door.'
+			end
+
+			act 'Leave': gt 'stripclub', 'start'
+		else
+			strip_club['guard_hookup'] = 0
+			'You finish getting dressed and pack up your belonginsg before heading out the back door. Viktor is waiting for you outside.'
+			if strip_club['guard_sex'] = 0:
+				'"I''ve been looking forward to this. I want to know just what kind of minx you are!"'
+				'You smile and give him a kiss. "Well, why don''t we find out?"'
+				'He wraps his arm around your waist and leads you to his car.'
+			else
+				'"Hey baby girl," he says as he firmly squeezes your ass. "You ready?"'
+				'You smile and give him a kiss. "I''ve been thinking about your cock all night..."'
+				'He grins as he wraps his arm around your waist and leads you to his car.'
+			end
+
+			act 'Go with him': gt 'viktor_sex', 'start'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'strip_clothing':
+	$lastwornclothingtype['strip_club'] = $clothingworntype
+	lastwornclothingnumber['strip_club'] = clothingwornnumber
+
+	$lastwornpantytype['strip_club'] = $pantyworntype
+	lastwornpantynumber['strip_club'] = pantywornnumber
+
+	$lastwornbratype['strip_club'] = $braworntype
+	lastwornbranumber['strip_club'] = brawornnumber
+
+	if CloStyle2 = 4:
+		strip_club['school_girl_outfit'] = 1
+	else
+		strip_club['school_girl_outfit'] = 0
+	end
+	if $clothingworntype ! 'nude': gs 'clothing', 'strip'
+	if $braworntype ! 'none': gs 'bras', 'remove'
+	if $pantyworntype ! 'none': gs 'panties', 'remove'
+end
+
 if $ARGS[0] = 'tipcalculator':
 	*nl
 	'You now have a chance to add up any tips you gained from your last show.'
-	!20% chance that tattoos increase tips
-	if rand (0, 4) = 0:
-		striptip += stripKoef
+	!! 20% chance that tattoos increase tips
+	if rand(0,4) = 0:
+		strip_club['strip_tips'] += stripKoef
 	end
-	if striptip < 25:
+	if strip_club['strip_tips'] < 25:
 		'Nobody even noticed you or your efforts on the stage and it''s no surprise you got nothing for your efforts.'
-	elseif striptip < 40:
+	elseif strip_club['strip_tips'] < 40:
 		'A few people looked at you, but you didn''t receive a single tip.'
-	elseif striptip < 55:
+	elseif strip_club['strip_tips'] < 55:
 		'A few people looked at you, but you didn''t receive any tips.'
-	elseif striptip < 70:
+	elseif strip_club['strip_tips'] < 70:
 		if rand(0,5) = 0:
 			'The customers were pleased with your performance, but not enough to tip you.'
 		else
@@ -239,59 +245,332 @@ if $ARGS[0] = 'tipcalculator':
 			gs 'stat'
 			'The customers were pleased with your performance. They gave you <<paymoneyrand>> <b>₽</b> in tips.'
 		end
-	elseif striptip < 90:
+	elseif strip_club['strip_tips'] < 90:
 		if rand(0,10) = 0:
 			'The customers followed your movements between their conversations. You deserved some tips, but luck was against you and you got nothing.'
 		else
-			paymoneyrand = rand(10,(striptip/5)) * 2
+			paymoneyrand = 2 * rand(10, strip_club['strip_tips'] / 5)
 			money += paymoneyrand
 			pcs_mood += rand(3,10)
 			gs 'stat'
 			'The customers followed your movements between their conversations. After counting out your tips, it amounts to <<paymoneyrand>> <b>₽</b>.'
 		end
 	else
-		paymoneyrand = rand(20,striptip)
+		paymoneyrand = rand(20, strip_club['strip_tips'])
 		money += paymoneyrand
 		pcs_mood += rand(5,20)
 		gs 'stat'
 		'The customers were mesmerized by your dancing and tipped you <<paymoneyrand>> <b>₽</b>.'
 	end
+	killvar 'paymoneyrand'
 end
 
 if $ARGS[0] = 'stripgirl':
 	*clr & cla
+	minut += 2
 	gs 'stat'
-	striptalkrand = rand(0, 10)
-
-	if striptalkrand = 0:$striptalk = '"Have you heard about that new girl? She''s really good-looking and all, but she got booed off-stage. Apparently, she was worthless."'
-	if striptalkrand = 1:$striptalk = '"I''m telling you, girls with tattoos are a huge turn-on to men."'
-	if striptalkrand = 2:$striptalk = '"Working the pole is much more profitable than just dancing. It''s easier to excite the customer, but it also demands more from the person doing it."'
-	if striptalkrand = 3:$striptalk = '"Phew, you really have to leave it all out on the stage, getting back all sweaty, with disheveled hair and makeup ruined. The cost in cosmetics is enough to bankrupt you."'
-	if striptalkrand = 4:$striptalk = '"Private dances might be guaranteed money, but the real cash is in the ''extras''."'
-	if striptalkrand = 5:$striptalk = '"Remember that ugly girl? She got on stage and got booed hard by the customers, but as soon as she started working the pole, their jaws dropped and she made a fortune in tips."'
-	if striptalkrand = 6:$striptalk = '"Did I tell you about the time I forgot it was male night? I rushed about getting ready, even broke a nail, only get here and see those bears up on stage!"'
-	if striptalkrand = 7:$striptalk = '"That cute security guard was telling me about the problems the girls face with this job. Half of them become whores in the end because the money is better."'
-	if striptalkrand = 8:$striptalk = '"There was a fat woman trying to dance on the pole who fell face first on the floor. I thought she''d knocked herself out! You should have seen the black eye she got!"'
-	if striptalkrand = 9:$striptalk = '"We had a comedian work here one time. She was a pretty little thing, and she danced well, but jokes don''t earn you any tips here."'
-	if striptalkrand = 10:$striptalk = '"I heard about clubs abroad where the tips are so good that the strippers pay for the right to work there."'
-	if striptalkrand = 11:$striptalk = '"I''m telling you, doing the occasional porn shoot on one of your days off is a great way to top up your income."'
-	'The girls are doing their makeup and hair in the mirror, laughing and gossiping.'
-	'<<$striptalk>>'
-
-	act 'Move away':gt 'stwork', 'start'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/backstage.jpg"></center>'
+	'The girls are doing their makeup and hair while gossiping.'
+
+	temp_rand = rand(0,16)
+	if temp_rand = 0 and AlbinaQW['working_stripclub'] = 1:
+		'"That Amber girl is always stealing the same weekend shifts! She''s either beating us all to the board or is banging the boss. Probably both."'
+	elseif temp_rand <= 1:
+		'"I''m telling you, girls with tattoos are a huge turn-on for men."'
+	elseif temp_rand = 2:
+		'"Working the pole is much more profitable than just dancing. It''s easier to excite the customer, but it also demands more from the person doing it."'
+	elseif temp_rand = 3:
+		'"Phew! You really have to leave it all out on the stage, getting back all sweaty with disheveled hair and ruined makeup. The cost in cosmetics is enough to bankrupt you."'
+	elseif temp_rand = 4:
+		'"Private dances might be guaranteed money, but the real cash is in the ''extras''."'
+	elseif temp_rand = 5:
+		'"Remember that ugly girl? She went on stage and got booed hard by the customers, but as soon as she started working the pole, their jaws dropped and she made a fortune in tips!"'
+	elseif temp_rand = 6:
+		'"I swear Jade almost ruptured an implant when she was working the pole the other night! Her new tits get her plenty of tips, though."'
+	elseif temp_rand = 7:
+		'"The security guard at the back door is always checking me out. I wonder if he''s interested in hooking up?"'
+	elseif temp_rand = 8:
+		'"There was a fat woman trying to dance on the pole who fell face first on the floor. I thought she''d knocked herself out! You should have seen the black eye she got!"'
+	elseif temp_rand = 9:
+		'"We had a comedian work here one time. She was a pretty little thing, and she danced well, but jokes don''t earn you any tips here."'
+	elseif temp_rand = 10:
+		'"I heard about clubs abroad where the tips are so good that the strippers pay for the right to work there."'
+	elseif temp_rand = 11:
+		'"I''m telling you, doing the occasional porn shoot on one of your days off is a great way to top up your income!"'
+	elseif temp_rand = 12:
+		'"I got a bonus this week, but I wish he wouldn''t make me swallow. It tastes icky."'
+	elseif temp_rand = 13:
+		'"I caught Ruby snorting shit right here on the make-up table! Can she at least do it in the fucking bathroom?"'
+	elseif temp_rand = 14:
+		'"Diamond needs to get some respect for herself. I saw her flirting with some old man, trying to sweet talk him into being her sugar daddy. Fucking perv was eating it all up."' 
+	elseif temp_rand = 15:
+		'"I saw a guy basically salivating at Opal''s huge tits while throwing all his money at her feet. Some girls have it fucking easy..."'
+	else
+		'"Have you heard about that new girl? She''s really good-looking and all, but she got booed off-stage."'
+	end
+	killvar 'temp_rand'
+
+	act 'Move away': gt 'stwork', 'start'
 end
 
 if $ARGS[0] = 'guard':
 	*clr & cla
+	menu_off = 1
 	gs 'stat'
-	if $clothingworntype = 'nude':
-		'The bored security guard perks up when you approach him. "Looking good there, <<$pcs_nickname>>."'
-		'He doesn''t really have much to say and the conversation quickly turns into an awkward silence.'
+	if strip_club['guard_meet'] = 0:
+		strip_club['guard_meet'] = 1
+		!! IMAGE
+		if $clothingworntype = 'nude':
+			'The guard at the door is an older man, an imposing mountain of muscle who grins as you approach him. "Hey girl, I can''t let you outside like that, even if you do look good naked," he jokes.'
+
+			act 'Flirt with him':
+				cla
+				minut += 2
+				strip_club['guard_flirt'] = 1
+				gs 'stat'
+				'You decide to play him at his own game. "Don''t pretend you wouldn''t enjoy chasing me. Catching my naked body would be your reward after all..." you joke with a smile while drawing attention to your breasts.'
+				if tits >= 4:
+					'"Nice rack, babe. The sight of those puppies would make any man pay! I''m Viktor by the way."'
+				else
+					'He grins at you while checking you out. No, I guess I wouldn''t... I''m Viktor by the way."'
+				end
+				'"<$pcs_strippername>>," you smile. "I''d love to chat, but I need to get going."'
+				'"Come by any time," he replies with a smile. You can sense him checking you out as you walk away and decide to add a little sway to your hips.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+
+			act 'Chat with him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You ignore his comment as you introduce yourself. "Hey, I''m <$pcs_strippername>>."'
+				'"Viktor," he replies. "The boss sure knows how to find the pretty ones."'
+				'"An ugly stripper wouldn''t make much money now, would she?" you reply and he chuckles.'
+				'"No, I guess she wouldn''t. Don''t let me hold you up, but come back any time," he says with a smile. You can sense him checking you out as you walk away, but choose to ignore it.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+
+			act 'Avoid him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You''re creeped out by him, but manage to force an awkward smile at him. "Hey... I''m <$pcs_strippername>>..."'
+				'"Viktor," he replies. "The boss sure knows how to find the pretty ones..."'
+				'"Yeah, I guess he does... Sorry, but I need to get going."'
+				'Come by any time," he replies. You can sense him checking you out as you walk away and quicken your pace.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+		else
+			'The guard at the door is an older guy, an imposing mountain of muscle who grins as you approach him. "Hey girl. Aren''t you looking fine?"'
+
+			act 'Flirt with him':
+				cla
+				minut += 2
+				strip_club['guard_flirt'] = 1
+				gs 'stat'
+				'"Oh? Like what you see?" you ask with a smile while turning to show him your ass.'
+				'He grins at you while checking you out. Yeah, I guess I do... I''m Viktor by the way."'
+				'"<$pcs_strippername>>," you smile. "I''d love to chat, but I need to get going."'
+				'"Come by any time," he replies with a smile. You can sense him checking you out as you walk away and decide to add a little sway to your hips.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+
+			act 'Chat with him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You ignore his comment as you introduce yourself. "Hey, I''m <$pcs_strippername>>."'
+				'"Viktor," he replies. "The boss sure knows how to find the pretty ones."'
+				'"An ugly stripper wouldn''t make much money now, would she?" you reply and he chuckles.'
+				'"No, I guess she wouldn''t. Don''t let me hold you up, but come back any time," he says with a smile. You can sense him checking you out as you walk away, but choose to ignore it.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+
+			act 'Avoid him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You''re creeped out by him, but manage to force an awkward smile at him. "Hey... I''m <$pcs_strippername>>..."'
+				'"Viktor," he replies. "The boss sure knows how to find the pretty ones..." He makes no effort to hide the fact that he''s clearly undressing you with his eyes.'
+				'"Yeah, I guess he does... Sorry, but I need to get going."'
+				'Come by any time," he replies. You can sense him checking you out as you walk away and quicken your pace.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+		end
+
+	elseif strip_club['guard_flirt'] < 2:
+		if $clothingworntype = 'nude':
+			!! IMAGE
+			'Viktor grins as you approach. "Hey <<$pcs_strippername>>. Looking as sexy as ever."'
+			if strip_club['guard_flirt'] = 0:
+				act 'Flirt with him':
+					cla
+					strip_club['guard_flirt'] = 1
+					minut += 2
+					gs 'stat'
+					'You decide that he isn''t so bad after all and flirt with him. "Like what you see?" you ask with a smile as you jiggle your breasts.'
+					if tits >= 4:
+						'"Nice rack, babe. The sight of those puppies would make any man pay! I''m Viktor by the way."'
+					else
+						'He grins at you while checking you out. No, I guess I wouldn''t... I''m Viktor by the way."'
+					end
+					'You give him a quick smile before heading on your way. You can sense him checking you out as you walk away and decide to add a little sway to your hips.'
+					act 'Move away': gt 'stwork', 'start'
+				end
+
+			elseif strip_club['guard_flirt'] = 1:
+				act 'Continue flirting with him':
+					cla
+					strip_club['guard_flirt'] = 2
+					minut += 2
+					gs 'stat'
+					'He''s pretty good looking for his age and you can tell he''s interested in you, so you decide to have some fun with him. You turn and wiggle your naked ass at him.'
+					'He grins at you while checking you out and you can''t help but smile as you see a bulge clearly forming in his pants.'
+					if pcs_butt > 12: '"Damn, that''s a fine looking ass! No wonder the boss hired you."'
+					'You finish your show and turn back to face him. "Maybe I''ll offer you something other than a simple tease next time..." you whisper seductively while placing your hand on his chest.'
+					'All he does is grin as you wink at him before walking away, making sure to add some extra sway to your hips as you do.'
+					act 'Move away': gt 'stwork', 'start'
+				end
+			end
+
+			act 'Chat with him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You keep things friendly with him and strike up a short conversation, even if he is distracted by your naked body.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+
+			act 'Continue to avoid him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You''re still creeped out by him, which he seems to have picked up on since he just gives you a halfhearted nod as you walk past.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+		else
+			!! IMAGE
+			'Viktor grins as you approach. "Hey <<$pcs_strippername>>. Looking as sexy as ever."'
+			if strip_club['guard_flirt'] = 0:
+				act 'Flirt with him':
+					cla
+					strip_club['guard_flirt'] = 1
+					minut += 2
+					gs 'stat'
+					'You decide that he isn''t so bad after all and flirt with him. "Like what you see?" you ask with a smile as you draw attention to your breasts.'
+					if tits >= 4:
+						'"Nice rack, babe. The sight of those puppies would make any man pay! I''m Viktor by the way."'
+					else
+						'He grins at you while checking you out. No, I guess I wouldn''t... I''m Viktor by the way."'
+					end
+					'You give him a quick smile before heading on your way. You can sense him checking you out as you walk away and decide to add a little sway to your hips.'
+					act 'Move away': gt 'stwork', 'start'
+				end
+			elseif strip_club['guard_flirt'] = 1:
+				act 'Continue flirting with him':
+					cla
+					strip_club['guard_flirt'] = 2
+					minut += 2
+					gs 'stat'
+					'He''s pretty good looking for his age and you can tell he''s interested in you, so you decide to have some fun with him. You turn and wiggle your ass at him.'
+					'He grins at you while checking you out and you can''t help but smile as you see a bulge clearly forming in his pants.'
+					if pcs_butt > 12: '"Damn, that''s a fine looking ass! No wonder the boss hired you."'
+					'You finish your show and turn back to face him. "Maybe I''ll offer you something other than a simple tease next time..." you whisper seductively while placing your hand on his chest.'
+					'All he does is grin as you wink at him before walking away, making sure to add some extra sway to your hips as you do.'
+					act 'Move away':gt 'stwork', 'start'
+				end
+			end
+			act 'Chat with him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You keep things friendly with him and strike up a short conversation.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+
+			act 'Continue avoiding him':
+				cla
+				minut += 2
+				gs 'stat'
+				'You''re still creeped out by him, which he seems to have picked up on since he just gives you a halfhearted nod as you walk past.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+		end
 	else
-		'A bored looking security guard stands by the door. Seeing you, he lazily nods. "Hey <<$pcs_nickname>>."'
-	end
+		if strip_club['guard_sex'] = 0:
+			!! IMAGE
+			'Viktor grins as you approach. "Hey <<$pcs_strippername>>. Looking as sexy as ever."'
+			if stat['think_virgin'] = 1 and stat['vaginal'] = 0:
+				cla
+				minut += 2
+				strip_club['guard_flirt'] = -1
+				gs 'stat'
+				'You place your hand on his chest and lean in close to him.'
+				'"You want a piece of this ass, don''t you?" you whisper.'
+				'To your surprise, he removes your hand. "I need you to be honest with me. Are you still a virgin?"'
+				'"Wha..? Yes, but why does that matter? We can do anal," you say in response, which causes him to chuckle.'
+				'"I don''t do anal, girl. I like giving sluts a good pounding in the proper hole, and your delicate little virgin pussy won''t do."'
+				'You''re about to protest, but he shuts you down. "You''re not my type, cherry pie, so it''s best if we just stop this little game."'
+				'You just nod and silently walk away as he chuckles to himself. "A fucking virgin stripper..."'
+				act 'Move away': gt 'stwork', 'start'
+				exit
+			end
+
+			act 'Take him home':
+				cla
+				minut += 2
+				gs 'stat'
+				if week = 5 and AlbinaQW['working_stripclub'] = 1:
+					'You just smile at him. You know what you want and you''re going to get it. You place your hand on his chest and lean in close to him.'
+					'"You like me, I like you. So why don''t you take me home and ravage me like the little slut that I am?" you whisper while brushing your hand across his crotch.'
+					'He smiles before he removes your hand. "Sorry <<$pcs_strippername>>, but I''ve already got a girl I''m taking home tonight."'
+					'"Oh..." you reply. "Never mind then."'
+					act 'Move away': gt 'stwork', 'start'
+				else
+					strip_club['guard_hookup'] = 1
+					'You just smile at him. You know what you want and you''re going to get it. You place your hand on his chest and lean in close to him.'
+					'"You like me, I like you. So why don''t you take me home and ravage me like the little slut that I am?" you whisper while brushing your hand across his crotch.'
+					'In response, he grabs your ass cheek and firmly squeezes it in his hand. "You won''t be able to walk for a week when I''m done with you!"'
+					'You giggle. "I look forward to it." You then head on your way, feeling a little excited about what''s to come.'
+					act 'Move away': gt 'stwork', 'start'
+				end
+			end
 
-	act 'Move away':gt 'stwork', 'start'
+			act 'Not tonight':
+				cla
+				minut += 2
+				gs 'stat'
+				'As much as you want it to happen, now doesn''t feel like the best time to hook up with him, so you just continue flirting with him, advances that are eagerly reciprocated.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+		else
+			act 'Take him home':
+				cla
+				minut += 2
+				gs 'stat'
+				'You''re feeling rather horny tonight, and Viktor is a good way to scratch that itch...'
+				'Without hesitation, you walk up and rub your hand against his crotch. "Your little whore could do with a good pounding later..."'
+				if week = 5 and AlbinaQW['working_stripclub'] = 1:
+					'He smiles before he removes your hand. "Sorry <<$pcs_strippername>>, but I''ve already got a girl I''m taking home tonight."'
+					'"Oh..." you reply. "Never mind then."'
+					act 'Move away': gt 'stwork', 'start'
+				else
+					strip_club['guard_hookup'] = 1
+					'His hand caresses your back. "Then I''ll be sure to take good care of you then, baby girl."'
+					'You give him a quick kiss and he slaps your ass before you head on your way.'
+					act 'Move away': gt 'stwork', 'start'
+				end
+			end
+
+			act 'Not tonight':
+				cla
+				minut += 2
+				gs 'stat'
+				'As much as the thought of hooking up with Viktor turns you on, tonight isn''t the best night for it, so you just flirt with him instead.'
+				act 'Move away': gt 'stwork', 'start'
+			end
+		end
+	end
 end
 
 if $ARGS[0] = 'toilet':
@@ -303,19 +582,18 @@ if $ARGS[0] = 'toilet':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/bathroom/toilet.jpg"></center>'
 	*nl
-	'You enter a dirty and smelly staff bathroom that''s probably never been cleaned.'
-	'There is no mirror, only a grimy shower, toilet and basin.'
+	'You enter the staff bathroom that contains a single shower, a toilet stall and a wash basin.'
 	*nl
-	if lashair ! 1: 'Your razor will last <b><<mc_inventory[''razor'']>></b> more ' + iif(mc_inventory['razor'] =  1, 'shave', 'shaves') + '. <a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
+	'Your razor will last <b><<stanok>></b> more ' + iif(stanok = 1, 'shave', 'shaves') + '. <a href="exec:gs ''din_van'', ''shave_options''">Shave Options</a>'
 
-	act 'Leave the bathroom':gt 'stwork', 'start'
-!	if mc_inventory['cosmetics'] >= 3:
+	act 'Leave the bathroom': gt 'stwork', 'start'
+!	if kosmetica >= 3:
 !		act 'Have a shower and get ready for work':
 !			*clr & cla
 !			dynamic $showerdin
 !			minut += 10
 !			gs 'exp_gain', 'makupskl', rand(1,3)
-!			mc_inventory['cosmetics'] -= 3
+!			kosmetica -= 3
 !			vidageday -= 1
 !			pcs_makeup = 4
 !			pcs_hairbsh = 1
@@ -323,8 +601,9 @@ if $ARGS[0] = 'toilet':
 !			'<h5>Shower</h5>'
 !			'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
 !			*nl
-!			'You strip from your clothes and gather up your towel, washcloth and soap before heading to the shower. You wash yourself thoroughly, brush your hair and put on heavy makeup for the customers.'
-!			act 'Get out and dry off':gt $loc, $loc_arg
+!			'You strip from your clothes and enter the shower, where you wash yourself thoroughly before brushing your hair and applying some heavy makeup.'
+!			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
+!			act 'Get out and dry off': gt $loc, $loc_arg
 !			dynamic $brit
 !		end
 !	else
@@ -336,10 +615,9 @@ if $ARGS[0] = 'toilet':
 		'<h3>Staff Bathroom</h3>'
 		'<h5>Shower</h5>'
 		'<center><img <<$set_imgh>> src="images/locations/shared/brothel/brothelshower.jpg"></center>'
-		*nl
-		'After stripping from your clothes, you gather up your towel, washcloth and soap and head to the shower. You thoroughly wash yourself to be as clean as possible for potential customers.'
+		'After stripping from your clothes, you enter the shower, where you thoroughly wash yourself.'
 		if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
-		act 'Get out and dry off':gt $loc, $loc_arg
+		act 'Get out and dry off': gt $loc, $loc_arg
 		dynamic $brit
 	end
 
@@ -353,4 +631,69 @@ if $ARGS[0] = 'toilet':
 	gs 'din_van', 'prvt_pee'
 end
 
+if $ARGS[0] = 'rest':
+	'You take a seat to recharge before going back out on stage.'
+	if rand(0,2) = 0 and ((year = 2017 and month >= 9 and week = 5 and hour >= 22) or (week = 6 and AlbinaQW['working_stripclub'] = 0)):
+		*clr & cla
+		AlbinaQW['working_stripclub'] = 1
+		minut += 2
+		gs 'stat'
+		!!IMAGE
+		'A girl wearing an eye-catching corset and skimpy g-string is sitting at one of the mirrors touching up her heavy layer of makeup. You don''t think you''ve seen her before, so you walk over to introduce yourself.'
+		'"Hey, I''m-" you start, but stop when the girl turns to look at you. It''s Albina!'
+		if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+			'You see the flash of recognition in her eyes and she quickly stands and pulls you over to a more secluded spot.'
+			'"Albina?!" you ask and she quickly shushes you.'
+			'"Don''t call me that! In here, I''m known as Amber."'
+			*nl
+			'"And I''m <<$pcs_strippername>>," you reply.'
+			'She smiles. "Looks like we''re going to be collegues from now on. I should finish getting ready for my performance. See you around... <<$pcs_strippername>>."'
+			'She winks at you before turning back to finish her makeup.'
+			act 'Return to dressing room': gt 'stwork', 'start'
+		else
+			'You see the flash of recognition in her eyes before she roughly drags you over to a more secluded spot.'
+			'"I''ll be quick here <<$pcs_nickname>>, or whatever you call yourself here. I don''t want to work with you and you won''t want to work with me, so just stay out of my way and I''ll stay out of yours, yeah?"'
+			'She doesn''t wait for an answer as she turns back to finish getting ready. You hear her muttering something under her breath, but can''t make out what she''s saying.'
+			act 'Return to dressing room': gt 'stwork', 'start'
+		end
+	elseif rand(0,2) = 0 and ((week = 5 and AlbinaQW['working_stripclub'] = 1 and hour >= 22) or (week = 6 and AlbinaQW['working_stripclub'] = 1)):
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		!!IMAGE
+		'A scantily-clad Albina is sitting at one of the mirrors touching up her heavy layer of makeup.'
+		if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+			'She smiles when she sees you and invites you to sit and chat with her as she finishes getting ready. Once her makeup is ready, she adjusts her corset and gives her hair a small ruffle before bidding you farewell and strutting out of the room.'
+			act 'Return to dressing room': gt 'stwork', 'start'
+		else
+			'She just glares at you and turns her attention back to the mirror. Finishing her makeup, she adjusts her corset and gives her hair a small ruffle before strutting out of the room.'
+			act 'Return to dressing room': gt 'stwork', 'start'
+		end
+	elseif rand(0,2) = 0 and strip_club['seen_ruby_drugs'] = 0:
+		*clr & cla
+		strip_club['seen_ruby_drugs'] = 1
+		minut += 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/city/redlight/stripclub/snort.mp4"></video></center>'
+		'You see a red haired girl sitting at one of the mirrors. She looks a little jumpy as she rolls up a ruble bill before she suddenly leans over and snorts what you assume to be drugs up her nose. She blissfully slumps back in her chair before she spots you in the mirror.'
+		'"The fuck are you looking at, bitch? Mind your own fucking business!" she snarls as she shoves you aside and struts out of the room.'
+		'That must have been Ruby. You''ve heard the other strippers talking about her having a serious drug problem.'
+	elseif rand(0,2) = 0 and strip_club['seen_ruby_drugs'] = 1:
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/city/redlight/stripclub/snort.mp4"></video></center>'
+		'You catch Ruby preparing a line of cocaine on the table in front of her before she quickly snorts it and slumps back in her chair.'
+		'You shake your head before leaving her to it.'
+	else
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		!!IMAGE
+		'One of your fellow strippers is touching up her makeup at one of the mirrors. She smiles at you before strutting out of the room.'
+		act 'Return to dressing room': gt 'stwork', 'start'
+	end
+end
+
+
 --- stwork ---------------------------------

+ 425 - 288
locations/stwork2.qsrc

@@ -1,33 +1,56 @@
 # stwork2
-!!2021/04/15
-if $ARGS[0] = 'strip':
-	clr
-	custbooing = 0
+!!2024/08/10
+if $ARGS[0] = 'strip_show_start':
+	*clr & cla
+	strip_club['cust_boos'] = 0
+	$strip_club['bra_type'] = $braworntype
+	strip_club['bra_number'] = brawornnumber
+	$strip_club['panty_type'] = $pantyworntype
+	strip_club['panty_number'] = pantywornnumber
+
 	countmoney = 1
 	gs 'stat'
 	'<center><b><font color="maroon">Stage</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub1.jpg"></center>'
-	'You are ready to start, the music starts. It''s now or never.'
-	act 'get on stage': gs 'stwork2', 'strip_hub2', 1
-end	
+	'You''re ready to go as the music starts. It''s now or never.'
+	act 'Go on stage': gs 'stwork2', 'strip_hub2', 1
+end
+
+if $ARGS[0] = 'strip_show_end':
+	if $strip_club['bra_type'] <> '': gs 'bras', 'wear', $strip_club['bra_type'], strip_club['bra_number']
+	if $strip_club['panty_type'] <> '': gs 'panties', 'wear', $strip_club['panty_type'], strip_club['panty_number']
+	gt 'stwork', 'start'
+end
+
 
 if $ARGS[0] = 'strip_hub':
 	*clr & cla
 	gs 'stat'
 	'<center><b><font color="maroon">Stage</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclub1.jpg"></center>'
-	if striptip < 10:$pubhot = 'booing you. "Get this stupid cow off the stage!" you hear someone shout.'
-	if striptip >= 10 and striptip < 20:$pubhot = 'clearly showing discontent with your dancing. They want you off the stage as quickly as possible.'
-	if striptip >= 20 and striptip < 30:$pubhot = 'clearly looking bored. They drink and talk among themselves while ignoring you.'
-	if striptip >= 30 and striptip < 60:$pubhot = 'who sometimes look at you, smiling and enjoying the performance.'
-	if striptip >= 60 and striptip < 70:$pubhot = 'watching you with genuine interest while conversing with each other over their drinks.'
-	if striptip >= 70 and striptip < 80:$pubhot = 'with their attention focused entirely on you.'
-	if striptip >= 80 and striptip < 90:$pubhot = 'with strained faces and sweat beading on their foreheads, their arousal clearly showing.'
-	if striptip >= 90:$pubhot = 'who are completely indulged in you, cheering and waving money at you trying to get your attention.'
-
-	'There are men sitting in front of the stage <<$pubhot>>.'
-	
-	gs  'stwork2', 'strip_hub2'
+
+	if strip_club['strip_tips'] < 10:
+		$pubhot = 'booing you. "Get this stupid cow off the stage!" you hear someone shout.'
+	elseif strip_club['strip_tips'] < 20:
+		$pubhot = 'clearly showing discontent with your dancing. They want you off the stage as quickly as possible.'
+	elseif strip_club['strip_tips'] < 30:
+		$pubhot = 'clearly looking bored. They drink and talk among themselves while ignoring you.'
+	elseif strip_club['strip_tips'] < 60:
+		$pubhot = 'who sometimes look at you, smiling and enjoying the performance.'
+	elseif strip_club['strip_tips'] < 70:
+		$pubhot = 'watching you with genuine interest while conversing with each other over their drinks.'
+	elseif strip_club['strip_tips'] < 80:
+		$pubhot = 'with their attention focused entirely on you.'
+	elseif strip_club['strip_tips'] < 90:
+		$pubhot = 'with strained faces and sweat beading on their foreheads, their arousal clearly showing.'
+	else
+		$pubhot = 'who are completely indulged in you, cheering and waving money at you trying to get your attention.'
+	end
+
+	'There are men sitting in front of the stage <<$pubhot>>'
+	killvar '$pubhot'
+
+	gs 'stwork2', 'strip_hub2'
 end
 
 if $ARGS[0] = 'strip_hub2':
@@ -35,7 +58,7 @@ if $ARGS[0] = 'strip_hub2':
 		if fame['city_stripping'] < 50:
 			'There are men sitting in front of the stage, mostly talking amongst themselves.'
 		elseif fame['city_stripping'] < 200:
-			'There are men sitting in front of the stage, some chatting and some watching to see you dance.'
+			'There are men sitting in front of the stage. Some are chatting and others are waiting to see you dance.'
 		elseif fame['city_stripping'] < 500:
 			'There are men sitting in front of the stage waiting to see you dance.'
 		elseif fame['city_stripping'] < 1000:
@@ -44,9 +67,9 @@ if $ARGS[0] = 'strip_hub2':
 			'There are men sitting in front of the stage, cheering as soon as your name is announced. Some stand to applaud while chanting your name and whistling.'
 		end
 	end
-	if hour >= 18 or hour <= 2:
-		if stpredmet = 3:lapdance = 0
-		if stpredmet > 0:
+	if hour < 2 or (hour = 2 and minut < 45):
+		if strip_club['dancing_rounds'] = 3: lapdance = 0
+		if strip_club['dancing_rounds'] > 0:
 			if $clothingworntype ! 'nude':
 				act 'Dance on the pole in your clothes': gt 'stwork2', 'dance_clothed'
 				act 'Strip out of your outfit': gt 'stwork2', 'strip_clothes'
@@ -68,51 +91,129 @@ if $ARGS[0] = 'strip_hub2':
 				end
 			end
 		else
-			'Your time is up and the music stops. You collect up your clothes and any tips.'
+			'Your time is up and the music stops.'
 
-			if striptip >= 60:
-				'The men cheer and clap as you gather your clothes and head back stage.'
+			if strip_club['strip_tips'] >= 60:
+				'The men cheer and clap as you gather your clothes and tips before heading back stage.'
 			else
-				'The men don''t even appear to notice and you gether your clothes in silence before heading back stage.'
+				'The men don''t even appear to notice and you gather your clothes in silence before heading back stage.'
 			end
 			gs 'sweat', 'add', 5
-			pcs_hairbsh = 0 & stripdancesum += 1
-			if striptip >= 150:
-				privatrand = rand(0, 100)
-				if privatrand >= 50:
-					*nl
-					'As you enter the back stage area, a security guard approaches you and tells you that you have a customer requesting a private show.'
-					act 'Perform a private dance': 
-						stprivatechance = 0
+			pcs_hairbsh = 0 & strip_club['total_stripshows'] += 1
+			if strip_club['strip_tips'] >= 150:
+				!! Need daystart tracking so this only occurs once a week
+				if rand(0,99) < 25:
+					if strip_club['manager_bonus'] = 0:
+						'As you enter the back stage area, a security guard approaches and tells you that Sasha wants to see you in his office. Now.'
+						act 'Go to his office': gt 'stwork2', 'manager_bonus'
+					else
+						'As you enter the back stage area, a security guard approaches and tells you that Sasha wants to see you in his office again.'
+						'You know what he wants, but do you want to do it?'
+						act 'Go to his office': gt 'stwork2', 'manager_bonus'
+						act 'Turn him down': gt 'stwork2', 'strip_show_end'
+					end
+				else
+					'As you enter the back stage area, a security guard approaches and tells you that you have a customer requesting a private show.'
+					act 'Perform a private dance':
+						strip_club['lapdance_chance'] = 0
 						gt 'stwork2', 'privatdance'
 					end
-					act 'Turn the request down': gt 'stwork', 'start'
+					act 'Turn the request down': gt 'stwork2', 'strip_show_end'
 				end
 			end
 		end
 	else
-		pcs_hairbsh = 0 & stripdancesum += 1
+		pcs_hairbsh = 0 & strip_club['total_stripshows'] += 1
 		'Your shift is over for tonight. Time to head home.'
 	end
-	
-	act 'Leave the stage':gt 'stwork', 'start'
+
+	act 'Leave the stage': gt 'stwork2', 'strip_show_end'
 end
 
-if $ARGS[0] = 'dance_clothed':	
+
+
+if $ARGS[0] = 'set_customer_mood':
+	if func('pcs_has_attr', 'OR', 'body_bmi_overweight', 'body_bmi_obese'):
+		if rand(0,100) >= 60:
+			strip_club['strip_tips'] -= rand(5,10)
+			strip_club['cust_angry'] = 1
+			strip_club['cust_boos'] += 1
+
+			strip_club['rand'] = rand(0,3)
+			if strip_club['rand'] = 0:
+				'You overhear some of the customers sitting next to the stage.'
+				'"Look at her fat hanging out. Her gut and ass are shaking like jelly!"'
+			elseif strip_club['rand'] = 1:
+				'You overhear some of the customers sitting next to the stage.'
+				'"What a cow. Someone should roll her off the stage."'
+			elseif strip_club['rand'] = 2:
+				'You overhear some of the customers sitting next to the stage.'
+				'"They should get this fat bitch off the stage and bring on a better looking stripper."'
+			else
+				'You overhear some of the customers sitting next to the stage.'
+				'"Looks like they cater to your tastes too. What was that last fat bitch called again? She weighed more than you, and this girl weighs as much as you two combined!"'
+			end
+		else
+			strip_club['cust_angry'] = 0
+			if rand(0,1) = 0:
+				'A few customers are catcalling.'
+				'"Get those fat titties out!" one of them yells.'
+			else
+				'A few customers are catcalling.'
+				'"Show us some flesh!" one of them yells.'
+			end
+		end
+	else
+		strip_club['cust_angry'] = 0
+		if rand(0,1) = 0:
+			'Several customers are catcalling. They want to see more.'
+			'"Get those tits out!" one of them yells.'
+		else
+			'Most of the crowd seems to like what they''re seeing.'
+			'"Show us some more flesh!" one of them yells out.'
+		end
+	end
+end
+
+if $ARGS[0] = 'set_customer_mood_pole':
+	if func('pcs_has_attr', 'OR', 'body_bmi_overweight', 'body_bmi_obese'):
+		strip_club['rand'] = rand(0,99)
+		if strip_club['rand'] < 25:
+			'Performing another trick on the pole, you can''t support your weight and fall flat on your face as the crowd laughs.'
+			'"Hey hippopotamus, stomp back to the swamp where you came from!"'
+			strip_club['cust_boos'] += 1
+			strip_club['strip_tips'] -= 40
+			if rand(0, 100) >= 75:
+				fingal += rand(2,5)
+				gs 'pain', 4, 'cheeks', 'Slam'
+				gs 'stat'
+				'As you fall, you hit the floor hard and feel a bruise forming on your face.'
+			end
+		elseif strip_club['rand'] < 50:
+			strip_club['cust_boos'] += 1
+			strip_club['strip_tips'] -= rand(15,30)
+			'You overhear some of the customers sitting next to the stage.'
+			'"Look at her fat hanging out. Her gut and ass are shaking like jelly!"'
+		end
+	end
+end
+
+
+
+if $ARGS[0] = 'dance_clothed':
 	*clr & cla
 	minut += 5
 	gs 'sweat', 'add', 5
 	fat -= 1
-	gs 'exp_gain', 'dancero', rand(1, 2)
-
-	striptip = (rand(pcs_dancero,(pcs_dancero*5)))/10
-
+	gs 'exp_gain', 'dancero', rand(1,2)
+	strip_club['strip_tips'] = rand(pcs_dancero, 5 * pcs_dancero) / 10
 	gs 'stat'
-	
+
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclo' + rand(1,3) + '.jpg"></center>'
 	'You dance seductively around the pole in the center of the stage.'
-	gs 'stwork2', 'custboo'
+	gs 'stwork2', 'set_customer_mood'
 	'The men are starting to call for you to strip, so you''d better give them what they want.'
+
 	act 'Strip out of your outfit': gt 'stwork2', 'strip_clothes'
 end
 
@@ -121,44 +222,48 @@ if $ARGS[0] = 'strip_clothes':
 	minut += 5
 	gs 'sweat', 'add', 5
 	fat -= 1
-	gs 'exp_gain', 'dancero', rand(1, 2)
-	inhib_exp += rand(1,2)
+	gs 'exp_gain', 'dancero', rand(1,2)
+	gs 'exp_gain', 'inhib', rand(1,2)
 	gs 'fame', 'city', 'stripping', rand(1,2)
-	striptip = (rand(pcs_dancero,(pcs_dancero*5)))/7
+	strip_club['strip_tips'] = rand(pcs_dancero, 5 * pcs_dancero) / 7
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclo' + rand(1,3) + '.jpg"></center>'
 	'You start moving seductively around the pole in the center of the stage.'
-	gs 'stwork2', 'custboo'
+	gs 'stwork2', 'set_customer_mood'
+
 	act 'Take off your top':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclo' + rand(4,5) + '.jpg"></center>'
-		if custboo = 0:
+		if strip_club['cust_angry'] = 0:
 			pcs_mood += 5
 			'Urged on by the audience, you take off your blouse and let it drop to the stage while you keep teasing them.'
 		else
 			pcs_mood -= 5
 			'Ignoring the comments from the audience, you take off your blouse and let it drop to the stage while you keep teasing them.'
 		end
+
 		if PCloSkirt > 0:
-			$i = 'skirt'
-			$i[1] = 'it'
+			$temp_bottom_desc = 'skirt'
+			$temp_bottom_desc[1] = 'it'
 		else
-			$i = 'pants'
-			$i[1] = 'them'
+			$temp_bottom_desc = 'pants'
+			$temp_bottom_desc[1] = 'them'
 		end
-		act 'Take off your <<$i>>':
+
+		act 'Take off your <<$temp_bottom_desc>>':
 			gs 'clothing', 'strip'
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripclo' + rand(6,7) + '.jpg"></center>'
-			if custboo = 0:
+			if strip_club['cust_angry'] = 0:
 				pcs_mood += 5
-				'The positive responses make you smile as you unzip your <<$i>> and let <<$i[1]>> drop to your ankles before kicking <<$i[1]>> off and lying down on the stage, rolling around and looking several customers straight in the eyes. Some of them throw some bills your way, and you take care to pay them some extra attention.'
+				'The positive responses make you smile as you unzip your <<$temp_bottom_desc>> and let <<$temp_bottom_desc[1]>> drop to your ankles before kicking <<$i[1]>> off and lying down on the stage, rolling around and looking several customers straight in the eyes. Some of them throw some bills your way, and you take care to pay them some extra attention.'
 			else
 				pcs_mood -= 5
-				'The negative comments make you feel a bit uncomfortable as you unzip your <<$i>> and let <<$i[1]>> drop to your ankles before kicking <<$i[1]>> off and lying down on the stage, rolling around and looking several customers straight in the eyes.'
+				'The negative comments make you feel a bit uncomfortable as you unzip your <<$temp_bottom_desc>> and let <<$temp_bottom_desc[1]>> drop to your ankles before kicking <<$i[1]>> off and lying down on the stage, rolling around and looking several customers straight in the eyes.'
 			end
-			killvar '$i'
+			killvar '$temp_bottom_desc'
 			gs 'stat'
+
 			act 'Continue': gt 'stwork2', 'strip_hub'
 		end
 	end
@@ -169,21 +274,21 @@ if $ARGS[0] = 'strip_bra':
 	minut += 5
 	gs 'sweat', 'add', 5
 	fat -= 1
-	gs 'exp_gain', 'dancero', rand(1, 2)
+	gs 'exp_gain', 'dancero', rand(1,2)
 	inhib_exp += rand(1,2)
 	gs 'fame', 'city', 'stripping', rand(1,2)
-
-	striptip += (rand(pcs_dancero,(pcs_dancero*5)))/5
-
+	strip_club['strip_tips'] += rand(pcs_dancero, 5 * pcs_dancero) / 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund' + rand(1,3) + '.jpg"></center>'
 	'You start moving seductively around the pole in the center of the stage wearing just your underwear.'
-	gs 'stwork2', 'custboo'
+	gs 'stwork2', 'set_customer_mood'
+
 	act 'Take off your bra':
-		gs 'bras', 'remove'
 		*clr & cla
+		gs 'bras', 'remove'
 		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund' + rand(4,6) + '.jpg"></center>'
-		if custboo = 0:
+
+		if strip_club['cust_angry'] = 0:
 			pcs_mood += 5
 			'Urged on by the audience, you slowly take off your bra and let it drop to the stage as you keep teasing them.'
 			'The men in the first row go wild, shouting "Show your pussy! Show your pussy!"'
@@ -199,25 +304,25 @@ if $ARGS[0] = 'strip_bra':
 end
 
 if $ARGS[0] = 'strip_panties':
-	gs 'panties', 'remove'
 	*clr & cla
 	minut += 5
 	gs 'sweat', 'add', 5
 	fat -= 1
-	gs 'exp_gain', 'dancero', rand(1, 2)
-	inhib_exp += rand(1,2)
+	gs 'exp_gain', 'dancero', rand(1,2)
+	gs 'exp_gain', 'inhib', rand(1,2)
 	gs 'fame', 'city', 'stripping', rand(1,2)
-
-	striptip += (rand(pcs_dancero,(pcs_dancero*5)))/5
-
+	strip_club['strip_tips'] += rand(pcs_dancero, 5 * pcs_dancero) / 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund9.jpg"></center>'
 	'You dance seductively in just your panties, teasing the crowd.'
-	gs 'stwork2', 'custboo'
+	gs 'stwork2', 'set_customer_mood'
+
 	act 'Strip out of your panties':
 		*clr & cla
+		gs 'panties', 'remove'
 		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund' + rand(10,12) + '.jpg"></center>'
-		if custboo = 0:
+
+		if strip_club['cust_angry'] = 0:
 			pcs_mood += 5
 			'The positive responses make you smile even broader as you playfully drop your panties to your ankles before kicking them off. You look several customers straight in the eyes as you do so. Some of them throw some bills your way, and you take care to pay them some extra attention.'
 		else
@@ -235,27 +340,25 @@ if $ARGS[0] = 'dance_nude':
 	minut += 5
 	gs 'sweat', 'add', 5
 	fat -= 1
-	gs 'exp_gain', 'dancero', rand(1, 2)
-	inhib_exp += rand(1,2)
+	gs 'exp_gain', 'dancero', rand(1,2)
+	gs 'exp_gain', 'inhib', rand(1,2)
 	gs 'fame', 'city', 'stripping', rand(1,2)
-
-	striptip += (rand(pcs_dancero,(pcs_dancero*5)))/3
-
+	strip_club['strip_tips'] += rand(pcs_dancero, 5 * pcs_dancero) / 3
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund' + rand(13,14) + '.jpg"></center>'
-	gs 'stwork2', 'custboo'
-	if custbooing < 2:
+	gs 'stwork2', 'set_customer_mood'
+
+	if strip_club['cust_boos'] < 2:
 		pcs_mood += 5
 		'The men in the first row go wild seeing you dance nude, shouting out their approval. Several of them are tipping generously.'
 		'You dance as seductively as you can, trying to spread your attention over the audience, but paying extra attention to the ones who give you more money.'
 		'When the music starts winding down, you collect your tips and pick up your clothes, blowing a few kisses to your audience before going backstage.'
-		
 		gs 'arousal', 'flash', -20
 		gs 'arousal', 'end'
-		stprivatechance = 1
-		pcs_hairbsh = 0 & stripdancesum += 1
+		strip_club['lapdance_chance'] = 1
+		pcs_hairbsh = 0 & strip_club['total_stripshows'] += 1
 		gs 'stat'
-		act 'Leave the stage': gt 'stwork', 'start'
+		act 'Leave the stage': gt 'stwork2', 'strip_show_end'
 	else
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund' + rand(13,14) + '.jpg"></center>'
@@ -265,49 +368,29 @@ if $ARGS[0] = 'dance_nude':
 		'Before the music stops, you start collecting your meager tips and clothes and flee backstage.'
 		gs 'arousal', 'flash', -20
 		gs 'arousal', 'end'
-		stprivatechance = 0
-		pcs_hairbsh = 0 & stripdancesum += 1
+		strip_club['lapdance_chance'] = 0
+		pcs_hairbsh = 0 & strip_club['total_stripshows'] += 1
 		gs 'stat'
-		act 'Leave the stage': gt 'stwork', 'start'
+		act 'Leave the stage': gt 'stwork2', 'strip_show_end'
 	end
 end
 
 if $ARGS[0] = 'pole_underwear':
 	*clr & cla
 	minut += 5
-	stpredmet -= 1
+	strip_club['dancing_rounds'] -= 1
 	gs 'sweat', 'add', 5
 	fat -= 2
-	pcs_mood -= rand(4, 8)
-	gs 'exp_gain', 'dancpol', rand(1, 2)
-	inhib_exp += rand(1,2)
+	pcs_mood -= rand(4,8)
+	gs 'exp_gain', 'dancpol', rand(1,2)
+	gs 'exp_gain', 'inhib', rand(1,2)
 	gs 'fame', 'city', 'stripping', rand(1,2)
-
 	!pcs_hairbsh = 0
-	striptip += (rand(pcs_dancpol,(pcs_dancpol*5)))/3
-	
+	strip_club['strip_tips'] += rand(pcs_dancpol, 5 * pcs_dancpol) / 3
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/strippole.jpg"></center>'
 	'You grab hold of the pole and acrobatically slide around it in your underwear.'
-
-	if pcs_weight > pcs_hgt - 90:
-		vesrand = rand(0, 100)
-
-		if vesrand >= 75:
-			'Performing another trick on the pole, you can''t support your weight and fall flat on your face as the crowd laughs. "Hey hippopotamus, stomp back to the swamp where you came from."'
-			striptip -= 40
-			fingalrand = rand(0, 100)
-			if fingalrand >= 75:
-				fingal += rand(2, 5)
-				gs 'pain', 4, 'cheeks', 'Slam'
-				gs 'stat'
-				'As you fall, you hit the floor hard and you feel a bruise forming on your face.'
-			end
-		elseif vesrand >= 50:
-			striptip -= rand(15, 30)
-			'You overhear some of the customers sitting next to the stage. "Look at her fat hanging out. Her gut and ass are shaking like jelly."'
-		end
-	end
+	gs 'stwork2', 'set_customer_mood_pole'
 
 	act 'Continue': gt 'stwork2', 'strip_hub'
 end
@@ -315,191 +398,236 @@ end
 if $ARGS[0] = 'pole_panties':
 	*clr & cla
 	minut += 5
-	stpredmet -= 1
+	strip_club['dancing_rounds'] -= 1
 	gs 'sweat', 'add', 5
 	fat -= 2
-	pcs_mood -= rand(4, 8)
-	gs 'exp_gain', 'dancpol', rand(1, 2)
-	inhib_exp += rand(1,2)
+	pcs_mood -= rand(4,8)
+	gs 'exp_gain', 'dancpol', rand(1,2)
+	gs 'exp_gain', 'inhib', rand(1,2)
 	gs 'fame', 'city', 'stripping', rand(1,2)
-
 	!pcs_hairbsh = 0
-	striptip += (rand(pcs_dancpol,(pcs_dancpol*5)))/3
-	
+	strip_club['strip_tips'] += rand(pcs_dancpol, 5 * pcs_dancpol) / 3
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/stripund' + rand(7,8) + '.jpg">"></center>'
 	'You grab hold of the pole and acrobatically slide around it in your panties.'
+	gs 'stwork2', 'set_customer_mood_pole'
 
-	if pcs_weight > pcs_hgt - 90:
-		vesrand = rand(0, 100)
+	act 'Continue': gt 'stwork2', 'strip_hub'
+end
 
-		if vesrand >= 75:
-			'Performing another trick on the pole, you can''t support your weight and fall flat on your face as the crowd laughs. "Hey hippopotamus, stomp back to the swamp where you came from."'
-			custbooing += 1
-			striptip -= 40
-			fingalrand = rand(0, 100)
-			if fingalrand >= 75:
-				fingal += rand(2, 5)
-				gs 'pain', 4, 'cheeks', 'Slam'
+if $ARGS[0] = 'manager_bonus':
+	*clr & cla
+	minut += 2
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/.jpg">"></center>'
+	'The security guard ushers you into Sasha''s office before closing the door behind you. Sasha smiles at you as he sits behind his desk.'
+	if strip_club['manager_bonus'] = 0:
+		'"I heard that you''ve had a pretty good night, <<$pcs_strippername>>. How about a little bonus to top it off?" he asks.'
+		'"What kind of bonus?" you ask while raising an eyebrow.'
+		'He grins. "Here''s the deal. Every week, I choose a girl who earns a bonus. Emphasis on <i>earns</i>..."'
+		'"You want me to have sex with you?!" you retort and he snorts.'
+		'"No, I''m paying you extra to suck my dick. It''s no different from what you do out there with customers. Now are you interested or am I going to have to call in someone who wants that money?"'
+
+		act 'Do it':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bimbo.knees5.jpg">"></center>'
+			'"Okay, I''ll do it. How much is this bonus?" you ask.'
+			'"500 <b>₽</b>," he replies while motioning you over to him.'
+			'You walk over and kneel in front of him as he unzips his pants and pulls his cock out. "Get to work," he orders while snapping his fingers.'
+			*nl
+			'You obediently take his cock into your mouth, feeling it grow hard as you take it into your throat and work it with your tongue. "That''s it, keep going..." he says softly.'
+			'You spend the next few minutes sucking his dick, listening to him moan before he suddenly grabs your head and holds you down on his cock as his cum starts shooting into your mouth. You''re forced to swallow it to stop yourself from choking as he groans loudly.'
+			gs 'arousal', 'bj', 5
+			gs 'cum_call', 'mouth_swallow', 'Strip club manager', 0, 0, 10000, 40
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Continue':
+				*clr & cla
+				minut += 2
+				money += 500
+				strip_club['manager_bonus'] = 1
 				gs 'stat'
-				'As you fall, you hit the floor hard and you feel a bruise forming on your face.'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum17.jpg">"></center>'
+				'He finally finishes and releases his grip on your head, allowing you pull yourself off of his cock. You gasp for air and wipe the saliva from your mouth before looking up to see him grinning down at you as you slowly jerk his cock in your hand.'
+				'"Good job <<$pcs_strippername>>, you more than earned this." He counts out a wad of cash and hands it to you. "Keep up the good work and there will be more bonuses in the future."'
+				'You just smile at him before getting up and taking the money. After counting it, the manager sends you on your way with a slap on the ass. Heading out into the hallway, the security guard flashes you a knowing smile as you hurry back to the dressing room.'
+
+				act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 			end
-		elseif vesrand >= 50:
-			custbooing += 1
-			striptip -= rand(15, 30)
-			'You overhear some of the customers sitting next to the stage. "Look at her fat hanging out. Her gut and ass are shaking like jelly."'
 		end
-	end
 
-	act 'Continue': gt 'stwork2', 'strip_hub'
-end
+		act 'Refuse and leave':
+			cla
+			gs 'stat'
+			'You shake your head and storm back out into the hallway without saying a word, ignoring the security guard on your way back to the dressing room.'
+
+			act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
+		end
+	else
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bimbo.knees5.jpg">"></center>'
+		'"Interested in a little bonus, are we?" he asks rhetorically with a grin before snapping his fingers and pointing to his crotch. You obediently walk over and kneel in front of him before unzipping his pants and taking his cock into your mouth. "Eager today, aren''t we?" he laughs as you start sucking.'
+		if rand(0,2) = 0:
+			'Just as you''re getting into it, you hear a knock at the door and freeze as Sasha looks down at you. "Don''t stop," he orders before telling the person to enter. A man walks into the room and stops in front of the desk. There''s no hiding the fact that you''re under here, you just hope he doesn''t recognise you.'
+			'You push the thoughts to the back of your mind and resume sucking Sasha''s dick, trying your best to keep the noise down as the two men converse for what feels like an eternity before the man finally leaves.'
+			'The distraction gone, you''re able to focus your efforts, the room filled with the obscene sound of you gagging and slurping on his cock until he suddenly grabs your head and holds you down on his cock as his cum starts shooting into your mouth. You''re forced to swallow it to stop yourself from choking as he groans loudly.'
+			gs 'arousal', 'bj', 5
+			gs 'cum_call', 'mouth_swallow', 'Strip club manager', 0, 0, 10000, 40
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Continue':
+				*clr & cla
+				money += 500
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum17.jpg">"></center>'
+				'He finally finishes and releases his grip on your head, allowing you pull yourself off of his cock. You gasp for air and wipe the saliva from your mouth before looking up to see him grinning down at you as he counts your money.'
+				'"Nice work, <<$pcs_strippername>>. Good to see you aren''t afraid of performing in front of an audience. Maybe a career in porn is in your future?"'
+				'You just smile at him before getting up and taking the money. Heading out into the hallway, the security guard flashes you a knowing smile as you hurry back to the dressing room.'
 
-if $ARGS[0] = 'custboo':
-	if pcs_weight > pcs_hgt - 90:
-		vesrand = rand(0, 100)
-		if vesrand >= 60:
-			striptip -= rand(5, 10)
-			custboo = 1
-			custbooing += 1
-			resprand = rand(0,3)
-			if resprand = 0:
-				'You overhear some of the customers sitting next to the stage. "Look at her fat hanging out. Her gut and ass are shaking like jelly."'
-			elseif resprand = 1:
-				'You overhear some of the customers sitting next to the stage. "What a cow. Someone should roll her off the stage."'
-			elseif resprand = 2:
-				'You overhear some of the customers sitting next to the stage. "They should get this fat bitch off the stage and bring on a better looking stripper."'
-			elseif resprand = 3:
-				'You overhear some of the customers sitting next to the stage. "Looks like they cater to your tastes too. What was that last fat bitch called again? She weighed more than you, and this girl weighs as much as you two combined!"'
+				act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 			end
 		else
-			custboo = 0
-			resprand = rand(0,1)
-			if resprand = 0:
-				'A few customers are catcalling. "Get those fat titties out!" one of them yells out.'
-			elseif resprand = 1:
-				'A few customers are catcalling. "Show us some flesh!" one of them yells out.'
+			'You really get into it and passionately suck his dick, listening to him moaning softly as the obscene sound of you gagging and slurping on his cock echo around the room. After a few minutes, he suddenly grabs your head and holds you down on his cock as his cum starts shooting into your mouth. You''re forced to swallow it to stop yourself from choking as he groans loudly.'
+			gs 'arousal', 'bj', 5
+			gs 'cum_call', 'mouth_swallow', 'Strip club manager', 0, 0, 10000, 40
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Continue':
+				*clr & cla
+				money += 500
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum17.jpg">"></center>'
+				'He finally finishes and releases his grip on your head, allowing you pull yourself off of his cock. You gasp for air and wipe the saliva from your mouth before looking up to see him grinning down at you as he counts your money.'
+				'"Nice work, <<$pcs_strippername>>. It''s nice to see young girls with a good work ethic," he laughs.'
+				'You just smile at him before getting up and taking the money. Heading out into the hallway, the security guard flashes you a knowing smile as you hurry back to the dressing room.'
+
+				act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 			end
 		end
-	else
-		custboo = 0
-		resprand = rand(0,1)
-		if resprand = 0:
-			'Several customers are catcalling. They want to see more.'
-		elseif resprand = 1:
-			'Most of the crowd seems to like what they''re seeing. "Show us some more flesh!" one of them yells out.'
-		end
 	end
 end
 
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                          PRIVATE DANCES                           !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
 if $ARGS[0] = 'privatdance':
 	*clr & cla
 	minut += 20
-	gs 'arousal', 'foreplay', 10
 	money += 400
-	if pcs_sweat < 30 : gs 'sweat', 'add', 10
+	gs 'arousal', 'foreplay', 10
+	if pcs_sweat < 30: gs 'sweat', 'add', 10
 	pcs_hairbsh = 0
 	pcs_makeup = 0
 	fat -= 5
 	pcs_mood += rand(2,6)
-	gs 'exp_gain', 'dancero', rand(2, 4)
-	stripdancesum += 1
-
+	gs 'exp_gain', 'dancero', rand(2,4)
+	strip_club['total_stripshows'] += 1
 	gs 'stat'
 
-	stprrand = rand(0,25)
-	if stprrand = 0:
+	strip_club['rand'] = rand(0,25)
+	if strip_club['rand'] = 0:
 		gt 'stwork2', 'pr1'
-	elseif stprrand = 1:
+	elseif strip_club['rand'] = 1:
 		gt 'stwork2', 'pr2'
-	elseif stprrand = 2:
+	elseif strip_club['rand'] = 2:
 		gt 'stwork2', 'pr3'
-	elseif stprrand = 3:
+	elseif strip_club['rand'] = 3:
 		gt 'stwork2', 'pr4'
-	elseif stprrand = 4:
+	elseif strip_club['rand'] = 4:
 		gt 'stwork2', 'pr5'
-	elseif stprrand = 5:
+	elseif strip_club['rand'] = 5:
 		gt 'stwork2', 'pr6'
-	elseif stprrand = 6:
+	elseif strip_club['rand'] = 6:
 		gt 'stwork2', 'pr7'
 	end
-
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/privatstrip.jpg"></center>'
-	'You walk over to a smaller private room where you put on some music before the customer walks in and you tell him to sit down and enjoy the show. You spend half an hour showing off your dancing skills, and every time you grind against him, you can feel his rock-hard cock.'
+	'You walk over to a smaller private room where you put on some music before the customer walks in and you tell him to sit and enjoy the show. You spend half an hour showing off your dancing skills, and every time you grind against him, you feel his rock hard cock straining against his pants.'
 
-	act 'Return to the locker room':gt 'stwork', 'start'
+	act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 end
 
 if $ARGS[0] = 'pr1':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/pr1.jpg"></center>'
 	'You''re dancing for a bachelor party that are set up in one of the private rooms. They''re all quite drunk and rowdy, one of the men slapping the waitress on the ass as she places their drinks on the table. She takes the wad of cash he hands her and quickly scurries out of the room.'
-	'The men cheer when they see you. "Hey Vlad, your stripper is here!" The groom to be looks at you with a drunken smile. "Show us what you''ve got, girl!" Music starts playing as the lights dim and you seductively walk over to the pole in the room.'
-	
+	'The men cheer when they see you and start crowding around you while offering you wads of cash. "Hey Sergey, your stripper is here!"'
+	'The groom to be looks at you with a drunken smile. "Show us what you''ve got, girl!" Music starts playing as the lights dim and you seductively walk over to the pole in the room.'
+
 	act 'Dance on the pole':
 		*clr & cla
-		minut += 10
+		minut += 5
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/pr1a.jpg"></center>'
-		'You climb onto the pole and start acrobatically swinging around it, his friends drunkenly hollering and catcalling as you smile at them.'
+		'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4.mp4"></video></center>'
+		'You climb onto the pole and start erotically dancing on it, his friends drunkenly hollering and catcalling as you smile at them.'
 		act 'Continue':
 			*clr & cla
-			minut += 10
+			minut += 5
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/shared/sex/vag12.jpg"></center>'
-			'Now warmed up, you slowly remove your top and expose your breasts as you continue dancing on the pole. You''re soon stripped down to just your panties as you smile at the groom.'
-			
-			
+			'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4a.mp4"></video></center>'
+			'Now warmed up, you slowly expose your breasts as you continue dancing on the pole. You''re soon stripped down to just your panties as you smile at the groom.'
+
 			act 'Give him a lap dance':
 				*clr & cla
-				minut += 10
+				minut += 5
 				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/pr1b.jpg"></center>'
-				'You climb off the pole and seductively walk over to the groom, his friends cheering as you climb into his lap. You can feel his rock-hard cock bulging beneath you.'
+				'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie1.mp4"></video></center>'
+				'You climb off the pole and seductively walk over to the groom, his friends cheering as you climb into his lap. You can feel his rock hard cock bulging beneath you.'
 				'You spend a few minutes rocking your hips and grinding against him before you stand and wiggle your ass in his face. It takes all his willpower for him not to spank you before you slowly bend over and teasingly tug at your panties before you wiggle out of them, the room erupting in cheers as your panties drop to your ankles.'
 				'After this, you climb back into his lap and start grinding your naked body against him, the bulge in his crotch now at straining point as sweat beads on his forehead.'
-				
+
 				act 'Finish':
 					*clr & cla
 					minut += 5
 					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/shared/sex/vag12.jpg"></center>'
-					'You continue to rock your hips and grind against him while shaking your breasts in his face until the music stops and you settle in his lap, his friends giving him approving, if somewhat jealous, nods and smiles.'
+					'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie1.mp4"></video></center>'
+					'You continue to rock your hips and grind against him while shaking your breasts in his face until the music stops, his friends giving him approving, if somewhat jealous, nods and smiles as you finish your performance.'
 					'"I''m so glad I let you guys talk me into coming to the city tonight! This is the perfect last night of freedom!" he says with a huge grin.'
-					'"Fuck yeah man, it was the least we could do! Gotta remind you of what you''ll be giving up with that ball and chain going around your leg next week!" his friend cackles.'
-					
+					'"It was the least we could do! Gotta remind you of what you''ll be giving up with that ball and chain going around your leg next week!" his friend cackles.'
+
 					act 'Time to leave':
 						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/shared/sex/dp12.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/.jpg"></center>'
 						'One of the men looks at his watch and tells the others that their time is up. As you climb off your client''s lap and gather your clothes, the man approaches you.'
-						'"Great show, girl. So great in fact, that you left our friend rather ''tensed up''. If we pay you an extra 2000 <b>₽</b>, would you give him a ''happy end'' to his night?" he asks loud enough for everyone to hear. The groom gives you a drunk smile.'
-						
+						'"Great show, girl. So great in fact, that you left our friend rather ''tensed up''. If we pay you an extra 2000 <b>₽</b>, would you give him a ''happy ending'' to his night?" he asks loud enough for everyone to hear. The groom gives you a drunk smile.'
+
 						act 'Agree':
 							*clr & cla
-							minut += 2
 							money += 2000
-							'<center><img <<$set_imgh>> src="images/locations/shared/sex/cum12.jpg"></center>'
+							'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4b.mp4"></video></center>'
 							'You agree and the groom''s friends all leave while giving him fist bumps and knowing smiles.'
 							'Once they''re gone, you approach the man and smile. "Let''s see what I''m dealing with here..." you whisper seductively as you run your hand over his crotch.'
-							'You unbutton his pants and pull his rock-hard cock out before slowly jerking it in your hand. "My, my. Someone enjoyed the show," you giggle as you get on your knees in front of him.'
+							'You unbutton his pants and pull his rock hard cock out before slowly jerking it in your hand. "My, my. Someone enjoyed the show," you giggle as you get on your knees in front of him.'
 							*nl
-							'You take his shaft into your mouth and start sucking while bobbing your head up and down. He''s so close that it only takes a few minutes of this for him to climax. He holds your head down and lets out a loud grunt as his cum spurts into your throat, forcing you to swallow it before he lets you go.'
+							'You take his shaft into your mouth and start sucking while bobbing your head up and down. He''s so close that it only takes a few seconds of this for him to climax. He holds your head down and lets out a loud grunt as his cum spurts into your throat, forcing you to swallow it before he lets you go.'
 							'You sit up and choke down the last of his cum as he stands up and pats you on the head. "That was amazing! Shame I won''t feel those lips wrapped around my cock again."'
 							'He heads out of the room as you collect the rubles sitting on the table, along with your clothing, and head to the dressing room to clean yourself up.'
 							gs 'arousal', 'hj', 5
-							gs 'arousal', 'bj', 5
+							gs 'arousal', 'bj', -5
 							gs 'cum_call', 'mouth_swallow', 'Private dance client', 0, 0, 10000, 40
 							gs 'arousal', 'end'
 							gs 'stat'
-							act 'Return to the dressing room':gt 'stwork', 'start'
+
+							act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 						end
-						
+
 						act 'Refuse':
 							*clr & cla
 							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/locations/shared/sex/cum12.jpg"></center>'
-							'You shake your head. "This is a strip club, not a fucking brothel! Go rent him a whore off the corner if he needs his dick sucked!"'
-							'The men huff, but leave in peace as you collect your clothing and head to the dressing room to clean yourself up.'
-							act 'Return to the dressing room':gt 'stwork', 'start'
+							'<center><img <<$set_imgh>> src="images/pc/reactions/fuckyou_underwear.jpg"></center>'
+							'You shake your head as you start getting dressed. "This is a strip club, not a fucking brothel! Go rent him a whore off the corner if he needs his dick sucked!"'
+							'"Whatever, bitch. Enjoy your dirty slut money. Shaking your tits is the only thing you''re good for!" he huffs and you flip him off before collecting your clothing and heading back to the dressing room.'
+
+							act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 						end
 					end
 				end
@@ -512,165 +640,174 @@ if $ARGS[0] = 'pr2':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/pr2.jpg"></center>'
 	'The man you''re dancing for is mesmerized by you and can''t stop touching himself. After a while, he asks you if he can cum on your face for 2000 <b>₽</b>.'
-	
+	minut += 10
 	gs 'willpower', 'sex', 'resist', 'hard'
-	if will_cost <= pcs_willpwr:
+	if pcs_willpwr < will_cost:
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	else
 		act 'Refuse (<<will_cost>> Willpower)':
 			cla
-			*nl
-			'You refuse and kick him out before heading back to the main floor.'
+			'You refuse and kick him out before heading back to the dressing room.'
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
-			act 'Return to the dressing room':gt 'stwork', 'start'
+
+			act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 		end
-	else
-		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end	
+	end
 
 	act 'Agree':
 		*clr & cla
+		minut += 2
+		money += 2000
+		gs 'stat'
 		gs 'npcgeneratec', 0, 'Private dance client', rand(20,55)
 		'<center><video autoplay loop src="images/shared/sex/cum/facial/facial0,3.mp4"></video></center>'
-		'You nod and get on your knees as the client pulls his cock out and starts jerking it. After a few seconds, he loudly grunts that he''s close and you close your eyes as warm spurts of cum start splattering across your face. It drips down your chin as he squeezes the last few drops onto your forehead.'
+		'You nod and get on your knees as the client pulls his cock out and starts jerking it. After a few seconds, he loudly grunts that he''s close and you close your eyes as spurts of warm cum start splattering across your face. It drips down your chin as he squeezes the last few drops onto your forehead.'
 		'You wipe the cum from your eyes as he puts his cock away and leaves your payment on the table before leaving. You gather up your clothes and wipe your face as best as you can as you hurry to the dressing room to clean up.'
 		gs 'cum_call', 'face', 'Private dance client', 0, 0, 10000, 40
-		money += 2000
-		gs 'stat'
-		act 'Return to the dressing room':gt 'stwork', 'start'
+
+		act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 	end
 end
 
 if $ARGS[0] = 'pr3':
 	*clr & cla
+	minut += 10
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/pr3.jpg"></center>'
 	'It''s a bit different dancing for a woman. It''s not often you have the pleasure of doing it, so you''re feeling a bit more frisky than usual. As you finish the dance, she gives you a kiss, and you start making out. She stops and offers you 1000 <b>₽</b> to eat her out.'
-
 	gs 'willpower', 'sex', 'resist', 'hard'
-	if will_cost <= pcs_willpwr:	
+	if pcs_willpwr < will_cost:
+		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	else
 		act 'Refuse (<<will_cost>> Willpower)':
 			cla
-			*nl
-			'You refuse and kick her out before heading back to the main floor.'
+			'You refuse and kick her out before heading back to the dressing room.'
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
-			act 'Return to the dressing room':gt 'stwork', 'start'
+
+			act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 		end
-	else
-		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end	
+	end
 
 	act 'Agree':
 		*clr & cla
 		girl += 1
 		lesbian += 1
 		money += 1000
+		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/lesbian/ukuni11.jpg"></center>'
 		'You nod and get on your knees in front of the woman as she undresses her lower half and sits back in the chair before spreading her legs. You move in and start tracing your tongue along her pussy lips before moving up to her clit.'
-		'You spend a few minutes teasing her sensitive bud before she clamps her hand over her mouth and lets out a muffled cry as she climaxes and a small amount of her juices squirting over your face.'
+		'You spend a few minutes teasing her sensitive bud before she clamps her hand over her mouth and lets out a muffled cry as she climaxes and a small amount of her juices squirt over your face.'
 		'Once she recovers, she dresses herself and leaves your payment on the table before walking out. You gather up your clothes and head to the dressing room to clean up.'
-		
-		act 'Return to the dressing room':gt 'stwork', 'start'
+
+		act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 	end
 end
 
 if $ARGS[0] = 'pr4':
 	*clr & cla
+	minut += 10
+	money += 500
+	gs 'stat'
 	'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie1.mp4"></video></center>'
-
-	'You enter one of the private rooms where your customer is waiting. He looks extremely nervous, fidgeting in his chair.' 
+	'You enter one of the private rooms where your customer is waiting. He looks extremely nervous and is fidgeting in his chair.'
 	'You smile and approach him. "Any special requests?" you ask in your most seductive voice.'
+	*nl
 	'The man looks at you as you start to strip, struggling to get his words out. "N-no, please. P-please keep your clothes o-on..." he stammers.'
 	'You''re taken aback for a second, but he continues, his courage seemingly building as he presents a handful of rubles in his clenched fist.'
 	'"C-could you just...g-grind on me? With your clothes on?" he inquires, a bead of sweat rolling down his forehead.'
-	'"Not a problem, sweetie. Sit back and try to relax," you understandingly reply. It''s a simple enough request, albeit keeping your clothes on is a bit strange for a ''strip'' club.'
-	'The next 15 minutes go by rather quickly for your customer, as your simple grinding seemingly makes him climax in his pants at least 2 or 3 times. He groans and vibrates under you, but he obeys the club rules and never lays a hand on your body as you rock your hips and grind your pelvis against his bulge.' 
-	'As the dance ends, you place a soft kiss on his cheek and stand before him, noticing the huge wet spot on the front of his pants.'
+	'"Just sit back and try to relax," you understandingly reply. It''s a simple enough request, albeit keeping your clothes on is a bit strange for a ''strip'' club.'
+	*nl
+	'The next few minutes go by rather quickly for your customer, as your simple grinding seemingly makes him climax in his pants. He groans and vibrates under you, but he obeys the club rules and never lays a hand on you as you rock your hips and grind against his bulge.'
+	'As the dance ends, you climb off him and stand before him, noticing the huge wet spot on the front of his pants.'
 	'He gives you every last bill from his wallet and thanks you profusely, telling you multiple times that he''ll never forget you.'
 
-	act 'Return to the dressing room':gt 'stwork', 'start'
+	act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 end
 
 
 if $ARGS[0] = 'pr5':
 	*clr & cla
 	'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie2.mp4"></video></center>'
-	!!if rand (0,5) = 0 and (day = 5 or day = 6) and AlbinaQW['stripper'] = 1:
-	 !!'You approach the private room where your client is waiting and hear two voices talking from behind the door. As you enter, Albina greets you at the door with a forced smile.'
-	 !!'"This guy''s going to be a pain in the ass," she whispers to you as you step inside. Behind her, a greasy looking, overweight patron claps and wrings his hands excitedly. "Ah! She''s here! Now we can really get the party started!"'
-	 !!'Albina subtlety rolls her eyes at you before strutting over to the man and seductively shaking her bubble butt in his face. "You think you can handle both of us?" she asks, making barely any effort to hide the the fact that she clearly finds him unattractive.'
-	 !!'"Oh, I can! My wallet is fatter than that juicy ass of yours, girl!" he bellows, tucking a few bills into her g-string with a hearty laugh as she silently scoffs in disgust.'
-	 !!'The next few songs go by as you try to look sexy and alluring for the paying customer, all while touching him as little as possible. He smells like body odor and booze, and makes continuous lewd comments about your bodies. A security guard steps in multiple times during the dance to remind him that he''s not allowed to touch the dancers without permission. Sometimes this job feels really gross...'
-	
-	 !!act 'Return to the dressing room':gt 'stwork', 'start'
-	
-!	else
-	 'You approach the private room where your client is waiting and hear two voices talking from behind the door. As you enter, a fellow dancer named ''Jade'' greets you at the door with a forced smile.'
-	 '"We''ve got our hands full with with this one..." she whispers to you as you step inside. Behind her, a greasy looking, overweight patron claps and wrings his hands excitedly. "Ah! She''s here! Now we can really get the party started!"'
-	 'Jade subtlety rolls her eyes at you before turning back to the man, pushing her large, fake breasts in his face. "You think you can handle both of us?" she asks, trying to remain professional around a guy she clearly finds unattractive.'
-	 '"Oh, I can! And so can my wallet! It''s bigger than those huge tits of yours!" he bellows, tucking a few bills into her g-string with a hearty laugh.'
-	 'The next few songs go by as you try to look sexy and alluring for the paying customer, all while touching him as little as possible. He smells like body odor and booze, and makes continuous lewd comments about your bodies. A security guard steps in multiple times during the dance to remind him that he''s not allowed to touch the dancers without permission. Sometimes this job feels really gross...'
-	
-	 act 'Return to the dressing room':gt 'stwork', 'start'	
-!	end
+	if rand (0,2) = 0 and locat['A23'] = 21 and AlbinaQW['working_stripclub'] = 1 and npc_rel['A23'] >= 70:
+		'You approach the private room where your client is waiting and hear two voices behind the door. As you enter, Albina greets you at the door.'
+		'"This guy''s going to be a pain in the fucking ass..." she whispers as you step inside. Behind her, an overweight patron in a suit claps his hands excitedly. "Ah! She''s here! Now we can really get the party started!"'
+		'Albina rolls her eyes before strutting over to the man and shaking her bubble butt in his face. "You think you can handle both of us?" she asks, barely making any effort to hide the the fact that she clearly finds him unattractive.'
+		'"Oh, I can! My wallet is fatter than that juicy ass of yours, girl!" he bellows, tucking a few bills into her g-string with a hearty laugh before smacking her on the ass. "No fucking touching!" she scoffs in disgust.'
+		*nl
+		'You join Albina and you both start dancing and stripping to the music, trying to look sexy and alluring for the man, all while touching him as little as possible. He smells like cigarettes and booze, and makes continuous lewd comments about your bodies. A security guard also has to step in multiple times during the dance to remind him that he''s not allowed to touch you. Sometimes this job feels really gross...'
+
+		act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
+	else
+		'You approach the private room where your client is waiting and hear two voices behind the door. As you enter, your fellow stripper ''Jade'' greets you at the door with a forced smile.'
+		'"We''ve got our hands full with this one..." she whispers as you step inside. Behind her, an overweight patron in a suit claps his hands excitedly. "Ah! She''s here! Now we can really get the party started!"'
+		'Jade rolls her eyes before turning back to the man, pushing her large, fake breasts in his face. "You think you can handle both of us?" she asks, trying to remain professional around a guy she clearly finds unattractive.'
+		'"Oh, I can! And so can my wallet! It''s bigger than those huge tits of yours!" he bellows before stuffing a wad of cash into her cleavage with a hearty laugh.'
+		*nl
+		'The next few songs go by as you try to look sexy and alluring for the man, all while touching him as little as possible. He smells like cigarettes and booze, and makes continuous lewd comments about your bodies. A security guard also has to step in multiple times during the dance to remind him that he''s not allowed to touch you. Sometimes this job feels really gross...'
+
+		act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
+	end
 end
 
 if $ARGS[0] = 'pr6':
 	*clr & cla
+	minut += 10
+	money += 2000
 	'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie3.mp4"></video></center>'
-	
 	'Your client is sitting alone in the largest of the private rooms, a room where private group parties are normally held. Instead, it''s just you and him in a big empty space tonight, an echo chamber full of nothing but loud music, club lighting and a bit of shared loneliness between two strangers.'
-	'The patron doesn''t say much as you grind your nude body against him, but he watches you intently. With no special requests given, you run through a typical dance routine, slinking and sliding your body over his as alluringly as possible. Once your time is up, he gives you a big smile, politely thanks you for your time, and stands up, leaving the room.' 
+	'The patron doesn''t say much as you grind your naked body against him, but he watches you intently. With no special requests given, you run through a typical dance routine, slinking and sliding your body over him as alluringly as possible. Once your time is up, he gives you a smile and stands up before leaving the room.'
 	'After he closes the door behind him and you gather your things, a security guard cracks open the door and hands you a wad of cash. "This is from your client. You must have made a good impression since he wouldn''t shut up about you. Nice work."'
 	'Despite working in such a dark and sometimes depraved place, you walk back to the dressing room with your head up a little higher than before, feeling good about a job well done.'
 
-	act 'Return to the dressing room':gt 'stwork', 'start'
+	act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 end
 
 if $ARGS[0] = 'pr7':
 	*clr & cla
+	minut += 10
 	'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4.mp4"></video></center>'
-
-	'You meet your patron in one of the back rooms with a more lush setting than many of the others. Crushed red velvet curtains and mirrors line the walls, and multiple poles surround the outskirts of the room, allowing for many girls to serve many customers at once. Tonight though, it''s just you and one other man. You feel relatively safe knowing there''s a security guard right outside the door, but the way the man''s eyes pierce your own makes your heart race. There''s definitely more than meets the eye with this guy.'
+	'You meet your patron in one of the back rooms with a more lush setting than many of the others. Red velvet curtains and mirrors line the walls, and multiple poles surround the outskirts of the room, allowing for many girls to serve many customers at once. Tonight though, it''s just you and one other man.'
+	'You feel relatively safe knowing there''s a security guard right outside the door, but the way the man''s eyes pierce your own makes your heart race. There''s definitely more than meets the eye with him.'
 	'Still, you''re here to do a job, and you start dancing for him as seductively as possible. After a few minutes, he tosses a handful of bills at you. "Let''s see some skin, girl!" he exclaims.'
 
 	act 'Show him some skin':
 		*clr & cla
+		minut += 5
 		'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4a.mp4"></video></center>'
-
-		'You peel open your shirt at the customer''s request, exposing your breasts in his direction. You sway and rock seductively around the pole, occasionally giving him a small smile and leaning in his direction. You then arch your back, giving him a full view of your ass.'
-		'"You like what you see?" you coo in his direction. His bulge is clearly visible now, even more so as he lewdly rubs it while watching you.'
+		'You expose your breasts as you sway and rock seductively around the pole, occasionally giving him a small smile and leaning in his direction. You then arch your back, giving him a full view of your ass.'
+		'"Like what you see?" you coo in his direction. His bulge is clearly visible now, even more so as he lewdly rubs it while watching you.'
 		'"I do, and I want more. How much to get you over here to take care of this with that pretty little mouth of yours?"'
-		
+
 		act 'Decline':
 			*clr & cla
+			money += 500
 			'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4a.mp4"></video></center>'
-
 			'"Sorry, no touching. House rules."'
-			'Your customer huffs and nods, tossing a few more bills at your feet and downs the remainder of his drink.'
-			'"Yeah yeah, I get it. Time to get out of here and find me a whore. See you around, girl."'
+			'Your customer huffs and nods, tossing a few more bills at your feet and downing the remainder of his drink.'
+			'"Yeah yeah, I get it. See you around, girl."'
 			'You fix your outfit and collect your earnings from the floor, watching from the corner of your eye as the man stumbles out of the door. A few minutes later, the security guard peeks in and gives you the "all clear" sign, and you head back to the dressing room.'
-			act 'Return to the dressing room':gt 'stwork', 'start'
+
+			act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 		end
 
 		act 'Accept':
 			*clr & cla
-			money += 200
-			killvar '$boy'
-			gs 'npcgeneratec', 0, 'Private dance client', rand(18,40)
-			gs 'boyStat', $npclastgenerated
+			gs 'npcgeneratec', 0, 'Private dance client', rand(25,40)
+			gs 'npcStat', $npclastgenerated
 			gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-			gs 'cum_call', 'mouth_swallow', '$boy'
+			gs 'cum_call', 'mouth_swallow', $npcID
 			money += 2000
 			gs 'stat'
 			'<center><video autoplay loop src="images/locations/city/redlight/stripclub/private_movie4b.mp4"></video></center>'
-
 			'You look at the customer. He''s a bit older, but seems decent enough. And he smells washed, unlike some of the guys who roll through the club.'
 			'"2000 <b>₽</b>," you reply and bite your lip seductively.'
-			'"This better be one hell of a blowjob!" he says before tossing the money at you. He quickly stands, tugging his massively thick cock from his pants and dropping them to the floor. He''s already rock-hard from your striptease, and per your agreement, it''s inside of your mouth within seconds. His fat cock fills every inch of space between your lips, and just taking it inside causes the swollen tip to press into the entrance of your windpipe as you start sucking and bobbing your head up and down.'
-			'After just a few minutes, the man''s entire body tenses and without warning, he unloads his cum down your throat, not even giving you a chance to spit or dodge out of the way. The man grunts as he holds your head in place, unloading every single drop of his hot, viscous cum into your mouth. When he finally releases you, you sputter and choke his thick load down your throat the best you can while gasping for breath. Before you can even yell at him for not giving you any warning, he''s re-dressed himself and ducked out of the door.
-			"Could have warned me, asshole..." you whisper to yourself while gathering your things and heading back to the dressing room.'
-			act 'Return to the dressing room':gt 'stwork', 'start'
+			'"This better be one hell of a blowjob!" he says before tossing the money at you. He quickly stands, tugging his massively thick cock from his pants and dropping them to the floor. He''s already rock hard from your striptease, and per your agreement, it''s inside your mouth within seconds. His fat cock fills every inch of space between your lips, and just taking it inside causes the swollen tip to press into the entrance of your throat as you start sucking and bobbing your head up and down.'
+			'After just a few minutes, the man''s entire body tenses and, without warning, he cums down your throat, not even giving you a chance to pull his cock out of your mouth. The man grunts as he holds your head in place, unloading every single drop of his hot, viscous cum into your mouth. When he finally releases you, you sputter and choke on his thick load while gasping for breath. Before you can even yell at him for not giving you any warning, he''s re-dressed himself and ducked out of the door.'
+			'"Could have warned me, asshole..." you mumble to yourself while gathering your things and heading back to the dressing room.'
+
+			act 'Return to the dressing room': gt 'stwork2', 'strip_show_end'
 		end
 	end
 end

+ 688 - 0
locations/stwork3.qsrc

@@ -0,0 +1,688 @@
+#stwork3
+!! 2024/08/10
+if $ARGS[0] = 'work':
+	*clr & cla
+	if strip_club['first_bar_shift'] = 0:
+		gt 'stwork3', 'first_shift'
+	else
+		!! set player to wear server uniform
+		'Arriving at your locker, you change into your uniform before heading out to the bar.'
+
+		strip_club['rand'] = rand(0,5)
+		if strip_club['rand'] = 0:
+			gt 'stwork3', '1'
+		elseif strip_club['rand'] = 1:
+			gt 'stwork3', '2'
+		elseif strip_club['rand'] = 2:
+			gt 'stwork3', '3'
+		elseif strip_club['rand'] = 3:
+			gt 'stwork3', '4'
+		elseif strip_club['rand'] = 4:
+			gt 'stwork3', '5'
+		else
+			gt 'stwork3', '6'
+		end
+	end
+end
+
+if $ARGS[0] = 'first_shift':
+	*clr & cla
+	minut += 2
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/ivanna.jpg"></center>'
+	'You arrive in the employee area, where you''re greeted by a tall, dark haired woman. "You must be <<$pcs_nickname>>. I''m Ivanna, the club''s bar manager. If you''ll follow me."'
+	if pcs_magik > 0:
+		'There''s something strange, almost... <i>familiar</i> about her, but you can''t quite put your finger on it as you follow her out into the main area of the club.'
+	else
+		'Her eyes pierce your gaze and you swear you can somehow <i>feel</i> her in your head before she turns and beckons for you to follow her out into the main area of the club.'
+	end
+
+	act 'Follow her':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+		'You walk out into the club and are greeted by loud music, bright lights and scenes of rowdy men and half naked girls. You follow Ivanna to the bar, where she introduces you to the other staff.'
+		if week < 5:
+			'"This is Lev, our weekday bartender," she says and the man behind the bar waves at you.'
+			'"What''s up?" he asks and gives you a flirty smile.'
+		else
+			'"This is Nadia, our weekend bartender," she says and the girl behind the bar gives you a smile.'
+			'"Hi! I look forward to working with you!"'
+			'You notice that she''s wearing a rather revealing outfit that you''d expect to find on a stripper instead of a bartender.'
+		end
+		'"And this is Olga, one of the waitresses you''ll be working alongside."'
+		'"Hey there," the girl says with a smile.'
+		*nl
+		'Ivanna then explains the job to you, stating that most customers will come to the bar for drinks, but some, especially VIPs, will request personal service.'
+		'"If you have any problems or questions, then just ask one of us. I''ll leave you to it and we''ll see how you get on, yeah?"'
+		'You nod and Ivanna gives you a smile before disappearing into a back office.'
+
+		act 'Get to work':
+			*clr & cla
+			if hour < 3: hour = 3 and minut = 0
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+			'The patrons are all in good moods and being busy like this makes time go by rather quickly. If every night were like this, then you''d have no complaints.'
+			'You take the time to chat to your collegues and customers while taking in the sights and sounds of the club. Before you know it, the night has given way to the early hours of the morning and the patrons all file out as the bar staff clear down.'
+
+			act 'Speak with Ivanna':
+				*clr & cla
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/ivanna.jpg"></center>'
+				'Ivanna beckons you over. "So how was your night?"'
+				'"It was great. The customers were so friendly," you reply.'
+				'She smirks. "They won''t always be like that, but it''s good to see that you enjoyed yourself."'
+				'After having you sign some paperwork and getting you a uniform, Ivanna cheerfully sends you on your way, eager to see you when your next shift starts.'
+				act 'Leave': gt 'city_redlight', 'start'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = '1':
+	strip_club['tips_roll'] += 30
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+	'The patrons are all in good moods and being busy like this makes time go by rather quickly. If every night were like this, then you''d have no complaints.'
+	act 'Continue working': gt 'stwork3', 'events'
+end
+
+if $ARGS[0] = '2':
+	strip_club['tips_roll'] -= 30
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+	'Your shift isn''t bad at first, but a group of loud mouthed executive types haved hired a private room with multiple strippers and place very particular orders, each changing their minds several times as they tell you what they want.'
+	'You double-check the orders before you leave the room and you''re sure you have it right, but when you bring them their drinks, each of them complains that something is wrong. It''s clear they''re just doing it to mess with you.'
+	act 'Continue working': gt 'stwork3', 'events'
+end
+
+if $ARGS[0] = '3':
+	strip_club['tips_roll'] += 30
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+	'Some nights are just fun, and tonight is one of them. There are a large number of regular patrons who are happy to see you and engage you in good-natured banter and teasing. Aside from the normal issues that arise, the night flows smoothly and you make some decent tips.'
+	act 'Continue working': gt 'stwork3', 'events'
+end
+
+if $ARGS[0] = '4':
+	strip_club['tips_roll'] -= 30
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+	'A group of tourists from another part of Russia arrive, and they''re fascinated by the sights of the club. They have to be told multiple times not to take pictures, but they nonetheless vow to tell everyone back home to visit the club whenever they visit the city.'
+	act 'Continue working': gt 'stwork3', 'events'
+end
+
+if $ARGS[0] = '5':
+	strip_club['tips_roll'] += 40
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+	'You''re rushed off your feet running from table to table taking orders and delivering drinks. It''s stressful and challenging, not least because of the drunken groping you have to deal with all night.'
+	act 'Continue working': gt 'stwork3', 'events'
+end
+
+if $ARGS[0] = '6':
+	strip_club['tips_roll'] -= 40
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+	'Tonight is one of those nights where you wish you''d just called in sick. The patrons are inexplicably grumpy tonight, but it gets worse when two groups of young men, all of them very drunk, get into a shouting match that rapidly escalates. Security escorts them outside where they continue to argue and shout at each other for some time. This puts the patrons in an even fouler mood and you recieve less tips than normal.'
+	act 'Continue working': gt 'stwork3', 'events'
+end
+
+if $ARGS[0] = 'events':
+	!!set time to 22:00
+	if hour < 22: hour = 22 & minut = 0
+
+	if rand (0,2) = 0:
+		gt 'stwork3', 'manager_chat'
+	elseif rand (0,2) = 1:
+		if week = 3 or week = 4:
+			gt 'stwork3', 'bartender_chat'
+		else
+			gt 'stwork3', 'bartender_chat1'
+		end
+	else
+		gt 'stwork3', 'waitress_chat'
+	end
+end
+
+if $ARGS[0] = 'manager_chat':
+	*clr & cla
+	pcs_horny += 20
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/ivanna.jpg"></center>'
+	'During your break, you wander over to the end of the bar where Ivanna is counting stock. She greets you with a smile and asks how your night is going.'
+	'"Not bad," you reply. "Everyone is nice and the customers seem to be enjoying themselves."'
+	'"Of course they''re enjoying themselves!" she laughs. "Why wouldn''t they be? They''ve got drinks and a bunch of pretty girls shaking their asses in their face."'
+	'You see her biting her lip as she looks out at the girl currently stripping on stage as a crowd of rowdy men throw fistfuls of money around.'
+	if pcs_magik > 0:
+		if strip_club['manager_speak'] = 0:
+			strip_club['manager_speak'] = 1
+			'Ivanna is an extremely attractive woman and you can sense... something. An energy radiating from her. An energy similiar to your own, but far, <i>far</i> more powerful... You can feel your arousal rapidly increasing...'
+			'She seems to sense your aura as well and gives you a knowing smile. "We need to talk after shift, but you should get back to work now."'
+			'You just nod at her, but sense her gaze on the back of your head as you walk away.'
+			act 'Return to work': gt 'stwork3', 'events1'
+		else
+			'You feel your arousal rapidly increasing, no doubt Ivanna ''playing'' with you again. She just winks at you before returning her attention to what she was doing as you return to work.'
+			act 'Return to work': gt 'stwork3', 'events1'
+		end
+	else
+		!!if strip_club['ivanna_dream'] = 0:
+			!!strip_club['ivanna_dream'] = 1
+		!!else
+			!!strip_club['ivanna_dream'] = 2
+		!!end
+		!!gs 'stat'
+		'For some inexplicable reason, you suddenly feel yourself becoming extremely horny, and thoughts of nothing but sex fill your head as you try talking to Ivanna.'
+		'Feeling your pussy growing wet, you quickly scurry away as Ivanna returns her attention to what she was doing. As you walk away, you swear you hear a female like voice laughing, but see nothing when you look around. Must have been your imagination...'
+		act 'Return to work': gt 'stwork3', 'events1'
+	end
+end
+
+if $ARGS[0] = 'bartender_chat':
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/lev.jpg"></center>'
+	'During a lull, you end up speaking with Lev, one of the bartenders. He''s a young, somewhat attractive man who greets you with a smile. "What''s up, <<$pcs_nickname>>?"'
+	'"Nothing much, just thought I''d have a quick chat," you reply.'
+	'He nods and the two of you engage in a lively conversation. "I''m telling you, if I didn''t have a girlfriend back home, then I''d be <i>drowning</i> in pussy right now," he laughs.'
+	*nl
+	'You giggle. "You must love your job then?"'
+	'He smiles. "What''s not to love? I get good banter from the regulars <i>and</i> I get to watch hot chicks strutting around in tiny thongs. Hot chicks whose constant advances I''m forced to turn down," he jokingly pouts.'
+	'You just smile at him and engage in idle chatter until it''s time for you to get back to work.'
+	act 'Return to work': gt 'stwork3', 'events1'
+end
+
+if $ARGS[0] = 'bartender_chat1':
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/nadia.jpg"></center>'
+	'During a lull, you end up speaking with Nadia, one of the bartenders. A young and very attractive girl, she chooses to wear a skimpy bunny outfit that shows off her large breasts, leaving you wondering why she''s behind the bar and not on the pole. "What''s up, <<$pcs_nickname>>?" she asks with a cute smile.'
+	'"Nothing much, just thought I''d have a quick chat," you reply.'
+	'She nods and the two of you engage in a lively conversation. "You''re rocking that cute little bunny outfit! You sure you don''t want to get up on that stage?" you laugh.'
+	*nl
+	'She giggles. "I thought about it, but I''m too clumsy to swing around the pole. Those girls make it look so easy."'
+	'You just smile at her and engage in idle chatter until it''s time for you to get back to work.'
+	act 'Return to work': gt 'stwork3', 'events1'
+end
+
+if $ARGS[0] = 'waitress_chat':
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/olga.jpg"></center>'
+	'During your break, you end up chatting with Olga. She''s an attractive, large breasted girl who always seems to be smiling and you get to talking about the job, where the subject of tips comes up. "You definitely want to do everything you can to maximize how much you earn."'
+	'"How do I do that?" you ask.'
+	'"Well, guys are here to give money to pretty girls showing them some skin, if you get my meaning..." she grins.'
+	'You frown. "I dunno... Isn''t that kind of tacky?"'
+	*nl
+	'"Think about it," she replies. "If you can take home more at the end of the night by showing off a little, then why not? I''m forced to keep my top buttons undone anyway, so I might as well take advantage."'
+	'"I guess that doesn''t sound too bad..." you admit and continue to engage in idle chatter until it''s time for you to get back to work.'
+	act 'Return to work': gt 'stwork3', 'events1'
+end
+
+if $ARGS[0] = 'events1':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+	'Your break over, you get back to work serving the crowd of thirsty patrons.'
+
+	strip_club['rand'] = rand(0,8)
+	if strip_club['rand'] = 0:
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/.jpg"></center>'
+		'Serving a table at one of the private booths, you see two intimidating men sitting with a girl who looks like she''s high on something, and probably a little drunk as well. She crawls under the table as one of the men glares at you.'
+		'"Just put the drinks down and leave. You didn''t see anything."'
+		'You quickly do as you''re told and hurry away.'
+		act 'Leave': gt 'stwork3', 'shift_end'
+
+	elseif strip_club['rand'] = 1:
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/serve.jpg"></center>'
+		'You serve a table with two men watching the show on stage. They both drunkenly slap and grope your ass as you serve them their drinks.'
+
+		act 'Ignore it and leave':
+			cla
+			'You place their drinks on the table and quickly hurry away as the two men laugh.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+		end
+
+		act 'Tease them':
+			cla
+			money += 500
+			gs 'arousal', 'foreplay', 2
+			gs 'stat'
+			'You seductively wiggle your ass at them. "I hope you''ll tip for a job well done..."'
+			'They both grin widely. "Not the tip I want to give that ass but sure, you''ve earned it," one of them says and hands you 500 <b>₽</b>.'
+			'You stuff it away and smile sweetly at the men, putting some sway in your hips as you walk away.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+		end
+	elseif strip_club['rand'] = 2 and pcs_apprnc > 60:
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/waitress_client.jpg"></center>'
+		'You serve a man sitting at a table in a private booth. He looks at you appreciatively. "Hey girl, want to keep me company?"'
+		'You notice the bulge in his pants.'
+
+		act 'Leave':
+			cla
+			gs 'stat'
+			'You quickly serve the man his drink and leave the booth as quickly as you can.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+		end
+
+		act 'Sit next to him':
+			cla
+			'You sit next to the man and look at him, waiting to see what he''ll do when he suddenly grabs your hand and places it on his crotch.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+
+			gs 'willpower', 'sex', 'resist', 'hard'
+			if pcs_willpwr < will_cost:
+				act 'Unbutton his pants (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			else
+				act 'Unbutton his pants (<<will_cost>> Willpower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'force'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/sex/waitress_work_2.jpg"></center>'
+					'The man smiles as you undo his pants and grasp his rock hard cock in your hand. It twitches in anticipation.'
+
+					act 'Jerk him off':
+						*clr & cla
+						guy += 1
+						money += 500
+						gs 'arousal', 'hj', 5, 'sub', 'prostitution'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/city/residential/cafe/sex/waitress_work_hj.jpg"></center>'
+						'Clasping your fingers around his shaft, you start discreetly jerking him off as he watches the girl stripping on stage. A few seconds later, the man groans as he blows his load over your hand.'
+						'Once he''s finished, you wipe your hand with a tissue and he gives you 500 <b>₽</b> as he grins at you.'
+						'You smile at him before leaving the booth.'
+						act 'Leave': gt 'stwork3', 'shift_end'
+					end
+				end
+			end
+		end
+	elseif strip_club['rand'] = 4:
+		*clr & cla
+		pcs_horny += 5
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand.jpg"></center>'
+		'Heading into one of the booths, you see a girl leaning over sucking a guy''s dick.'
+		act 'Serve their drinks and leave':
+			cla
+			gs 'stat'
+			'You ignore them and place their drinks on the table before quickly leaving them in peace.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+		end
+
+		act 'Get their attention':
+			cla
+			money += 300
+			gs 'stat'
+			'You clear your throat and the girl looks up at you in bewilderment.'
+			'"Put those down and leave. We have business to finish here," the man says as he forces the girl''s head back down on his cock, almost choking her as she loudly gags.'
+			'You place the drinks on the table and the man gives you 300 <b>₽</b>. "You didn''t see this. Got it?"'
+			'You take the money and nod before quickly leaving them to it.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+		end
+	elseif strip_club['rand'] = 5:
+		if AlbinaQW['seen_strip'] = 0 and locat['A23'] = 21:
+			*clr & cla
+			AlbinaQW['seen_strip'] = 1
+			gs 'stat'
+			!! IMAGE
+			'You see one of the strippers prowling the floor in search of any clients wanting a lap dance. When she gets closer, you''re stunned to see that it''s Albina!'
+			if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+				'She looks equally surprised to see you. "<<$pcs_nickname>>?! You didn''t tell me you worked here!"'
+				'"I could say the same about you!" you chuckle and she smiles as a middle aged man approaches and asks her for a dance.'
+				'"We''ll talk about this some other time, yeah?" she winks at you before seductively leading the man to one of the private rooms.'
+				act 'Get back to work': gt 'stwork3', 'shift_end'
+			else
+				'She looks surprised, yet annoyed to see you. "Ugh, you''re working here as well?" she moans. "At least you''re not a stripper and can stay out of my way."'
+				'A middle aged man approaches and asks her for a dance. She uses the opportunity to avoid you, quickly leading the man to one of the private rooms.'
+				act 'Get back to work': gt 'stwork3', 'shift_end'
+			end
+		elseif AlbinaQW['seen_strip'] = 1 and locat['A23'] = 21:
+			if npc_rel['A23'] >= 70 or AlbinaQW['Friends'] = 2:
+				'You see Albina out on the floor in search of clients. She flashes you a smile and wiggles her ass in your direction, which gets the attention of a man who approaches and asks for a dance.'
+				'She winks at you before seductively leading him to one of the private rooms.'
+				act 'Get back to work': gt 'stwork3', 'shift_end'
+			else
+				'You see Albina out on the floor in search of clients. She frowns when she sees you before a man approaches her and asks for a dance. She quickly leads him to one of the private rooms to avoid you.'
+				act 'Get back to work': gt 'stwork3', 'shift_end'
+			end
+		else
+			'You see a stripper prowling the floor in search of a client wanting a lap dance. She quickly sets her sights on a man in the queue at the bar and starts flirting with him.'
+			act 'Get back to work': gt 'stwork3', 'shift_end'
+		end
+	elseif strip_club['rand'] = 6:
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/city/redlight/stripclub/ruby_sex.mp4"></video></center>'
+		if strip_club['seen_ruby_sex'] = 0:
+			strip_club['seen_ruby_sex'] = 1
+			minut += 2
+			gs 'stat'
+			'Heading into one of the private rooms with an order, you''re greeted by the sight of a red headed stripper having sex with the customer on the couch.'
+			'You''ve overheard some of the customers talking about a stripper named Ruby, who apparantly has a major drug addiction and lets them fuck her in exchange for drugs or money for drugs.'
+			'Tonight seems to be no different, and going by the amount of clothes she''s still wearing, it seems they''ve skipped the dance altogether... They''re too busy to notice that you''ve even entered the room.'
+
+			act 'Serve the drink and leave':
+				cla
+				gs 'stat'
+				'You''re fairly certain this is against club rules, but you don''t want to get involved in it, so you place the drink on the table, the two of them too busy to acknowledge you as she continues riding his dick, then quickly dash out of the room, leaving them to it.'
+				act 'Leave': gt 'stwork3', 'shift_end'
+			end
+
+			act 'Get their attention':
+				cla
+				money += 300
+				gs 'stat'
+				'You clear your throat and Ruby looks up at you and scowls.'
+				'"Put that down and get out! We have business to finish here," she says and points at the table.'
+				'You place the drinks on the table and the man gives you 300 <b>₽</b>. "You didn''t see this. Got it?"'
+				'You take the money and nod before quickly leaving them to it.'
+				act 'Leave': gt 'stwork3', 'shift_end'
+			end
+		else
+			'Heading into one of the private rooms with an order, you''re again greeted by the sight of Ruby having sex with her customer. It looks like she''s high on something.'
+
+			act 'Serve the drink and leave':
+				*clr & cla
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/city/redlight/stripclub/ruby_bj.mp4"></video></center>'
+				'As you place the drink on the table, you notice traces of powder. The two of them are apparantly too high to have noticed you as she climbs off him and gets on her knees in front of him, sucking his dick right in front of you. You quickly dash out of the room, leaving them to it.'
+				act 'Leave': gt 'stwork3', 'shift_end'
+			end
+
+			act 'Get their attention':
+				cla
+				money += 100
+				gs 'stat'
+				'You clear your throat and Ruby looks up at you.'
+				'"The fuck? It''s called ''knocking'', bitch! Get out! We''re in the middle of something here!" she snarls.'
+				*nl
+				'"What''s happening, babe? Why did you stop?" you hear the man ask with a groan.'
+				'"It''s nothing, Oleg. Just sit back and enjoy it..." she says as she pulls out some money and hands it to you. "Fuck off."'
+				'You place the drinks on the table and take the money before quickly leaving them to it. You haven''t even left the room before the two of them go back to fucking like rabbits.'
+				*nl
+				'Once outside the room, you count your ''tip''. You scowl when you realize that Ruby has generously gifted you... 100 <b>₽</b>. Stuffing it away, you shake your head and get back to work.'
+				act 'Leave': gt 'stwork3', 'shift_end'
+			end
+		end
+	elseif strip_club['rand'] = 7:
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/city/redlight/stripclub/stripper_bj.mp4"></video></center>'
+		'Heading into one of the private rooms with an order, you''re greeted by the sight of a girl on her knees sticking her tongue out as her customer jerks his dick and cums in her mouth.'
+		if rand(0,1) = 0 and AlbinaQW['seen_strip'] = 1 and locat['A23'] = 21:
+			'As you get closer, you''re surprised to find that it''s Albina, who obediently swallows the cum in her mouth before sucking the man''s cock clean.'
+			'"Good girl," the man says as Albina looks up at him for approval.'
+			if AlbinaQW['Friends'] = 2 or npc_rel['A23'] >= 70:
+				if AlbinaQW['saw_club_bj'] = 0: AlbinaQW['saw_club_bj'] = 1
+				'She pops his cock out of her mouth and starts licking the shaft, but stops and scrambles to her feet when she sees you. "<<$pcs_nickname>>! I didn''t hear you coming in..."'
+				'"Friend of yours?" the man grins as he zips up his pants. "Just leave my drink on the table there."'
+				'You place the drink on the table as Albina watches, looking rather uneasy.'
+				'"Don''t worry. Your secret''s safe with me," you whisper in her ear. "But you have to tell me all about this next time I''m over."'
+				'She just grins and nods before you leave the room.'
+				act 'Leave': gt 'stwork3', 'shift_end'
+			else
+				money += 300
+				gs 'stat'
+				'She pops his cock out of her mouth and starts licking the shaft, but stops and glares when she sees you. "Ugh, it''s you. Can''t you knock?"'
+				'The man grins. "Friend of yours?"'
+				'"Hardly," Albina snorts. "She was just leaving. And she didn''t see a thing. Got it?"'
+				'The man motions for you to place the drink down. "Here''s 300 <b>₽</b> for you to... forget all this."'
+				'You take the money and nod before quickly leaving the room.'
+				act 'Leave': gt 'stwork3', 'shift_end'
+			end
+		else
+			money += 300
+			gs 'stat'
+			'As you get closer, the girl obediently swallows the cum in her mouth before she suddenly spots you and jumps to her feet.'
+			'"Can''t you knock?!" she squeals as she wipes her mouth.'
+			'The man looks over at you as he makes the girl suck his dick clean. "Just put it down over there. There''s something on the table for you to... forget you ever saw this."'
+			'Leaving the drink on the table, you grab the 300 <b>₽</b> and quickly leave the room.'
+			act 'Leave': gt 'stwork3', 'shift_end'
+		end
+	elseif strip_club['rand'] = 8 and pcs_hotcat >= 6:
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+		if strip_club['manager_bonus'] = 0:
+			'A security guard approaches and says Sasha wants to speak with you in his office. Now.'
+			act 'Go to his office': gt 'stwork3' , 'manager_bonus'
+		else
+			'A security guard approaches and tells you that Sasha wants to see you in his office again.'
+			'You know what he wants, but do you want to do it?'
+			act 'Go to his office': gt 'stwork2', 'manager_bonus'
+			act 'Turn him down': gt 'stwork3', 'shift_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'manager_bonus':
+	*clr & cla
+	minut += 2
+	!! Should eventually be changed to the correct npc code
+	gs 'npcStat', 'D3'
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/.jpg"></center>'
+	'The security guard ushers you into Sasha''s office before closing the door behind you. Sasha smiles at you as he sits behind his desk.'
+	if strip_club['manager_bonus'] = 0:
+		'"Evening <<$pcs_nickname>>. Having a good night? How about a little bonus to top it off?"'
+		'"What kind of bonus?" you ask while raising an eyebrow.'
+		'He grins. "Here''s the deal. Every week, I choose a girl who ''earns'' a bonus. I''d normally pick one of the strippers, but you''ve caught my eye."'
+		'"You want me to have sex with you?!" you retort and he snorts.'
+		'"No, I just want you to suck my dick. Now are you interested or am I going to have to call in someone who wants that money?"'
+
+		act 'Do it':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bimbo.knees5.jpg">"></center>'
+			'"Okay, I''ll do it. How much is this bonus?" you ask.'
+			'"500 <b>₽</b>," he replies while motioning you over to him.'
+			'You walk over and kneel in front of him as he unzips his pants and pulls his cock out. "Get to work," he orders while snapping his fingers.'
+			*nl
+			'You obediently take his cock into your mouth, feeling it grow hard as you take it into your throat and work it with your tongue. "That''s it, keep going..." he says softly.'
+			'You spend the next few minutes sucking his dick, listening to him moan before he suddenly grabs your head and holds you down on his cock as his cum starts shooting into your mouth. You''re forced to swallow it to stop yourself from choking as he groans loudly.'
+			gs 'arousal', 'bj', 5
+			gs 'cum_call', 'mouth_swallow', 'Strip club manager', 0, 0, 10000, 40
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Continue':
+				*clr & cla
+				minut += 2
+				money += 500
+				strip_club['manager_bonus'] = 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum17.jpg">"></center>'
+				'He finally finishes and releases his grip on your head, allowing you pull yourself off of his cock. You gasp for air and wipe the saliva from your mouth before looking up to see him grinning down at you as you slowly jerk his cock in your hand.'
+				'"Good job <<$pcs_nickname>>, you more than earned this." He counts out a wad of cash and hands it to you. "Keep up the good work and there will be more bonuses in the future."'
+				'You just smile at him before getting up and taking the money. After counting it, the manager sends you on your way with a slap on the ass. Heading out into the hallway, the security guard flashes you a knowing smile as you hurry back to work.'
+				act 'Return to work': gt 'stwork3', 'shift_end'
+			end
+		end
+
+		act 'Refuse and leave':
+			cla
+			gs 'stat'
+			'You shake your head and storm back out into the hallway without saying a word, ignoring the security guard on your way.'
+			act 'Return to work': gt 'stwork3', 'shift_end'
+		end
+	else
+		'"Interested in a little bonus, are we?" he asks rhetorically with a grin before snapping his fingers and pointing to his crotch. You obediently walk over and kneel in front of him before unzipping his pants and taking his cock into your mouth. "Eager today, aren''t we?" he laughs as you start sucking.'
+		if rand(0,2) = 0:
+			'Just as you''re getting into it, you hear a knock at the door and freeze as Sasha looks down at you. "Don''t stop," he orders before telling the person to enter. A man walks into the room and stops in front of the desk. There''s no hiding the fact that you''re under here, you just hope he doesn''t recognise you.'
+			'You push the thoughts to the back of your mind and resume sucking Sasha''s dick, trying your best to keep the noise down as the two men converse for what feels like an eternity before the other man finally leaves.'
+			'The distraction gone, you''re able to focus your efforts, the room filled with the obscene sound of you gagging and slurping on his cock until he suddenly grabs your head and holds you down on his cock as his cum starts shooting into your mouth. You''re forced to swallow it to stop yourself from choking as he groans loudly.'
+			gs 'arousal', 'bj', 5
+			gs 'cum_call', 'mouth_swallow', 'Strip club manager', 0, 0, 10000, 40
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Continue':
+				*clr & cla
+				money += 500
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum17.jpg">"></center>'
+				'He finally finishes and releases his grip on your head, allowing you pull yourself off of his cock. You gasp for air and wipe the saliva from your mouth before looking up to see him grinning down at you as he counts your money.'
+				'"Nice work, <<$pcs_nickname>>. Good to see you aren''t afraid of performing in front of an audience. Maybe a career in porn is in your future?"'
+				'You just smile at him before getting up and taking the money. Heading out into the hallway, the security guard flashes you a knowing smile as you hurry back to work.'
+				act 'Return to work': gt 'stwork3', 'shift_end'
+			end
+		else
+			'You really get into it and passionately suck his dick, listening to him moaning softly as the obscene sound of you gagging and slurping on his cock echo around the room. After a few minutes, he suddenly grabs your head and holds you down on his cock as his cum starts shooting into your mouth. You''re forced to swallow it to stop yourself from choking as he groans loudly.'
+			gs 'arousal', 'bj', 5
+			gs 'cum_call', 'mouth_swallow', 'Strip club manager', 0, 0, 10000, 40
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Continue':
+				*clr & cla
+				money += 500
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum17.jpg">"></center>'
+				'He finally finishes and releases his grip on your head, allowing you pull yourself off of his cock. You gasp for air and wipe the saliva from your mouth before looking up to see him grinning down at you as he counts your money.'
+				'"Nice work, <<$pcs_nickname>>. It''s nice to see young girls with a good work ethic," he laughs.'
+				'You just smile at him before getting up and taking the money. Heading out into the hallway, the security guard flashes you a knowing smile as you hurry back to work.'
+				act 'Return to work': gt 'stwork3', 'shift_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'shift_end':
+	if hour < 3 or hour > 20:
+		temp_time_change = (3 - hour) * 60 - minut
+		if temp_time_change < 0: temp_time_change += 1440
+		minut += temp_time_change
+		killvar 'temp_time_change'
+	end
+	gs 'stat'
+	'As the night crawls into the early hours of the morning, the patrons slowly trickle out until the place is empty and the bar finally closes. Now is a good time to count your tips.'
+	act 'Count your tips': gt 'stwork3', 'tips'
+end
+
+if $ARGS[0] = 'tips':
+	!! Tips calc: 4 x rands for a bell curve base. Add the daily modifier appearance -1 per point under 100 and +1 per point over and serving skill.
+	strip_club['tips_total'] = (rand(1,125) + rand(1,125) + rand(1,125) + rand(1,125)) + strip_club['tips_roll'] + pcs_apprnc - 100 + pcs_servng
+	!! minimum and maximum at 100 and 500 with small randomisation
+	if strip_club['tips_total'] < 100: strip_club['tips_total'] = 110 - rand(0,20)
+	if strip_club['tips_total'] > 500: strip_club['tips_total'] = 510 - rand(0,20)
+	!! Give Sveta her tips
+	money += strip_club['tips_total']
+	!! Reset daily modifier
+	strip_club['tips_roll'] = 0
+	!! Skill and attribute gains
+	if pcs_servng < 100: gs 'exp_gain', 'servng', 1
+	if pcs_vital < 30: gs 'exp_gain', 'vital', 1 + rand(0,steroid_dose) & steroidcheck = 1
+	if steroidcheck = 1 and steroid_dose > 0 and rand(1,5) <= steroid_dose: clit_size += rand(0,1) & killvar 'steroidcheck'
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/.jpg"></center>'
+	'With your shift finally over, you sit at the bar and count out your tips.'
+	*nl
+	'You made <<strip_club[''tips_total'']>> <b>₽</b> in tips tonight.'
+	if strip_club['manager'] = 1:
+		'Ivanna asked to speak with you before you leave.'
+		act 'Speak with Ivanna': gt 'stwork3', 'manager_speak'
+	else
+		'Ivanna switches the lights off in the bar and ushers you out with a smile so she can finish closing up.'
+		act 'Leave': gt 'city_redlight', 'start'
+	end
+end
+
+if $ARGS[0] = 'manager_speak':
+	*clr & cla
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/ivanna1.jpg"></center>'
+	'Ivanna poses in front of the bar. "Let''s not beat around the bush as humans say. I know who you are, <<$pcs_nickname>>."'
+	'You give her an inquisitive stare and she chuckles.'
+	'"You are <<$pcs_nickname>>, yes? The girl who absorbed the power of that amulet and almost died? Reinhold speaks about you a lot, the creepy old bastard."'
+	'"You- You know him?" you ask, almost panicking.'
+	*nl
+	'She smiles. "Of course. I badly want to taste his cock, but that man is immune to everything, even my charms."'
+	'You feel the sexual energy radiating from her as she rubs her legs together. "Fuck, I''m getting wet just thinking about it..."'
+
+	act 'Who are you?':
+		*clr & cla
+		gs 'arousal', 'voyeur', 5
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/ivanna1.jpg"></center>'
+		'"So are you the same as me then?" you ask and she snorts.'
+		'"No, I''m not some half breed like you. I''m a pure born daughter of Lilith herself, and her power flows through me. I''m a <i>proper</i> succubus. We''re nothing alike."'
+		*nl
+		'She hikes up her dress and you stare in bewilderment as a cock suddenly appears between her legs in place of her pussy.'
+		'"How did-" you start to ask before she cuts you off.'
+		'"How did I grow a dick? With a spell that only high ranking succubae such as myself are allowed to use. Beings like you are limited to such ridiculously childish things as ''"Penis Envy," she scoffs while idly jerking her cock. "<i>This</i> is a penis you can envy!"'
+
+		gs 'willpower', 'sex', 'resist', 'hard'
+		if pcs_willpwr < will_cost:
+			act 'Resist her charm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		else
+			act 'Resist her charm (<<will_cost>> Willpower)':
+				cla
+				gs 'willpower', 'pay', 'force'
+				pcs_horny += 10
+				gs 'stat'
+				'You''re able to resist her attempt to break your mind and back away. She seems rather surprised at her failure.'
+				'"Hhhmph. You''re more resistant than I thought," she scowls as her cock disappears and she fixes her dress. "I was hoping your mind was still weak and feeble enough for me to have broken it and let me have some fun with you."'
+				'"Break me? Fun?" you curiously ask.'
+				'"Yes. I enjoy playing with girls I break. Human pussy just feels... Mmmmm, different..." she says as she rubs her legs together and you feel a slight warmth growing inside you from the energy radiating from her. "I love how tight some of you can be. Anyway, your secret is safe with me. For now. Do anything stupid, though, and the old creepy bastard will know <i>exactly</i> where to find you. Run along now."'
+				'You quickly dash to the exit, leaving Ivanna at the bar chuckling at you.'
+				act 'Leave': gt 'city_redlight', 'start'
+			end
+		end
+		!! Not sure how magic is handled within sex stuff
+
+		act 'Yes...':
+			*clr & cla
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/ivanna1.jpg"></center>'
+			'Her magic charms pierce your mind and you''re unable to resist as she plants erotic thoughts in your head. You stare at the cock hanging between her legs, feeling yourself growing wet and thinking how tasty her cum would be...'
+			'She grabs your hand and starts pulling you along. "Let''s have some fun in one of the private rooms."'
+
+			act 'Continue':
+				*clr & cla
+				gs 'arousal', 'bj', 5
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/ivanna2.jpg"></center>'
+				'Once there, you obediently get on your knees in front of her as she uses her magic to make her cock even bigger and thicker. You have to open your mouth as wide as you can to fit it inside.'
+				'She seems content to let you do all the work and moans softly as you enthusiastically suck her dick, taking it as deep into your throat as you can manage.'
+				'After a few minutes, she suddenly pulls you up by the hair, her cock loudly popping out of your mouth as you pant heavily. "Okay, enough of that. Time for me to try out that pussy."'
+
+				act 'Continue':
+					*clr & cla
+					gs 'arousal', 'vaginal', 5
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/ivanna3.jpg"></center>'
+					'She drags you over to the sofa, where she takes a seat and pulls you on top of her, the thick head of her cock teasingly pushing against your wet slit. "Ready to take me?" she whispers in your ear.'
+					'Before you can respond, she pushes you down onto her cock, causing you to moan as the thick head stretches your walls and pushes against your cervix.'
+					'"Fuck, I love how tight human pussy can be!" she moans before she starts thrusting, the room soon filled with the sounds of your moans and your ass slapping against her thighs as you ride her balls deep.'
+					'You don''t even know what''s happening anymore, your mind overwhelmed with nothing but pleasure.'
+
+					act 'Cum':
+						cla
+						'You suddenly feel your orgasm building as you continue riding Ivanna. "That''s it, <<$pcs_nickname>>, cum for me. Let''s cum together!"'
+
+						$orgasmtext = 'You suddenly feel a wave of pleasure overwhelm you and cry out in orgasm as Ivanna keeps thrusting. Your pussy tightens around her cock and you soon feel it twitching and throbbing inside you as spurt upon spurt of thick, warm cum is unloaded deep inside you. Ivanna moans loudly in pleasure as she pumps what feels like an endless stream of cum into your pussy.'
+						$orgasm_or = 'yes'
+						gs 'arousal', 'vaginal', 5
+						gs 'arousal', 'end'
+						gs 'stat'
+
+						'When she finally finishes, she pulls out and flops back on the sofa, panting loudly as a trickle of cum dribbles out the tip of her cock. Your pussy suddenly feels very empty as a stream of thick cum oozes out of you.'
+						'When you catch your breath, you both get dressed before heading back out to the bar, where Ivanna slaps you on the ass. "You were a good fuck <<$pcs_nickname>>, but this is the one and only time. Fucking the same person more than once is boring."'
+						'You just nod and head out as she finishes closing the bar down for the night.'
+						act 'Leave': gt 'city_redlight', 'start'
+					end
+				end
+			end
+		end
+	end
+end
+
+
+--- stwork3 ---------------------------------

+ 3 - 3
locations/telefon.qsrc

@@ -331,7 +331,7 @@ if $ARGS[0] = 'IncomingCheck':
 	!! right now allow every 60 minutes
 	if telefIncCheck['NewTotalMinutes'] - telefon['LastIncCallCheck'] > 60 and (menu_off = 0 and phone_off = 0 or phone_on = 1):
 		telefon['LastIncCallCheck'] = telefIncCheck['NewTotalMinutes']
-		gs 'telefon','IncomingCallChooser'
+		gs 'telefon', 'IncomingCallChooser'
 	end
 
 	killvar 'telefIncCheck'
@@ -345,7 +345,7 @@ if $ARGS[0] = 'IncomingCallChooser':
 	:telefonIncLoop1
 	if telefon_i < arrsize('$contact'):
 		if $contactICode[telefon_i] ! "":
-			if dyneval('result = iif(<<$contactISche[telefon_i]>>, 1, 0)') = 1:
+			if dyneval('result = (<<$contactISche[telefon_i]>>)'):
 				telefon_j = arrsize('$telefIncCall')
 				if contactAnon[telefon_i] = 1:
 					$telefIncIcon[telefon_j] = "images/system/phone/decline.png"
@@ -390,7 +390,7 @@ if $ARGS[0] = 'IncomingCall':
 	$telefonIncC['Name'] = $ARGS[2]
 	$telefonIncC['Code'] = $ARGS[3]
 
-	PLAY 'sound/old_phone.mp3',30
+	PLAY 'sound/old_phone.mp3', 30
 	$telefon['body'] = '
 	<font size=6><<$telefonIncC["Name"]>> calling</font><br>
 	<img width="200" src="<<$telefonIncC["Icon"]>>"><br>

+ 994 - 0
locations/viktor_sex.qsrc

@@ -0,0 +1,994 @@
+# viktor_sex
+
+if $ARGS[0] = 'start':
+	*clr & cla
+	menu_off = 1
+	!! Should eventually be changed to the correct npc call.
+	gs 'npcStat', 'D4'
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/.jpg"></center>'
+	'You climb into Viktor''s car and he speeds off, clearly intent on getting you into bed as fast as possible.'
+	if strip_club['guard_sex'] = 1:
+		'He pulls up to a red light and you glance over at him. He just smirks at you, though the bulge in his pants is quite obvious.'
+
+		act 'Suck his dick':
+			*clr & cla
+			gs 'arousal', 'bj', 2
+			minut += 3
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/sex/blowjob/carbj2.mp4"></video></center>'
+			'You can''t wait until you reach his place. You feel an overwhelming need to suck his dick, so you unbuckle your seatbelt and get on your knees before leaning over to pull out his cock. He doesn''t say anything and just continues silently driving as you take it into your mouth and start sucking.'
+			'You soon reach his apartment and he pulls your head up and tucks his dick away. You wipe the saliva from your chin and eagerly follow him inside.'
+			act 'Continue': gt 'viktor_sex', 'viktor_sex1'
+		end
+
+		act 'Just wait':
+			cla
+			minut += 2
+			pcs_horny += 5
+			gs 'stat'
+			'You''re feeling rather horny, but manage to keep yourself under control until you arrive at Viktor''s apartment.'
+			act 'Follow him inside': gt 'viktor_sex', 'viktor_sex1'
+		end
+	else
+		strip_club['guard_sex'] = 1
+		'He soon pulls up to a red light and glances over at you. "Fuck it. I''m not waiting any longer."'
+		'As soon as the light turns green, he quickly turns down a side street and parks up behind one of the many abandoned factories in the area. He switches off the engine and looks over at you. "Well?"'
+		'You smile at him as you unbuckle your seatbelt and shift into position. You bite your lip as you unbutton his pants and pull out his cock. It''s 22cm long and throbbing in your hand.'
+
+		act 'Suck it': gt 'viktor_sex', 'first_time'
+	end
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                            FIRST TIME                             !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'first_time':
+	gs 'arousal', 'bj', 5, 'rough'
+	minut += 3
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/shared/sex/blowjob/car.mp4"></video></center>'
+	'After only a moment''s hesitation, you part your lips and take the head of his cock into your mouth. He moans loudly as you start sucking while bobbing your head up and down as far as you can take it.'
+	'After a few seconds, Viktor suddenly wraps your hair around his fingers and forces you down on his cock, causing you to choke and gag as he thrusts his cock in and out of your throat. When he eventually pulls you up for air, tears run down your cheeks and drool dribbles from your mouth, but you smile at him.'
+	'"Get over here. Time to pound that slutty little pussy."'
+	'You awkwardly undress your lower half within the confines of the car before climbing over and straddling Viktor, the tip of his cock pressing against your slit.'
+
+	act 'Continue':
+		*clr & cla
+		gs 'arousal', 'vaginal', 5, 'rough'
+		minut += 3
+		gs 'stat'
+		'<center><video autoplay loop src="images/shared/prostitution/car/normal/sex/vaginal/vaginal_14.mp4"></video></center>'
+		'You slide down onto his dick, moaning loudly as it stretches you out and fills you completely.'
+		'"Fuck, such a tight pussy! I''m going to have fun with this," he says as he grips your ass in his hands.'
+		'You let out a lewd squeal as he thrusts up into you, bottoming out inside you as he starts fucking you.'
+		'After a few minutes, the car is filled with your loud moans of pleasure and the sound of flesh slapping against flesh as Viktor pounds your pussy, overwhelming you with a wave of pleasure.'
+		$orgasmtxt = 'The pleasure is overwhelming and you eventually scream out in ecstasy as a powerful orgasm washes over you, your legs going weak as a result.'
+		'Viktor keeps pounding you before his breathing intensifies and he starts fucking you even harder. "I''m gonna cum, baby girl!"'
+
+		act 'Creampie': gt 'viktor_sex', 'first_creampy'
+		act 'Swallow': gt 'viktor_sex', 'first_swallow'
+		act 'Pull out': gt 'viktor_sex', 'first_pullout'
+	end
+end
+
+
+if $ARGS[0] = 'first_creampy':
+	minut += 1
+	gs 'cum_call', '', 'Viktor the Bouncer', 0, 0, 10000, 40
+	gs 'stat'
+	'<center><video autoplay loop src="images/shared/prostitution/car/normal/sex/cum/pussy_1.mp4"></video></center>'
+	'You don''t want him to stop. "Yes, cum inside me! Fill my tight little pussy with your hot cum!" you cry out and he thrusts as deep as he can into you. He groans loudly in pleasure as you feel his thick, warm cum spurting deep into your pussy.'
+	'Once he''s finished, he pulls out and you climb back into the passenger seat as his cum slowly starts leaking out of you. He lights a cigarette and takes a drag before offering you one.'
+
+	if drugVars['cigarettes_used'] > 0:
+		act 'Accept':
+			*clr & cla
+			gs 'drugs', 'smoke', 1
+			gs 'cum_cleanup', 3
+			gs 'stat'
+
+			!!IMAGE
+			'You''re craving a smoke after that performance and eagerly accept it. You lean back in your seat as you take a long drag and exhale.'
+			'"That was some damn fine fucking pussy, baby girl," he says. "Can''t say I''ve had many girls be so eager to have me cum inside them."'
+			'You take another drag as his cum continues trickling from your pussy. "I''m not like most girls."'
+			'"Clearly," he laughs and you both finish smoking before he offers you some tissues. You clean up and get dressed before he turns to you. "Where am I dropping you off?" he asks as he starts the engine.'
+
+			gs 'viktor_sex', 'set_home_acts'
+		end
+	end
+
+	act 'No thanks':
+		*clr & cla
+		gs 'cum_cleanup', 3
+		gs 'stat'
+
+		!!IMAGE
+		'You shake your head and he just shrugs before taking a long drag and exhaling.'
+		'"That was some damn fine fucking pussy, baby girl," he says. "Can''t say I''ve had many girls be so eager to have me cum inside them."'
+		'You smile as his cum continues trickling from your pussy. "I''m not like most girls."'
+		'"Clearly," he laughs before handing you some tissues. You clean up and get dressed before he turns to you. "Where am I dropping you off?" he asks as he starts the engine.'
+
+		gs 'viktor_sex', 'set_home_acts'
+	end
+end
+
+if $ARGS[0] = 'first_swallow':
+	minut += 1
+	gs 'cum_call', 'mouth_swallow', 'Viktor the Bouncer', 0, 0, 10000, 40
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/shared/prostitution/car/normal/sex/cum/mouth_2.mp4"></video></center>'
+	'Hearing this, you quickly climb off of him and lean over to take his cock into your mouth before jerking it, his warm cum soon shooting into your throat as he groans loudly in pleasure.'
+	'Once he''s finished, you look up at him and obidiently swallow his cum before wiping your mouth. He grins as he lights a cigarette and takes a drag before offering you one.'
+
+	if drugVars['cigarettes_used'] > 0:
+		act 'Accept':
+			*clr & cla
+			gs 'drugs', 'smoke', 1
+			gs 'cum_cleanup', 2
+			gs 'stat'
+
+			!!IMAGE
+			'You''re craving a smoke after that performance and eagerly accept it. You lean back in your seat as you take a long drag and exhale.'
+			'"That was some damn fine fucking pussy, baby girl," he says. "And you fucking swallow!"'
+			'You take another drag and smile as you exhale. "I''m not like most girls."'
+			'"Clearly," he laughs and you both finish smoking before he offers you some tissues. You clean up and get dressed before he turns to you. "Where am I dropping you off?" he asks as he starts the engine.'
+
+			gs 'viktor_sex', 'set_home_acts'
+		end
+	end
+	act 'No thanks':
+		*clr & cla
+		gs 'cum_cleanup', 2
+		gs 'stat'
+
+		!!IMAGE
+		'You shake your head and he just shrugs before taking a long drag and exhaling.'
+		'"That was some damn fine fucking pussy, baby girl," he says. "And you fucking swallow!"'
+		'You smile. "I''m not like most girls..."'
+		'"Clearly," he laughs before handing you some tissues. You clean up and get dressed before he turns to you. "Where am I dropping you off?" he asks as he starts the engine.'
+
+		gs 'viktor_sex', 'set_home_acts'
+	end
+end
+
+if $ARGS[0] = 'first_pullout':
+	minut += 1
+	gs 'cum_call', 'labia', 'Viktor the Bouncer', 0, 0, 10000, 40
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/shared/prostitution/car/normal/sex/cum/pbelly_4.mp4"></video></center>'
+	'You quickly pull yourself off of him and slump down in your seat as he jerks himself off. He soon groans loudly in pleasure as his warm cum splatters over your pussy.'
+	'Once he''s finished, you sit up in your seat as he lights a cigarette and takes a drag before offering you one.'
+
+	if drugVars['cigarettes_used'] > 0:
+		act 'Yes':
+			gs 'drugs', 'smoke', 1
+			gs 'cum_cleanup', 1
+			gs 'stat'
+
+			!!IMAGE
+			'You''re craving a smoke after that performance and eagerly accept it. You lean back in your seat as you take a long drag and exhale.'
+			'"That was some damn fine fucking pussy, baby girl," he says. "Shame I couldn''t cum inside it."'
+			'You take another drag of your cigarette. "Getting pregnant is the last thing I need right now."'
+			'He doesn''t say anything as you both finish smoking and he offers you some tissues. You clean up and get dressed before he turns to you. "Where am I dropping you off?" he asks as he starts the engine.'
+
+			gs 'viktor_sex', 'set_home_acts'
+		end
+	end
+
+	act 'No thanks':
+		*clr & cla
+		gs 'cum_cleanup', 1
+		gs 'stat'
+
+		!!IMAGE
+		'You shake your head and he just shrugs before taking a long drag and exhaling.'
+		'"That was some damn fine fucking pussy, baby girl," he says. "Shame I couldn''t cum inside it."'
+		'You shake your head at him. "Getting pregnant is the last thing I need right now."'
+		'He doesn''t say anything as he offers you some tissues and you clean up and get dressed before he turns to you. "Where am I dropping you off?" he asks as he starts the engine.'
+
+		gs 'viktor_sex', 'set_home_acts'
+	end
+end
+
+if $ARGS[0] = 'set_home_acts':
+	if university['student'] = 1:
+		act 'The metro to the university':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+			!!IMAGE
+			'You need to get back to the university, but the bridges are raised, so you ask him to drop you off at the metro station. He nods before putting the car into gear.'
+			'After a short drive, you arrive at the station, where Viktor gives you a smack on the ass as you climb out of the car. "Until next time. baby girl."'
+			act 'Walk into the station':
+				gs 'shortgs', 'setloc', 'city_industrial', ''
+				gt 'metro', 'start'
+			end
+		end
+	end
+
+	act 'The residential area':
+		*clr & cla
+		minut += 10
+		gs 'stat'
+		!!IMAGE
+		'You ask him to drop you off at the residential area and he nods before putting the car into gear.'
+		'After a short drive, you arrive at the apartment complex, where Viktor gives you a smack on the ass as you climb out of the car. "Until next time, baby girl."'
+		act 'Go home': gt 'city_residential'
+	end
+
+	act 'The city center':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+		!!IMAGE
+		'You ask him to drop you off in the city center. He frowns, seemingly in confusion, but quickly puts the car into gear and sets off.'
+		'After a short drive, you arrive in the city center, where Viktor gives you a smack on the ass as you climb out of the car. "Until next time, baby girl."'
+		act 'Head on your way': gt 'city_center'
+	end
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                             REPEATED                              !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'viktor_sex1':
+	*clr & cla
+	gs 'arousal', 'vaginal', 5, 'rough'
+	gs 'stat'
+	'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/event/miss1.mp4"></video></center>'
+	'Viktor wastes no time and immediately drags you into the bedroom, where he pulls your clothes off and throws you onto the bed. He undresses himself and you spread your legs wide as he climbs onto the bed with you. You squeal when he shoves his dick straight into your pussy and starts pounding you.'
+	'You squeeze your breasts as he thrusts himself as deep inside you as he can, your moans of pleasure loudly echoing around the room. You squeal when he suddenly grabs your waist and pulls you into a cowgirl position.'
+
+	act 'Cowgirl':
+		*clr & cla
+		gs 'arousal', 'vaginal', 5, 'rough'
+		gs 'stat'
+		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard4.mp4"></video></center>'
+		'You straddle Viktor as he starts roughly thrusting up into your pussy, causing you to moan just as loudly as the sound of flesh frantically slapping against flesh fills the room.'
+		'You lose track of time and are reduced to a quivering mess of lewd moans as Viktor pounds your pussy before his cock slips out of you during one of his thrusts and you collapse onto the bed next to him, but he doesn''t give you time to recover.'
+
+		act 'Doggy':
+			*clr & cla
+			gs 'arousal', 'vaginal', 5, 'rough'
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/sex/vag/doggy/hard3.mp4"></video></center>'
+			'He moves in behind you and pulls you up onto your knees, arching your back as he shoves his dick back inside you and starts roughly fucking you doggystyle.'
+			$orgasmtxt = 'You''re too overwhelmed to do anything but scream in pleasure and beg him to go faster as you feel your orgasm approaching. A powerful wave of pleasure soon washes over you and leaves you quivering under Viktor as he continues fucking you throughout.'
+			'It only takes a few minutes of this for him to cry out that he''s going to cum.'
+
+			act 'Creampie': gt 'viktor_sex', 'viktor_creampie'
+			act 'Pull out': gt 'viktor_sex', 'viktor_pullout'
+		end
+	end
+end
+
+if $ARGS[0] = 'viktor_creampie':
+	gs 'arousal', 'vaginal', 1, 'rough'
+	gs 'cum_call', '', 'Viktor the Bouncer', 0, 0, 10000, 40
+	gs 'arousal', 'end'
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/doggy5.mp4"></video></center>'
+	'"Do... Do it! Fill... Fill my slutty pussy... With your hot cum..." you manage to say softly between waves of pleasure. In response, Viktor firmly grabs you by the hips and thrusts his entire dick into your pussy and pushes you down on your stomach before groaning loudly as you feel spurts of warm cum shooting deep inside you.'
+	'He pulls out and flops down on the bed next to you, his cum slowly trickling out of you as he lights a cigarette. "Want one?" he asks.'
+	if drugVars['cigarettes_used'] > 0:
+		if mc_inventory['cigarettes'] > 0:
+			act 'I have my own':
+				*clr & cla
+				gs 'drugs', 'smoke'
+				gs 'cum_cleanup', 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
+				'You shake your head. "Thanks, but I''ve got my own." He just nods as you bend over the edge of the bed to grab a cigarette from your purse.'
+				if func('pcs_has_attr', 'body_ass_bubble'): 'You feel his hand squeezing your ass cheek. "God damn, am I in love with this perfect fucking ass of yours!"'
+				'Pulling a smoke out, you light it before flopping back down next to Viktor, taking a drag as the two of you sit in satisfied silence.'
+				'Finishing your cigarette, you extinguish the butt in his ash tray and grab some tissues from his bedside table to clean yourself up.'
+				'Exhausted, you then snuggle down on the bed and struggle to keep your eyes open...'
+				act '...': gt 'viktor_sex','viktor_postsex'
+			end
+		end
+		act 'Yes':
+			*clr & cla
+			gs 'drugs', 'smoke', 1
+			gs 'cum_cleanup', 1
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
+			'You nod and he hands the cigarette. You light it and take a deep drag as you sit back on the bed, relaxing in satisfied silence with Viktor.'
+			'Finishing your cigarette, you extinguish the butt in his ash tray and grab some tissues from his bedside table to clean yourself up.'
+			'Exhausted, you then snuggle down on the bed and struggle to keep your eyes open...'
+			act '...': gt 'viktor_sex','viktor_postsex'
+		end
+	end
+
+	act 'No thanks':
+		*clr & cla
+		gs 'cum_cleanup', 1
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/.jpg"></center>'
+		'You shake your head and sit back on the bed. He takes a long drag as you check your phone in satisfied silence.'
+		'Finishing his cigarette, he extinguishes the butt in his ash tray before leaving the room.'
+		'You grab some tissues from his bedside table and clean yourself up before snuggling down on the bed. Exhausted, you struggle to keep your eyes open...'
+		act '...': gt 'viktor_sex', 'viktor_postsex'
+	end
+end
+
+if $ARGS[0] = 'viktor_pullout':
+	gs 'arousal', 'vaginal', 1, 'rough'
+	gs 'cum_call', 'labia', 'Viktor the Bouncer', 0, 0, 10000, 40
+	gs 'arousal', 'end'
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/sahred/sex/cum/cum5.mp4"></video></center>'
+	'"Don''t... Don''t cum... Inside me. Pull... Pull out..." you manage to say softly between waves of pleasure. Viktor slides his dick out of you and you soon feel his warm cum splattering over your ass cheek and lower back as he lets out a satisfied grunt.'
+	'Overwhelmed with pleasure, you collapse on the bed and he flops down next to you. He lights a cigarette and takes a drag before looking at you. "Want one?"'
+	if drugVars['cigarettes_used'] > 0:
+		if mc_inventory['cigarettes'] > 0:
+			act 'I have my own':
+				*clr & cla
+				gs 'drugs', 'smoke'
+				gs 'cum_cleanup', 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
+				'You shake your head. "Thanks, but I''ve got my own." He just nods as you bend over the edge of the bed to grab a cigarette from your purse.'
+				if func('pcs_has_attr', 'body_ass_bubble'): 'You feel his hand squeezing your ass cheek. "God damn, am I in love with this perfect fucking ass of yours!"'
+				'Pulling a smoke out, you light it before flopping back down next to Viktor, taking a drag as the two of you sit in satisfied silence.'
+				'Finishing your cigarette, you extinguish the butt in his ash tray and grab some tissues from his bedside table to clean yourself up.'
+				'Exhausted, you then snuggle down on the bed and struggle to keep your eyes open...'
+				act '...': gt 'viktor_sex' ,'viktor_postsex'
+			end
+		end
+		act 'Yes':
+			*clr & cla
+			gs 'drugs', 'smoke', 1
+			gs 'cum_cleanup', 3
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
+			'You nod and he hands the cigarette. You light it and take a deep drag as you sit back on the bed, relaxing in satisfied silence with Viktor.'
+			'Finishing your cigarette, you extinguish the butt in his ash tray and grab some tissues from his bedside table to clean yourself up.'
+			'Exhausted, you then snuggle down on the bed and struggle to keep your eyes open...'
+			act '...': gt 'viktor_sex', 'viktor_postsex'
+		end
+	end
+
+	act 'No thanks':
+		gs 'cum_cleanup', 3
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/.jpg"></center>'
+		'You shake your head and sit back on the bed. He takes a long drag as you check your phone in satisfied silence.'
+		'Finishing his cigarette, he extinguishes the butt in his ash tray before leaving the room.'
+		'You grab some tissues from his bedside table and clean yourself up before snuggling down on the bed. Exhausted, you struggle to keep your eyes open...'
+		act '...': gt 'viktor_sex', 'viktor_postsex'
+	end
+end
+
+
+
+
+if $ARGS[0] = 'viktor_postsex':
+	if hour < 10 or hour > 20:
+		gs 'sleep_simple', 'sleep_until', 10, 0
+	end
+
+	if university['student'] = 1 and week < 5 and university['break'] = 0:
+		gt 'viktor_sex', 'wakeup_uni'
+	else
+		'You awaken feeling groggy as you slowly open your eyes. Looking at your surrondings, you realize that you fell asleep in Viktor''s bed, and have snuggled into him during the night. You look up to see him still snoozing away before checking your phone and seeing that it''s after 10am.'
+		'You''re in no rush to be anywhere, so you roll over lazily on the bed and spend a few minutes just relaxing in the comfort of Viktor''s bed.'
+
+		if drugVars['cigarettes_used'] > 0 and mc_inventory['cigarettes'] > 0:
+			act 'Have a smoke':
+				*clr & cla
+				minut += 5
+				pcs_horny += 5
+				gs 'drugs', 'smoke'
+				gs 'stat'
+
+				!! IMAGE
+				'Craving a smoke, you reach into your bag and pull out a cigeratte before lighting it. You take a long drag as the events of last night come back to you. You look over at Viktor still snoozing, the memory of him ravaging your pussy becoming vivid in your mind.'
+
+				act 'Get up':
+					*clr & cla
+					minut += 2
+					gs 'stat'
+
+					'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+					'A few minutes later, you finish your cigarette and extinguish the butt in his ash tray before getting up. Leaving Viktor in bed, you walk out of the bedroom and find the bathroom, where you turn on the water in the shower and step inside.'
+
+					act 'Clean up': gt 'viktor_sex', 'wakeup_cleanup'
+				end
+			end
+		end
+
+		act 'Get up':
+			*clr & cla
+			minut += 2
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+			'After a few more minutes, you decide to get up and get ready. Leaving Viktor in bed, you walk out of the bedroom and find the bathroom, where you turn on the water in the shower and step inside.'
+
+			act 'Clean up': gt 'viktor_sex', 'wakeup_cleanup'
+		end
+
+		act 'Wake Viktor up': xgt 'viktor_sex', 'wakeup_viktor'
+		act 'Wake Victor up with a blowjob': gt 'viktor_sex', 'wakeup_viktor_bj'
+	end
+end
+
+
+if $ARGS[0] = 'wakeup_uni':
+	'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+	'You awaken feeling groggy as you slowly open your eyes. Looking at your surroundings, you realize that you fell asleep in Viktor''s bed, and have snuggled into him during the night. You look up to see him still snoozing away before checking your phone and seeing that it''s after 10am.'
+
+	act 'University!':
+		*clr & cla
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+		gs 'clothing', 'wear_last_worn'
+		gs 'underwear', 'wear'
+		'The realization is enough to startle you awake. You''re late for university!'
+		'Practically tumbling out of the bed, you start grabbing your clothes and pulling them on as fast as you can.'
+		'Your frantic efforts to get dressed causes Viktor to stir. "What the? Calm down, baby girl! What''s wrong?"'
+
+		act 'I need to be somewhere!':
+			cla & *nl
+			'"I''m late for something!" you say hurriedly. "I need to go <i>now</i>!"'
+			'With one last quick check, you make sure all your clothes are in place and rush out the door, leaving a bewildered Viktor behind.'
+			act 'Leave': gt 'city_center'
+		end
+
+		act 'I''m late for university!':
+			cla & *nl
+			'"I''m late for university! I need to go <i>now</i>!" you huff. "I don''t even have time for a shower! <i>Fuck!</i>"'
+			'"You need a ride? I can drop you off," he offers.'
+
+			act 'No thanks':
+				cla
+				pcs_hairbsh = 1
+				gs 'stat'
+				'"No, I''ll be fine. Thanks for the offer though."'
+				'You quickly brush your hair and make sure all your clothes are in place before rushing out the door.'
+				act 'Leave': gt 'city_center'
+			end
+
+			act 'That''d be great':
+				cla
+				pcs_hairbsh = 1
+				gs 'stat'
+				'"Really?" you perk up. "That''d be great!"'
+				'You quickly brush your hair and collect your things while he pulls on a shirt and jeans before grabbing his keys, then both of you head outside and climb into his car.'
+
+				if drugVars['cigarettes_used'] > 0:
+					if mc_inventory['cigarettes'] > 0:
+						*clr & cla
+						minut += 10
+						gs 'drugs', 'smoke'
+						gs 'stat'
+
+						!!IMAGE
+						'Feeling stressed, you rummage through your purse and pull out a cigarette. You light it up and sit back to take a drag, feeling yourself relax as the familiar tingling sensation fills your lungs. Viktor continues driving through the city center on the way to the island. You can only hope that nobody sees him dropping you off...'
+						'You soon reach the university, where you give Viktor a quick kiss and thank him before climbing out of the car.'
+						act 'Continue': gt 'uni_grounds', 'main'
+					else
+						*clr & cla
+						minut += 10
+						gs 'drugs', 'smoke', 1
+						gs 'stat'
+
+						!!IMAGE
+						'Feeling stressed, you frantically rummage through your purse looking for a cigarette, only to come up empty. "<i>FUCK</i>!" you scream as you throw your head back in frustration.'
+						'Seeing your dilemma, Viktor offers you one. You snatch it from his hand and quickly light it up, feeling yourself relax as the familiar tingling sensation fills your lungs. "Thanks," you say before sitting back to take another long drag. Viktor just nods as he continues driving; you can only hope that nobody sees him dropping you off...'
+						'You soon reach the university, where you give Viktor a quick kiss and thank him before climbing out of the car.'
+						act 'Continue': gt 'uni_grounds', 'main'
+					end
+				else
+					cla
+					minut += 10
+					gs 'stat'
+
+					'Viktor drives through the city center on the way to the island. All you can do is sit back and hope that nobody sees him dropping you off...'
+					'You soon reach the university, where you give Viktor a quick kiss and thank him before climbing out of the car.'
+					act 'Continue': gt 'uni_grounds', 'main'
+				end
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'wakeup_smoke':
+	minut += 5
+	pcs_horny += 5
+	gs 'drugs', 'smoke'
+	gs 'stat'
+
+	!! IMAGE
+	'Craving a smoke, you reach into your bag and pull out a cigeratte before lighting it. You take a long drag as the events of last night come back to you. You look over at Viktor still snoozing, the memory of him ravaging your pussy becoming vivid in your mind.'
+
+	act 'Get up':
+		*clr & cla
+		minut += 2
+		gs 'stat'
+
+		'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+		'A few minutes later, you finish your cigarette and extinguish the butt in his ash tray before getting up. Leaving Viktor in bed, you walk out of the bedroom and find the bathroom, where you turn on the water in the shower and step inside.'
+
+		act 'Clean up': gt 'viktor_sex', 'wakeup_cleanup'
+	end
+end
+
+if $ARGS[0] = 'wakeup_cleanup':
+	minut += 10
+	dynamic $showerdin
+	if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+	'You spend a few seconds just letting the warm water rain down on your head before you give yourself a thorough wash, spending a few more minutes in the shower''s warm embrace before turning the water off and stepping out. Grabbing a towel, you dry yourself off before wrapping it around your body and stepping out into the hallway.'
+
+	act 'Get dressed':
+		*clr & cla
+		minut += 5
+		pcs_hairbsh = 1
+		gs 'stat'
+
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+		'You make your way back into the bedroom, where you toss the towel aside and get dressed before giving your hair a quick brush. Feeling clean and refreshed, you turn to see Viktor waking up.'
+		'"Leaving already?" he asks with a smirk.'
+		'"Yeah," you reply. "Got places to be."'
+		'"I''ll just be a few minutes if you need a lift anywhere?"'
+
+		act 'No thanks':
+			*clr & cla
+
+			'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+			'You shake your head. "Thanks, but I can manage."'
+			'"Okay," he shrugs. "See you at work then."'
+			'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before he pulls out a cigarette and lights it as you head on your way.'
+			act 'Leave': gt 'city_center'
+		end
+
+		act 'Yes':
+			*clr & cla
+
+			!!IMAGE
+			'"That''d be great!" you reply.'
+			'You collect your things while he pulls on a shirt and jeans before grabbing his keys, then both of you head outside and climb into his car.'
+			'"Where to?" he asks.'
+
+			gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+		end
+	end
+end
+
+if $ARGS[0] = 'wakeup_set_dropoff_acts':
+	if university['student'] = 1:
+		act 'The university':
+			cla
+			minut += 10
+			gs 'stat'
+
+			'"Can you drop me off at the university?"'
+			'"Sure thing, baby girl."'
+			'After a short drive, you arrive at the university, where you lean over and give Viktor a quick kiss before climbing out of the car. He drives off as soon as you close the door.'
+			act 'Continue': gt 'uni_grounds', 'main'
+		end
+	end
+
+	act 'The residential area':
+		cla
+		minut += 10
+		gs 'stat'
+
+		'"Can you drop me off at the residential area?"'
+		'"Sure thing, baby girl."'
+		'After a short drive, you arrive at the apartment complex, where you lean over and give Viktor a quick kiss before climbing out of the car. He drives off as soon as you close the door.'
+		act 'Continue': gt 'city_residential'
+	end
+
+end
+
+
+if $ARGS[0] = 'wakeup_viktor':
+	'You kiss Viktor softly on the lips, which causes him to stir slightly and open his eyes. "Mmmhm, five more minutes, baby girl. Go take a shower if you want."'
+
+	act 'Get up':
+		*clr & cla
+		'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+		'You leave Viktor in bed as you walk out of the bedroom and find the bathroom, where you turn on the water in the shower and step inside.'
+
+		act 'Clean up':
+			minut += 10
+			dynamic $showerdin
+			if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+			'You spend a few seconds just letting the warm water rain down on your head before you give yourself a thorough wash, spending a few more minutes in the shower''s warm embrace before turning the water off and stepping out. Grabbing a towel, you dry yourself off before wrapping it around your body and stepping out into the hallway.'
+
+			if rand(0, 1) = 0:
+				act 'Get dressed':
+					*clr & cla
+					gs 'arousal', 'hj', 5
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/standing1.jpg"></center>'
+					'You barely make it back into the bedroom when Viktor suddenly and effortlessly rips away your towel and pulls you into a tight embrace. You moan softly as he runs his hand between the back of your legs and nuzzles your neck. You turn grab his cock and start slowly jerking it, feeling it quickly grow hard in your hand.'
+					'"Such a sexy little body.... I''d love to go another round with you, but I have places to be..." he pouts.'
+
+					act 'So do I':
+						cla
+						'"So do I. Can I get dressed now?" you ask and he somewhat reluctantly lets you go.'
+						'"Need a lift anywhere once you''re ready?" he asks.'
+
+						act 'No thanks':
+							*clr & cla
+							pcs_hairbsh = 1
+							gs 'stat'
+							'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+							'You shake your head. "Thanks, but I can manage."'
+							'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before you head on your way.'
+							act 'Leave': gt 'city_center'
+						end
+
+						act 'Yes':
+							*clr & cla
+							pcs_hairbsh = 1
+							gs 'stat'
+							!!IMAGE
+							'"That''d be great!" you reply.'
+							'Once you''re dressed, he grabs his keys and you head outside and climb into his car.'
+							'"Where to?" he asks.'
+
+							gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+						end
+					end
+
+					act 'Suggest a blowjob':
+						*clr & cla
+						gs 'arousal', 'bj', 5
+						gs 'cum_call', 'face', 'Viktor the Bouncer', 0, 0, 10000, 40
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><video autoplay loop src="images//locations/pavlovsk/resident/apartment/shulginhome/smroom/event/rought/oral1.mp4"></video></center>'
+						'You continue letting his hands roam over your body. "Surely you have enough time for me to suck your dick?" you ask teasingly as you continue jerking his now rock hard cock.'
+						'He doesn''t need to be asked twice and pushes you down onto your knees in front of him. You immediately take his cock into your mouth, swallowing as much of his monsterous shaft as you can before you start sucking and bobbing your head up and down.'
+						'You spend the next few minutes passionately sucking him off before he suddenly wraps your hair around his hand and slams you down on his cock. You choke and gag as he roughly slides you up and down his shaft before he pulls you and holds you firmly in place. You close your eyes and soon feel spurts of warm cum splattering into your throat as Viktor grunts loudly. You quickly start gulping it down to stop yourself from choking.'
+						'"That was just what I needed to start my day, baby girl!" he laughs as he slides his dick out of your mouth. "Need a lift anywhere once you''re ready?"'
+
+						act 'No thanks':
+							*clr & cla
+							gs 'cum_cleanup', 11
+							pcs_hairbsh = 1
+							minut += 2
+							gs 'stat'
+							'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+							'You cough while shaking your head. "Thanks, but I can manage."'
+							'You get dressed, quickly brush your hair and collect your things before giving Viktor a quick kiss, who slaps you on the ass before you head on your way.'
+							act 'Leave': gt 'city_center'
+						end
+
+						act 'Yes':
+							*clr & cla
+							gs 'cum_cleanup', 11
+							minut += 2
+							gs 'stat'
+							!!IMAGE
+							'"That''d... Thad''t be great!" you reply through coughs.'
+							'Once you''re dressed, he grabs his keys and you head outside and climb into his car.'
+							'"Where to?" he asks.'
+
+							gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+						end
+					end
+				end
+			else
+				act 'Get dressed':
+					*clr & cla
+					minut += 5
+					pcs_hairbsh = 1
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+					'You make your way back into the bedroom, where you toss the towel aside and get dressed before giving your hair a quick brush before looking over and seeing Viktor waking up.'
+					'"Need a lift anywhere?" he asks as he lights a cigarette.'
+
+					act 'No thanks':
+						cla
+						'You shake your head. "Thanks, but I can manage."'
+						'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before you head on your way.'
+						act 'Leave': gt 'city_center'
+					end
+
+					act 'Yes':
+						*clr & cla
+						!!IMAGE
+						'"That''d be great!" you reply and you you collect your things as he quickly gets dressed.'
+						'After making sure everything is in order, you both head outside and climb into his car. "Where to?" he asks.'
+
+						gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'wakeup_viktor_bj':
+	gs 'arousal', 'bj', 2
+	gs 'stat'
+	'<center><video autoplay loop src="images/shared/sex/handjob/hj2.mp4"></video></center>'
+	'The memory of last night is still fresh in your mind and you''re feeling a little naughty, so you pull the covers back and grope Viktor''s bulge through his shorts. He moans softly as you pull his shorts down and start jerking his dick in your hand before you slide down and start sucking on his balls.'
+
+	act 'Keep going':
+		*clr & cla
+		gs 'arousal', 'bj', 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/shared/sex/blowjob/bj0.mp4"></video></center>'
+		'You continue sucking on Viktor''s balls and jerking his cock as he moans softly in his sleep. After a few minutes of this, you take his now rock hard cock into your mouth and start sucking while taking as much of it into your throat as you can. Viktor groans loudly and you look up to see him grinning down at you.'
+		'"Best alarm clock ever..."'
+
+		act 'Keep sucking his dick':
+			*clr & cla
+			gs 'arousal', 'bj', 2
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/sex/blowjob/bj3.mp4"></video></center>'
+			'You keep sucking as you shift position and lie down next to him. You start deepthroating his cock as he lies back and lets you control the action. After a few minutes, he grunts and tells you he''s about to cum.'
+
+			act 'Swallow':
+				*clr & cla
+				gs 'cum_call', 'mouth_swallow', 'Viktor the Bouncer', 0, 0, 10000, 40
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1.mp4"></video></center>'
+				'You keep your lips wrapped firmly around his cock as you feel it twitching in your mouth and spurts of cum shoot into your throat. When he finishes blowing his load with a satisfied groan, you slide his dick out of your mouth and look up at him as you swallow his cum.'
+				'He grins at you. "God damn baby girl, that was the best way to wake up. You''re free to use the shower if you want to clean up."'
+
+				act 'Get up':
+					*clr & cla
+					minut += 2
+					gs 'stat'
+					'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+					'You get up and head to the bathroom, where you turn on the water in the shower and step inside.'
+
+					act 'Clean up':
+						minut += 10
+						dynamic $showerdin
+						if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
+						gs 'stat'
+						'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+						'You spend a few seconds just letting the warm water rain down on your head before you give yourself a thorough wash, spending a few more minutes in the shower''s warm embrace before turning the water off and stepping out. Grabbing a towel, you dry yourself off before wrapping it around your body and stepping out into the hallway.'
+
+						act 'Get dressed':
+							*clr & cla
+							minut += 5
+							pcs_hairbsh = 1
+							gs 'stat'
+							'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+							'You make your way back into the bedroom, where you toss the towel aside and get dressed before giving your hair a quick brush, all under Viktor''s gaze.'
+							'"Need a lift anywhere?" he asks.'
+
+							act 'No thanks':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+								'You shake your head. "Thanks, but I can manage."'
+								'"Okay," he shrugs. "See you at work then."'
+								'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before he pulls out a cigarette and lights it as you head on your way.'
+								act 'Leave': gt 'city_center'
+							end
+
+							act 'Yes':
+								*clr & cla
+								!!IMAGE
+								'"That''d be great!" you reply.'
+								'You collect your things while he grabs his keys, then both of you head outside and climb into his car.'
+								'"Where to?" he asks.'
+
+								gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+							end
+						end
+					end
+				end
+			end
+
+			act 'Facial':
+				*clr & cla
+				gs 'cum_call', 'face', 'Viktor the Bouncer', 0, 0, 10000, 40
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial35.jpg"></center>'
+				'Hearing this, you quickly pop his dick out of your mouth and start jerking him off. He starts grunting loudly and spurts of cum are soon splattering across your face and chin. He finishes with a satisfied groan and you take his cock back into your mouth and suck it clean before flopping down next to him.'
+				'He grins at you. "God damn baby girl, that was the best way to wake up. You''re free to use the shower if you want to clean up."'
+
+				act 'Get up':
+					*clr & cla
+					minut += 2
+					gs 'stat'
+					'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+					'You get up and head to the bathroom, where you turn on the water in the shower and step inside.'
+
+					act 'Clean up':
+						minut += 10
+						dynamic $showerdin
+						if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
+						gs 'stat'
+						'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+						'You spend a few seconds just letting the warm water rain down on your head before you give yourself a thorough wash, spending a few more minutes in the shower''s warm embrace before turning the water off and stepping out. Grabbing a towel, you dry yourself off before wrapping it around your body and stepping out into the hallway.'
+
+						act 'Get dressed':
+							*clr & cla
+							minut += 5
+							pcs_hairbsh = 1
+							gs 'stat'
+							'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+							'You make your way back into the bedroom, where you toss the towel aside and get dressed before giving your hair a quick brush, all under Viktor''s gaze.'
+							'"You need a lift anywhere?" he asks.'
+
+							act 'No thanks':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+								'You shake your head. "Thanks, but I can manage."'
+								'"Okay," he shrugs. "See you at work then."'
+								'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before he pulls out a cigarette and lights it as you head on your way.'
+								act 'Leave': gt 'city_center'
+							end
+
+							act 'Yes':
+								*clr & cla
+								!!IMAGE
+								'"That''d be great!" you reply.'
+								'You collect your things while he grabs his keys, then both of you head outside and climb into his car.'
+								'"Where to?" he asks.'
+
+								gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+							end
+						end
+					end
+				end
+			end
+		end
+
+		act 'Have a quickie':
+			*clr & cla
+			gs 'arousal', 'vaginal', 5
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard4.mp4"></video></center>'
+			'The memories of last night continue drifting into your mind. You need his cock inside you. "How about you fuck my little pussy like you did last night?" you ask teasingly while stroking his cock.'
+			'"I guess we have time for a quick one," he grins before quickly pulling you on top of him. You guide his dick into your eager pussy, moaning softly as it stretches you out.'
+			'He doesn''t waste any time and starts pounding you hard and fast, causing you to moan and squeal loudly in pleasure as his dick thrusts deep into your pussy. After a few minutes of this, Viktor grunts that he''s about to cum.'
+
+			act 'Creampie':
+				*clr & cla
+				gs 'arousal', 'vaginal', 2
+				gs 'cum_call', '', 'Viktor the Bouncer', 0, 0, 10000, 40
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/cowgirl1.jpg"></center>'
+				'"Cum inside me! I want to feel your hot cum inside my pussy!" you cry out and Viktor goes even faster until he thrusts as deeply as he can inside you. You feel his dick twitching inside you as warm spurts of cum shoot deep into your pussy.'
+				'He finishes with a satisfied groan and you pull yourself off of his cock to show him his cum slowly leaking out of you. "What a great start to the day," he laughs. "You can use the shower to clean up."'
+
+				act 'Get up':
+					*clr & cla
+					minut += 2
+					gs 'stat'
+					'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+					'You get up and head to the bathroom, where you turn on the water in the shower and step inside.'
+
+					act 'Clean up':
+						minut += 10
+						gs 'cum_cleanup', 3
+						dynamic $showerdin
+						if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
+						gs 'stat'
+						'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+						'You spend a few seconds just letting the warm water rain down on your head before you give yourself a thorough wash, spending a few more minutes in the shower''s warm embrace before turning the water off and stepping out. Grabbing a towel, you dry yourself off before wrapping it around your body and stepping out into the hallway.'
+
+						act 'Get dressed':
+							*clr & cla
+							minut += 5
+							pcs_hairbsh = 1
+							gs 'stat'
+							'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+							'You make your way back into the bedroom, where you toss the towel aside and get dressed before giving your hair a quick brush. Feeling clean and refreshed, you turn to see Viktor waking up.'
+							'"Leaving already?" he asks with a smirk.'
+							'"Yeah," you reply. "Got places to be."'
+							'"I''ll just be a few minutes if you need a lift anywhere?"'
+
+							act 'No thanks':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+								'You shake your head. "Thanks, but I can manage."'
+								'"Okay," he shrugs. "See you at work then."'
+								'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before he pulls out a cigarette and lights it as you head on your way.'
+								act 'Leave': gt 'city_center'
+							end
+
+							act 'Yes':
+								*clr & cla
+								!!IMAGE
+								'"That''d be great!" you reply.'
+								'You collect your things while he grabs his keys, then both of you head outside and climb into his car.'
+								'"Where to?" he asks.'
+
+								gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+							end
+						end
+					end
+				end
+			end
+
+			act 'Pull out':
+				*clr & cla
+				gs 'arousal', 'vaginal', 2
+				gs 'cum_call', 'butt', 'Viktor the Bouncer', 0, 0, 10000, 40
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum4.jpg"></center>'
+				'You quickly pull yourself off of his dick just as he''s about to cum and feel his warm cum splattering over your ass as you sit on his lap. He finishes with a satisfied groan and you smile at each other.'
+				'"What a great start to the day," he laughs. "You can use the shower to clean up."'
+
+				act 'Get up':
+					*clr & cla
+					minut += 2
+					gs 'stat'
+					'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+					'You get up and head to the bathroom, where you turn on the water in the shower and step inside.'
+
+					act 'Clean up':
+						minut += 10
+						dynamic $showerdin
+						if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
+						gs 'stat'
+						'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+						'You spend a few seconds just letting the warm water rain down on your head before you give yourself a thorough wash, spending a few more minutes in the shower''s warm embrace before turning the water off and stepping out. Grabbing a towel, you dry yourself off before wrapping it around your body and stepping out into the hallway.'
+
+						act 'Get dressed':
+							*clr & cla
+							minut += 5
+							pcs_hairbsh = 1
+							gs 'stat'
+							'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+							'You make your way back into the bedroom, where you toss the towel aside and get dressed before giving your hair a quick brush, all under Viktor''s gaze.'
+							'"You need a lift anywhere?" he asks.'
+
+							act 'No thanks':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/shared/romance/lovers/homes/multibedroom/1/bedroom.jpg"></center>'
+								'You shake your head. "Thanks, but I can manage."'
+								'"Okay," he shrugs. "See you at work then."'
+								'You collect your things before giving Viktor a quick kiss, who slaps you on the ass before he pulls out a cigarette and lights it as you head on your way.'
+								act 'Leave': gt 'city_center'
+							end
+
+							act 'Yes':
+								*clr & cla
+								!!IMAGE
+								'"That''d be great!" you reply.'
+								'You collect your things while he grabs his keys, then both of you head outside and climb into his car.'
+								'"Where to?" he asks.'
+
+								gs 'viktor_sex', 'wakeup_set_dropoff_acts'
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+
+--- viktor_sex ---------------------------------