glife/locations/natbelapt.qsrc

# natbelapt

!! Natasha - Lily Collins, trying to use Holly Michaels for as much of the sex scenes as I can

!! Natasha''s mother - India Summer

!NatashaLoc tells us where Natasha is located
!----------------------------------------------
!NatashaLoc = 0 (Natasha not home)
!NatashaLoc = 1 (Natasha in the hallway)
!NatashaLoc = 2 (Natasha in her room)
!NatashaLoc = 3 (Natasha in the kitchen)
!NatashaLoc = 4 (Natasha in the livingroom)
!NatashaLoc = 5 (Natasha in her mother''s room)
!NatashaLoc = 6 (Natasha in the bathroom)
!NatashaLoc = 7 (Natasha in the laundry room)
!---------------------------------------------

!!{ Natasha Quest Line
NatbelQW['QWstage'] = 0:
NatbelQW['QWstage'] = 1: You can study with Natasha after school.
NatbelQW['QWstage'] = 2: Natasha borrowed money for the first time.
NatbelQW['QWstage'] = 3: You made Natasha do your homework to repay you.
NatbelQW['QWstage'] = 4: You made Natasha carry your books in the morning. - Requires the event to be called from Sveta''s home
NatbelQW['QWstage'] = 5: You made Natasha lick your feet.
NatbelQW['QWstage'] = 6: You spat in Natasha''s mouth.
NatbelQW['QWstage'] = 7: You made Natasha lick your pussy.
NatbelQW['QWstage'] = 8: You made Natasha fuck your brother.
NatbelQW['QWstage'] = 9: You made Natasha fuck Olu.
NatbelQW['QWstage'] = 10: You made Natasha use a cucumber.
NatbelQW['QWstage'] = 11: You made Natasha help you seduce Julia.
NatbelQW['QWstage'] = 12: You made Natasha fuck you and Julia. - Enables from talking with Julia about Natasha''s habit of borrowing money
NatbelQW['QWstage'] = 13: You gave Natasha some money to buy something nicer to wear. - Not implemented yet
NatbelQW['QWstage'] = 14: You made Natasha show what she bought with your money. - Not implemented yet
NatbelQW['QWstage'] = 15: You told Natasha that you want to take her to the disco. - Not implemented yet
}

!!this is the text and chances anyone is at Natasha''s apartment.
if $ARGS[0] = 'home':
	$menu_loc = 'natbelapt'
	$menu_arg = 'home'
	menu_off = 0
	$track_loop = ''
	CLOSE ALL
	if sound = 0:PLAY 'sound/korr.mp3',30
	$metkaM = $ARGS[0]
	$locM = $CURLOC
	$metka = $ARGS[0]
	$loc = $CURLOC
	$location_type = 'private'
	clr
	popolaini = 0
	saunaYouRoom = 0
	boycherdaksex = 0
	minut += 1
	bonusZ = 0
	gs 'stat'
	gs 'themes', 'indoors'

	if NatashaHomeDay ! daystart:
		NatashaHomeDay = daystart
		NatashaLoc = 0
	end

	!Natasha''s pregnancy status
	if NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > (280 + rand(-2,2)):
		!!baby born
		NatbelQW['babycount'] += 1
		NatbelQW['pregday'] = 0
	end

	! Natasha location
	NatashaShower = 0
	NatashaLoc = rand(0,7)
	if NatashaLoc = 0:
		$NatashaLocMsg = 'Natasha isn''t home right now.'
	elseif NatashaLoc = 1:
		$NatashaLocMsg = 'Oh, here''s Natasha. I''ll leave you two to it.'
	elseif NatashaLoc = 2:
		$NatashaLocMsg = 'Natasha is in her room. You know the way.'
	elseif NatashaLoc = 3:
		$NatashaLocMsg = 'Natasha is in the kitchen. You know the way.'
	elseif NatashaLoc = 4:
		$NatashaLocMsg = 'Natasha is in the living room. You know the way.'
	elseif NatashaLoc = 5:
		$NatashaLocMsg = 'Natasha was in her room just a little while ago. You''ll have to go and look for her.'
	elseif NatashaLoc = 6:
		NatashaShower = 1
		$NatashaLocMsg = 'Natasha is busy taking a shower at the moment. You can wait in her room or come sit with me in the living room if you''d like.'
	elseif NatashaLoc = 7:
		$NatashaLocMsg = 'Natasha is doing some laundry. You know the way.'
	end

	!!Check if Natasha''s mother isn''t at work
	gs 'natbelEv', 'natmomhome'

	! Random to check who opens the door: 0 = Natasha, 1 = Mother
	if NatbelQW['MotherHome'] = 1:
		NatbelQW['MotherDoor'] = rand(0,1)
	else
		NatbelQW['MotherDoor'] = 0
	end

	! If Natasha is in the shower her mom will open the door
	if (NatashaLoc = 6 or NatashaLoc = 7) and NatbelQW['MotherHome'] = 1: NatbelQW['MotherDoor'] = 1

	! Natasha''s mother''s state. If it''s 0 you get a random state.
	if NatbelQW['MotherState'] = 0:
		NatbelQW['MotherState'] = rand(1,6)
	elseif NatbelQW['MotherState'] = 1:
		$NatbelQW['MotherStateMsg'] = 'tired'
	elseif NatbelQW['MotherState'] = 2:
		$NatbelQW['MotherStateMsg'] = 'happy'
	elseif NatbelQW['MotherState'] = 3:
		$NatbelQW['MotherStateMsg'] = 'dressed to go out on a date'
	elseif NatbelQW['MotherState'] = 4:
		$NatbelQW['MotherStateMsg'] = 'drunk'
	elseif NatbelQW['MotherState'] = 5:
		$NatbelQW['MotherStateMsg'] = 'like something''s bothering her'
	elseif NatbelQW['MotherState'] = 6:
		$NatbelQW['MotherStateMsg'] = 'angry'
	end

	*clr & cla
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptdoor.jpg"></center>'
	'You walk up to the front door and knock.'
	if hour >= 22:
		'It''s too late in the day to visit Natasha.'
		act 'Move away from the door':gt 'pod_ezd', 'etaj_4'
	elseif hour < 8:
		'It''s too early in the day to visit Natasha.'
		act 'Move away from the door':gt 'pod_ezd', 'etaj_4'
	elseif ((hour >= 15 and hour < 21) or (week > 5 and hour >= 10 and hour < 21)) and NatbelQW['MotherDoor'] = 0 and NatashaLoc > 0 and NatashaLoc < 6:
		*clr & cla
		if NatbelQW['pregday'] = 0 or (NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) <= 90):
			'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big16.jpg"></center>'
		elseif NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday']) < 200:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/16(2).jpg" width="356"></center>'
		elseif NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) >= 200:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/16(3).jpg" width="356"></center>'
		end
		'You stand outside the Belova household, knocking on the door. After a few moments, Natasha opens the door.'
		if NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday']) < 200:
			'Looking at Natasha, her pregnant belly is starting to show. You have a strong suspicion that she carries your niece or nephew.'
		elseif NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) >= 200:
			'Looking at Natasha, it is clear that she is pregnant. You have a strong suspicion that she carries your niece or nephew.'
		end
		if NatbelQW['QWstage'] > 10:
			'Natasha sees it''s you at the door, and she immediately lowers her head slightly, not quite looking you in the eye, but you notice she''s pleased to see you.'
			'"Oh, hi <<$pcs_nickname>>. Come in."'
		elseif NatbelQW['QWstage'] > 5:
			'Natasha sees it''s you at the door and you see her shoulders slump a little as she starts looking at your feet rather than at your face.'
			'"Oh, uhm, hi <<$pcs_nickname>>. Come in."'
		else
			'Natasha sees it''s you at the door and greets you with a warm hug.'
			'"Hi <<$pcs_nickname>>. Come in."'
		end
		NatashaLoc = 1
		act 'Go inside':gt'natbelapt', 'hallway'
		act 'Move away from the door':gt 'pod_ezd', 'etaj_4'
	elseif NatbelQW['MotherHome'] = 1 and NatbelQW['MotherDoor'] = 1:
		*clr & cla
		if NatbelQW['MotherState'] ! 3:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomcasual.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomdressedup.jpg"></center>'
		end
		'You stand outside the Belova household, knocking on the door. It takes quite a while before someone actually comes and in the end, it turns out to be Natasha''s mother.'
		if NatbelQW['MetMother'] = 0:
			NatbelQW['MetMother'] = 1
			'Her mother stands there for a second before she seems to notice you. She looks <<$NatbelQW[''MotherStateMsg'']>>.'
			'"Hi, I''m <<$pcs_nickname>>. I go to school with Natasha. Is she home?"'
			'"It''s nice to meet a friend of Natasha''s. I''m her mother <<$npc_firstname[''A191'']>>, but you can call me <<$npc_nickname[''A191'']>>."'
		else
			'Her mother stands there for a second before she seems to notice you. She looks <<$NatbelQW[''MotherStateMsg'']>>.'
		end
		if NatashaLoc ! 0:
			'"Well now don''t just stand there <<$pcs_nickname>>. Come on in!"'
			'"<<$NatashaLocMsg>>"'
			act 'Ask about her mood':gt 'natbelapt', 'ask_state'
			act 'Go inside.':gt'natbelapt', 'hallway'
			act 'Move away from the door':gt 'pod_ezd', 'etaj_4'
		else
			'"Hi <<$pcs_nickname>>."'
			'"<<$NatashaLocMsg>>"'
			act 'Move away from the door':gt 'pod_ezd', 'etaj_4'
		end
	else
		'You knock on the door several times, but no one answers. There is probably no one home at the moment.'
		act 'Move away from the door': gt 'pod_ezd', 'etaj_4'
	end
end

if $ARGS[0] = 'ask_state':
	menu_off = 1
	'As you step into the apartment, you strike up a brief conversation with <<$npc_nickname[''A191'']>>.'
	if NatbelQW['MotherState'] = 1:
		'"You look a bit under the weather today <<$npc_nickname[''A191'']>>. Are you feeling ok?"'
		'"I''ve had a migraine all day. I think I''ll go relax on the couch for now. Would you be a dear and keep the music down tonight?"'
		'"Of course, we''ll be careful not to disturb your rest."'
	elseif NatbelQW['MotherState'] = 2:
		'"You look cheerful today <<$npc_nickname[''A191'']>>."'
		'"Oh, it''s just a pleasant day today."'
	elseif NatbelQW['MotherState'] = 3:
		if rand(0,1) = 0:
			'"Wow, <<$npc_nickname[''A191'']>>. Did you dress up just for me? Or is there a lucky guy involved?" You say with a wink.'
			'"Thank you, <<$pcs_nickname>>. That''s the kind of reaction I''m hoping for." She says with a slight blush on her cheeks.'
		else
			'"Wow, <<$npc_nickname[''A191'']>>. That looks really good on you." You say after admiring her attire.'
			'"Thank you <<$pcs_nickname>>. That''s the kind of reaction I''m hoping for."'
		end
	elseif NatbelQW['MotherState'] = 4:
		!if pcs_dom > 10:
			'"Wow, <<$npc_nickname[''A191'']>>. Did you just come from a party? Or is the party in here?" You say with a wink.'
			'"Well <<$pcs_nickname>>, just between you and me, sometimes a girl can use a drink."'
		!else
		!	'You don''t feel confident enough to ask her why she looks drunk.'
		!end
	elseif NatbelQW['MotherState'] = 5:
		'"<<$npc_nickname[''A191'']>>... You uhm... you look a bit upset, is something wrong?"'
		if NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90:
			'"Natasha''s been acting a bit strange lately." She suddenly looks at you intently. "Y-You''d tell me if something important is going on right?"'
		else
			'"Just one of those days <<$pcs_nickname>>. Just go on and hang out with Natasha. I''ll be fine."'
		end
	elseif NatbelQW['MotherState'] = 6:
		'"<<$npc_nickname[''A191'']>>... You uhm... don''t look very pleased to see me. Did I... Is it something I did?"'
		if NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 120:
			'"Well <<$pcs_nickname>>, I''m still trying to adjust to the fact that my daughter is pregnant. Excuse me if I haven''t embraced that little fact yet."'
			if func('body_din','pregnancyVisibility') = 1:
				'"I don''t know what you girls were thinking. The least you could have done was use protection. Getting pregnant when you''re <<age>>, you''re not ready to raise a baby!" She says angrily, looking at your obviously swollen belly.'
				'You lower your head at the accusation in her tone and mumble "S-Sorry..." as you pass by her into the hallway.'
			else
				'"I-I''m sure Natasha is smart enough to do what''s right for the baby. She''s so kind and smart, she''ll definitely make a good mother."'
				'<<$npc_nickname[''A191'']>> lowers her head and looks away from you as you pass by her into the hallway.'
			end
		else
			'"Oh no, <<$pcs_nickname>>. It''s about work. Nothing for you to worry about."'
		end
	end
	act 'Continue': gt 'natbelapt', 'hallway'
end

! Use this to leave the apartment. It will reset the state of Natasha''s mother depending on NatbelQW['MotherStateKeep'].
if $ARGS[0] = 'leave_apartment':
	!NatbelQW['MotherState'] set to default so next time you visit it is random again.
	if NatbelQW['MotherStateKeep'] = 0: NatbelQW['MotherState'] = 0
	NatbelQW['NoTV'] = 0
	NatbelQW['momrobe'] = 0
	NatbelQW['seethroughkitchen'] = 0
	gt 'pod_ezd', 'etaj_4'
end

if $ARGS[0] = 'hallway':
	$menu_loc = 'natbelapt'
	$menu_arg = 'hallway'
	menu_off = 0
	killvar '$locclass'
	CLOSE ALL
	if sound = 0:PLAY 'sound/korr.mp3',30
	$location_type = 'indoors'
	*clr & cla
	minut += 1
	gs 'natbelEv', 'natmomhome'
	gs 'stat'
	'<center><h4><font color="maroon">Entrance hall</font></h4></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/hallway.jpg"></center>'
	if NatbelQW['FirstVisit'] = 0:
		NatbelQW['FirstVisit'] = 1
		'As you enter the Belova''s hallway, you notice it looks very "Spartan". Their walls are bare aside from a single picture of Natasha as a baby in her mother''s arms. The smile on her face seems to light up the room all by itself.'
	else
		'This is the entrance hall of Natasha''s apartment, with it''s now familiar picture of Natasha as a baby in her mother''s arms.'
	end

	if NatashaLoc = 6:
		act '<b>Leave Natasha''s apartment</b>': gt 'natbelapt', 'leave_apartment'
		act 'Living Room': gt 'natbelapt', 'livingroom'
		act 'Kitchen': gt 'natbelapt', 'kitchen'
		act 'Mother''s Room': gt 'natbelapt', 'natmother'
		act 'Natasha''s Room': gt 'natbelapt', 'natroom'
		if hour => 18 and NatbelQW['vaginal'] > 0 and NatbelQW['KolkaSex'] > 20 and rand(1,4+(NatbelQW['KolkaSex']/20)) <= NatbelQW['KolkaSex']/20:
		  act 'Go spy on Natasha': gt 'natkolEv', 'showerspy'
		else
		  act 'Go spy on Natasha': gt 'natbelEv', 'showerspy'
		end
	elseif NatashaLoc ! 1:
		act '<b>Leave Natasha''s apartment</b>': gt 'natbelapt', 'leave_apartment'
		act 'Living Room': gt 'natbelapt', 'livingroom'
		act 'Kitchen': gt 'natbelapt', 'kitchen'
		act 'Mother''s Room': gt 'natbelapt', 'natmother'
		act 'Natasha''s Room': gt 'natbelapt', 'natroom'
		act 'Bathroom': gt 'natbelapt', 'bathroom'
		if NatashaLoc = 7: act 'Laundry Room': gt 'natbelEv', 'laundry'
	else
		'Natasha is standing next to you, looking at you expectantly. "What''s up, <<$pcs_nickname>>?"'
		act '<b>Leave Natasha''s apartment</b>': gt 'natbelapt', 'leave_apartment'
		act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		act 'Let''s go to the living room': NatashaLoc = 4 & gt 'natbelapt', 'livingroom'
	end
end

if $ARGS[0] = 'bathroom':
	CLOSE ALL
	$menu_loc = 'natbelapt'
	$menu_arg = 'bathroom'
	$metka = 'bathroom'
	$loc = 'natbelapt'
	$metkaM = 'bathroom'
	$locM = 'natbelapt'
	menu_off = 0
	*clr & cla
	minut += 1
	gs 'stat'
	$location_type = 'bathroom'
	'<center><h4><font color="maroon">Bathroom</font></h4></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/bathroom.jpg"></center>'
	'The bathroom is kept spotlessly clean. Everything here has a well cared for look to it.'
	'The toilet sits along the wall next to a small bathtub.'
	'You can do your hair and makeup in the <a href="exec:gt ''mirror'', ''start''">mirror</a> above the sink.'
	*nl
	if pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG + pirsGL > 0: '<a href="exec:dynamic $pirManage">Manage Piercings</a>'
	act 'Leave the bathroom': gt 'natbelapt','hallway'
	act 'Take a shower':
		*clr & cla
		menu_off = 1
		minut += 10
		noShampoo = 1
		dynamic $showerdin
		gs 'stat'
		
		! Randomized shower event
		if NatbelQW['MotherHome'] = 1 and rand(0,4) = 0:
			gt 'natbelapt', 'showerevent1'
		else
			'<center><h4><font color="maroon">Bathroom</font></h4></center>'
			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
			'You take a quick shower.'
			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
			act 'Take a selfie': gs 'telefon', 'Phone_selfie_image_bathing', 'shower'
			act 'Get out of the shower': gt 'natbelapt','bathroom'
		end
	end
	dynamic $bath
	dynamic $bteeth
	dynamic $tampon
	dynamic $basin
	gs 'din_van', 'prvt_pee'
end

if $ARGS[0] = 'showerevent1':
	menu_off = 1
	inhib_exp += 1
	'Despite the pattering noise of the running water, you hear the bathroom door open and look over to see <<$npc_nickname[''A191'']>> walking into the bathroom.'
	'"Sorry dear, you didn''t answer my knock, and I have to go."'
	if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
	act 'Let her':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/shower01.jpg"></center>'
		'You angle your body away from the door as you say: "Oh it''s no problem <<$npc_nickname[''A191'']>>. It''s your home."'
		'You get back to showering with your back turned to <<$npc_nickname[''A191'']>> as you hear her pee. You feel a bit awkward while you listen to her urinate, flush, and then wash her hands before finally the door clicks shut again.'
		act 'Get out of the shower': gt 'natbelapt','bathroom'
	end
	if pcs_inhib >= 50:
		act 'Tease her a bit':
			*clr & cla
			inhib_exp += 3
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/shower02.jpg"></center>'
			'Looking straight at her you give her a smile, then put your leg up, giving her the perfect view of the front of your wet, naked body. "<<$npc_nickname[''A191'']>>", you begin immediately, "I wanted a woman''s opinion on this. Do you think my breasts are big enough?"'
			'<<$npc_nickname[''A191'']>> looks at your exposed body for a few seconds with a slight blush on her cheeks.'
			'"<<$pcs_nickname>>, there''s nothing wrong with the size of your breasts."'
			'You get back to showering making sure to pay special attention to your breasts. <<$npc_nickname[''A191'']>> sits down on the toilet, and you can hear the sound of her peeing. You get turned on a bit, taking glances at her. Finally, she gets up, flushes and washes her hands before leaving you alone again in the bathroom.'
			gs 'arousal', 'flash', 2
			gs 'arousal', 'voyeur', 3
			gs 'arousal', 'end'
			gs 'stat'
			act 'Get out of the shower': gt 'natbelapt', 'bathroom'
		end
	end
end

if $ARGS[0] = 'natroom':
	$menu_loc = 'natbelapt'
	$menu_arg = 'natroom'
	menu_off = 0
	$locclass = 'bedr'
	CLOSE ALL
	$track_loop = ''
	music_loop = 1
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'

	act 'Leave Natasha''s room': gt 'natbelapt', 'hallway'

	if hour <= 6 or hour >= 23:
		NatashaLoc = 2
		*clr & cla
		'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
		if month < 4 or month > 9:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natsleep5.jpg"></center>'
			'You look into the room and see that Natasha is sleeping snug under her covers. Not wanting to disturb her you close the door and leave.'
		else
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natsleep<<rand(1,4)>>.jpg"></center>'
			'You look into the room and see that Natasha is sleeping soundly on her bed. Not wanting to disturb her you close the door and leave.'
		end
		gs 'arousal', 'voyeur', 2
		gs 'arousal', 'end'
		gs 'stat'
		act 'Leave':gt 'natbelapt','hallway'
	elseif NatbelQW['seethroughwearing'] = 1 and natstayroom = 0:
		NatashaLoc = 2
		if NatbelQW['seethroughworn'] < 5:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/seethrough01.jpg"></center>'
			'When you get back to Natasha''s room, you see she''s under her blankets reading a book.'
			gs 'arousal', 'voyeur', 3
			gs 'arousal', 'end'
			gs 'stat'
		else
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/seethrough02.jpg"></center>'
			'When you get back to Natasha''s room, you see she''s on her bed reading a book.'
			act 'Move closer':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/seethrough03.jpg"></center>'
				'It doesn''t look like she''s noticed you coming in, so you move over to the bed and lay your hand on her ass.'
				'The moment your hand touches her skin she lets out a yelp and rolls over to see who it is.'
				'"Jesus <<$pcs_nickname>> you nearly gave me a heart attack. For a second I thought my mom walked in."'
				'You enjoy looking at her breasts through the thin fabric as she needs a moment to calm down.'
				gs 'arousal', 'voyeur', 3
				gs 'arousal', 'end'
				gs 'stat'
				natstayroom = 1
				act 'Continue': gt 'natbelapt', 'natroom'
			end
		end
	elseif NatbelQW['seethroughwearing'] = 1 and natstayroom = 1:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/seethrough00.jpg"></center>'
		'Natasha is standing there in the lingerie you gave her, looking at you with interest.'
	!elseif naked:
	else
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natroom.jpg"></center>'
		'Natasha''s room looks very tidy. What it lacks in decorations is made up by how well she''s using her available space. On the right side, there''s a narrow bed in the corner with a bed stand next to it and a big closet for all of her clothes.'
		'On the left side, right behind the door is a small sofa, her desk and computer are in the back corner. Everything is cleaned and neatly organized.'
	end

	if NatashaLoc = 2 and hour > 6 and hour < 23:
		if NatbelQW['seethroughwearing'] = 0:
			'Natasha is sitting on the bed, looking at some fashion magazines.'

			act 'Let''s go to the living room':
				NatbelQW['NoTV'] = 1
				NatashaLoc = 4
				gt 'natbelapt', 'livingroom'
			end
		end

		act 'Talk with her': gt 'natbelapt', 'chat'

		if NatbelQW['pregday'] > 0 and daystart-NatbelQW['pregday'] > 90 and NatbelQW['askedbaby'] ! daystart:
			act 'Touch her belly':
				*clr & cla
				minut += 5
				NatbelQW['askedbaby'] = daystart
				gs 'npc_relationship', 'modify', 'A16', 'like'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/touch_belly'+iif(npc_pregtalk['A16'] = 1,'_preg','')+'.jpg"></center>'
				if daystart-NatbelQW['pregday'] < 120:
					'She looks at you with a strange smile.'
					'"Yes," she answers the question you didn''t voice, "your little brother has actually knocked me up. I hope you are happy with that because I can''t afford an abortion."'
					'Her tone is a lot less accusing than you''d expected. In fact, she seems... happy.'
					if npc_pregtalk['A16'] = 1: '"It''s really reassuring to know I won''t be going through this alone though," she says softly and gives you a hug.'
				elseif daystart-NatbelQW['pregday'] < 190:
					'"I felt the baby kick earlier today!" she says with a big smile on her face, "keep your hands there for a bit, maybe it''ll happen again."'
					if rand(0,20) = 0: 'About a minute later you do indeed feel a tiny kick from inside Natasha''s belly, making both of you jump a little.'
					if NatbelQW['KolkaSex'] > 20 and rand(0,2) = 1: 'With a beet-red face and a dreamy look in her eyes she adds "Don''t tell Kolka, but every time we have our little... fun... it gets really active in there."'
					*nl
					if npc_pregtalk['A16'] = 1:
						'A few moments later she asks "What about yours, felt anything yet?"'
						if pregtime < 120:
							'"I don''t think so," you respond, slightly sad about the fact for some reason.'
							'Natasha quickly picks up on that and tries to cheer you up "Don''t worry, you''re just not far along yet. It''ll make you so happy when it happens for the first time, you''ll see!"'
						elseif pregtime < 190:
							'"Yep, I feel it kicking in the morning sometimes," which prompts Natasha to start rubbing your belly too.'
						else
							'"Oh yeah, it''s gotten quite lively in there lately," which prompts Natasha to start rubbing your belly too.'
							if rand(0,7) = 0:
								dynamic $d_pregmovement
								'"As if on queue..." you happily muse aloud.'
								if $wombthfath = 'Kolka': 'With a tinge of wonder Natasha mumbles "Your little brother makes some energetic children, doesn''t he?"'
							end
						end
					end
				else
					'"The baby''s really restless lately. Turned my belly button into an outie with all that kicking," she says jokingly, barely keeping back her giggling.'
					if rand(0,7) = 0: 'Natasha has barely finished her joke, before you feel a kick coming from within.<br>"There we go again, see?"'
					*nl
					if npc_pregtalk['A16'] = 1:
						'She puts her hands on your belly a moment later and asks "How is your pregnancy going <<$pcs_nickname>>?"'
						if pregtime < 120:
							'"Oh, you know... I keep getting morning sickness, but it''s not as bad as I read it would be. And luckily my belly doesn''t show much for now, '+iif(npc_pregtalk['A29'] = 1, 'so people at school haven''t noticed yet."', 'so my <<$npc_nickname[''A29'']>> hasn''t found out I''m pregnant yet. I really don''t know what I''ll do when she does though..."')
							'Natasha gives you a reassuring hug, telling you it''s all going to be alright and that she''s there for you.'
						elseif pregtime < 190:
							'"I feel the baby kicking in the morning sometimes," you say with a smile.'
						else
							'"Tell me about it, it''s like there''s a constant party going on in there."'
							if rand(0,7) = 0:
								dynamic $d_pregmovement
								'"As if on queue..." you happily muse aloud.'
								if $wombthfath = 'Kolka': 'You see Natasha blush slightly before she says with a wink "Just like their dad, huh?"'
							end
						end
					end
				end
				act 'Continue': gt 'natbelapt', 'natroom'
			end
		end

		if lernHome ! 0: act 'Study together': gs 'natbelapt', 'study_together'

		if NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] <= daystart:
			if NatbelQW['QWstage'] > 1 and lernHome ! 0: act 'Make her do your homework': gs 'natbelapt', 'make_her_do_homework'

			if NatbelQW['QWstage'] >= 5:
				gs 'willpower', 'humiliation', 'force', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Make her lick your feet (<<will_cost>> Willpower)':
						gs 'willpower', 'humiliation', 'force', 'easy'
						gs 'willpower', 'pay', 'force'
						gt 'natbelapt', 'lick_feet'
					end
				else
					act 'Make her lick your feet (<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 NatbelQW['QWstage'] >= 6:
				gs 'willpower', 'humiliation', 'force', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Spit in face (<<will_cost>> Willpower)':
						gs 'willpower', 'humiliation', 'force', 'easy'
						gs 'willpower', 'pay', 'force'
						gt 'natbelapt', 'spit_face'
					end
				else
					act 'Spit in face (<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 NatbelQW['QWstage'] >= 7:
				gs 'willpower', 'cuni', 'force', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Make her lick your pussy (<<will_cost>> Willpower)':
						gs 'willpower', 'cuni', 'force', 'easy'
						gs 'willpower', 'pay', 'force'
						gt 'natbelapt', 'lick_pussy'
					end
				else
					act 'Make her lick your pussy (<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 NatbelQW['QWstage'] >= 8 and hour >= 18 and hour < 21 and NatbelQW['KolkaFuckDay'] < daystart and NatbelQW['KolkaWantsNat'] = 1:
				gs 'willpower', 'sex', 'force', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Make her fuck Kolka (<<will_cost>> Willpower)':
						gs 'willpower', 'sex', 'force', 'easy'
						gs 'willpower', 'pay', 'force'
						gt 'natkolev', 'kolkabj'
					end
				else
					act 'Make her fuck Kolka (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end
			end
!! nutluck pulled this for now
			!if NatbelQW['QWstage'] > 9 and hour >= 17 and hour < 21 and NatbelQW['KolkaFuckDay'] < daystart and pcs_dom >=20 and strapon = 1 and JuliaNatSexProposed = 1:
			!	act 'Fuck her with Julia': gs 'natbelapt', 'Nat_Julia_3some'
			!end
			if NatbelQW['QWstage'] >= 9 and OluQW['sex'] = 1:
				gs 'willpower', 'anal', 'force', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Take her to see Olu (<<will_cost>> Willpower)':
						gs 'willpower', 'anal', 'force', 'easy'
						gs 'willpower', 'pay', 'force'
						gt 'natpimp', 'go_see_olu'
					end
				else
					act 'Take her to see Olu (<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 NatbelQW['QWstage'] >= 2 and NatbelQW['Debt'] > 0:
			*nl
			NatbelQW['DebtTimeLeft'] = NatbelQW['DebtDay'] - daystart
			if NatbelQW['DebtTimeLeft'] > 0:
				'Natasha has promised to pay you back in <<NatbelQW[''DebtTimeLeft'']>> day(s).'
			else
				'Natasha promised to pay you back by now, maybe you should talk to her about it.'
			end
		end
	elseif NatashaShower = 1 and NatashaLoc ! 2:
		*clr & cla
		menu_off = 1
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/nattowel1.jpg"></center>'
		'You sit down on Natasha''s bed while you wait for her to finish showering.'
		NatashaLoc = 2
		'After about five minutes Natasha enters the room wearing only a towel.'
		if NatbelQW['QWstage'] > 5:
			'With a sparkle in her eyes she says: "Oh, hi <<$pcs_nickname>>, I didn''t know you were coming over."'
			act 'Watch her get dressed':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natdressing2.jpg"></center>'
				if hotcat => 6:
					'Natasha drops the towel and heads over to the closet to grab some clothes. "What to wear?" She sighs as she rummages through the bottom of her closet. With her bare ass wiggling teasingly the entire time.'
					'When she''s decided on what to wear she steps in front of you and slowly starts putting her clothes on. Clearly trying to get a reaction out of you.'
				else
					'Natasha drops the towel and heads over to the closet to grab some clothes. "What to wear?" She sighs as she rummages through her closet. Which gives you a good view of her naked ass the entire time.'
					'When she''s decided on what to wear she gets dressed seeming not to care about you seeing her naked.'
				end
				gs 'arousal', 'voyeur', 5
				act 'Let her dress':
					gs 'arousal', 'end'
					gt 'natbelapt', 'natroom'
				end
				act 'Pull her on the bed':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex01.jpg"></center>'
					'When she''s almost done dressing, you grab her by the wrist and pull her onto the bed next to you. You grab her by the hair and keep a firm grip as you whisper in her ear: "Oh, you little tease. Is this what you wanted?"'
					'"Y-Yes." She gasps back. "From the moment I saw you sitting there I started imagining this."'
					'"Well then." You say in your most seductive voice. "Have you earned it?" As you teasingly lower your mouth to hers. You take your time, touching your lips together, then backing off slightly, pulling at her lower lip occasionally with your teeth before finally going in for a passionate kiss.'
					gs 'arousal', 'kiss', 5, 'dom', 'lesbian'
					gs 'stat'

					if NatbelQW['QWstage'] > 7:
						act 'Bare her breasts':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex02.jpg"></center>'
							'You let go of Natasha''s hair and roll on top of her. While she''s catching her breath from the steamy kissing, you pull down her top and start licking her nipple.'
							'"Oh <<$pcs_nickname>>... That feels... Oooh... So nice." She moans softly.'
							'You increase the intensity by taking hold of her nipple with your teeth and gently pulling. This makes her moan even louder, and in response, you feel yourself getting wetter and wetter.'
							gs 'arousal', 'foreplay', 5, 'lesbian'
							gs 'stat'
							act 'Get undressed':
								*clr & cla
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex03.jpg"></center>'
								'"I want to feel all of your skin, take your clothes off." You tell Natasha.'
								'Wanting your own lusts sated you pull your clothes off and lie back on the bed, opening your legs to give her easy access to your soaking pussy.'
								*nl
								'"Kiss me." You command in a breathless whisper. To which Natasha eagerly complies. She begins to kiss you passionately while one of her hands explores between your legs. You shiver every time her fingers run close to your pussy.'
								'Almost out of your mind with desire you grab her hand and firmly place it on your pussy. "No more teasing. I-I can''t take it anymore." You admit breathlessly, and you start rubbing her hand on your pussy. Once you feel convinced she won''t pull away, you let go of her hand and just lie back, enjoying the building fire within you.'
								*nl
								$orgasm_txt = '"F-Faster, I-I''m almost ..." You gasp out, to which Natasha starts building up the pace. Just as it seems she can''t go any faster the waves of pleasure crash down on you and you close your eyes letting the orgasm take up your whole world.'
								$orgasm_or = 'yes'
								'As you get back to yourself, Natasha is still leaning over you, now slowly sucking her fingers one by one. Licking your juices off.'
								gs 'arousal', 'vaginal_finger', 10, 'lesbian'
								gs 'stat'
								killvar '$orgasm_txt'
								act 'Give back':
									*clr & cla
									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex04.jpg"></center>'
									'Not wanting this to end just yet you roll her onto her back and spread her legs wide. Her pussy is soaking wet as well. "Your turn." You say, still out of breath.'
									'You start to dart your tongue around her pussy. Licking up the juices, slowly working your way towards her wet slit.'
									'"Please <<$pcs_nickname>>, I really need it." She begs in between her moans of pleasure. Hearing this you part her pussy lips with your hand and start licking her furiously, occasionally switching from sucking her clit to tongue fucking her pussy.'
									'The growing volume of her moans is rekindling the fire inside yourself. "A few touches and I might go over the edge again." You think to yourself.'
									gs 'arousal', 'cuni_give', 5, 'lesbian'
									gs 'stat'

									act 'Rub your pussy on hers':
										*clr & cla
										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex05.jpg"></center>'
										'You quickly get up from between her legs and straddle her, pressing your soaked pussies together, grinding them together quickly. Natasha grabs your breasts and starts moaning "Yes <<$pcs_nickname>>... Please... Pleaaaaaah."'
										$orgasm_txt = 'The feeling of her body writhing underneath yours as she orgasms sends you over the edge as well. You keep grinding for a few more seconds before you start bucking under the intensity of your own orgasm.'
										$orgasm_or = 'yes'
										gs 'arousal', 'trib', 5, 'lesbian'
										gs 'arousal', 'end'

										killvar '$orgasm_txt'
										'Finally you fall down on top of Natasha, exhausted.'
										if succubusflag = 1:
											scfeed = succublvl + rand(1,4)
											sexnutrition += 30 * scfeed
											succubxp += 6
										end

										gs 'stat'
										act 'Continue': gt 'natbelapt', 'natroom'
									end
								end
								act 'Eat me':
									*clr & cla
									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex06.jpg"></center>'
									'The only thing you can think of is your need for more as you push her head towards your soaking pussy. She obeys immediately and starts kissing all around your pussy and playing with your tits.'
									'Overcome with the need to feel her tongue on your pussy, you take her head in your hands and press her face down on your slit. A loud moan escapes your mouth as she starts lapping up your juices.'
									'She keeps one hand on your breast, softly pinching and pulling on your hard nipple as she starts focusing on sucking your engorged clit. You feel one of her fingers slip inside you again, adding even more pleasure.'
									gs 'arousal', 'cuni', 5, 'lesbian'
									gs 'stat'

									act 'Rub your pussy on hers':
										*clr & cla
										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbedroomsex05.jpg"></center>'
										'As you feel your orgasm near, you quickly get up from the bed and press Natasha down on her back, opening her legs wide. Her pussy is soaking wet as well. There are wet streaks on her inner thighs where her juices have been running down her legs.'
										'After a moment of teasing her with your fingers, you straddle her, pressing your pussies wetly together as you begin quickly grinding against her. Natasha grabs your breasts and starts moaning "Yes <<$pcs_nickname>>... Please... Pleaaaaaah."'
										$orgasm_txt = 'The feeling of her body writhing underneath yours as she orgasms sends you over the top as well. You keep grinding for a few more seconds before you start bucking under the intensity of your own orgasm.'
										$orgasm_or = 'yes'
										gs 'arousal', 'trib', 5, 'lesbian'

										killvar '$orgasm_txt'
										'Finally you fall down on top of Natasha, exhausted.'
										if succubusflag = 1:
											scfeed = succublvl + rand(1,4)
											sexnutrition += 30 * scfeed
											succubxp += 6
										end
										gs 'arousal', 'end'
										gs 'stat'
										act 'Continue': gt 'natbelapt', 'natroom'
									end
								end
							end
						end
					else
						'You lose track of time as you keep making out with Natasha. Finally, you let go of her hair and pull back from her, breathless for several moments.'
						act 'Continue': gt 'natbelapt', 'natroom'
					end
				end
			end
		else
			'With a startled look on her face she stammers "Oh, hi <<$pcs_nickname>>, I didn''t know you were coming over."'
			'Amused by her obvious discomfort you offer: "Should I wait in the hallway?"'
			'"N-No, it''s ok. It''s not all that different from in the girl''s locker rooms right?"'
			act 'Watch her get dressed':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natdressing1.jpg"></center>'
				'Natasha grabs some clean clothes out of her closet, drops the towel and quickly gets dressed.'
				gs 'arousal', 'voyeur', 5
				gs 'arousal', 'end'
				gs 'stat'
				act 'Continue': gt 'natbelapt', 'natroom'
			end
		end
	else
		cla
		'You poke around in Natasha''s room for a bit.'
		act 'Leave': gt 'natbelapt', 'hallway'
	end
end

if $ARGS[0] = 'study_together':
	*clr & cla
	menu_off = 1
	minut += 60
	gs 'npc_relationship', 'modify', 'A16', 'adore'
	lernHome = 0
	lern += rand(3, 6)
	intel_exp += rand(1, 2)
	if NatbelQW['QWstage'] = 0: NatbelQW['QWstage'] = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/study.jpg"></center>'
	'"Let''s do our homework." You tell Natasha as you start taking your things from your bag.'
	'"Sure, let me grab an extra chair from the kitchen." She says as you sit down at her desk and open your textbook.'
	'Moments later Natasha returns and places her chair next to yours before grabbing her own homework and sitting down next to you.'
	*nl
	'"Ok, let''s see..." She says as the two of you start on the first task.'
	'You spend the better part of an hour working through all of your homework. Occasionally explaining things to each other when one of you doesn''t understand something.'
	'Once you''ve finished, you''re confident you''ll get a good grade on your homework.'
	act 'Finish homework': gt 'natbelapt','natroom'
end

! Only if Natasha owes you money
if $ARGS[0] = 'make_her_do_homework':
	*clr & cla
	minut += 60
	menu_off = 1
	lernHome = 0
	NatbelQW['homework'] += 1
	if NatbelQW['homework'] = 3: NatbelQW['QWstage'] = 4
	if NatbelQW['QWstage'] = 2: NatbelQW['QWstage'] = 3
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/study.jpg"></center>'
	if NatbelQW['QWstage'] = 3:
		'"Well Natasha, since I won''t be seeing my money anytime soon I think it''s best for now if you repay me by doing my homework for me." You tell her in a threatening voice.'
	elseif NatbelQW['QWstage'] = 4:
		'"Well Natasha, on top of doing my homework for me, you''ll be carrying my books to school in the morning from now on." You tell her in a threatening voice.'
	end
	'Natasha sighs with a resigned look as she nods meekly and starts working on your homework as well as hers.'
	if NatbelQW['QWstage'] > 5:
		act 'Continue': gt 'natbelapt', 'hwundress'
	else
		'You relax on her bed and start daydreaming for a while.'
		'You are woken out of your daydream by Natasha saying: "It''s done <<$pcs_nickname>>."'
		'"Good, let me have a look at it."'
		act 'Take your finished homework': gt 'natbelapt', 'natroom'
	end
end

if $ARGS[0] = 'hwundress':
	*clr & cla
	menu_off = 1
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/study.jpg"></center>'
	'When you see that Natasha is working hard on your homework, you get up from your seat and lie down on her bed to relax.'
	gs 'willpower', 'exhib', 'force', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Tell her to strip (<<will_cost>> Willpower)':
			cla
			gs 'willpower', 'pay', 'force'
			NatbelQW['doingHW'] = 1
			'"You know, I''m not feeling properly entertained over here." You say, feeling a bit bored. "I think you should lose some clothes, so I have something to look at."'
			'"B-But what if my mom walks in?" Natasha asks in a trembling voice.'
			act 'You can keep your bra and panties on':
				*clr & cla
				minut += 20
				NatbelQW['underwear'] = 1
				NatbelQW['nakedHW'] += 1
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nakedhomework1.jpg"></center>'
				'"Fine, you can keep your bra and panties on, but the rest comes off." You say, clearly letting your disappointment show in your voice.'
				gs 'arousal', 'voyeur', 10
				gs 'arousal', 'end'
				gs 'stat'
				act 'Continue': gt 'natbelapt', 'undressedhw'
			end
			if NatbelQW['nakedHW'] > 3:
				act 'Strip down completely':
					*clr & cla
					minut += 20
					NatbelQW['nakedHW'] += 1
					NatbelQW['underwear'] = 0
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nakedhomework2.jpg"></center>'
					'"Then your mom will see you naked, this is what happens when you borrow money from people and can''t pay them back. You pay it back in other ways. Now do as you''re told and take off your clothes, all of your clothes."'
					'Natasha looks as if she wants to object but then hangs her head and begins to remove her clothing. Once she''s completely naked, she shyly walks over to her desk and sits down as she starts in on your homework. Though after a while you think she''s actually enjoying it.'
					gs 'arousal', 'voyeur', 10
					gs 'arousal', 'end'
					gs 'stat'
					act 'Continue': gt 'natbelapt', 'undressedhw'
				end
			end
		end
	else
		act 'Tell her to strip (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Just wait until she''s done':
		'You are woken out of your daydream by Natasha saying: "It''s done <<$pcs_nickname>>."'
		'"Good, let me have a look at it."'
		act 'Take your finished homework': gt 'natbelapt', 'natroom'
	end
end

if $ARGS[0] = 'undressedhw':
	act 'Enjoy looking at Natasha':
		*clr & cla
		menu_off = 1
		minut += 20
		if NatbelQW['underwear'] = 1:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nakedhomework1.jpg"></center>'
			'While you wait for Natasha to finish your homework, you idly play with your breasts, occasionally looking over at her near naked body.'
		else
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nakedhomework2.jpg"></center>'
			'"It can''t be very comfortable for her, but I sure don''t mind the show." You think to yourself as you start to play with your pussy while you watch her work.'
		end
		'After a while, Natasha gets up saying: "It''s done <<$pcs_nickname>>, can I please get dressed now?"'
		gs 'arousal', 'voyeur', 10
		gs 'arousal', 'foreplay', 10, 'lesbian'
		minut -= 10
		gs 'arousal', 'end'
		gs 'stat'
		act 'Continue': gt 'natbelapt', 'afterhomework'
	end
	act 'Taunt Natasha':
		*clr & cla
		menu_off = 1
		minut += 20
		if NatbelQW['underwear'] = 1:
			*clr & cla
			if NatbelQW['nakedHW'] < 5:
				'"You should really buy yourself some nicer underwear, Natasha. If you ever somehow manage to get a boy interested in you do you think they will be turned on by those ugly things? How are the boys ever going to want to fuck you if you don''t wear something sexy for them? That is if you''ll ever manage to get a boy interested in you in the first place." You tell her, laughing at the way she squirms when you draw her attention to the fact that her bra and panties are some of the cheapest plainest ones, money can buy.'
			else
				'Natasha occasionally glances over her shoulder at you. Her face is flushed red, and you can see a damp spot on her panties.'
				'"You''re such a little slut, Natasha. I can see your panties getting wetter by the minute, you just love getting humiliated don''t you." You tell her, laughing as her face turns crimson.'
			end
			'As she continues working on your homework, you occasionally break Natasha''s concentration with more comments on her underwear and body. Each time you do so, she visibly loses her concentration.'
		else
			*clr & cla
			if NatbelQW['nakedHW'] < 5:
				'"You should really take better care of yourself, I mean look at that bush. Do you really think guys will be thrilled by to see your hairy pussy? You should shave it smooth or at least keep it better trimmed." You say to her, laughing at the way she squirms when you draw her attention back to the fact that she''s completely naked in front of you.'
			else
				'Natasha occasionally glances over her shoulder at you. Her face is flushed red, and her pussy is glistening wetly.'
				'"You''re such a little slut, Natasha. I can see you''re getting wetter by the minute, you just love getting humiliated don''t you." You tell her, laughing as her face turns crimson.'
			end
			'As she keeps working on your homework, you occasionally break Natasha''s concentration with more comments on her body. Each time you do so, she visibly loses her concentration.'
		end
		'After a while, Natasha gets up saying: "It''s done <<$pcs_nickname>>, can I please get dressed now?"'
		gs 'arousal', 'voyeur', 10
		gs 'arousal', 'end'
		gs 'stat'
		act 'Continue': gt 'natbelapt', 'afterhomework'
	end
end

if $ARGS[0] = 'afterhomework':
	*clr & cla
	menu_off = 1
	if NatbelQW['underwear'] = 1:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nakedhomework1.jpg"></center>'
	else
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nakedhomework2.jpg"></center>'
	end
	act 'Allow her to dress':
		NatbelQW['underwear'] = 0
		gt 'natbelapt', 'natroom'
	end

	gs 'willpower', 'cuni', 'force', 'easy'
	if NatbelQW['QWstage'] >= 7 and will_cost <= pcs_willpwr:
		act 'Take off your own clothes (<<will_cost>> Willpower)':
			cla
			gs 'willpower', 'pay', 'self'
			'You smile at Natasha and start taking off your own clothes slowly, she tries not to pay attention to you. Yet you can see her sneaking peeks.'
			act 'Lie down and open your legs': gt 'natbelapt', 'openlegs'
			act 'Straddle her face': gt 'natbelapt', 'straddleface'
		end
	elseif NatbelQW['QWstage'] >= 7 and will_cost > pcs_willpwr:
		act 'Take off your own clothes (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	if NatbelQW['seethrough'] = 1:
		gs 'willpower', 'exhib', 'force', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Make her wear the lingerie (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'force'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/seethrough00.jpg"></center>'
				NatbelQW['seethroughwearing'] = 1
				if NatbelQW['seethroughworn'] = 0:
					NatbelQW['seethroughworn'] += 1
					'"No, I don''t think so. For the rest of the day, you''re going to wear this." You say as you pull the see-through lingerie from your bag. "I just couldn''t resist buying it for you."'
					'Natasha''s eyes fall on what you''re actually holding. She immediately notices that you can see right through the fabric.'
					'"B-But... It hides nothing. I''d be practically naked." She stammers'
					'"Do I need to remind you who owes who here?" You say in a threatening voice.'
					if NatbelQW['underwear'] = 1:
						'"N-No." She says as she takes off her own underwear. She takes the lingerie from you and sighs deeply before putting it on.'
					else
						'"N-No." She says as she takes the lingerie from you and sighs deeply before putting it on.'
					end
					'"There. Are you happy now? I''m wearing it."'
					'"Good." You tell her. "Remember, you''re going to wear it until you go to bed. If I catch you wearing your own clothes again, I''ll have to get more creative."'
					gs 'arousal', 'voyeur', 5
					gs 'arousal', 'end'
					gs 'stat'
					act 'Continue':
						natstayroom = 1
						gt 'natbelapt', 'natroom'
					end
				elseif NatbelQW['seethroughworn'] < 5:
					NatbelQW['seethroughworn'] += 1
					'"No, I don''t think so. Remember the lingerie I gave you? You''re going to wear it again." You say as you enjoy the look on her face. It seems to be a mixture of shame and arousal.'
					if NatbelQW['underwear'] = 1:
						'"O-Ok." She says as she takes off her own underwear. She pulls the lingerie from her drawer and sighs deeply before putting it on.'
					else
						'"O-Ok." She says as she takes the lingerie from her drawer and sighs deeply before putting it on.'
					end
					'"There. Are you happy now? I''m wearing it again."'
					'"It looks so good on you." You tell her. "Remember, you''re going to wear it until you go to bed. If I catch you wearing your own clothes again, I''ll have to get more creative."'
					gs 'arousal', 'voyeur', 5
					gs 'arousal', 'end'
					gs 'stat'
					act 'Continue':
						natstayroom = 1
						gt 'natbelapt', 'natroom'
					end
				else
					NatbelQW['seethroughworn'] += 1
					'"No, I don''t think so. I want you to put the lingerie on again. You know, your favorite." You say as you enjoy the look on her face. She''s gotten a bit red in the face from arousal.'
					if NatbelQW['underwear'] = 1:
						'"Ok." She says a bit too eagerly as she takes off her own underwear and makes a show of walking over to her underwear drawer. She bends over and sticks her naked ass out, wiggling it sexily before pulling the lingerie from her drawer and putting it on.'
					else
						'"Ok." She says a bit too eagerly as she makes a show of walking over to her underwear drawer. She bends over and sticks her naked ass out, wiggling it sexily before pulling the lingerie from her drawer and putting it on.'
					end
					'"It looks so good on you. I love making you wear it for me."'
					gs 'arousal', 'voyeur', 5
					gs 'arousal', 'end'
					gs 'stat'
					act 'Continue':
						natstayroom = 1
						gt 'natbelapt', 'natroom'
					end
				end
			end
		else
			act 'Make her wear the lingerie (<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] = 'lick_feet':
	*clr & cla
	minut += 5
	if NatbelQW['QWstage'] = 5: NatbelQW['QWstage'] = 6
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/lickfeet1.jpg"></center>'
	'"My feet have been killing me today. Take off my shoes for me and lick my feet until I feel better." You bark at Natasha.'
	'Natasha immediately settles you on the bed and takes off your shoes. She seems to enjoy being dominated by you.'
	act 'Let her suffer for a bit':
		*clr & cla
		minut += 5
		NatbelQW['Debt'] -= 500
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/lickfeet1.jpg"></center>'
		'"Open your mouth." You tell her as you grab her by the hair to hold her at your feet. "Suck on my toes."'
		'"That''s a good little girl." You tell her, smiling at her while she gently sucks on your toes one by one.'
		'After a while, you get bored and get up.'
		'You smile, "Fair enough, you are forgiven."'
		'Natasha opens her eyes and asks in disbelief, "It''s forgiven?"'
		'You laugh, "500<b>₽</b> of debt is forgiven, fool. You will do everything I tell you until the entire debt is gone."'
		act 'Continue': gt 'natbelapt', 'natroom'
	end
	act 'Lie back and enjoy':
		*clr & cla
		minut += 5
		NatbelQW['Debt'] -= 500
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/lickfeet2.jpg"></center>'
		'You lie back and gently caress your pussy while you relish the feeling of her tongue on your feet. She alternates between licking your feet in long strokes of her tongue and gently sucking on your toes.'
		'After a while, you get bored and get up.'
		'You smile, "Fair enough, you are forgiven."'
		'Natasha opens her eyes and asks in disbelief, "It''s forgiven?"'
		'You laugh, "500<b>₽</b> of debt is forgiven, fool. You will do everything I tell you until the entire debt is gone."'
		gs 'arousal', 'foreplay', 5, 'humiliation', 'lesbian'
		gs 'arousal', 'end'
		gs 'stat'
		act 'Continue': gt 'natbelapt', 'natroom'
	end
end

if $ARGS[0] = 'spit_face':
	*clr & cla
	minut += 5
	if NatbelQW['QWstage'] = 6: NatbelQW['QWstage'] = 7
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natknee.jpg"></center>'
	'You bark at Natasha to get on her knees. She immediately kneels down at your feet and obediently opens her mouth.'
	act 'Spit in her face':
		*clr & cla
		minut += 5
		NatbelQW['Debt'] -= 500
		!!natknee
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natknee.jpg"></center>'
		'You collect the saliva in your mouth and, with relish, spit in Natasha''s face. She jerks and squeezes her eyes shut but makes no move to wipe the spit away even as some drips into her open mouth.'
		'You smile, "Fair enough, you are forgiven."'
		'Natasha opens her eyes and asks in disbelief, "It''s forgiven?"'
		'You laugh, "500<b>₽</b> of debt is forgiven, fool. You will do everything I tell you until the entire debt is gone."'
		act 'Continue': gt 'natbelapt', 'natroom'
	end
end

if $ARGS[0] = 'lick_pussy':
	*clr & cla
	minut += 5
	NatbelQW['Debt'] -= 500
	if npc_Sex['A16'] = 0: npc_Sex['A16'] = 1 & girl += 1
	lesbian += 1
	NatbelQW['lesbian'] += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natlick.jpg"></center>'
	'You force Natasha to undress you and then watch as she undresses herself before she returns to kneeling at your feet. You pull her face into your pussy and snarl at her, "Now lick!". Natasha fearfully starts to work.'
	
	!! You need to train her a bit before she does a good job
	if NatbelQW['training'] > 3 or NatbelQW['QWstage'] >= 8:
		if NatbelQW['QWstage'] = 7: NatbelQW['QWstage'] = 8
		act 'Lie down and open your legs':
			gt 'natbelapt', 'openlegs'
		end
		act 'Straddle her face':
			gt 'natbelapt', 'straddleface'
		end
	else
		NatbelQW['training'] += 1
		'This useless cunt can''t even find your clitoris and only sluggishly works her mouth on your pussy without any enthusiasm.'
		if NatbelQW['Debt'] >= 500:
			gs 'willpower', 'pee', 'force'
			if will_cost <= pcs_willpwr:
				act 'Piss in her mouth (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'force'
					gs 'arousal', 'pee_give', 5, 'dom', 'lesbian'
					gs 'arousal', 'end'
					NatbelQW['Debt'] -= 500
					NatbelQW['pee'] += 1
					!!natknee
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natpee.jpg"></center>'
					'You are angry at this bitch, so you release your urine in Natasha''s face. She closes her eyes and bows her head down but does not recoil and silently accepts your golden shower, continuing to swallow until the very end.'
					act 'Continue': gt 'natbelapt', 'natroom'
				end
			else
				act 'Piss in her mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
		act 'Make her stop':
			*clr & cla
			minut += 5
			pcs_horny -= 10
			money -= 50
			gs 'stat'
!!ImageNeededPlaceholder
			'<center><img <<$set_imgh>> src="images/shared/food/icecreem.jpg"></center>'
			'You get tired of her lackluster attempts to get you off, in fact, she is doing such a bad job that it is actually turning you off.'
			'"You are hopeless. Here, go buy an ice cream cone and practice licking. You''d better improve by next time, bitch." You throw a 50 ruble note at her as she stops licking you.'
			act 'Continue': gt 'natbelapt', 'natroom'
		end
	end
end

if $ARGS[0] = 'openlegs':
	*clr & cla
	$orgasm_or = 'yes'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/lickpussy01.jpg"></center>'
	if NatbelQW['underwear'] = 1:
		'You sit back on her bed and open your legs invitingly. Natasha doesn''t waste a second before she strips out of her own underwear and enthusiastically goes to work on your pussy, using her mouth and tongue. She fucks you with her tongue then switches to sucking on your now engorged clitoris.'
	else
		'You sit back on her bed and open your legs invitingly. Natasha doesn''t waste a second and enthusiastically goes to work on your pussy, using her mouth and tongue. She fucks you with her tongue then switches to sucking on your now engorged clitoris.'
	end
	'"Hmm... You''re doing... Aaah... Keep going..." You gasp while she keeps licking and sucking. Losing yourself in the heat building up inside of you that comes from having your pussy eaten so well.'
	'As you feel yourself drawing closer and closer to your orgasm, you grab Natasha by the hair and press her face into your pussy even harder, trying to force her tongue deeper into you.'
	$orgasm_txt = 'Your orgasm hits you almost immediately after and you keep a tight hold on her hair as your legs start trembling from the power of it, while Natasha keeps licking at the juices that are flowing from you, now with an almost animalistic passion.'
	gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
	'When it finally starts to subside you let go and just lie there, catching your breath. Natasha keeps licking you occasionally. Each time her tongue touches your overly sensitive clitoris, it sends a new shiver through you.'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Continue': gt 'natbelapt', 'natroom'
end

if $ARGS[0] = 'straddleface':
	*clr & cla
	$orgasm_or = 'yes'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/lickpussy02.jpg"></center>'
	if NatbelQW['underwear'] = 1:
		'You step up to Natasha and take off her bra and panties before throwing her on the bed and immediately straddling her face. She doesn''t waste a second and enthusiastically goes to work on your pussy, using her mouth and tongue. She fucks you with her tongue then switches to sucking on your now engorged clitoris.'
	else
		'You throw Natasha on the bed and immediately straddle her face. She doesn''t waste a second and enthusiastically goes to work on your pussy, using her mouth and tongue. She fucks you with her tongue then switches to sucking on your now engorged clitoris.'
	end
	'"Hmm... You''re doing... Aaah... Keep going..." You gasp while she keeps licking and sucking. Losing yourself in the heat building up inside of you, coming from having your pussy eaten that well.'
	'As you feel yourself drawing closer and closer to your orgasm, you grab Natasha by the hair and start grinding your pussy on her mouth, trying to force her tongue even deeper into you.'
	$orgasm_txt = 'Your orgasm hits you almost immediately after and you keep a tight hold on her hair as your legs start trembling from the power of it, while Natasha keeps licking you, now with an almost animalistic passion.'
	gs 'arousal', 'cuni', 5, 'lesbian', 'dom'
	'When it finally starts to subside you let go and slump down on top of her, catching your breath. Natasha''s face locked between your legs. You can feel her breath on your pussy. Each exhalation sends a new shiver through you.'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Continue': gt 'natbelapt', 'natroom'
end

if $ARGS[0] = 'chat':
	menu_off = 1
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
	'The two of you lay on her bed and talk about a variety of topics.'

	act 'Stop talking': gt 'natbelapt','natroom'

	if npc_pregtalk['A16'] = 0 and kid = 0:
		if NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday']) < 200 and func('body_din','pregnancyVisibility') = 1:
			*clr & cla
			'"<<$pcs_nickname>>, are you pregnant, too? Well, I guess I don''t have to worry about being the only pregnant girl at school," she giggles.'
			act 'Continue':gt 'natbelapt', 'natknows'
		elseif NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday']) < 200 and knowpreg = 1 and pregchem > 0 and func('body_din','pregnancyVisibility') = 0:
			act 'Tell her you''re pregnant':
				*clr & cla
				'"If you were worried about being the only pregnant girl at school, that won''t be a problem anymore." You smirk while rubbing your midriff. "It looks like I got myself knocked up as well."'
				'Natasha smiles at you excitedly. "Really? Congratulations!"'
				*nl
				act 'Continue':gt 'natbelapt', 'natknows'
			end
		elseif NatbelQW['QWstage'] <= 5 and pregchem > 0 and knowpreg = 1:
			act 'Tell her you''re pregnant':
				cla
				*nl
				'"<<$pcs_nickname>>, you''re," she pauses momentarily before continuing in a tone of shock mixed with disgust, "pregnant? Have you been sleeping around? This will definitely impact your studies."'
				npc_pregtalk['A16'] = 1
				act 'Continue' :gt 'natbelapt', 'natroom'
			end
		elseif pregchem > 0 and knowpreg = 1:
			act 'Tell her you''re pregnant':
				cla
				*nl
				'"You''re pregnant? Who''s the father?"'
				*nl
				if $wombthfath = '':
					'"Honestly, I don''t even know."'
					'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
					npc_pregtalk['A16'] = 1
					act 'Continue' :gt 'natbelapt', 'natroom'
				else
					'You tell her that <<$wombthfath>> is the father and then give her brief details as to how you got pregnant, without getting too explicit.'
					*nl
					'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
					npc_pregtalk['A16'] = 1
					act 'Continue' :gt 'natbelapt', 'natroom'
				end
			end
		end
	end

	if npc_pregtalk['A16'] = 0 and kid > 0:
		if (NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday'])< 200) or (NatbelQW['babycount'] > 0) and func('body_din','pregnancyVisibility') = 1:
			*clr & cla
			'"Wow, <<$pcs_nickname>>, you''re pregnant again? You''re really committed to making sure I''m not the only young mother around here, huh?" She playfully smiles and puts a hand on your shoulder. "It''s good to know you''re looking out for me."'
			act 'Next':gt 'natbelapt', 'natknows1'
		elseif (NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday'])< 200) or (NatbelQW['babycount'] > 0) and knowpreg = 1 and pregchem > 0 and func('body_din','pregnancyVisibility') = 0:
			act 'Tell her you''re pregnant':
				*clr & cla
				'"Hey, guess who''s pregnant again. You know, I''m glad I forced you to let Kolka impregnate you so that I could have someone I can relate to."'
				'Natasha stares at you for a moment, stunned, trying to determine if the second half of your statement was a joke, before the first half clicks in her mind. "Oh my God, that''s wonderful!" she exclaims as she throws her arms around you and hugs you. When she finally lets go, she asks'
				*nl
				act 'Next':gt 'natbelapt', 'natknows1'
			end
		elseif NatbelQW['QWstage'] <= 5 and pregchem > 0 and knowpreg = 1:
			act 'Tell her you''re pregnant':
				*clr & cla
				*nl
				'"Really? You''re pregnant again? You should really try to be more careful."'
				npc_pregtalk['A16'] = 1
				act 'Continue' :gt 'natbelapt', 'natroom'
			end
		elseif pregchem > 0 and knowpreg = 1:
			act 'Tell her you''re pregnant':
				*clr & cla
				*nl
				'"You got pregnant again. It must be wonderful…" She trails off, clearly envious.'
				npc_pregtalk['A16'] = 1
				act 'Continue' :gt 'natbelapt', 'natroom'
			end
		end
	end

	act 'Talk about money':
		*clr & cla
		minut += 15
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
		'You talk about the price of clothes and cosmetics for a while. Natasha seems to know a lot about the latest fashion, even though she can''t afford it.'
		if NatbelQW['QWstage'] = 1 and NatbelQW['BestFriend'] >= 3 and NatbelQW['Debt'] = 0 and money >= 5000:
			'Natasha looks down in embarrassment. "<<$pcs_nickname>>, you have lots of money. Could you lend me 5000 <b>₽</b>? I will pay it back, I give you my word."'

			act 'Don''t give her the money': gt 'natbelapt', 'chat'
			act 'Lend Natasha the 5000 <b>₽</b>':
				*clr & cla
				if NatbelQW['QWstage'] = 1: NatbelQW['QWstage'] = 2
				minut += 15
				NatbelQW['Debt'] = 5000
				money -= 5000
				NatbelQW['DebtDay'] = daystart + 30
				NatbelQW['BestFriend'] += 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
				'You get your purse and give Natasha the money. Natasha is delighted and says that she will pay it back in a month.'

				act 'Keep talking': gt 'natbelapt', 'chat'
				act 'Stop talking': gt 'natbelapt', 'natroom'
			end
		elseif NatbelQW['QWstage'] >= 2 and NatbelQW['Debt'] = 0 and money >= 2000:
			'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me some money, please? I swear I''ll pay you back before you even miss it."'
			act 'Don''t give her the money': gt 'natbelapt', 'chat'
			act 'Give her the money (2000 <b>₽</b>)':
				*clr & cla
				if NatbelQW['QWstage'] = 1: NatbelQW['QWstage'] = 2
				if NatbelQW['MoneyGivenTimes'] < 10:
					NatbelQW['Debt'] = 2000
					money -= 2000
					NatbelQW['MoneyGivenTimes'] += 1
					!!set timer for repayment
					NatbelQW['DebtDay'] = daystart + 30
					gs 'stat'
					'You get your purse and give Natasha the money.'
					'"Thank you <<$pcs_nickname>>, you''re the best. I promise you''ll have it back within a month."'
					act 'Stop talking': gt 'natbelapt', 'natroom'
					act 'Keep talking': gt 'natbelapt', 'chat'
				elseif NatbelQW['MoneyGivenTimes'] < 20:
					NatbelQW['Debt'] = 2000
					money -= 2000
					NatbelQW['MoneyGivenTimes'] += 1
					gs 'stat'
					'"Or I could uhm... I could do those things again for you to... To repay you."'
					'You get your purse and give Natasha the money.'
					'"Thank you <<$pcs_nickname>>, you''re the best. I promise you won''t regret it."'
					act 'Stop talking': gt 'natbelapt', 'natroom'
					act 'Keep talking': gt 'natbelapt', 'chat'
				else
					NatbelQW['Debt'] = 2000
					money -= 2000
					NatbelQW['MoneyGivenTimes'] += 1
					gs 'stat'
					'You get your purse and give Natasha the money.'
					'"I see someone wants to be my little bitch again. You''re going to do whatever I want until you''ve worked off that debt."'
					'"You know I will, I''ve proven that haven''t I?"'
					act 'Stop talking': gt 'natbelapt', 'natroom'
					act 'Keep talking': gt 'natbelapt', 'chat'
				end
			end
		elseif NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] > daystart:
			'Natasha promises you to repay the <<NatbelQW[''Debt'']>><b>₽</b> in <<NatbelQW[''DebtDay'']-daystart>> days.'
			act 'Stop talking': gt 'natbelapt', 'natroom'
			act 'Keep talking': gt 'natbelapt', 'chat'
		elseif NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] <= daystart:
			'Natasha looks at the floor, "<<$pcs_nickname>>, I... I''m sorry, I don''t have your money."'
			act 'Forgive Natasha''s debt':
				*clr & cla
				minut += 15
				NatbelQW['Debt'] = 0
				NatbelQW['DebtDay'] = 0
				NatbelQW['BestFriend'] += 10
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
				'You decide to forgive Natasha''s debt. She is delighted and thanks you with all of her heart.'

				act 'Keep talking': gt 'natbelapt', 'chat'
				act 'Stop talking': gt 'natbelapt', 'natroom'
			end
			if NatbelQW['QWstage'] = 1:
				act 'Demand repayment':
					*clr & cla
					minut += 15
					if NatbelQW['QWstage'] = 1: NatbelQW['QWstage'] = 2
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
					'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"'
					''
					'Natasha looks at you with fearful eyes, and you''re getting some ideas as to how you could "use" her. She did say "anything," after all...'
					'You snarl at her with an evil hiss: "You''ll be my little pet until you''ve worked off every last Kopeck. And don''t you dare tell anyone about this!"'
					'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
					act 'Make her do your homework': gs 'natbelapt', 'make_her_do_homework'
				end
			else
				act 'Demand repayment':
					*clr & cla
					minut += 15
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
					if NatbelQW['MoneyGivenTimes'] < 10:
						'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"'
						''
						'Natasha looks at you with fearful eyes, and you are getting some more ideas as to how you could "use" her this time. She did say "anything," after all...'
						'You snarl at her with an evil hiss: "You''ll be my little pet again until you''ve worked off every last Kopeck. And don''t you dare tell anyone about this!"'
						'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
						act 'Stop talking': gt 'natbelapt', 'natroom'
						act 'Keep talking': gt 'natbelapt', 'chat'
					else
						'"Well, you did agree to be my toy again if you couldn''t pay me back. I guess we''re going to have some more fun very soon Natasha."'
						act 'Stop talking': gt 'natbelapt', 'natroom'
						act 'Keep talking': gt 'natbelapt', 'chat'
					end
				end
			end
		elseif NatbelQW['Debt'] <= 0 and ((money < 2000 and NatbelQW['BestFriend'] < 3) or (money < 5000 and NatbelQW['BestFriend'] >= 3)):
			'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me '+iif(NatbelQW['BestFriend'] >= 3, '5000', '2000')+', please? I swear I''ll pay you back before you even miss it."'
			'You shake your head. "Sorry Natasha, I don''t have that much money with me."'
			
			act 'Stop talking': gt 'natbelapt', 'natroom'
			act 'Keep talking': gt 'natbelapt', 'chat'
		else
			act 'Stop talking': gt 'natbelapt', 'natroom'
			act 'Keep talking': gt 'natbelapt', 'chat'
		end
	end

	act 'Make small talk':
		*clr & cla
		minut += 15
		NatbelQW['BestFriend'] += 1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
		'You talk with Natasha about this and that, passing fifteen minutes with ease.'

		if NatbelQW['BestFriend'] = 1:'Natasha knows that she lives in a very poor family. She has no father, and her mother works for a pittance at the garment factory. You feel sorry for her.'
		if NatbelQW['BestFriend'] >= 2:'Natasha is envious that other girls can dress smartly and buy cosmetics while she has to wear her mother''s things.'

		act 'Keep talking': gt 'natbelapt', 'chat'
		act 'Stop talking': gt 'natbelapt', 'natroom'
	end

	act 'Ask about her mother':
		*clr & cla
		'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
		'You talk with Natasha about her mother. She tells you that her mother seems to be unhappy a lot of the time. She thinks it''s because of how dreary her job at the garment factory is.'

		act 'Keep talking': gt 'natbelapt', 'chat'
		act 'Stop talking': gt 'natbelapt', 'natroom'
	end

	act 'Ask about her father':
		*clr & cla
		'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
		'"What about your father? I''ve never seen him around." You nudge her gently. "Oh don''t get me started about that. I mean... Like... Well... It''s not like I really know what I''m missing. He left my mom and me just after I was born."'
!!		act 'Tell her about your own father':
!! This needs quest flags to be set elsewhere that check how far into the real father story Sveta is.
!!			if :
!!				'"My mom and dad split up right after I was born as well..." You say in what is almost a whisper. "I found out that he is a truck driver and not too long ago I went to meet him. After a while, I dragged his side of the story out of him. I-I kind of feel sorry for him."'
!!			elseif :
!!				'"My mom and dad split up right after I was born as well..." You say in what is almost a whisper. "I''ve found out that he is a truck driver. He supposedly works at the storage terminal in the city. I-I haven''t figured out if I want to go see him or not."'
!!			elseif :
!!				'"My mom and dad split up right after I was born as well..." You say in what is almost a whisper. "All I''ve been able to figure out is that he was a truck driver."'
!!			else
!!				'"My mom and dad split up right after I was born as well..." You say in what is almost a whisper. "Every time I ask someone about him they just shut me down."'
!!			end
!!			'"Well, I don''t want to hurt my mom''s feelings by asking about him. It''s always been a very sore topic. So can we please just drop the subject?"'
!!		end
		act 'Keep talking': gt 'natbelapt', 'chat'
		act 'Stop talking': gt 'natbelapt', 'natroom'
	end
	act 'Snacks':
		cla
		*clr
		'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
		'You bite your lip a moment, unsure if you should ask. It might seem rude, but you could really use a snack and drink. "Hey, Natasha you got anything to snack on or drink?"'
		'She looks a bit surprised and then a bit abashed. "Yeah sorry, didn''t think about it. Feel free to just grab something if you want in the future but for now, follow me."'
		act 'Follow her':gt 'natbelapt', 'snack'
	end
end

if $ARGS[0] = 'natknows':
	cla
	npc_pregtalk['A16'] = 1
	if pav_slut < 250: '"So, who''s the father?"'
	if pav_slut >= 250: '"So, do you know who the father is?"'
	*nl
	if $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
		'You smile. "I''m sure you won''t be surprised to hear that Kolka got me pregnant."'
		'"Wow. He really has a thing for knocking girls up." She says while touching her own pregnant belly. "I didn''t expect that to extend to his own sister, though."'
		'"Yeah, you know how it is. Some men just want to conquer as many wombs as they can, It doesn''t matter who they''re attached to," you reply. "But don''t worry, he still has a permanent claim on yours. We''ll make sure he has plenty of opportunities to keep getting you pregnant. Who knows how many of his children you''ll have before he''s finished."'
		'Natasha''s face goes completely red with embarrassment, and she starts to mumble something before you cut her off with a passionate kiss. When you finally break the kiss, she is still visibly red, but she isn''t protesting your suggestion. You know what she wants.'
	elseif $wombthfath = '':
		'"I don''t actually know." You laugh. "I guess my life has gotten a little out of hand recently."'
		'"Yeah, it sounds like it has." She smiles. "Regardless, I''m glad I won''t be going through pregnancy alone."'
	else
		'"It looks like I got knocked up by <<$wombthfath>>."'
		'"Well, I hope for the best for both of you. After our babies are both born, we should start setting up play dates." She pauses for a moment before adding, "Honestly, I''m happy that I won''t be going through this alone."'
	end
	act 'Continue':gt 'natbelapt', 'natroom'
end

!When pregnancy fetish is added, another reaction will be added here
if $ARGS[0] = 'natknows1':
	cla
	npc_pregtalk['A16'] = 1
	if pav_slut < 250: '"Is it the same father as last time?"'
	if pav_slut >= 250: '"Do you know if it''s the same father as last time?"'
	*nl
	if $wombthfath = 'Kolka' and npc_rel['A34'] > 50 and arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
		'"Yeah, I think you''re right. I''m not sure if I''ll let him get me pregnant again after this though." You pull your face as close to Natasha''s as you can without actually touching her and sultrily whisper, "You, on the other hand, are going to be his personal breeding bitch. There won''t be a single moment where your womb doesn''t contain either his baby or his cum. He is going to keep you knocked up until he gets bored with you and leaves you a single mother."'
		'As soon as you finish speaking, you give Natasha a deep, passionate kiss. You pull away, a string of saliva still hanging between you. Natasha just stares at you, unable to respond, but very visibly aroused.'
	elseif arrpos('$ChildThFath','Kolka') = arrsize('$ChildThFath')-1:
		'"Not this time. My body is far too fantastic to limit myself. My brother can''t be the only person to put a baby in me," you joke. "Plus, he already has a baby factory. That''s your job." You punctuate your sentence by kissing Natasha. After you pull away, she stares at you in silence, face red, trying to determine if you were serious.'
	elseif $wombthfath = 'Kolka' and npc_rel['A34'] > 50 and arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1:
		'"No, this time it''s Kolka''s," you inform her.'
		'"Wow. He really has a thing for knocking girls up," she says.'
		'"Yeah, it seems like he does," you reply. "But don''t worry, we''ll make sure he has plenty of opportunities to keep getting you pregnant. Who knows how many of his children you''ll have before he''s finished."'
		'Natasha''s face goes completely red with embarrassment, and she starts to mumble something before you cut her off with a passionate kiss. When you finally break the kiss, she is still visibly red, but she isn''t protesting your suggestion. You know what she wants.'
	elseif $wombthfath ! 'Kolka' and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
		'"Yeah. I guess I needed him to give me another baby before I could be satisfied," you say jokingly.'
		'"Well, I hope you find satisfaction," she laughs.'
	elseif $wombthfath ! 'Kolka' and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
		'"No, I needed to test drive someone else before I could decide what father I like best."'
		'"If you''re going that route, you might as well keep shopping around." You laugh together for a while before moving on to another topic.'
		end
	act 'Continue':gt 'natbelapt', 'natroom'
end

if $ARGS[0] = 'snack':
	menu_off = 1
	cla
	*nl
	!!Snack + Water
	minut += 15
	if alko > 0: alko -= 1
	pcs_health += 20
	pcs_mood += 20
	fat += 6
	pcs_energy += 25
	if pcs_hydra >= 100:
		pcs_hydra += 25
	else
		pcs_hydra += 50
	end
	cumspclnt = 2
	gs 'cum_cleanup'
	pcs_breath = 0
	gs 'stat'
	'"If you''re going that route, you might as well keep shopping around." You laugh together for a while before moving on to another topic.'
	if rand(0,4) = 0:
		if NatbelQW['MetMother'] = 0:
			'As you walk into the kitchen, you see a woman sitting at the dining table having a cup of tea.'
			'"Oh, I didn''t know we had company. Do you go to school with Natasha?"'
			'"Yes, I''m <<$pcs_nickname>>. We''re in the same class."'
			'"It''s nice to meet a friend of Natasha''s. I''m her mother <<$npc_firstname[''A191'']>>, but you can call me <<$npc_nickname[''A191'']>>."'
			'"Pleased to meet you, <<$npc_nickname[''A191'']>>."'
			act 'Back to her room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		else
			'As you walk into the kitchen, you see <<$npc_nickname[''A191'']>> sitting at the dining table having a cup of tea.'
			'"Oh, I didn''t know we had company. How are you <<$pcs_nickname>>?"'
			'"Hi <<$npc_nickname[''A191'']>>, I''m doing well. How about you?"'
			'"I can''t complain honey."'
			'Natasha, holding some snacks and your drinks cuts in: "Well, we have to get back to our studies mom."'
			act 'Back to her room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		end
	else
		'As you walk into the kitchen, Natasha points to a cabinet. "Grab some chips out of there."'
		'While you are doing that, she grabs a couple of drinks from the fridge, and once you both have your spoils from your raid on the kitchen, you head back to her room.'
		act 'Back to her room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
	end
end

if $ARGS[0] = 'livingroom':
	$menu_loc = 'natbelapt'
	$menu_arg = 'livingroom'
	menu_off = 0
	CLOSE ALL
	*clr & cla
	$locclass = 'livingr'
	minut += 1
	gs 'stat'
	'<center><b><font color = maroon>Living room</font></b></center>'
! Needs actions like watching tv
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/living.jpg"></center>'
	'Most of the living room is occupied by an old but comfortable looking couch. It''s big enough to sleep in. In front of it stands an old tiny TV.'

	! Randomly detemines what is on TV to keep it from being the same every time.
	NatbelQW['TVshow'] = rand(0,8)
	if NatbelQW['TVshow'] = 0:
		$NatbelQW['TVmsg'] = 'a nature show about wild animals in their natural habitat'
	elseif NatbelQW['TVshow'] = 1:
		$NatbelQW['TVmsg'] = 'a documentary about history'
	elseif NatbelQW['TVshow'] = 2:
		$NatbelQW['TVmsg'] = 'the news'
	elseif NatbelQW['TVshow'] = 3:
		$NatbelQW['TVmsg'] = 'a talent show'
	elseif NatbelQW['TVshow'] = 4:
		$NatbelQW['TVmsg'] = 'a comedy'
	elseif NatbelQW['TVshow'] = 5:
		$NatbelQW['TVmsg'] = 'a romantic movie'
	elseif NatbelQW['TVshow'] = 6:
		$NatbelQW['TVmsg'] = 'a horror movie'
	elseif NatbelQW['TVshow'] = 7:
		$NatbelQW['TVmsg'] = 'a thriller'
	elseif NatbelQW['TVshow'] = 8:
		$NatbelQW['TVmsg'] = 'a porno'
	end

	if NatashaLoc = 4 and NatbelQW['NoTV'] = 1:
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/tvsnack.jpg"></center>'
		'"I''ll go grab us a snack, pick something good to watch." Natasha says as she heads to the kitchen.'
		! If you haven''t progressed far enough or Natasha''s mother is home you can''t pick porn
		if NatbelQW['QWstage'] < 5 or NatbelQW['MotherHome'] = 1:
			if NatbelQW['TVshow'] = 8:
				NatbelQW['TVshow'] = 5
				$NatbelQW['TVmsg'] = 'a romantic movie'
			end
		end
		'You turn on the TV and switch from channel to channel until you see something you like. It''s <<$NatbelQW[''TVmsg'']>>.'
		if NatbelQW['TVshow'] ! 8:
			minut += 60
			gs 'stat'
			'When Natasha returns, she sits down holding a bowl of chips. "Good choice <<$pcs_nickname>>."'
			'You and Natasha both watch with interest while you pass the snacks around.'
			'When it ends you glance up at the clock and are startled to see that an hour has passed.'
			act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		else
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/youpickporn.jpg"></center>'
			'When Natasha returns, she stops in her tracks, holding a bowl of chips. "Really, you want to watch that <<$pcs_nickname>>?'
			'"You can learn a lot from it, Natasha. I thought I''d provide you with some education." You say to her with a smirk while patting the couch next to you, gesturing her to sit down.'
			'Natasha sits down hesitantly while you cuddle up to her, the snacks sitting forgotten next to you.'
			'Throughout the show you keep caressing her body gently, making her moan in pleasure from time to time which makes you feel hornier and hornier in return.'
			'When it ends the both of you get up from the couch, visibly aroused.'
			gs 'arousal', 'porn', 10
			gs 'arousal', 'foreplay', 10, 'lesbian'
			minut -= 10
			gs 'arousal', 'end'
			gs 'stat'
			act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		end
	elseif NatashaLoc = 4 and NatbelQW['NoTV'] = 0:
		'Natasha is sitting on the couch watching <<$NatbelQW[''TVmsg'']>>.'

		act 'Join her':
			if NatbelQW['TVshow'] ! 8:
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/tvsnack.jpg"></center>'
				if rand(0,1) = 0:
					minut += 60
					gs 'stat'
!! Sveta should learn something for school from certain shows -- Needs to be implemented
					'You sit on the couch next to Natasha and watch TV with her. You and Natasha are both watching with interest while you pass the snacks around.'
					'When it ends you glance up at the clock and are startled to see that an hour has passed.'
					act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
				else
					minut += 15
					gs 'stat'
					'You sit on the couch next to Natasha and watch TV with her. You soon get bored and start talking with Natasha, ignoring the TV completely.'
					act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
				end
			else
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/nattvporn.jpg"></center>'
				if NatbelQW['MotherHome'] = 1:
					'"Aren''t you afraid your mother would walk in on you watching that?" You ask her as you walk in the room.'
					'Natasha jumps visibly at hearing your voice. "Oh <<$pcs_nickname>>, I..." She starts, going red in the face. "It''s alright Natasha, everyone watches it." You tell her quickly as you take a seat next to her.'
					'"Though I''m not sure you should be watching it when your mother can walk in at any moment."'
					act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
				else
					! Randomly determine if it''s a porno featuring Sveta
					if city_porn = 0:
						YourPorn = 0
					elseif city_porn > 50:
						YourPorn = rand(0,49)
					elseif city_porn > 100:
						YourPorn = rand(0,39)
					elseif city_porn > 150:
						YourPorn = rand(0,29)
					elseif city_porn > 200:
						YourPorn = rand(0,19)
					elseif city_porn > 250:
						YourPorn = rand(0,9)
					end

					if YourPorn = 1:
						if pav_slut < 100:
							'You are startled to see yourself on the screen, unsure how you feel about Natasha knowing. "Best to check the damage." You think to yourself as you approach the couch.'
						else
							'You see yourself on the screen. "It would have happened sooner or later." You smile to yourself as you approach the couch.'
						end
						'Natasha doesn''t notice you until she feels the couch move as you sit down next to her. She jumps in surprise and quickly adjusts her skirt to hide her wet panties, completely red in the face from a mixture of arousal and embarrassment at being caught watching porn featuring you.'
						if NatbelQW['WatchedYourPorn'] = 0:
							NatbelQW['WatchedYourPorn'] = 1
							'"<<$pcs_nickname>>! You... Is this how you get so much money?"'
							'"It pays pretty well yeah."'
						else
							'"I see you''re watching me again, you like it that much?" You ask her in a sultry voice.'
							'"I-It''s... I-I''m not sure how I feel about it. The fact that I know it''s you is..." She starts stammering."'
						end
						if pav_slut < 100:
							'"Please don''t tell anyone about it." You ask her feeling ashamed she knows about your porn career now.'
						else
							'"You can watch that all you like. I was so wet when we shot this one. It''s amazing." You tell her proudly.'
						end
						'Natasha''s eyes keep darting unbelieving glances at you while the two of you watch the rest of the scene. You pay more attention to her reactions than what you''re doing on the screen, feeling amused each time you see her squirm.'
						'You start feeling aroused. More from watching Natasha than the porno. By the time it ends your pussy is wet.'
						'"That was pretty hot." She says at the end, her face completely red now. "Don''t worry, I won''t tell anyone.'
						gs 'arousal', 'porn', 20
						gs 'arousal', 'end'
						gs 'stat'
						act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
					else
						'You walk into the room quietly. Natasha doesn''t notice you until she feels the couch move as you sit down next to her. She jumps in surprise, completely red in the face from a mixture of arousal and embarrassment at being caught watching porn.'
						'Placing a hand on her knee you tell her: "It''s ok, I like watching a dirty movie myself from time to time."'
						'Natasha turns her attention back to the TV, and her eyes stay glued to the screen. You pay more attention to her reactions than what''s happening on the screen, feeling amused each time you see her squirm.'
						'You start feeling aroused. More from watching Natasha than the porno. By the time it ends your pussy is wet.'
						gs 'arousal', 'porn', 20
						gs 'arousal', 'end'
						gs 'stat'
						act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
					end
					killvar 'YourPorn'
				end
			end
		end
		act 'Leave the room':gt 'natbelapt', 'hallway'
	else
		act 'Leave the room':gt 'natbelapt', 'hallway'
	end
end

if $ARGS[0] = 'kitchen':
	$loc = 'natbelapt'
	$metka = 'kitchen'
	$menu_loc = 'natbelapt'
	$menu_arg = 'kitchen'
	menu_off = 0
	CLOSE ALL
	*clr & cla
	minut += 1
	$locclass = 'kitr'
	gs 'kit_din'
	gs 'stat'
	'<center><b><font color = maroon>Kitchen</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/kitchen.jpg"></center>'
	'The kitchen is small but has all the necessary things. There is a stove, a fridge, a sink, and a tiny dining table. Everything looks sparkling clean.'

	act 'Leave': gt 'natbelapt','hallway'
	act 'Look in the fridge': gt 'natbelapt', 'fridge'

	!! Kitchen events
	if rand(0,4) = 0 and NatbelQW['seethroughwearing'] = 1 and NatbelQW['seethroughkitchen'] = 0:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/seethroughkitchen01.jpg"></center>'
		NatbelQW['seethroughkitchen'] = 1
		'As you walk into the kitchen, you see Natasha pouring herself a glass of milk.'
		'When she notices you standing there her face starts turning red immediately.'
		'"I-I needed a drink." She stammers as she puts the milk back into the fridge and heads towards the door.'
		'"You''re forgetting your milk." You tell her, unable to hold in your laughter as you watch her dart back to the table and grabbing her glass before leaving as quickly as she can. Her face a brilliant shade of crimson by now.'
	elseif NatashaLoc = 3 and NatbelQW['seethroughwearing'] = 0:
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natfridge.jpg"></center>'
		'Natasha is rummaging through the fridge. You can''t help but admire her cute ass in those shorts.'
		act 'Leave': gt 'natbelapt','hallway'
		act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		if NatbelQW['QWstage'] > 6:
			gs 'willpower', 'exhib', 'force', 'easy'
			if will_cost <= pcs_willpwr:
				act 'Show me some skin (<<will_cost>> Willpower)':
					*clr & cla
					minut += 2
					gs 'willpower', 'pay', 'force'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natfridgeshow.jpg"></center>'
					'You grab her ass, making her jump and turn around. "Oh <<$pcs_nickname>>, you startled me."'
					'"You were just begging for it with your ass sticking out like that. And now I want more. Show me some skin, Natasha." You tell her.'
					if NatbelQW['MotherHome'] = 1:
						'Natasha glances at the doorway to check if her mother isn''t around and then quickly bares her breasts and pulls her shorts down to reveal her panties.'
						'Stepping closer you run your hand over her panties for a moment, feeling her shiver from a simple touch. "Ok, cover up, we don''t want your mom catching us here."'
					else
						'Natasha gives you a warm smile and then seductively bares her breasts and pulls her shorts down to reveal her panties.'
						'Stepping closer you run your hand over her panties for a moment, feeling her shiver from a simple touch. "Ok, cover up, we don''t want your mom coming home and catching us here."'
					end
					act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
				end
			else
				act 'Show me some skin (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
	elseif NatbelQW['MotherHome'] = 1 and rand(0,4) = 0 and NatbelQW['momrobe'] = 0:
		*clr & cla
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomkitchenrobe.jpg"></center>'
		NatbelQW['momrobe'] = 1
		minut += 5
		gs 'stat'
		'As you walk into the kitchen, you see <<$npc_nickname[''A191'']>> having a healthy snack, wearing only a thin robe.'
		'"Hello, <<$pcs_nickname>>." She greets you cheerfully without a hint of discomfort about the amount of skin she''s showing.'
		'The two of you make some small talk while she finishes eating.'
		act 'Leave': gt 'natbelapt','hallway'
		act 'Look in the fridge': gt 'natbelapt', 'fridge'
	end

	dynamic $driwater
	dynamic $dritea
	dynamic $fill_bottle
end

if $ARGS[0] = 'fridge':
	menu_off = 1
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/fridge.jpg"></center>'
	'You open the fridge and see that it mostly holds healthy things. Lots of vegetables, water, a bottle of lemonade and a couple of bottles of wine.'

	act 'Close the refrigerator': gt 'natbelapt', 'kitchen'

	if NatbelQW['cucumber'] = 0:
		act 'Take a cucumber':
			cla
			NatbelQW['cucumber'] = 1
			'You take a cucumber out of the fridge. This could come in handy.'
			act 'Continue': gt 'natbelapt', 'fridge'
		end
	end
! Needs some more interactions with items inside
end

if $ARGS[0] = 'natmother':
	$menu_loc = 'natbelapt'
	$menu_arg = 'natmother'
	menu_off = 0
	CLOSE ALL
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><b><font color = maroon>Natasha''s mother''s room</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/momroom.jpg"></center>'
	'The room is fairly bare, but everything is organized neatly, and it''s spotlessly clean. There is a bed, a big closet, and some bedstands next to the bed with lamps on them. Everything looks like it''s cleaned on a daily basis.'

	if NatbelQW['CaughtByNatMomHitachi'] >= 1:
		$NatbelQW['NatMomVibName'] = 'hitachi'
	else
		$NatbelQW['NatMomVibName'] = 'big vibrator'
	end

	if rand(0,4) = 0 and hour > 21 and NatbelQW['MotherHome'] = 1:
		'As you walk through the hallway, you hear a buzzing noise coming from <<$npc_nickname[''A191'']>>''s room'
		'Unable to resist your curiosity you push the door open a tiny bit so that you can peek inside.'
		act 'Don''t peek':gt 'natbelapt','hallway'
		act 'Look through the crack in the door':
			*clr & cla
			menu_off = 1
			NatbelQW['SeenNatMomHitachi'] += 1
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natmomhitachi11.jpg"></center>'
			'You can see <<$npc_nickname[''A191'']>> sitting on her bed with her eyes closed, wearing only her skirt which she has pulled up to expose her pussy.'
			'She is eagerly rubbing her <<$NatbelQW[''NatMomVibName'']>> on her pussy. Even though she''s obviously trying to be quiet, her moans of pleasure keep getting louder and louder. You feel your own pussy getting wet in response.'
			gs 'arousal', 'voyeur_sex', 3
			gs 'stat'

			act 'Keep looking':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natmomhitachi12.jpg"></center>'
				'After a few more minutes you notice <<$npc_nickname[''A191'']>> pressing a button, and the <<$NatbelQW[''NatMomVibName'']>> starts buzzing more loudly. She starts to press it against her pussy even harder. It doesn''t take long before you can clearly see her have an orgasm. She closes her legs around the <<$NatbelQW[''NatMomVibName'']>> to keep it firmly on her pussy while she bucks and lets out gasping breaths.'
				gs 'arousal', 'voyeur_sex', 3
				gs 'stat'

				act 'Keep looking':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natmomhitachi13.jpg"></center>'
					'Her eyes fly open, and you have no chance to leave unnoticed. You stand there frozen to the spot as she pulls down her skirt and tries to hide her breasts with her arm.'
					if NatbelQW['SeenNatMomHitachi'] >= 1:
						'"<<$pcs_nickname>>, You shouldn''t be spying on people in their bedrooms. Now go. We''ll talk about this later."'
					else
						'"<<$pcs_nickname>>, I should have known you''d come spying again. What is it that makes you so curious about these things?"'
						'"I-I''m not sure myself. I just am."'
						'"It''s your age I guess, now would you kindly close the door so that I can get decent?"'
					end
					gs 'arousal', 'end'
					gs 'stat'

					act 'Leave':gt 'natbelapt','hallway'
				end
			end
		end
	elseif hour < 7 or hour > 22:
		*clr & cla
		menu_off = 1
		if month < 4 or month > 9:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep3.jpg"></center>'
			'You look into the bedroom and see <<$npc_nickname[''A191'']>> sound asleep under the covers. Not wanting to disturb her you close the door and leave.'
		else
			if rand(1,2) = 1:
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep1.jpg"></center>'
				'You look into the bedroom and see <<$npc_nickname[''A191'']>>, sound asleep in her bra and panties. You can see part of her pussy from where you''re standing. Not wanting to disturb her you close the door and leave.'
				gs 'arousal', 'voyeur', 2
			else
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep2.jpg"></center>'
				'You look into the bedroom and see <<$npc_nickname[''A191'']>>, tossing in her sleep in her bra and panties. As you''re watching she rolls onto her back and puts her hand in her panties. "That must be one hell of an enjoyable dream." You think to yourself. Not wanting to disturb her you close the door and leave.'
				gs 'arousal', 'voyeur_sex', 4
			end
			gs 'arousal', 'end'
			gs 'stat'
		end
		act 'Leave':gt 'natbelapt','hallway'
!{		if month < 4 or month > 9:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep3.jpg"></center>'
			'You look into the bedroom and see <<$npc_nickname[''A191'']>> sound asleep under the covers. Not wanting to disturb her you close the door and leave.'
		end
		if rand(1,3) = 1:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep1.jpg"></center>'
			'You look into the bedroom and see <<$npc_nickname[''A191'']>>, sound asleep in her bra and panties. You can see part of her pussy from where you''re standing. Not wanting to disturb her you close the door and leave.'
		elseif rand(1,2) = 1:
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep2.jpg"></center>'
			'You look into the bedroom and see <<$npc_nickname[''A191'']>>, tossing in her sleep in her bra and panties. As you''re watching she rolls onto her back and puts her hand in her panties. "That must be one hell of an enjoyable dream." You think to yourself. Not wanting to disturb her you close the door and leave.'
			pcs_horny += 10
		else
			if rand(1,2) = 1:
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep1.jpg"></center>'
				'You look into the bedroom and see <<$npc_nickname[''A191'']>>, sound asleep in her bra and panties. You can see part of her pussy from where you''re standing. Not wanting to disturb her you close the door and leave.'
			else
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natmomsleep2.jpg"></center>'
				'You look into the bedroom and see <<$npc_nickname[''A191'']>>, tossing in her sleep in her bra and panties. As you''re watching she rolls onto her back and puts her hand in her panties. "That must be one hell of an enjoyable dream." You think to yourself. Not wanting to disturb her you close the door and leave.'
				pcs_horny += 10
			end
			gs 'arousal', 'voyeur', 2
			gs 'arousal', 'end'
			gs 'stat'
		end
		act 'Leave':gt 'natbelapt','hallway'
}
	elseif hour > 7 and hour < 21 and NatashaLoc = 5:
		*clr & cla
		menu_off = 1
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natdressing01.jpg"></center>'
		'As you walk into the room, you see Natasha trying out one of her mother''s sexier outfits, admiring herself in the bedroom mirror.'
		'"Wow, putting on a show for me Natasha?" You ask her as you walk into the room.'
		'At the sound of your voice, Natasha immediately turns to you and tries to hide just how short the skirt is with her hands.'
		if NatbelQW['QWstage'] > 6:
			gs 'willpower', 'exhib', 'force', 'easy'
			if will_cost <= pcs_willpwr:
				act 'Show me more (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'force'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natdressing02.jpg"></center>'
					'"Now don''t get shy on me. Such an outfit is made to draw attention, so stop covering up and give me a show."'
					'Natasha, noticing that you won''t take no for an answer, takes her hands away from the skirt and starts to dance around seductively, slowly raising her top to reveal her breasts.'
					'"You can show those wonderful tits to me anytime." You praise her.'
					gs 'arousal', 'foreplay', 3, 'exhibitionism', 'lesbian'
					gs 'stat'
					act 'Keep going':
						*clr & cla
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/natdressing03.jpg"></center>'
						'"Keep going, I want to see more of your pretty body." You nudge her on.'
						'By now Natasha seems to be enjoying giving you a striptease. She pulls her top off completely and moves over to a chair and starts running her hands over her own body, occasionally lifting the short skirt to give you a good look at her panties.'
						'She starts focusing on rubbing her legs, occasionally running her hands over her panties, rubbing her pussy through the fabric. As a final act, she moves them to the side to show you her wet pussy.'
						'"Ok, we better stop before your mom catches us. And you might want to throw those panties in the laundry, they look wet."'
						'Natasha quickly strips out of the rest of the outfit and quickly puts on her own clothes, red in the face from arousal.'
						gs 'arousal', 'foreplay', 3, 'exhibitionism', 'lesbian'
						gs 'arousal', 'end'
						gs 'stat'
						act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
					end
				end
			else
				act 'Show me more (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		else
			'"Hey, want to go hang out in your room?"'
			act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
		end
	else
		'Since nobody''s here, you should probably leave. Or you could take a look around if you''re that curious.'
		act 'Leave':gt 'natbelapt','hallway'
		act 'Look around':
			*clr & cla
			minut += 10
			menu_off = 1
			'<center><b><font color = maroon>Natasha''s mother''s room</font></b></center>'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/findhitachi.jpg"></center>'
			'You idly poke your head into her closet. Not much of interest there but a few dresses you wouldn''t mind trying on. Moving on to her bedside you poke through her drawers. The top one is filled with bras and panties. Some look pretty sexy.'
			'When you open the next drawer, you find the jackpot. There''s a bunch of sex toys in there. You pick up the biggest one in there.'
			act 'Play with it':
				if rand(0,4) = 0 and NatbelQW['MotherHome'] = 1:
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natmomhitachi01.jpg"></center>'
					if NatbelQW['SeenNatMomHitachi'] >= 1:
						'From when you saw <<$npc_nickname[''A191'']>> using it you have a pretty good idea of how good a vibrator it is.'
					else
						'When you press the button on it, it starts to vibrate in your hand. "Oh, it''s a vibrator." You think to yourself. "I have to give this a try."'
					end
					'You strip down quickly, wanting to get started. "I can just leave my bra on, it''s not going to suck on my tits." You think as you relax on <<$npc_nickname[''A191'']>>''s bed.'
					'You turn the big vibrator on and start rubbing it on your pussy. The stimulation is pretty intense, even at a low setting. Experimentally you turn up the speed causing you to let out a moan of pleasure as you feel your pussy getting soaking wet.'
					'Just as you''re really getting into it, you notice that the door is open now and <<$npc_nickname[''A191'']>> is standing over you looking at your bare pussy with her toy rubbing it all over.'
					gs 'arousal', 'vaginal_vibe', 10
					gs 'stat'
					act 'Say you''re sorry':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natmomhitachi02.jpg"></center>'
						if NatbelQW['CaughtByNatMomHitachi'] = 0:
							'"I-I..." You start, but she immediately cuts you off saying: "You shouldn''t be going through other people''s stuff <<$pcs_nickname>>. And you sure shouldn''t use anything you find without asking."'
							'"W-Without... asking? You mean..." You stammer. "Yes <<$pcs_nickname>>, I know girls your age are curious. And a Hitachi sure is a big temptation. It''s pretty much my favorite toy." She admits.'
							'"I can show you how good it is. Would you like that?" She adds, not quite able to hide her eagerness.'
						else
							'"I-I know I should have asked. I just couldn''t resist. It felt so amazing the last time." You tell her apologetically. "Could we... do that again?"'
							'"It''s ok sweety I had a feeling this would happen." She says, clearly unsurprised.'
						end
						act 'Let her':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/natmomhitachi03.jpg"></center>'
							'"Oh-Ok," You say, opening your legs and revealing your dripping pussy to her. She sits down next to you and takes the Hitachi.'
							'"Just lie back and enjoy it." She tells you as she starts rubbing it on top of your clit on a low setting. "First we''ll warm you up a bit before we turn up the speed."'
							'After about a minute of this, she spreads your pussy with her hand and then presses the Hitachi against your exposed clit. You instantly let out a loud moan, hoping that nobody outside the room heard it. The direct stimulation is so intense that you start squirming under it. While you''re still trying to adjust she starts turning up the speed.'
							'"Time to show you what it does on max speed. You''ll want one of your own after this." She says with a grin, as she turns it up all the way'
							*nl
							$orgasm_txt = 'Within seconds you feel your orgasm crash down on you. You start convulsing hard, trying to close your legs to escape further stimulation but <<$npc_nickname[''A191'']>> holds your legs open and keeps rubbing your pussy with the Hitachi for a good minute or two. As she lets go, you immediately close your legs and roll onto your side, still shaking in the grip of your orgasm. It takes you a few minutes to get back to yourself. Once <<$npc_nickname[''A191'']>> sees that you''re coherent again she asks: "I can clearly see that you liked it, but was I right that you''d want one yourself now?" Still too out of breath for speech you just smile and nod.'
							gs 'arousal', 'vaginal_vibe', 10, 'lesbian'
							gs 'arousal', 'end'
							gs 'stat'
							killvar '$orgasm_txt'
							'You can''t take it anymore and pull away, you mutter a excuse about needed to go and leave.'
							NatbelQW['CaughtByNatMomHitachi'] += 1
							act 'Leave': gt 'natbelapt','hallway'
						end
					end
				else
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/hitachi01.jpg"></center>'
					if NatbelQW['SeenNatMomHitachi'] >= 1:
						'From when you saw <<$npc_nickname[''A191'']>> using it you have a pretty good idea of how good a vibrator it is.'
					else
						'When you press the button on it, it starts to vibrate in your hand. "Oh, it''s a vibrator." You think to yourself. "I have to give this a try."'
					end
					'You strip down quickly, wanting to get started. "I can just leave my bra on, it''s not going to suck on my tits." You think as you relax on <<$npc_nickname[''A191'']>>''s bed.'
					'You turn the big vibrator on and start rubbing it on your pussy. The stimulation is pretty intense, even at a low setting. Experimentally you turn up the speed causing you to let out a moan of pleasure as you feel your pussy getting soaking wet.'
					'With your other hand, you start playing with your pussy, putting a finger inside, pulling it open occasionally to apply the vibrations to your clit directly, causing you to moan even louder.'
					gs 'arousal', 'vaginal_vibe', 10
					gs 'stat'
					act 'Contintue':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/natbelapt/sex/hitachi02.jpg"></center>'
						'The thought of doing this in someone else''s bedroom just makes it even more exciting. You feel your orgasm approaching rapidly as you start fingering yourself faster and faster. All the while rubbing your clit with as much pressure as you can stand.'
						$orgasm_txt = 'Within seconds you feel your orgasm crash down on you. You start convulsing hard, closing your legs and trapping the <<$NatbelQW[''NatMomVibName'']>> between them to hold it in place. After a few more seconds your orgasm starts to subside, and the vibrations start feeling uncomfortable, so you turn it off.'
						$orgasm_or = 'yes'
						gs 'arousal', 'vaginal_vibe', 10
						gs 'arousal', 'end'
						killvar '$orgasm_txt'
						'Deciding not to push your luck any further, you get dressed quickly and straighten out the bedsheets, trying to hide what you just did, but there''s no way to hide the wet spot on the sheets. You hope it won''t be noticeable by the time <<$npc_nickname[''A191'']>> goes to her bedroom.'
						gs 'stat'
						act 'Leave': gt 'natbelapt','hallway'
					end
				end
			end
		end
	end
end

--- natbelapt ---------------------------------