# bed
if $ARGS[0] = 'start':
	cla
	*clr
	menu_off = 1
	shour = 24 - hour
	houserabrand = rand(0, 100)
	housevorrand = rand(0, 200)
	gs 'stat'

	if hour > 22 and houserabrand < 2 and houserab = 1 and houserabday ! daystart and pcs_sleep < 50 and tanhouse1 = 1:gt 'bed', 'rab'
	if hour > 22 and housevorrand = 0 and housrA = 1 and husband = 0:gt 'bed', 'vor'


	if zoo > 6 and housrA = 1 and dogday ! daystart and houserabrand < 4:gt 'bed1', 'sog1'

	gt 'bed2'
end

if $ARGS[0] = 'mast':
	cla
	*clr
	menu_off = 1
	if pcs_inhib < 30:inhib_exp += rand(1,3)
	pcs_mood += 15
	pcs_willpwr += 15
	pcs_vag += 1

	if husband > 0 and housrA = 1 and husbandrink ! 10:
		if dildo > 0:
			if week > 5 or (week < 6 and hour > 16):
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m21.jpg"></center>'
				'You bend over and start fucking your pussy with your dildo'
				
				gs 'arousal', 'masturbate', 30
				gs 'stat'

				if hour > 22 or hour < 7:'<<$husName>> looks at you, obviously a little dumbfounded.'
				if hour >= 7 and hour <= 22:'Once you get into it, <<$husName>> enters the room.'
				if harakHusb = 0:
					'"What are you doing dear?" he asks.'
					'"I''m sorry dear, but I really need it, and you''ve been busy, " you reply, without stopping.'
					'"How often do you do this?" he asks.'
					'"Quite often, sometime in my ass, you want to see?" you ask'
					if izvratH = 0:
						husband -= 1
						'"I''ll wait outside the door until you''re done." he says and leaves. You continue to satisfy yourself rapidly, and soon finish.'
						$orgasm_or = 'yes'
						gs 'arousal', 'end'
						gs 'stat'

						act 'Finish':gt 'bed', 'start'
					elseif izvratH = 1:
						'"Well, I don''t know." he stammers.'
						'"Come on." You encourage him'

						act 'Show':
							cla
							*clr
							'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m22.jpg"></center>'
							'You pull the dildo from your pussy and winking at your husband, insert the dildo in your anus. <<$husName>> watches closely as the dildo disappears in and out of your ass.'
							'You see how his pants swell. "Anything else you want, dear?" you ask, smiling.'
							'"Can I join?" he asks, a little embarrassed.'

							act 'Invite':
								cla
								*clr
								analorgasm += 1
								'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m23.jpg"></center>'
								'<<$husName>> gets his dick out and starts masturbating. It is not what you expected, and at first you feel a little sad that he didn''t enter into you, but began to masturbate.'
								'Then it starts to hit you, watching your husband masturbate as he watches you fuck the dildo, his face covered in pleasure, you scream and fall on the table, having experienced an orgasm.'
								'The dildo is still sticking out of your ass. While <<$husName>> is still masturbating, looking at you stretched out on the table, you take the dildo from your ass and begin to lick it, looking into your husbands eyes.'
								'The spectacle has him immediately cum all over the floor. You go to him, kiss him on the lips and he passionately kisses you back..'

								$orgasm_or = 'yes'
								gs 'arousal', 'end'
								gs 'stat'
						
								act 'Finish':gt 'bed', 'start'
							end
						end
					end
				elseif harakHusb = 1:
					'"Are you trying to tell me that I''m not enough to satisfy you?" He asks.'
					'"I''m sorry dear, but I really need this, and you''ve been busy." You reply, without stopping.'
					'"Well then, show me everything now that you know I''ll watch." He says.'
					'"Want to see me do it in the ass, too?" You offer.'

					if izvratH = 0:
						husband += 1
						husbizvradd += 1
						'"No, I think this is enough." He says, sits down on a chair and begins to watch. You continue to satisfy yourself rapidly and soon finish in front of her husband.'
						'<<$husName>> stands up and begins to applaud "Bravo, encore?" he laughs.'
						'"For such a lovely audience, anything, but first an intermission." You laugh. <<$husName>> helps you down from the table.'
						pcs_horny = 0

						$orgasm_or = 'yes'
						gs 'arousal', 'end'
						gs 'stat'
						
						act 'Finish':gt 'bed', 'start'
					elseif izvratH = 1:
						husband += 1
						'"Well then, I think you better show me." he said.'
						'"As you wish." you said'

						act 'Show':
							cla
							*clr
							'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m22.jpg"></center>'
							'You pull the dildo out of your pussy and winking at your husband, insert it in your anus. <<$husName>> watches closely as you pump the dildo in and out of your ass.'
							'You see how his pants swell. "Anything else you want, dear?" you ask, smiling.'
							'"I don''t just want something, I''ll do somthing." He says, unbuttoning his pants and brings his cock to your mouth.'

							act 'Suck him':
								cla
								*clr
								'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m24.jpg"></center>'
								'You take his flaccid penis in your mouth and start sucking, while you continue to drive the dildo into your ass.'
								'When his cock has finally hardened, <<$husName>> stops you. "Now I''ll take this hole."'

								gs 'arousal', 'masturbate', 10
								gs 'arousal', 'bj', 10
								minut -= 10
								gs 'stat'
						
								act 'Substitute ass':
									picrand = 89
									gt 'sex', 'anal'
								end
							end
						end
					elseif harakHusb = 2:
						'"Itchy hole?" he asks.'
						'"I''m sorry dear, but I really need it, and you''ve been busy." You reply, without stopping.'

						if izvratH = 0:
							husband += 1
							husbizvradd += 1
							'"You should have said something, now open your mouth." He says pulling out his cock and forcefully pushes it into your mouth.'
							'He holds you by the hair and fucks your mouth, telling you not to stop masturbating. Soon he tires of your mouth, "Now enough of this rubber shit, I''m going to fuck you."'

							gs 'arousal', 'masturbate', 10
							gs 'arousal', 'bj', 10
							minut -= 10
							gs 'stat'
								
							act 'Spread her legs ':
								picrand = 89
								gt 'sex', 'vag'
							end
						elseif izvratH = 1:
							husband += 1
							'"You''re going to insert this stupid toy in your pussy, ass and mouth, You''ll pulverise them, for as long as I like." He says, sitting down to watch.'
							'Submissively, you quickly use the dildo to fuck your pussy, ass and mouth.'
							
							gs 'arousal', 'masturbate', 10
							gs 'stat'

							act 'Offer mouth':
								cla
								*clr
								'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m24.jpg"></center>'
								'Still using the dildo on your pussy and ass, you offer <<$husName>> your mouth. He gets up and walks over to you.'
								'You take his flaccid penis and start sucking, until his cock is finally hard. <<$husName>> stops you, "Now I''ll fuck your ass."'

								gs 'arousal', 'bj', 10
								gs 'stat'
								
								act 'Offer your ass':
									picrand = 89
									gt 'sex', 'anal'
								end
							end
						end
					end
				end
			else
				'<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
				$orgasm_or = 'custom'
				$orgasm_txt = 'You stick the dildo to the floor and plant your wet pussy on it, bouncing up and down on the artificial cock, you quickly feel the excitement and orgasm.'

				act 'Breathe':gt 'bed', 'start'
			end
		elseif week > 5 or week < 6 and hour > 16:
			'You feel the need for somthing inside you and think that your husband would be a better option.'
		else
			gt 'selfplay', 'start'
		end
	else
		gt 'selfplay', 'start'
	end
end

if $ARGS[0] = 'fin':
	cla
	menu_off = 1
	if housrA = 1:
		gt 'bedr'
	end

	if houseob = 1:
		gt 'obroom','start'
	end

	if tanhouse1 = 1:
		gt 'tanspalnya'
	end
end

if $ARGS[0] = 'rab':
	cla
	*clr
	menu_off = 1
	minut += 120
	houserabday = daystart
	'<center><img <<$set_imgh>> src="images/characters/city/nicholas/sex/r0.jpg"></center>'
	'Once you get into bed your mistress comes into the room. "What, my bitch is going to sleep?" She snaps from the doorway.'
	'"Yes." You reply.'
	'"Yes, who?" She continues.'
	'"Yes, mistress." You reply and sit on the bed, she is drunk and barely able to stand on her feet. She is drinking wine from the bottle and spilling quite a bit of it.'
	'"That''s better, but today you have to be punished." She lifts up her skirt and out pops the strap-on. "Suck it." She commands.'

	act 'Suck it':
		cla
		*clr

		if analplugIN = 1:analplugIN = 0
		if pcs_makeup ! 1:pcs_makeup = 0

		'<center><img <<$set_imgh>> src="images/characters/city/nicholas/sex/r1.jpg"></center>'
		'You take the strap-on in your mouth and start sucking her off. You dislike the taste of rubber and proceed without much enthusiasm. Mistress, though she''s drunk, notices that you''re not trying and starts to thrust along with your movements, driving it deeper into your mouth. You start gagging and don''t like it.'
		'"Oh damn stubborn bitch, lay down on the bed quickly." With these words, she forcefully pushes you on the bed.'

		gs 'arousal', 'bj', 5, 'sub', 'lesbian'
		gs 'stat'
		
		act 'Lie':
			cla
			*clr
			'<center><img <<$set_imgh>> src="images/characters/city/nicholas/sex/r2.jpg"></center>'
			'You lay on the bed and she climbs on top of you and kneels over your face. She makes you open your mouth and forcefully shoves the strap-on in. You try to pull away, but it''s useless, her hands hold your head firmly. She continues to violate your mouth, hardly allowing you to catch a breath of air while she thrust it deeper and deeper. Eventually starting to slip down your throat, cutting off your breath completely. When you''re starting to lose consciousness she takes it out of your throat allowing you to roll onto your side, wheezing sniffling.'
			'"And now for the punishment, get up bitch." she says. "And what was that just now then?" You think, but you don''t dare to utter that thought.'

			gs 'arousal', 'bj', 5, 'sub', 'lesbian', 'rough'
			gs 'stat'
		
			act 'Rise in a pose':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/characters/city/nicholas/sex/r3.jpg"></center>'
				'You get up on all fours on the bed. "But it''s too wet." Says your mistress, and wipes your saliva on your ass with the strap-on, "You need to be punishes, not pleasured. Spread your ass."'
				'Realizing that you will get it up the ass, you reach back with your hands and try to relax your ass. But you don''t succeed before the pain pierces your body when she forces the strap-on into your anus and not giving your ass the time to get used to it, starts fucking you at a crazy pace. You let go of your buttocks and seize the blankets with your hands and teeth. Tears pour from your eyes, you whine, but she still continues. Finally, a little tired she lowers the tempo and asks, "Well, does it hurt?"'
				'"Yes ma''am, it hurts a lot." You gasp through your tears.'
				'"Well, let''s see how this feels." She says, and begins pouring wine from her bottle onto the strap-on and your ass.'
				'"Thank you, mistress." You say while she starts gaining momentum again. At first, it gets a little easier, but then stream of wine stops and it starts to dry on your skin. It hurts so much that you start screaming from the pain. "Why hasn''t anyone come in and stopped her." You think, because your screams have been so loud they could have been heard not only inside the apartment, but also in the hallway. But no one came, neither Tanya nor Nicholas. Finally she tires out, removes the strap-on out and walks out of the room without saying a word. You collapse on the bed and whine, your ass is on fire and you''re afraid to even move. After spending an hour so you fall asleep.'

				gs 'arousal', 'anal_strap', 5, 'sub', 'lesbian', 'rough'
				gs 'arousal', 'end'
				gs 'stat'
		
				act 'Sleep':gt 'bed2'
			end
		end
	end

	if pcs_dom > 20:
		act 'Refuse':
			cla
			*clr
			pcs_dom += 1
			lesbian += 1
			orgasm += 1
			houserab = 2
			'<center><img <<$set_imgh>> src="images/characters/city/nicholas/sex/r4.jpg"></center>'
			'"No." You reply.'
			'"You <<$pcs_nickname>> <<$pcs_lastname>>, will suck now or things will get very bad for you." She asserts.'
			'"No." You answer again.'
			'"All right, you asked for it." She screams and swings a fist, trying to hit you. You easily dodge the punch and kick her in the stomach.'
			'"Bitch." She moans, doubling over. You have suffered enough, you jump out of bed and grabbing her head in your hands, knee her in the face.'
			'She flies into the corner, but you don''t calm down. Remembering the taste of her dirty boots and sneakers you go up to her and start to push a sneaker into her mouth.'
			'When you can''t shove it in any further, you throw away the sneaker, grab her hair, yank her off the floor and throw her on to the bed.'
			'Now lying on the bed covering her face with her hands. You jump on the bed, straddling her face and push your pussy against her mouth. "Eat me, bitch." You yell, as she tries to push you away.'
			'It''s no good, you have her head tight between your thighs. You continue yelling and she starts licking. You feel her tongue on your pussy and start moving your hips, grinding on her face and increasing the pace.'
			'Soon you get excited. She does not resist and sticks her tongue out and tries to stick it in your pussy. You start enjoying her submissive nature and you get more excited thinking about your dominant actions.'
			'You have even begun to think about something to do with her strap-on and enjoying this thought, you orgasm. You wipe your crotch in her face and finish. When you finally get off her, her whole face is covered in your juices.'
			'She quietly gets out of bed, straightens her clothes and leaves the room, "Animal." She obviously won''t forget, from now on you should be careful, who knows what she will do.'

			$orgasm_or = 'yes'
			gs 'arousal', 'cuni', 20, 'dom', 'rough'
			gs 'arousal', 'end'
			gs 'stat'
			
			act 'Breathe':gt 'bed', 'start'
		end
	end
end

if $ARGS[0] = 'vor':
	cla
	*clr
	menu_off = 1
	if sobaka = 1:
		if dog_bravery = 0:
			dog_bravery = rand(1, 100)
		end

		if dog_bravery >= 50:
			minut += 10
			'You are lying in bed when suddenly there''s a ruckus in the hallway. You get up to check it out and as you arrive you see <<$namesob>> chase two masked men outside. You can hear loud swearing as they run down the stairs.'
			'You call your dog''s name and he comes back from the stairway looking calm. His owner is safe, everything is right in the world.'

			act 'Hug him':
				cla
				'You kneel down and hug <<$namesob>>, your heart pounding at the thought of what could have happened if he wasn''t here.'

				act 'Check the lock':
					cla
					'You check the lock on the door and it appears to be intact. You''re not sure if you forgot to lock the door when you came in or if the lock was picked. Maybe you should have a second one installed.'
					act 'Lock the door': gt 'korr'
				end
			end

			act 'Check the lock':
				cla
				'You check the lock on the door and it appears to be intact. You''re not sure if you forgot to lock the door when you came in or if the lock was picked. Maybe you should have a second one installed.'
				act 'Lock the door': gt 'korr'
			end
		else
			'You are lying in bed when you hear sounds from the hallway. You decide to get up and as you get to the door you see two masked men.'
			'Your dog <<$namesob>> is shivering in the corner.'
			act 'Scream': gt 'bed', 'vor2'
		end
	else
		'You are lying in bed when you hear sounds from the hallway. You decide to get up and as you get to the door you see two masked men.'
		act 'Scream': gt 'bed', 'vor2'
	end
end

if $ARGS[0] = 'vor2':
	menu_off = 1
	minut += 60
	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/g0.jpg"></center>'

	'You don''t even have time to open your mouth to scream, when a knife is at your throat. "Scream and I''ll cut you, bitch." Croaks one of them.'
	'They tie your hands and one goes to search your apartment, while the second guards you. He sits down and studies you, then begins running his knife across your body.'
	'"You scared?" He asks, and thinking that it is better to keep silent, you say nothing and look at the floor. "So you are scared." he grins.'
	'Then he begins to feel you up, you try to pull away, but the knife is back at your throat, "Sit still bitch, or the knife might slip, fatally." he croaks, and continues feeling you up.'
	'Finally, the other intruder returns. "Time we got out of here." He says.'
	'"Unless we give this juicy little morsel a treat." He sits next to you'

	if pcs_apprnc >= 120:
		guy += 2
		rape += 1
		'"Hey, sweet cheeks, something tells me you like to fuck." Says the first.'

		act 'Plead':
			cla
			*clr
			'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/g1.jpg"></center>'
			'You are struck with fear. "Well whore, kneel down and open your mouth, if we so much as feel a tooth, I''ll cut your throat from ear to ear" says the second one pulling his cock out.'
			'You begin pleading with them not to touch you, but they just push you to your knees. He jabs his member against your lips. You reluctantly open your mouth and then his cock is in your mouth.'
			'His hands clench your head and he begins to fuck your face. Suddenly there''s a second cock by your mouth, and they try to shove both into your mouth, then they look at each other and it seems they aren''t down with their cocks touching.'
			'In fact it appears that only you are up for this type of treatment, so they go back to the first option and proceeded to rape your mouth one by one. All the time doing and saying everything they can think of to evoke disgust in you.'
			'After the first couple of minutes you are surprised to notice that their hands are no longer on your head and you are actively bobbing your head and working your tongue.'
			'"Get her on all fours." Commands one of them.'

			gs 'arousal', 'bj', 15, 'rough', 'sub', 'group', 'bound'
			gs 'stat'
			
			act 'Up':
				cla
				*clr
				picrand = 38
				orgasm += 1
				gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
				$boy[0] = $npclastgenerated
				$boydesc[0] = $npc_usedname[$npclastgenerated]
				gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
				$boy[1] = $npclastgenerated
				$boydesc[1] = $npc_usedname[$npclastgenerated]
				'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sex/g2.jpg"></center>'
				'You stand up and bend over, one of them stands behind you and stuffs his dick into your pussy. "Yes, it''s dripping wet, this bitch was just waiting for some cock." He says.'
				'"Open your mouth." Growls the second guy inserting his dick into your mouth. They proceeded to rape you from both sides, you are overwhelmed with desire while being spit-roasted with your hands tied behind your back by two strangers.'
				'You diligently fuck the one while sucking the others dick, when suddenly your eyes glaze, your body pleasantly shivers and you shake in orgasm. The one fucking your mouth pulls out. "What''s wrong with this bitch, is she epileptic?" He cries.'
				'"You idiot, I told her to please us, and this bitch came." Says the second. They untie your hands and get off you. "Let''s see what she can do with her hands free." says one of them.'

				$orgasm_or = 'yes'
				gs 'arousal', 'bj', 15, 'rough', 'sub', 'group', 'bound'
				gs 'arousal', 'vaginal', 15, 'rough', 'sub', 'group', 'bound'
				minut -= 15
				gs 'stat'
			
				act 'Continue':xgt 'sexdvoe', 'var'
			end
		end
	elseif pcs_apprnc < 120:
		'"Do as I tell you." Replies the first. "And gag her." He adds. The second one doesn''t argue and takes some of your clothes and stuffs them in your mouth. "If you try to leave in the next half an hour you''re dead." Says the first intruder, and they leave.'
		'You don''t wait half an hour before you start trying to break free, fortunately they really didn''t know how to tie a knot and soon you''re free.'

		act 'Assess the damage':gt 'bed', 'vorend'
	end
end

if $ARGS[0] = 'vorend':
	cla
	*clr
	menu_off = 1
	if remsitr = 0:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sitr.jpg"></center>'
	if remsitr = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sitr2.jpg"></center>'

	'Relieved that it''s over, you check your apartment to see what''s missing.'

	if stolmoney > 0:
		'They took <<stolmoney>> <b>₽</b> from your living room table.'
		stolmoney = 0
	end

	if money > 0:
		'They took the <<money>> <b>₽</b> that you had on you.'
		money = 0
	end

	if komp = 1:
		'They took your computer.'
		komp = 0
	end

	gs 'stat'
	act 'Finish':gt 'sitr'
end

--- bed ---------------------------------

