glife/locations/pav_disco_sex.qsrc

# pav_disco_sex
!!2021/07/12
!! Scene 1: Outside the community center
if $ARGS[0] = 'outside':
	music_loop = 0
	close all
	if $ARGS[1] = 'aggressiv':
		gdk_nice_guy = 0
	elseif $ARGS[1] = 'nice':
		gdk_nice_guy = 1
	end

	$loc_arg = 'outside'
	$loc = 'pav_disco_sex'
	$location_type = 'event'
	menu_off = 1

	minut += 5
	gs 'stat'
	$boydesc = $npc_firstname[$npclastcalled]
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
	'You leave the disco with <<$npc_firstname[$boy]>> and walk into a quiet garden area.'

	if (gdk_nice_guy = 1 and fame['pav_slut'] < 70) or (gdk_nice_guy = 0 and fame['pav_slut'] < 30):
		'He pulls out a six pack and offers you a beer as you both sit down on a fallen tree.'
		gs 'willpower', 'drink', 'resist'
		if will_cost <= pcs_willpwr:
			act 'Don''t drink the beer (<<will_cost>> Willpower)':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/outside_talk.jpg"></center>'
				if alko < 6: 'You smile at him as you shake your head. "No thanks, I''m not really in the mood for a beer right now."'
				if alko >= 6: '"No, I don''t thi-*hic* think I should... *hic*" you manage to drunkenly mumble.'
				'<<$npc_firstname[$boy]>> offers you a disarming smile. "Alright, no problem! We can just chat!"'
				act 'Chat with him':
					*clr & cla
					minut+=10
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/outside_talk.jpg"></center>'
					'You spend some time getting to know <<$npc_firstname[$boy]>> a bit better before he checks his watch. "I have to get going, but I really enjoyed chatting with you!"'
					randvnesh = rand(40,120)

					deystrand = rand(0,2)
					if deystrand = 0 and pcs_apprnc >= randvnesh:
						'"I would love to see you again! How about you give me your number, so we can go on a date some time?" he adds.'

						act 'Decline and go back to the disco': gt 'pav_disco'
						act 'Give him your number':
							*clr & cla
							pcs_mood += 10
							minut += 30
							gs 'boygirl', 0
							bmFrend[Tboynum] = 1
							gs 'boyfrend', 'start'
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/outside_talk.jpg"></center>'
							'You smile and give him your phone number, which he diligently adds to his phone.'
							'"I hope I''ll see you again soon, <<$pcs_firstname>>. I''ll call you!" he says as he packs up his things. You get up and chat with him as you head back to the disco.'
							act 'Return to the disco': gt 'pav_disco'
						end
					elseif deystrand > 0 or pcs_apprnc < randvnesh:
						'<<$npc_firstname[$boy]>> scoots over until he''s right next to you and kisses you.'

						act 'Go back to the disco': gt 'pav_disco'

						gs 'pav_disco_sex', 'kissing'
					end
				end
				act 'Go back to the disco': gt 'pav_disco'
			end
		else
			act 'Don''t drink the beer (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		act 'Have a beer':
			*clr & cla
			gs 'drugs', 'alcohol', 'beer'
			minut += 10
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/drink_beer.jpg"></center>'
			'You accept the beer and chat with <<$npc_firstname[$boy]>> as you drink it. He''s amusing and tells you some hilarious stories.'

			if alko >= 6:
				pcs_horny += 20
				'<<$npc_firstname[$boy]>> scoots over until he''s right next to you and closes his arms around you. He pulls you in and kisses your lips passionately, making your heart flutter. Wow, he''s a good kisser!'
				'You then feel his hands on your chest...'

				if fame['pav_slut'] < 50:
					gs 'willpower', 'sex', 'resist'
					if will_cost <= pcs_willpwr:
						act 'Ask him to stop (<<will_cost>> Willpower)':
							*clr & cla
							minut += 5
							gs 'willpower', 'sex', 'resist'
							gs 'willpower', 'pay', 'resist'
							gs 'stat'

							if DPtipe = 2:
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/grab_tit.jpg"></center>'
								'He''s too drunk to notice your objections and slides a hand underneath your clothes, squeezing your breasts.'
								act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'unpaid'

								act 'Don''t say anything':
									*clr & cla
									minut += 5
									pcs_horny += 10

									if boynumBlock = 0: guy += 1

									gs 'boymass', 'B'
									bmSEX[Tboynum] += 1
									gs 'boyStat', $bmNane[Tboynum]

									if gdk_nice_guy = 1:
										gs 'fame', 'pav', 'sex', rand(0,2)
									elseif gdk_nice_guy = 0:
										gs 'fame', 'pav', 'sex', rand(2,4)
									end

									bmGossip[Tboynum] = 1

									gs 'stat'
									'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
									'He roughly undresses you, too horny and drunk to care about your feelings. Then, before you know it, you''re naked on the ground before him as he stands over you with his <<$dick_girth>> cock hanging out of his pants.'
									gs 'dinSex', 'wear_condom'
									gs 'dinsex','vaginal_sex',10
									gs 'dinsex','sexcum'

									act 'Leave': gt 'pav_commcenter'
								end
							else
								pcs_horny += 10
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/tits.jpg"></center>'
								'<<$npc_firstname[$boy]>>''s head slumps for a moment, and his movements slow down, but he''s unwilling to let go of your breasts.'

								if fame['pav_slut'] < 150:
									gs 'willpower', 'bj', 'resist'
									if will_cost <= pcs_willpwr:
										act 'Go back to the disco':
											gs 'willpower', 'bj', 'resist'
											gs 'willpower', 'pay', 'resist'
											gs 'stat'
											gt 'pav_disco'
										end
									else
										act 'Go back to the disco (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
									end
								end

								'You''re feeling rather horny yourself, and don''t object to his actions. You moan softly when he exposes your breasts, licking and sucking on your nipples.'
								act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'unpaid'
							end

							gs 'pav_disco_sex', 'handjob'
						end
					else
						act 'Ask him to 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

				act 'Don''t say anything':
					*clr & cla
					minut += 5
					pcs_horny += 10

					if boynumBlock = 0: guy += 1
					if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1

					bmSEX[Tboynum] += 1
					gs 'boyStat', $bmNane[Tboynum]

					if gdk_nice_guy = 1:
						gs 'fame', 'pav', 'sex', rand(0,2)
					elseif gdk_nice_guy = 0:
						gs 'fame', 'pav', 'sex', rand(2,4)
					end
					bmGossip[Tboynum] = 1

					gs 'stat'
					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
					'He roughly undresses you, too horny and drunk to care about your feelings. Then, before you know it, you''re naked on the ground before him as he stands over you with his <<$dick_girth>> cock hanging out of his pants.'
					gs 'dinSex', 'wear_condom'
					gs 'dinsex','vaginal_sex',10
					gs 'dinsex','sexcum'

					act 'Leave': gt 'pav_commcenter'
				end
			elseif alko < 6:
				if DPtipe = 1:
					randvnesh = rand(40,120)
					deystrand = rand(0,1)

					if deystrand = 0 and pcs_apprnc >= randvnesh:
						'He checks his watch and frowns. "I have to get going, but I would love to see you again! How about you give me your number, so we can go on a date sometime?"'

						act 'Decline and go back to the disco': gt 'pav_disco'
						act 'Give him your number':
							*clr & cla
							pcs_mood += 10
							gs 'boygirl', 0
							minut += 30
							bmFrend[Tboynum] = 1
							gs 'boyfrend', 'start'
							gs 'stat'
							'You smile and give him your number, which he diligently adds to his phone.'
							'"I hope I''ll see you again soon, <<$pcs_firstname>>. I''ll call you!" he says as he packs up his things. You get up as well, and chat with him as you head back to the disco.'
							act 'Go back to the disco': gt 'pav_disco'
						end
					elseif deystrand = 1 or pcs_apprnc < randvnesh:
						'<<$npc_firstname[$boy]>> scoots over until he''s right next to you and kisses you.'

						if fame['pav_slut'] < 50:
							gs 'willpower', 'mast', 'resist'
							if will_cost <= pcs_willpwr:
								act 'Go back to the disco (<<will_cost>> Willpower)':
									gs 'willpower', 'mast', 'resist'
									gs 'willpower', 'pay', 'resist'
									gs 'stat'
									gt 'pav_disco'
								end
							else
								act 'Go back to the disco (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
							end
						end

						gs 'pav_disco_sex', 'kissing'
					end
				elseif DPtipe = 2:
					pcs_horny += 5
					gs 'stat'
					'<<$npc_firstname[$boy]>> scoots over until he''s right next to you and kisses you.'

					if fame['pav_slut'] < 50:
						gs 'willpower', 'mast', 'resist'
						if will_cost <= pcs_willpwr:
							act 'Go back to the disco (<<will_cost>> Willpower)':
								gs 'willpower', 'mast', 'resist'
								gs 'willpower', 'pay', 'resist'
								gs 'stat'
								gt 'pav_disco'
							end
						else
							act 'Go back to the disco (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
						end
					end

					gs 'pav_disco_sex', 'kissing'
				end
			end
		end
	elseif (gdk_nice_guy = 1 and fame['pav_slut'] >= 70 and fame['pav_slut'] < 130) or (gdk_nice_guy = 0 and fame['pav_slut'] >= 30 and fame['pav_slut'] < 70):
		gs 'drugs', 'alcohol', 'beer'
		minut += 15
		gs 'stat'
		'He pulls out a six-pack and offers you a beer as you sit down on a fallen tree.'
		'You accept the beer and chat with <<$npc_firstname[$boy]>> as you drink it. He''s amusing and tells you some hilarious stories.'
		'He then scoots next to you and kisses you on the lips.'

		gs 'pav_disco_sex', 'decline', 70
		gs 'pav_disco_sex', 'kissing'
	elseif (gdk_nice_guy = 1 and fame['pav_slut'] >= 130 and fame['pav_slut'] < 200) or (gdk_nice_guy = 0 and fame['pav_slut'] >= 70 and fame['pav_slut'] < 130):
		if rand(0,3) = 0:
			'I heard you''re pretty good with your mouth <<$pcs_firstname>>, so let''s have some fun!"'
			'He pulls his cock out of his pants and looks at you expectantly.'
		else
			'I heard you''re quite the tease, <<$pcs_firstname>>. So come on, let''s have some fun!"'
			'He pulls his cock out of his pants and looks at you expectantly.'
		end

		gs 'pav_disco_sex', 'decline', 130
		gs 'pav_disco_sex', 'handjob'
		act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'unpaid'
	elseif (gdk_nice_guy = 1 and fame['pav_slut'] >= 200 and fame['pav_slut'] < 250) or (gdk_nice_guy = 0 and fame['pav_slut'] >= 130 and fame['pav_slut'] < 150):
		'My buddies told me you''re a <<$gnikname>>. So I want to have some fun with you too!"'
		'He pulls his cock out of his pants and looks at you expectantly.'

		gs 'pav_disco_sex', 'decline', 200
		gs 'pav_disco_sex', 'handjob'
		act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'unpaid'
	elseif (gdk_nice_guy = 1 and fame['pav_slut'] >= 250) or (gdk_nice_guy = 0 and fame['pav_slut'] >= 150):
		gs 'boymass', 'B'
		'"Let''s cut the crap; the whole town knows you''re a slut. I want a blowjob, so here''s 100<b>₽</b>."'
		'He pulls his cock out of his pants and looks at you expectantly.'

		gs 'pav_disco_sex', 'decline', 250
		act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'paid'
	end

	if (gdk_nice_guy = 1 and fame['pav_slut'] >= 130) or (gdk_nice_guy = 0 and fame['pav_slut'] >= 70):
		gs 'willpower', 'sex', 'resist', 'hard'
		if will_cost <= pcs_willpwr:
			act 'Tell him to fuck off (<<will_cost>> Willpower)':
				cla
				minut += 3
				if gdk_nice_guy = 1:
					if fame['pav_sex'] > 10: gs 'fame', 'pav', 'sex', rand(-2,-4)
					if fame['pav_prostitute'] > 10: gs 'fame', 'pav', 'prostitute', rand(-2,-4)
				elseif gdk_nice_guy = 0:
					if fame['pav_sex'] > 10: gs 'fame', 'pav', 'sex', rand(0,-2)
					if fame['pav_prostitute'] > 10: gs 'fame', 'pav', 'prostitute', rand(0,-2)
				end
				gs 'willpower', 'sex', 'resist', 'hard'
				gs 'willpower', 'pay', 'self'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/pc/reactions/fuckoff3.jpg"></center>'
				'"What the fuck!?" you shout angrily. "What kind of idiot are you!? You can''t just tell a girl to do that!"'
				'<<$npc_firstname[$boy]>> is taken aback by your sudden outburst. "But... the boys said that yo-"'
				'"That doesn''t make it true! Men can be so gullible sometimes!" you tell him, barely holding yourself back from screaming it at him.'
				*nl
				'<<$npc_firstname[$boy]>> is seriously rattled now and quickly apologizes. "Look, I''m sorry! I didn''t know they were having a laugh!"'
				'You shrug and leave without saying another word, secretly smiling to yourself. Men really <i>are</i> gullible sometimes.'
				'While walking back to the disco, several guys give you confused looks. The word spreads fast, and guys get a message that you''re no easy lay after all. Your reputation improves a little as a result.'

				act 'Go back to the disco': gt 'pav_disco'
			end
		else
			act 'Tell him to fuck off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end

		if ((gdk_nice_guy = 1 and fame['pav_slut'] < 250) or (gdk_nice_guy = 0 and fame['pav_slut'] < 150)) and (slutty > 0):
			act 'Tell him you''ll do it for money':
				cla
				minut += 3
				if gdk_nice_guy = 1:
					gs 'fame', 'pav', 'prostitute', rand(1,3)
				elseif gdk_nice_guy = 0:
					gs 'fame', 'pav', 'prostitute', rand(3,9)
				end
				money += 200
				slutty += 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/outside_talk.jpg"></center>'
				if slutty <= 10: 'You take a deep breath. You don''t want to touch him, but you can get something out of it. "I don''t do favours like that for just anyone! If you pay me, however..." you shrug.'
				if slutty > 10: 'You''ve done worse. "200<b>₽</b>." is all you say.'
				'<<$npc_firstname[$boy]>> looks a little confused but gives you 200<b>₽</b>.'

				act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'paid'
			end
		end
	end
end

if $ARGS[0] = 'decline':
	if fame['pav_slut'] < ARGS[1]:
		gs 'willpower', 'sex', 'resist'
		if will_cost <= pcs_willpwr:
			act 'Decline and leave (<<will_cost>> Willpower)':
				*clr & cla
				minut += 5
				gs 'willpower', 'sex', 'resist'
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/walkoff.jpg"></center>'
				'You just laugh at him. "Put that away because I''m going anywhere near it!"'
				'You then leave without saying another word, ignoring his pleas.'

				act 'Go back to the disco': gt 'pav_disco'
			end
		else
			act 'Decline 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
	end
end

if $ARGS[0] = 'kissing':
	act 'Kiss him back':
		*clr & cla
		pcs_horny += 5
		minut += 3
		gs 'boymass', 'B'
		bmKISS[Tboynum] += 1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/outside_kiss.jpg"></center>'
		'You lean in and reciprocate the kiss before you feel his hands on your chest.'

		if fame['pav_slut'] < 100:
			gs 'willpower', 'mast', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Go back to the disco (<<will_cost>> Willpower)':
					gs 'willpower', 'mast', 'resist'
					gs 'willpower', 'pay', 'resist'
					gs 'stat'
					gt 'pav_disco'
				end
			else
				act 'Go back to the disco (<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 'Let him':
			*clr & cla
			gs'arousal','foreplay', 3
			bmTITS[Tboynum] += 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/tits.jpg"></center>'
			'You ignore <<$npc_firstname[$boy]>>''s hands and kiss him, letting him pull your clothes aside, so your <<$titsize>> breasts fall out. He kneads them eagerly and continues to kiss and lick them, making your nipples poke out fiercely in the evening air.'
			'You moan under his touch, letting your leg slide between his. You can feel his cock brushing up against your thigh, stiff as a rock.'
			
			if rand(0,1) = 1:
				*nl
				'"Hey," he breathes between kisses. "Why don''t we take this back to my place?"'
				
				act'Pull out his cock':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
					'You reach down his pants, grab hold of his erection and pull it out.'
					'"Why wait?" you grin, steadily stroking him.'
					gs'pav_disco_sex','handjob'
				end
				
				act'Sure':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/tits.jpg"></center>'
					'You pull your clothes back into place before letting him drag you away.'
					act'Go to his place':gt 'sex_ev_start', 'hookup_npc_home_start'
				end
				
				gs 'family_schedule'
				if locat['Fam_inGad'] = 1:
					act'Invite him home (hookup)':
						cla & *clr
						gs 'fame', 'pav', 'sex', 1
						'<center><img src="images/locations/pavlovsk/community/disco/outside_kiss.jpg"></center>'
						'"How about mine instead?" you ask. With a sultry smirk, you lean in to whisper in <<$npc_firstname[$boy]>>''s ear.'
						'"<i>My parents aren''t home tonight...</i>"'
						'The look in his eyes is all you need to know and the two of you rush back to the estate together.'
						act 'Continue':gt 'sex_ev_start', 'hookup_pc_home_start'
					end
				end
			else
				if fame['pav_slut'] < 150:
					gs 'willpower', 'mast', 'resist'
					if will_cost <= pcs_willpwr:
						act 'Go back to the disco (<<will_cost>> Willpower)':
							killvar 'gdk'
							gs 'willpower', 'mast', 'resist'
							gs 'willpower', 'pay', 'resist'
							gs 'stat'
							gt 'pav_disco'
						end
					else
						act 'Go back to the disco (<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 fame['pav_slut'] < 250:
					act 'Let him finger you':
						*clr & cla
						gs'arousal','vaginal_finger', 3
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/petting.jpg"></center>'
						'As soon as you pull your hand away from his groin, <<$npc_firstname[$boy]>> slips his hand underneath your clothes, rubbing two fingers against your pussy. You were already somewhat turned on and softly moaned when he slid his finger back and forth over your wet lips.'

						if fame['pav_slut'] < 200:
							gs 'willpower', 'mast', 'resist', 'hard'
							if will_cost <= pcs_willpwr:
								act 'Remove his hands and walk away (<<will_cost>> Willpower)':
									gs 'willpower', 'mast', 'resist', 'hard'
									gs 'willpower', 'pay', 'resist'
									gs 'stat'
									gt 'pav_disco'
								end
							else
								act 'Remove his hands and walk 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 'Let him continue':
								cla
								pcs_horny = 0
								orgasm += 1
								gs 'stat'
								'He has an expert touch and quickly brings you to an intense orgasm. You bite your lip hard, trying your best not to cry out in ecstasy.'
								act 'Moan and catch your breath':
									*clr & cla
									pcs_horny += 5
									minut += 3
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/shared/sex/cock/cock3.jpg"></center>'
									'Once the most intense part of your orgasm is over, you relax and moan softly with pleasure. In your daze, your legs can''t support your weight, and you drop to your knees in front of <<$npc_firstname[$boy]>>.'
									'When you catch your breath, you see <<$npc_firstname[$boy]>>''s erect cock directly in front of your face!'

									act 'Suck it':
										*clr & cla
										minut += 5
										pcs_horny += 10
										stat['bj'] += 1

										if boynumBlock = 0: guy += 1
										if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1

										bmBJ[Tboynum] += 1
										gs 'stat'
										'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/cocksuck.jpg"></center>'
										'Without even realizing it, you move in. Then, after a few kisses and licks, you let it slide into your mouth and diligently suck him off.'

										act 'Continue':
											*clr & cla
											minut += 5
											pcs_horny += 10
											spafinloc = 12
											gs 'cum_manage'
											spafinloc = 11
											gs 'cum_manage'
											spafinloc = 7
											gs 'cum_manage'

											if gdk_nice_guy = 1:
												pav_sex += rand(1,3)
											elseif gdk_nice_guy = 0:
												pav_sex += rand(3,9)
											end

											bmGossip[Tboynum] = 2

											gs 'stat'
											'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cocksuck2.jpg"></center>'
											'Without warning, a jet of warm cum shoots into your mouth. You almost gag in surprise but suppress it and continue to suck his dick. You can''t stop him from pulling his cock out of your mouth and shooting the last few drops of his load over your face.'
											'Some of his cum drips down onto your clothes as he tucks his cock back into his pants with a satisfied grin.'

											act 'Look at him':
												*clr & cla
												minut += 1
												gs 'stat'
												'<center><img <<$set_imgh>> src="images/shared/sex/cum/cocksuck3.jpg"></center>'
												'<<$npc_firstname[$boy]>> still has his hand on your head. "Look at me." he grunts.'
												'You look him in the eye, your mouth half open. His load is still on your tongue, and you''re unsure whether you should spit it out.'
												'He gives you a blissful smile. "You''re an amazing cocksucker, <<$pcs_nickname>>! That was great."'
												gs 'willpower', 'swallow', 'resist'
												if will_cost <= pcs_willpwr:
													act 'Spit (<<will_cost>> Willpower)':
														cla
														minut += 1
														gs 'willpower', 'swallow', 'resist'
														gs 'willpower', 'pay', 'resist'
														gs 'stat'
														*nl
														'Realizing he doesn''t care, you discreetly spit his load out and stand up. Hopefully, he won''t tell anyone about what you just did...'
														act 'Leave': gt 'pav_commcenter'
													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
												act 'Swallow':
													cla
													minut += 1
													stat['swallow'] += 1
													gs 'stat'
													*nl
													'Realizing he doesn''t care, you gulp down his load and stand up. Hopefully, he won''t tell anyone about what you just did...'
													act 'Leave': gt 'pav_commcenter'
												end
											end
										end
									end
									gs 'willpower', 'hj', 'resist'
									if will_cost <= pcs_willpwr:
										act 'Stare at it (<<will_cost>> Willpower)':
											*clr & cla
											minut += 5

											if boynumBlock = 0: guy += 1
											if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1

											
											spafinloc = 11
											gs 'cum_manage'
											spafinloc = 7
											gs 'cum_manage'
											gs 'willpower', 'hj', 'resist'
											gs 'willpower', 'pay', 'resist'
											gs 'stat'
											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/facial.jpg"></center>'
											'You remain kneeling in front of <<$npc_firstname[$boy]>> as you stare at his erection, still softly panting as you recover from your orgasm. He then begins to jerk off in front of you.'
											'In no time at all, his cock erupts, and a thick glob of his cum lands on your nose. <<$npc_firstname[$boy]>> groans loudly as he shoots several more jets of his cum onto your face. You flinch, close your eyes, and don''t dare open them again until you''re sure he''s finished.'

											act 'Leave': gt 'pav_commcenter'
										end
									else
										act 'Stare at 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', 'bj', 'resist'
									if will_cost <= pcs_willpwr:
										act 'Jerk him off (<<will_cost>> Willpower)':
											*clr & cla
											minut += 5

											if boynumBlock = 0: guy += 1
											if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1

											bmHJ[Tboynum] += 1
											stat['hj'] += 1
											gs 'willpower', 'bj', 'resist'
											gs 'willpower', 'pay', 'resist'
											gs 'stat'
											'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
											'You stand up confidently and smile at him. "That was great! Now, I believe I owe you something."'
											'Wrapping your fingers around his cock, you jerk him off while kissing him again. You let him grab your breasts while you stroke his length, and in no time at all, he lets out a muffled groan as thick gobs of cum land on the ground.'

											act 'Go back to the disco': gt 'pav_disco'
										end
									else
										act 'Jerk him off (<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
						end
					end
				end

				act 'Caress his cock through his pants':
					*clr & cla
					pcs_horny += 5
					minut += 3
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/shared/sex/grab/cock.jpg"></center>'
					'You kiss <<$npc_firstname[$boy]>> again while you begin to stroke his cock through his pants, feeling the outline of it very clearly through the fabric.'
					'"Mmmm... do you have something for me?" you ask him sweetly, and he lets out a needy groan.'

					if fame['pav_slut'] < 150:
						gs 'willpower', 'mast', 'resist'
						if will_cost <= pcs_willpwr:
							act 'Go back to the disco (<<will_cost>> Willpower)':
								gs 'willpower', 'mast', 'resist'
								gs 'willpower', 'pay', 'resist'
								gs 'stat'
								gt 'pav_disco'
							end
						else
							act 'Go back to the disco (<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 'Stick your hand down his pants':
						*clr & cla
						pcs_horny += 10
						minut += 3
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/shared/sex/grab/cock2.jpg"></center>'
						'You slide your hand into his pants and caress his hard cock. Then, after a few teasing moments, you pull his pants down and let his cock spring free.'

						if fame['pav_slut'] < 150:
							gs 'willpower', 'mast', 'resist'
							if will_cost <= pcs_willpwr:
								act 'Go back to the disco (<<will_cost>> Willpower)':
									gs 'willpower', 'mast', 'resist'
									gs 'willpower', 'pay', 'resist'
									gs 'stat'
									gt 'pav_disco'
								end
							else
								act 'Go back to the disco (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
							end
						end

						gs 'pav_disco_sex', 'handjob'

						act 'Squat down before him': gt 'pav_disco_sex', 'blowjob', 'unpaid'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'handjob':
	act 'Jerk him off':
		*clr & cla
		gs 'boymass', 'B'
		bmHJ[Tboynum] += 1
		gs 'arousal', 'hj', 5, 'no_orgasm_msg'
		gs 'stat'

		if gdk_nice_guy = 1:
			if boynumBlock = 0: guy += 1
			if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1
			gs'cum_call','hands',$boy,1
			stat['hj'] += 1
			'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
			'You move your hand up and down his shaft, slowly picking up the pace while shoving your tongue down his throat.'
			act'Make him cum':
				cla & *nl
				'You soon feel his breaths getting shorter, and you feel his body start to stiffen up. Pointing his cock away from you, you pull back from the kiss and keep working his shaft off until you see him cum, his load splattering on the ground. You keep jerking him until you''ve released everything he has, the remains dribbling down your fingers still wrapped around his cock.'
				gs'pav_disco_sex','handjob_end'
			end
			
			act 'Squat down and blow him': gt 'pav_disco_sex', 'blowjob', 'unpaid'
		elseif gdk_nice_guy = 0:
			'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
			'You move your hand up and down his shaft, slowly picking up the pace while you kiss him dominantly.'
			'<<$npc_firstname[$boy]>> wants more and suddenly places his hands on your shoulder. Then, he firmly pushes downwards trying to force you to squat before him.'
			
			gs 'willpower', 'bj', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Make him cum (<<will_cost>> Willpower)':
					cla & *nl
					gs 'willpower', 'pay', 'resist'
					gs 'arousal', 'hj', rand(1,5), 'no_orgasm_msg'
					gs'cum_call','hands',$boy,1
					gs 'stat'
					'With a wry smirk, you stand your ground instead, gripping his length harder and jerking faster. He may want a blowjob, but with your cock in his hand, you''re the one in control. It''s only a matter of time before he groans and releases a hot load that dribbles down your fingers.'
					gs'pav_disco_sex','handjob_end'
				end
			else
				act 'Make him cum (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			
			act 'Squat down and blow him': gt 'pav_disco_sex', 'blowjob', 'unpaid'
		end
	end
end

if $ARGS[0] = 'handjob_end':
	act 'Leave him and go back to the disco':
		gs'arousal','end'
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'You release him and quickly begin walking away, '
		'"See you later!" you grin while waggling your cum covered fingers at him, leaving him with his cock hanging out and covered in his own cum.'
		act 'Head back inside':gt'pav_disco'
		
		if pcs_traits['cumeater'] > 0:
			act 'Lick your hand clean on the way':
				cla & *clr
				stat['swallow'] += 1
				cumspclnt = 9
				gs'cum_cleanup'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'On your way back inside, you run your tongue along your hand, licking up the cum that webs across your fingers. You swallow every last drop just before getting to the door and head back inside.'
				act 'Continue':gt'pav_disco'
			end
		end
		
		if mc_inventory['makeup_wipes'] > 0:
			act'Wipe your hand off and head in':
				cla & *clr
				mc_inventory['makeup_wipes'] -= 1
				cumspclnt = 9
				gs'cum_cleanup'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'On your way back inside, you pull some wipes from your bag and clean your hands, tossing the cum covered wipe before you step through the doors.'
				act 'Continue':gt'pav_disco'
			end
		end		
	end
	
!!{	act 'That was fun':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'Releasing <<$npc_firstname[$boy]>>''s cock, you pull away from him.'
		'"That was fun," you grin, eyeing the cum webbing your fingers.'
		'"Fuck..." he breathes, still coming down from your handjob.'
		
	end}
end

if $ARGS[0] = 'blowjob':
	*clr & cla
	!!stat['bj'] += 1
	if $ARGS[1] = 'paid':
		gs'arousal','bj', rand(3,7), 'prostitution'
		money += 100
		if gdk_nice_guy = 1:
			gs 'fame', 'pav', 'prostitute', rand(1,3)
		elseif gdk_nice_guy = 0:
			gs 'fame', 'pav', 'prostitute', rand(3,9)
		end
	else
		gs'arousal','bj', rand(3,7)
	end
	
	if gdk_nice_guy = 1:
		gs 'fame', 'pav', 'sex', rand(1,3)
	elseif gdk_nice_guy = 0:
		gs 'fame', 'pav', 'sex', rand(3,9)
	end
	if boynumBlock = 0: guy += 1
	if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1

	gs 'boymass', 'B'
	bmBJ[Tboynum] += 1
	gdk['bj'] = 1
	gs 'stat'
	'<center><video autoplay loop src="images/shared/sex/public/outdoor/bj1.mp4"></video></center>'
	if gdk['fuck'] = 2:
		'You squat down before <<$npc_firstname[$boy]>> and get back to work on his cock.'
	end
	'You squat down in front of <<$npc_firstname[$boy]>> and begin working his cock with your hand and mouth. He groans under your touch, and you see him tilting his head back in pleasure above you.'
	*nl
	if rand(0,1) = 0 or gdk['fuck'] = 2:
		gdk['cum'] = rand(1,3)
		if gdk['cum'] = 1:
			'After several minutes, you feel <<$npc_firstname[$boy]>> begin to stiffen up.'
			'"I''m-! Gonna cum-!" he grunts.'
			act 'Keep sucking':gt'pav_disco_sex','disco_cum_mouth'
			
			act'Let him cum on your face':gt'pav_disco_sex','disco_cum_facial'
		elseif gdk['cum'] = 2:
			act 'Continue':
				gs'cum_call','mouth',$boy,1
				$gdk['cum'] = 'mouth'
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,3.mp4"></video></center>'
				'You continue working his cock for several minutes until <<$npc_firstname[$boy]>> grunts, and a thick salty liquid pours into your mouth without warning.'
				act 'Cough':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
					'You retch, coughing up the cum that suddenly appeared in your mouth and looking back at him with tears in your eyes.'
					gs'pav_disco_sex','disco_mouth_react1'
				end
				
				act 'Swallow':
					cla & *nl
					'Not knowing what else to do, you reflexively swallow, gulping down the cum spurting from <<$npc_firstname[$boy]>>''s cock. Soon enough, nothing else comes out, and you pull back, looking up at him.'
					gs'pav_disco_sex','disco_mouth_react2'
				end
			end
		else
			act 'Continue':
				gs'cum_call','face',$boy,1
				$gdk['cum'] = 'facial'
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/public/outdoor/cum_facial1.mp4"></video></center>'
				'You continue working his cock for several minutes until <<$npc_firstname[$boy]>> pushes you off him and begins rapidly jerking himself above your face. You close your eyes, and cum splatters across your face moments later.'
				act 'Smile':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/public/outdoor/facial_after1.mp4"></video></center>'
					'"Well, that was fun." You smile at <<$npc_firstname[$boy]>> as he tucks his cock inside his pants.'
					if gdk['fuck'] = 1:
						'"Yeah, you''ve got a great pussy."'
					else
						'"Yeah, you''ve got a great mouth."'
					end
					act 'Continue':gt'pav_disco_sex','disco_sex_end'
				end
				
				act'Clean him with your mouth':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/public/outdoor/bj2.mp4"></video></center>'
					'"Here, let me get that for you," you say, leaning forward and running your mouth up and down his cock, making sure he''s well and truly sucked dry before standing up again.'
					act 'Continue':gt'pav_disco_sex','disco_sex_end'
				end
			end
		end
	else
		gs'pav_disco_sex','fuck_pre1'
	end
end

if $ARGS[0] = 'insert':
	if PCloSkirt > 0 and $pantyworntype = 'none':
		'You smile eagerly, quickly bending over and flipping your skirt up to show <<$npc_firstname[$boy]>> your bare ass.'
		if npc_condom_conscious[$boy] > 0 and gdk['condom'] = 0:
			'"I thought I saw you weren''t wearing panties when we were dancing," <<$npc_firstname[$boy]>> snickers, rolling a condom onto his cock and lining himself up with your pussy.'
		else
			'"I thought I saw you weren''t wearing panties when we were dancing," <<$npc_firstname[$boy]>> snickers, lining his ' + iif(gdk['condom'] = 0, 'cock up with your pussy.', 'condom wrapped cock up with your pussy.')
		end
	elseif PCloSkirt > 0:
		'You smile eagerly, quickly bending over and pulling your panties from under your skirt to your knees.'
		if npc_condom_conscious[$boy] > 0 and gdk['condom'] = 0:
			'Behind you, <<$npc_firstname[$boy]>> rolls a condom onto his cock before lining himself up with your pussy.'
		else
			'<<$npc_firstname[$boy]>> moves in behind you, lining his ' + iif(gdk['condom'] = 0, 'cock up with your pussy.', 'condom wrapped cock up with your pussy.')
		end
	elseif $pantyworntype = 'none':
		'You smile eagerly, quickly bending over and pulling down your pants to show <<$npc_firstname[$boy]>> your bare ass.'
		if npc_condom_conscious[$boy] > 0 and gdk['condom'] = 0:
			'"Looks like you came ready for this," <<$npc_firstname[$boy]>> snickers, rolling a condom onto his cock and lining himself up with your pussy.'
		else
			'"Looks like you came ready for this," <<$npc_firstname[$boy]>> snickers, lining his ' + iif(gdk['condom'] = 0, 'cock up with your pussy.', 'condom wrapped cock up with your pussy.')
		end
	else
		'You smile eagerly, grabbing your pants and panties and pulling them down to your knees in one tug.'
		if npc_condom_conscious[$boy] > 0 and gdk['condom'] = 0:
			'Behind you, <<$npc_firstname[$boy]>> rolls a condom onto his cock before lining himself up with your pussy.'
		else
			'<<$npc_firstname[$boy]>> moves in behind you, lining his ' + iif(gdk['condom'] = 0, 'cock up with your pussy.', 'condom wrapped cock up with your pussy.')
		end
	end
end

if $ARGS[0] = 'virgin_fuck':
	gdk['virgin'] = 1
	gs'arousal','vaginal', rand(3,7), 'no_orgasm_msg'
	'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_fuck1.mp4"></video></center>'
	'<<$npc_firstname[$boy]>> thrusts into your pussy, and you gasp in pain as his cock pierces your hymen. You''re not sure exactly what you expected sex to feel like, but you did hope it would feel better than this.'
	act 'This hurts!':
		cla & *nl
		$orgasm_or = 'no'
		if pcs_horny > 50:pcs_horny -= 50
		'You grunt your way through the discomfort of the next few minutes. You try to focus on the sensations, hoping they will start feeling good, but it never does. It just feels like being stabbed repeatedly. <i>In your pussy.</i> It''s awful and painful, and you can''t wait for it to stop. The only other sensation you can feel is the blood of your virginity running down your leg.'
		*nl
		gs'pav_disco_sex','disco_cum'
	end
	
	act 'Don''t feel much':
		cla & *nl
		$orgasm_or = 'no'
		if pcs_horny > 50:pcs_horny -= 40
		'Within a minute, the initial pain fades. After that, you hope it''ll start to feel good, but... it doesn''t actually feel like anything. Just a sort of "pressure" moving in and out of you. It doesn''t feel good, it doesn''t feel bad, it just sort of... feels. The only thing you can feel is the blood of your virginity running down your leg.'
		*nl
		gs'pav_disco_sex','disco_cum'
	end
	
	act 'Start to feel good':
		cla & *nl
		'Within a minute, the initial pain fades. And after that, you start to feel <i>really good</i>. <<$npc_firstname[$boy]>>''s cock just "fills" you in a way you''ve never experienced before. Soon, you''re thrusting your hips back to meet his, chasing after this brand-new pleasure.'
		*nl
		'<i>Why did I wait this long to have sex?!</i> You think to yourself.'
		*nl
		gs'pav_disco_sex','disco_cum'
	end
end


if $ARGS[0] = 'fuck_pre1':
	'After a few minutes, <<$npc_firstname[$boy]>> pushes your head away and pulls you to your feet, facing you towards the wall. "I want to fuck your pussy."'
	act 'Refuse':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'"Hey!" You quickly turn back around, putting your hands over your crotch. "What do you think you''re doing?"'
		'"I just told you I want to fuck you."'
		'"Well, <i>I</i> don''t you want to!"'
		'"Why not? You were fine sucking my dick a second ago!"'
		act 'I don''t want to have sex':
			gdk['fuck'] = 2
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			'"I just don''t want to!"'
			'"Ugh, fine." <<$npc_firstname[$boy]>> grabs you by the shoulder and pulls you back down to your knees. "At least finish me off then."'
			act 'Refuse':
				gs'arousal','end'
				cla & *clr
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'"What?? You think I''m going to just get back down there after the way you''re acting?"'
				'"But you said you didn''t want to fuck!" he snarls.'
				'"Ugh, I don''t want to deal with you." You quickly back away from <<$npc_firstname[$boy]>>, leaving him with blue balls and his dick hanging out as you head back to the disco.'
				act 'Go back to the disco': gt'pav_disco'
			end
			
			act 'Finish sucking him off':gt'pav_disco_sex','blowjob'
		end
		
		act 'This is too public':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			'"This is too public!" you hiss. "You think I''ll fuck you where anybody could see?"'
			if npc_selfish[$boy] = 1:
				'"You were just sucking my dick!" he almost shouts again. "Why is it too public to fuck, but it isn''t to suck my dick?!"'
				'"It just is!" you huff back. "You know what? This whole thing was a mistake. You can sort that out yourself," you say, gesturing at his cock before you hurry away from him and back towards the disco.'
				act 'Go back to the disco': gt'pav_disco'
			else
				'"Well..." <<$npc_firstname[$boy]>> scratches his head for a moment in confusion. "We don''t have to do it in public. We could take this back to my place if you want..."'
				act 'Refuse':
					cla & *clr
					'"Nuh-uh. I''m not up for that."'
					'"Oh. Well..." <<$npc_firstname[$boy]>> looks down at his still-hard cock. "Well, could you finish me off at least?"'
					'"Sure, we can do that, at least."'
					act 'Kneel down':gt'pav_disco_sex','blowjob'
				end
				
				act 'Go with him':
					cla & *clr
					'"Well... a bed <i>does</i> sound nice," you smile. Taking that as acceptance, he pulls up his pants and grabs you by the arm, leading you back to a nearby apartment complex.'
					act'Continue':gt 'sex_ev_start', 'hookup_npc_home_start'
				end
			end
		end
		
!!			if stat['think_virgin'] = 1:
!!				act'I''m a virgin':
!!					cla & *clr
!!					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
!!					'"Because I''m a virgin!" you huff.'
!!					
!!				end
!!			end
	end
	
	act 'Bend over':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
		gs'pav_disco_sex','insert'
		if npc_condom_conscious[$boy] > 0: gdk['condom'] = 1
		act 'Get fucked':gt'pav_disco_sex','fuck1'
	end
	
	act 'Condom?':
		cla
		act 'Ask him to use a condom':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			
			if npc_condom_conscious[$boy] > 0:
				'"Hang on. Use a-" You start to turn around to ask him to put on a condom but see he''s already pulling one out. "Oh. Way ahead of me, I guess."'
				gs'pav_disco_sex','insert'
				act 'Get fucked':gt'pav_disco_sex','fuck1'
			elseif npc_selfish > 0:
				'"Hang on. Can you please use a condom?"'
				'"What? Fuck that rubber shit."'
				gs 'willpower', 'misc', 'force'
				if will_cost <= pcs_willpwr:
					act 'Insist (<<will_cost>> Willpower)':
						cla & *clr
						gdk['condom'] = 1
						'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
						'"Come on! Please!"'
						'He grumbles, but you hear him putting on a condom anyways, and you breathe a sigh of relief.'
						gs'pav_disco_sex','insert'
						act 'Get fucked':gt'pav_disco_sex','fuck1'
					end
				else
					act 'Insist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end
				
				act 'Maybe it''ll be okay...':
					cla & *nl
					gdk['condom'] = 2
					'<i>Maybe it''ll be okay...</i> you think to yourself.'
					'"Just don''t cum inside me, okay?"'
					act 'Bend over':
						cla & *clr
						'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
						gs'pav_disco_sex','insert'
						act 'Get fucked':gt'pav_disco_sex','fuck1'
					end
				end
			else
				'"Hang on. Use a condom?" <<$npc_firstname[$boy]>> nods and pulls one out of his pocket, tears it open and rolls it onto his cock, leaving you to breathe a sigh of relief.'
				act 'Bend over':
					cla & *clr
					gdk['condom'] = 1
					'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
					gs'pav_disco_sex','insert'
					gdk['condom'] = 1
					act 'Get fucked':gt'pav_disco_sex','fuck1'
				end
			end
		
			if mc_inventory['normal_condoms'] + mc_inventory['equipped_condoms'] > 0:
				act 'Get a condom from your purse':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
					'"Hang on," you pause, reaching into your bag and pulling out a condom. You tear the package open and gently roll it onto <<$npc_firstname[$boy]>>''s cock, giving him a few gentle tugs when you''re finished. "Safety first."'
					gdk['condom'] = 1
					mc_inventory['normal_condoms'] -= 1
					act 'Bend over':
						gs'pav_disco_sex','insert'
						act 'Get fucked':gt'pav_disco_sex','fuck1'
					end
				end
			end
		end
	end
	
	act 'Not here (suggest his place)':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'"Wait!" you cry, looking around. "Not here. Maybe we could... go back to your place?"'
		'"That works for me," he grins. Then, pulling his pants back up, he rushes you to a nearby apartment complex, and you head inside.'
		act 'Continue':gt 'sex_ev_start', 'hookup_npc_home_start'
	end
	gs 'family_schedule'
	if locat['Fam_inGad'] = 1:
		act 'Take him home':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			'With a sultry smirk, you lean in to whisper in <<$npc_firstname[$boy]>>''s ear.'
			'"<i>My parents aren''t home tonight...</i>"'
			'The look in his eyes is all you need to know and the two of you rush back to the estate together.'
			act 'Continue':gt 'sex_ev_start', 'hookup_pc_home_start'
		end
	end
end

if $ARGS[0] = 'fuck_pre2':
	if stat['think_virgin'] = 0:
		act'Let him fuck you':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
			'"I''ve got a better idea," you grin.'
			gs'pav_disco_sex','insert'
			act 'Get fucked':gt'pav_disco_sex','fuck1'
		end
		act'Let him fuck you (with a condom)':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			'"I''ve got a better idea... Got a condom?" you ask suggestively.'
			if npc_no_condoms[$boy] > 0:
				'"No," <<$npc_firstname[$boy]>> grins back.'
				act'Oh well':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
					'"Well that''s a shame," you say. And then you shrug. "Oh well."'
					gs'pav_disco_sex','insert'
					act'Fuck him':gt'pav_disco_sex','fuck1'
				end
				
				if mc_inventory['normal_condoms'] > 0:
					act'Use one of yours':
						mc_inventory['normal_condoms'] -= 1
						gdk['condom'] = 1
						cla & *nl
						'"Good thing I do," you smile, reaching into your bag and pulling out a condom. You tear the package open and gently roll it onto <<$npc_firstname[$boy]>>''s cock, giving him a few gentle tugs when you''re finished. "Safety first."'
						'He seems pretty disappointed.'
						act'Fuck him':gt'pav_disco_sex','fuck1'
					end
				end
			else
				'"Oh hell yes," <<$npc_firstname[$boy]>> grins back and pulls a wrapper out of his pocket.'
				gdk['condom'] = 1
				act'Bend over':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_insert1.mp4"></video></center>'
					gs'pav_disco_sex','insert'
					act'Fuck him':gt'pav_disco_sex','fuck1'
				end
			end
		end
	end
end

if $ARGS[0] = 'fuck1':
	gdk['fuck'] = 1
	gdk['orgasm'] = orgasm
	if pcs_vag = 0:gt'pav_disco_sex','virgin_fuck'
	gs'arousal','vaginal', rand(3,7), 'no_orgasm_msg'
	'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_fuck1.mp4"></video></center>'
	if mesec > 0:
		'<<$npc_firstname[$boy]>> slips inside you easily, your pussy already slick from your period, and quickly builds up to a steady pace, pummeling your pussy. The rhythmic fucking pounds your insides just the right way, and you soon find yourself moaning in pleasure.'
	else
		'<<$npc_firstname[$boy]>> quickly builds up to a steady pace, pummeling your pussy from behind, pumping his cock in and out of you. The rhythmic fucking pounds your insides just the right way, and you soon find yourself moaning in pleasure.'
	end
	*nl
	gs'pav_disco_sex','disco_cum'
end

if $ARGS[0] = 'disco_cum':
	gdk['cum'] = rand(1,4)
	if gdk['cum'] = 1:
		'"I''m gonna cum!"'
		act 'Squat down':gt'pav_disco_sex','disco_cum_facial'
			
		act 'Finish him with your mouth':gt'pav_disco_sex','disco_cum_mouth'

		if gdk['condom'] ! 2: act 'Speed up':gt'pav_disco_sex','disco_creampie'
		
	elseif gdk['cum'] = 2:
		'"Hey," <<$npc_firstname[$boy]>> grunts. "Let me cum in your mouth."'
		act 'Let him cum on your face instead':gt'pav_disco_sex','disco_cum_facial'
		
		act 'Suck him off':gt'pav_disco_sex','disco_cum_mouth'
	elseif gdk['cum'] = 3:
		'"Hey," <<$npc_firstname[$boy]>> grunts. "Let me cum on your face."'
		
		act 'Let him cum on your face':gt'pav_disco_sex','disco_cum_facial'
		
		act 'Finish him in your mouth instead':gt'pav_disco_sex','disco_cum_mouth'
	elseif gdk['cum'] = 4:
		if gdk['condom'] = 1:
			gs'cum_call','', $boy, 1, 3
			$gdk['cum'] = 'condom'
			act 'Continue':gt'pav_disco_sex','disco_condom1'
		elseif gdk['condom'] = 2:
			gs'cum_call','', $boy, 1
			$gdk['cum'] = 'creampie'
			if gdk['orgasm'] < orgasm:
				'You feel pressure building with every thrust of <<$npc_firstname[$boy]>>''s cock inside you, and soon, it explodes in a climactic orgasm. Every muscle in your body clenches, your pussy clamping down on the cock inside it so hard, it almost hurts. Then, as your breathing winds down, you feel <<$npc_firstname[$boy]>> slip out from inside you.'
				*nl
				'You start to smile in pleasure when you suddenly feel something oozing from your pussy, and your eyes go wide.'
				act 'WHAT THE FUCK!':gt'pav_disco_sex','creampie_surprise2'
			else
				'Your eyes go wide when you feel something spurt inside of your pussy.'
				act 'WHAT THE FUCK!':gt'pav_disco_sex','creampie_surprise2'
			end
		else
			gs'cum_call','', $boy, 1
			$gdk['cum'] = 'creampie'
			if pcs_horny >= 90:
				$orgasm_or = 'yes'
				'You feel pressure building with every thrust of <<$npc_firstname[$boy]>>''s cock inside you, and soon, it explodes in a climactic orgasm. Every muscle in your body clenches, your pussy clamping down on the cock inside it so hard, it almost hurts. Finally, your breathing slowly winds down, and you feel <<$npc_firstname[$boy]>> slip his cock out from inside you.'
				*nl
				'As he does, you feel something oozing out of your pussy after it.'
				gs'pav_disco_sex','creampie_surprise1'
			else
				'Your eyes go wide when you feel something spurt inside of your pussy.'
				gs'pav_disco_sex','creampie_surprise1'
			end
		end
	end
end

if $ARGS[0] = 'disco_cum_facial':
	cla & *clr
	$gdk['cum'] = 'facial'
	'<center><video autoplay loop src="images/shared/sex/public/outdoor/cum_facial1.mp4"></video></center>'
	if gdk['cum'] = 1:
		if gdk['condom'] = 1:
			'You quickly jump off his cock and squat down in front of him. <<$npc_firstname[$boy]>> takes the hint and rips off the condom, jerking himself off over your face. Within seconds, cum erupts from the tip of his cock, spattering across your forehead and running down your cheeks. Seconds after that, it seems <<$npc_firstname[$boy]>> is out of juice and pulls back to admire his handiwork.'
		else
			'You quickly jump off his cock and squat down in front of him. <<$npc_firstname[$boy]>> takes the hint and begins jerking himself off over your face. Within seconds, cum erupts from the tip of his cock, spattering across your forehead and running down your cheeks. Seconds after that, it seems <<$npc_firstname[$boy]>> is out of juice and pulls back to admire his handiwork.'
		end
	else
		if gdk['cum'] = 3:
			'"Okay," you smile and slip yourself off of <<$npc_firstname[$boy]>>''s cock.'
		else
			'"No thanks," smirk. "But you can still cum on my face."'
		end
		if gdk['condom'] = 1:
			'As you squat down before him, he tears off the condom and starts rapidly jerking himself off. Seconds later, cum blasts from his tip, spattering across your forehead and running down your cheeks. He loses power after the first shot, but continues jerking himself to let the remainder dribble down onto your face.'
		else
			'You squat down before him and he starts rapidly jerking himself off. Seconds later, cum blasts from his tip, spattering across your forehead and running down your cheeks. He loses power after the first shot, but continues jerking himself to let the remainder dribble down onto your face.'
		end
	end
	
	act 'Smile':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/public/outdoor/facial_after1.mp4"></video></center>'
		'"Well, that was fun." You smile at <<$npc_firstname[$boy]>> as he tucks his cock inside his pants.'
		if gdk['fuck'] = 1:
			'"Yeah, you''ve got a great pussy."'
		else
			'"Yeah, you''ve got a great mouth."'
		end
		act'Continue':gt'pav_disco_sex','disco_sex_end'
	end
	
	act 'Clean him with your mouth':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/public/outdoor/bj2.mp4"></video></center>'
		'"Here, let me get that for you," you say, leaning forward and running your mouth up and down his cock, making sure he''s well and truly sucked dry before standing up again.'
		act 'Continue':gt'pav_disco_sex','disco_sex_end'
	end
end

if $ARGS[0] = 'disco_mouth_react1':
	act 'A little warning?':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'"Jesus!" you sputter, still wheezing. "Give a girl some warning!"'
		'"Sorry. Maybe next time," he grins. Clearly, he isn''t too bothered by what happened.'
		*nl
		gs'pav_disco_sex','disco_sex_end'
	end
	
	act 'I almost choked!':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'"Ack!" you sputter, still wheezing. "I almost choked!"'
		'"This happens to you a lot?" he asks, eyebrow raised.'
		'"No..." you say, blushing and turning your head away.'
		*nl
		gs'pav_disco_sex','disco_sex_end'
	end
	
	act 'That tastes awful!':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'"Ugh!" you sputter, still wheezing. "That tastes <i>awful</i>!"'
		'"Wait, is this your first time sucking cock?" he asks, eyebrow raised.'
		if swallow < 1:
			act 'Yes...':
				cla & *nl
				'"Yes..." you admit, blushing and turning your head away. "Got a problem?'
				'"No, but it explains a lot," <<$npc_firstname[$boy]>> grins. Your blush deepens.'
				*nl
				gs'pav_disco_sex','disco_sex_end'
			end
			
			act 'No... (lie)':
				cla & *nl
				'"No..." you say, blushing and turning your head away. "You just... don''t taste how I expected."'
				'"Uh-huh..." <<$npc_firstname[$boy]>> eyes you knowingly, and your blush deepens, but you refuse to look him in the eye.'
				*nl
				gs'pav_disco_sex','disco_sex_end'
			end
		else
			act 'Yes... (lie)':
				cla & *nl
				'"Yes..." you lie, blushing and turning your head away, hoping to claim inexperience to save him some hurt feelings. "Got a problem?'
				'"No, but it explains a lot," <<$npc_firstname[$boy]>> grins. Your blush deepens. Maybe you should have just told him his cum is disgusting after all...'
				*nl
				gs'pav_disco_sex','disco_sex_end'
			end
			
			act 'No! You just taste awful!':
				'"No!" you spit. "You just taste awful! You need to eat more fruit or something!"'
				'<<$npc_firstname[$boy]>> recoils, looking somewhat offended, but doesn''t say anything more.'
				*nl
				gs'pav_disco_sex','disco_sex_end'
			end
		end
	end
end

if $ARGS[0] = 'disco_mouth_react2':
	act 'A little warning?':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/public/outdoor/facial_after1.mp4"></video></center>'
		'"A little warning next time?" you smile at him. "It''s hard to swallow on command."'
		'"Well, you seemed to have managed just fine," he grins.'
		*nl
		gs'pav_disco_sex','disco_sex_end'
	end
	
	act 'Lick your lips':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/public/outdoor/facial_after1.mp4"></video></center>'
		'"You taste good," you smile, licking your lips and standing back up.'
		*nl
		gs'pav_disco_sex','disco_sex_end'
	end
	
	act 'Clean him off':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/public/outdoor/bj2.mp4"></video></center>'
		'"Here, let me get that for you," you say, leaning forward and running your mouth up and down his cock, making sure he''s well and truly sucked dry before standing up again.'
		*nl
		gs'pav_disco_sex','disco_sex_end'
	end
end

if $ARGS[0] = 'disco_cum_mouth':
	cla & *clr
	$gdk['cum'] = 'mouth'
	'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,3.mp4"></video></center>'
	if gdk['cum'] ! 3:
		if gdk['condom'] = 1:
			'You quickly jump off his cock and squat in front of him, pulling off the condom and replacing your pussy with your mouth. You bob your head up and down precisely twice before thick salty cum spurts out onto your tongue. Then, using your hand, you draw out every last drop before pulling back.'
		else
			'You quickly jump off his cock, squat in front of him, and replace your pussy with your mouth. You bob your head up and down precisely twice before thick salty cum spurts out onto your tongue. Then, using your hand, you draw out every last drop before pulling back.'
		end
	else
		'"Ew, no." You wrinkle your nose in disgust. "Way too much cleanup. Let''s do <i>this</i> instead..."'
		if gdk['condom'] = 1:
			'You quickly jump off his cock and squat in front of him, pulling off the condom and replacing your pussy with your mouth. You bob your head up and down precisely twice before thick salty cum spurts out onto your tongue. Then, using your hand, you draw out every last drop before pulling back.'
		else
			'You quickly jump off his cock, squat in front of him, and replace your pussy with your mouth. You bob your head up and down precisely twice before thick salty cum spurts out onto your tongue. Then, using your hand, you draw out every last drop before pulling back.'
		end
	end
	
	act 'Spit':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'Opening your mouth, you stick your tongue out and let <<$npc_firstname[$boy]>>''s cum dribble out onto the pavement.'
		gs'pav_disco_sex','disco_sex_end'
	end
	
	act 'Swallow':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
		'Gathering his cum in your mouth, you push it to the back of your throat and swallow the entire load in one big gulp.'
		gs'pav_disco_sex','disco_sex_end'
	end
end

if $ARGS[0] = 'disco_condom1':
	$gdk['cum'] = 'condom'
	'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_fuck1.mp4"></video></center>'
	if gdk['orgasm'] < orgasm:
		'You gasp in surprise when <<$npc_firstname[$boy]>> pulls you tight against him, shoving his entire length inside you to the base. Seconds later, you hear him groan and feel him cumming inside the condom. The sensation sends you over the edge, and your body goes taut, leaving you on tiptoes while the orgasm rolls through your body.'
		*nl
		'When the quivering finally stops, you lean forward. Letting <<$npc_firstname[$boy]>>''s cock slip from inside you and looking over your shoulder, you can see white liquid filling the rubber sleeve.'
		'<i>"Looks like we came together"</i> you think.'
	else
		'You gasp in surprise when <<$npc_firstname[$boy]>> pulls you tight against him, shoving his entire length inside you to the base. Seconds later, you hear him groan and feel him cum inside the condom.'
		*nl
		'Clenching your pussy, you milk him for all he''s worth until you feel him stop pulsing inside you. Then, leaning forward, you let <<$npc_firstname[$boy]>>''s cock slip from your pussy.'
	end
	act 'Continue':gt'pav_disco_sex','disco_sex_end'
end

if $ARGS[0] = 'disco_condom2':
	$gdk['cum'] = 'condom'
	'<center><video autoplay loop src="images/shared/sex/public/outdoor/stand_fuck1.mp4"></video></center>'
	if gdk['orgasm'] < orgasm:
		'You don''t say a word, instead throwing your hips back onto <<$npc_firstname[$boy]>>''s cock as hard as you can. Seconds later, you hear him groan and feel him cum inside the condom. The sensation sends you over the edge, and your body goes taut, leaving you on tiptoes while the orgasm rolls through your body.'
		*nl
		'When the quivering finally stops, you lean forward, letting <<$npc_firstname[$boy]>>''s cock slip from your pussy.'
	else
		'You don''t say a word, instead throwing your hips back onto <<$npc_firstname[$boy]>>''s cock as hard as you can. Seconds later, you hear him groan and feel him cumming inside the condom.'
		*nl
		'Clenching your pussy, you milk him for all he''s worth until you feel him stop pulsing inside you. Then, leaning forward, you let <<$npc_firstname[$boy]>>''s cock slip from your pussy.'
	end
	act 'Continue':gt'pav_disco_sex','disco_sex_end'
end

if $ARGS[0] = 'disco_creampie':
	if gdk['condom'] = 1:gt'pav_disco_sex','disco_condom2'
	gs'cum_call','', $boy, 1
	$gdk['cum'] = 'creampie'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
	if pcs_horny >= 90:
		$orgasm_or = 'yes'
		'You don''t say a word, instead throwing your hips back onto <<$npc_firstname[$boy]>>''s cock as hard as you can. Seconds later, you hear him groan and feel his load spill out inside you. The sensation sends you over the edge, and your body goes taut, leaving you on tiptoes while the orgasm rolls through your body.'
		*nl
		'When the quivering finally stops, you lean forward, letting <<$npc_firstname[$boy]>>''s cock slip from your pussy, his cum trickling out after it.'
	else
		'You don''t say a word, instead throwing your hips back onto <<$npc_firstname[$boy]>>''s cock as hard as you can. Seconds later, you hear him groan and feel his load spill out inside you.'
		*nl
		'Clenching your pussy, you milk him for all he''s worth until you feel him stop pulsing inside you. Then, leaning forward, you let <<$npc_firstname[$boy]>>''s cock slip from your pussy, and his cum slowly trickles out.'
	end
	act 'Felt too good':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
		'"Sorry, it felt so good," you grin.'
		'"Apology accepted," he pants back. "Your pussy was great too."'
		gs'pav_disco_sex','disco_sex_end'
	end
	
	if birth_control['think_safe'] = 1:
		act 'I''m on birth control':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
			'"Don''t worry," you wink. "I''m on birth control."'
			gs'pav_disco_sex','disco_sex_end'
		end
	else
		act 'I''m on birth control (lie)':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
			'"Don''t worry," you lie, winking at him. "I''m on birth control."'
			gs'pav_disco_sex','disco_sex_end'
		end
	end
	
	if (pcs_cp_safe_known + pcs_cp_notsafe_known + pcs_cp_risky_known) > 0:
		act 'I love getting creampied':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
			'"I love getting creampied," you grin, closing your eyes and savouring the feeling of <<$npc_firstname[$boy]>>''s load oozing from your pussy.'
			gs'pav_disco_sex','disco_sex_end'
		end
	end
	
end

if $ARGS[0] = 'creampie_surprise1':
	act 'Did you just cum inside me?':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
		'You pull away, shocked by what just occurred.'
		'"Did you just cum inside me?"'
		if rand(0,1) = 1 or gdk['condom'] = 2:
			'"Shit! I didn''t mean to! I was just-"'
		else
			'"Yeah, your pussy was just so tight. I just couldn''t help it."'
		end
		
		act 'What the fuck!':
			gs'arousal','end'
			
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			'"What the fuck!" you shout, causing <<$npc_firstname[$boy]>> to recoil backwards. "What made you think that was fucking okay?!"'
			if gdk['virgin'] = 1 or mesec > 0:
				'You stare at your pussy, horrified by the white liquid oozing inside. Before you can do anything else, <<$npc_firstname[$boy]>> hurries away from you, pulling up his pants and escaping back into the disco, leaving you alone in the dark with cum and blood dripping from your pussy.'
			else
				'You stare at your pussy, horrified by the white liquid oozing inside. Before you can do anything else, <<$npc_firstname[$boy]>> hurries away from you, pulling up his pants and escaping back into the disco, leaving you alone in the dark with his cum still dripping from your pussy.'
			end
			killvar 'gdk'
			act 'Continue':gt'pav_commcenter'
		end
		
		act 'Forgive the mistake':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
			'"You look down at the white liquid dripping from your pussy. It fills you with stress, but you know it wouldn''t be right to blame <<$npc_firstname[$boy]>>.'
			'You bite your lip for a moment considering the situation.'
			act 'I''ll be fine':
				cla & *nl
				'You decide it isn''t a big deal.'
				'"It''s fine," you sigh. "I should''ve told you not to. Or insisted on a condom. But it''s not your fault. One accidental creampie won''t kill me, will it?"'
				gs'pav_disco_sex','disco_sex_end'
			end
			
			act 'I''ll buy a morning after pill':
				cla & *nl
				'"It''s fine," you sigh. "I should''ve told you not to. Or insisted on a condom. Either way, it''s my fault for not saying anything. I''ll buy a morning-after pill tomorrow. I''ll be alright."'
				gs'pav_disco_sex','disco_sex_end'
			end
			
			if birth_control['think_safe'] = 1:
				act 'I''m on birth control':
					cla & *nl
					'"It''s fine," you sigh. "I should''ve told you not to. Or insisted on a condom. But it''s not your fault. I''m on birth control anyways. You''re clean, right?"'
					'"Yeah, of course!" he responds immediately.'
					'<i>Not that you''d tell me if you weren''t...</i> you think to yourself.'
					gs'pav_disco_sex','disco_sex_end'
				end
			else
				act 'I''m on birth control (lie)':
					cla & *nl
					'"It''s fine," you sigh. "I''m on birth control anyways."'
					'You see relief wash through his face at your lie, either because he thinks he isn''t going to be a father any time soon or because it means you aren''t going to be mad at him.'
					gs'pav_disco_sex','disco_sex_end'
				end
			end
		end
		
		act 'Hot':
			pcs_horny += 15
			cla & *clr
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
			'A shiver of pleasure washes over your body. Knowing that <<$npc_firstname[$boy]>> blew his load inside you is enough to send heat coursing through your hips, and you can feel your nipples stiffen up again.'
			act 'It felt so good':
				cla & *nl
				'"That felt so good," you smile tiredly. <<$npc_firstname[$boy]>> blinks at you, a look of surprise on his face as if he expected you to be mad about it.'
				gs'pav_disco_sex','disco_sex_end'
			end
			
			act 'Premature ejaculation is hot':
				cla & *nl
				'"Fuck, it''s so hot when guys can''t hold their load," you grin.'
				'"What?" <<$npc_firstname[$boy]>> says, seemingly taken aback by your statement.'
				'"Premature ejaculation?" you say, your smile growing wider. "It''s hot."'
				if npc_insecure[$boy] = 1:
					gs'arousal','end'
					'"What the fuck did you just say?!" he growls.'
					'"What??" you protest in turn. "I don''t see what the problem is! I think it''s sexy that you can''t help but nut inside me! It''s not your fault, but I liked it!"'
					'"I didn''t prematurely ejaculate! I don''t do that!"'
					'"Well, there wasn''t any warning. Seemed like you didn''t mean to cum when-"'
					'"I SAID I DON''T DO THAT!"'
					'<<$npc_firstname[$boy]>> shouts at you one last time before storming back towards the disco, grumbling the whole time. Suddenly, you''re alone in the dark with the load of a stranger inside your pussy.'
					killvar 'gdk'
					act 'Continue':gt'pav_commcenter'
				else
					'A blush spreads across his face and he mutters a but doesn''t say anything else.'
					gs'pav_disco_sex','disco_sex_end'
				end
			end
		end
		
		if gdk['orgasm'] = orgasm:
			act 'Already?':
				cla & *clr
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
				'"Seriously?! Already?!" You look down at the cum seeping from your pussy with heavy disappointment. "Fuck! Why do guys like you never manage to hold it in until I get off?"'
				'"What the fuck is your problem?" <<$npc_firstname[$boy]>> growls angrily.'
				'"Apparently, my problem is that you''re a two-pump chump who can''t wait to nut inside a girl before she''s gotten off!"'
				'"Fuck you, bitch!"'
				if gdk['virgin'] = 1 or mesec > 0:
					'<<$npc_firstname[$boy]>> storms away from you, pulling up his pants as he goes. Before you know it, you''re alone in the dark, a stranger''s cum and blood dripping from your pussy, and feeling severely blue-balled.'
				else
					'<<$npc_firstname[$boy]>> storms away from you, pulling up his pants as he goes. Before you know it, you''re alone in the dark, a stranger''s cum dripping from your pussy, and feeling severely blue-balled.'
				end
				gs'arousal','end'
				killvar 'gdk'
				act 'Continue':gt'pav_commcenter'
			end
		end
	end
end

if $ARGS[0] = 'creampie_surprise2':
	gs'arousal','end'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/creampie.jpg"></center>'
	'"WHAT THE FUCK!" you shout, causing <<$npc_firstname[$boy]>> to recoil backwards. "I fucking <i>told you</i> not to cum inside me!"'
	if gdk['virgin'] = 1 or mesec > 0:
		'<<$npc_firstname[$boy]>> hurries away from you, escaping back into the disco as you stare at your pussy, horrified by the white liquid oozing from inside it. Before you know it, you''re alone in the dark, a stranger''s cum and blood dripping from your pussy.'
	else
		'<<$npc_firstname[$boy]>> hurries away from you, escaping back into the disco as you stare at your pussy, horrified by the white liquid oozing from inside it. Before you know it, you''re alone in the dark, a stranger''s cum inside your pussy.'
	end
	killvar 'gdk'
	act 'Continue':gt'pav_commcenter'
end

if $ARGS[0] = 'disco_sex_end':
	gs'arousal','end'
	if PCloSkirt > 0:
		if $pantyworntype ! 'none' or gdk['fuck'] ! 1:
			if $gdk['cum'] = 'facial':
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'<<$npc_firstname[$boy]>> pulls his pants back up and heads back inside, leaving you alone in the dark with cum on your face.'
			elseif $gdk['cum'] = 'mouth':
				'<<$npc_firstname[$boy]>> pulls his pants back up and heads back inside, leaving you alone in the dark, the taste of his cum still on your lips.'
			elseif $gdk['cum'] = 'creampie' and (mesec > 0 or gdk['virgin'] = 1):
				'<<$npc_firstname[$boy]>> pulls his pants back up and heads back inside, leaving you alone in the dark, cum and blood running down your legs.'
			elseif $gdk['cum'] = 'creampie':
				'<<$npc_firstname[$boy]>> pulls his pants back up and heads back inside, leaving you alone in the dark, cum running down your legs.'
			elseif $gdk['cum'] = 'condom':
				'<<$npc_firstname[$boy]>> pulls off the condom and tosses it aside, zipping his pants back up to head back inside and leaving you alone in the dark, pussy juices running down your legs.'
			end
		else
			if $gdk['cum'] = 'facial':
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'You pull up your panties while <<$npc_firstname[$boy]>> zips up his pants before heading back inside, leaving you alone in the dark with cum on your face.'
			elseif $gdk['cum'] = 'mouth':
				'You pull up your panties while <<$npc_firstname[$boy]>> zips up his pants before heading back inside, leaving you alone in the dark, the taste of his cum still on your lips.'
			elseif $gdk['cum'] = 'creampie' and (mesec > 0 or gdk['virgin'] = 1):
				'You pull up your panties while <<$npc_firstname[$boy]>> zips up his pants before heading back inside, leaving you alone in the dark, cum and blood soaking into your underwear.'
			elseif $gdk['cum'] = 'creampie':
				*nl
				'You pull up your panties while <<$npc_firstname[$boy]>> zips up his pants before heading back inside, leaving you alone in the dark, cum soaking into your underwear.'
!!			elseif $gdk['cum'] = 'creampie_wipe':
!!				'You pull out some wipes and begin to clean up the mess leaking out of your pussy while <<$npc_firstname[$boy]>> zips up his pants and heads back inside. By the time you''re done, you''re alone, pulling up your panties in the dark.'
			elseif $gdk['cum'] = 'condom':
				'<<$npc_firstname[$boy]>> pulls off the condom and tosses it aside while you pull up your panties. Afterwards, he zips his pants back up and heads inside, leaving you alone in the dark.'
			end
		end
	else
		if gdk['fuck'] ! 1:
			if $gdk['cum'] = 'facial':
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'<<$npc_firstname[$boy]>> pulls his pants back up and heads back inside, leaving you alone in the dark with cum on your face.'
			elseif $gdk['cum'] = 'mouth':
				'<<$npc_firstname[$boy]>> pulls his pants back up and heads back inside, leaving you alone in the dark, the taste of his cum still on your lips.'
			end
		else
			if $gdk['cum'] = 'facial':
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
				'The two of you pull your pants back up, and <<$npc_firstname[$boy]>> heads back inside, leaving you alone in the dark with cum on your face.'
			elseif $gdk['cum'] = 'mouth':
				'The two of you pull your pants back up, and <<$npc_firstname[$boy]>> heads back inside, leaving you alone in the dark, the taste of his cum still on your lips.'
			elseif $gdk['cum'] = 'creampie' and (mesec > 0 or gdk['virgin'] = 1):
				*nl
				if $pantyworntype = 'none':
					'The two of you pull your pants back up, and <<$npc_firstname[$boy]>> heads back inside, leaving you alone in the dark, cum and blood seeping into the crotch of your pants.'
				else
					'The two of you pull your pants back up, and <<$npc_firstname[$boy]>> heads back inside, leaving you alone in the dark, cum and blood seeping into your panties.'
				end
			elseif $gdk['cum'] = 'creampie':
				*nl
				if $pantyworntype = 'none':
					'The two of you pull your pants back up, and <<$npc_firstname[$boy]>> heads back inside, leaving you alone in the dark, cum seeping into the crotch of your pants.'
				else
					'The two of you pull your pants back up, and <<$npc_firstname[$boy]>> heads back inside, leaving you alone in the dark, cum seeping into your panties.'
				end
			
			elseif $gdk['cum'] = 'condom':
				'<<$npc_firstname[$boy]>> pulls off the condom and tosses it aside while you pull up your pants. Afterwards, he zips his pants back up and heads inside, leaving you alone in the dark.'
			end
		end
	end
	killvar 'gdk'
	act 'Continue':gt'pav_commcenter'
end

!! Scene 2: Hotel
if $ARGS[0] = 'hotel':
	menu_off = 1
	music_loop = 0
	close all
!!	gs 'npcpreservec', $npclastgenerated
	*clr & cla
	minut += 5
	gs 'boymass', 'B'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/coupletaxi.jpg"></center>'
	'When you get outside, <<$npc_firstname[$boy]>> quickly hails a taxi and has a short chat with the driver. "Come on, <<$pcs_nickname>>. Let''s go!"'
	'You get into the back seat of the taxi with him and spend the next five minutes driving, mostly in silence. You notice <<$npc_firstname[$boy]>> giving the taxi driver an impressive tip when you arrive at the hotel... is he trying to impress you or is he just very generous...?'
	act 'Go to <<$npc_firstname[$boy]>>''s room':gs 'sex_ev_start', 'hookup_hotel_start'
	
	!!{ disabled for posterity but trying to unify content into the sex_ev system
	act 'Go to <<$npc_firstname[$npclastsaved]>>''s room':
		if DPtipe = 1:
			if rand(0,4) = 0: gt 'pav_disco_sex', 'drug_user'
			*clr & cla
			BeInOtel += 1
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/otel.jpg"></center>'
			'You follow along behind <<$npc_firstname[$npclastsaved]>> until the two of you reach his door and enter his room. You are pretty surprised. The room is much nicer than you thought it would be. He must have counted on bringing someone back to the room with him, as a bottle of whiskey and a fruit platter are already waiting on the table.'
			'He gestures to a comfortable-looking chair, inviting you to sit down. He sits across from you and pours two glasses of whiskey, offering you one.'
			'"Let''s have a drink and toast to making new acquaintances! I''m very fortunate to have met a beautiful and wonderful girl such as yourself, <<$pcs_nickname>>", he toasts cheerfully.'

			act 'Have a drink with him':
				*clr & cla
				gs 'drugs', 'alcohol', 'whiskey'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
				'You can tell he didn''t cheap out on the whiskey at all. This is good stuff!'
				'The two of you enjoy the drink and chat about small things, relaxing in each other''s company. <<$npc_firstname[$npclastsaved]>> then stands up and walks up to you, places his hands on your shoulders and brings his lips to yours, giving you a warm kiss while slowly and confidently starting to take your clothes off.'
				gs 'arousal', 'kiss', 5
				gs 'stat'
				gs 'pav_disco_sex', 'heating_up'
			end
		else
			*clr & cla
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
			'As soon as you enter his hotel room, <<$npc_firstname[$npclastsaved]>> puts his hands on your hips and pulls you closer for a deep kiss. He slides his hands up and down your body, trying to find a way to get underneath your clothes.'
			gs 'arousal', 'kiss', 5
			gs 'stat'
			gs 'pav_disco_sex', 'heating_up'
		end
	end}
end

if $ARGS[0] = 'heating_up':
	if pcs_vag = 0:
		act 'Tell him you''re still a virgin':
			*clr & cla
			gs 'stat'
			tiprandeom = rand(0, 2)
			if tiprandeom < 2:
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/otel.jpg"></center>'
				'"No, wait!" you interrupt him. "Look... I like men, and I like you, but I''m not losing my virginity to someone I just met!"'
				'<<$npc_firstname[$npclastsaved]>> smiles reassuringly. "Oh wow, a virgin, huh? That''s okay... we can still have fun without you losing your virginity! Maybe you could use your mouth?"'
				'<<$npc_firstname[$npclastsaved]>> unbuttons his pants, letting his cock spring free.'

				gs 'willpower', 'bj', 'resist'
				if will_cost <= pcs_willpwr:
					act 'Tell him it''s not going to happen (<<will_cost>> Willpower)':
						*clr & cla
						gs 'willpower', 'bj', 'resist'
						gs 'willpower', 'pay', 'resist'
						gs 'stat'
						'<center><video autoplay loop src="images/pc/reactions/no.mp4"></video></center>'
						'You laugh at his confidence. It doesn''t look like anyone has said no to him before, and he obviously expected you to follow his lead, but you set him straight. "I don''t think so..."'
						'<<$npc_firstname[$npclastsaved]>> gives his head a scratch, pondering the situation for a moment. "How about I pay you? I''ll give you 400<b>₽</b> for a blowjob?"'
						'He''s already counting the money out while he says it.'

						gs 'willpower', 'prostitution', 'resist', 'hard'
						if will_cost <= pcs_willpwr:
							act 'Leave the hotel (<<will_cost>> Willpower)':
								gs 'willpower', 'prostitution', 'resist', 'hard'
								gs 'willpower', 'pay', 'resist'
								gs 'stat'
								gt 'pav_market'
							end
						else
							act 'Leave the hotel (<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 him off for money':
							*clr & cla
							money += 400
							gs 'fame', 'pav', 'prostitute', rand(1,3)
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
							'You give him a nod and wordlessly extend your hand. <<$npc_firstname[$npclastsaved]>> readily gives you the money.'
							gt 'pav_disco_sex', 'hotelsex', 'paid'
						end
					end
				else
					act 'Tell him it''s not going to happen (<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 his cock': gt 'pav_disco_sex', 'hotelsex', 'unpaid'
			else
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
				'<<$npc_firstname[$npclastsaved]>>''s eyes grow a bit wider when you say the word "virgin".'
				'"Wow, you''re a virgin? Really?" he asks, obviously very intrigued. "Can I see your pussy? Please? I haven''t seen a virgin pussy in forever... I''ll give you 200<b>₽</b>! I just want to look at it. I promise not to touch!"'

				gs 'willpower', 'exhib', 'resist', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Leave the hotel (<<will_cost>> Willpower)':
						gs 'willpower', 'exhib', 'resist', 'easy'
						gs 'willpower', 'pay', 'resist'
						gs 'stat'
						gt 'pav_market'
					end
				else
					act 'Leave the hotel (<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', 'exhib', 'resist', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Tell him it''s not going to happen (<<will_cost>> Willpower)':
						*clr & cla
						gs 'stat'
						'<center><video autoplay loop src="images/pc/reactions/no.mp4"></video></center>'
						'You laugh at his confidence. It doesn''t look like anyone has said no to him before, and he obviously expected you to follow his lead, but you set him straight. '
						'<<$npc_firstname[$npclastsaved]>> gives his head a scratch, pondering the situation for a moment. "Well, in that case, how about a blowjob then? I''ll give you 400<b>₽</br>."'
						'He''s already counting the money out as he says it.'
						gs 'willpower', 'prostitution', 'resist', 'hard'
						if will_cost <= pcs_willpwr:
							act 'Leave the hotel (<<will_cost>> Willpower)':
								gs 'willpower', 'prostitution', 'resist', 'hard'
								gs 'willpower', 'pay', 'resist'
								gs 'stat'
								gt 'pav_market'
							end
						else
							act 'Leave the hotel (<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 him off for money':
							*clr & cla
							money += 400
							gs 'fame', 'pav', 'prostitute', rand(1,3)
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
							'You give him a nod and wordlessly extend your hand. <<$npc_firstname[$npclastsaved]>> readily gives you the money.'
							gt 'pav_disco_sex', 'hotelsex', 'paid'
						end
					end
				else
					act 'Tell him it''s not going to happen (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end

				act 'Show him':
					*clr & cla
					money += 200
					gs 'fame', 'pav', 'prostitute', rand(0,2)
					gs 'arousal', 'foreplay', 5, 'prostitution'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/kiska.jpg"></center>'
					'You slowly take off your clothes and get down on his bed, spreading your legs widely. You can''t help but laugh a little when he comes back with a large flashlight.'
					'"So I can see it better!" he grins at you, almost giddy with anticipation.'
					'He examines your pussy for a few minutes, shining the flashlight inside you to try and catch glimpses of your hymen. "Wow, that''s so hot!" he mutters.'
					'He then looks at you with a serious expression. "Listen, I really want to be your first. I''ll give you... 5,000<b>₽</b>. That''s right, five thousand rubles! What do you say?"'
                    gs 'willpower', 'prostitution', 'resist', 'hard'
					if will_cost <= pcs_willpwr:
						act 'Say you''re saving yourself for marriage (<<will_cost>> Willpower)':
							*clr & cla
							gs 'willpower', 'prostitution', 'resist', 'hard'
							gs 'willpower', 'pay', 'resist'
							gs 'stat'
							'<center><video autoplay loop src="images/pc/reactions/no.mp4"></video></center>'
							'You laugh at his confidence. It doesn''t look like anyone has said no to him before, and he obviously expected you to follow his lead, but you set him straight. "Sorry, but... no. I''m saving myself for marriage, and no amount of money is going to change that!"'
							'<<$npc_firstname[$npclastsaved]>> scratches his head, pondering for a moment. He looks somewhat disappointed. "Fair enough, I can respect that. I still want you, though, so how about a blowjob, then? I''ll give you 400<b>₽</b>?"'
							'He''s already counting the money out as he says it.'
							gs 'willpower', 'prostitution', 'resist', 'hard'
							if will_cost <= pcs_willpwr:
								act 'Leave the hotel (<<will_cost>> Willpower)':
									gs 'willpower', 'prostitution', 'resist', 'hard'
									gs 'willpower', 'pay', 'resist'
									gs 'stat'
									gt 'pav_market'
								end
							else
								act 'Leave the hotel (<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 him off for money':
								*clr & cla
								money += 400
								gs 'fame', 'pav', 'prostitute', rand(1,3)
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
								'You wordlessly nod and extend your hand. <<$npc_firstname[$npclastsaved]>> readily gives you the money.'
								gs 'arousal', 'bj', 5, 'prostitution'
								gs 'dinSex', 'std_trigger_oral'
								gs 'stat'
								act 'Continue': gt 'pav_disco_sex', 'hotelsex', 'paid'
							end
						end
					else
						act 'Say you''re saving yourself for marriage (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
					end
					act 'Lose your virginity for money':
						*clr & cla
						lose_virginity_event = 1
						bmSEX[Tboynum] += 1
						money += 5000
						gs 'fame', 'pav', 'prostitute', rand(2,6)
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
						'"Well... alright," you say softly as you extend your hand. He gives you a hearty handshake. "Deal!" he happily exclaims.'
						'He puts a large pile of money in your hand, and you quickly count it. It''s all there, as promised. When you put the money away, <<$npc_firstname[$npclastsaved]>> eagerly pushes you down on the bed and starts taking off your top.'
						gs 'arousal', 'foreplay', 5, 'prostitution'
						gs 'stat'
						act 'Continue': gt 'pav_disco_sex', 'hotelsex', 'paid'
					end
				end
			end
		end
	end

	gs 'willpower', 'prostitution', 'self'
	if will_cost <= pcs_willpwr:
		act 'Suggest you want money (<<will_cost>> Willpower)':
			*clr & cla
			minut += 5
			gs 'willpower', 'prostitution', 'self'
			gs 'willpower', 'pay', 'self'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/otel.jpg"></center>'
			'You look at the clock and fake a yawn. "Oh wow, is it that late already? It''s been fun spending time with you, <<$npc_firstname[$npclastsaved]>>, but I should get going."'
			'<<$npc_firstname[$npclastsaved]>> frowns and protests. "Already? But we were having such a nice time!"'
			'"I know," you smile at him, letting the words linger in the air for a moment, "but maybe I can stay a little longer...if you make it worth it..."'
		    'He decides to play along. "Oh, I see. Would 2,000<b>₽</b> help?" From the greedy look in his eyes and the massive bulge in his pants, it''s evident that he expects to fuck you if you say yes.'
			act 'Agree to have sex for money':
				*clr & cla
				hotel_sex = 1
				guy += 1
				bmSEX[Tboynum] += 1
				money += 2000
				gs 'fame', 'pav', 'prostitute', rand(2,6)
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
				'You smile at him and quickly put away the money he counted out for you. You barely finish the sentence before <<$npc_firstname[$npclastsaved]>> pushes you down on the bed and starts taking off your top.'
				'"Finally! I''ve been dying to fuck you since I saw you!" he grunts in your ear.'
				gs 'arousal', 'foreplay', 5, 'prostitution'
				gs 'stat'
				act 'Continue': gt 'pav_disco_sex', 'hotelsex', 'paid'
			end
			gs 'willpower', 'sex', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Offer a blowjob for money instead (<<will_cost>> Willpower)':
					*clr & cla
					gs 'fame', 'pav', 'prostitute', rand(1,3)
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/otel.jpg"></center>'
					'You laugh and say, "That''s very kind of you, but that''s too much! I don''t think I could thank you enough..."'
					'Before he can say anything, you get to the point. "I really do need to leave soon. But... how about I give you a blowjob for 400<b>₽</b>?"'
					'<<$npc_firstname[$npclastsaved]>> looks disappointed at first but chooses not to reject your offer.'
					act 'Blow him for money':
						*clr & cla
						money += 400
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/money.jpg"></center>'
						'You wordlessly extend your hand, and <<$npc_firstname[$npclastsaved]>> readily gives you the money.'
						gs 'arousal', 'bj', 5, 'prostitution'
						gs 'dinSex', 'std_trigger_oral'
						gs 'stat'
						act 'Continue': gt 'pav_disco_sex', 'hotelsex', 'paid'
					end
				end
			else
				act 'Offer a blowjob for money instead (<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 'Suggest you want money (<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 him a blowjob': gt 'pav_disco_sex', 'hotelsex', 'unpaid'

	act 'Have sex with him':
		*clr & cla
		if boynumBlock = 0: guy += 1
		if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1
		hotel_sex = 1
		bmSEX[Tboynum] += 1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/foreplay.jpg"></center>'
		'<<$npc_firstname[$npclastsaved]>> pushes you down on the bed and starts taking off your top.'
		'"Finally! I''ve been dying to fuck you since the moment I saw you!" he says.'
		gs 'arousal', 'foreplay', 5
		gs 'stat'
		act 'Continue': gt 'pav_disco_sex', 'hotelsex', 'unpaid'
	end
end

if $ARGS[0] = 'hotelsex':
	*clr & cla
	if boynumBlock = 0: guy += 1
	if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1
	bmBJ[Tboynum] += 1
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/foreplay.jpg"></center>'
	'He pulls your top aside to expose your breasts. He fondles them, followed by a few kisses and caresses before he undresses you more. Unable to wait anymore, he pulls his dick out of his pants and pushes you down to your knees.'
	if $ARGS[1] = 'paid': gs 'arousal', 'foreplay', 10, 'prostitution'
	if $ARGS[1] = 'unpaid': gs 'arousal', 'foreplay', 10
	gs 'stat'
	act 'Suck his dick':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj1.jpg"></center>'
		'You get down on your knees and slowly start stroking his cock. As it grows stiffer, you lick your lips in anticipation before carefully clasping your <<$pc_desc[''lips'']>> lips around the tip.'
		'You stroke your hand along his shaft in rhythm with your head bobbing up and down on his cock, and as he becomes more aroused, he starts moaning and thrusting into your mouth, going deeper every time.'
		if $ARGS[1] = 'paid': gs 'arousal', 'bj', 5, 'prostitution'
		if $ARGS[1] = 'unpaid': gs 'arousal', 'bj', 5
		gs 'dinSex', 'std_trigger_oral'
		gs 'stat'

		if lose_virginity_event = 0 and hotel_sex = 0:
			act 'Keep sucking':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
				'You slide his dick as deeply down your throat as you can without gagging as your free hand slides between your legs and your fingers slip inside your pussy. You suck harder as your arousal builds, flicking your clit every time he thrusts his cock down your throat.'
				if $ARGS[1] = 'paid':
					gs 'arousal', 'bj', 10, 'prostitution'
					gs 'arousal', 'masturbate', 10, 'prostitution'
				elseif $ARGS[1] = 'unpaid':
					gs 'arousal', 'bj', 10
					gs 'arousal', 'masturbate', 10
				end
				minut -= 10
				gs 'stat'

				act 'Swallow his load':
					*clr & cla
					spafinloc = 12
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
					'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You keep watching him, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue and sliding down your throat. Spurt after spurt keeps filling your mouth.'
					'He cums so much that you feel like your mouth is about to overflow with it all, but swallowing as fast as you can, you manage to get it all down. As he pulls his dick from your mouth, a strand of cum stretches from the tip of his cock back down to your lips. Then, smirking, he wipes his cock against your lips before tucking it back in his pants.'
					if $ARGS[1] = 'paid':
						gs 'arousal', 'bj', 10, 'prostitution'
						gs 'arousal', 'masturbate', 10, 'prostitution'
					elseif $ARGS[1] = 'unpaid':
						gs 'arousal', 'bj', 10
						gs 'arousal', 'masturbate', 10
					end
					minut -= 10
					gs 'stat'
					act 'Get cleaned up': gt 'pav_disco_sex', 'End'
				end

				act 'Let him cum on your face':
					*clr & cla
					spafinloc = 11
					gs 'cum_manage'
					
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
					'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue.'
					'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
					if $ARGS[1] = 'paid':
						gs 'arousal', 'bj', 10, 'prostitution'
						gs 'arousal', 'masturbate', 10, 'prostitution'
					elseif $ARGS[1] = 'unpaid':
						gs 'arousal', 'bj', 10
						gs 'arousal', 'masturbate', 10
					end
					minut -= 10
					gs 'stat'
					act 'Get cleaned up': gt 'pav_disco_sex', 'End'
				end
			end
		end

		if lose_virginity_event = 0:
			act 'Suggest he fucks your ass':
				*clr & cla
				hotel_sex = 0
				bmANAL[Tboynum] += 1
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/anal1.jpg"></center>'
				'You pull yourself away from his cock, your lips making a loud pop as it leaves your mouth. You quickly jump up on the bed, lay yourself down on your back and lift your knees all the way up to your breasts before reaching down with one hand to pull one of your ass cheeks aside.'
				gs 'arousal', 'auto_lube', 'anal'
				'<<$npc_firstname[$npclastsaved]>> takes the hint and starts pushing the head of his dick against your asshole. Moving slowly but insistently, the head of his dick pops into your ass. He pauses for a moment to let you adjust before he slowly starts thrusting in and out, fucking you carefully and stretching your hole. He slowly but steadily works his dick deeper into your ass, all while picking up speed.'
				if $ARGS[1] = 'paid': gs 'arousal', 'anal', 10, 'prostitution'
				if $ARGS[1] = 'unpaid':  gs 'arousal', 'anal', 10
				gs 'dinSex', 'std_trigger'
				gs 'stat'

				act 'Finish him off':
					*clr & cla
					spafinloc = 11
					gs 'cum_manage'
					
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
					'After he fucks your ass for a while, you look him in the eyes and say, "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds, his load bursts out. You smile up at him. Then, happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
					if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
					if $ARGS[1] = 'unpaid': gs 'arousal', 'hj', 10
					gs 'stat'
					act 'Get cleaned up': gt 'pav_disco_sex', 'End'
				end

				act 'Continue':
					*clr & cla
					spafinloc = 3
					gs 'cum_manage'
					bmANAL[Tboynum] += 1
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/anal2.jpg"></center>'
					'Since you are on your back, you are a bit lower than ideal. <<$npc_firstname[$npclastsaved]>> is having trouble getting enough leverage to fuck your ass with as much force as he''d like, so he pulls his cock out of your hole and flips you over. You get yourself up on your hands and knees, and he pulls your hips back towards him, and within seconds, you feel him thrust his cock balls deep back up your ass. He grabs your hips and starts pounding your asshole as hard as he can, his balls slapping against your clit with every thrust, the sound of hitting flesh getting louder as his hips join in, smacking against your ass. You feel him begin to cum in your ass, but he''s not done with you yet.'
					if $ARGS[1] = 'paid': gs 'arousal', 'anal', 10, 'prostitution'
					if $ARGS[1] = 'unpaid':  gs 'arousal', 'anal', 10
					gs 'stat'

					act 'Finish him off':
						*clr & cla
						spafinloc = 11
						gs 'cum_manage'
						
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
						'After he fucks your ass for a while, you look him in the eyes and say, "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds, his load bursts out. You smile up at him. Happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
						if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
						if $ARGS[1] = 'unpaid': gs 'arousal', 'hj', 10
						gs 'stat'
						act 'Get cleaned up': gt 'pav_disco_sex', 'End'
					end

					act 'Let him fuck your pussy too':
						*clr & cla
						bmSEX[Tboynum] += 1
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/fuck2.jpg"></center>'
						'After some time, he pulls out of you. Before you can even ask why he turns you on your side and slides his dick into your wet pussy. He slides himself balls-deep into you and starts fucking you, his thighs pounding against your ass cheeks.'
						'He is really getting into it. His movements are almost frenzied in their pace.'
						if $ARGS[1] = 'paid': gs 'arousal', 'vaginal', 10, 'prostitution'
						if $ARGS[1] = 'unpaid': gs 'arousal', 'vaginal', 10
						gs 'dinSex', 'std_trigger'
						gs 'stat'

						act 'Suck him off':
							*clr & cla
							lose_virginity_event = 0
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
							'"Let me suck you off. I want to taste myself on you," you tell him, not wanting him to cum inside you. He grins and pulls out of you, letting you slide off the bed onto your knees. You slide his dick as deeply down your throat as you can without gagging. Sucking up every drop of pussy juice clinging to his cock and licking the occasional stray drop from his balls. You slip your free hand down between your legs, and your fingers slide into your well fucked pussy. You suck harder as your arousal builds, flicking your clit every time he thrusts his cock down your throat.'
							if $ARGS[1] = 'paid':
								gs 'arousal', 'bj', 10, 'prostitution'
								gs 'arousal', 'masturbate', 10, 'prostitution'
							elseif $ARGS[1] = 'unpaid':
								gs 'arousal', 'bj', 10
								gs 'arousal', 'masturbate', 10
							end
							gs 'dinSex', 'std_trigger_oral'
							minut -= 10
							gs 'stat'

							act 'Swallow his load':
								*clr & cla
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
								'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You keep watching him, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue and sliding down your throat. Spurt after spurt keeps filling your mouth.'
								'He cums so much that you feel like your mouth is about to overflow with it all, but swallowing as fast as you can, you manage to get it all down. As he pulls his dick from your mouth, a strand of cum stretches from the tip of his cock back down to your lips. Then, smirking, he wipes his cock against your lips before tucking it back in his pants.'
								if $ARGS[1] = 'paid':
									gs 'arousal', 'bj', 10, 'prostitution'
									gs 'arousal', 'masturbate', 10, 'prostitution'
								elseif $ARGS[1] = 'unpaid':
									gs 'arousal', 'bj', 10
									gs 'arousal', 'masturbate', 10
								end
								minut -= 10
								gs 'stat'
								act 'Get cleaned up': gt 'pav_disco_sex', 'End'
							end

							act 'Let him cum on your face':
								*clr & cla
								spafinloc = 11
								gs 'cum_manage'
								
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
								'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue.'
								'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
								if $ARGS[1] = 'paid':
									gs 'arousal', 'bj', 10, 'prostitution'
									gs 'arousal', 'masturbate', 10, 'prostitution'
								elseif $ARGS[1] = 'unpaid':
									gs 'arousal', 'bj', 10
									gs 'arousal', 'masturbate', 10
								end
								minut -= 10
								gs 'stat'
								act 'Get cleaned up': gt 'pav_disco_sex', 'End'
							end
						end
					end
				end
			end
		end

		act 'Lie down on his bed':
			*clr & cla
			bmSEX[Tboynum] += 1
			hotel_sex = 0
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/fuck1.jpg"></center>'
			'After sucking his dick, you stop, lie on the bed and spread your legs. <<$npc_firstname[$npclastsaved]>> watches you the whole time, taking his clothes off like a hawk. You barely have your legs spread before he''s between them, already rubbing his slick cock along your pussy lips. He pushes forward gently, sliding his dick inside of your soaking pussy. He goes slow but quickly picks up the pace, soon pounding your balls deep.'
			if $ARGS[1] = 'paid': gs 'arousal', 'vaginal', 10, 'prostitution'
			if $ARGS[1] = 'unpaid': gs 'arousal', 'vaginal', 10
			gs 'dinSex', 'std_trigger'
			gs 'stat'
			if lose_virginity_event = 0:
				act 'Suck him off':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
					'"Let me suck you off. I want to taste myself on you," you tell him, not wanting him to cum inside you. He grins and pulls out of you, letting you slide off the bed onto your knees. You slide his dick as deeply down your throat as you can without gagging, sucking up every drop of pussy juice clinging to his cock and licking the occasional stray drop from his balls. You slip your free hand down between your legs, and your fingers slide into your well fucked pussy. You suck harder as your arousal builds, flicking your clit every time he thrusts his cock down your throat.'
					if $ARGS[1] = 'paid':
						gs 'arousal', 'bj', 10, 'prostitution'
						gs 'arousal', 'masturbate', 10, 'prostitution'
					elseif $ARGS[1] = 'unpaid':
						gs 'arousal', 'bj', 10
						gs 'arousal', 'masturbate', 10
					end
					gs 'dinSex', 'std_trigger_oral'
					minut -= 10
					gs 'stat'

					act 'Swallow his load':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
						'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You keep watching him, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue and sliding down your throat. Spurt after spurt keeps filling your mouth.'
						'He cums so much that you feel like your mouth is about to overflow with it all, but swallowing as fast as you can, you manage to get it all down. As he pulls his dick from your mouth, a strand of cum stretches from the tip of his cock back down to your lips. Then, smirking, he wipes his cock against your lips before tucking it back in his pants.'
						if $ARGS[1] = 'paid':
							gs 'arousal', 'bj', 10, 'prostitution'
							gs 'arousal', 'masturbate', 10, 'prostitution'
						elseif $ARGS[1] = 'unpaid':
							gs 'arousal', 'bj', 10
							gs 'arousal', 'masturbate', 10
						end
						minut -= 10
						gs 'stat'
						act 'Get cleaned up': gt 'pav_disco_sex', 'End'
					end

					act 'Let him cum on your face':
						*clr & cla
						spafinloc = 11
						gs 'cum_manage'
						
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
						'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Then, looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue.'
						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
						if $ARGS[1] = 'paid':
							gs 'arousal', 'bj', 10, 'prostitution'
							gs 'arousal', 'masturbate', 10, 'prostitution'
						elseif $ARGS[1] = 'unpaid':
							gs 'arousal', 'bj', 10
							gs 'arousal', 'masturbate', 10
						end
						minut -= 10
						gs 'stat'
						act 'Get cleaned up': gt 'pav_disco_sex', 'End'
					end
				end
			end

			act 'Continue':
				*clr & cla
				bmSEX[Tboynum] += 1
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/fuck2.jpg"></center>'
				'After some time, he pulls out of you, and before you can even ask why, he turns you on your side and slides his dick back into your wet pussy. Then, he slides himself balls deep in you again and starts fucking you, his thighs pounding against your ass cheeks.'
				'He seems to be really getting into it. His movements are almost frenzied in their pace as he leans forward towards you and says, "I want to fuck your ass."'
				if $ARGS[1] = 'paid': gs 'arousal', 'vaginal', 10, 'prostitution'
				if $ARGS[1] = 'unpaid': gs 'arousal', 'vaginal', 10
				gs 'dinSex', 'std_trigger'
				gs 'stat'

				act 'Suck him off':
					*clr & cla
					lose_virginity_event = 0
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
					'"Let me suck you off. I want to taste myself on you," you tell him, not wanting him to cum inside you. He grins and pulls out of you, letting you slide off the bed onto your knees. You slide his dick as deeply down your throat as you can without gagging, sucking up every drop of pussy juice clinging to his cock and licking the occasional stray drop from his balls. You slip your free hand down between your legs, and your fingers slide into your well fucked pussy. You suck harder as your arousal builds, flicking your clit every time he thrusts his cock down your throat.'
					if $ARGS[1] = 'paid':
						gs 'arousal', 'bj', 10, 'prostitution'
						gs 'arousal', 'masturbate', 10, 'prostitution'
					elseif $ARGS[1] = 'unpaid':
						gs 'arousal', 'bj', 10
						gs 'arousal', 'masturbate', 10
					end
					gs 'dinSex', 'std_trigger_oral'
					minut -= 10
					gs 'stat'

					act 'Swallow his load':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/bj2.jpg"></center>'
						'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You keep watching him, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue and sliding down your throat. Spray after spray keeps filling your mouth.'
						'He cums so much that you feel like your mouth is about to overflow with it all, but swallowing as fast as you can, you manage to get it all down. As he pulls his dick from your mouth, a strand of cum stretches from the tip of his cock back down to your lips. Then, smirking, he wipes his cock against your lips before tucking it back in his pants.'
						if $ARGS[1] = 'paid':
							gs 'arousal', 'bj', 10, 'prostitution'
							gs 'arousal', 'masturbate', 10, 'prostitution'
						elseif $ARGS[1] = 'unpaid':
							gs 'arousal', 'bj', 10
							gs 'arousal', 'masturbate', 10
						end
						minut -= 10
						gs 'stat'
						act 'Get cleaned up': gt 'pav_disco_sex', 'End'
					end

					act 'Let him cum on your face':
						*clr & cla
						spafinloc = 11
						gs 'cum_manage'
						
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
						'You keep sucking his dick for a while longer before his breathing quickens, and you hear him making soft grunts. Then, looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before suddenly feeling a hot jet of liquid coat your tongue.'
						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
						if $ARGS[1] = 'paid':
							gs 'arousal', 'bj', 10, 'prostitution'
							gs 'arousal', 'masturbate', 10, 'prostitution'
						elseif $ARGS[1] = 'unpaid':
							gs 'arousal', 'bj', 10
							gs 'arousal', 'masturbate', 10
						end
						minut -= 10
						gs 'stat'
						act 'Get cleaned up': gt 'pav_disco_sex', 'End'
					end
				end

				if lose_virginity_event = 0:
					act 'Let him fuck your ass':
						*clr & cla
						bmANAL[Tboynum] += 1
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/anal1.jpg"></center>'
						'You nod and roll over onto your back before pulling your knees up to your breasts. You reach down with one hand and pull one of your ass cheeks aside.'
						gs 'arousal', 'auto_lube', 'anal'
						'He takes the hint and pushes the head of his dick against your asshole. It soon pops into your ass, and he pauses to let you adjust before slowly fucking you. Then, he slowly but steadily works his dick deeper in your ass while slowly picking up speed.'
						if $ARGS[1] = 'paid': gs 'arousal', 'anal', 10, 'prostitution'
						if $ARGS[1] = 'unpaid': gs 'arousal', 'anal', 10
						gs 'dinSex', 'std_trigger'
						gs 'stat'

						act 'Finish him off':
							*clr & cla
							spafinloc = 11
							gs 'cum_manage'
							
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
							'After he fucks your ass for a while, you look him in the eyes and say, "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds, his load bursts out. You smile up at him. Then, happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
							if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
							if $ARGS[1] = 'unpaid': gs 'arousal', 'hj', 10
							gs 'stat'
							act 'Get cleaned up': gt 'pav_disco_sex', 'End'
						end

						act 'Continue':
							*clr & cla
							spafinloc = 3
							gs 'cum_manage'
							bmANAL[Tboynum] += 1
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/anal2.jpg"></center>'
							'Since you are on your back, you are a bit lower than ideal. <<$npc_firstname[$npclastsaved]>> is having trouble getting enough leverage to fuck your ass with as much force as he''d like, so he pulls his cock out of your hole and flips you over. You get yourself up on your hands and knees as he pulls your hips back towards him, and within seconds, you feel him thrust his cock balls deep back up your ass. He grabs your hips and starts pounding your asshole as hard as he can, his balls slapping against your clit with every thrust, the sound of hitting flesh getting louder as his hips join in, smacking against your ass. You feel him begin to cum in your ass, but he''s not done with you yet.'
							if $ARGS[1] = 'paid': gs 'arousal', 'anal', 10, 'prostitution'
							if $ARGS[1] = 'unpaid': gs 'arousal', 'anal', 10
							gs 'stat'

							act 'Finish him off':
								*clr & cla
								spafinloc = 11
								gs 'cum_manage'
								
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
								'After he fucks your ass for a while, you turn to look over your shoulder and say, "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds, his load bursts out. You smile up at him. Then, happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$npclastsaved]>> does with great enthusiasm.'
								if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
								if $ARGS[1] = 'unpaid': gs 'arousal', 'hj', 10
								gs 'stat'
								act 'Get cleaned up': gt 'pav_disco_sex', 'End'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'End':
	cls
	minut += 15
	gs 'stat'
	'<center><video autoplay loop src="images/pc/activities/misc/dress_2.mp4"></video></center>'
	'After you relax, you smile at <<$npc_firstname[$npclastsaved]>> and say, "That was fun, but I really should get going..."'
	'<<$npc_firstname[$npclastsaved]>> stretches lazily on the bed, not bothering to get up. "You were great, <<$pcs_nickname>>! I hope I''ll run into you again next time I''m in Pavlovsk!"'
	if arrpos('sparrloc', 11) ! -1 and sparrvol > 0:cumspclnt = 12 & gs 'cum_cleanup' & 'You look around the room and find a packet of wipes. You take one and quickly wipe the sperm off your face to make yourself presentable enough to go outside.'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Leave the hotel': gt 'pav_market'
end

if $ARGS[0] = 'drug_user':
	*clr & cla
	BeInOtel += 1
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/otel.jpg"></center>'
	'<<$npc_firstname[$npclastsaved]>> has a nice room. He tells you to sit on the bed while he searches for something. "Where did I put it?"'
	'His face lights up when he finds what he''s looking for. Then, he quickly sits by the table and gestures for you to come over.'
	'You get up and curiously walk over to the table. <<$npc_firstname[$npclastsaved]>>''s spread some powder on the table, working hard to split it into equal lines. "It''s your lucky day <<$pcs_nickname>>. You''ll have the time of your life with this stuff. Everything you do becomes much better when you add this to the mix."'
	'You hesitantly back up a little. "I-I don''t know... I mean, I don''t even know you, and who knows what might be in that bag."'
	'He turns to you and smirks. "You followed me back here, right? But believe me when I tell you this stuff is the best you''ll ever get your hands on. A friend of mine hooked me up - he gets it from this guy in the city who knows his stuff."'
	gs 'willpower', 'drugs', 'resist'
	if will_cost <= pcs_willpwr:
		act 'Refuse (<<will_cost>> Willpower)':
			gs 'willpower', 'drugs', 'resist'
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			gt 'pav_disco_sex', 'no drugs'
		end
	else
		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Try some': gt 'pav_disco_sex', 'drugs'
end

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

	act 'Nod':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel1.jpg"></center>'
		'You can barely contain your eagerness and get more excited by the second. By now, you can feel the wet spot in your panties forming, and you''re longing after his cock as your pussy just screams to be filled.'
		'<<$npc_firstname[$npclastsaved]>> gets up from the chair and stands behind you. He starts roughly pawing at your breasts through the fabric - even his hamfisted groping is turning you on.'
		'The two of you start making out, and you let out a little moan when <<$npc_firstname[$npclastsaved]>> starts stroking your thighs.'
		'Before you know it, you''ve been stripped down to your underwear while <<$npc_firstname[$npclastsaved]>> squeezes your breasts. He gives you a few more kisses and hooks one finger into your panties before looking at you. "Time for some pleasure."'
		$orgasm_or = 'no'
		gs 'arousal', 'foreplay', 5
		gs 'stat'

		act 'Follow him':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel2.jpg"></center>'
			'Giddy with excitement, you eagerly remove your underwear and let <<$npc_firstname[$npclastsaved]>> lead you to a grand mirror, where he drops down to his knees, spreads your legs wide and shoves his face into your crotch, wildly licking your sopping wet pussy.'
			'You can feel your pussy pulsing as he eats you out, your rampant arousal overwhelming you.'
			'Before long, you start shuddering in pleasure, and within seconds, you begin rolling your hips as the satisfaction is too much for you to handle. Finally, you let out a loud sigh, grab him by the hair and clench his head between your thighs as you orgasm wildly, your knees turning to jelly from the sweet satisfaction.'
			$orgasm_or = 'yes'
			gs 'arousal', 'cuni', 5
			gs 'stat'

			act 'Not done yet':
				*clr & cla
				pcs_horny += 50
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel3.jpg"></center>'
				'Just as you''re about to drift away and savour the fantastic orgasm you just had, <<$npc_firstname[$npclastsaved]>> grabs and tugs you over to the couch. Your legs are weak, and you barely manage to walk.'
				'<<$npc_firstname[$npclastsaved]>> lays you down and smiles. "It''s your lucky day. That was so hot that there''s no way I can fuck you right now. I''m way too horny, and if I do, I''ll cum as soon as I stick my dick in you. So you just spread your beautiful legs again and let me have another taste."'
				'<<$npc_firstname[$npclastsaved]>> lowers his head and begins sucking on your super-sensitive clit. While doing that, he moves his hand between your ass cheeks and starts playing with your asshole, rubbing and massaging it lightly. You try to push his hand away, but he just tells you to relax.'
				'He starts sucking your clit harder, his tongue flicking over it as he continues massaging your ass with his thumb. Then, just as you''re about to cum again, he stops, making you sigh in frustrated disappointment.'
				gs 'arousal', 'cuni', 5
				gs 'stat'

				act 'Lick his cock':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel4.jpg"></center>'
					'"Now, don''t be like that, <<$pcs_firstname>>. It''s time for you to return the favour," he says as he places himself in front of you with his cock hanging out freely.'
					'You excitedly switch positions with him and grab his cock with your hand. "Go on, you can play with it," he says with a smirk.'
					'You eagerly stick out your tongue and start licking his cock, rolling your tongue around the head. You can feel it growing bigger and harder in your hands as you continue teasing him.'
					gs 'arousal', 'bj', 5
					gs 'stat'

					act 'Suck his cock':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel5.jpg"></center>'
						'You take his cock into your mouth, wrapping your lips around it as you put one hand around the base and the other softly cupping his balls in your palm.'
						'You immediately start sucking his dick, bobbing your head up and down his shaft roughly as your arousal takes over your actions. <<$npc_firstname[$npclastsaved]>>''s breathing starts getting faster and heavier. Finally, he tries to stop you, telling you to slow down and lick his shaft instead.'
						'You ignore him and start playing with his balls as well. Finally, after teasing him for a while, he makes you stop and says he wants to fuck your ass.'
						'You''re hesitant at the suggestion, even feeling as horny as you are. Still, he quickly reassures you that having anal sex while high is a fantastic feeling.'
						'You nod and take his cock back in your mouth, taking it deep and lubing it up as much as possible.'
						anal_slip += 4
						gs 'arousal', 'bj', 5
						gs 'dinSex', 'std_trigger_oral'
						gs 'stat'

						act 'Doggy':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel6.jpg"></center>'
							'<<$npc_firstname[$npclastsaved]>> makes you turn around with your ass towards him and gets into position behind you. He lines his cock up with your asshole, and then with one smooth and steady motion, he slowly eases his cock into your back door. You panic as he begins to work his way into you, stretching you wider than you thought possible.'
							'You calm down a little, loosening your hole and allowing <<$npc_firstname[$npclastsaved]>> to move faster. Seeing his chance, he grabs you by the hips and pushes himself deep into your ass. He slowly starts building up speed, and you feel your arousal building as you let yourself go and enjoy the feeling. You start pushing back against him, meeting him thrust for thrust and moaning loudly. "Harder, harder!" you moan, and he grabs your shoulders, letting you slam yourself back onto his cock.'
							'You feel another orgasm building, but this one is different. It feels like it''s coming from deeper inside you. "Harder! I''m almost there. Make me cum again!" you scream as his thrusting becomes more frantic.'
							'<<$npc_firstname[$npclastsaved]>> speeds up his movements as you start shaking and shivering as your orgasm hits, spraying girl-cum all over the bed cover as you pant.'
							$orgasm_or = 'yes'
							gs 'arousal', 'anal', 5
							gs 'dinSex', 'std_trigger'
							gs 'stat'

							act 'Finish':
								*clr & cla
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/hotel7.jpg"></center>'
								'You barely know what''s happening as <<$npc_firstname[$npclastsaved]>> pulls out of you, pulls you up onto your knees and starts jerking off in front of you, your head still fuzzy from your orgasm. It doesn''t take long before he shoots his load over your face and breasts.'
								'You try to swallow some as it hits your mouth, but you''re still so dazed by your orgasm that you don''t know what you''re doing. "I told you sex is so much better with drugs." you faintly hear him saying.'
								'Even after that fantastic sex and multiple orgasms, you still feel unsatisfied and need more. You think about it for a moment and decide to ask. "If I wanted to get some of those drugs myself, who would I talk to?" He smiles and tells you that the dealer lives in a run-down area of the city residential area and gives you his name. You thank him for the information and get cleaned before heading out the door. As you walk down the hall, the urgent need to be filled by a cock returns, and you feel incredibly horny again already.'
								gs 'arousal', 'foreplay', 5
								gs 'arousal', 'end'
								pcs_horny += 100
								gs 'stat'
								act 'Leave the room': gt 'pav_market'
							end
						end
					end
				end
			end
		end
	end

	gs 'willpower', 'anal', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Refuse (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'anal', 'resist', 'hard'
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/leave.jpg"></center>'
			'Even though you''ve never felt this aroused, you feel that you made a mistake and need to leave before it''s too late for you to resist him.'
			'You try to excuse yourself, saying it wasn''t your intention to lead him on...'
			'<<$npc_firstname[$npclastsaved]>> stops for a moment, and you notice that he''s clearly affected by the drugs. His eyes flare up as he leaps from the chair, shouting that you''re just some whore that was after his drugs.'
			'He grabs you and shoves you to the door, throwing you outside. You stand in shock as the drugs take hold of you, and you feel yourself becoming incredibly aroused. You knock on the door, but <<$npc_firstname[$npclastsaved]>> refuses to open it. Finally, you decide to leave... maybe you''ll get lucky somewhere else.'
			act 'Leave the hotel': gt 'pav_market'
		end
	else
		act 'Refuse (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
end

if $ARGS[0] = 'no drugs':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/leave.jpg"></center>'
	'"There''s no way I''m doing that! Who knows what that powder is? I don''t want to get raped. Have fun, loser."'
	'<<$npc_firstname[$npclastsaved]>> snorts deeply and looks over at you. "Too bad. You''ll be missing out on a great party. This is some quality stuff..."'
	'"I think I''ll be fine, thanks." you retort as you leave the room. <<$npc_firstname[$npclastsaved]>> just shrugs his shoulders and jumps straight back into what he started.'
	act 'Leave the room': gt 'pav_market'
end

--- pav_disco_sex ---------------------------------