glife/locations/rex_party_smallEvents.qsrc

# rex_party_smallEvents

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. Attention that you love.'
	if pcs_danc < 50: 'Your ridiculous movements during the dance doesn''t bother anyone. You dance badly, but you don''t care.'
	act 'Have a rest': gt $loc, $loc_arg
	act 'Dance more': gt 'rex_party_smallEvents', 'dance' 
end

!Drink
if $ARGS[0] = 'party_drink':
	cls
	minut += 5
	alkoParty += 1
	gs 'drugs', 'alcohol', 'vodka'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_2_' + rand(1,4) + '.jpg"></center>'
	'Someone hands you a half full bottle of booze. Putting your lips to the mouth of the bottle, you turn it up and gulp down several swigs of strong drink, noticing the effects almost at once.'
	'The party has just begun, you can still walk through the apartment and find something to do.'
	act 'Move away': gt $loc, $loc_arg
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 your back as he hugs you tightly.'
		'You feel his hard erection against your ass. It excites you, but you are too 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.'
	elseif iralenasleep >= 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_iralena_6_<<rand(6,7)>>.jpg"></center>'
		'You Lena and Ira lie 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 for you, friends are close and you are placed in a 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 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
			sloc = rand(0,6)
			if sloc = 1:
				gs 'cum_call', 'labia', 'unconcious rapist', 2
			elseif sloc = 2:
				gs 'cum_call', 'butt', 'unconcious rapist', 2
			elseif sloc = 3:
				gs 'cum_call', 'back', 'unconcious rapist', 2
			elseif sloc = 4:
				gs 'cum_call', 'face', 'unconcious rapist', 2
			elseif sloc = 5:
				gs 'cum_call', 'mouth', 'unconcious rapist', 2
			elseif sloc = 6:
				gs 'cum_call', 'stomach', 'unconcious rapist', 2
			end
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sloc = rand(0,6)
			if sloc = 1:
				gs 'cum_call', 'labia', 'unconcious rapist', 2
			elseif sloc = 2:
				gs 'cum_call', 'butt', 'unconcious rapist', 2
			elseif sloc = 3:
				gs 'cum_call', 'back', 'unconcious rapist', 2
			elseif sloc = 4:
				gs 'cum_call', 'face', 'unconcious rapist', 2
			elseif sloc = 5:
				gs 'cum_call', 'mouth', 'unconcious rapist', 2
			elseif sloc = 6:
				gs 'cum_call', 'stomach', 'unconcious rapist', 2
			end
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			sloc = rand(0,6)
			if sloc = 1:
				gs 'cum_call', 'labia', 'unconcious rapist', 2
			elseif sloc = 2:
				gs 'cum_call', 'butt', 'unconcious rapist', 2
			elseif sloc = 3:
				gs 'cum_call', 'back', 'unconcious rapist', 2
			elseif sloc = 4:
				gs 'cum_call', 'face', 'unconcious rapist', 2
			elseif sloc = 5:
				gs 'cum_call', 'mouth', 'unconcious rapist', 2
			elseif sloc = 6:
				gs 'cum_call', 'stomach', 'unconcious rapist', 2
			end
			'<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 are 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
			gs 'cum_call', 'face', 'unconcious rapist', 2
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			gs 'cum_call', 'face', 'unconcious rapist', 2
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			gs 'cum_call', 'face', 'unconcious rapist', 2
			'<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
			if rand(0,1) = 0:
				gs 'cum_call', 'anus', 'unconcious rapist', 2
			else
				gs 'cum_call', '', 'unconcious rapist', 2
			end
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			sexunaware = 1
			if rand(0,1) = 0:
				gs 'cum_call', 'anus', 'unconcious rapist', 2
			else
				gs 'cum_call', '', 'unconcious rapist', 2
			end
			gs 'npcgeneratec', 0, 'unconcious rapist', rand(17,22)
			gs 'boyStat', $npclastgenerated
			if rand(0,1) = 0:
				gs 'cum_call', 'anus', 'unconcious rapist', 2
			else
				gs 'cum_call', '', 'unconcious rapist', 2
			end
			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 actually feels wonderful.'               
		end
	end
	if locat['Fam_inGad'] = 0:
		''
		'After sleeping for 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 at and slaps you until you slowly wake up.'
			'She smiles at you. "It looks like you had fun tonight. How are you feeling?"'
			'You groan, feeling sick. Your head is pounding, you feel like you are about to throw up and you are sore in more places than you can remember. "Go away and let me sleep, sis"'
			'Anya shakes you again. "Get up you drunk idiot! Mom 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 passionatly 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 to 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 :
			*clr & cla

			gs 'sleep_simple', 'sleep_until', 9, 0

			'<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 feel so sick."'
			'Anya shakes you again. "Get up you drunk idiot! Mom is going to kill us both since we haven''t come home yet!"'
			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 passionatly 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 wake up an hour later and find the party still in full swing.'
			act 'Return to party': gt $loc, $loc_arg
		end
	end
end

if $ARGS[0] = 'lena':
	cls
	minut += 5
	menu_off = 0
	gs 'stat'
	'<center><b><font color = maroon>Lena</font></b></center>'
    '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/lena/lena.jpg"></center>'
    'Walking up to Lena you talk and share a drink.'
	'Small and mobile Lena'
	act 'Move away': gt $loc, $loc_arg
	if alko < 6 and $loc_arg = 'RexRoom': act 'Have a drink': gt 'rex_party_smallEvents', 'party_drink'
end


if $ARGS[0] = 'ira':
	cla & *clr
	minut += 5
	menu_off = 0
	gs 'stat'
	'<center><b><font color = maroon>Ira</font></b></center>'
    '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/ira/ira.jpg"></center>'
    'Walking up to Ira you talk and share a drink.'
	'Constantly embarrassing Ira'
	act 'Move away': gt $loc, $loc_arg
	if alko < 6 and $loc_arg = 'RexRoom': act 'Have a drink': gt 'rex_party_smallEvents', 'party_drink'
end

if $ARGS[0] = 'ira_lena_livingRoom':
    cls
	minut += 5
	menu_off = 0
	gs 'stat'
	'<center><b><font color = maroon>Ira and Lena</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_iralena_1_<<rand(1,5)>>.jpg"></center>'
    
    'Ira and Lena are really getting into the spirit of the party.'
    'Lena and Ira together clink cups. "<<$pcs_nickname>>, Lets party!" As they offer you a drink.'

    act 'Move away': gt $loc, $loc_arg
    act 'Drink': 
        cls
        menu_off = 1
        minut += 5
        drunk_sveta += 1
        gs 'drugs', 'alcohol', 'beer', 1
        gs 'stat'
        '<center><b><font color = maroon>Ira and Lena</font></b></center>'
        '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_iralena_2.jpg"></center>'
        'Ira and Lena ply you with drinks, the more you drink the more your mood is markedly improved.'
        'After several drinks Lena and Ira pull you roughly along to come have fun with them.'

        if alko >= 7:
            'Sudden your head starts spinning and you feel unsteady.'
            act 'Pass out': gt 'rex_party_smallEvents', 'sleep'
        else
            act 'Have fun': gt 'rex_party_sexEvents', 'ira_lena_fun', 'boys'
            act 'Move away': gt $loc, $loc_arg
        end
    end
	act 'Dance':
        cls
        minut += 5
        menu_off = 1
        gs 'stat'
        '<center><b><font color = maroon>Ira and Lena</font></b></center>'
        '<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 with Lena and Ira.'
        '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, getting you a lot of attention from others and you love they 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, $loc_arg
        act 'Kiss': gt 'rex_party_sexEvents', 'ira_lena_fun', 'girls'
    end

end

if $ARGS[0] = 'rex':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><b><font color = maroon>Rex</font></b></center>'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/reks.jpg"></center>'
	'Tall, athletic guy, whom everyone calls Rex.'
	if Rex_Love = 0: 'You walk up to Rex but then you realize he looks way too drunk and distracted by the other girls to pay much attention to you.'
	if Rex_Love = 1: 'Rex comes up to you and hugs you sweetly.'
	act 'Move away': gt $loc,$loc_arg
	if $loc_arg = 'RexRoom' and alko < 6: act 'propose a toast': gt 'rex_party_smallEvents', 'party_drink'
	if $loc_arg = 'LivingRoom': act 'Chat': gt 'rex_party_smallEvents', 'rex_talk'
	if $loc_arg = 'LivingRoom': act 'Dance together': gt 'rex_party_smallEvents', 'rex_dance'
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 Rex. He''s quite interesting and very handsome, so you spend most of the time just nodding and flirting.'
	act 'Move away': gt $loc, $loc_arg
	if rex_talk >= 2: act 'Hug': gt 'rex_party_smallEvents', 'rex_hug'
	act 'Ask Rex to dance': gt 'rex_party_smallEvents', '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 grabs you with his strong hands and begins to knead your ass with one hand and caress your pussy with the other in front of everybody.'
		'You grab his neck and audibly groan, completely giving into his affections.'
		'You are overwhelmed 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 adoringly into each other''s eyes, you begin to passionately kiss.'
			'You lips touch in your long kiss. It almost feels like a shock of electricity is running through your body.'
			'For a long time, you continue to enjoy the warm kiss, but Rex eventually breaks the kiss and says "Come with me <<$pcs_nickname>>. I think we''ve had enough fun here." Smiling, he takes you by the hand and leads you away.'
			
			gs 'arousal', 'kiss', 5, 'exhibitionism'
			gs 'stat'
	
			act 'Move away': gt $loc, $loc_arg
			act 'Follow Rex': gt 'rex_party_sexEvents', '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 grabs you with his strong hands and begins to knead your ass with one hand and caress your pussy with the other in front of everybody.'
		'You grab his neck and audibly groan, completely giving into his affections.'
		'After playing with your pussy for a bit, he stops, 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 'rex_party_sexEvents', '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 takes you by the hand and drags you out to dance. You are happy to 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, $loc_arg 
	if rex_talk >= 2: act 'Hug': gt 'rex_party_smallEvents', 'rex_hug'
end

if $ARGS[0] = 'roma':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color = maroon>Roma</font></b></center>'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/roma/roma.jpg"></center>'
	'Red-haired skinny guy named Roma.'
	act 'Move away': gt $loc, $loc_arg
end

if $ARGS[0] = 'anya':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><b><font color = maroon>Anya</font></b></center>'
	if $loc_arg = 'LivingRoom':
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_sister_1.jpg"></center>'
		''
	else
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
		''
	end
	'Your sister' + iif($loc_arg = 'LivingRoom', ' is drunk and in good spirits.', '.')
	'"Oh <<$pcs_nickname>>, how do you like our humble party? It looks like you''re having a good time."'
	act 'Move away': gt $loc, $loc_arg
	if alko < 6 and $loc_arg = 'RexRoom': act 'Have a drink': gt 'rex_party_smallEvents', 'party_drink'
	if $loc_arg = 'LivingRoom': act 'Drink': gt 'rex_party_smallEvents', 'sister_drink'
	if $loc_arg = 'LivingRoom': act 'Chat about guys': gt 'rex_party_smallEvents', 'sister_talk'
end

if $ARGS[0] = 'sister_talk':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><b><font color = maroon>Anya</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_sister_1.jpg"></center>'
	! These chat options will happen when Anya and Roma had their fight.
	if sisterQW['AnyaRomaQW'] = 1:
		sisterQW['partytalk'] += 1
		if sisterQW['partytalk'] = 1:
			'"It is strange seeing you back together with Roma."'
			'"We talked things out and decided to give it another chance.'
		elseif sisterQW['partytalk'] = 2:
			'"You''re over it after all the cursing, crying and yelling?"'
			'"I know, I know. I got excited a little bit, but now everything is worked out."'
		elseif sisterQW['partytalk'] = 3:
			'"So you are just going to continue dating him after everything that happened?"'
			'"Well little sis, he made mistakes. Now he and I have worked things out, and I thank God everything is behind us."'
		elseif sisterQW['partytalk'] = 4:
			'"I cannot believe it! You let him crawl back and took him back? It''s not like you."'
			'"Well <<$pcs_nickname>>, it''s best to have a bird in the hand, especially now that we don''t have such a simple relationship anymore.'
		elseif sisterQW['partytalk'] = 5:
			'"What do you mean you ''don''t have a simple relationship''? I need more details."'
			'"Yes I know, so pay attention, I''m not going to repeat this. In a sense, we now have an open relationship."'
		elseif sisterQW['partytalk'] = 6:
			'"Open relationship? You mean where you can both fuck anyone you want and you keep dating him?"'
			'"Eh, something like that <<$pcs_nickname>>."'
		elseif sisterQW['partytalk'] = 7:
			'"I can see that you are a fool! I could not agree to that."'
			'"Why? I know he loves me, and he knows that I love him, but while we are young, we have fun."'
		elseif sisterQW['partytalk'] = 8:
			'"I still say it''s crazy how you can be in a loving relationship and still fuck anyone."'
			'"<<$pcs_nickname>>, I am not a complete fool. Why ''anyone''? Look around, there are other nice guys here too, such as Rex.'
		elseif sisterQW['partytalk'] = 9 and Rex_Love = 1:
			'"Do you want me to kill you? You know that I''m dating Rex!"'
			'"Calm down <<$pcs_nickname>>, I was joking! I know that you two are dating. Although... I did let you fuck my boyfriend, so why can''t I fuck yours?"'
		elseif sisterQW['partytalk'] = 9 and Rex_Love = 0:
			'"You''re right. I wouldn''t mind having him myself, but I don''t know if Rex would agree."'
			'"Oh, what a naughty girl! Well then, how about we lure him together?"'
		elseif sisterQW['partytalk'] = 10 and Rex_Love = 1:
			sisterQW['AnyaRomaQW'] = 2
			'You huff and pout, but realize she has a point. "OK fine, but I''m not sure Rex would agree. You and Roma both agreed ahead of time."'
			'"The main thing is that you are not opposed to it <<$pcs_nickname>>. Besides, all men are the same. You really think Rex could withstand both our charms?"'
		elseif sisterQW['partytalk'] = 10 and Rex_Love = 0:
			sisterQW['AnyaRomaQW'] = 2
			'"You want to seduce Rex? Haha, I''ve already fucked him! You have no idea what he is like in bed.'
			'"Wow! What a saucy little minx you are! So that''s why you are always running around in his room? Well then, that will make this easier."'     
		end
		
	else
		i = rand(1,9)
		if i = 1:'"<<$pcs_nickname>>, you still don''t have a man?"'
		if i = 2:'"Sometimes I can''t decide what is more important: the size of their wallet or the size of their dick. What do you think <<$pcs_nickname>>?"'
		if i = 3:'"If you have a reputation as the town whore, the guys won''t let you come to the parties anymore."'
		if i = 4:'"It''s not good to come here when you''re in a bad mood. Rex hates having miserable bastards in his house."'
		if i = 5:'"Still going to that crap school? Idiot, find yourself a rich man, and all your problems are solved!"'
		if i = 6:'"When I drink, I become like a man and constantly think about sex."'
		if i = 7:'"Roma sends his greetings. He said he missed our threesomes, so I slapped him across the face."'
		if i = 8:'"What do you think of our host?"'
		if i = 9:'"Get wild <<$pcs_nickname>>! Everything that happens at Rex''s parties, stays at Rex''s parties."'

	end
	act 'Move away': gt $loc, $loc_arg
end

if $ARGS[0] = 'sister_drink':
	minut += 5
	*clr & cla
	gs 'drugs', 'alcohol', 'beer'
	drunk_sveta += 1
	gs 'stat'
	'<center><b><font color = maroon>Anya</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_sister_2.jpg"></center>'
	'Anya hands you a bottle. You take a swig and hand it back. "Keep the bottle, little sis. I won''t tell <<$npc_nickname[''A29'']>>," she says with a wink.'
	if alko >= 7:
		'With her encouragement, you end up drinking more than you should.'
		'Suddenly your head is severely spinning...'
		act 'Pass out': gt 'rex_party_smallEvents', 'sleep'
	else
		'You gladly drink more, sharing it with your sister.'
		'Feeling buzzed, you are ready to plunge into the wild debauchery of the party.'
		act 'Dance topless': gt 'rex_party_sexEvents', 'sister_fun'
		act 'Move away': gt $loc, $loc_arg
	end
end

if $ARGS[0] = 'dj':
	*clr & cla
	minut += 5
	menu_off = 1
	party_dj = 1
	gs'stat'
	if party_dj = 1 and dj_beer < 1:
		'<center><b><font color = maroon>DJ</font></b></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy.jpg"></center>'
		'The guy messes with the soundboard and makes the sound even louder. "Hello, <<$pcs_nickname>>, get my friend and me a beer. You can find all the booze in the kitchen."'
	elseif dj_beer = 1 and dj_thank < 1:
		'<center><b><font color = maroon>DJ</font></b></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy.jpg"></center>'
		'The guy messes with the soundboard and makes the sound even louder. "Well, <<$pcs_nickname>>, where are our beers?" You go into the kitchen, get two bottles of beer and <a href="exec:gt ''rex_party_smallEvents'', ''dj_give_beer''">bring</a> them to the guys.'
	elseif dj_thank = 1 and dj_bad < 1:
		'<center><b><font color = maroon>DJ</font></b></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy.jpg"></center>'
		'The guy messes with the soundboard and makes the sound even louder. You are allowed to <a href="exec:gt ''rex_party_smallEvents'', ''dj_thank''">twist</a> some knobs on the turntable.'
	elseif dj_bad = 1 and dj_boobs < 1:
		'<center><b><font color = maroon>DJ</font></b></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy.jpg"></center>'
		'"<<$pcs_nickname>>, you won''t get a turn. Don''t even try this time.'
	elseif dj_boobs = 1:
		'<center><b><font color = maroon>DJ</font></b></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boy.jpg"></center>'
		'The guy messes with the soundboard and makes the sound even louder. You are again allowed to <a href="exec:gt ''rex_party_sexEvents'', ''dj_cock''">twist</a> some knobs on the turntable.'
	end
	act 'Move away': gt $loc, $loc_arg
	gs 'willpower', 'exhib', 'self', 'medium'
	if will_cost <= pcs_willpwr:
		act 'Flash boobs (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'rex_party_sexEvents', 'dj_boobs'
	else
		act 'Flash boobs (<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] = 'dj_take_beer':
	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, $loc_arg
end

if $ARGS[0] = 'dj_give_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 appreciate your offer.'
	'"<<$pcs_nickname>>, you ever use one of these before?" the DJ asks you, indicating the turntable.'
	'You shake your head. "No, I can''t say I have."'
	'He smiles at you. "While everyone is still sitting and drinking, you can give it a little <a href="exec: gt ''rex_party_smallEvents'', ''dj_thank''">twist</a>. Let''s see what you can do girl!"'
	act 'Move away': gt $loc, $loc_arg
end

if $ARGS[0] = 'dj_thank':
	cla
	*clr
	menu_off = 1
	minut += 5
	dj_bad = 1
	gs 'exp_gain', 'instrmusic', 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 some god awful noises. The guys stop you before too long. "OK, I think that''s enough. I think you made my ears bleed." he says with a laugh.'
	act 'Move away': gt $loc, $loc_arg
!why not add in an option here to start the series below?
end

if $ARGS[0] = 'party_girls':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color = maroon>Girls</font></b></center>'
	if $loc_arg = 'RexRoom':
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls.jpg"></center>'
		*nl
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_1_<<rand(1,4)>>.jpg"></center>'
		*nl
	end
	'Some former classmates of your sister. You are not familiar with them.'
	act 'Move away': gt $loc, $loc_arg
	if $loc_arg = 'LivingRoom': act 'Drink': gt 'rex_party_smallEvents', 'party_girls_drink'
	if $loc_arg = 'LivingRoom': act 'Dance together': gt 'rex_party_smallEvents', 'party_girls_dance'
	if $loc_arg = 'RexRoom' and alko < 6: act 'Propose a toast': gt 'rex_party_smallEvents', 'party_drink'
end

if $ARGS[0] = 'party_girls_drink':
	cls
	minut += 5
	gs 'drugs', 'alcohol', 'beer'
	drunk_sveta +=1
	gs 'stat'
	i = rand(1,2)
	if i = 1: '<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_2_1.mp4"></video></center>'
	if i = 2: '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_2_<<rand(2,4)>>.jpg"></center>'
	'The girls have some booze with them and you are happy to share a drink with them. You and the girls keep drinking during dancing. Your drunk yelling drowned out by the music, as the girls tell you they want to have even more fun...'
	if alko >= 7: 'You are dizzy, and feel very ill.'
	if alko >= 7: act 'Sleep': gt 'rex_party_smallEvents', 'sleep'
	gs 'willpower', 'exhib', 'resist', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Move away (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $loc_arg
	else
		act 'Move 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 'Drink more':
        cls
        minut += 5
        drunk_sveta += 1
        gs 'stat'
        i = rand(1,2)
        if i = 1: '<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_3_1.mp4"></video></center>'
        if i = 2: '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_3_<<rand(2,3)>>.jpg"></center>'
        'You have another drink, and start to lose touch with reality. You feel dizzy and very sick...'
        act 'Pass out': gt 'rex_party_smallEvents', 'sleep'
    end
	!act 'Take off your top': gt 'rex_party_smallEvents', 'bra'
end

if $ARGS[0] = 'bra':
	cls
	minut += 5
	inhib_exp += rand(0,1)
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_5_<<rand(1,3)>>.jpg"></center>'
	'Yielding to the general madness, you pull your top off exposing your bra to the frantic shouts of the boys. In this state your dancing clearly will look much more spectacular.'
	if Rex_Love = 1: 'Rex watches you closely, but says nothing.'
	gs 'willpower', 'exhib', 'resist', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Move away (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $loc_arg
	else
		act 'Move 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 'Dance topless':
		cls
		inhib_exp += rand(0,2)
		gs 'arousal', 'flash', 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_6_<<rand(1,3)>>.jpg"></center>'
		'Under the merry shouts of the boys and girls you take off your bra and dance half-naked. A lot of the guys come closer trying to enjoy the view.'
		if Rex_Love = 1: 'You enjoy yourself when Rex shouts "Maybe thats enough? This isn''t very nice to look at."'

		act 'Move away': gt $loc, $loc_arg

		if Rex_Love = 1: act 'Drag him to the restroom': gt 'rex_party_sexEvents', 'rex_toilet_bj'

		act 'Undress':
			gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
			gs 'boyStat', $npclastgenerated
			$boydesc = $npc_usedname[$npclastgenerated]
			inhib_exp += rand(0,2)
			cls
			gs 'arousal', 'flash', 5
			gs 'stat'
			if rand(1,2) = 1:
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_9_1.jpg"></center>'
			else
				'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_9_2.mp4"></video></center>'
			end
			if Rex_Love = 1: 'You completely ignore Rex. He glares at you and turns away.'
			'You undress completely, only a few girls follow your example and get naked as well. You all get into the middle of the room and dance together. Ignoring the surrounding people, you dance together, naked. Several drunks guys approach you, and tell you it would be a sin to not use such a fine bitch like you.'
			act 'Go with the guys': gt 'rex_party_sexEvents', 'toilet_boys_bj'
		end
	end
end

if $ARGS[0] = 'party_girls_dance':
	cls
	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>'
	'You are grabbed by the rhythmic sounds and indulge in unrestrained dancing with the crowd.	You jump and twist your body, completely merging and absorbing yourself in the fun atmosphere.'
	if pcs_danc >= 50: 'Your curves and movements to the music make you a pleasure to watch. The others stare at you excitedly.'
	if pcs_danc < 50: 'Your ridiculous movements during the dance don''t bother anyone. You dance badly, but you do not care.'
	act 'Take a breather': gt $loc, $loc_arg
	act 'Dance more': 
        cls
        minut += 5
        inhib_exp += rand(1,2)
        gs 'stat'
        '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_14_<<rand(1,4)>>.jpg"></center>'
		'You have a lot of fun as you dance with the girls under the deafening music. During the dance you are pressed against each other and the other girls touch you in all sorts of places. Suddenly a pair of hands pull up your skirt and bare your ass. One of the girls '+ iif($pantyworntype ! 'none', 'pulls down your panties and ', '')+'starts to kiss and lick you.'
        if Rex_Love = 1: 'Rex watches you with interest as you have fun with the girls.'
        'The girls are only getting warmed up and offer you more.'
        gs 'willpower', 'cuni', 'resist', 'medium'
        if will_cost <= pcs_willpwr:
            act 'Move away (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $loc_arg
        else
            act 'Move 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 'Give in':
            cla
            *clr
            minut += 5
            gs 'stat'
            '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_15_<<rand(1,8)>>.jpg"></center>'
            '"Come on <<$pcs_nickname>>, lets get wild." You give in to the general madness, taking off all your clothes, and diving headlong into the abyss of insane lesbian fervor.'
            act 'Have fun with the guys': gt 'rex_party_sexEvents', 'orgy'
            act 'Go into another room with the girls': gt 'rex_party_sexEvents', 'girl_orgy'
        end
    end
end

if $ARGS[0] = 'party_boys':
	cls
	menu_off = 1
	minut += 5
	gs 'stat'
	'<center><b><font color = maroon>Guys</font></b></center>'
	if $loc_arg = 'party_kuh' or $loc_arg = 'LivingRoom':
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_2.jpg"></center>'
		''
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys.jpg"></center>'
		''
	end
	'You see a couple of former classmates of your sister. You are not familiar with them.'
	if $loc_arg = 'LivingRoom': 'A couple of fun energetic guys come over to you. "Hey <<$pcs_nickname>>, long time no see. Do you want to come with us?"'
	if alko >= 5: '"Hey <<$pcs_nickname>>, how about you show us your great tits. Just for fun?"'
	act 'Move away': gt $loc,$loc_arg
	if alko < 6 and $loc_arg = 'RexRoom': act 'Drink': gt 'rex_party_smallEvents', 'party_drink'
	if $loc_arg = 'Kitchen': act 'Drink': gt 'rex_party_smallEvents', 'kitchen_boy_drink'
	if $loc_arg = 'LivingRoom': act 'Drink': gt 'rex_party_smallEvents', 'gost_drink'
	if alko >= 5 and $loc_arg = 'LivingRoom': act 'Show your tits': gt 'rex_party_smallEvents', 'show_boobs'
	if $loc_arg = 'LivingRoom': act 'Dance': gt 'rex_party_smallEvents', 'dance'
end

if $ARGS[0] = 'gost_drink':
	cls
	minut += 5
	gs 'drugs', 'alcohol', 'beer'
	party_boys_in += 1
	menu_off = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_1.jpg"></center>'
	'You happily make a couple of sips. Some guys urge you to show off more of your body.'
	'"Hey, how about you show us your great tits. Just for fun?"'
	gs 'willpower', 'exhib', 'resist', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Move away (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			gt $loc,$loc_arg
		end
	else
		act 'Move 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 'Show your tits': gt 'rex_party_smallEvents', 'show_boobs'
	if alko >= 7: act 'Fall asleep drunk': gt 'rex_party_smallEvents', 'sleep'
end

if $ARGS[0] = 'show_boobs':
	cls
	menu_off = 1
	gs 'stat'
	if rand(1,2) = 1:
		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_2_1.mp4"></video></center>'
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_boys_party_gost_2_<<rand(2,5)>>.jpg"></center>'
	end
	'With a twinkle in your eyes you lower your bra, baring your breasts, as the guys watch you with pleasure.'
	'"So what do you think, boys?" you ask with a smile on your face.'
	'"You are a straight up sex grenade, and I would like to pull your pin." one of the guys answers. With these words, they come over to you.'
	if Rex_Love = 1: 'Rex looks unhappily in your direction, his eyes flashing with anger and jealousy.'
	if Rex_Love = 1: act 'Drag Rex to the restroom': gt 'rex_party_sexEvents', 'rex_toilet_bj'
	gs 'arousal', 'flash', 5, 'exhibitionism'
	gs 'stat'
	act 'Move closer': gt 'rex_party_sexEvents', 'boobs_yes'
	gs 'willpower', 'exhib', 'resist', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Move away (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			gt $loc,$loc_arg
		end
	else
		act 'Move away (<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] = 'kitchen_boy_drink':
	cls
	minut += 5
	gs 'drugs', 'alcohol', 'beer'
	party_boys_drink += 1
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_2_<<rand(1,4)>>.jpg"></center>'
	i = rand(1,6)
	if i = 1:
		'You drink along with a crowd of boys. The men constantly guffaw as they tell stories: '
		'"Girl, sorry, and you will not have to have sex?"'
		'"Oh, sorry, I threw ..."'
		'"Congratulations."'
	elseif i = 2:
		'You drink along with a crowd of boys. The men constantly guffaw as they tell stories: "When I was a child my parents forbade me all the fun things. Now I''m grown up and my girl doesn''t allow me to do them."'
	elseif i = 3:
		'You drink along with a crowd of boys. The men constantly guffaw as they tell stories: "Previously, it was clear. Did the lessons - good, grandmother moved across the street - clever, the ball broke the glass - bad. And now - one girl did well, and the other from this - bad. And you all did everything for the third. And she - still!'
	elseif i = 4:
		'You drink along with a crowd of boys. The men constantly guffaw as they tell stories: "Girls always say: Well all, until the evening, Smack! - Well, what, on dick, Smack? Do you want to kiss - a kiss!'
	elseif i = 5:
		'You drink along with a crowd of boys. The men constantly guffaw as they tell stories: '
		'"Just listen, <<$pcs_nickname>>. When I tell a girl "Come to me", and she asks me "To do what?" do I really have to explain it to her? After all, my house is not a bowling alley or a cinema."'
		'"If I say: "I want to have sex. I definitely will have a sex. You can join in, or not. Afterwards you can stay, but it would be better if you leave", she won''t come over."'
		'"But if I tell her something ridiculous like "Come back home with me, I have a fine collection of lute music of the 16th century" she will go for it. Girls are well aware what will happen when they come over but they want to have an excuse for it."'
	elseif i = 6:
		'You drink along with a crowd of boys. The men constantly guffaw as they tell stories: '
		'So I''m starting to have sex with this girl and she keeps complaining. It goes like this: '
		'"The windows are open!"'
		'"Who cares?"'
		'"There will be mosquitoes everywhere!"'
		'"We''ll turn off the lights."'
		'"But then the cockroaches come out!"'
	end
	act 'Move away': gt $loc, $loc_arg

	if party_boys_drink > 2:
		cls
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_2_<<rand(1,3)>>.jpg"></center>'
		'"Guys, you poured too much into the glass. I''m drunk already.", you say."'
		'"Come on <<$pcs_nickname>>, lets have another." with that, one of the guys puts his arm around you and bares your breasts. The touchy guy is surprisingly nice and you are a little amused by this situation.'
        
        if npc_rel['A57'] >= 50:
            'You notice Rex in the room...'
            act 'Get Rex''s attention': 
                	cls
                    Rex_save += 1
                    menu_off = 0
                    minut += 5
                    gs 'stat'
                    '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_10.jpg"></center>'
                    'You glance over to Rex. He seems ready to help you out of this awkward situation.'
                    'He quickly exclaims, "Hey boys, are you insane? Take your hands off my fucking girl. One more time and I will kick your ass!"'
                    'The guy takes his hands off of you, "Rex, bro, we were just having a bit of drunken fun. I''m sorry, if I hurt your girl."'
                    'Rex comes up to you and picks you up, "Come on, sweety. I''ll make sure the other guys leave you alone. Lets go to another room."'
                    act 'Go to the Rex''s room': gt 'rex_party_smallEvents', 'V_komnatu'
            end
        end
		act 'Have fun with them': gt 'rex_party_smallEvents', 'smile'
		gs 'willpower', 'action', 'type', 'medium'
		if will_cost <= pcs_willpwr:
			act 'Break free of them (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'type'
				gs 'stat'
                cls
                menu_off = 0
                minut += 5
                gs 'stat'
                '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_3.jpg"></center>'
                'You find the strength to break free of the grasping hands, shouting "Let me go, I don''t want that. Get your filthy hands off me."'
                '"Come on, <<$pcs_nickname>>, we''re just having fun. Just admit that you liked where this was going." the touchy guy responds.'
                act 'Move away': gt $loc,$loc_arg
                act 'Have fun with them': gt 'rex_party_smallEvents', 'smile'
			end
		else
			act 'Break free of them (<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] = 'smile':
	cls
	party_boys_in += 1
	gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
	gs 'boyStat', $npclastgenerated
	$boydesc = $npc_usedname[$npclastgenerated]
	gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
	$boy1 = $npclastgenerated
	$boydesc1 = $npc_usedname[$npclastgenerated]
	gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
	$boy2 = $npclastgenerated
	$boydesc2 = $npc_usedname[$npclastgenerated]
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_<<rand(1,3)>>.jpg"></center>'
	'You give the guys a faint smile, showing your availability. They quickly realize the situation and come over to you and start to stroke your hair and massage your neck. It is very relaxing and you give a soft sigh which turns into a moan. You have the full attention of the boys and they decide to drag you.'
	act 'Go outside Rex''s house': gt 'rex_party_sexEvents', 'gangbang_outdoor'
	act 'Go to another room':minut += 5 & gt 'rex_party_smallEvents', 'V_komnatu'
end

if $ARGS[0] = 'V_komnatu':
	cls
	gs 'stat'
	i = rand(1,5)
	if i = 1:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_5_1.jpg"></center>'
		'One of the girls is sitting in the room trying to recover from the exhausting party.'
		if Rex_save = 1: 'Rex bursts into the room with you in tow, throws everyone out and shuts the door. He gently puts you on a soft bed and lies down on the floor near you.'
		if party_boys_in >= 1: 'Several guys switch their attention to her, but are quickly rebuffed. The girl looks at you curiously as the guys unceremoniously put you on your knees and unzip their pants. Even in your drunken delirium you know what they want.'
	elseif i = 2:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_5_2.jpg"></center>'
		'One of the girls is sitting in the room trying to recover from the exhausting party.'
		if Rex_save = 1: 'Rex bursts into the room with you in tow, throws everyone out and shuts the door. He gently puts you on a soft bed and lies down on the floor near you.'
		if party_boys_in >= 1: 'Anticipating what will happen next, she quickly dodges out of the room. The guys unceremoniously put you on your knees and unzip their pants. Even in your drunken delirium you know what they want.'
	elseif i = 3:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_5_<<rand(3,4)>>.jpg"></center>'
		'In the room your sister and Roma are engaged in sweaty sex.'
		if Rex_save = 1: 'Rex just glances at them and says, "Guys, I don''t want you to stop, but you will have to continue in another place."'
		'"Hey thats my sister Anya" you exclaim. "Let''s just close the door and let them continue. They won''t mind, right Anya?"'
		'Anya looks at you with a blissful smile, "No, I''m all for it. We''ll just keep fucking over here."'
		'"No you won''t. You get your ass out of here already!" says Rex with a menacing expression on his face and the couple quickly leaves the room. He then gently puts you on a soft bed and lies down on the floor near you.'
		if party_boys_in >= 1: '"Hey grandpa, do you need help?", one of the boys shouts.'
		'Roma looks at them and says, "Shut up, you dumb fucks, you have your own bitch." The guys laugh a little and decide to leave the couple alone. Then they unceremoniously put you on your knees and unzip their pants. Even in your drunken delirium you know what they want.'
	elseif i = 4:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_5_5.jpg"></center>'
		'The room is occupied by Lena, who is lying on a bed flashing her pussy. You can see cum dripping out of it.'
		if Rex_save = 1: 'Rex bursts into the room with you in tow, throws everyone out and shuts the door. He gently puts you on a soft bed and lies down on the floor near you.'
		if party_boys_in >= 1: '"Hey look, there is another pretty girl. This seems to be our lucky night." one of the guys says.'
		'Another one chimes in with a grin on his face, "Yeah, but she is already used and has cum on her. Our lovely little <<$pcs_nickname>> here is fresh and clean." With that the guys unceremoniously put you on your knees and unzip their pants. Even in your drunken delirium you know what they want.'
	elseif i = 5:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_5_6.jpg"></center>'
		'However, the room you are dragged into is currently occupied by two guys fucking Lena.'
		if Rex_save = 1: 'Rex bursts into the room with you in tow, throws everyone out and shuts the door. He gently puts you on a soft bed and lies down on the floor near you.'
		if party_boys_in >= 1: '"Do you mind, guys?" one of the boy asks with a grin.'
		'"No, sit. There is room enough for everyone!" one of the guys who is fucking Lena answers.	The boys then unceremoniously put you on your knees and unzip their pants. Even in your drunken delirium you know what they want.'
	end
	if Rex_save = 1: act 'Fall asleep': gt 'rex_party_smallEvents', 'sleep'
	if party_boys_in >= 1: act 'Start to suck': gt 'rex_party_sexEvents', 'gangbang_indoor'
end

!Rex Room event 2
if $ARGS[0] = 'talk':
	cls
	minut += 5
	party_girls_talk += 1
	gs 'stat'

    $talkEvent[1] = 'You sit and chat with a couple of cute girls. One of them tells you, "I am dating a divorced man. He is very kinky and I''m afraid I can not keep up with it.'
    $talkEvent[2] = 'You sit and chat with a couple of cute girls. One of them tells you, "I have a very childish voice. I sound like a Japanese schoolgirl. The guy I''m dating says he likes it, but I''m still insecure about it."'
    $talkEvent[3] = 'You sit and chat with a couple of cute girls. One of them tells you, "I am dating the perfect man. Everything is great. The communication between us, the sex, I can discuss everything with him. But now he sent me a video, where he cums on a photo of me. The whole photo was covered in his cum eeww. Now I don''t want to see him anymore."'
    $talkEvent[4] = 'You sit and chat with a couple of cute girls. One of them tells you, "I came home after going out with a guy, my knees were all red. When my mother saw it she seriously asked, if it was mosquito bites or allergies. I just nodded ashamed."'
    $talkEvent[5] = 'You sit and chat with a couple of cute girls. One of them says, "Blowjob week during menstruation is for wimps! I want anal week!!"'
    $talkEvent[6] = 'You sit and chat with a couple of cute girls. One of them tells you, "A friend of mine broke up with a girl so I asked him to come over and talk. I gave him a blowjob in the car to help him get over her."'
    $talkEvent[7] = 'You sit and chat with a couple of cute girls. One of them tells you, "I felt so bad when I had to tell my mother that I lost my virginity over two years ago."'
    $talkEvent[8] = 'You sit and chat with a couple of cute girls. One of them tells you, "After spending a day with my boyfriend in bed, his pillow always smells of his cologne. When he is not here I hug the pillow and masturbate. It feels amazing!"'
    $talkEvent[9] = 'You sit and chat with a couple of cute girls. One of them tells you, "I love when, during sex, my boyfriend moans in my ear. His sighs really turn me on. I often hold my ear near his mouth on purpose just to hear him moan."'
    $talkEvent[10] = 'You sit and chat with a couple of cute girls. One of them tells you, "I like how men go wild, when I touch them through their shorts. It really excites me and I do it as often as I can."'
    $talkEvent[11] = 'You sit and chat with a couple of cute girls. One of them tells you, "A year and a half ago, an attractive neighbor moved in. I really want to fuck him and constantly try to seduce him with my outfits, but we haven''t had sex yet. I''m afraid he will move out soon.'
    $talkEvent[12] = 'You sit and chat with a couple of cute girls. One of them tells you, "It really infuriates me, when I feel close to orgasm and then the guy wants to change position. It happens to me all the time."'
    $talkEvent[13] = 'You sit and chat with a couple of cute girls. One of them tells you, "The guys really love it when I caress their cocks and use my fingers massaging their ass. Then I move the tongue in there and start licking greedily."'
    $talkEvent[14] = 'You sit and chat with a couple of cute girls. One of them tells you, "I love to passionately kiss during sex, grab the guys ass and claw his back, mrrr."'
    $talkEvent[15] = 'You sit and chat with a couple of cute girls. One of them tells you, "Life becomes a pain, when you wear a man out to such a degree, that he doesn''t want to have sex anymore. I love it when they almost beg you to wrap your lips around their cock."'
    $talkEvent[16] = 'You sit and chat with a couple of cute girls. One of them tells you, "I met a guy once who immediately invited me to his home. I agreed and just like in every good affair we start kissing and undressing each other. But then I saw his small penis and broke down, laughing out loud. The guy didn''t seem hurt so I quickly sucked him off and went home. I haven''t seen him since."'
    $talkEvent[17] = 'You sit and chat with a couple of cute girls. One of them tells you, "My childhood dream was to become an astronaut. Now I not only want to be one, but have sex with one too. Right there in space. I want to experience a cosmic orgasm!"'
    $talkEvent[18] = 'You sit and chat with a couple of cute girls. One of them tells you, "My former boyfriend''s member was as big, as my whole arm. At first it hurt fucking him, but then I got used to it and really enjoyed it."'
	i = rand(1,18)
    '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_2_<<i>>.jpg"></center>'
	'<<$talkEvent[i]>>'
    

	act 'Move away': gt $loc, $loc_arg
end

if $ARGS[0] = 'smoke':
	cls
	minut += 5
	gs 'stat'
	if girls_smoke = 0:
		girls_smoke = 1
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_3_1.jpg"></center>'
		'"Girls, look what I stole from my worthless, addicted brother.", one of the girls says, showing you two bags of marijuana. "So, do you want to keep staring at me, or do you want to have fun?"'
		act 'Start smoking': gt 'rex_party_smallEvents', 'smoke'
		gs 'willpower', 'drugs', 'resist', 'medium'
		if will_cost <= pcs_willpwr:
			act 'Move away (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				gt $loc, $loc_arg
			end
		else
			act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	else
		girls_smoke += 1
		pcs_horny += 30
		minut += 10
		gs 'drugs', 'joint', 1
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_3_<<rand(2,6)>>.jpg"></center>'
		'You pour some of the marijuana into the bowl, and fill water into the bong. Then you press a finger on the hole while using a lighter to burn the weed, drawing in smoke. After some time you begin to relax and embrace the mild euphoria.'
		act 'Chill':
			cls
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_4_<<rand(1,7)>>.jpg"></center>'
			i = rand(1,5)
			if i = 1:
				'For a moment, you feel almost cut off from the outside world. Your body has found a general state of calm and relaxation. After a while the relaxing feeling goes away and you feel excitement wash over you.'
			elseif i = 2:
				'Almost instantly you feel an increased sensitivity to touch as well as an enhanced vision, hearing and sense of smell. You hear the voices of others much clearer, see <<$pcs_nickname>> much brighter and feel the whole range of odors.'
			elseif i = 3:
				'When you feel the effect you lose all sense of time as if everything stands still. Everyone speaks and moves very slowly and it seems like minutes are stretched into hours...'
			elseif i = 4:
				'You feel like you can fly, entering a state of nirvana. You absorb the feeling of unreality. Your attention to details is greatly increased, nothing can escape your view.'
			elseif i = 5:
				'The smoke makes you feel good, letting you focus on positive emotions. You are able to feel all kinds of effects, happy, pleased, delighted, euphoric.'
			end
			act 'Move away': gt $loc, $loc_arg
		end
	end
end

if $ARGS[0] = 'fun':
	cls
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_5_<<rand(1,6)>>.jpg"></center>'
	'The weed affects you greatly. It improves your mood and you become wildly aroused. "Well girls, why don''t we have some fun?"'
	act 'Rejoice':
		inhib_exp += rand(1,2)
		fun_rand = rand(1,3)
		if fun_rand = 1:
			cls
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_1_<<rand(1,6)>>.jpg"></center>'
			'You and the girls decide to have a contest for the best ass. You call over a couple of guys and stick out your butts for them to appraise. The drunk guys are all very impressed and it is difficult for them to settle on only one of the choices.'
			if Rex_Love = 1: 'You show off your ass right in front of Rex.'
			act 'Shake your booty':
				cls
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_1_<<rand(7,11)>>.jpg"></center>'
				'You seductively wag your ass. ' + iif(Rex_Love = 0,'One boy', 'Rex') + ' is standing right in front of you and you firmly press your buttocks in his palms. He exclaims, "Boys, I think I already know the winner!" You win the competition easily.'
				act 'Move away': gt $loc, $loc_arg
			end
		elseif fun_rand = 2:
			cls
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_<<rand(1,5)>>.jpg"></center>'
			'You become very curious and tell they girls it would be fun to compare your boobs. They agree and you all lift your shirts and look at each others breasts, estimating the size and shape, complimenting each other''s boobs.'
			act 'Further':
				if rand(1,2) = 1:
					cls
					minut += 5
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_<<rand(1,5)>>.jpg"></center>'
					'You enthusiastically examine each others breasts, when a couple of guys burst into the room. You decide that the guys should evaluate your boobs with their hands and call them closer.'
					iif(Rex_Love = 0,'The guys have fun touching your boobs.', 'Rex is right in front of you and gently squeezes your breasts with his hands.')
					gs 'willpower', 'sex', 'resist', 'medium'
					if will_cost <= pcs_willpwr:
						act 'Move away (<<will_cost>> Willpower)':
							*clr & cla
							gs 'willpower', 'pay', 'resist'
							gs 'stat'
							gt $loc, $loc_arg
						end
					else
						act 'Move 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 'Moan':
						cls
						minut += 5
						pcs_horny += 10
						gs 'stat'
						'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_<<rand(6,7)>>.mp4"></video></center>'
						'Getting touched by ' + iif(Rex_Love = 0,'one of the guys', 'Rex') + ' you can''t help but to start moaning. When ' + iif(Rex_Love = 0,'the guy', 'Rex') + ' notices he begins to caress you even more insistently, grabbing your breasts firmly and licking your nipples. "Hey baby, if you like it so much, maybe we should go further."	Then ' + iif(Rex_Love = 0,'the guy', 'Rex') + ' grabs you by the waist...'
						act 'Surrender':
							cls
							if Rex_Love = 0:
								guy += 1
								gs 'npcgeneratec', 0, 'Boy from Rex''s Party', 17
								gs 'boyStat', $npclastgenerated
							else
								sexa += 1
								if rexSex = 0: rexSex = 1 & guy += 1
								gs 'boyStat', 'A57'
							end
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_8.jpg"></center>'
							'He pulls your clothes off and then lays down on his back on the floor, pulling his <<dick>>cm <<$dick_girth>> cock out. You climb on him straddling him, you lower yourself onto his cock, feeling is slip inside of your wet pussy, working your down till he is completely inside of you as deep as you can take him.'
							'The two of you begin to rhythmically fuck in front of the others. The girls cheer you on fervently, filming everything on their phones. "Come on <<$pcs_nickname>>, move your ass faster." You feel his hard member inside of you, and soon realize that he is about to come.'
							gs 'arousal', 'vaginal', 5, 'exhibitionism'
							act 'Let him come on you':
								cls
								minut += 5
								pcs_horny += 10
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_9.jpg"></center>'
								iif(Rex_Love = 0,'The guy', 'Rex') + ' quickly pulls his dick out of you and pushes you off him. He stands up while you remain on your knees, he jerks his dick a few times until he starts shooting his cum all over you, leaving streaks of semen on your chest and abdomen. After he finishes the other girls sit down next to you and have a lot of fun as they lick all the sperm off of your body.'
								gs 'cum_call', 'stomach', $boy
								gs 'arousal', 'cuni', 15, 'exhibitionism'
								gs 'arousal', 'end'
								cumspclnt = 14 & gs 'cum_cleanup'
								act 'Move away': gt $loc, $loc_arg
							end
							act 'Move faster':
								cls
								minut += 5
								pcs_horny += 10
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_6_9.jpg"></center>'
								iif(Rex_Love = 0,'The guy', 'Rex') + ' you move faster as he requests, and you push him over the top. He halfheartedly tries to push you off him, but then it is too late. He shoots his load into you, as you rock back and forth on top of him. You stand up, his cock coming out trailing spent sperm across him. The other girls sit down, cleaning him up with their tongues.'
								gs 'arousal', 'vaginal', 5, 'exhibitionism'
								gs 'arousal', 'end'
								gs 'Cum_Manage'
								act 'Move away': gt $loc, $loc_arg
							end
						end
					end
				else
					cls
					minut += 5
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_7_<<rand(1,5)>>.jpg"></center>'
					'You are having fun and get very excited. One of the girls, can''t resist and starts to lick your erect nipples, gently sucking on them and teasing them with her tongue. You enjoy it.'
					gs 'willpower', 'cuni', 'resist', 'medium'
					if will_cost <= pcs_willpwr:
						act 'Move away (<<will_cost>> Willpower)':
							*clr & cla
							gs 'willpower', 'pay', 'resist'
							gs 'stat'
							gt $loc, $loc_arg
						end
					else
						act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
					end
					if pcs_horny > 50:
						act 'Moan':
							cls
							minut += 10
							orgasm += 1
							pcs_horny = 0
							pcs_mood = 100
							lesbian += 1
							gs 'stat'
							if rand(1,2) = 1:
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_7_6.jpg"></center>'
								'You can''t help but start to moan and the girls quickly spread you legs an begin to lick your holes in unison. You quickly come from the sensation of having every hole licked and caressed.'
							else
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_7_7.jpg"></center>'
								'You start to moan and the girls quickly lay you down on your back an start to caress you with their tongues. They take turns kissing you and licking your pussy, quickly bringing you to orgasm.'
							end
							act 'Move away': gt $loc, $loc_arg
						end
					end
				end
			end
		elseif fun_rand = 3:
			cls
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_<<rand(1,3)>>.jpg"></center>'
			'You call in the guys and announce that you and the girls want to check out the contents of their pants. Excitedly they unzip their pants and pull out their dicks.'
			iif(reksMeet = 1,'You have Rex'' member in front of you and compare it with your arm.', 'One of the more persistent guys comes up to you and you compare his penis with your arm.')
			gs 'willpower', 'bj', 'resist', 'medium'
			if will_cost <= pcs_willpwr:
				act 'Move away (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt $loc, $loc_arg
			else
				act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Suck him':
				cls
				gs 'arousal', 'bj', 5
				if Rex_Love = 1: bja += 1
				gs 'stat'
				$party_suck = {
					act 'Make him cum':
						cls
						minut += 5
						spafinloc = 12
						gs 'cum_manage'
						spafinloc = 11
						gs 'cum_manage'
						
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_<<rand(6,12)>>.jpg"></center>'
						'You open your mouth and stick out your tongue.'
						iif(Rex_Love = 0,'The guy', 'Rex') + ' cums hard, filling up your mouth and smearing sperm all over your face.'
						act 'Move away': gt $loc, $loc_arg
					end
				}
				if rand(1,2) = 1:
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_4.jpg"></center>'
					'Strong desire clouds your mind, and you grab ' + iif(Rex_Love = 0,'the guy''s', 'Rex''s') + ' member in full view of all the girls. You gently masturbate it with your hand, then take it in your mouth and begin to suck on its head.'
					iif(Rex_Love = 0,'The guy', 'Rex') + ' can''t resist for long and starts...'
					dynamic $party_suck
				else
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_5.jpg"></center>'
					'One of the girls takes the dick in front of her in her mouth. Feeling encouraged you take ' + iif(Rex_Love = 0,'the guy''s', 'Rex''s') + ' dick and gently masturbate it with your hand. Soon you put it in your mouth and begin to suck on its head, watching the other girl giving head at the same time.'
					iif(Rex_Love = 0,'The guy', 'Rex') + ' can''t resist for long and starts...'
					dynamic $party_suck
				end
			end
		end
	end
	gs 'willpower', 'exhib', 'resist', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Move away (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			gt $loc, $loc_arg
		end
	else
		act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
end
--- rex_party_smallEvents ---------------------------------