Browse Source

Initial split of gdktoilet into gdktoilet_mens and gdktoilet_womens. I may merge them back together when everything's done but I have to do this for my sanity

richard_butte 4 years ago
parent
commit
6a7f87d11e
4 changed files with 1300 additions and 1252 deletions
  1. 2 0
      glife.qproj
  2. 35 1252
      locations/gdktoilet.qsrc
  3. 619 0
      locations/gdktoilet_mens.qsrc
  4. 644 0
      locations/gdktoilet_womens.qsrc

+ 2 - 0
glife.qproj

@@ -671,6 +671,8 @@
 		<Location name="gdkin"/>
 		<Location name="gdksport"/>
 		<Location name="gdktoilet"/>
+		<Location name="gdktoilet_mens"/>
+		<Location name="gdktoilet_womens"/>
 		<Location name="gdksex"/>
 		<Location name="BMloc"/>
 		<Location name="ugel"/>

+ 35 - 1252
locations/gdktoilet.qsrc

@@ -1,36 +1,39 @@
 # gdktoilet
 
+$location_type = 'public_indoors'
+$menu_loc = 'gdktoilet'
+$loc = 'gdktoilet'
+gs 'themes', 'indoors'
+
 if $ARGS[0] = 'start':
-	$location_type = 'indoors'
-	$metka = 'start'
-	$loc = 'gdktoilet'
-	$menu_loc = 'gdktoilet'
 	$menu_arg = 'start'
+	$metka = 'start'
 	menu_off = 0
-	*clr & cla
 	gs 'stat'
+	*clr & cla
+	minut += 1
 	ghnow = 0
-	gs 'themes', 'indoors'
-	'<center><b><font color="maroon">Bathroom Entrance</font></b></center>'
+
+	'<center><b><font color="maroon">Community Center - Restrooms</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/bathroom_entrance.jpg"></center>'
 
-	if cheatNoDrink = 0: 'There are two drinking fountains near the entrance of the bathrooms, you could '+iif(pcs_hydra < 70, '<a href="exec: minut += 1 & pcs_hydra = 100 & gt ''gdktoilet'', ''start''">quench your thirst</a>', 'quench your thirst')+' if you need to.'
+	'There is a <a href="exec: gt ''gdktoilet'', ''watercooler''">drinking fountain</a> near the doors to the bathrooms.'
 	
 	act 'Go outside': gs 'arousal', 'end' & gt 'gdk'
 	
 	if hour >= 8 and hour <= 23:
 		gs 'willpower', 'exhib', 'self'
 		if will_cost <= pcs_willpwr:
-			act 'Go in the Men''s toilet (<<will_cost>> Willpower)':
+			act 'Enter the men''s restroom (<<will_cost>> Willpower)':
 				gs 'willpower', 'exhib', 'self'
 				gs 'willpower', 'pay', 'self'
 				gs 'stat'
-				gt 'gdktoilet', 'mens_entrance_events'
+				gt 'gdktoilet_mens', 'mens_entrance_events'
 			end
 		else
-			act 'Go in the Men''s toilet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			act 'Enter the men''s restroom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
-		act 'Go in the Women''s toilet': gt 'gdktoilet', 'womens'
+		act 'Enter the women''s restroom': gt 'gdktoilet_womens', 'womens'
 	end
 
 	if hour >=20 and hour <=23 and week >= 5 and week < 7:
@@ -77,1259 +80,39 @@ if $ARGS[0] = 'start':
 	if hour >= 14 and hour <= 20: act 'Go to the gym': gt 'gdksport', 'start'
 end
 
-if $ARGS[0] = 'mens_entrance_events':
-	menu_off = 1
-	temp = rand(1,100)
-!!Gloryhole1
-	if temp >= 80:
-		'<center><b><font color="maroon">Men''s Room</font></b></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
-		'It''s unusually empty, but you see someone near the urinals.'
-		act 'Look closer':
-			minut +=2
-			*clr & cla
-			gs 'stat'
-			'<center><b><font color="maroon">Men''s Room</font></b></center>'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/ghmanstand.jpg"></center>'
-			'You decide to take a closer look, to your surprise, there is a naked man standing with his face to the wall. His body is pressed up close against the wall.'
-			if pcs_vag >= 1:
-				if pcs_horny >=80:
-					act 'Leave': gt'gdktoilet', 'start'
-					gs 'willpower', 'sex', 'force'
-					if will_cost <= pcs_willpwr:
-						act 'Seduce him (<<will_cost>> Willpower)':
-							*clr & cla
-							gs 'willpower', 'sex', 'force'
-							gs 'willpower', 'pay', 'force'
-							gs 'stat'
-							if pcs_cupsize >= 20:
-								*clr & cla
-								gs 'stat'
-								'<center><b><font color="maroon">Men''s Room</font></b></center>'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/grabbig.jpg"></center>'
-								'You look over his naked body and you wonder who''s on the other side. You bite your finger in appreciation of his naked body while grabbing your <<$titsize>>. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes all your clothes off and pushes you against the wall. Kissing you passionately.'
-								gs 'arousal', 'foreplay', 1
-								gs 'stat'
-								act 'Kiss him': gt'gdktoilet', 'mensglory'
-							elseif $pantyworntype ! 'none':
-								*clr & cla
-								gs 'stat'
-								'<center><b><font color="maroon">Men''s Room</font></b></center>'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/seducesmall.jpg"></center>'
-								'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your underwear and breasts. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
-								gs 'arousal', 'foreplay', 5
-								gs 'stat'
-								act 'Kiss him': gt'gdktoilet', 'mensglory'
-							else
-								*clr & cla
-								gs 'stat'
-								'<center><b><font color="maroon">Men''s Room</font></b></center>'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/nakedsmall.jpg"></center>'
-								'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your breasts and pussy. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
-								gs 'arousal', 'foreplay', 1
-								gs 'stat'
-								act 'Kiss him': gt'gdktoilet', 'mensglory'
-							end
-						end
-					else
-						act 'Seduce him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-					end
-				elseif pcs_horny >=40:
-					gs 'willpower', 'mast', 'self'
-					if will_cost <= pcs_willpwr:
-						act 'Masturbate':
-							*clr & cla
-							gs 'willpower', 'mast', 'self'
-							gs 'willpower', 'pay', 'self'
-							gs 'stat'
-							pcs_mood += 15
-							gs 'arousal', 'masturbate', 25
-							gs 'stat'
-							'<center><b><font color="maroon">Men''s Room</font></b></center>'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/masturbate.jpg"></center>'
-							'You decide to masturbate in front of him. You rub your clit while exposing your bare ass. He smile and nods appreciating your body. You start to feel warm as you keep rubbing your clit. Your body gets tense as you approach orgasm.'
-							if hotcat >= 6:
-								*clr & cla
-								'<center><b><font color="maroon">Men''s Room</font></b></center>'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
-								'Unable to resist the man pushes you against the wall kissing you.'
-								gs 'arousal', 'kiss', 5
-								gs 'stat'
-								gs 'willpower', 'sex', 'resist'
-								if will_cost <= pcs_willpwr:
-									act 'Leave (<<will_cost>> Willpower)':
-										gs 'willpower', 'sex', 'resist'
-										gs 'willpower', 'pay', 'resist'
-										gs 'arousal', 'end'
-										gs 'stat'
-										'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
-										'Not wanting to fuck this guy, you push him off you and quickly get dressed before telling him to fuck off!'
-										gt'gdktoilet', 'start'
-									end
-								else
-									act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-								end
-								act 'Give In': gt'gdktoilet', 'mensglory'
-							elseif hotcat >= 4:
-								cla
-								*nl
-								'The man backs away from the wall and says, "Why don''t you come over here and we can have some fun."'
-								gs 'willpower', 'sex', 'resist'
-								if will_cost <= pcs_willpwr:
-									act 'Leave (<<will_cost>> Willpower)':
-										gs 'willpower', 'sex', 'resist'
-										gs 'willpower', 'pay', 'resist'
-										gs 'arousal', 'end'
-										gs 'stat'
-										'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
-										'Not wanting to fuck this guy, you quickly get dressed before telling him to fuck off!'
-										gt'gdktoilet', 'start'
-									end
-								else
-									act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-								end
-								act 'Give In': gt'gdktoilet', 'mensglory'
-							else
-								act 'Leave': gs 'arousal', 'end' & gt'gdktoilet', 'start'
-							end
-						end
-					else
-					
-					end
-				else
-					gs 'stat'
-					'You look at his naked body and you wonder who''s on the other side. You feel a little turned on by the man''s naked body. You decide to leave.'
-					gs 'arousal', 'voyeur', 10
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave': gt'gdktoilet', 'start'
-				end
-			else
-				pcs_horny += 5
-				gs 'stat'
-				'You look at his naked body and you''re not sure what''s going on. You decide to leave before things get too awkward.'
-				act 'Leave': gt'gdktoilet', 'start'
-			end
-		end
-	elseif temp >= 50 and temp <=79 and soniaPS >= 1 and hour >= 20 and hour <=23:
-		pcs_horny += 5
-		minut += 5
-		*clr & cla
-		gs 'stat'
-		'<center><b><font color="maroon">Men''s Room</font></b></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/gangbangbath.jpg"></center>'
-		'You look inside the men''s restroom and see Sonia getting pounded by a bunch of guys. You can tell she is enjoying every second of it as she gets fucked in both holes.'
-		if pcs_vag > 0:
-			gs 'stat'
-			'You feel excited as you watch Sonia. You decide to leave before you are noticed.'
-			gs 'arousal', 'voyeur_sex', 5
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave': gt'gdktoilet', 'start'
-		else
-			'You decide to leave before you are noticed.'
-			act 'Leave': gt'gdktoilet', 'start'
-		end
-	elseif temp >= 40 and temp <= 45 and hour >= 20 and hour <=23:
-		*clr & cla
-		pcs_horny += 10
-		minut += 5
-		gs 'stat'
-		'<center><b><font color="maroon">Men''s Room</font></b></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
-		'You look inside the men''s restroom and hear a couple having sex in one of the stalls. You wonder who''s inside and then decide to leave. While you turn away you hear them stop and the stall slams open moments later hearing giggling from some women. While you''re outside you see Ivan and Vicky leave the men''s restroom and walk out into the crowd.'
-		gs 'arousal', 'voyeur_sex', 10
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Leave': gt'gdktoilet', 'start'
-	elseif temp >= 30 and temp <= 39 and hour >= 20 and hour <=23:
-		*clr & cla
-		gs 'stat'
-		'<center><b><font color="maroon">Men''s Room</font></b></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/gangbangbath.jpg"></center>'
-		'You look inside the men''s restroom and see Vitek, Dan, Vasily, and one other you don''t recongnize and someone else under some woman getting pounded.'
-		if pcs_vag > 0 and pcs_ass > 0:
-			pcs_horny += 30
-			'Your pussy starts to itch. You wish you were that woman in between all those horny men taking it in all your holes. The feeling of excitement is enough to make you want to masturbate in the hallway but you decide to leave before your feelings become too much.'
-		end
-		gs 'arousal', 'voyeur_sex', 5
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Leave': gt'gdktoilet', 'start'
-	elseif temp >= 20 and temp <= 29 and hour >= 20 and hour <=23:
-		*clr & cla
-		minut += 5
-		gs 'stat'
-		'<center><b><font color="maroon">Men''s Room</font></b></center>'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
-		'You look inside the men''s restroom and see Dimka grabbing some chick by the hair and forcing her down onto his 16cm penis.'
-			
-		if DimaRudeQW = 0:
-			gs 'willpower', 'bj', 'self'
-			if will_cost <= pcs_willpwr:
-				act 'Interrupt (<<will_cost>> Willpower)':
-					*clr & cla
-					minut += 5
-					pcs_horny += 10
-					gs 'willpower', 'bj', 'self'
-					gs 'willpower', 'pay', 'self'
-					gs 'stat'
-					'<center><b><font color="maroon">Men''s Room</font></b></center>'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
-					'You decide to interrupt them and get in on the action. Dimka looks at you smiling and says "What the fuck are you interrupting me, get the fuck out." That''s when Dimka slaps you across the face. Your face now all red you quickly leave the restroom and leave.'
-					act 'Leave': gt'gdktoilet', 'start'
-				end
-			else
-				act 'Interrupt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-			
-			act 'Leave': gt'gdktoilet', 'start'
-		elseif DimaRudeQW > 0:
-			act 'Interrupt':
-				*clr & cla
-				minut += 5
-				dimkawarn = 0
-				gs 'stat'
-				'<center><b><font color="maroon">Men''s Room</font></b></center>'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
-				'Wanting some attention from your boyfriend you decide to interrupt them. Dimka sees you and says, "Look what we have here, one more of my bitches to join us." He turns to the girl on the ground and says to her "Get on the ground and lay down."'
-				act 'Climb on top':
-					*clr & cla
-					gs 'stat'
-					'<center><b><font color="maroon">Men''s Room</font></b></center>'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanal.mp4"></video></center>'
-					'You take your clothes off and climb on top of her. She starts to lick your pussy while Dimka fucks your ass without any lubrication. With her licking your pussy and Dimka fucking your ass you start to orgasm.'
-					gs 'arousal', 'cuni', 10, 'lesbian', 'dom'
-					gs 'arousal', 'anal', 10, 'sub', 'rough'
-					minut -= 10
-					gs 'stat'
-					act 'Continue':
-						*clr & cla
-						pcs_mood += 15
-						if npc_sex['A1'] = 0: npc_sex['A1'] = 1 & guy += 1
-						girl += 1
-						minut += 10
-						gs 'cum_call', 'anus', 'A1', 1
-						gs 'stat'
-						'<center><b><font color="maroon">Men''s Room</font></b></center>'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanalcum.jpg"></center>'
-						'Starting to pound your ass harder, Dimka starts to grunt as he shoots his load in your ass. Pulling out his warm liquid flows out your ass spilling onto the girls face. He takes his dick and puts it in her mouth saying, "Clean the rest of this up slut and don''t forget to clean my bitch too." The girl starts to lick your ass clean. She is really good at it and you begin to have another orgasm. You finish and decide to get up and get dressed. Dimka pleased with your behaviour tells you, "You should come by my house more often, slave."'
-						$orgasm_or = 'yes'
-						cumspclnt = 15
-						gs 'cum_cleanup'
-						gs 'arousal', 'end'
-						gs 'stat'
-						act 'Leave': gt'gdktoilet', 'start'
-					end
-				end
-			end
-			
-			gs 'willpower', 'bj', 'resist', 'hard'
-			if will_cost <= pcs_willpwr:
-				act 'Leave (<<will_cost>> Willpower)':
-					gs 'willpower', 'bj', 'resist', 'hard'
-					gs 'willpower', 'pay', 'resist'
-					gs 'stat'
-					gt'gdktoilet', 'start'
-				end
-			else
-				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-		end
-	else
-		minut += 1
-		temp = rand(1,2)
-		gt 'gdktoilet', 'mens'
-	end
-end
-
-if $ARGS[0] = 'mens':
-	$metka = 'mens'
-	$loc = 'gdktoilet'
-	$metkaM = 'mens'
-	$locM = 'gdktoilet'
-	$location_type = 'bathroom'
-	$menu_loc = 'gdktoilet'
-	$menu_arg = 'mens'
-	menu_off = 0
-	*clr & cla
-	gs 'stat'
-	
-	if hour >=20 and hour <=23:
-		if music_on = 1:
-			$track_loop = 'sound/komb.mp3'
-			volume = 50
-			music_loop = 1
-			pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
-		else
-			music_loop = 0
-			close all
-			pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
-		end
-	end
-	
-	'<center><b><font color="maroon">Men''s Room</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
-	'You peek around the corner. Inside this room, stalls line the right side, with urinals on the far wall and rows of sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a> to the left. The room has a smell of disinfectant and stale piss. As you look around you notice a hole in the wall.'
-	
-	act 'Leave': gt 'gdktoilet', 'start'
-	
-	act 'Look at the hole':
-		*clr & cla
-		menu_off = 1
-		gs 'stat'
-		'<center><b><font color="maroon">Men''s Room</font></b></center>'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/menghpeek.mp4"></video></center>'
-		'You look at the hole and see a girl fingering her pussy. You feel your pussy moisten and start to itch.'
-		gs 'arousal', 'voyeur_sex', 5
-		gs 'stat'
-		act 'Move away': minut += 1 & gt'gdktoilet', 'mens'
-		if pcs_horny >= 50:
-			gs 'willpower', 'mast', 'self'
-			if will_cost <= pcs_willpwr:
-				act 'Masturbate (<<will_cost>> Willpower)':
-					cla
-					gs 'willpower', 'mast', 'self'
-					gs 'willpower', 'pay', 'self'
-					gs 'arousal', 'masturbate', 5
-					gs 'stat'
-					'You walk into one of the men''s stalls.'
-					act 'start': gt 'gdktoilet', 'mensmast'
-				end
-			else
-				act 'Masturbate (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-		end
-	end
-	
-	dynamic $tampon
-	dynamic $quickwash
-	dynamic $basin
-	dynamic $publicpan
-end
-
-if $ARGS[0] = 'mensmast':
-	*clr & cla
-	minut += 2
-	pcs_horny += 5
-	pcs_mood += 5
-	menu_off = 1
-	gs 'stat'
-	if picrand = 1:
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-	end
-	if pcs_horny <= 60:
-		'You are starting to feel warm and you insert your finger in your pussy.'
-		gs 'arousal', 'masturbate', 2
-		gs 'stat'
-	else
-		'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
-		gs 'arousal', 'masturbate', 2
-		gs 'stat'
-	end
-	if pcs_horny >= 90:
-		act 'Climax':
-			*clr & cla
-			pcs_mood += 15
-			minut += 5
-			if pcs_inhib < 30: inhib_exp += rand(1,3)
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast1.jpg"></center>'
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'As your pussy gets wet you start to rub your clit vigourously. You start to feel more intense pleasure with every second. Within a few moments a powerful orgasm takes control of your body. You can hear your moans echo through the restroom, your orgasm finally stops. Leaving you gasping and trembling as you recover.'
-			gs 'arousal', 'masturbate', 2
-			gs 'stat'
-			act 'Clean yourself':
-				*clr & cla
-				minut += 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast2.jpg"></center>'
-				'You grab some toilet paper and clean off your now wet clit. You think to yourself, "I hope nobody heard that."'
-				if rand(1,100) >= 75:
-					gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
-					npc_dick[$npclastgenerated] = rand(10,24)
-					gs 'boyStat', $npclastgenerated
-					'You look up and notice the stall door opens. Right then a man in an orange jumpsuit walks in. He tells you, "Do you know where you are?" Unable to respond after your intense orgasm the man unzips his jumpsuit and takes out his <<npc_dick[$npclastgenerated]>>cm dick and places it near your mouth.'
-					gs 'willpower', 'bj', 'resist', 'hard'
-					if will_cost <= pcs_willpwr:
-						act 'Run away (<<will_cost>> Willpower)':
-							cla
-							gs 'willpower', 'bj', 'resist', 'hard'
-							gs 'willpower', 'pay', 'resist'
-							gs 'arousal', 'end'
-							*nl
-							if $pantyworntype ! 'none' or $braworntype ! 'none':
-								gs 'underwear', 'dispose'
-								minut += 2
-								gs 'stat'
-								'You slip past the man and run out of the bathroom so quickly you leave your underwear behind.'
-								act 'Leave': gt 'gdktoilet', 'start'
-							else
-								minut += 2
-								gs 'stat'
-								'You slip past the man and run out of the bathroom.'
-								act 'Leave': gt 'gdktoilet', 'start'
-							end
-						end
-					else
-						act 'Run away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-					end
-					act 'Suck':
-						*clr & cla
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast3.jpg"></center>'
-						'You open your mouth and begin to suck his dick. You can feel your pussy getting itchy again so you start to rub it. You continue to rub your clit until the man is about to cum.'
-						gs 'arousal', 'bj', 5, 'sub', 'unknown'
-						gs 'arousal', 'masturbate', 5
-						minut -= 5
-						gs 'stat'
-						act 'Climax again':
-							*clr & cla
-							pcs_mood += 15
-							minut += 5
-							spafinloc = 11
-							facial += 1
-							gs 'cum_manage'
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast4.jpg"></center>'
-							$orgasm_or = 'custom'
-							$orgasm_txt = 'You continue to rub your clit more and more when all of a sudden you explode into another orgasm. The man tells you he''s about to cum and you stop sucking his dick. The second you stop sucking he cums around your mouth.'
-							gs 'arousal', 'masturbate', 2
-							gs 'arousal', 'end'
-							gs 'stat'
-							act 'Rest':
-								*clr & cla
-								minut += 5
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast5.jpg"></center>'
-								'The man leaves the stall, he mumbles something but you are too far gone and woozy. You stay crouched on the floor with cum all over your mouth as you try to recover.'
-								act 'Leave the stall':gt 'gdktoilet', 'mens'
-							end
-						end
-					end
-				else
-					act 'Leave Stall':gt 'gdktoilet', 'mens'
-				end
-			end
-		end
-	else
-		act 'Continue': gt 'gdktoilet', 'mensmast'
-	end
-	gs 'willpower', 'mast', 'self'
-	if will_cost <= pcs_willpwr:
-		act 'Stop (<<will_cost>> Willpower)':
-			cla
-			gs 'willpower', 'mast', 'self'
-			gs 'willpower', 'pay', 'self'
-			minut += 1
-			gs 'stat'
-			*nl
-			'You decide that you shouldn''t continue in fear of being discovered.'
-			act 'Leave Stall':gt 'gdktoilet', 'mens'
-		end
-	else
-		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end
-end
-
-if $ARGS[0] = 'mensglory':
-	menu_off = 1
-	gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
-	$npc_thdick[$npclastgenerated] = 'massive'
-	npc_dick[$npclastgenerated] = 20
-	gs 'boyStat', $npclastgenerated
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
-	act 'Submit':
-		*clr & cla
-		gs 'stat'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/2turning.mp4"></video></center>'
-		'He turns you around against the wall. He presses your face and breasts to the wall, while pulling your hips back away from the wall. Despite his aggressive behavior you rather enjoy his rough behavior.'
-		gs 'arousal', 'foreplay', 5, 'sub', 'rough'
-		gs 'stat'
-		act 'Spread your ass cheeks':
-			guy += 1
-			*clr & cla
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/3doggy.mp4"></video></center>'
-			'He licks his fingers and coats the tip of his dick with his saliva. He then takes his <<npc_dick[$npclastgenerated]>>cm dick and guides it into your wet pussy. Grabbing your hips he begins to thrust, into you hard and fast. You are so overwhelmed and turned on, that you fail to notice other men that just walked in and are now watching.'
-			gs 'arousal', 'vaginal_finger', 5, 'sub', 'rough'
-			gs 'stat'
-			act 'Turn Around':
-				*clr & cla
-				pcs_mood += 15
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/4standmiss.mp4"></video></center>'
-				'He suddenly pulls out of you and roughly turns you back around, and picks you up. You spread your legs and he lowers you back down, till you feel his <<$dick_girth>> dick slide back inside of your pussy. He carries you, fucking you the whole time, you are impressed by his strength, as he manages to not only carry you, but fuck you at the same time. He slams your back roughly but not painfully onto an open stall door and presses your body against it, then he starts fucking you in harder. It seems he is nowhere near ready to cum.'
-				$orgasm_or = 'yes'
-				gs 'arousal', 'vaginal', 5, 'sub', 'rough'
-				gs 'stat'
-				act 'Suck':
-					*clr & cla
-					gs 'stat'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/5blowjob.mp4"></video></center>'
-					'After some time, he pulls out of you and lets you down, you think he is getting a bit tired from holding you up. He leans back on the counter as you bend over and start to suck his dick. He puts his hand on your head and grabs and handful of hair, he pushes your head down while you suck his <<npc_dick[$npclastgenerated]>>cm dick. His hands hold onto your hair, keeping your from pulling away. Not that you would, you are excited and love sucking his dick.'
-					gs 'arousal', 'bj', 5, 'sub', 'rough', 'deepthroat'
-					gs 'stat'
-					if rand(1,2) = 1:
-						act 'Pull away':
-							*clr & cla
-							minut +=5
-							gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
-							gs 'arousal', 'end'
-							gs 'stat'							
-							'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,1.mp4"></video></center>'
-							'You pull away right before he cums. You start to stroke his dick and you open your mouth. His hot load fills your mouth, it tastes salty and warm.'
-							act 'Swallow':
-								*clr & cla
-								minut += 5
-								swallow += 1
-								gs 'stat'
-								'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,1.mp4"></video></center>'
-								'You decide to swallow his cum. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
-								act 'Leave': gt'gdktoilet', 'start'
-							end
-							gs 'willpower', 'swallow', 'resist'
-							if will_cost <= pcs_willpwr:
-								act 'Spit (<<will_cost>> Willpower)':
-									*clr & cla
-									gs 'willpower', 'swallow', 'resist'
-									gs 'willpower', 'pay', 'resist'
-									minut +=5						
-									gs 'stat'
-									'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
-									'You spit out his cum which. The man says, "You don''t like the taste of cum?" You don''t respond and get up to get dressed and leave.'
-									act 'Leave': gt'gdktoilet', 'start'
-								end
-							else
-								act 'Spit (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-							end
-						end
-					else
-						gs 'willpower', 'sex', 'resist'
-						if will_cost <= pcs_willpwr:
-							act 'Keep sucking (<<will_cost>> Willpower)':
-								*clr & cla
-								gs 'willpower', 'sex', 'resist'
-								gs 'willpower', 'pay', 'resist'
-								minut += 5
-								swallow += 1
-								gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
-								gs 'arousal', 'end'
-								gs 'stat'
-								if pcs_throat <= 25:
-									'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj91.mp4"></video></center>'
-									'You keep sucking taking in his entire dick. You stop when you feel his hard penis throbbing as a warm liquid fills your throat. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
-									act 'Leave': gt'gdktoilet', 'start'
-								else
-									'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj26.mp4"></video></center>'
-									'Unable to continue to fit his entire penis inside your mouth you keep sucking the tip of his dick until you feel his hard penis throbbing as a warm liquid fills the back of your mouth. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
-									act 'Leave': gt'gdktoilet', 'start'
-								end
-							end
-						else
-							act 'Keep sucking (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-						end
-						act 'Ride':
-							*clr & cla
-							'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/6cowgirl.mp4"></video></center>'
-							'He yanks your head away, as he turns and lays down on the floor, on his back. He pulls you down on top of him, you straddle him and take his dick back into your pussy and you start to ride him. With out warning you feel him thrusting hard as he groaned. You feel warmth deep inside your pussy.'
-							gs 'arousal', 'vaginal', 5, 'sub', 'rough'
-							gs 'arousal', 'end'
-							gs 'stat'
-							if prezik > 0:
-								if sexcontra = 4:
-									act 'Get up':
-										*clr & cla
-										gs 'fame', 'pav', 'sex', 5
-										gs 'cum_call', 'vaginal', 'guy from the men''s bathroom'
-										gs 'stat'
-										'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/misscream.mp4"></video></center>'
-										'You pull off him, getting up and looking down at him. That is when you noticed your pussy dripping cum all over his penis. The man unable to move breathing heavily. The man replies, "I thought it felt better then it should''ve been." '
-										gs 'cuminsidereact'
-										'He continues to breath heavily and says, "You were great though, perhaps we''ll meet again." He gets up and gets dressed, that is when you finally notice the other men watching. You quickly get dressed and feel embarrassed you didn''t notice them before, leaving while your blushing.'
-										act 'Leave': gt'gdktoilet', 'start'
-									end
-								else
-									act 'Get up':
-										*clr & cla
-										gs 'fame', 'pav', 'sex', 5
-										gs 'stat'
-										'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
-										'You pull off him, getting up and looking down at him. The man unable to move breathing heavily. He continues to breath heavily and says, "You were great, perhaps we''ll meet again." He gets up and gets dressed, that is when you finally notice the other men watching. You quickly get dressed and feel embarrassed you didn''t notice them before, leaving while your blushing.'
-										act 'Leave': gt'gdktoilet', 'start'
-									end
-								end
-							else
-								if sexcontra = 2:
-									act 'Complain':
-										*clr & cla
-										gs 'fame', 'pav', 'sex', 5
-										gs 'cum_call', 'vaginal', 'guy from the men''s bathroom'
-										gs 'stat'
-										'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/misscream.mp4"></video></center>'
-										'You pull off him, getting up and looking down at him and say, "Why didn''t you tell me you were going to cum?" The man replies, "Sorry I was trying to hold back and thought I could, didn''t you say you were on the pill?" You reply, "Yeah, but still you could''ve told me. Now I will have to clean up." He continues to breath heavily and says, "Was it really that bad?" He smirks at you, "You were great, perhaps we''ll meet again and next time use no condoms again." He gets up and gets dressed, that is when you finally notice the other men watching. You stop trying to clean yourself and quickly get dressed. You feel embarrassed you didn''t notice them before, leaving while you''re blushing.'
-										act 'Leave': gt'gdktoilet', 'start'
-									end
-								else
-									act 'Complain':
-										*clr & cla
-										gs 'fame', 'pav', 'sex', 5
-										gs 'cum_call', 'vaginal', 'guy from the men''s bathroom'
-										'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/misscream.mp4"></video></center>'
-										'You pull off him, getting up and looking down at him and say, "Why didn''t you tell me you were going to cum?" The man replies, "Sorry I was trying to hold back and thought I could, didn''t you say you were on the pill?" You reply, "No. What am I going to do if I get pregnent?" He continues to breath heavily and says, "Don''t worry, I''m sure you won''t get pregnant from just this one time. You were great, perhaps we''ll meet again and maybe use some protection." He gets up and gets dressed, that is when you finally notice the other men watching. You quickly get dressed and feel embarrassed you didn''t notice them before, leaving while you''re blushing.'
-										act 'Leave': gt'gdktoilet', 'start'
-									end
-								end
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'womens':
-	$metka = 'womens'
-	$loc = 'gdktoilet'
-	$metkaM = 'womens'
-	$locM = 'gdktoilet'
-	$menu_loc = 'gdktoilet'
-	$menu_arg = 'womens'
-	menu_off = 0
-	$location_type = 'bathroom'
-	*clr & cla
-	gs 'stat'
-	'<center><b><font color="maroon">Women''s Room</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/bathroom_women.jpg"></center>'
-	'You walk in to the women''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>. You notice the last stall has its door wide open.'
-
-	act 'Leave': gt'gdktoilet', 'start'
-	act 'Go to the last stall': gt'gdktoilet', 'emptystall'
-	
-	dynamic $tampon
-	dynamic $quickwash
-	dynamic $basin		
-end
-
-if $ARGS[0] = 'emptystall':
+if $ARGS[0] = 'watercooler':
 	*clr & cla
-	minut +=5
-	menu_off = 1
+	minut += 1
+	$menu_arg = 'watercooler'
+	$metka = 'watercooler'
 	gs 'stat'
-	'<center><b><font color="maroon">Empty Stall</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sitting.jpg"></center>'
-	if stat['bj'] = 0:
-		gs 'stat'
-		'You walk down to the last stall and sit down, next to the toilet is a rather large almost perfectly round hole. Puzzled, you wonder how it got there and why no one has fixed it.'
-	elseif stat['bj'] >= 1:
-		pcs_horny += 10
-		gs 'stat'
-		'You walk down to the last stall. The large almost perfectly round hole is still there. You wonder how many women have used that hole. You feel a little excited as you contemplate your next move.'
-	end
-	act 'Get Up':
-		cla
-		'You decide not to look in the hole and leave.'
-		act 'Leave': gt'gdktoilet', 'womens'
-	end
-	if pcs_horny >=40:
-		gs 'willpower', 'mast', 'self'
-		if will_cost <= pcs_willpwr:				
-			act 'Caress Yourself (<<will_cost>> Willpower)':
-				if pcs_inhib < 40:inhib_exp += rand(1,3)
-				*clr & cla
-				gs 'willpower', 'mast', 'self'
-				gs 'willpower', 'pay', 'self'
-				gs 'stat'
-				picrand = rand(1,2)
-				if picrand = 1:
-					*clr & cla
-					gs 'stat'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
-					'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
-					gs 'arousal', 'masturbate', 4
-					gs 'stat'
-					act 'Continue': gs 'gdktoilet', 'contmast'
-				else
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-					'Feeling a bit turned on, you close the door to the stall and you sit down exposing your pussy and begin to run your clit.'
-					gs 'arousal', 'masturbate', 4
-					gs 'stat'
-					act 'Continue': gs 'gdktoilet', 'contmast'
-				end
-			end
-		else
-			act 'Caress Yourself (<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 'Look at the Hole': gt 'gdktoilet', 'hole'
-end
-
-if $ARGS[0] = 'contmast':
-	*clr & cla
-	pcs_mood += 5
-	menu_off = 1
-	if picrand = 1:
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-	end
-	if pcs_horny <= 60:
-		'You are starting to feel warm and you insert your finger in your pussy.'	
-	else
-		'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
-	end
-	gs 'arousal', 'masturbate', 5
-	gs 'stat'
-	gs 'willpower', 'mast', 'self'
-	if will_cost <= pcs_willpwr:
-		act 'Stop (<<will_cost>> Willpower)':
-			cla
-			minut += 1
-			gs 'willpower', 'mast', 'self'
-			gs 'willpower', 'pay', 'self'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'You decide that you shouldn''t continue and stop yourself from finishing.'
-			act 'Leave Stall':gt 'gdktoilet', 'womens'
-		end
-	else
-		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end
-	if pcs_horny >= 90:
-		act 'Climax':
-			*clr & cla
-			pcs_mood += 15
-			if pcs_inhib < 40: inhib_exp += rand(1,3)
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/orgasm.mp4"></video></center>'
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'As your pussy gets wet you pulls you panties down and slip your fingers inside of yourself. You start finger fucking yourself, with in a few minutes a powerful orgasm rocks your body. Leaving you gasping and trembling as you recover.'
-			gs 'arousal', 'masturbate', 2
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave Stall':gt 'gdktoilet', 'womens'
-		end
-	else
-		act 'Continue': gt 'gdktoilet', 'contmast'
-	end
-end
-
-if $ARGS[0] = 'hole':
-	*clr & cla
-	menu_off = 1
-	gs 'npcgeneratec', 0, 'unknown guy', rand(18,40)
-	if npc_dick[$npclastgenerated] < 6: npc_dick[$npclastgenerated] = 6
-	gs 'boyStat', $npclastgenerated
-	minut +=5
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghlooking.jpg"></center>'
-	wait 700
-	if gloryhole = 0 or rand(1,5) = 5:
-		act 'Sign the wall':
-			*clr & cla
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstartled.mp4"></video></center>'
-			'While looking through the hole you decided to write something on the wall just above it. While you were focused on writing, you didn''t notice the dick poking through the hole until the tip of it nearly went into your mouth. Startled you jerk away from the offending penis.'
-			
-			act 'Quickly leave the stall ':
-				*clr & cla
-				minut += 2
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-				'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
-				act'Leave': gt 'gdktoilet', 'womens'
-			end
 
-			gs 'willpower', 'bj', 'self'
-			if will_cost <= pcs_willpwr:
-				act 'Suck it (<<will_cost>> Willpower)': 
-					gs 'willpower', 'bj', 'self'
-					gs 'willpower', 'pay', 'self'
-					gt 'gdktoilet', 'blowjob'
-				end
-			else
-				act 'Suck it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-			gs 'willpower', 'hj', 'self', 'easy'
-			if pcs_throat = 0 and will_cost <= pcs_willpwr:
-				act 'Touch the shaft (<<will_cost>> Willpower)':
-					gs 'willpower', 'hj', 'self'
-					gs 'willpower', 'pay', 'self'
-					gt 'gdktoilet', 'virgin'
-				end
-			elseif pcs_throat = 0 and will_cost > pcs_willpwr:
-				act 'Touch the shaft (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-		end
-	elseif rand(1, 10) >= 7 - (ghnow * 2):
-		*clr & cla
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghseemen.jpg"></center>'
-		'You look through the hole and see several men with their backs to you, using the urinals.'
-		act 'Don''t do it':
-			cla
-			'You move away from the hole reconsidering what you were about to do and quickly leave the stall.'
-			act 'Leave':gt 'gdktoilet', 'womens'
-		end
-		gs 'willpower', 'bj', 'self'
-		if will_cost <= pcs_willpwr:
-			act 'Stick your finger in the hole (<<will_cost>> Willpower)':
-				*clr & cla
-				money += 100
-				minut += 10
-				gs 'willpower', 'bj', 'self'
-				gs 'willpower', 'pay', 'self'
-				gs 'stat'
-				if gloryhole = 0:
-					'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
-					'You put your finger in the hole hoping to entice a man to come over...'
-					'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
-					act 'Blow Him': gt 'gdktoilet', 'blowjob'
-				elseif gloryhole > 0:
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ready.jpg"></center>'
-					'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
-					'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
-					act 'Blow Him': gt 'gdktoilet', 'blowjob'
-				end
-				gs 'willpower', 'bj', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Stop (<<will_cost>> Willpower)':
-						*clr & cla
-						gs 'willpower', 'bj', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						gs 'stat'
-						'Seeing the dick poke through, you reconsider what you are about to do, do you really want to suck some strange man''s dick, through a hole in the bathroom for money?'
-						gs 'willpower', 'bj', 'resist', 'hard'
-						if will_cost <= pcs_willpwr:
-							act 'Take his money and Leave (<<will_cost>> Willpower)':
-								gs 'willpower', 'bj', 'resist', 'hard'
-								gs 'willpower', 'pay', 'resist'
-								gs 'stat'
-								gt 'gdktoilet', 'rape'
-							end
-						else
-							act 'Take his money and Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-						end
-						act 'Give back the money and Leave': money -= 100 & gt 'gdktoilet', 'womens'
-						act 'Blow Him': gt 'gdktoilet', 'blowjob'
-					end
-				else
-					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
-			end
-		else
-			act 'Stick your finger in the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	else
-		*clr & cla
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghseenomen.jpg"></center>'
-		'Looking through the hole, you can see a row of urinals on the other side. The hole must be to the men''s room next door. You don''t see any men currently in there.'
-		act 'Leave': gt 'gdktoilet', 'womens'
-		act 'Wait':
-			cla
-			'You decide stay and wait for someone to come.'
-			act 'Keep looking': gs 'gdktoilet', 'hole'
-		end
-	end
-end
-
-if $ARGS[0] = 'virgin':
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghvirgin1.mp4"></video></center>'
-	'You tentatively reach out and gently touch the dick, half afraid to, but also half wanting to.'
+	'<center><b><font color="maroon">Community Center - Restrooms</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/waterfountain.jpg"></center>'
 	
-	act 'Quickly leave the stall':
+	act 'Leave': gt 'gdktoilet', 'start'
+	act 'Take a drink':
 		*clr & cla
+		frost = 1
+		if alko > 0: alko -= 1
 		minut += 2
-		gs 'stat'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-		'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
-		act'Leave':gt 'gdktoilet', 'womens'
-	end
-	act 'Grab it':
-		*clr & cla
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfeeling.mp4"></video></center>'
-		'Biting your lip and deciding you want to feel it some more, you reach over again and grab it. You caress it with your hand, it is harder than you expected and warm to the touch, it almost feels like it is throbbing in your hand. Unexplained feelings of excitement run through your body. You hear through the wall the guy saying, "Stop playing with it and stroke it." "Huh?" You reply, not knowing why he wants you to stroke it. He replies, "Really, you don''t know? Just grab it with your hand and slide it up and down."'
-		gs 'arousal', 'foreplay', 5, 'unknown'
-		gs 'stat'
-		gs 'willpower', 'hj', 'resist', 'hard'
-		if will_cost <= pcs_willpwr:
-			act 'Stop (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'hj', 'resist', 'hard'
-				gs 'willpower', 'pay', 'resist'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-				'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop?... Hello? Are you still there? What the fuck!"'
-				act 'Quickly get out': gt 'gdktoilet', 'womens'
-			end
-		else
-			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Slide your hand on his penis':
-			*clr & cla
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstroke1.mp4"></video></center>'
-			'You decide to gently slide your hand on his dick. You feel his hard penis throb as you continue to slide your hand up and down. To your surprise you are really enjoying stroking the dick, your pussy starts to itch from the experience. As you get more turned on, you grab it with both hands and stroke it.'
-			gs 'arousal', 'hj', 5, 'unknown'
-			gs 'stat'
-			act 'Continue Stroking':
-				*clr & cla
-				minut +=5
-				gs 'arousal', 'end'
-				gs 'cum_call', 'hands', 'an unknown guy from the gloryhole'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghmastcum.mp4"></video></center>'
-				'Without any warning, hot white liquid spurts out the tip of his penis. You look at your hands, watching the sperm run down the back of your hand and down onto your arm. The man panting says, "That was," he takes another breath, "That was great."'
-				'You decide to lick a bit of the white liquid off your hand curiously wanting to know what it tastes like. It''s slimy and tastes tart.'
-				act 'Continue': gt 'gdktoilet', 'emptystall'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'blowjob':
-	*clr & cla
-	guy += 1
-	ghnow += 1
-	gloryhole += 1
-	temp = rand(1,3)
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghbj<<temp>>.mp4"></video></center>'
-	'You wrap your lips around his dick and take his <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock in your mouth and start to suck it, you suck the cock enthusiastically.'
-	gs 'arousal', 'bj', 5, 'unknown', 'sub'
-	gs 'stat'
-	if stat['vaginal'] > 0 or stat['anal'] > 0:act 'Undress':gt 'gdktoilet', 'ghsex'
-	act 'Continue to Suck':
-		*clr & cla
-		temp = rand(1, 3)
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghbj<<temp>>.mp4"></video></center>'
-		'You suck on his dick, bobbing your head, sometimes using your hands to stroke his shaft at the same time, other times your hands massage his balls. Before to long you hear the guy moan in pleasure, "I''m cuming."'
-		gs 'arousal', 'bj', 5, 'unknown', 'sub'
-		gs 'stat'
-		act 'Swallow':
-			*clr & cla
-			swallow += 1
-			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-			act 'Get up': gt'gdktoilet', 'emptystall'
-		end
-		gs 'willpower', 'swallow', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Step back (<<will_cost>> Willpower)':
-				*clr & cla
-				facial += 1
-				gs 'willpower', 'swallow', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-				'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-				act 'Get up': gt'gdktoilet', 'emptystall'
-			end
+		pcs_health += 10
+		pcs_energy += 4
+		if pcs_hydra >= 100:
+			pcs_hydra += 25
 		else
-			act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			pcs_hydra += 50
 		end
-	end
-end
-
-if $ARGS[0] = 'ghsex':
-	*clr & cla
-	gs 'stat'
-	'<center><b><font color="maroon">Empty Stall</font></b></center>'
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghundress.mp4"></video></center>'
-	'You let go of him and quickly undress, once you are naked you start stroking him again while you line yourself up with his dick. You badly want to fuck him.'
-	gs 'arousal', 'hj', 5, 'unknown', 'sub'
-	gs 'stat'
-	if stat['anal'] > 0: act 'Ass':gt 'gdktoilet', 'anal'
-	if stat['vaginal'] > 0: act 'Pussy':gt 'gdktoilet', 'pussy2'
-end
-
-if $ARGS[0] = 'anal':
-	*clr & cla
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghintoass.mp4"></video></center>'
-	'You rub your wet pussy and get your fingers nice and wet and then rub it on your asshole, you do the same to his dick, then you guide his <<npc_dick[$npclastgenerated]>>cm <<$npc_thdick[$npclastgenerated]>> cock into your ass. You feel his dick enter your tight ass, feelings of pain and pleasure rush through you.'
-	anal_slip += 4
-	gs 'arousal', 'masturbate', 5, 'unknown', 'sub'
-	gs 'arousal', 'anal', 5, 'unknown', 'sub'
-	minut -= 5
-	gs 'stat'
-	act 'Keep Going':
-		*clr & cla
-		gs 'stat'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanal.mp4"></video></center>'
-
-		if pcs_ass < 10:
-			'The pain doesn''t fade and instead it starts to hurt worse after a while and the pleasure starts to fade. You fuck his dick with your ass, at first taking him deeper and deeper, as you get faster and faster. As the pleasure fades and the pain gets worse you slow down and don''t take him as deep. you start to rub your clit to help with the sensation of pleasure. You consider stopping as the pain gets worse, but you can tell by the throbbing of his dick and ragged breathing he is about to cum and decided to keep it up so he can finish.'
-		elseif pcs_ass < 20:
-			'The pain fades slowly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
-		else
-			'The pain fades quickly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
-		end
-		gs 'arousal', 'anal', 5, 'unknown', 'sub'
+		cumspclnt = 2
+		gs 'cum_cleanup'
 		gs 'stat'
 		
-		gs 'willpower', 'anal', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Stop (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'anal', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/analpain.jpg"></center>'
-				'The pain gets to be to much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
-				act 'Leave': gt'gdktoilet', 'womens'
-			end
-		else
-			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Let him cum in your ass':
-			*clr & cla
-			gs 'cum_call', 'anus', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'anal', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
-			
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanalcream1.mp4"></video></center>'
-			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
-
-			act 'Get up': gt'gdktoilet', 'emptystall'
-		end
-		gs 'willpower', 'cum_inside_anal', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Let him cum all over your ass (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'cum_inside_anal', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'anal', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
-				gs 'stat'
-				
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcumonass.jpg"></center>'
-				'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
-
-				act 'Get up': gt'gdktoilet', 'emptystall'
-			end
-		else
-			act 'Let him cum all over your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Turn around, kneel and let him cum in your mouth':
-			*clr & cla
-			swallow += 1
-			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-			'Once down on your knees you take his dick into your mouth and start sucking him, tasting your own ass on his dick. But you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-			gs 'arousal', 'bj', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
-
-			act 'Get up': gt'gdktoilet', 'emptystall'
-		end
-		gs 'willpower', 'swallow', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Turn around, kneel and let him cum on your face (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'swallow', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				facial += 1
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'hj', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-
-				act 'Get up': gt'gdktoilet', 'emptystall'
-			end
-		else
-			act 'Turn around, kneel and let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	end
-end
-
-if $ARGS[0] = 'pussy':
-	if prezik > 0:
-		dynamic $prezik
-		protect = 1
-		if preziktype = 2:
-			sexcontra = 7
-			'You take one of your sabotaged condoms and put it on the stranger.'
-		else
-			sexcontra = 3
-			'You take a condom and put it on the stranger''s dick.'
-		end
-	else
-		sexcontra = 0
-	end
-end
-
-if $ARGS[0] = 'pussy2':
-	*clr & cla
-	gs 'stat'
-	if protect = 1:
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghsexcon.mp4"></video></center>'
-	else
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghsex.mp4"></video></center>'
-	end
-	gs 'gdktoilet', 'pussy'
-	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly. After several minutes, you hear him on the other side of the wall yell out, "I''m gonna cum."'
-	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
-	gs 'stat'
-	if protect ! 1:
-		act 'Allow him to cum inside':
-			*clr & cla
-			gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcreampie.mp4"></video></center>'
-			'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
-			gs 'cuminsidereact', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
-
-			act 'Get dressed': gt'gdktoilet', 'emptystall'
-		end
-		gs 'willpower', 'cum_inside', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Quickly turn around and get on your knees (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'cum_inside', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'stat'
-				act 'Let him cum in your mouth':
-					*clr & cla
-					swallow += 1
-					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-					'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-					gs 'arousal', 'bj', 10, 'unknown', 'sub'
-					minut -= 9
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Get dressed': gt'gdktoilet', 'emptystall'
-				end
-				gs 'willpower', 'swallow', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Let him cum on your face (<<will_cost>> Willpower)':
-						*clr & cla
-						gs 'willpower', 'swallow', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						facial += 1
-						gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-						gs 'arousal', 'hj', 10, 'unknown', 'sub'
-						minut -= 9
-						gs 'arousal', 'end'
-						gs 'stat'
-						'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-						'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-
-						act 'Get dressed': gt'gdktoilet', 'emptystall'
-					end
-				else
-					act 'Let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
-			end
-		else
-			act 'Quickly turn around and get on your knees (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	else
-		if sexcontra = 4:
-			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom burst."'
-		elseif sexcontra = 5:
-			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom is missing!"'
-		else
-			'<<$boydesc>> groaned and you realized that he came in the condom.'
-		end
-		sexcontra = 0
-		protect = 0
-
-		act 'Get dressed': gt'gdktoilet', 'emptystall'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/waterfountain.jpg"></center>'		
+		'You drink some water.'
+		act 'Finish': gt 'gdktoilet', 'start'
 	end
 end
 
-if $ARGS[0] = 'rape':
-	*clr & cla
-	menu_off = 1
-	gs 'stat'
-	dick = rand(9, 25)
-	if rand(1, 20) > 12:
-		gs 'npcgeneratec', 0, 'rapist', rand(19,45)
-		gs 'boyStat', $npclastgenerated
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
-		'Just as you are leaving the women''s restroom a naked man storms out of the men''s restroom and grabs you by the hair and drags you inside the men''s room. He rips off your top and forces you down on your knees, shoving his dick in your mouth, forcing you to suck his dick.'
-		act 'Continue':
-			*clr & cla
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape4.mp4"></video></center>'
-			'You bite down his dick, which makes him pull his dick out of your mouth. "Fine you little fucking cunt, we''ll do this the hard way." He lifts you up and forces you between two urinals with your face up against the wall. He roughly shoves his cock in your ass, the only lubrication is the bit of your saliva still on his dick. It feels like he is ripping your ass open, you cry and scream. He just jackhammers your ass balls deep, while holding you by the throat.'
-			gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
-			minut -= 5
-			gs 'stat'
-			act 'Continue':
-				*clr & cla
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape1.mp4"></video></center>'
-				'As you scream he reaches up and clamps a hand over your mouth to muffle your screams, he continues you pound your ass balls deep with his dick. Not relenting no matter how much you struggle or cry. "You think it''s funny bitch to steal a man''s hard earned money, well you won''t think it is so funny after I am done with you. I''m going to fuck your ass till it bleeds like your cunt."'
-				'He keeps ripping your ass up with his dick, the pain is unbearable, but there is nothing you can do about it. You really wish you hadn''t taken his money and kept it.'
-				gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
-				minut -= 5
-				gs 'stat'
-				act 'Continue':
-					*clr & cla
-					rape += 1
-					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
-					'Finally he pulls the dick out of your ass and forces you back to your knees, he shoves his dick back in your mouth and you can taste your own ass on his dick. He says to you. "You fucking bite me again bitch and I will call everyone I know and we will train fuck your ass for days." Afraid he is serious you suck his dick until he finally shoots his load in your mouth.'
-					gs 'arousal', 'bj', 10, 'unknown', 'sub', 'rough'
-					minut -= 5
-					gs 'arousal', 'end'
-					gs 'stat'
-					'With that he lets go of you and walks off in disgust.'
-					'Grabbing your clothes you get up and run out of the bathroom and run all the way home, only once you are several blocks away do you stop to put your clothes back on.'
-					act 'Leave':gt 'korrPar'
-				end
-			end
-		end
-	elseif hour >= 20 and hour <= 23:
-		if music_on = 1:
-			$track_loop = 'sound/komb.mp3'
-			volume = 50
-			music_loop = 1
-			pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
-		else
-			music_loop = 0
-			close all
-			pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
-		end
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_yaho.jpg"></center>'
-		'You run into the crowd and start dancing to blend in. You hear a man yell out, "Where''s that bitch that took my money?" He storms off and you feel like it''s your lucky day today.'
-		act 'Dance':
-			*clr & cla
-			minut +=10
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
-			'You continue to dance until the man has left.'
-			act 'Stop': gt 'gdkin'
-		end
-	else
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
-		'You run from the community center and don''t stop until you are back in the residential area'
-		act 'Catch your breath': minut += 5 & gt 'pavResidential'
-	end
-end
 
 --- gdktoilet ---------------------------------
 

+ 619 - 0
locations/gdktoilet_mens.qsrc

@@ -0,0 +1,619 @@
+# gdktoilet_mens
+
+if $ARGS[0] = 'mens_entrance_events':
+	$location_type = 'public_indoors'
+	*clr & cla
+	$menu_loc = 'gdktoilet_mens'
+	$menu_arg = 'mens_entrance_events'
+	menu_off = 0
+	gs 'stat'
+	temp = rand(1,100)
+
+	if temp >= 80:
+		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
+		'It''s unusually empty, but you see someone near the urinals.'
+		act 'Look closer':
+			minut +=2
+			*clr & cla
+			gs 'stat'
+			'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/ghmanstand.jpg"></center>'
+			'You decide to take a closer look, to your surprise, there is a naked man standing with his face to the wall. His body is pressed up close against the wall.'
+			if pcs_vag >= 1:
+				if pcs_horny >=80:
+					act 'Leave': gt 'gdktoilet', 'start'
+					gs 'willpower', 'sex', 'force'
+					if will_cost <= pcs_willpwr:
+						act 'Seduce him (<<will_cost>> Willpower)':
+							*clr & cla
+							gs 'willpower', 'sex', 'force'
+							gs 'willpower', 'pay', 'force'
+							gs 'stat'
+							if pcs_cupsize >= 20:
+								*clr & cla
+								gs 'stat'
+								'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/grabbig.jpg"></center>'
+								'You look over his naked body and you wonder who''s on the other side. You bite your finger in appreciation of his naked body while grabbing your <<$titsize>>. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes all your clothes off and pushes you against the wall. Kissing you passionately.'
+								gs 'arousal', 'foreplay', 1
+								gs 'stat'
+								act 'Kiss him': gt 'gdktoilet_mens', 'mensglory'
+							elseif $pantyworntype ! 'none':
+								*clr & cla
+								gs 'stat'
+								'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/seducesmall.jpg"></center>'
+								'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your underwear and breasts. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
+								gs 'arousal', 'foreplay', 5
+								gs 'stat'
+								act 'Kiss him': gt 'gdktoilet_mens', 'mensglory'
+							else
+								*clr & cla
+								gs 'stat'
+								'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/nakedsmall.jpg"></center>'
+								'You look over his naked body and you wonder who''s on the other side. Your small <<$titsize>> are not enough to coax the man so you take off your clothes revealing your breasts and pussy. You walk over to him trying to seduce him. He succumbs to your charms. No longer able to resist he takes the rest of your clothes off and pushes you against the wall. Kissing you passionately.'
+								gs 'arousal', 'foreplay', 1
+								gs 'stat'
+								act 'Kiss him': gt 'gdktoilet_mens', 'mensglory'
+							end
+						end
+					else
+						act 'Seduce him (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+				elseif pcs_horny >=40:
+					gs 'willpower', 'mast', 'self'
+					if will_cost <= pcs_willpwr:
+						act 'Masturbate':
+							*clr & cla
+							gs 'willpower', 'mast', 'self'
+							gs 'willpower', 'pay', 'self'
+							gs 'stat'
+							pcs_mood += 15
+							gs 'arousal', 'masturbate', 25
+							gs 'stat'
+							'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/masturbate.jpg"></center>'
+							'You decide to masturbate in front of him. You rub your clit while exposing your bare ass. He smile and nods appreciating your body. You start to feel warm as you keep rubbing your clit. Your body gets tense as you approach orgasm.'
+							if hotcat >= 6:
+								*clr & cla
+								'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
+								'Unable to resist the man pushes you against the wall kissing you.'
+								gs 'arousal', 'kiss', 5
+								gs 'stat'
+								gs 'willpower', 'sex', 'resist'
+								if will_cost <= pcs_willpwr:
+									act 'Leave (<<will_cost>> Willpower)':
+										gs 'willpower', 'sex', 'resist'
+										gs 'willpower', 'pay', 'resist'
+										gs 'arousal', 'end'
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
+										'Not wanting to fuck this guy, you push him off you and quickly get dressed before telling him to fuck off!'
+										gt 'gdktoilet', 'start'
+									end
+								else
+									act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+								end
+								act 'Give In': gt 'gdktoilet_mens', 'mensglory'
+							elseif hotcat >= 4:
+								cla
+								*nl
+								'The man backs away from the wall and says, "Why don''t you come over here and we can have some fun."'
+								gs 'willpower', 'sex', 'resist'
+								if will_cost <= pcs_willpwr:
+									act 'Leave (<<will_cost>> Willpower)':
+										gs 'willpower', 'sex', 'resist'
+										gs 'willpower', 'pay', 'resist'
+										gs 'arousal', 'end'
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/pc/fuckoff2.jpg"></center>'
+										'Not wanting to fuck this guy, you quickly get dressed before telling him to fuck off!'
+										gt 'gdktoilet', 'start'
+									end
+								else
+									act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+								end
+								act 'Give In': gt 'gdktoilet_mens', 'mensglory'
+							else
+								act 'Leave': gs 'arousal', 'end' & gt 'gdktoilet', 'start'
+							end
+						end
+					else
+					
+					end
+				else
+					gs 'stat'
+					'You look at his naked body and you wonder who''s on the other side. You feel a little turned on by the man''s naked body. You decide to leave.'
+					gs 'arousal', 'voyeur', 10
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'Leave': gt 'gdktoilet', 'start'
+				end
+			else
+				pcs_horny += 5
+				gs 'stat'
+				'You look at his naked body and you''re not sure what''s going on. You decide to leave before things get too awkward.'
+				act 'Leave': gt 'gdktoilet', 'start'
+			end
+		end
+	elseif temp >= 50 and temp <=79 and soniaPS >= 1 and hour >= 20 and hour <=23:
+		pcs_horny += 5
+		minut += 5
+		*clr & cla
+		gs 'stat'
+		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/gangbangbath.jpg"></center>'
+		'You look inside the men''s restroom and see Sonia getting pounded by a bunch of guys. You can tell she is enjoying every second of it as she gets fucked in both holes.'
+		if pcs_vag > 0:
+			gs 'stat'
+			'You feel excited as you watch Sonia. You decide to leave before you are noticed.'
+			gs 'arousal', 'voyeur_sex', 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'gdktoilet', 'start'
+		else
+			'You decide to leave before you are noticed.'
+			act 'Leave': gt 'gdktoilet', 'start'
+		end
+	elseif temp >= 40 and temp <= 45 and hour >= 20 and hour <=23:
+		*clr & cla
+		pcs_horny += 10
+		minut += 5
+		gs 'stat'
+		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
+		'You look inside the men''s restroom and hear a couple having sex in one of the stalls. You wonder who''s inside and then decide to leave. While you turn away you hear them stop and the stall slams open moments later hearing giggling from some women. While you''re outside you see Ivan and Vicky leave the men''s restroom and walk out into the crowd.'
+		gs 'arousal', 'voyeur_sex', 10
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave': gt 'gdktoilet', 'start'
+	elseif temp >= 30 and temp <= 39 and hour >= 20 and hour <=23:
+		*clr & cla
+		gs 'stat'
+		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/gangbangbath.jpg"></center>'
+		'You look inside the men''s restroom and see Vitek, Dan, Vasily, and one other you don''t recongnize and someone else under some woman getting pounded.'
+		if pcs_vag > 0 and pcs_ass > 0:
+			pcs_horny += 30
+			'Your pussy starts to itch. You wish you were that woman in between all those horny men taking it in all your holes. The feeling of excitement is enough to make you want to masturbate in the hallway but you decide to leave before your feelings become too much.'
+		end
+		gs 'arousal', 'voyeur_sex', 5
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave': gt 'gdktoilet', 'start'
+	elseif temp >= 20 and temp <= 29 and hour >= 20 and hour <=23:
+		*clr & cla
+		minut += 5
+		gs 'stat'
+		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
+		'You look inside the men''s restroom and see Dimka grabbing some chick by the hair and forcing her down onto his 16cm penis.'
+			
+		if DimaRudeQW = 0:
+			gs 'willpower', 'bj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Interrupt (<<will_cost>> Willpower)':
+					*clr & cla
+					minut += 5
+					pcs_horny += 10
+					gs 'willpower', 'bj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'stat'
+					'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
+					'You decide to interrupt them and get in on the action. Dimka looks at you smiling and says "What the fuck are you interrupting me, get the fuck out." That''s when Dimka slaps you across the face. Your face now all red you quickly leave the restroom and leave.'
+					act 'Leave': gt 'gdktoilet', 'start'
+				end
+			else
+				act 'Interrupt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			
+			act 'Leave': gt 'gdktoilet', 'start'
+		elseif DimaRudeQW > 0:
+			act 'Interrupt':
+				*clr & cla
+				minut += 5
+				dimkawarn = 0
+				gs 'stat'
+				'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/smiling.jpg"></center>'
+				'Wanting some attention from your boyfriend you decide to interrupt them. Dimka sees you and says, "Look what we have here, one more of my bitches to join us." He turns to the girl on the ground and says to her "Get on the ground and lay down."'
+				act 'Climb on top':
+					*clr & cla
+					gs 'stat'
+					'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanal.mp4"></video></center>'
+					'You take your clothes off and climb on top of her. She starts to lick your pussy while Dimka fucks your ass without any lubrication. With her licking your pussy and Dimka fucking your ass you start to orgasm.'
+					gs 'arousal', 'cuni', 10, 'lesbian', 'dom'
+					gs 'arousal', 'anal', 10, 'sub', 'rough'
+					minut -= 10
+					gs 'stat'
+					act 'Continue':
+						*clr & cla
+						pcs_mood += 15
+						if npc_sex['A1'] = 0: npc_sex['A1'] = 1 & guy += 1
+						girl += 1
+						minut += 10
+						gs 'cum_call', 'anus', 'A1', 1
+						gs 'stat'
+						'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/threesomeanalcum.jpg"></center>'
+						'Starting to pound your ass harder, Dimka starts to grunt as he shoots his load in your ass. Pulling out his warm liquid flows out your ass spilling onto the girls face. He takes his dick and puts it in her mouth saying, "Clean the rest of this up slut and don''t forget to clean my bitch too." The girl starts to lick your ass clean. She is really good at it and you begin to have another orgasm. You finish and decide to get up and get dressed. Dimka pleased with your behaviour tells you, "You should come by my house more often, slave."'
+						$orgasm_or = 'yes'
+						cumspclnt = 15
+						gs 'cum_cleanup'
+						gs 'arousal', 'end'
+						gs 'stat'
+						act 'Leave': gt 'gdktoilet', 'start'
+					end
+				end
+			end
+			
+			gs 'willpower', 'bj', 'resist', 'hard'
+			if will_cost <= pcs_willpwr:
+				act 'Leave (<<will_cost>> Willpower)':
+					gs 'willpower', 'bj', 'resist', 'hard'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					gt 'gdktoilet', 'start'
+				end
+			else
+				act 'Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		end
+	else
+		minut += 1
+		temp = rand(1,2)
+		gt 'gdktoilet_mens', 'mens'
+	end
+end
+
+if $ARGS[0] = 'mens':
+	$location_type = 'public_indoors'
+	*clr & cla
+	$menu_loc = 'gdktoilet_mens'
+	$menu_arg = 'mens'
+	menu_off = 0
+	gs 'stat'
+	
+	if hour >=20 and hour <=23:
+		if music_on = 1:
+			$track_loop = 'sound/komb.mp3'
+			volume = 50
+			music_loop = 1
+			pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
+		else
+			music_loop = 0
+			close all
+			pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
+		end
+	end
+	
+	'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
+	'You peek around the corner. Inside this room, stalls line the right side, with urinals on the far wall and rows of sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a> to the left. The room has a smell of disinfectant and stale piss. As you look around you notice a hole in the wall.'
+	
+	act 'Leave': gt 'gdktoilet', 'start'
+	
+	act 'Look at the hole':
+		*clr & cla
+		menu_off = 1
+		gs 'stat'
+		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/menghpeek.mp4"></video></center>'
+		'You look at the hole and see a girl fingering her pussy. You feel your pussy moisten and start to itch.'
+		gs 'arousal', 'voyeur_sex', 5
+		gs 'stat'
+		act 'Move away': minut += 1 & gt 'gdktoilet_mens', 'mens'
+		if pcs_horny >= 50:
+			gs 'willpower', 'mast', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Masturbate (<<will_cost>> Willpower)':
+					cla
+					gs 'willpower', 'mast', 'self'
+					gs 'willpower', 'pay', 'self'
+					gs 'arousal', 'masturbate', 5
+					gs 'stat'
+					'You walk into one of the men''s stalls.'
+					act 'start': gt 'gdktoilet_mens', 'mensmast'
+				end
+			else
+				act 'Masturbate (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		end
+	end
+	
+	dynamic $tampon
+	dynamic $quickwash
+	dynamic $basin
+	dynamic $publicpan
+end
+
+if $ARGS[0] = 'mensmast':
+	*clr & cla
+	minut += 2
+	pcs_horny += 5
+	pcs_mood += 5
+	menu_off = 1
+	gs 'stat'
+	if picrand = 1:
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
+	end
+	if pcs_horny <= 60:
+		'You are starting to feel warm and you insert your finger in your pussy.'
+		gs 'arousal', 'masturbate', 2
+		gs 'stat'
+	else
+		'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
+		gs 'arousal', 'masturbate', 2
+		gs 'stat'
+	end
+	if pcs_horny >= 90:
+		act 'Climax':
+			*clr & cla
+			pcs_mood += 15
+			minut += 5
+			if pcs_inhib < 30: inhib_exp += rand(1,3)
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast1.jpg"></center>'
+			$orgasm_or = 'custom'
+			$orgasm_txt = 'As your pussy gets wet you start to rub your clit vigourously. You start to feel more intense pleasure with every second. Within a few moments a powerful orgasm takes control of your body. You can hear your moans echo through the restroom, your orgasm finally stops. Leaving you gasping and trembling as you recover.'
+			gs 'arousal', 'masturbate', 2
+			gs 'stat'
+			act 'Clean yourself':
+				*clr & cla
+				minut += 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast2.jpg"></center>'
+				'You grab some toilet paper and clean off your now wet clit. You think to yourself, "I hope nobody heard that."'
+				if rand(1,100) >= 75:
+					gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
+					npc_dick[$npclastgenerated] = rand(10,24)
+					gs 'boyStat', $npclastgenerated
+					'You look up and notice the stall door opens. Right then a man in an orange jumpsuit walks in. He tells you, "Do you know where you are?" Unable to respond after your intense orgasm the man unzips his jumpsuit and takes out his <<npc_dick[$npclastgenerated]>>cm dick and places it near your mouth.'
+					gs 'willpower', 'bj', 'resist', 'hard'
+					if will_cost <= pcs_willpwr:
+						act 'Run away (<<will_cost>> Willpower)':
+							cla
+							gs 'willpower', 'bj', 'resist', 'hard'
+							gs 'willpower', 'pay', 'resist'
+							gs 'arousal', 'end'
+							*nl
+							if $pantyworntype ! 'none' or $braworntype ! 'none':
+								gs 'underwear', 'dispose'
+								minut += 2
+								gs 'stat'
+								'You slip past the man and run out of the bathroom so quickly you leave your underwear behind.'
+								act 'Leave': gt 'gdktoilet', 'start'
+							else
+								minut += 2
+								gs 'stat'
+								'You slip past the man and run out of the bathroom.'
+								act 'Leave': gt 'gdktoilet', 'start'
+							end
+						end
+					else
+						act 'Run away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+					end
+					act 'Suck':
+						*clr & cla
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast3.jpg"></center>'
+						'You open your mouth and begin to suck his dick. You can feel your pussy getting itchy again so you start to rub it. You continue to rub your clit until the man is about to cum.'
+						gs 'arousal', 'bj', 5, 'sub', 'unknown'
+						gs 'arousal', 'masturbate', 5
+						minut -= 5
+						gs 'stat'
+						act 'Climax again':
+							*clr & cla
+							pcs_mood += 15
+							minut += 5
+							spafinloc = 11
+							facial += 1
+							gs 'cum_manage'
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast4.jpg"></center>'
+							$orgasm_or = 'custom'
+							$orgasm_txt = 'You continue to rub your clit more and more when all of a sudden you explode into another orgasm. The man tells you he''s about to cum and you stop sucking his dick. The second you stop sucking he cums around your mouth.'
+							gs 'arousal', 'masturbate', 2
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Rest':
+								*clr & cla
+								minut += 5
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/mensmast5.jpg"></center>'
+								'The man leaves the stall, he mumbles something but you are too far gone and woozy. You stay crouched on the floor with cum all over your mouth as you try to recover.'
+								act 'Leave the stall':gt 'gdktoilet_mens', 'mens'
+							end
+						end
+					end
+				else
+					act 'Leave Stall':gt 'gdktoilet_mens', 'mens'
+				end
+			end
+		end
+	else
+		act 'Continue': gt 'gdktoilet_mens', 'mensmast'
+	end
+	gs 'willpower', 'mast', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Stop (<<will_cost>> Willpower)':
+			cla
+			gs 'willpower', 'mast', 'self'
+			gs 'willpower', 'pay', 'self'
+			minut += 1
+			gs 'stat'
+			*nl
+			'You decide that you shouldn''t continue in fear of being discovered.'
+			act 'Leave Stall':gt 'gdktoilet_mens', 'mens'
+		end
+	else
+		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+end
+
+if $ARGS[0] = 'mensglory':
+	menu_off = 1
+	gs 'npcgeneratec', 0, 'guy from the men''s bathroom', rand(19,45)
+	$npc_thdick[$npclastgenerated] = 'massive'
+	npc_dick[$npclastgenerated] = 20
+	gs 'boyStat', $npclastgenerated
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/sex/1kissing.jpg"></center>'
+	act 'Submit':
+		*clr & cla
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/2turning.mp4"></video></center>'
+		'He turns you around against the wall. He presses your face and breasts to the wall, while pulling your hips back away from the wall. Despite his aggressive behavior you rather enjoy his rough behavior.'
+		gs 'arousal', 'foreplay', 5, 'sub', 'rough'
+		gs 'stat'
+		act 'Spread your ass cheeks':
+			guy += 1
+			*clr & cla
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/3doggy.mp4"></video></center>'
+			'He licks his fingers and coats the tip of his dick with his saliva. He then takes his <<npc_dick[$npclastgenerated]>>cm dick and guides it into your wet pussy. Grabbing your hips he begins to thrust, into you hard and fast. You are so overwhelmed and turned on, that you fail to notice other men that just walked in and are now watching.'
+			gs 'arousal', 'vaginal_finger', 5, 'sub', 'rough'
+			gs 'stat'
+			act 'Turn Around':
+				*clr & cla
+				pcs_mood += 15
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/4standmiss.mp4"></video></center>'
+				'He suddenly pulls out of you and roughly turns you back around, and picks you up. You spread your legs and he lowers you back down, till you feel his <<$dick_girth>> dick slide back inside of your pussy. He carries you, fucking you the whole time, you are impressed by his strength, as he manages to not only carry you, but fuck you at the same time. He slams your back roughly but not painfully onto an open stall door and presses your body against it, then he starts fucking you in harder. It seems he is nowhere near ready to cum.'
+				$orgasm_or = 'yes'
+				gs 'arousal', 'vaginal', 5, 'sub', 'rough'
+				gs 'stat'
+				act 'Suck':
+					*clr & cla
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/5blowjob.mp4"></video></center>'
+					'After some time, he pulls out of you and lets you down, you think he is getting a bit tired from holding you up. He leans back on the counter as you bend over and start to suck his dick. He puts his hand on your head and grabs and handful of hair, he pushes your head down while you suck his <<npc_dick[$npclastgenerated]>>cm dick. His hands hold onto your hair, keeping your from pulling away. Not that you would, you are excited and love sucking his dick.'
+					gs 'arousal', 'bj', 5, 'sub', 'rough', 'deepthroat'
+					gs 'stat'
+					if rand(1,2) = 1:
+						act 'Pull away':
+							*clr & cla
+							minut +=5
+							gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
+							gs 'arousal', 'end'
+							gs 'stat'							
+							'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,1.mp4"></video></center>'
+							'You pull away right before he cums. You start to stroke his dick and you open your mouth. His hot load fills your mouth, it tastes salty and warm.'
+							act 'Swallow':
+								*clr & cla
+								minut += 5
+								swallow += 1
+								gs 'stat'
+								'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,1.mp4"></video></center>'
+								'You decide to swallow his cum. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
+								act 'Leave': gt 'gdktoilet', 'start'
+							end
+							gs 'willpower', 'swallow', 'resist'
+							if will_cost <= pcs_willpwr:
+								act 'Spit (<<will_cost>> Willpower)':
+									*clr & cla
+									gs 'willpower', 'swallow', 'resist'
+									gs 'willpower', 'pay', 'resist'
+									minut +=5						
+									gs 'stat'
+									'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
+									'You spit out his cum which. The man says, "You don''t like the taste of cum?" You don''t respond and get up to get dressed and leave.'
+									act 'Leave': gt 'gdktoilet', 'start'
+								end
+							else
+								act 'Spit (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+							end
+						end
+					else
+						gs 'willpower', 'sex', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Keep sucking (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'sex', 'resist'
+								gs 'willpower', 'pay', 'resist'
+								minut += 5
+								swallow += 1
+								gs 'cum_call', 'mouth', 'guy from the men''s bathroom'
+								gs 'arousal', 'end'
+								gs 'stat'
+								if pcs_throat <= 25:
+									'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj91.mp4"></video></center>'
+									'You keep sucking taking in his entire dick. You stop when you feel his hard penis throbbing as a warm liquid fills your throat. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
+									act 'Leave': gt 'gdktoilet', 'start'
+								else
+									'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj26.mp4"></video></center>'
+									'Unable to continue to fit his entire penis inside your mouth you keep sucking the tip of his dick until you feel his hard penis throbbing as a warm liquid fills the back of your mouth. You pull out his penis from your mouth making sure to not let any get spilled. The man says, "You are much better than that hole in the wall." You smile and nod to him and get dressed. You leave the bathroom feeling satisfied and relaxed.'
+									act 'Leave': gt 'gdktoilet', 'start'
+								end
+							end
+						else
+							act 'Keep sucking (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Ride':
+							*clr & cla
+							'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/6cowgirl.mp4"></video></center>'
+							'He yanks your head away, as he turns and lays down on the floor, on his back. He pulls you down on top of him, you straddle him and take his dick back into your pussy and you start to ride him. With out warning you feel him thrusting hard as he groaned. You feel warmth deep inside your pussy.'
+							gs 'arousal', 'vaginal', 5, 'sub', 'rough'
+							gs 'arousal', 'end'
+							gs 'stat'
+							if prezik > 0:
+								if sexcontra = 4:
+									act 'Get up':
+										*clr & cla
+										gs 'fame', 'pav', 'sex', 5
+										gs 'cum_call', 'vaginal', 'guy from the men''s bathroom'
+										gs 'stat'
+										'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/misscream.mp4"></video></center>'
+										'You pull off him, getting up and looking down at him. That is when you noticed your pussy dripping cum all over his penis. The man unable to move breathing heavily. The man replies, "I thought it felt better then it should''ve been." '
+										gs 'cuminsidereact'
+										'He continues to breath heavily and says, "You were great though, perhaps we''ll meet again." He gets up and gets dressed, that is when you finally notice the other men watching. You quickly get dressed and feel embarrassed you didn''t notice them before, leaving while your blushing.'
+										act 'Leave': gt 'gdktoilet', 'start'
+									end
+								else
+									act 'Get up':
+										*clr & cla
+										gs 'fame', 'pav', 'sex', 5
+										gs 'stat'
+										'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
+										'You pull off him, getting up and looking down at him. The man unable to move breathing heavily. He continues to breath heavily and says, "You were great, perhaps we''ll meet again." He gets up and gets dressed, that is when you finally notice the other men watching. You quickly get dressed and feel embarrassed you didn''t notice them before, leaving while your blushing.'
+										act 'Leave': gt 'gdktoilet', 'start'
+									end
+								end
+							else
+								if sexcontra = 2:
+									act 'Complain':
+										*clr & cla
+										gs 'fame', 'pav', 'sex', 5
+										gs 'cum_call', 'vaginal', 'guy from the men''s bathroom'
+										gs 'stat'
+										'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/misscream.mp4"></video></center>'
+										'You pull off him, getting up and looking down at him and say, "Why didn''t you tell me you were going to cum?" The man replies, "Sorry I was trying to hold back and thought I could, didn''t you say you were on the pill?" You reply, "Yeah, but still you could''ve told me. Now I will have to clean up." He continues to breath heavily and says, "Was it really that bad?" He smirks at you, "You were great, perhaps we''ll meet again and next time use no condoms again." He gets up and gets dressed, that is when you finally notice the other men watching. You stop trying to clean yourself and quickly get dressed. You feel embarrassed you didn''t notice them before, leaving while you''re blushing.'
+										act 'Leave': gt 'gdktoilet', 'start'
+									end
+								else
+									act 'Complain':
+										*clr & cla
+										gs 'fame', 'pav', 'sex', 5
+										gs 'cum_call', 'vaginal', 'guy from the men''s bathroom'
+										'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/misscream.mp4"></video></center>'
+										'You pull off him, getting up and looking down at him and say, "Why didn''t you tell me you were going to cum?" The man replies, "Sorry I was trying to hold back and thought I could, didn''t you say you were on the pill?" You reply, "No. What am I going to do if I get pregnent?" He continues to breath heavily and says, "Don''t worry, I''m sure you won''t get pregnant from just this one time. You were great, perhaps we''ll meet again and maybe use some protection." He gets up and gets dressed, that is when you finally notice the other men watching. You quickly get dressed and feel embarrassed you didn''t notice them before, leaving while you''re blushing.'
+										act 'Leave': gt 'gdktoilet', 'start'
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+--- gdktoilet_mens ---------------------------------
+

+ 644 - 0
locations/gdktoilet_womens.qsrc

@@ -0,0 +1,644 @@
+# gdktoilet_womens
+
+if $ARGS[0] = 'womens':
+	$metka = 'womens'
+	$loc = 'gdktoilet_womens'
+	$metkaM = 'womens'
+	$locM = 'gdktoilet_womens'
+	$menu_loc = 'gdktoilet_womens'
+	$menu_arg = 'womens'
+	menu_off = 0
+	$location_type = 'bathroom'
+	*clr & cla
+	gs 'stat'
+	'<center><b><font color="maroon">Women''s Room</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/bathroom_women.jpg"></center>'
+	'You walk in to the women''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>. You notice the last stall has its door wide open.'
+
+	act 'Leave': gt 'gdktoilet', 'start'
+	act 'Go to the last stall': gt 'gdktoilet_womens', 'emptystall'
+	
+	dynamic $tampon
+	dynamic $quickwash
+	dynamic $basin		
+end
+
+if $ARGS[0] = 'emptystall':
+	*clr & cla
+	minut +=5
+	menu_off = 1
+	gs 'stat'
+	'<center><b><font color="maroon">Empty Stall</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sitting.jpg"></center>'
+	if stat['bj'] = 0:
+		gs 'stat'
+		'You walk down to the last stall and sit down, next to the toilet is a rather large almost perfectly round hole. Puzzled, you wonder how it got there and why no one has fixed it.'
+	elseif stat['bj'] >= 1:
+		pcs_horny += 10
+		gs 'stat'
+		'You walk down to the last stall. The large almost perfectly round hole is still there. You wonder how many women have used that hole. You feel a little excited as you contemplate your next move.'
+	end
+	act 'Get Up':
+		cla
+		'You decide not to look in the hole and leave.'
+		act 'Leave': gt 'gdktoilet_womens', 'womens'
+	end
+	if pcs_horny >=40:
+		gs 'willpower', 'mast', 'self'
+		if will_cost <= pcs_willpwr:				
+			act 'Caress Yourself (<<will_cost>> Willpower)':
+				if pcs_inhib < 40:inhib_exp += rand(1,3)
+				*clr & cla
+				gs 'willpower', 'mast', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				picrand = rand(1,2)
+				if picrand = 1:
+					*clr & cla
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
+					'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
+					gs 'arousal', 'masturbate', 4
+					gs 'stat'
+					act 'Continue': gs 'gdktoilet_womens', 'contmast'
+				else
+					*clr & cla
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
+					'Feeling a bit turned on, you close the door to the stall and you sit down exposing your pussy and begin to run your clit.'
+					gs 'arousal', 'masturbate', 4
+					gs 'stat'
+					act 'Continue': gs 'gdktoilet_womens', 'contmast'
+				end
+			end
+		else
+			act 'Caress Yourself (<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 'Look at the Hole': gt 'gdktoilet_womens', 'hole'
+end
+
+if $ARGS[0] = 'contmast':
+	*clr & cla
+	pcs_mood += 5
+	menu_off = 1
+	if picrand = 1:
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
+	end
+	if pcs_horny <= 60:
+		'You are starting to feel warm and you insert your finger in your pussy.'	
+	else
+		'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
+	end
+	gs 'arousal', 'masturbate', 5
+	gs 'stat'
+	gs 'willpower', 'mast', 'self'
+	if will_cost <= pcs_willpwr:
+		act 'Stop (<<will_cost>> Willpower)':
+			cla
+			minut += 1
+			gs 'willpower', 'mast', 'self'
+			gs 'willpower', 'pay', 'self'
+			gs 'arousal', 'end'
+			gs 'stat'
+			'You decide that you shouldn''t continue and stop yourself from finishing.'
+			act 'Leave Stall':gt 'gdktoilet_womens', 'womens'
+		end
+	else
+		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+	if pcs_horny >= 90:
+		act 'Climax':
+			*clr & cla
+			pcs_mood += 15
+			if pcs_inhib < 40: inhib_exp += rand(1,3)
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/orgasm.mp4"></video></center>'
+			$orgasm_or = 'custom'
+			$orgasm_txt = 'As your pussy gets wet you pulls you panties down and slip your fingers inside of yourself. You start finger fucking yourself, with in a few minutes a powerful orgasm rocks your body. Leaving you gasping and trembling as you recover.'
+			gs 'arousal', 'masturbate', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave Stall':gt 'gdktoilet_womens', 'womens'
+		end
+	else
+		act 'Continue': gt 'gdktoilet_womens', 'contmast'
+	end
+end
+
+if $ARGS[0] = 'hole':
+	*clr & cla
+	menu_off = 1
+	gs 'npcgeneratec', 0, 'unknown guy', rand(18,40)
+	if npc_dick[$npclastgenerated] < 6: npc_dick[$npclastgenerated] = 6
+	gs 'boyStat', $npclastgenerated
+	minut +=5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghlooking.jpg"></center>'
+	wait 700
+	if gloryhole = 0 or rand(1,5) = 5:
+		act 'Sign the wall':
+			*clr & cla
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstartled.mp4"></video></center>'
+			'While looking through the hole you decided to write something on the wall just above it. While you were focused on writing, you didn''t notice the dick poking through the hole until the tip of it nearly went into your mouth. Startled you jerk away from the offending penis.'
+			
+			act 'Quickly leave the stall ':
+				*clr & cla
+				minut += 2
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
+				'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
+				act'Leave': gt 'gdktoilet_womens', 'womens'
+			end
+
+			gs 'willpower', 'bj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Suck it (<<will_cost>> Willpower)': 
+					gs 'willpower', 'bj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gt 'gdktoilet_womens', 'blowjob'
+				end
+			else
+				act 'Suck it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			gs 'willpower', 'hj', 'self', 'easy'
+			if pcs_throat = 0 and will_cost <= pcs_willpwr:
+				act 'Touch the shaft (<<will_cost>> Willpower)':
+					gs 'willpower', 'hj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gt 'gdktoilet_womens', 'virgin'
+				end
+			elseif pcs_throat = 0 and will_cost > pcs_willpwr:
+				act 'Touch the shaft (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		end
+	elseif rand(1, 10) >= 7 - (ghnow * 2):
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghseemen.jpg"></center>'
+		'You look through the hole and see several men with their backs to you, using the urinals.'
+		act 'Don''t do it':
+			cla
+			'You move away from the hole reconsidering what you were about to do and quickly leave the stall.'
+			act 'Leave':gt 'gdktoilet_womens', 'womens'
+		end
+		gs 'willpower', 'bj', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Stick your finger in the hole (<<will_cost>> Willpower)':
+				*clr & cla
+				money += 100
+				minut += 10
+				gs 'willpower', 'bj', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				if gloryhole = 0:
+					'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
+					'You put your finger in the hole hoping to entice a man to come over...'
+					'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
+					act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
+				elseif gloryhole > 0:
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ready.jpg"></center>'
+					'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
+					'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
+					act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
+				end
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Stop (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'Seeing the dick poke through, you reconsider what you are about to do, do you really want to suck some strange man''s dick, through a hole in the bathroom for money?'
+						gs 'willpower', 'bj', 'resist', 'hard'
+						if will_cost <= pcs_willpwr:
+							act 'Take his money and Leave (<<will_cost>> Willpower)':
+								gs 'willpower', 'bj', 'resist', 'hard'
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gt 'gdktoilet_womens', 'rape'
+							end
+						else
+							act 'Take his money and Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Give back the money and Leave': money -= 100 & gt 'gdktoilet_womens', 'womens'
+						act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
+					end
+				else
+					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			end
+		else
+			act 'Stick your finger in the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghseenomen.jpg"></center>'
+		'Looking through the hole, you can see a row of urinals on the other side. The hole must be to the men''s room next door. You don''t see any men currently in there.'
+		act 'Leave': gt 'gdktoilet_womens', 'womens'
+		act 'Wait':
+			cla
+			'You decide stay and wait for someone to come.'
+			act 'Keep looking': gs 'gdktoilet_womens', 'hole'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin':
+	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghvirgin1.mp4"></video></center>'
+	'You tentatively reach out and gently touch the dick, half afraid to, but also half wanting to.'
+	
+	act 'Quickly leave the stall':
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
+		'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
+		act'Leave':gt 'gdktoilet_womens', 'womens'
+	end
+	act 'Grab it':
+		*clr & cla
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfeeling.mp4"></video></center>'
+		'Biting your lip and deciding you want to feel it some more, you reach over again and grab it. You caress it with your hand, it is harder than you expected and warm to the touch, it almost feels like it is throbbing in your hand. Unexplained feelings of excitement run through your body. You hear through the wall the guy saying, "Stop playing with it and stroke it." "Huh?" You reply, not knowing why he wants you to stroke it. He replies, "Really, you don''t know? Just grab it with your hand and slide it up and down."'
+		gs 'arousal', 'foreplay', 5, 'unknown'
+		gs 'stat'
+		gs 'willpower', 'hj', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'hj', 'resist', 'hard'
+				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
+				'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop?... Hello? Are you still there? What the fuck!"'
+				act 'Quickly get out': gt 'gdktoilet_womens', 'womens'
+			end
+		else
+			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Slide your hand on his penis':
+			*clr & cla
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstroke1.mp4"></video></center>'
+			'You decide to gently slide your hand on his dick. You feel his hard penis throb as you continue to slide your hand up and down. To your surprise you are really enjoying stroking the dick, your pussy starts to itch from the experience. As you get more turned on, you grab it with both hands and stroke it.'
+			gs 'arousal', 'hj', 5, 'unknown'
+			gs 'stat'
+			act 'Continue Stroking':
+				*clr & cla
+				minut +=5
+				gs 'arousal', 'end'
+				gs 'cum_call', 'hands', 'an unknown guy from the gloryhole'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghmastcum.mp4"></video></center>'
+				'Without any warning, hot white liquid spurts out the tip of his penis. You look at your hands, watching the sperm run down the back of your hand and down onto your arm. The man panting says, "That was," he takes another breath, "That was great."'
+				'You decide to lick a bit of the white liquid off your hand curiously wanting to know what it tastes like. It''s slimy and tastes tart.'
+				act 'Continue': gt 'gdktoilet_womens', 'emptystall'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'blowjob':
+	*clr & cla
+	guy += 1
+	ghnow += 1
+	gloryhole += 1
+	temp = rand(1,3)
+	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghbj<<temp>>.mp4"></video></center>'
+	'You wrap your lips around his dick and take his <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock in your mouth and start to suck it, you suck the cock enthusiastically.'
+	gs 'arousal', 'bj', 5, 'unknown', 'sub'
+	gs 'stat'
+	if stat['vaginal'] > 0 or stat['anal'] > 0:act 'Undress':gt 'gdktoilet_womens', 'ghsex'
+	act 'Continue to Suck':
+		*clr & cla
+		temp = rand(1, 3)
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghbj<<temp>>.mp4"></video></center>'
+		'You suck on his dick, bobbing your head, sometimes using your hands to stroke his shaft at the same time, other times your hands massage his balls. Before to long you hear the guy moan in pleasure, "I''m cuming."'
+		gs 'arousal', 'bj', 5, 'unknown', 'sub'
+		gs 'stat'
+		act 'Swallow':
+			*clr & cla
+			swallow += 1
+			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'end'
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
+			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+		end
+		gs 'willpower', 'swallow', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Step back (<<will_cost>> Willpower)':
+				*clr & cla
+				facial += 1
+				gs 'willpower', 'swallow', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
+				'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+			end
+		else
+			act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
+
+if $ARGS[0] = 'ghsex':
+	*clr & cla
+	gs 'stat'
+	'<center><b><font color="maroon">Empty Stall</font></b></center>'
+	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghundress.mp4"></video></center>'
+	'You let go of him and quickly undress, once you are naked you start stroking him again while you line yourself up with his dick. You badly want to fuck him.'
+	gs 'arousal', 'hj', 5, 'unknown', 'sub'
+	gs 'stat'
+	if stat['anal'] > 0: act 'Ass':gt 'gdktoilet_womens', 'anal'
+	if stat['vaginal'] > 0: act 'Pussy':gt 'gdktoilet_womens', 'pussy2'
+end
+
+if $ARGS[0] = 'anal':
+	*clr & cla
+	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghintoass.mp4"></video></center>'
+	'You rub your wet pussy and get your fingers nice and wet and then rub it on your asshole, you do the same to his dick, then you guide his <<npc_dick[$npclastgenerated]>>cm <<$npc_thdick[$npclastgenerated]>> cock into your ass. You feel his dick enter your tight ass, feelings of pain and pleasure rush through you.'
+	anal_slip += 4
+	gs 'arousal', 'masturbate', 5, 'unknown', 'sub'
+	gs 'arousal', 'anal', 5, 'unknown', 'sub'
+	minut -= 5
+	gs 'stat'
+	act 'Keep Going':
+		*clr & cla
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanal.mp4"></video></center>'
+
+		if pcs_ass < 10:
+			'The pain doesn''t fade and instead it starts to hurt worse after a while and the pleasure starts to fade. You fuck his dick with your ass, at first taking him deeper and deeper, as you get faster and faster. As the pleasure fades and the pain gets worse you slow down and don''t take him as deep. you start to rub your clit to help with the sensation of pleasure. You consider stopping as the pain gets worse, but you can tell by the throbbing of his dick and ragged breathing he is about to cum and decided to keep it up so he can finish.'
+		elseif pcs_ass < 20:
+			'The pain fades slowly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
+		else
+			'The pain fades quickly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
+		end
+		gs 'arousal', 'anal', 5, 'unknown', 'sub'
+		gs 'stat'
+		
+		gs 'willpower', 'anal', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'anal', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/analpain.jpg"></center>'
+				'The pain gets to be to much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
+				act 'Leave': gt 'gdktoilet_womens', 'womens'
+			end
+		else
+			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Let him cum in your ass':
+			*clr & cla
+			gs 'cum_call', 'anus', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'anal', 10, 'unknown', 'sub'
+			minut -= 9
+			gs 'arousal', 'end'
+			gs 'stat'
+			
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanalcream1.mp4"></video></center>'
+			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
+
+			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+		end
+		gs 'willpower', 'cum_inside_anal', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Let him cum all over your ass (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'cum_inside_anal', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'anal', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcumonass.jpg"></center>'
+				'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
+
+				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+			end
+		else
+			act 'Let him cum all over your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Turn around, kneel and let him cum in your mouth':
+			*clr & cla
+			swallow += 1
+			gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
+			'Once down on your knees you take his dick into your mouth and start sucking him, tasting your own ass on his dick. But you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+			gs 'arousal', 'bj', 10, 'unknown', 'sub'
+			minut -= 9
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+		end
+		gs 'willpower', 'swallow', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Turn around, kneel and let him cum on your face (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'swallow', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				facial += 1
+				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'hj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
+				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+
+				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
+			end
+		else
+			act 'Turn around, kneel and let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
+
+if $ARGS[0] = 'pussy':
+	if prezik > 0:
+		dynamic $prezik
+		protect = 1
+		if preziktype = 2:
+			sexcontra = 7
+			'You take one of your sabotaged condoms and put it on the stranger.'
+		else
+			sexcontra = 3
+			'You take a condom and put it on the stranger''s dick.'
+		end
+	else
+		sexcontra = 0
+	end
+end
+
+if $ARGS[0] = 'pussy2':
+	*clr & cla
+	gs 'stat'
+	if protect = 1:
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghsexcon.mp4"></video></center>'
+	else
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghsex.mp4"></video></center>'
+	end
+	gs 'gdktoilet_womens', 'pussy'
+	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly. After several minutes, you hear him on the other side of the wall yell out, "I''m gonna cum."'
+	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+	gs 'stat'
+	if protect ! 1:
+		act 'Allow him to cum inside':
+			*clr & cla
+			gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcreampie.mp4"></video></center>'
+			'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
+			gs 'cuminsidereact', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+			minut -= 9
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
+		end
+		gs 'willpower', 'cum_inside', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Quickly turn around and get on your knees (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'cum_inside', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				act 'Let him cum in your mouth':
+					*clr & cla
+					swallow += 1
+					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
+					'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+					gs 'arousal', 'bj', 10, 'unknown', 'sub'
+					minut -= 9
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
+				end
+				gs 'willpower', 'swallow', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Let him cum on your face (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'swallow', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						facial += 1
+						gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+						gs 'arousal', 'hj', 10, 'unknown', 'sub'
+						minut -= 9
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
+						'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+
+						act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
+					end
+				else
+					act 'Let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			end
+		else
+			act 'Quickly turn around and get on your knees (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		if sexcontra = 4:
+			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom burst."'
+		elseif sexcontra = 5:
+			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom is missing!"'
+		else
+			'<<$boydesc>> groaned and you realized that he came in the condom.'
+		end
+		sexcontra = 0
+		protect = 0
+
+		act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
+	end
+end
+
+if $ARGS[0] = 'rape':
+	*clr & cla
+	menu_off = 1
+	gs 'stat'
+	dick = rand(9, 25)
+	if rand(1, 20) > 12:
+		gs 'npcgeneratec', 0, 'rapist', rand(19,45)
+		gs 'boyStat', $npclastgenerated
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
+		'Just as you are leaving the women''s restroom a naked man storms out of the men''s restroom and grabs you by the hair and drags you inside the men''s room. He rips off your top and forces you down on your knees, shoving his dick in your mouth, forcing you to suck his dick.'
+		act 'Continue':
+			*clr & cla
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape4.mp4"></video></center>'
+			'You bite down his dick, which makes him pull his dick out of your mouth. "Fine you little fucking cunt, we''ll do this the hard way." He lifts you up and forces you between two urinals with your face up against the wall. He roughly shoves his cock in your ass, the only lubrication is the bit of your saliva still on his dick. It feels like he is ripping your ass open, you cry and scream. He just jackhammers your ass balls deep, while holding you by the throat.'
+			gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
+			minut -= 5
+			gs 'stat'
+			act 'Continue':
+				*clr & cla
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape1.mp4"></video></center>'
+				'As you scream he reaches up and clamps a hand over your mouth to muffle your screams, he continues you pound your ass balls deep with his dick. Not relenting no matter how much you struggle or cry. "You think it''s funny bitch to steal a man''s hard earned money, well you won''t think it is so funny after I am done with you. I''m going to fuck your ass till it bleeds like your cunt."'
+				'He keeps ripping your ass up with his dick, the pain is unbearable, but there is nothing you can do about it. You really wish you hadn''t taken his money and kept it.'
+				gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
+				minut -= 5
+				gs 'stat'
+				act 'Continue':
+					*clr & cla
+					rape += 1
+					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
+					'Finally he pulls the dick out of your ass and forces you back to your knees, he shoves his dick back in your mouth and you can taste your own ass on his dick. He says to you. "You fucking bite me again bitch and I will call everyone I know and we will train fuck your ass for days." Afraid he is serious you suck his dick until he finally shoots his load in your mouth.'
+					gs 'arousal', 'bj', 10, 'unknown', 'sub', 'rough'
+					minut -= 5
+					gs 'arousal', 'end'
+					gs 'stat'
+					'With that he lets go of you and walks off in disgust.'
+					'Grabbing your clothes you get up and run out of the bathroom and run all the way home, only once you are several blocks away do you stop to put your clothes back on.'
+					act 'Leave':gt 'korrPar'
+				end
+			end
+		end
+	elseif hour >= 20 and hour <= 23:
+		if music_on = 1:
+			$track_loop = 'sound/komb.mp3'
+			volume = 50
+			music_loop = 1
+			pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
+		else
+			music_loop = 0
+			close all
+			pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
+		end
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_yaho.jpg"></center>'
+		'You run into the crowd and start dancing to blend in. You hear a man yell out, "Where''s that bitch that took my money?" He storms off and you feel like it''s your lucky day today.'
+		act 'Dance':
+			*clr & cla
+			minut +=10
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_dance.jpg"></center>'
+			'You continue to dance until the man has left.'
+			act 'Stop': gt 'gdkin'
+		end
+	else
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
+		'You run from the community center and don''t stop until you are back in the residential area'
+		act 'Catch your breath': minut += 5 & gt 'pavResidential'
+	end
+end
+
+--- gdktoilet_womens ---------------------------------
+