glife.qproj

@@ -592,6 +592,7 @@
 		<Location name="placer_pav_park"/>
 		<Location name="placer_man"/>
 		<Location name="placer_act"/>
+		<Location name="skverdin"/>
 		<Location name="placer_end"/>
 		<Location name="placer_sex"/>
 		<Location name="podval_rape"/>

locations/_attributes_gm_coats.qsrc

@@ -2,101 +2,172 @@
 !Price ranges from 1 to 3
 
 if ARGS[1] = 1:
+	$CoatFast = 'zip'
+	$CoatStyle = 'winter,lowerclass'
+	CoatHood = 1
+	CoatLength = 3
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A high shine faux fur trim fitted puffer jacket.'
 	
 elseif ARGS[1] = 2:
+	$CoatFast = 'zip'
+	$CoatStyle = 'lowerclass'
+	CoatFlat = -1
+	CoatLength = 3
 	CoatQuality = 2
     CoatWarm = 1
 	$coat_description = 'Low: An oversized teddy faux fur bomber jacket.'
 	
 elseif ARGS[1] = 3:
+	$CoatFast = 'belt,zip'
+	$CoatStyle = 'rain,winter,lowerclass'
+	CoatHood = 1
+	CoatLength = 4
 	CoatQuality = 2
     CoatWarm = 1
 	$coat_description = 'Low: A faux fur trim parka jacket.'
 	
 elseif ARGS[1] = 4:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'lowerclass,oldfashioned,winter'
+	CoatFlat = -1
+	CoatLength = 5
 	CoatQuality = 3
     CoatWarm = 1
 	$coat_description = 'Low: A plus blurred check longline shacket.'
 	
 elseif ARGS[1] = 5:
+	$CoatFast = 'zip'
+	$CoatStyle = 'girly,sport'
+	CoatFlat = -1
+	CoatLength = 3
 	CoatQuality = 1
     CoatWarm = 1
 	$coat_description = 'Low: A collarless blazer.'
 	
 elseif ARGS[1] = 6:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'oldfashioned,business,manly'
+	CoatFlat = -1
+	CoatLength = 4
 	CoatQuality = 2
     CoatWarm = 1
 	$coat_description = 'Low: A plus hounds tooth check frayed hem blazer.'
 	
 elseif ARGS[1] = 7:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'girly,glamour,classy'
+	CoatLength = 3
 	CoatQuality = 1
     CoatWarm = 1
 	$coat_description = 'Low: A tailored tie sleeve pocket blazer.'
 	
 elseif ARGS[1] = 8:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'classy,glamour'
+	CoatLength = 6
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A stitch detail oversized wool look coat.'
 	
 elseif ARGS[1] = 9:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'rain,classy,winter'
+	CoatLength = 5
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A belted wool look trench coat.'
 	
 elseif ARGS[1] = 10:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'rain,classy'
+	CoatLength = 5
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A tailored wool look coat.'
 	
 elseif ARGS[1] = 11:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'classy,glamour'
+	CoatLength = 6
 	CoatQuality = 3
     CoatWarm = 2
 	$coat_description = 'Moderate: A wool look belted cuff detail trench coat.'
 	
 elseif ARGS[1] = 12:
+	$CoatFast = 'zip'
+	$CoatStyle = 'crass,lowerclass,sport'
+	CoatLength = 3
 	CoatQuality = 2
     CoatWarm = 1
 	$coat_description = 'Low: A La embroidered varsity jacket.'
 	
 elseif ARGS[1] = 13:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'manly,rain'
+	CoatFlat = -1
+	CoatLength = 4
 	CoatQuality = 2
     CoatWarm = 1
 	$coat_description = 'Low: A plus pu oversized boyfriend shacket.'
 	
 elseif ARGS[1] = 14:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'classy,glamour,escort,business'
+	CoatFlat = 1
+	CoatLength = 4
 	CoatQuality = 3
     CoatWarm = 1
 	$coat_description = 'Low: A boyfriend belted utility blazer.'
 	
 elseif ARGS[1] = 15:
+	$CoatFast = 'zip'
+	$CoatStyle = 'winter,girly'
+	CoatLength = 4
 	CoatQuality = 2
     CoatWarm = 3
 	$coat_description = 'Great: A hooded faux fur coat.'
 	
 elseif ARGS[1] = 16:
+	$CoatFast = 'zip'
+	$CoatStyle = 'girly,lowerclass,crass,slut'
+	CoatFlat = 1
+	CoatLength = 2
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A petite teddy faux fur oversized bomber jacket.'
 	
 elseif ARGS[1] = 17:
+	$CoatFast = 'buttons,zip'
+	$CoatStyle = 'lowerclass,winter'
+	CoatFlat = -1
+	CoatLength = 3
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A funnel neck puffer jacket.'
 	
 elseif ARGS[1] = 18:
+	$CoatFast = 'zip'
+	$CoatStyle = 'winter,classy,sport'
+	CoatHood = 1
+	CoatLength = 4
 	CoatQuality = 2
     CoatWarm = 2
 	$coat_description = 'Moderate: A faux fur hooded panelled Parka jacket.'
 	
 elseif ARGS[1] = 19:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'glamour,slut,crass'
+	CoatLength = 5
 	CoatQuality = 3
     CoatWarm = 3
 	$coat_description = 'Great: A tall faux fur coat.'
 	
 elseif ARGS[1] = 20:
+	$CoatFast = 'zip'
+	$CoatStyle = 'crass,bimbo,business'
+	CoatLength = 3
 	CoatQuality = 2
     CoatWarm = 1
 	$coat_description = 'Low: A plus lapel detail ruched sleeve blazer.'

locations/_attributes_moncheri_coats.qsrc

@@ -2,101 +2,169 @@
 !Price ranges from 5 to 7, please avoid adding too many 7s.
 
 if ARGS[1] = 1:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'classy,glamour'
+	CoatFlat = 1
+	CoatLength = 6
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A waterproof cotton Gabardine trench coat from RED VALENTINO.'
 	
 elseif ARGS[1] = 2:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'trendy'
+	CoatNoFlash = 1
+	CoatLength = 3
 	CoatQuality = 7
     CoatWarm = 2
 	$coat_description = 'Moderate: A logo felted wool jacquard cape from GUCCI.'
 	
 elseif ARGS[1] = 3:
+	$CoatFast = 'belt'
+	$CoatStyle = 'classy,glamour'
+	CoatFlat = 1
+	CoatLength = 5
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A messi belted virgin wool wrap coat from MAX MARA.'
 	
 elseif ARGS[1] = 4:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'classy,oldfashioned'
+	CoatLength = 5
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A check wool tweed coat from GUCCI.'
 	
 elseif ARGS[1] = 5:
+	$CoatFast = 'belt,zip'
+	$CoatStyle = 'rain'
+	CoatLength = 6
 	CoatQuality = 6
     CoatWarm = 3
 	$coat_description = 'Great: A techno waterproof coat with hood from MAX MARA.'
 	
 elseif ARGS[1] = 6:
+	$CoatFast = 'belt,buttons,zip'
+	$CoatStyle = 'goth,dom,classy'
+	CoatLength = 6
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A Pirello leather trench coat from REMAIN.'
 	
 elseif ARGS[1] = 7:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'classy,business'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 3
 	$coat_description = 'Great: A wool crepe double breast long coat from DOLCE & GABBANA.'
 	
 elseif ARGS[1] = 8:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'classy,glamour'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 3
 	$coat_description = 'Great: A Pirella leather trench coat from REMAIN.'
 	
 elseif ARGS[1] = 9:
+	$CoatFast = 'belt'
+	$CoatStyle = 'classy,dom,glamour,escort'
+	CoatLength = 6
 	CoatQuality = 5
     CoatWarm = 2
 	$coat_description = 'Moderate: A reversible faux leather and sequins coat from ANOUKI.'
 	
 elseif ARGS[1] = 10:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'crass,bimbo,glamour'
+	CoatFlat = -1
+	CoatLength = 5
 	CoatQuality = 7
     CoatWarm = 3
 	$coat_description = 'Great: A hooded alpaca and silk teddy coat from MAX MARA.'
 	
 elseif ARGS[1] = 11:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'classy,glamour,escort,rain'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 3
 	$coat_description = 'Great: A wool coat with leather harness from JUNYA WATANABE.'
 	
 elseif ARGS[1] = 12:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'oldfashioned'
+	CoatFlat = -1
+	CoatLength = 5
 	CoatQuality = 7
     CoatWarm = 2
 	$coat_description = 'Moderate: A wool check cape with leather details from BURBERRY.'
 	
 elseif ARGS[1] = 13:
+	$CoatFast = 'belt'
+	$CoatStyle = 'glamour,classy,escort'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 2
 	$coat_description = 'Moderate: A wrap velvet long dust coat with belt from ANN DEMEULEMEESTER.'
 	
 elseif ARGS[1] = 14:
+	$CoatFast = 'belt'
+	$CoatStyle = 'bimbo,slut,business,rain'
+	CoatLength = 6
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A patent leather trench coat with belt from BOTTEGA VENETA.'
 	
 elseif ARGS[1] = 15:
+	$CoatFast = 'belt'
+	$CoatStyle = 'classy,glamour'
+	CoatFlat = 1
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 2
 	$coat_description = 'Moderate: A chevron wool belted coat from SPORTMAX.'
 	
 elseif ARGS[1] = 16:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'classy,rain'
+	CoatFlat = 1
+	CoatLength = 6
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A pleated Gabardine Trench Coat from RED VALENTINO.'
 	
 elseif ARGS[1] = 17:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'classy,rain'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 1
 	$coat_description = 'Low: A cotton blend long coat from GUCCI.'
 	
 elseif ARGS[1] = 18:
+	$CoatFast = 'zip'
+	$CoatStyle = 'rain'
+	CoatFlat = -1
+	CoatLength = 5
 	CoatQuality = 6
     CoatWarm = 2
 	$coat_description = 'Moderate: A waterproof cotton blend zip coat with hood from MAX MARA.'
 	
 elseif ARGS[1] = 19:
+	$CoatFast = 'belt,buttons'
+	$CoatStyle = 'glamour,escort,glamour'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 3
 	$coat_description = 'Great: A leather coat with fox fur from SAKS POTTS.'
 	
 elseif ARGS[1] = 20:
+	$CoatFast = 'buttons'
+	$CoatStyle = 'crass,glamour,slut'
+	CoatLength = 6
 	CoatQuality = 7
     CoatWarm = 2
 	$coat_description = 'Moderate: A printed compact wool long coat from PACO RABANNE.'

locations/city_musicstore.qsrc

@@ -115,13 +115,13 @@ if $ARGS[0] = 'firstvisit':
 				act 'You have to think about it':
 					ml_didntbuyguitarthefirstvisit = 1
 					'You hesitate for a moment, unsure whether to buy it or not and finally decide to not do it, at least not now. "I will have to talk to my mum first" you say to Jimmy. '
-					'He just nods "Don''t worry <<$pcs_firstname>>. You know what, I will put it aside for you for a bit in case you change your mind". He scribbles something on a post-it note, and sticks it on the guitar "I will try to keep the price the same, 3,400 rubels."'
+					'He just nods "Don''t worry <<$pcs_firstname>>. You know what, I will put it aside for you for a bit in case you change your mind". He scribbles something on a post-it note, and sticks it on the guitar "I will try to keep the price the same, 3,400 <b>₽</b>."'
 					act 'Leave': gt 'torgcentr'
 				end
 			else
 				ml_didntbuyguitarthefirstvisit = 1
 				'While the guitar is not the best sounding one it''s comfortable. Unfortunately while it''s cheaper than the rest, it still costs more than you have. With a sigh you hand it back to Jimmy "I''m sorry, but, I can''t buy it now."'
-				'He just nods "Don''t worry, I tell you what, I will put it aside for you if you change your mind." He scribbles something on a post-it note, and sticks it on the guitar "I will try to keep the price the same, 3,400 rubels."'
+				'He just nods "Don''t worry, I tell you what, I will put it aside for you if you change your mind." He scribbles something on a post-it note, and sticks it on the guitar "I will try to keep the price the same, 3,400 <b>₽</b>."'
 				act 'Leave': gt 'torgcentr'
 			end				
 		end

locations/city_pharmacy.qsrc

@@ -64,6 +64,7 @@ if $ARGS[0] = 'buy_antifungal':
 		act 'Return': gt 'city_pharmacy', 'shop'
 	elseif Kandidoz < 30 and KandidozOnce > 0:
 		msg '<center>You don''t need medication right now. Your yeast infection is currently in remission and taking vitamins will ensure that it stays that way.</center>'
+		gt 'city_pharmacy', 'shop'
 	else
 		msg '<center>You don''t need any antifungal medication right now.</center>'
 		*nl

locations/music_guitarlesson.qsrc

@@ -15,7 +15,7 @@ if $ARGS[0] = 'enquiry':
 	*nl
 	'You shift on your feet "I''m <<$pcs_firstname>>, and yes, I think. Can you please tell me a bit more?"'
 	' "Sure. I assume you are a beginner..." he looks at you, and you nod "Then obviously we would start at the basics. The instrument, chords, some basic theory. We would meet once a week, here. 
-	If you have a guitar, that''s great, if not, you can use mine. But you will really need to get a guitar to practice at home. The lessons cost 500 rubels, but if you are under 18' +iif(vidage < 18, ', which I assume you are,', '')+ ' then it''s only 300 rubels."'
+	If you have a guitar, that''s great, if not, you can use mine. But you will really need to get a guitar to practice at home. The lessons cost 500 <b>₽</b>, but if you are under 18' +iif(vidage < 18, ', which I assume you are,', '')+ ' then it''s only 300 <b>₽</b>."'
 	*nl
 	'He looks at you "So, <<$pcs_firstname>>, do you think you would be interested in taking lessons?"'	
 	npc_rel['ML1'] = 45

locations/music_onlinemusic.qsrc

@@ -23,11 +23,11 @@ if $ARGS[0] = 'live_stream':
 		if mc_inventory['tech_computer'] = 1 and mc_inventory['tech_webcam'] = 1 and $location_type = 'private':
 			'<center><img <<$set_imgh>> src="images/pc/activities/music/gomixer_hero.jpg"/></center>'
 			'You set up your webcamera and start the streaming app on your computer. After settling down comfortably, you start to stream.'			
-			'Your fans tipped you <<ml_superchats>> rubels for your performance.'
+			'Your fans tipped you <<ml_superchats>> <b>₽</b> for your performance.'
 		else		
 			'<center><img <<$set_imgh>> src="images/pc/activities/music/gomixer_hero.jpg"/></center>'
 			'You set up your phone on a little tri-pod and log into your account. After settling down comfortably, you start to stream.'			
-			'Your fans tipped you <<ml_superchats>> rubels for your performance.'
+			'Your fans tipped you <<ml_superchats>> <b>₽</b> for your performance.'
 		end	
 	else
 		!! How many minutes did the stream last.
@@ -38,10 +38,10 @@ if $ARGS[0] = 'live_stream':
 	
 	if bankAccount = 0:			
 		*nl
-		'You have earned <b><<ml_streaming[''unclaimed_earnings'']>></b> rubels so far, but you need to open a bank account before you can receive the money.'
+		'You have earned <b><<ml_streaming[''unclaimed_earnings'']>></b> <b>₽</b> so far, but you need to open a bank account before you can receive the money.'
 	else		
 		*nl
-		'You have <b><<ml_streaming[''unclaimed_earnings'']>></b> rubels on your account.'
+		'You have <b><<ml_streaming[''unclaimed_earnings'']>></b> <b>₽</b> on your account.'
 
 		act 'Stop the stream and transfer the money to your bank account':				
 			karta += ml_streaming['unclaimed_earnings']

locations/pav_disco_sex.qsrc

@@ -2262,7 +2262,7 @@ if $ARGS[0] = 'drugs':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/snort1.jpg"></center>'
 	'He''s planted a tiny nagging seed in your thoughts, and now you''re too curious to refuse. You give him a nod and walk closer.'
-	'He cuts up a line and tells you to close one of your nostrils with a finger while you snort it in with the other, using a rolled-up Rubel.'
+	'He cuts up a line and tells you to close one of your nostrils with a finger while you snort it in with the other, using a rolled-up Ruble.'
 	'You hunch over the powder, line yourself and snort it. The tingling and dry itching sensation is almost too much, and you suddenly feel like your nostril is on fire.'
 	'You don''t really feel anything different for a while. "I think you got scammed with this stuff. I don''t feel a thing... " you complain, slightly disappointed. Then, suddenly, you feel your heartbeat speeding up, your nipples getting hard, and your pussy getting wet. In fact, it feels like your pussy is soaked more than ever, and you''re feeling extremely horny. You desperately want, no... you need to fuck something as soon as you can.'
 	'<<$npc_firstname[$npclastsaved]>> looks at you and smirks as he notices the powder kicking in. "Feels great, right? Ready for some real fun?"'

locations/prostitution_functions.qsrc

@@ -494,18 +494,22 @@ end
 !!---------- Chaging outfits in public locations ------------------------------------------------------------------------
 !!------ Changing clothes --------------------------
 if $ARGS[0] = 'change_to_work':
-	cla
-	*clr
+	cla & *clr
 	minut += 10
 	if $ARGS[1] = 'car':
 		!! TODO: Video / image and some text describing the cloth change in the car
-		''+iif($loc_desc = $loc_desc, 'You quickly change into your working outfit in your car.', $loc_desc)
+		''+iif($loc_desc = '', 'You quickly change into your working outfit in your car.', $loc_desc)
 	end
 
 	if $ARGS[1] = 'restroom':
 		!! TODO: Video / image and some text describing the cloth change in the men''s restroom
 		!! Is there a way to know if it''s a men''s or women''s restroom?
-		''+iif($loc_desc = $loc_desc,  'You slip into a stall and quickly change into your working outfit, trying to avoid your clothes touching the floor or, really, anything before you place them safely in your bag.', $loc_desc)
+		''+iif($loc_desc = '',  'You slip into a stall and quickly change into your working outfit, trying to avoid your clothes touching the floor or, really, anything before you place them safely in your bag.', $loc_desc)
+	end
+
+	if $ARGS[1] = 'road_side':
+		!! TODO: Video / image and some text describing the cloth change next to a road
+		''+iif($loc_desc = '', 'You quickly change into your working outfit behind some bushes by the road.', $loc_desc)
 	end
 
 	gs 'prostitution_functions', 'change_into_prostitute_outfit', 'work'
@@ -513,23 +517,29 @@ if $ARGS[0] = 'change_to_work':
 end
 
 if $ARGS[0] = 'change_back':
-	cla
-	*clr
+	cla & *clr
 	minut += 10
 	if $ARGS[1] = 'car':
 		!! TODO: Video / image and some text describing the cloth change in the car
-		'You quickly change into your working outfit in your car.'
+		'You quickly change into your working everyday clothes in your car.'
 	end
 
 	if $ARGS[1] = 'restroom':
 		!! TODO: Video / image and some text describing the cloth change in the men''s restroom
-		'You quickly change into your working in the men''s restroom..'
+		'You quickly change into your everyday clothes in the men''s restroom..'
 	end
 
 	if $loc_arg = 'restroom_women':
 		!! TODO: Video / image and some text describing the cloth change in the women''s restroom
-		'You quickly change into your working outfit in the women''s restroom.'
+		'You quickly change into your everyday clothes in the women''s restroom.'
+	end
+
+	if $ARGS[1] = 'road_side':
+		!! TODO: Video / image and some text describing the cloth change next to a road
+		'You quickly change into your everyday clothes behind some bushes by the road.'
 	end
+
+
 	gs 'prostitution_functions', 'change_into_regular_clothes'
 	act 'Finish': gt $loc, $loc_arg
 end

locations/qwBarEncounters.qsrc

@@ -180,7 +180,7 @@ if $ARGS[0] = '':
 				'"Well, it''s not really worth much when you ''almost'' win the lottery or ''almost'' had an orgasm," you say with a grin.'
 				'"True," he laughs. "How about you give me a chance to restore my honor? A rematch? And now that we know what we''re up against, we could make it more interesting by playing for money."'
 				'"How much were you thinking?", you ask.'
-				'"I don''t know... 2,500 rubels?"'
+				'"I don''t know... 2,500 <b>₽</b>?"'
 
 				act 'Decline':
 					cla

locations/road.qsrc

@@ -152,27 +152,43 @@ if $ARGS[0] = '':
 		'A <a href="exec:minut += 5 & gt ''furi''">lorry</a> is parked next to the road. The driver is currently taking a break and is having a cigarette. He could probably bring you to Pavlovsk or St. Petersburg, for a price...'
 		if npc_QW['A60'] > 15: 'Mira <a href="exec:gt ''gadprostitutes'', ''start''">prostitutes</a> herself around here.'
 		if hour >= 16 and hour <= 23 and prostitute['gadukino'] = 1:
-				if car > 0 and cardrive = 22 and ncarroad = nroad:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
-				if PCloStyle = 4: 
-					act 'You can work as a prostitute here': gt 'gadprostitutes', 'start'
-					if car > 0 and cardrive = 22 and ncarroad = nroad and prostitute['changed_for_work']: 
-						act 'You can change into your regular clothes in your car': gt 'prostitution_functions', 'change_back', 'car'
-					end
-				elseif car > 0 and cardrive = 22 and ncarroad = nroad AND prostitute['outfit_is_set']:
-					$loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'
-					gs 'prostitution_functions', 'change_to_work', 'car'
-					killvar '$loc_desc' 
+			if car > 0 and cardrive = 22 and ncarroad = nroad:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
+			
+			gs 'prostitution_functions', 'work_clothes'
+			if prostitute['work_clothes']: 
+				act 'You can work as a prostitute here': gt 'gadprostitutes', 'start'
+				if car > 0 and cardrive = 22 and ncarroad = nroad and prostitute['changed_for_work']: 
+					act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'car'
+				elseif prostitute['changed_for_work']:
+					act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'road_side'
+				end
+			end
+			if  prostitute['work_clothes'] = 0 and prostitute['outfit_is_set']: 
+				if car > 0 and cardrive = 22 and ncarroad = nroad: 
+					act 'Change to work as a prostitute': gt 'prostitution_functions', 'change_to_work', 'car'
+				else
+					act 'Change to work as a prostitute': gt 'prostitution_functions', 'change_to_work', 'road_side'
 				end
+			end
 		elseif prostitute['road'] = 1 and ((prostitute['wl_block'] = 0 and prostitute['full_block'] = 0) or (prostitute['wl_block'] = 1 and prostitute['payment_method'] = 1)):
 			if car > 0 and cardrive = 22 and ncarroad = nroad:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> in a quieter spot on the side road to Gadukin.'
+			
 			gs 'prostitution_functions', 'work_clothes'
 			if  prostitute['work_clothes'] = 0 and prostitute['outfit_is_set']: 
+				if car > 0 and cardrive = 22 and ncarroad = nroad: 
 					$loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'
-					gs 'prostitution_functions', 'change_to_work', 'car'
-					killvar '$loc_desc' 
+					act 'Change to work as a prostitute': gt 'prostitution_functions', 'change_to_work', 'car'
+				else
+					$loc_desc = 'You change into some more appropriate clothing behind the bushes, then walk down the road a little to catch the attention of passing cars.'
+					act 'Change to work as a prostitute': gt 'prostitution_functions', 'change_to_work', 'road_side'
+				end
 			elseif prostitute['work_clothes']:
-				act 'Start to work': gt 'road_prostitution', 'work'
-				if prostitute['changed_for_work']: act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'car'
+				act 'Work as a prostitute': gt 'road_prostitution', 'work'
+				if car > 0 and cardrive = 22 and ncarroad = nroad and prostitute['changed_for_work']: 
+					act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'car'
+				elseif prostitute['changed_for_work']:
+					act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'road_side'
+				end
 			end
 		else
 			if car > 0 and cardrive = 22 and ncarroad = nroad and nroad ! 10:'You parked <a href="exec:gs ''carF'', ''start''">your <<$car>></a> next to the road.'
@@ -220,12 +236,20 @@ if $ARGS[0] = '':
 	if prostitute['road'] = 1 and nroad ! 10 and nroad ! 20 and ((prostitute['wl_block'] = 0 and prostitute['full_block'] = 0) or (prostitute['wl_block'] = 1 and prostitute['payment_method'] = 1)):
 		gs 'prostitution_functions', 'work_clothes'
 		if  prostitute['work_clothes'] = 0 and prostitute['outfit_is_set']: 
-			$loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'
-			gs 'prostitution_functions', 'change_into_prostitute_outfit', 'work'
-			killvar '$loc_desc' 
+			if car > 0 and cardrive = 22 and ncarroad = nroad: 
+				$loc_desc = 'You change into some more appropriate clothing in your car, then walk down the road a little to catch the attention of passing cars.'
+				act 'Change to work as a prostitute': gt 'prostitution_functions', 'change_to_work', 'car'
+			else
+				$loc_desc = 'You change into some more appropriate clothing behind the bushes, then walk down the road a little to catch the attention of passing cars.'
+				act 'Change to work as a prostitute': gt 'prostitution_functions', 'change_to_work', 'road_side'
+			end
 		elseif prostitute['work_clothes']:
-			act 'Start to work': gt 'road_prostitution', 'work'
-			if prostitute['changed_for_work']: act 'Change into your regular clothes': gt 'road', 'change_back'
+			act 'Work as a prostitute': gt 'road_prostitution', 'work'
+			if car > 0 and cardrive = 22 and ncarroad = nroad and prostitute['changed_for_work']: 
+				act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'car'
+			elseif prostitute['changed_for_work']:
+				act 'Change into your regular clothes': gt 'prostitution_functions', 'change_back', 'road_side'
+			end
 		end
 	end
 end

locations/sleep_simple.qsrc

@@ -33,7 +33,7 @@ if $ARGS[0] = 'simple':
 		sleepVars['stime'] += 1
 		sleepVars['time_now'] += 1
 		sleepVars['minutes_to_wakeup'] -= 1
-		sleepVars['time_to_full']
+		sleepVars['time_to_full'] -= 1
 
 		if recuperation = 0: pcs_health += 5
 

locations/therapist_hotel.qsrc

@@ -165,7 +165,7 @@ if $ARGS[0] = 'event2':
 	minut += 2
 	gs 'stat'
 
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/therapist/arrive2.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/therapist/hotel_arrive2.jpg"></center>'
 	'Once more, it''s Saturday night, and you find yourself entering a hotel room that you have a key to, with the goal of locating the person staying here so that you can return the key to them. However, you find yourself looking directly at him, someone you know, naked and hard while looking you over. Before you can do anything, your mind goes blank and you are in the black room of your hypnotized state, leaving you at his mercy.'
 	'"My wife, you''ve returned to me. Come, remove your clothes and sit next to me and we''ll talk" he says to you, and as if your legs move on their own, you remove your clothes before sitting down beside him.'
 
@@ -252,7 +252,7 @@ if $ARGS[0] = 'event2_shower':
 				*clr & cla
 				therapistQW['hotel_visits'] = 2
 				gs 'sleep_simple', 'simple'
-				if hour < 7: 
+				if hour < 7:
 					hour = 7
 					gs 'stat'
 					pcs_sleep = max(pcs_sleep, 100)
@@ -265,7 +265,7 @@ if $ARGS[0] = 'event2_shower':
 				gs 'bras', 'wear', $lastwornbratype['therapist'], lastwornbranumber['therapist']
 				gs 'stat'
 
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/therapist/creampy2.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/therapist/hotel_creampy2.jpg"></center>'
 				'You wake up the next morning feeling like a million dollars. You sit up and feel something squirt out of your pussy. You were filled up by whomever you slept. Your subconscious mind makes your body want to keep it inside you. You get up, shower, dress and head back to town.'
 				act 'Continue': gt 'pav_market'
 			end
@@ -403,7 +403,7 @@ if $ARGS[0] = 'event4':
 		minut += 2
 		gs 'stat'
 
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/therapist/arrive4.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/therapist/hotel_arrive4.jpg"></center>'
 		'"Ah, my wife, how are you today." He says while getting up and walking over to kiss you on the lips. You return the kiss as if it was natural. "There is something I want you to do for me today" he says and snaps his fingers. "You will stay in here naked and ready for me. I''m leaving to go get us something to eat." He whispers and snaps his fingers again and you wake up. "I''ll be back in a few minutes," he explains and pulls your towel off as he leaves the room, leaving you naked and alone.'
 
 		act 'Submit':