GirlLife_BPP/locations/BelSex.qsrc

# BelSex

if $ARGS[0] = '' or $ARGS[0] = 'sex':
	CLOSE ALL
	gs'stat'
	dick = npc_dick['A113']
	gs 'boyStat', 'A113'
	$boydesc = $npc_usedname['A113']
	silavag = npc_sexskill['A113']
	if sashaBeliSex = 0:sashaBeliSex = 1 & guy += 1

	belact = rand(1,3)
	'You suck <<$boydesc>>''s tongue as he kisses you, doing your best to please him in any way you can... because who knows what he''ll do if you don''t. He crudely kneads your butt and upper thighs, grabbing your ass cheeks and slapping them, making your ass cheeks jiggle.'
	
	gs 'arousal', 'kiss', 5, 'sub', 'prostitution'
	gs 'arousal', 'foreplay', 5, 'sub', 'prostitution'
	minut =- 5
	gs 'stat'
	
	belybj = rand(0,2)
	if belybj = 0:
		'<<$boydesc>> puts his large hands on your shoulders and forces you downwards. Even though you''re trying to cooperate and drop to your knees as soon as you realize what he wants, he''s still kind of rough with you. "Start sucking, <<$pcs_nickname>>."'
		act'On your knees':gt 'BelSex', 'bj1'
	elseif belybj = 1:
		'<<$boydesc>> tugs at your clothes, letting you know that he wants you naked. You quickly obey and assist him in taking your clothes off. He nods approvingly, definitely liking what he sees. "Very nice, girl... but you''d look even better with my cock in you."'
		act'Drop down on your knees':gt 'BelSex', 'bj2'
	else
		'<<$boydesc>> is staring intently into your eyes, pawing between your legs while you unbutton his pants, grabbing hold, you strip them down to his knees. His cock is hanging freely, twitching from excitement...'
		act'What now?':gt 'BelSex', 'bj3'
	end
end

if $ARGS[0] = 'bj1':
	bj_temp += 1
	belact -= 1
	picrand = rand(0,12)
	'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<picrand>>.mp4"></video></center>'
	'You take <<$boydesc>>''s <<dick>> cm cock in your mouth and begin stimulating his glans. You can clearly see on <<$boydesc>>''s face that he''s getting irritated at you for trying to prolonge things and just wants you to suck him off quickly.'
	'You do your best to suck him off, trying to go deep as possible, but <<$boydesc>> is not pleased. He grabs you by the back of your head and begins forcing it closer and closer towards his fat stomach. You start gagging but he just tells you to relax your throat and it will all be fine.'

	gs 'arousal', 'bj', 10, 'sub', 'prostitution', 'deepthroat'
	gs 'stat'
	
	if belact <= 0:
		'<<$boydesc>> groans, clearly enjoying himself. He stands up, grabs you by the hair, and begins fucking your mouth. "Wider, you little slut, I don''t want to feel any teeth."'
		'Not daring making him more upset you make sure your teeth don''t get in the way and open your mouth as wider.'
		act'Open wide':
			cls
			gs 'cum_call', 'mouth', 'A113', 1
			gs'stat'
			picrand = rand(0,10)
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
			'<<$boydesc>> indicates that he''s about to come, telling you to "Open wide, <<$pcs_nickname>>. You''re going to swallow every little drop."'
			'You meekly nod and let out "Yes, Mr. Bely..." doing as he says, opening your mouth as wide as you can. He jerks himself off all over your face and you soon feel his warm jets of sperm landing on your left cheek. He adjusts his aim a bit and some of it ends up in your mouth as well. You decide to just sit there with your eyes closed and your mouth open until he tells you otherwise, doing your best to ignore the taste.'
			swallow += 1
			belsexpayment = 300
			gs 'arousal', 'end'
			gs 'stat'
			act'Get up':gt 'BelSex', 'shower'
		end
	end
	if belact > 0:
	belyvag = rand(0,3)
		if belyvag = 0:
			 '<<$boydesc>> grunts loudly while you suck him off. "Time to give you a real pounding!"'
			act'Get in position':gt 'BelSex', 'vaginal1'
		elseif belyvag = 1:
			'<<$boydesc>> paws at your ass while you suck him off before he tells you "Get on your back, <<$pcs_nickname>>. I''m going to fill you up."'
			act'Lie down on your back':gt 'BelSex', 'vaginal2'
		elseif belyvag = 2:
			'<<$boydesc>> looks down on you as you''re sucking. He pulls out his cock, lifts you up and throws you onto the bed. "Show me your ass, <<$pcs_nickname>>."'
			act 'Get on all fours':gt 'BelSex', 'doggy'
		else
			'<<$boydesc>> lies down on his back and begins playing with his cock waiting for you to straddle him.'
			act 'Ride him':gt 'BelSex', 'cowgirl'
		end
	end
end

if $ARGS[0] = 'bj2':
	bj_temp += 1
	belact -= 1
	picrand = rand(0,12)
	'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<picrand>>.mp4"></video></center>'
	'You look at <<$boydesc>> with lust in your eyes. Dropping down on your knees without being asked, you unbutton his pants, exposing his full erect cock. Wrapping your <<$liptalk>> around his strong and warm cock, you quickly begin by sucking the head, caressing it with your tongue and lips.'
	'<<$boydesc>> lets out a small groan, clearly enjoying himself. Turned on by seeing <<$boydesc>> enjoying the blowjob, you start sucking his cock while caressing his balls.'

	gs 'arousal', 'bj', 10, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		'Your tongue is giving every bit of his cock it can reach its attention as you bob your head back and forth.'
		'Your lust takes over and you take him as deep into your mouth as you can, keeping him there until you start to gag and have to come up for air. Taking few breaths to recover, you take him inside again, rapidly moving your head, sucking and deepthroating him for all you''re worth.'
		act'Keep sucking':
			cls
			gs 'cum_call', 'mouth', 'A113', 1
			gs'stat'
			picrand = rand(0,10)
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
			'Redoubling your efforts, you reach the base of his wet cock with your <<$liptalk>>. <<$boydesc>> stares you in the face while your lips glide up and down on his hard dick. You know he must be close now.'
			'You don''t want him to cum yet so you switch it up, using your tongue instead, sliding up and down his shaft, pulling out all of your tricks to make him feel good. You even use some techniques you learned to stall his orgasm for a moment, making it all the more intense for him when he shoots his load into your mouth.'
			swallow += 1
			belsexpayment = 300
			gs 'arousal', 'end'
			gs 'stat'
			act'Take a shower':gt 'BelSex', 'shower'
		end
	end
	if belact > 0:
	belyvag = rand(0,3)
		if belyvag = 0:
			 '<<$boydesc>> grunts loudly while you suck him off. "Time to give you a real pounding!"'
			act'Get in position':gt 'BelSex', 'vaginal1'
		elseif belyvag = 1:
			'<<$boydesc>> paws at your ass while you suck him off before he tells you "Get on your back, <<$pcs_nickname>>. I''m going to fill you up."'
			act'Lie down on your back':gt 'BelSex', 'vaginal2'
		elseif belyvag = 2:
			'<<$boydesc>> looks down on you as you''re sucking. He pulls out his cock, lifts you up, and throws you onto the bed. "Show me your ass, <<$pcs_nickname>>."'
			act 'Get on all fours':gt 'BelSex', 'doggy'
		else
			'<<$boydesc>> lies down on his back and begins playing with his cock waiting for you to straddle him.'
			act 'Ride him':gt 'BelSex', 'cowgirl'
		end 
	end
end

if $ARGS[0] = 'bj3':
	bj_temp += 1
	belact -= 1
	picrand = rand(0,12)
	'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<picrand>>.mp4"></video></center>'
	'"Get down on your knees!" he commands. Unfazed by his boldness, you kneel down in front of him and lick up and down his length a few times before you take his <<dick>> cm cock into your mouth. As his cock enters, a rank odor enters your nostrils. You disregard the nasty aroma and begin moving your tongue around the head and you suck his dick as you start bobbing your head up and down while your hands take turns playing with his hairy balls. It''s hard for you to decide whether you want to move slowly and tease him, or speed up to avoid getting caught, but what you are doing seems to be to his liking.'
	'"Good girl", he whispers, "I knew you could suck cock as soon as I saw you." His praise causes you to smile a little around his dick and you take him a little deeper in response.'
	
	gs 'arousal', 'bj', 10, 'sub', 'prostitution', 'deepthroat'
	gs 'stat'
	
	if belact <= 0:
		'<<$boydesc>> is grimacing, enjoying himself. He is sitting down, letting you do all the work. Encouraged, you take his cock deeper, trying to hold it down as long as possible.'
		'"Good girl, keep on sucking my cock." All of a sudden his cock gets stiffer and he pulls out of your mouth. "I''m ready to cum..." You move your head towards his cock but he stops you...'
		act'Continue':
			cls
			gs 'cum_call', 'mouth', 'A113', 1
			gs'stat'
			picrand = rand(0,10)
			belsexpayment = 300
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum<<picrand>>.mp4"></video></center>'
			'Instead, <<$boydesc>> starts jerking off, telling you "I''ll be done soon, <<$pcs_nickname>>. I want you to swallow every little drop." He doesn''t last much longer and cums all over your face.'
			'He squeezes the last few drops of sperm into your mouth and then sticks his dick in your mouth. You swallow his cum obediently and then suck his dick clean, licking every tasty inch of it you can reach. Once he goes soft in your mouth, he pulls out his cock.' 
			swallow += 1
			gs 'arousal', 'end'
			gs 'stat'
			act'Take a shower':gt 'BelSex', 'shower'
		end
	end
	if belact > 0:
	belyvag = rand(0,3)
		if belyvag = 0:
			 '<<$boydesc>> grunts loudly while you suck him off. "Time to give you a real pounding!"'
			act'Get in position':gt 'BelSex', 'vaginal1'
		elseif belyvag = 1:
			'<<$boydesc>> paws at your ass while you suck him off before he tells you "Get on your back, <<$pcs_nickname>>. I''m going to fill you up."'
			act'Lie down on your back':gt 'BelSex', 'vaginal2'
		elseif belyvag = 2:
			'<<$boydesc>> looks down on you as you''re sucking. He pulls out his cock, lifts you up, and throws you onto the bed. "Show me your ass, <<$pcs_nickname>>."'
			act 'Get on all fours':gt 'BelSex', 'doggy'
		else
			'<<$boydesc>> lies down on his back and begins playing with his cock waiting for you to straddle him.'
			act 'Ride him':gt 'BelSex', 'cowgirl'
		end
	end
end

if $ARGS[0] = 'vaginal1':
	belact -= 1
	sex_temp += 1
	picrand = rand(0,7)
	'<center><video autoplay loop src="images/characters/pavlovsk/vadim/sex/mitka<<picrand>>.mp4"></video></center>'
	'<<$boydesc>> lifts you up, grabs you by the hair, and shoves you onto the bed. You land on your back, as he quickly moves in, you spread your legs. He starts touching your pussy lips with his fat fingers, you let out a moan as he penetrates you with his finger.'
	'"That''s enough, you''re all wet and ready now." he says. He grabs hold of his penis slowly slides his member into your wet cunt, softly parting your nether lips. As your pussy walls envelops his cock you let out a soft moan.'
	'Hanging over you, looking into your eyes he starts build up quite a bit of speed. "You''re a pretty good fuck <<$pcs_nickname>>, but I''ve had better." he says as his sweat drips all over you.'
	
	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', '', 'A113', 1
		gs'stat'
		belsexpayment = 600
		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie3.mp4"></video></center>'
		'<<$boydesc>>''s movements speed up as he keeps pounding you balls deep without showing any signs of slowing down. You think this will go on for a while, but suddenly you hear <<$boydesc>> grunting while cumming deep inside you.'
		act'Take a shower':gt 'BelSex', 'shower'
	end
	if belact > 0:
		belanal = rand(0,2)
		if belanal = 0:
			'<<$boydesc>>''s sweat is dripping all over your body. He is huffing and puffing as he pulls out. "Give me a second to catch my breath and then I''ll finish this. Give me your sweet little ass," he says, breathing heavily'
			act'Take him in your ass':gt 'BelSex', 'anal1'
		elseif belanal = 1:
			'<<$boydesc>> wipes the sweat off his forehead, clearly worked up from fucking you. Nevertheless, he''s not done with you and tells you to that he wants your ass next.'
			act'Present your ass':gt 'BelSex', 'anal2'
		else
			'<<$boydesc>> pulls out of your pussy as the sensations make you moan; "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
		end 
	end
end

if $ARGS[0] = 'vaginal2':
	belact -= 1
	sex_temp += 1
	picrand = rand(0,7)
	'<center><video autoplay loop src="images/characters/pavlovsk/vadim/sex/mitka<<picrand>>.mp4"></video></center>'
	'<<$boydesc>> lifts you up, grabs you by the hair, and shoves you onto the bed. His cock, well greased from the blowjob, easily slides into your pussy.' 
	'You feel his glans stretching the inner walls of your pussy and you let out a loud moan with each penetration. As he keeps fucking you it doesn''t take long before you get accustomed to his movements.'
	'"Let''s see how deep I can go," he says as he rams his cock so deep that your pubes touch. You scream out loud, breathing fast and heavily and he continues pounding you.'
	
	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', '', 'A113', 1
		gs'stat'
		belsexpayment = 600
		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie1.mp4"></video></center>'
		'<<$boydesc>> groans loudly. His cock stiffens as you feel a jet of warm sperm hitting deep inside your womb.'
		act'Take a shower':gt 'BelSex', 'shower'
	end
	if belact > 0:
		belanal = rand(0,2)
		if belanal = 0:
			'<<$boydesc>>''s sweat is dripping all over your body. He is huffing and puffing as he pulls out. "Give me a second to catch my breath and then I''ll finish this. Give me your sweet little ass," he says, breathing heavily'
			act'Take him in your ass':gt 'BelSex', 'anal1'
		elseif belanal = 1:
			'<<$boydesc>> wipes the sweat off his forehead, clearly worked up from fucking you. Nevertheless, he''s not done with you and tells you to that he wants your ass next.'
			act'Present your ass':gt 'BelSex', 'anal2'
		else
			'<<$boydesc>> pulls out of your pussy as the sensations make you moan. "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
		end 
	end
end

if $ARGS[0] = 'doggy':
	belact -= 1
	sex_temp += 1
	picrand = rand(1,5)
	'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/vagdog<<picrand>>.jpg"></center>'
	'With his cock rock hard and nicely wet he lifts your body, turns you around, and tells you to get on all fours on the floor. He gets down on his knees. Streching your butt cheeks slowly, he runs his shaft along your wet pussy, teasing you, all of a sudden he shoves his cock into your pussy and starts pounding away, not caring about your enjoyment. He just wants to fuck.'
	'Holding you by the hips, he pounds on without slowing the pace, only occasionally stopping to catch a breath. "Isn''t he going to slow down soon?" you think to yourself. But you''ve underestimated him, instead he grabs your hair and pushes himself even deeper inside.'
	'You moan loudly as he rams his cock deeper and deeper. You hear him panting and grunting he must''ve reached his limit...'
	
	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', '', 'A113', 1
		gs'stat'
		belsexpayment = 600
		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie4.mp4"></video></center>'
		'<<$boydesc>> keeps on pounding you from behind. You feel his cock getting stiffer and twitching inside of you. You turn your head and look him in the eyes, pleading that he pulls out and cums on your ass instead. But <<$boydesc>> isn''t budging. He keeps on going, pulling your hips towards him, filling your womb with splashes of semen.'
		act'Take a shower':gt 'BelSex', 'shower'
	end
	if belact > 0:
		belanal = rand(0,2)
		if belanal = 0:
			'<<$boydesc>>''s sweat is dripping all over your body. He is huffing and puffing as he pulls out. "Give me a second to catch my breath and then I''ll finish this. Give me your sweet little ass." he says, breathing heavily'
			act'Take him in your ass':gt 'BelSex', 'anal1'
		elseif belanal = 1:
			'<<$boydesc>> wipes the sweat off his forehead, clearly worked up from fucking you. Nevertheless, he''s not done with you and tells you to that he wants your ass next.'
			act'Present your ass':gt 'BelSex', 'anal2'
		else
			'<<$boydesc>> pulls out of your pussy as the sensations make you moan. "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
		end 
	end
end

if $ARGS[0] = 'cowgirl':
	belact -= 1
	sex_temp += 1
	picrand = rand(1,6)
	'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/vagcow<<picrand>>.jpg"></center>'
	'<<$boydesc>> lies on the bed. He smirks as he tells you that you''ll be doing all the work today. You look at him, still a bit confused after the blowjob you''ve given him. Wasn''t that enough? "Don''t waste my time <<$pcs_nickname>>. Come here!" Not daring to do upset him even more, you crawl on top of <<$boydesc>> and guide his cock inside your vagina.'
	'He grabs your hips, controlling the rhythm as you to ride him. He wants it fast. Fast, deep and hard, without any regard to you, or that he actually bumps into your cervix in this position. You keep riding him at the same rhythm as he moves his hands grabbing you breasts instead.'
	'Unable to think of anything but the pleasure, you moan so loudly that you are almost screaming. Wanting to ride out this intense feeling, you completely forget that you''re supposed to please <<$boydesc>> as you orgasm while riding him.'
	
	$orgasm_or = 'yes' 
	gs 'arousal', 'vaginal', 15, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', '', 'A113', 1
		gs'stat'
		belsexpayment = 600
		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie2.mp4"></video></center>'
		'You keep switching the tempo as you ride <<$boydesc>>, from the looks on his face he''s ready to explode. You speed up even more wanting him to finish as soon as possible. As you''re thinking about pulling out not wanting him to cum inside you, you realize that you are too late. <<$boydesc>> suddenly explodes inside of you.'
		act'Take a shower':gt 'BelSex', 'shower'
	end
	if belact > 0:
		belanal = rand(0,2)
		if belanal = 0:
			'<<$boydesc>>''s sweat is dripping all over your body. He is huffing and puffing as he pulls out. "Give me a second to catch my breath and then I''ll finish this. Give me your sweet little ass," he says, breathing heavily'
			act'Take him in your ass':gt 'BelSex', 'anal1'
		elseif belanal = 1:
			'<<$boydesc>> wipes the sweat off his forehead, clearly worked up from fucking you. Nevertheless, he''s not done with you and tells you to that he wants your ass next.'
			act'Present your ass':gt 'BelSex', 'anal2'
		else
			'<<$boydesc>> pulls out of your pussy as the sensations make you moan. "Oh don''t worry sweetheart, I''m not done yet. It''s your asshole next. Assume the position."'
			act'Get fucked from behind':gt 'BelSex', 'analdoggy'
		end 
	end
end

if $ARGS[0] = 'anal1':
	belact -= 1
	anal_temp += 1
	'<center><video autoplay loop src="images/shared/sex/anal/piledriver/kotovsexanal36.mp4"></video></center>'
	'<<$boydesc>> begins rubbing the tip of his dick against you anus. Before you can even protest, his <<dick>> cm cock has already painfully penetrated your ass. You instinctively want to flinch away, but he grabs your hips with surprising strength and forces his dick as far into your ass as he can... before he starts hammering away.'
	'"All the other girls I''ve fucked over the years loved getting their ass destroyed," he informs you between slaps of flesh against flesh. "I hope you don''t mind." The only response you manage to let out is a little squeak as if you''re giving him permission to continue on, not that he needs it.'
	
	gs 'arousal', 'anal', 15, 'sub', 'prostitution', 'rough'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', 'anus', 'A113', 1
		gs'stat'
		belsexpayment = 600
		picrand = rand(1,2)
		'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal<<picrand>>.mp4"></video></center>'
		'You can tell <<$boydesc>> is close to his orgasm. He huffs and puffs quite heavily now. Seconds later he firmly grabs your hips, his movements more erratic, and you feel his cock spasming inside you as he shoots his cum deep inside your asshole. The cum feels kind of warm inside you, and it slowly dribbles from you asshole once he pulls out his cock.'
		
		act'Take a shower':gt 'BelSex', 'shower'
	end
end

if $ARGS[0] = 'anal2':
	belact -= 1
	anal_temp += 1
	picrand = rand(30,34)
	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal<<picrand>>.mp4"></video></center>'
	'<<$boydesc>> lies on the bed, as you climb on top of him. <<$boydesc>> grabs hold of his cock, guiding his cock inside your tight anus.'
	'You gasp as you start moving back and forth, controlling the rhythm as you ride him. First, slowly, as you adjust yourself. Soon enough you''re speeding up: fast, deep, and hard. You feel a sharp pain that quickly turns into a pleasant ache. You keep riding him at the same pace as he begins panting more and more.'
	
	gs 'arousal', 'anal', 15, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', 'anus', 'A113', 1
		gs'stat'
		belsexpayment = 600
		'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/analcum.jpg"></center>'
		'You can tell <<$boydesc>> is close to his orgasm. His cock is stiff and has gotten larger inside your anus. Seconds later he firmly grabs your hips and you feel his cock spasming inside you as he shoots his cum deep inside your asshole. The cum feels kind of warm inside you, and it slowly dribbles out as you get up off of him.'
		
		act'Take a shower':gt 'BelSex', 'shower'
	end
end

if $ARGS[0] = 'analdoggy':
	belact -= 1
	anal_temp += 1
	picrand = rand(0,12)
	'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal<<picrand>>.mp4"></video></center>'
	'<<$boydesc>> pulls his cock out of your pussy and begins to slowly rub against your asshole. "Don''t worry, <<$pcs_nickname>>. I''ll be gentle," he says grinning as he has you on all fours, wide spread.'
	'"Enough foreplay. Your ass is ready me!" he shouts as <<$boydesc>> starts pounding himself balls deep into you immediately. You bury your face into a pillow as he pounds your asshole roughly. The pain is unbearable and you flop with your legs trying to get away, but it only encourages <<$boydesc>> on as he keep pummeling your anus.'

	gs 'arousal', 'anal', 15, 'sub', 'prostitution'
	gs 'stat'
	
	if belact <= 0:
		gs 'cum_call', 'anus', 'A113', 1
		gs'stat'
		belsexpayment = 600
		'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/kafeanpie.jpg"></center>'
		'You''re at your limit and just as you want to beg him to take it easier, you feel him twitching behind you. All of a sudden you feel his warm cum shooting inside you. It slowly dribbles down your thighs as he pulls out of you.'
		
		act'Take a shower':gt 'BelSex', 'shower'
	end
end

if $ARGS[0] = 'shower':
	'<<$boydesc>> is finally done with you. He looks at you all pleased as you get up and head off to the bathroom to take a quick shower and freshen up.'
	act 'Take a 15 minute shower':
		cls
		dynamic $showerdin
		minut += 15
		pav_prostitute += 1
		pcs_horny = pcs_horny + 1
		pcs_hairbsh = 1
		pcs_makeup = 1
		if frost > 0:frost = 0
		gs 'stat'
		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
		'You get into the nice, hot water stream of the shower and lather your body up with a soapy sponge. You carefully make sure to wash all of his cum that''s dripping out your holes, you then shampoo your hair and rinse that out as well. You''re squeaky clean now.'
		
		act 'Get out of the bathroom':
			cls
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
	
			if belgangPay <= 0:
				money += belsexpayment
				'Vadim looks at you and says: "That was a good fuck, <<$pcs_nickname>>. Here, this is for you," and with those words he hands you <<belsexpayment>> <b>₽</b>.'
			else
				belgangPay -= belsexpayment
				belgangPayWeek -= belsexpayment
				'"You''re getting there whore." <<$boydesc>> writes off <<belsexpayment>> <b>₽</b> from your debt. He looks at you probably planning what he could do next to you. "Run along now, I have business to take care off." he says as he''s escorting you to the door, as he''s closing the door you hear him say; "Don''t you ever forget who''s your master, <<$pcs_nickname>>."'
				' '
				'You owe him: <<belgangPay>> <b>₽</b>'
				if belgangPayWeek >= 0:
					'This week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
				else
					'This week you need to pay him: 0 <b>₽</b>'
					'You have reduced your next weeks payment by: <<-1*belgangPayWeek>> <b>₽</b>'
				end
			end
						
			if $clothingworntype = 'swimwear': gs 'clothing', 'wear', $normalclothingworntype, normalclothingwornno
								
			gs 'arousal', 'end'
			gs 'stat'
			
			if return_residential = 0: 
				act 'Leave': gt 'pavCommercial'
			else
				act 'Leave': gt 'pavResidential'
			end	
		end
	end
end

--- BelSex ---------------------------------