# MRear
$location_type = 'private'

if $ARGS[0] = 'garden':
	cls
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/garden.jpg"></center>'
	'Extensive garden, meticulously designed and maintained. Split into different areas each with its own theme and inspiration.'

	act 'Go to the conservatory': gt 'MConservatory'
	act 'Go to the garage': gt 'MRear', 'garage'

	if $BDSMrole = 's' and rand (0, 100) < 5 and pcs_vag > 0:
		gt 'MRear', 'gEV1'
	elseif rand (0,100) < 3:
		cls
		gs 'stat'
		'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/garrand.mp4"></video></center>'
		'The gardener is fucking a sub, gagged and tied to a tree.'
		
		gs 'arousal', 'voyeur', 5
		gs 'arousal', 'end'
		gs 'stat'
		
		act 'Return':gt 'MRear', 'garden'
	elseif rand (0,100) < 3:
		cls
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/sex/uniform.jpg"></center>'
		'A strapping young dom is checking a sub is adhering to the dress code. Looks like she forgotten her panties.'
		
		gs 'arousal', 'voyeur', 5
		gs 'arousal', 'end'
		gs 'stat'
		
		act 'Return':gt 'MRear', 'garden'
	elseif rand (0,100) < 3 and sunWeather = 1:
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/sex/drink.jpg"></center>'
		'A dominate woman is forcing a naked man to drink from the fountain.'
		
		gs 'arousal', 'voyeur', 5
		gs 'arousal', 'end'
		gs 'stat'
		
		act 'Return':gt 'MRear', 'garden'
	elseif rand (0,100) < 3 and sunWeather = 1:
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/sex/race.jpg"></center>'
		'A cluster of people are gathered around five women bent over in a row masturbating, you quickly realize everyone is betting on who will orgasm first. You briefly wonder if their is a prize for winning.'
		
		gs 'arousal', 'voyeur', 5
		gs 'arousal', 'end'
		gs 'stat'
		
		act 'Return':gt 'MRear', 'garden'
	end	
end

if $ARGS[0] = 'gEV1':
	*clr
	cla
	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/randgirl.jpg"></center>'
	if $clothingworntype ! 'nude':
		'Another submissive women approaches you and says, "If you are looking to earn a nice bonus, there are a group of older men at the outside dining table. If you strip off, go over to them and have sex with them, they will give you a load of cash."'
		'This isn''t exactly the BDSM you come here for, but it is not breaking any rules and you have the choice.'
		act 'Strip and go meet the older men':gs 'clothing', 'strip' & gt 'MRear', 'gEV2'
	else
		'Another submissive women approaches you and says, "If you are looking to earn a nice bonus, there are a group of older men at the outside dining table. If you go over and have sex with them, they will give you a load of cash."'
		'This isn''t exactly the BDSM you come here for, but it is not breaking any rules and you have the choice.'
		act 'Go and meet the older men':gt 'MRear', 'gEV2'
	end
	act 'Don''t go and see the older men': gt 'MRear', 'garden'
end

if $ARGS[0] = 'gEV2':
	*clr
	cla
	sub += 2
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup1.mp4"></video></center>'
	'You walk over to the older men, they can''t take their eyes of your beautiful naked body.'
	act 'Continue':gt 'MRear', 'gEV3'
end

if $ARGS[0] = 'gEV3':
	cls
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	cumprecheck = 1
	pcs_vag += 1
	dick = RAND(12,21)
	gs 'stat'
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup2.mp4"></video></center>'
	'Half of the men are already naked and probably asked the sub who spoke to you. You leave them no doubt as to your intentions and lead one of the men on to the table.'
	'You crawl on top of him and already aroused in anticipation, you quickly take him inside and start to grind.'
	
	gs 'arousal', 'foreplay', 10, 'sub', 'group'
	gs 'stat'
		
	act 'Continue':gt 'MRear', 'gEV4'
end

if $ARGS[0] = 'gEV4':
	cls
	gs 'stat'
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup3.mp4"></video></center>'
	'You let the man go from under you and lie on your back. All of the men surround you and you do all you can to please them with your mouth and hands.'
	'Unseen hands rub your pussy and you start to feel the familiar sense of bliss, soon overtaken by a need to be filled.'
	
	gs 'arousal', 'bj', 10, 'sub', 'group'
	gs 'arousal', 'hj', 10, 'sub', 'group'
	gs 'arousal', 'vaginal_finger', 10, 'sub', 'group'
	minut -= 10
	gs 'stat'
	
	act 'Continue':gt 'MRear', 'gEV5'
end

if $ARGS[0] = 'gEV5':
	*clr
	cla
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup4.mp4"></video></center>'
	'"Fuck me." You moan to no particular man. The invite is soon accepted and as you continue to suck one of the men''s cocks another pushes itself into your pussy.'
	
	gs 'arousal', 'vaginal', 10, 'sub', 'group'
	gs 'stat'
	
	act 'Continue':gt 'MRear', 'gEV6'
end

if $ARGS[0] = 'gEV6':
	cls
	gs 'stat'
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup5.mp4"></video></center>'
	'Not wanting this to turn into a creampie party, you get yourself onto all fours and spend sometime sucking on the cocks that you have otherwise been neglecting.'
	
	gs 'arousal', 'bj', 10, 'sub', 'group'
	gs 'stat'
	
	act 'Continue':gt 'MRear', 'gEV7'
end

if $ARGS[0] = 'gEV7':
	cls
	spafinloc = 11
	gs 'cum_manage'
	gs 'stat'
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup6.mp4"></video></center>'
	'Experience tells you that they are close to finishing and you lie back and tell them to finish on your face.'
	'Almost immediately the right side of your face receives a warm, sticky treat.'
	
	act 'Continue':gt 'MRear', 'gEV8'
end

if $ARGS[0] = 'gEV8':
	cls
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	spafinloc = 11
	gs 'cum_manage'
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	spafinloc = 11
	gs 'cum_manage'
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	spafinloc = 11
	gs 'cum_manage'
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	spafinloc = 11
	gs 'cum_manage'
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	spafinloc = 11
	gs 'cum_manage'
	gs 'npcgeneratec', 0, 'Old Man', rand(55,75)
	gs 'boyStat', $npclastgenerated
	sexpartkno = 1
	spafinloc = 11
	gs 'cum_manage'
	gs 'stat'
	'<center><video autoplay loop src="images/locations/city/suburb/bdsm_club/sex/grup7.mp4"></video></center>'
	'You remain in position lending a helping hand were needed and take another 6 cumshots to your face.'
	'As you reveal in your successful work, you realise for the first time that there was 7 men there.'
	'You get up, still naked and your face covered in cum. The men have had their fun and are leaving. You find 2,000 <b>₽</b> on the table.'
	
	gs 'arousal', 'hj', 10, 'sub', 'group'
	gs 'arousal', 'end'
	gs 'stat'
	
	act 'Continue':gt 'MRear', 'garden'
end


if $ARGS[0] = 'garage':
	cls
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/garage.jpg"></center>'
	'The garage has many different expensive cars, the doors are shut and it is surprisingly warm.'
	act 'Go to reception': gt 'BDSM_Club', 'reception'
	act 'Go to the garden': gt 'MRear', 'garden'
end

--- MRear ---------------------------------