glife/locations/dinParty.qsrc

# dinParty

!A random event in the toilet
if $ARGS[0] = 'party_toilet_event':
	menu_off = 1
	temp = rand(1,8)
	if toiletEvent_Girls = daystart: temp += 1
	if toiletEvent_Rex = daystart: temp += 1
	if toiletEvent_Sis = daystart: temp += 1
	if toiletEvent_SisBoy = daystart: temp = 1
	*clr & cla
	minut += 5
	gs 'stat'
	if temp = 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_2_<<rand(1,2)>>.jpg"></center>'
		'A girl sits on the toilet drinking.'
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 2:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_3_<<rand(1,5)>>.jpg"></center>'
		'A girl sits on the toilet peeing and she seems oddly happy to see you.'
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 3:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_4.jpg"></center>'
		'A wasted girl sits on the toilet masturbating.'
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 4:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_1.jpg"></center>'
		'You go into the bathroom, only to find Rex standing in there completely naked with a raging hard on.'
		act 'Help':
			*clr & cla
			toiletEvent_Rex = daystart
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_2.jpg"></center>'
			'You walk over to Rex and when you are with in arms reach he grabs you by the neck and pulls you close kisses your lips, you take his dick in hand and gently stroke it.'
			
			gs 'arousal', 'kiss', 5
			gs 'stat'
			
			act 'Masturbate':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_<<rand(3,4)>>.jpg"></center>'
				'Breaking the kiss you put your full attention on jerking Rex off.'
				
				gs 'arousal', 'hj', 5
				gs 'stat'
				
				act 'Cum':
					*clr & cla
					minut += 5
					gs 'boyStat', 'A57'
					spafinloc = 15
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_5.jpg"></center>'
					'As you jerk him off he moans and sperm starts spewing everywhere getting on your hands. "Ooh, <<$pcs_nickname>>, you saved me, but next time use your mouth." He said with a wink.'
					
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Move away': gt $loc, $metka
				end
			end
			act 'Suck':
				*clr & cla
				if reksMeet = 1: bja += 1
				gs 'boyStat', 'A57'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_<<rand(6,10)>>.jpg"></center>'
				'You feel Rex''s hands on your shoulders gently pushing you down, you instantly obey and drop to your knees. Once your eye and more importantly mouth level with Rex''s <<dick>>cm <<$dick_girth>> dick, you take his head into your mouth and wrap your lips tightly around his shaft as you begin to stroke him off with your mouth.'
				'He moans as you suck his cock, he is already tensing up, you can tell he is already about to cum.'
				
				gs 'arousal', 'bj', 5
				gs 'stat'
			
				act 'Cum':
					*clr & cla
					minut += 5
					gs 'boyStat', 'A57'
					spafinloc = 12
					gs 'cum_manage'
					spafinloc = 11
					gs 'cum_manage'
					facial += 1
					i = rand(11,18)
					if i = 11:
						'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_<<i>>.mp4"></video></center>'
					else
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_<<i>>.jpg"></center>'
					end
					'You barely have time to pull the penis out of your mouth, but a couple of spurts of cum still shoot into your mouth. The rest of the sperm spurts in streams across your pretty face, you happily lick his quivering dick, licking up the last drops of cum up.'
					
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Move away': gt $loc, $metka
				end
			end
		end
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 5:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_6_1.jpg"></center>'
		'Coming into the bathroom you find your sister Anna sitting on the toilet, you notice cum on her face.'
		'When she see''s you, she smiles, then opens up her mouth and sticks out her tongue, showing her tongue completely coated in cum.'
		act 'Lick':
			*clr & cla
			toiletEvent_Sis = daystart
			minut += 5
			gs 'boyStat', 'A56'
			sexvolume = 5
			spafinloc = 12
			gs 'cum_manage'
			gs 'stat'
			i = rand(2,5)
			if i = 2 or i = 4:
				'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_6_<<i>>.mp4"></video></center>'
			else
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_6_<<i>>.jpg"></center>'
			end
			'Seeing this little display you smile and kneel down in front of her. You start licking the sperm off her face, once you have licked it all up, you kiss her. The two of you share a long kiss where you trade the cum back and forth in your mouths before you both end up swallowing a portion of it.'
			'"So who''s dick or should I say dicks, have you been sucking to get all that cum, all over you?" You ask with a smile.'
			'"Roma tried to make up again." You sister responded angrily, once she finished peeing she got up and left. Obviously not wanting to talk about it.'
			act 'Move away': gt $loc, $metka
		end
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 6:
		toiletEvent_Girls = daystart
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_1.jpg"></center>'
		'You just opened the door and saw Lena and Ira kissing, while Ira sat on the toilet. Lena pushes Ira''s legs apart and then breaks the kiss, lowering her facshe begins to lick her pussy, while Ira is still sitting on the toilet.'
		'"Ahaha, Lena, your such a bitch sometimes and that''s why I love you." Moaned Ira.'
		act 'Watch':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_2.jpg"></center>'
			'A few moments later they both get up and strip naked, Lena sits Ira on the edge of the sink. Lena drops back to her knees while Ira spreads her legs wide, giving her friend easy access. Lena starts licking her friends pussy at once, Ira closes her eyes and moans softly at her friends attention.'
			
			gs 'arousal', 'voyeur_sex', 5, 'lesbian'
			gs 'stat'
			
			act 'Watch':
				*clr & cla
				'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_3.mp4"></video></center>'
				'Ira moans louder, her breathe coming quicker, she grabs Lena''s head and pushes it against her crotch as she grinds herself against her friends face. Her body begins to tremble as she lets out a finally load moan of pleasure as she orgasms, coating her friends face with her pussy juices.'
				
				gs 'arousal', 'voyeur_sex', 5, 'lesbian'
				gs 'stat'
			
				act 'Go in':
					*clr & cla
					minut += 5
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_4.jpg"></center>'
					'Once they finish you walk in. Ira and Lena look at each other and then smile at you.'
					'"Oh, it''s you <<$pcs_nickname>>, glad it is not some guy. We do not know what we would have done with him."'
					'"Yes, I just wanted to tidy myself up." you said with a slight blush.'
					'Lena came up to you and leaned in close as she whispered in your ear: "You liked watching what we were doing, right?. Stay with us, and you''ll like it even more."'
					act 'Stay':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_5.jpg"></center>'
						'Looking at the naked girls you bite your lower lip as your eyes roam over their bodies with a lustful look. Ira and Lena start taking your clothes off as they start kissing you all over.'
						'"Mmm, Oh yes, don''t stop." You moan out. With these words, Lena sucks your clit and began licking your wet pussy.'
						
						gs 'arousal', 'cuni', 5, 'lesbian'
						gs 'stat'
			
						act 'Enjoy':
							*clr & cla
							pcs_mood = 100
							'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_6.mp4"></video></center>'
							'From the gentle caresses of girls you feel incredible pleasure, completely trusting them you feel totally relaxed. Then Ira takes Lena''s place licking your pussy, while Lena slides her tongue to your asshole as she begins to lick it.'
							'From this dual tongue lashing you don''t last long. You start moaning loudly and your body spasms hard with an orgasm, coating Ira''s face from the wetness of your pussy. Once you orgasm passes both girls stand up and Lena starts licking Ira''s face, licking your wetness off her. You quickly join in licking Lena''s face licking Ira''s juices off her face. While Ira''s kisses you both in turns.'
							
							$orgasm_or = 'yes'
							gs 'arousal', 'cuni', 5, 'lesbian', 'group'
							gs 'stat'
			
							act 'Chat':
								*clr & cla
								minut += 5
								'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_7_7.mp4"></video></center>'
								'"Well, <<$pcs_nickname>>, did you like it?"'
								'"Oh, it was amazing girls, makes me think we never need the touch of a man."'
								'"That''s for sure, you only need a special girlfriend or girlfriends." With these words, Lena and Ira left you.'
								
								gs 'arousal', 'end'
								gs 'stat'
								
								act 'Move away': gt $loc, $metka
							end
						end
					end
				act 'Go to the living room': gt 'sbReksHome', 'party_gost'
				end
			act 'Go to the living room': gt 'sbReksHome', 'party_gost'
			end
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
		end
	act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 7:
		i = rand(1,3)
		if i = 2:
			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_8_<<i>>.mp4"></video></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_8_<<i>>.jpg"></center>'
		end
		'From the sounds of the groans, moans and cries of passion the bathroom is in use again. Peeking inside you see a sweet couple fucking like rabbits.'
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	elseif temp = 8:
		toiletEvent_SisBoy = daystart
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_9.jpg"></center>'
		'Looking inside the bathroom you find your sister with her back against the wall, her skirt pulled up and panties around her ankles, while Roma''s face is buried between her legs. He''s apparently asking for forgiveness from your sister again.'
		act 'Go to the living room': gt 'sbReksHome', 'party_gost'
	end
end

!Masturbating in the bathroom
if $ARGS[0] = 'toilet_mast':
	cla
	*clr
	menu_off = 1
	if pcs_inhib < 30:inhib_exp += rand(1,3)
	i = rand(1,3)
	if i < 3:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_1_<<i>>.jpg"></center>'
	if i = 3:'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_1_<<i>>.mp4"></video></center>'
	'With your arousal over powering your senses you couldn''t take it anymore, you pull your panties down and rigorously begin rubbing your clit. Once you are good and soaked you slide your fingers inside of yourself and finger fuck yourself, switching back and forth between rubbing your clit and fucking your fingers until you bring yourself to an orgasm.'
	
	$orgasm_or = 'yes'
	gs 'arousal', 'masturbate', 5
	gs 'arousal', 'end'
	gs 'stat'
	
	act 'Move away': gt $loc, $metka
end

!Speakers for DJ
if $ARGS[0] = 'dj':
	cla
	*clr
	menu_off = 1
	minut += 5
	dj_beer = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_2_3.jpg"></center>'
	'You take two bottles of booze to the DJ and his friend'
	act 'Move away': gt $loc, $metka
end

if $ARGS[0] = 'dj_beer':
	cla
	*clr
	menu_off = 1
	minut += 5
	dj_thank = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy.jpg"></center>'
	'You take two beers to the guys, they gratefully appreciated your offer.'
	'"<<$pcs_nickname>>, you ever use one of these before?" The DJ asks you indicating the turntable.'
	'Shaking your head. "No, never."'
	'He smiles to you. "While everyone is still sitting and drinking you can give it a little <a href="exec: gt ''dinParty'', ''dj_thank''">twist</a>, lets see what you can do girl."'
	act 'Move away': gt $loc, $metka
end

if $ARGS[0] = 'dj_thank':
	cla
	*clr
	menu_off = 1
	minut += 5
	dj_bad = 1
	instrmusic_exp += rand(0,2) 
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy_1.jpg"></center>'
	'You are happy to take this opportunity, putting your fingers on the records you move them around, making god awful noises. The guys stop you before to long. "Ok I think that''s enough, I think you made my ears bleed." He says with a laugh.'
	act 'Move away': gt $loc, $metka
!why not add in an option here to start the series below?
end

if $ARGS[0] = 'dj_boobs':
	cla
	*clr
	menu_off = 1
	gs 'arousal', 'flash', 5
	dj_boobs = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy_2.jpg"></center>'
	'"Like this boys?" You ask as you put your breasts on the turn table and move it a bit with your breasts.'
	'Not much sound comes out form your attempt, but guys seem to love the attempt all the same.'
	act 'Move away': gt $loc, $metka
	act 'Take off your top': gt 'dinParty', 'dj_cock'
end

if $ARGS[0] = 'dj_cock':
	cla
	*clr
	menu_off = 1
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy_3.jpg"></center>'
	'Seeing the interest from the smiling guys watching you, you get rid of your top and take off your bra and then place your naked breasts on the turntable and try to play it topless. "I think I did better that time, what do you think?"'
	'The guy pulled out his erection as he said "Not bad, maybe try this instead."'
	act 'Move away': gt $loc, $metka
	act 'Give his dick a try': gt 'dinParty', 'dj_suck'
end

if $ARGS[0] = 'dj_suck':
	cla
	*clr
	menu_off = 1
	gs 'arousal', 'foreplay', 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy_4.jpg"></center>'
	'You grab his hard cock and place the head on the spinning record, barely touching it. The guy started a bit, perhaps it was a little painful for him.'
	if Rex_Love = 1: 'You don''t think Rex would like you playing these games with the DJ, you had a little fun but that''s enough.'
	act 'Move away': gt $loc, $metka
	if Rex_Love = 0:
		act 'Kiss it and make it better':
			cla
			*clr
			gs 'npcgeneratec', 0, 'The DJ at Rex''s Party', rand(17,22)
			gs 'boyStat', $npclastgenerated
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy_5.jpg"></center>'
			'You decide to make amends to guy, and kiss the head of his cock.'
			'You find you don''t want to stop and passionately start sucking his <<dick>>cm <<$dick_girth>> dick right there in front of everyone.'
			'After you suck him for a bit, he pulls you up and turns you around. Pulling your panties down, he pushes you forward bending you over.'
			
			gs 'arousal', 'bj', 5, 'exhibitionism'
			gs 'stat'
			
			act 'Bend over':
				cla
				*clr
				guy += 1
				pcs_vag += 1
				gs 'cum_manage'
				'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boy_6.mp4"></video></center>'
				'You let him bend you over, as he begins to rub the head of his dick against your pussy lips.'
				'He abruptly pushes his <<dick>>cm <<$dick_girth>> dick inside of you and starts fucking you with a fast pace.'
				'With in just a few moments he grunts and shoots his load of sperm deep into your wet pussy.'
				
				gs 'arousal', 'vaginal', 5, 'exhibitionism'
				gs 'arousal', 'end'
				gs 'stat'
				
				gs 'cuminsidereact'
				act 'Move away': gt $loc, $metka
			end
		end
	end
end

!Speaker dance
if $ARGS[0] = 'dance':
	cla
	*clr
	minut += 5
	if pcs_inhib < 40: inhib_exp += rand(1,2)
	gs 'stat'
	'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_gost_1_<<rand(1,7)>>.mp4"></video></center>'
	'Moving to the rhythmic sounds, you indulge in an unrestrained dance.'
	'You jump, sway your body, and rock your booty, losing yourself in the general merriment.'
	if pcs_danc >= 50: 'You move your body perfectly with the rhythm of the music in an erotic way. This gets you a lot of attention from the others and you love their attention.'
	if pcs_danc < 50: 'Your ridiculous movements during the dance does not bother anyone, You dance badly, but you do not care.'
	act 'Have a rest': gt $loc, $metka
	act 'Dance more': gt 'dinParty', 'dance' 
end


if $ARGS[0] = 'boys_swalow':
	*clr & cla
	menu_off = 1
	minut += 5
	swallow += 1
	i = 5
	:dinPartySwalloop
	gs 'npcgeneratec', 0, 'a guy from Rex''s party', rand(17,22)
	gs 'boyStat', $npclastgenerated
	spafinloc = 12
	gs 'cum_manage'
	i -= 1
	if i > 0: jump 'dinPartySwalloop'
	gs 'stat'
	'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_<<rand(13,15)>>.mp4"></video></center>'
	'You swallowed the tart mixture of several different guys sperm, greedily licking your lips with your tongue.'
	'"Uhh, <<$pcs_nickname>>, You''re still the best cocksucker around, want more sperm to swallow, Call us."'
	'The guys helped you back into the apartment and into one of the bedrooms, as you are to drunk to do it yourself.'
	
	act 'Fall asleep': gt 'dinParty', 'sleep'
end

if $ARGS[0] = 'boys_spit':
	*clr & cla
	menu_off = 1
	minut += 5
	i = 5
	:dinPartySpitloop
	gs 'npcgeneratec', 0, 'a guy from Rex''s party', rand(17,22)
	gs 'boyStat', $npclastgenerated
	spafinloc = 12
	sexvolume = 1
	gs 'cum_manage'
	i -= 1
	if i > 0: jump 'dinPartySpitloop'
	gs 'stat'
	'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_<<rand(16,17)>>.mp4"></video></center>'
	'You spat out the mouthful mixture of cum from several guys from your mouth.'
	'"What''s wrong <<$pcs_nickname>> didn''t you like it? I thought all the girls loved the taste of cum." One of the guys asked you with a laugh.'
	'The guys helped you back into the apartment and into one of the bedrooms, as you are to drunk to do it yourself.'
	
	act 'Fall asleep': gt 'dinParty', 'sleep'
end

if $ARGS[0] = 'rex_talk':
	*clr & cla
	menu_off = 1
	minut += 5
	rex_talk += 1
	gs 'stat'	
	'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_2_<<rand(1,5)>>.mp4"></video></center>'
	'You find a space to sit and talk to Reks, he''s quite interesting and very handsome so you spend most of the time just nodding and flirting.'
	act 'Move away': gt $loc, $metka
	if rex_talk >= 2: act 'Hug': gt 'dinParty', 'rex_hug'
	act 'Ask Rex to dance': gt 'dinParty', 'rex_dance'
end

if $ARGS[0] = 'rex_hug':
	*clr & cla
	menu_off = 1
	minut += 5
	if pcs_inhib < 40:inhib_exp += rand(1,2)
	gs 'stat'
	if Rex_Love =1:
		if rand(1,2) = 1:
			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_4_1.mp4"></video></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_4_<<rand(2,5)>>.jpg"></center>'
		end
		'Rex grabbed you with his strong hands and began to knead your ass with one hand and caress your pussy with the other, in front of everybody.'
		'You grab his neck and audible groan completely given into his affections.'
		'You are flooded with the most pleasant feeling in the world, you don''t want it to stop.'
		act 'Kiss':
			*clr & cla
			if rand(1,2) = 1:
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_5_1.jpg"></center>'
			else
				'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_5_<<rand(2,4)>>.mp4"></video></center>'
			end
			'Looking adoring into each others eyes, being to passionately kiss.'
			'You lips touch in your long kiss, it almost feels like a shock of electricity is running through you body.'
			'For a long time you continue to enjoying the warm kiss, Rex finally breaks the kiss and says. "Come with me <<$pcs_nickname>>, I think we''ve had enough fun here." Simling he takes you by the hand and leads you away.'
			
			gs 'arousal', 'kiss', 5, 'exhibitionism'
			gs 'stat'
	
			act 'Move away': gt $loc, $metka
			act 'Follow Rex': gt 'reks', 'Party_rex_sex'
		end
	end

	if Rex_Love = 0:
		if rand(1,2) = 1:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_13_<<rand(4,7)>>.jpg"></center>'
		else
			'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_13_<<rand(1,3)>>.mp4"></video></center>'
		end
		'Rex grabbed you with his strong hands and began to knead your ass with one hand and caress your pussy with the other, in front of everybody.'
		'You grab his neck and audible groan completely given into his affections.'
		'After playing with your pussy for a bit, he stops and takes you by the hand and pulls you away as he says. "Come with me <<$pcs_nickname>>, I think we''ve had enough fun here."'

		gs 'arousal', 'foreplay', 5, 'exhibitionism'
		gs 'stat'
		
		act 'Follow Rex': gt 'reks', 'Party_rex_sex'
	end    
end

if $ARGS[0] = 'rex_dance':
	*clr & cla
	menu_off = 1
	minut += 5
	if pcs_inhib < 40: inhib_exp += rand(1,2)
	gs 'stat'
	if rand(1,2) = 1:
		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_3_<<rand(4,6)>>.mp4"></video></center>'
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_3_<<rand(1,3)>>.jpg"></center>'
	end
	'Rex took you by the hand and dragged you out to dance, you are happily follow him.'
	'You dance, slowly getting closer to each other and finally grinding a bit against each other.'
	'You turn around putting your back to him and grind your tight ass against his crotch, you can feel his hard cock against your ass, as you grind against it.'
	act 'Move away': gt $loc, $metka 
	if rex_talk >= 2: act 'Hug': gt 'dinParty', 'rex_hug'
end

if $ARGS[0] = 'sleep':
	*clr & cla
	menu_off = 1
	minut += 5
	gs 'stat'
	if Rex_save = 1 and Rex_Love = 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_13_<<rand(1,4)>>.jpg"></center>'
		'You fall asleep feeling the warmth of his body against you back, he hugs you tightly.'
		'You feel is hard erection against your butt, it excites you, but you are to tired to do anything with it as you fall fast asleep.'
	elseif Rex_save = 1 and Rex_Love = 0:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_12_<<rand(1,11)>>.jpg"></center>'
		'You feel completely safe, as you fall asleep to have sweet dreams.'
	elseif iralenasleep >= 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_iralena_6_<<rand(6,7)>>.jpg"></center>'
		'Lena, Ira and you lay in the bed, side by side as you fall asleep.'
	elseif drunk_sveta >= 1 and sister_party_dom < 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_4_<<rand(1,3)>>.jpg"></center>'
		'Your body could not withstand so much alcohol and you end up passing out. Fortunately friends were close, who dragged you into a bedroom and put you in bed.'
	elseif sister_party_dom >= 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_sister_9_<<rand(3,5)>>.jpg"></center>'
		'You fall asleep in the arms of your beloved sister with a final kiss before drifting off.'
	elseif party_boys_in >= 1:
		i = rand(1,3)
		hidden_guy += 3
		if i = 1:
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			sloc = rand(0,6)
			if sloc = 1:
				spafinloc = 1
			elseif sloc = 2:
				spafinloc = 4
			elseif sloc = 3:
				spafinloc = 8
			elseif sloc = 4:
				spafinloc = 11
			elseif sloc = 5:
				spafinloc = 12
			elseif sloc = 6:
				spafinloc = 14
			end
			gs 'cum_manage'
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			sloc = rand(0,6)
			if sloc = 1:
				spafinloc = 1
			elseif sloc = 2:
				spafinloc = 4
			elseif sloc = 3:
				spafinloc = 8
			elseif sloc = 4:
				spafinloc = 11
			elseif sloc = 5:
				spafinloc = 12
			elseif sloc = 6:
				spafinloc = 14
			end
			gs 'cum_manage'
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			sloc = rand(0,6)
			if sloc = 1:
				spafinloc = 1
			elseif sloc = 2:
				spafinloc = 4
			elseif sloc = 3:
				spafinloc = 8
			elseif sloc = 4:
				spafinloc = 11
			elseif sloc = 5:
				spafinloc = 12
			elseif sloc = 6:
				spafinloc = 14
			end
			gs 'cum_manage'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_6_<<rand(1,9)>>.jpg"></center>'
			'After everything that happened tonight, you feel exhausted and fall asleep, your face and body still smeared and coated in sperm, but you don''t care.'
		elseif i = 2:
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			spafinloc = 11
			gs 'cum_manage'
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			spafinloc = 11
			gs 'cum_manage'
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			spafinloc = 11
			gs 'cum_manage'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_8_<<rand(1,5)>>.jpg"></center>'
			'After everything that happened tonight, you feel exhausted and fall asleep, you have a dream about warm wet drops landing on your face and lips, like a warm summers rain, you sleepily like at the drops.'
		elseif i = 3:
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			if rand(0,1) = 0:
				spafinloc = 3 & stat['hidden_anal'] += 1
			else
				stat['hidden_vaginal'] += 1
			end
			gs 'cum_manage'
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			if rand(0,1) = 0:
				spafinloc = 3 & stat['hidden_anal'] += 1
			else
				stat['hidden_vaginal'] += 1
			end
			gs 'cum_manage'
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			if rand(0,1) = 0:
				spafinloc = 3 & stat['hidden_anal'] += 1
			else
				stat['hidden_vaginal'] += 1
			end
			gs 'cum_manage'
			i = rand(1,2)
			if i = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_9_<<rand(1,2)>>.jpg"></center>'
			if i = 2:'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_9_3.mp4"></video></center>'
			'After everything that happened tonight, you feel exhausted and fall asleep, you have a dream about being impaled on a stake for all your sins, but surprisingly instead of hurting it feels wonderful.'               
		end
	end
	if (indorf = 0):
		''
		'After sleeping some time, you are suddenly awakened by someone yelling at you to wake up while they slap you.'
		act 'Wake up':
			*clr & cla
			minut += 90
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_7.jpg"></center>'
			'Anya shakes, yells and smacks you until you slowly wake up'
			'She smiles at you. "Well it looks like you had fun tonight, how are you feeling?"'
			'You groan, feeling sick, your head is pounding, you feel like your about to throw up and you are sore in more places than you can remember. "Go away and let me sleep you evil bitch."'
			'Anya shakes you again. "Get up stupid, or our parents will kill us both, if you don''t come home tonight."'
			if Rex_save = 1 and Rex_Love = 0: 'As you leave the apartment, you gently kiss Rex on the cheek, thanking for the evening.'
			if Rex_Love = 1: 'As you leave the apartment, you passionate kiss Rex on the lips, "Thank you for a lovely evening."'
			if party_boys_in >= 1: 'As you leave the apartment, some drunk guys tell you they will miss you and sleep well, while laughing to each other.'
			if hour < 22 and  hour > 18:
				minut += ((21 - hour) * 60) + (60 - minut)
				gs 'arousal', 'end'
				gs 'stat'
				act 'Go home': gt 'bedrPar'
			else 
				gs 'arousal', 'end'
				gs 'stat'
				act 'Go home':minut += 15 & gt 'bedrPar'
			end
		end
	else
		if hour < 9 and hour > 3 :
			pcs_sleep += (9 - hour) * 5
			minut += ((8 - hour) * 60) + (60 - minut)
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_7.jpg"></center>'
			'Anya shakes you until you slowly wake up'
			'She smiles at you. "Well it looks like you had fun tonight, how are you feeling?"'
			'You groan, feeling sick, your head is pounding and you are sore in more places than you can remember. "Let me sleep sis, I''m sick."'
			'Anya shakes you again. "Get up stupid, or our parents will kill us both, if they find out that we were not at home tonight."'
			if Rex_save = 1 and Rex_Love = 0: 'As you leave the apartment, you gently kiss Rex on the cheek, thanking for the evening.'
			if Rex_Love = 1: 'As you leave the apartment, you passionate kiss Rex on the lips, "Thank you for a lovely evening."'
			gs 'arousal', 'end'
			gs 'stat'
			act 'Go home': minut += 15 & gt 'bedrPar'
		else
			*clr & cla
			minut += 90
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_4_1.jpg"></center>'
			*nl 'You woke up an hour later, the party was still in full swing.'
			act 'Return to party': gt $loc, $metka
		end
	end
end

--- dinParty ---------------------------------