[edit] Natasha will now be asleep in her room between 23 and 6

locations/natbelapt.qsrc

@@ -385,7 +385,22 @@ if $ARGS[0] = 'natroom':
 	gs 'stat'
 	act 'Leave Natasha''s room': gt 'natbelapt', 'hallway'
 	'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
-	if natseethroughwearing = 1 and natstayroom = 0:
+	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 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
+			natsleeprand = rand (1, 4)
+			'<center><img src="images/characters/pavlovsk/school/girl/natasha/natsleep<<natsleeprand>>.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 'stat'
+		act 'Leave':gt 'natbelapt','hallway'
+	elseif natseethroughwearing = 1 and natstayroom = 0:
 		NatashaLoc = 2
 		if natseethroughworn < 5:
 			'<center><img src="images/characters/pavlovsk/school/girl/natasha/seethrough01.jpg"></center>'
@@ -416,7 +431,7 @@ if $ARGS[0] = 'natroom':
 		'On the left side, right behind the door is a small sofa and her desk and computer are in the back corner. Everything is neatly organised and clean.'
 	end
 		
-	if NatashaLoc = 2:
+	if NatashaLoc = 2 and hour > 6 and hour < 23:
 		if natseethroughwearing = 0:
 			'Natasha is sitting on the bed, looking at you with interest.'
 			
@@ -2260,7 +2275,7 @@ if $ARGS[0] = 'livingroom':
 				$ShowMsg = 'a romantic movie'
 			end
 		end
-		'You turn on the TV and switch from channel to channel until you see something you like. It''s <<$ShowMsg>>'
+		'You turn on the TV and switch from channel to channel until you see something you like. It''s <<$ShowMsg>>.'
 		if ShowRand ! 8:
 			minut += 60
 			gs 'stat'
@@ -2272,7 +2287,7 @@ if $ARGS[0] = 'livingroom':
 			*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.'
+			'"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 besides 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.'
@@ -2327,9 +2342,6 @@ if $ARGS[0] = 'livingroom':
 					end
 					
 					if YourPorn = 1:
-						minut += 15
-						pcs_horny += 20
-						gs 'stat'
 						if pav_slut < 50:
 							'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 aproach the couch.'				
 						else
@@ -2352,15 +2364,16 @@ if $ARGS[0] = 'livingroom':
 						'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 'stat'
 						act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
 					else
-						minut += 15
-						pcs_horny += 20
-						gs 'stat'
 						'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 'stat'
 						act 'Let''s go to your room': NatashaLoc = 2 & gt 'natbelapt', 'natroom'
 					end
 				end