Browse Source

Merge remote-tracking branch 'Anjuna/master'

# Conflicts:
#	locations/artem_katja_sex.qsrc
#	locations/nyp_school.qsrc
Kevin_Smarts 1 day ago
parent
commit
3216e5610a

+ 2 - 0
glife.qproj

@@ -417,6 +417,7 @@
 		<Location name="shop_allure"/>
 		<Location name="gloryhole"/>
 		<Location name="home_activity"/>
+		<Location name="home_events"/>
 	</Folder>
 	<Folder name="Transportation">
 		<Location name="transport_functions"/>
@@ -860,6 +861,7 @@
 		<Location name="natbel_chat"/>
 		<Location name="natbel_cp_1"/>
 		<Location name="natbel_friend"/>
+		<Location name="natbel_kissinggames"/>
 		<Location name="natbelapt"/>
 		<Location name="natbelEv"/>
 		<Location name="natkolEv"/>

+ 2 - 2
locations/bedrPar.qsrc

@@ -1,7 +1,6 @@
 # bedrPar
 
 *clr & cla
-fromoutside = iif($loc = 'bedrPar',0,1)
 menu_off = 0
 minut += 1
 !!day check so mom doesn''t think you have been out all night if you get up very early
@@ -20,7 +19,7 @@ gs 'music_actions', 'clear_restrictions'
 if ml_performance['max_perform_minutes'] = 0: ml_performance['max_perform_minutes'] = pcs_instrmusic + pcs_vokal
 
 if $ARGS[0] = '' or $ARGS[0] = 'start':
-	if locat['Mother'] = 26 and fromoutside and func('homes_properties', 'can_live_here'):
+	if locat['Mother'] = 26 and $prevloc = 'bedrPar' and func('homes_properties', 'can_live_here'):
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost1.jpg"></center>'
 		if mc_inventory['equipped_condoms'] > 0 and rand(1,3) = 1 and mom['condoms'] = 0:
 			gt 'mother', 'condom_find'
@@ -280,4 +279,5 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 	end
 end
 
+
 --- bedrPar ---------------------------------

+ 4 - 2
locations/cafe_parco.qsrc

@@ -37,13 +37,15 @@ if $args[0]= 'inner':
 		act 'Accept Zariyah''s offer': gt 'music_delparco', 'acceptafterthinking'
 	end
 
-	!! The very first gig - this will be a separate scene from the repeating ones. 
+	!! The very first gig - this will be a separate scene from the repeating ones.
 	if ml_venues['del_parco'] = 1 and ml_delparcoQW['Stage'] = 4 and ml_gigday['delparco'] = daystart and ml_gighour['delparco'] = hour:
 		act 'Perform at the cafe': gt 'music_delparco', 'eveningshow'
 	end
-	
+
 	if LariskaQW['story'] = 12 and week = 6: act 'Join Lariska and Lev': gt 'lariska_storyline','Boyfriend_3'
 
+	if NatbelQW['bday_invite'] = 1 and week = 6 and month = 7 and day >= 6 and day < 13 and (hour = 18 and minut >= 30 or hour = 19): act 'Look for Natasha and Bella': gt 'natbel_friend', 'bday_del_parco'
+
 	if (sunWeather = 0 or temper < 5) and week mod 2 = 0 and (hour >= 14 and hour < 20) and mey_vika_qw_day ! daystart:
 		mey_vika_qw_day = daystart
 		minut += rand(10,20)

+ 3 - 11
locations/gad_field.qsrc

@@ -371,18 +371,10 @@ if $ARGS[0] = 'set_nomira_acts':
 				'Since the cows are all behaving, you spend some time jogging around the field.'
 
 				frost = 0
-				minut += 60
-				fat -= 5
-				gs 'exp_gain', 'run', 1
-				gs 'sweat', 'add', 10
-				pcs_mood += 5
-				pcs_stam -= 8
+				gs 'exercise', 'tier1', 60, 'run'
 				if temper >= 25 and sunWeather = 1:
-					pcs_hydra -= 24
-					gs 'sweat', 'add', 12
-				else
-					pcs_hydra -= 18
-					gs 'sweat', 'add', 10
+					pcs_hydra -= 6
+					gs 'sweat', 'add', 2
 				end
 				gs 'stat'
 

+ 8 - 0
locations/gschool_nerd_chats.qsrc

@@ -410,6 +410,13 @@ if $ARGS[0] = 'natasha':
 		else
 			'Natasha greets you with a smile as you sit down beside her. The conversation is lighthearted as you talk about your day so far and what goes on in the apartment complex where you both live.'
 		end
+
+		if natbel_unlock = 1 and NatbelQW['FriendLover'] >= 3 and NatbelQW['end_of_gschool_chat'] = 0:
+			if year = 2017 and (month = 4 and day >= 26 or month = 5 and day < 26):
+				'"I want to talk to you, could you drop by my place later?" Natasha asks.'
+			end
+		end
+
 		func('npc_reactions', 'general', 'A16')
 	elseif npc_rel['A16'] <= 20 and fame['pav_slut'] < 200:
 		if grupTipe = 3:
@@ -425,6 +432,7 @@ if $ARGS[0] = 'natasha':
 		func('npc_reactions', 'general', 'A16')
 	end
 
+
 	act 'Time for the next class': gt 'gschool_lessons', 'short_break'
 
 	if NatbelQW['QWstage'] = 0 and npc_rel['A16'] >= 60 and fame['pav_slut'] < 200:

+ 590 - 0
locations/home_events.qsrc

@@ -0,0 +1,590 @@
+# home_events
+
+if arrpos('$ARGS', 'entry') >= 0:
+	if func('homes_properties', 'is_current_home', $loc):
+		gs 'courtletter'
+
+		if natbel_unlock = 1 and NatBelQW['FriendLover'] = 8 and NatBelQW['Bella'] = 0 and hour >= 19 and hour < 23:
+			if $loc ! 'korrPar':
+				xgt 'home_events', 'natbel'
+			elseif NatBelQW['mother_talk'] = 2:
+				xgt 'home_events', 'natbel_pav'
+			end
+		end
+	end
+
+	if $loc ! 'korrPar':
+		if parkblackmail = 1 and parkday ! daystart:
+			parkblackmail = 2
+			parkday = daystart
+			'A heavy envelope has arrived in the mail. When you open it, you''re horrified to find several pictures of you giving blowjobs to the guys in the park inside. A small note accompanying them says:'
+			*nl
+			'"If you don''t want these pictures to be posted on your door and sent to your work place, then come to this address. If you don''t come today, these pictures will be hanging in your stairwell tomorrow."'
+			*nl
+			'You check the address and find that it''s Aphrodite Photography in the City Center.'
+			exit
+		elseif parkblackmail = 2 and parkday ! daystart:
+			parkblackmail = 0
+			fotoyousuck = 1
+			'You''re horrifed and embarrassed when you see photos of you with your face covered in cum with two dicks in your mouth covering your stairwell walls.'
+			exit
+		end
+
+		if santehnikDolg > 0 and money >= santehnikDolg and hour >= 9 and hour < 21:
+			'<b><font color = red>The doorbell rings</font></b>'
+			act 'Answer the door':
+				cla
+				menu_off = 1
+				gs 'stat'
+				'You go to the door and look through the peephole to see a dark male figure. "It''s me. Grisha, the plumber. You owe me some money, remember?" he says through the door.'
+				act 'Open the door':
+					cla
+					money -= santehnikDolg
+					killvar 'santehnikDolg'
+					gs 'stat'
+					'You open the door and Grisha smiles. "I thought you were hiding from me. So, do you have my money?" You nod and pay him the money you owe.'
+					act 'Close the door': gt $loc, $loc_arg
+				end
+			end
+		end
+
+		if BurgerQW['IlyQW'] = 1 and BurgerQW['IlyQWDay'] ! daystart and hour >= 8 and hour < 21:
+			xgt 'home_events', 'burgerIly1'
+		elseif BurgerQW['IlyQW'] = 3 and hour >= 9 and hour < 21:
+			gt 'home_events', 'burgerIly3'
+		end
+
+		if gopstop > 30: gt 'police', '1'
+
+		if sick > 0 and doktorday ! daystart:
+			act 'Call a doctor': gt 'home_events', 'call_doctor1'
+		end
+
+		!!if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
+	end
+end
+
+if arrpos('$ARGS', 'livingroom') >= 0:
+
+end
+
+if arrpos('$ARGS', 'bedroom') >= 0:
+
+end
+
+if arrpos('$ARGS', 'kitchen') >= 0:
+
+end
+
+
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                               EVENTS                              !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'call_doctor1':
+	*clr & cla
+	menu_off = 1
+	doktorday = daystart
+	minut += 15
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall.jpg"></center>'
+	'You dial the number of the clinic several times, but it''s always busy.'
+
+	act 'Keep trying':
+		cla
+		'Finally, a tired nurse''s voice answers. "Hello, this is the clinic. How can I help you?"'
+
+		act 'Ask for doctor':
+			cla
+			'"Hello. Can I get a house call?" you manage to say between coughing fits.'
+			'"Your name and address, please?" she asks.'
+
+			act 'Give your address':
+				cla
+				'You have a coughing fit before you''re able to answer. "Sorry, it''s <<$pcs_firstname>> <<$pcs_lastname>>. Street Park House 4, apartment 69," you manage before sneezing.'
+				'"One moment please," she responds before she puts you on hold.'
+
+				act 'Wait':
+					cla
+					minut += 5
+					gs 'stat'
+					'You wait for five minutes, occasionally coughing and sneezing, until she finally returns. "So Miss <<$pcs_lastname>>, what are your symptoms?"'
+					'You start to answer, but end up coughing. "Sorry. I have a fever, sore throat, a cough and a runny nose."'
+					'"Is your temperature high?"'
+					'"Yes, quite so. 39.2°C," you tell her, followed by a sneeze.'
+					'"Very well. A doctor will come see you at home."'
+					'"How soon?"'
+					'"As soon as one is free," she answers. "Yours isn''t an isolated case."'
+					'"Thank you," you respond and hang up.'
+
+					if ninelsex = 1:
+						act 'Is Ninel available?':
+							cla
+							'"Is Doctor Pavlovna available? She''s my regular doctor."'
+							'"Let me check." The nurse puts you on hold for a few minutes before returning. "Yes, she is free and will make the house call."'
+							'"Once again, thank you very much," you reply and hang up.'
+
+							act 'Continue': gt 'housecall', 'ninel3'
+						end
+					end
+
+					act 'Go back to bed':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick<<rand(21, 27)>>.jpg"></center>'
+						minut += rand(1, 6) * 30
+						'You lie in bed, shivering while wrapped in a blanket. Time drags by painfully slow and you can''t say how much time passes before the doorbell rings.'
+
+						! WD: Uninitialised ~ 'ninel' use 'ninelmet'
+						act 'Answer the door':
+							if ninelmet > 0 and sick <= 50:
+								gt 'housecall', 'ninel1'
+							else
+								if rand(0, 1) = 0:
+									gt 'home_events', 'call_doctor2'
+								else
+									gt 'housecall', 'ninel0'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'call_doctor2':
+	*clr & cla
+	'You answer the door and an older, balding man with a medical bag in his hand is standing on the threshold.'
+	'"Hello, doctor."'
+	'"Hello, dear. I''m the local doctor. Now please go back to bed and don''t stand in this cold air."'
+
+	act 'Go back to bed':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp1.jpg"></center>'
+		'You walk back to the bedroom with the doctor. He sits on the edge of the bed and feels your forehead.'
+		'"So Miss <<$pcs_lastname>>. What are your symptoms?'
+		'"Ahem... I have a sore throat - very sore actually - and a high temperature."'
+		'"And a nasty cough too I see. And judging by your voice, also a running nose."'
+		'"Yes... Aachoo!!"'
+		'"Please remove your clothes so I can examine you."'
+
+		act 'Undress':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp2.jpg"></center>'
+			'You undress and the doctor listens to your lungs for a while.'
+			'"Now let''s take a look at your throat. Open your mouth wide and say ''ahh''."'
+
+			act 'Aahh':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp3.jpg"></center>'
+				'You open your mouth and the doctor looks in.'
+				'"Mmmm, I see. Well, let''s take your temperature."'
+
+				act 'Put the thermometer under your armpit':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp4.jpg"></center>'
+					'The doctor waits a few minutes, then looks at the thermometer and shakes his head.'
+
+					act 'What''s wrong with me?':
+						cla
+						'"You have the flu," he calmly replies. "Nothing too serious, I''ll just give you an injection and you''ll feel better soon. Stay in bed, drink plenty of fluids and try to rest as much as possible. Now please roll over so I can give you the injection."'
+
+						act 'Roll over and lay on your stomach':
+							*clr & cla
+							minut += 10
+							sick -= 2
+							mc_inventory['antibiotics'] += 3
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp5.jpg"></center>'
+							'You whimper slightly as the doctor jabs a needle into your ass and injects the contents.'
+							'"Now remember. Stay in bed, drink lots of fluids and try to rest. When you feel better, come by the clinic."'
+							'"Thank you, Doctor, I will."'
+							'You escort the doctor back to the entrance where he says goodbye and leaves. After shutting the door, you head back to bed.'
+
+							act 'Go back to bed': gt 'bedr'
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+
+
+$ninel0 = "gt 'home_events', 'ninel0'"
+if $ARGS[0] = 'ninel0':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/ninel00.jpg"></center>'
+	'You open the door and see a pretty young girl with a medical bag in her hand standing on the threshold.'
+	'"Hello, my name is Ninel Pavlovna. I do the home visits for the clinic. Where is the patient?"'
+	'"That would be me..."'
+	'"I see. First, we need to get you back into bed."'
+
+	act 'Go back to bed':
+		*clr & cla
+		ninelmet = 1
+		'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom0.jpg"></center>'
+		'Ninel sits on the edge of your bed and checks your forehead.'
+		'"What are your symptoms, <<$pcs_nickname>>? Can I call you that?"'
+		'"Of course..." You start to answer, but end up coughing. "Sorry. I have a high fever, a sore throat and a cough that''s killing me!"'
+		'"Running nose? Headaches? Aching bones?"'
+		'"Yes, all of them."'
+		'"Please take your clothes off so I can examine you."'
+
+		act 'Undress':
+			*clr & cla
+			minut += 5
+			pcs_horny += 10
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom1.jpg"></center>'
+			'You undress and Ninel listens to your lungs for a long time. Her hands are cool and gentle as she touches you, while the stethoscope is cold.'
+			'"Mmmm, now let''s take a look at your mouth. Open wide and say ''aah''."'
+
+			act 'Ahh':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/ninel03.jpg"></center>'
+				'You open your mouth and she looks in, examining your sore throat.'
+				'"I see. Your throat is very red and inflamed. Now we need to take your temperature.'
+
+				act 'Put a thermometer in your mouth':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/ninel04.jpg"></center>'
+					'"No, not like that. The temperature needs to be measured rectally."'
+					'"What...?"'
+					'"It''s more precise. Don''t be afraid, it''s not painful."'
+					'"Well if I have to..."'
+					'"It''s necessary. Come on, lie down on your stomach and spread your buttocks with your hands please."'
+
+					act 'Change position':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom2.jpg"></center>'
+						'You obediently roll over and spread your ass as Ninel lubricates your anus with some vaseline and deftly introduces the thermometer. You flinch, not from pain but pleasure. The doctor doesn''t just stick the thermometer in your ass, but slowly moves it back and forth. It''s very nice and you feel your excitement growing.'
+						gs 'arousal', 'anal_dildo', 10
+						gs 'stat'
+
+						if pcs_horny >= 50:
+							act 'Moan in pleasure':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom3.jpg"></center>'
+								'The doctor takes the thermometer out of your ass and checks it.'
+								'"39.2. Very bad. Please turn on your back, I need to palpate the lymph nodes."'
+
+								act 'Roll over on your back':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom5.jpg"></center>'
+									'The doctor begins to stroke and knead your stomach and thighs. You''re not actually sure if this is a real medical procedure. She does it for far too long, but it''s too pleasant and you don''t object.'
+									'Your excitement continues to grow and you feel your pussy moistening as you start to moan softly.'
+									gs 'arousal', 'foreplay', 15
+									gs 'stat'
+
+									act 'Blush in embarrassment':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom6.jpg"></center>'
+										'You blush with embarrassment, but then fall below the hands of Ninel as she starts caressing your pussy.'
+										'"Doctor, what are you doing!" you scream, feeling embarrassed, outraged and frightened.'
+										'"I feel the magic in you, which means you''re one of us, and I can use my healing powers on you," she replies.'
+										'"So you''re a succubus too?!"'
+										'"Yes, but only with a special kind of magic. Tantric. Have you heard of it?'
+										'"No, I don''t think so..."'
+										'"It''s based on sensuality and sex. Roughly speaking, I can only cast spells when having sex."'
+										'"So...?"'
+										'"That is, if I have sex with you, I will heal you. So? Do you agree?"'
+										'"And what should I do in return?"'
+										'"Nothing. I''m doing it solely for my own satisfaction."'
+										'"Then of course I agree."'
+										gs 'arousal', 'foreplay', 15
+										gs 'stat'
+
+										act 'Surrender to the gentle hands of Ninel':gt 'housecall', 'ninel2'
+									end
+								end
+							end
+						end
+
+						act 'Indignant':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom3.jpg"></center>'
+							'"What the hell are you doing?!" you squeal.'
+							'She takes the thermometer out of your ass. "I''m measuring your temperature. 39.2. Very bad," she calmly replies.'
+
+							act 'What''s wrong with me?':
+								cla
+								'"Doctor, what''s wrong with me?" you ask, somewhat scared.'
+								'"You have a really bad flu, but I''ll make you an injection of antibiotics and antigens and you''ll soon feel better."'
+
+								act 'Get injection':
+									*clr & cla
+									minut += 10
+									sick -= 2
+									lekar += 3
+									gs 'stat'
+									'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom4.jpg"></center>'
+									'You whimper slightly as Ninel jabs the needle into one of your ass cheeks and injects the contents.'
+									'"That''s about everything. You have to rest in bed, drink hot drinks, take antibiotics and nose drops and stay on a balanced diet. When your temperature drops, come to the clinic to see me."'
+									'"Thank you, Doctor, I''ll follow your instructions."'
+									'Ninel smiles and says goodbye before leaving.'
+
+									act 'Back to bed': gt 'bedr'
+								end
+							end
+						end
+
+						act 'What''s wrong with me?':
+							cla
+							'"Doctor, what''s wrong with me?" you ask fearfully.'
+							'"I''m afraid you have angina, <<$pcs_nickname>>. I would advise you recieve immediate treatment," she replies.'
+							'"What? You mean in the hospital?!" you shriek.'
+							'"Yes, at the clinic," she calmly replies.'
+
+							act 'Refuse':
+								*clr & cla
+								'"I can''t go to the hospital!"'
+								'She smiles at you. "Well... I guess we could do it a different way then. I''ll give you a few shots to start with."'
+								'"Oh thank you, doctor!"'
+
+								act 'Lie on your stomach and bare your ass':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom9.jpg"></center>'
+									'The doctor jabs a needle into your ass cheek and you find yourself suddenly becoming incredibly aroused, your pussy growing wet and aching to be invaded as your breath quickens and your nipples grow hard with desire.'
+									'"Doctor, what''s happening?" you ask, almost screaming. You feel embarrassed and frightened, but your voice breaks, betraying your arousal, and you moan voluptuously.'
+									'"I knew it! I can feel the magic in you, which means you''re one of us, and I can use my healing powers on you."'
+									'"So you''re a succubus too?!"'
+									'"Yes, but only with a special kind of magic. Tantric. Have you heard of it?"'
+									'"No, I don''t think so..."'
+									'"It''s based on sensuality and sex, roughly speaking, I can cast spells only while having sex."'
+									'"So...?"'
+									'"That''s it. If we have sex, I will heal you. Do you agree?"'
+									'"And what should I do in return?"'
+									'"Nothing. I''m doing it solely for my own satisfaction."'
+									'"Then I agree."'
+									gs 'arousal', 'foreplay', 15
+									gs 'stat'
+
+									act 'Surrender to the gentle touch of Ninel': gt 'housecall', 'ninel2'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'burgerIly1':
+	'<b><font color = red>The doorbell rings</font></b>'
+	act 'Answer the door':
+		cla
+		menu_off = 1
+		gs 'stat'
+		'You walk up to the door and look through the peephole. You see a few men, and even in the dark, you recognize them from their caps. "<<$pcs_firstname>> <<$pcs_lastname>>! This is the police, open up!"'
+		act 'Open the door':
+			cla
+			minut += 120
+			BurgerQW['IlyQW'] = 2
+			gs 'stat'
+			'You open the door, wondering what they want from you. There are several men in uniform and others in civilian clothes. A lean and skinny man with with a weeks worth of stubble and a pistol in a holster slung under his armpit speaks to you. "Please take a seat while we search the apartment. This is a warrant for your arrest and this is a search warrant for your apartment. You can read them." The men start searching your apartment and a few minutes later, one of them reappears. "Here are the keys. According to the description, these look like the keys to the office and the safe where the money was stolen." The detective frowns at you and nods at the officer, who pulls your hands behind your back and snaps the handcuffs around your wrists.'
+			wait 1500
+			'You''re escorted out of the building in handcuffs and pushed into a police car. After the door slams shut, the car starts up and drives through the city streets until it stops outside the police station and you''re pulled out and brought into an interview room where the dectective is waiting for you. He takes the handcuffs off you and offers you a seat. You sit in a hard and uncomfortable chair while the detective turns the TV on and inserts a video tape. On the screen is footage from a security camera in Bystroeshke showing you appear in the corridor and enter the office before exiting a few minutes later holding a thick envelope. The detective takes the tape out and inserts another one.'
+			'It shows Chubais'' office. The door opens and you walk in holding some keys. You go to the safe, open it with one of the keys and take the envelope with <<$BurgerQW[''IlySecurityCamDesc'']>> written on it. The detective turns the TV off, picks up a plastic bag with the keys inside and finally speaks. "Tests prove that the keys found in your apartment are those to the office and the safe of Bystroezhki. The tapes from the surveillance cameras clearly show you entering the office and taking 650,000 rubles." He takes out a pen and paper and begins to write. While writing, he looks up at you with gloomy eyes. "A confession will help you in the court. Since this is a first time offense and provided you return the money, you may be given a suspended sentence if you admit your guilt."'
+			act 'Sign the confession':
+				cla
+				minut += 60
+				gs 'stat'
+				'You sign the confession and the detective signals for an officer, who enters the room as the detective nods in your direction. "Take her."'
+				act 'Go with him': gt 'kameraKPZ'
+			end
+			act 'Tell the truth':
+				cla
+				minut += 60
+				gs 'stat'
+				'You tell the detective what actually happened and how Ilyushkin framed you, but he barely listens to you before he slams his fist on the table and yells at you. "I wasn''t born yesterday! If you will not cooperate, you''ll rot in prison!" An officer then enters the room and the detective nods in your direction. "Take her."'
+				act 'Go with him': gt 'kameraKPZ'
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'burgerIly3':
+	*clr & cla
+	menu_off = 1
+	BurgerQW['IlyQW'] = 4
+	if DolgRS <= moneySUM:
+		money = moneySUM - 650000
+		karta = bankDebtLimit
+		stolmoney = 0
+		minut += 120
+		gs 'stat'
+		'The police arrive and take you to court. You manage to pay off your debts and are released.'
+
+		act 'Leave the courthouse': gt 'city_center'
+	else
+		DolgRS = 590000 - moneySUM
+		money = 0
+		karta = bankDebtLimit
+		stolmoney = 0
+		vidage += 7
+		year += 5
+		age = year - (pcs_dob / 10000)
+		money = 2000
+		gs 'stat'
+		'The police arrive and take you to court. After standing trial, you''re given five years of jail time and are required to pay your debt of <<DolgRS>>.'
+
+		act 'Serve your time':
+			cla
+			srok_kolvo = 1
+			srok_otsidki += 5
+			pcs_mass['body'] = 10
+			fat = 10
+			if defcurly = 0:
+				curly = 0
+			else
+				curly = 2147483647
+			end
+			straight = 0
+			pcs_makeup = 1
+			pcs_skin = 0
+			pcs_tan = 0
+			pcs_leghair = 12
+			pcs_pubes = 30
+			bfa = 0
+			drugVars['cocaine_addict'] = 0
+			drugVars['cocaine_system'] = 0
+			drugVars['heroin_need'] = 0
+			work = 0
+			workKafe['job'] = 0
+			workhosp = 0
+			worksalon = 0
+			tanwork = 0
+			workSec = 0
+			preg = 0
+			young_shop_work = 0
+			gs 'uniutil', 'student', 'unenroll'
+			gs 'stat'
+			'Time drags on slowly. Your life and work are tedious and monotonous. You sew, have meals in the dining room and go to sleep surrounded by other female inmates. 1,000 <b>₽</b> of your 2,000 <b>₽</b> per month salary goes towards your debt repayment.'
+			'As slow as it seems, time doesn''t stand still and your torment finally comes to an end. You''re released and given 2,000 <b>₽</b>. You board the train and return to the city.'
+			act 'Get off the train': gt 'city_industrial_train', 'outside'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'natbel':
+	menu_off = 1
+	gs 'stat'
+
+	act 'There''s an urgent knocking on your front door':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha60.jpg"></center>'
+		'You hear someone knocking on your front door and go to see who it is.'
+		'As you reach the door you are faced with a clearly distraught Natasha who starts talking very fast and is very emotional so you can''t really make out what she''s saying. "Natasha, take a breath; I can''t understand what you''re saying. What''s wrong?"'
+		'She takes a deep breath then tells you. "It''s my <<$npc_nickname[''A29'']>>. She went out with a guy from work and I got a call from the bartender at Del Parco saying that she and the guy had a massive row and then she''s got very drunk and passed out. I don''t know what to do, can you help me get her home please as I probably won''t manage by myself?"'
+
+		act 'Go and help':
+			*clr & cla
+			minut += 40
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha61.jpg"></center>'
+			'Feeling that you have little choice you grab your coat and head out with Natasha to help her get Bella home.'
+			'"I''m so sorry about this <<$pcs_nickname>>, I know she likes a drink but doesn''t normally get this bad. I guess something happened with this guy to trigger it."'
+			'You reassure her. "Don''t worry about it and I guess we''ll all need someone to help us in similar circumstances at some point during our lives."'
+			'On arriving you spot Bella slumped over the bar and go to help her home.'
+			'As you both take hold of her she starts mumbling and slurring. You can''t make out a lot of it other than she had a date with a guy she fancied and they had a big argument following which she spent the rest of the evening drowning her sorrows.'
+
+			act 'Put Bella to bed':
+				*clr & cla
+				minut += 15
+				NatBelQW['Bella'] = 1
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images\locations\pavlovsk\resident\apartment\natbelapt/natmomsleep3.jpg"></center>'
+				'When you get back you both sit Bella on her bed and get her undressed leaving her in her underwear.'
+				'Before lying her down you tell Natasha to get some water and give it to her to drink.'
+				'The walk home and the water has helped sober her up a bit and although she''s still slurring she apologises and thanks you for helping Natasha get her home as well as having another rant about her failed date.'
+				'Once she finished her water she lies down and immediately falls asleep.'
+				'Natasha gives you a big hug as a silent thank you before you leave Bella''s bedroom. "Okay Natasha I guess you can take it from here so I''ll get home as it''s getting late."'
+				'She sees you to the door and you share a kiss before you leave to return home.'
+
+				act 'Stop talking': gt 'pod_ezd', 'etaj_2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'natbel_pav':
+	menu_off = 1
+	gs 'stat'
+
+	act 'There''s an urgent knocking on your front door':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha60.jpg"></center>'
+		'You hear someone knocking on your front door and go to see who it is but your <<$npc_nickname[''A29'']>> has already answered it and is talking to Natasha.'
+		'As you approach your <<$npc_nickname[''A29'']>> turns to you. "<<$pcs_nickname>>, it''s your girlfriend! There''s a problem with her <<$npc_nickname[''A29'']>> and she needs your help. Just don''t stay out too late." She then turns away and doesn''t look happy; unsurprising really but it could have been worse you think.'
+		'As you reach the door you are faced with a clearly distraught Natasha who starts talking very fast and is very emotional so you can''t really make out what she''s saying. "Natasha, take a breath; I can''t understand what you''re saying. What''s wrong?"'
+		'She takes a deep breath then tells you. "It''s my <<$npc_nickname[''A29'']>>. She went out with a guy from work and I got a call from the bartender at Del Parco saying that she and the guy had a massive row and she''s got very drunk and passed out. I don''t know what to do, can you help me get her home please as I probably won''t manage by myself?"'
+
+		act 'Go and help':
+			*clr & cla
+			minut += 40
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha61.jpg"></center>'
+			'Feeling that you have little choice you grab your coat and head out with Natasha to help her get Bella home.'
+			'"I''m so sorry about this <<$pcs_nickname>>, I know she likes a drink but doesn''t normally get this bad. I guess something happened with this guy to trigger it."'
+			'You reassure her. "Don''t worry about it and I guess we''ll all need someone to help us in similar circumstances during our lives."'
+			'On arriving you spot Bella slumped over the bar and go to help her home.'
+			'As you both take hold of her she starts mumbling and slurring. You can''t make out a lot of it other than she had a date with a guy she fancied and they had a big argument following which she spent the rest of the evening drowning her sorrows.'
+
+			act 'Put Bella to bed':
+				*clr & cla
+				minut += 15
+				NatBelQW['Bella'] = 1
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images\locations\pavlovsk\resident\apartment\natbelapt/natmomsleep3.jpg"></center>'
+				'When you get back you both sit Bella on her bed and get her undressed leaving her in her underwear.'
+				'Before lying her down you tell Natasha to get some water and give it to her to drink.'
+				'The walk home and the water has helped sober her up a bit and although she''s still slurring she apologises and thanks you for helping Natasha get her home as well as having another rant about her failed date.'
+				'Once she finished her water she lies down and immediately falls asleep.'
+				'Natasha gives you a big hug as a silent thank you before you leave Bella''s bedroom. "Okay Natasha I guess you can take it from here so I''ll get home as it''s getting late."'
+				'She sees you to the door and you share a kiss before you leave to return home.'
+
+				act 'Your <<$npc_nickname[''A29'']>> is waiting for you':
+					*clr & cla
+					minut += 15
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="images\characters\pavlovsk\resident\mom\prost2"></center>'
+					'When you arrive back your <<$npc_nickname[''A29'']>> is waiting for you and calls you into the kitchen. "Well <<$pcs_nickname>> so I guess that''s your girlfriend then?"'
+					'You nod to confirm as your <<$npc_nickname[''A29'']>> continues. "Well despite the circumstances she seems a nice polite girl. Erm... I guess that the issue with her <<$npc_nickname[''A29'']>> was drink related."'
+					'Before you can answer she continues. "Before you ask me why I said that I''m aware of her circumstances; she had a terrible breakup with her husband and now works in a factory so she doesn''t have too much in the way of a good life. All that being said she''s clearly done a good job bringing Natasha up despite her circumstances."'
+					'Unsure of what to reply you smile at your <<$npc_nickname[''A29'']>>'
+					'Your <<$npc_nickname[''A29'']>> gives you a short hug then continues. "Well I guess what I''m trying to say is that although I don''t approve of you being with a girl as I was hoping you may find a nice man, however, I do approve of you being good friends with Natasha. Guess I''ll have to work on my prejudice if you two stay together as, I do love you and want the best for you <<$pcs_nickname>>. Anyway I''m rambling and it''s getting late now so off you go." She says with a smile.'
+
+					act 'Stop talking': gt 'bedrPar'
+				end
+			end
+		end
+	end
+end
+
+
+--- home_events ---------------------------------

+ 14 - 465
locations/korr.qsrc

@@ -21,16 +21,28 @@ if ml_performance['max_perform_minutes'] = 0: ml_performance['max_perform_minute
 
 if sound = 0:PLAY 'sound/korr.mp3',30
 
-gs 'courtletter'
+'<center><b><font color="maroon">Corridor</font></b></center>'
+
+if remkorr = 0:
+	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/home/korr.jpg"></center>'
+	'The wallpaper in the hallway has long since faded and is peeling from the walls. A <a href="exec:gt ''mirror'', ''start''">mirror</a> hangs on the wall.'
+else
+	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/home/korr2.jpg"></center>'
+	'A modern hall with stylish furniture, including a wall-mounted <a href="exec:gt ''mirror'', ''start''">mirror</a>.'
+end
+
+gs 'home_events', 'entry'
 
 if lesbiday + 14 <= daystart and lesbiQW >= 11 and hour >= 19 and santehnikDolg = 0:
 	if rand(0, 100) > 82 and $husID = '':
-		gt 'lesbimistress','mistvisit'
+		gt 'lesbimistress', 'mistvisit'
 	else
 		lesbiday += 1
 	end
 end
 
+
+
 act '<b>Go to the stairwell</b>':
 	*clr & cla
 	if $clothingworntype = 'nude':
@@ -76,473 +88,10 @@ else
 	end
 end
 
-'<center><b><font color="maroon">Corridor</font></b></center>'
-
-if remkorr = 0:
-	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/home/korr.jpg"></center>'
-	'The wallpaper in the hallway has long since faded and is peeling from the walls. A <a href="exec:gt ''mirror'', ''start''">mirror</a> hangs on the wall.'
-else
-	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/home/korr2.jpg"></center>'
-	'A modern hall with stylish furniture, including a wall-mounted <a href="exec:gt ''mirror'', ''start''">mirror</a>.'
-end
-
 if mc_inventory['umbrella'] > 0:'Your umbrella hangs on a hook.'
 
 if krolik = 1:'Your rabbit <a href="exec:gt ''krol'', ''start''"><<$namekrol>></a> sits in it''s cage on the floor.'
 if ParrotQW['Owned1'] = 1:'Your parrot <a href="exec:gt ''popu'', ''start''"><<$ParrotQW[''Name1'']>></a> sits in it''s cage.'
 
-if parkday ! daystart and parkblackmail = 1:
-	parkblackmail = 2
-	parkday = daystart
-	'A heavy envelope has arrived in the mail. When you open it, you''re horrified to find several pictures of you giving blowjobs to the guys in the park inside. A small note accompanying them says:'
-	*nl
-	'"If you don''t want these pictures to be posted on your door and sent to your work place, then come to this address. PS, if you don''t come today, these pictures will be hanging in your stairwell tomorrow."'
-	*nl
-	'You check the address and find that it''s Aphrodite Photography in the City Center.'
-elseif parkday ! daystart and parkblackmail = 2:
-	parkblackmail = 0
-	fotoyousuck = 1
-	'You''re horrifed and embarrassed when you see photos of you with your face covered in cum with two dicks in your mouth covering your stairwell walls.'
-end
-
-!!if rand (0,2) ! 0: gs 'din_bad' & dynamic $mobile_check
-
-if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
-	'<b><font color="red">, the doorbell rings</font></b>'
-
-	act 'Go to the door':
-		*clr & cla
-		gs 'stat'
-		'You go to the door and look through the peephole to see a dark male figure. "It''s me. Grisha, the plumber. You owe me some money, remember?" he says through the door.'
-
-		act 'Answer the door':
-			*clr & cla
-			money -= santehnikDolg
-			santehnikDolg = 0
-			gs 'stat'
-			'You open the door and Grisha smiles. "I thought you were hiding from me. So, do you have my money?" You nod and pay him the money you owe.'
-
-			act 'Close the door': gt $curloc
-		end
-	end
-end
-
-if BurgerQW['IlyQW']  = 3 and hour >= 9 and hour <= 20:
-	*clr & cla
-	BurgerQW['IlyQW']  = 4
-	if DolgRS <= moneySUM:
-		money = moneySUM - 650000
-		karta = bankDebtLimit
-		stolmoney = 0
-		minut += 120
-		'The police arrive and take you to court. You manage to pay off your debts and are released.'
-
-		act 'Leave the courthouse': gt 'city_center'
-	else
-		DolgRS = 650000 - moneySUM - 60000
-		money = 0
-		karta = bankDebtLimit
-		stolmoney = 0
-		vidage += 7
-		year += 5
-		age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
-		money = 2000
-		'The police arrive and take you to court. After standing trial, you are given five years of jail time and are required to pay your debt of <<DolgRS>>.'
-
-		act 'Serve your time':
-			*clr & cla
-			srok_kolvo = 1
-			srok_otsidki += 5
-			pcs_mass['body'] = 10
-			fat = 10
-			if defcurly = 0:
-				curly = 0
-			else
-				curly = 2147483647
-			end
-			straight = 0
-			pcs_makeup = 1
-			pcs_skin = 0
-			pcs_tan = 0
-			pcs_leghair = 12
-			pcs_pubes = 30
-			bfa = 0
-			drugVars['cocaine_addict'] = 0
-			drugVars['cocaine_system'] = 0
-			drugVars['heroin_need'] = 0
-			work = 0
-			workKafe['job'] = 0
-			workhosp = 0
-			worksalon = 0
-			tanwork = 0
-			workSec = 0
-			preg = 0
-			young_shop_work = 0
-			gs 'uniutil', 'student', 'unenroll'
-			gs 'stat'
-
-			'Time drags on slowly. Your life and work are tedious and monotonous. You''ve been sewing for five years, having meals in the dining room and going to sleep surrounded by other female inmates. 1,000 <b>₽</b> of your 2,000 <b>₽</b> per month salary goes towards your debt repayment.'
-			'As slow as it seems, time doesn''t stand still and your torment finally comes to an end. You are released and given 2,000 <b>₽</b>. You board the train and return to the city.'
-
-			act 'Get off the train': gt 'city_industrial_train', 'outside'
-		end
-	end
-	exit
-end
-
-if BurgerQW['IlyQWDay'] ! daystart and BurgerQW['IlyQW']  = 1 and hour >= 8 and hour <= 20:
-	'<b><font color="red">The doorbell rings</font></b>'
-
-	act 'Walk up to the door':
-		*clr & cla
-		gs 'stat'
-		'You walk up to the door and look through the peephole. You see a few men, and even in the dark, you recognize them from their caps. "<<$pcs_firstname>> <<$pcs_lastname>>! This is the police, open up!"'
-
-		act 'Answer the door':
-			*clr & cla
-			minut += 120
-			BurgerQW['IlyQW']  = 2
-			gs 'stat'
-			'You open the door, wondering what they want from you. There are several men in uniform and others in civilian clothes. A lean and skinny man with with a weeks worth of stubble and a pistol in a holster slung under his armpit speaks to you. "Please take a seat while we search the apartment. This is a warrant for your arrest and this is a search warrant for your apartment. You can read them." The men start searching your apartment and a few minutes later, one of them reappears. "Here are the keys. According to the description, these look like the keys to the office and the safe where the money was stolen." The detective frowns at you and nods to the officer, who pulls your hands behind your back and snaps the handcuffs around your wrists.'
-			wait 1500
-			'You''re escorted out of the building in handcuffs and pushed into a police car. After the door slams shut, the car starts up and drives through the city streets until it stops outside the police station and you''re pulled out and brought into an interview room where the dectective is waiting for you. He takes the handcuffs off you and offers you a seat. You sit in a hard and uncomfortable chair while the detective turns the TV on and inserts a video tape. On the screen is footage from a security camera in Bystroeshke showing you appear in the corridor and entering the office before exiting a few minutes later holding a thick envelope. The detective takes the tape out and inserts another one.'
-			'It shows Chubais'' office. The door opens and you walk in holding some keys. You go to the safe, open it with one of the keys and take the envelope with <<$BurgerQW[''IlySecurityCamDesc'']>> written on it. The detective turns the TV off, picks up a plastic bag with the keys inside and finally speaks. "Tests prove that the keys found in your apartment are those to the office and the safe of Bystroezhki. The tapes from the surveillance cameras clearly show you entering the office and taking 650,000 rubles." He takes out a pen and paper and begins to write. While writing, he looks up to you with gloomy eyes and says "A confession will help you in the court. Since this is a first time offense and provided you return the money, you may be given a suspended sentence if you admit your guilt."'
-			act 'Sign confession':
-				*clr & cla
-				minut += 60
-				gs 'stat'
-				'You sign the confession and the detective signals for an officer, who enters the room as the detective nods in your direction. "Take her."'
-
-				act 'Go with him': gt 'kameraKPZ'
-			end
-
-			act 'Tell the truth':
-				*clr & cla
-				minut += 60
-				gs 'stat'
-				'You tell the detective what actually happened and how Ilyushkin framed you, but he barely listens to you before he slams his fist on the table and yells at you. "I wasn''t born yesterday! If you will not cooperate, you''ll rot in prison!" An officer then enters the room and the detective nods in your direction. "Take her."'
-
-				act 'Go with him': gt 'kameraKPZ'
-			end
-		end
-	end
-
-	exit
-end
-
-if gopstop > 30:
-	gt 'police', '1'
-end
-
-if sick > 0 and doktorday ! daystart:
-
-	!!act 'Call a doctor':
-	!!	*clr & cla
-	!!	minut += 15
-	!!	doktorday = daystart
-	!!	sick -= 5
-!!	if sick < 1:sick = 1
-	!!	if sickstage = 1:sicktimer += 5
-
-	!!	'A doctor arrives from the clinic and examines you. After the examination, the doctor gives a shot and you start feeling better.'
-
-	!!	act 'Move away':gt 'korr'
-	!!end
-
-	act 'Call a doctor':doktorday = daystart & dynamic $polidin
-end
-
-$ninel0 = {
-	*clr & cla
-	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/ninel00.jpg"></center>'
-	'You open the door and see a pretty young girl with a medical bag in her hand standing on the threshold.'
-	'"Hello, my name is Ninel Pavlovna. I do the home visits for the clinic. Where is the patient?"'
-	'"That would be me..."'
-	'"I see. First, we need to get you back into bed."'
-
-	act 'Go back to bed':
-		*clr & cla
-		ninelmet = 1
-		'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom0.jpg"></center>'
-		'Ninel sits on the edge of your bed and checks your forehead.'
-		'"What are your symptoms, <<$pcs_nickname>>? Can I call you that?"'
-		'"Of course..." You start to answer, but end up coughing. "Sorry. I have a high fever, a sore throat and a cough that''s killing me!"'
-		'"Running nose? Headaches? Aching bones?"'
-		'"Yes, all of them."'
-		'"Please take your clothes off so I can examine you."'
-
-		act 'Undress':
-			*clr & cla
-			minut += 5
-			pcs_horny += 10
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom1.jpg"></center>'
-			'You undress and Ninel listens to your lungs for a long time. Her hands are cool and gentle as she touches you, while the stethoscope is cold.'
-			'"Mmmm, now let''s take a look at your mouth. Open wide and say ''aah''."'
-
-			act 'Ahh':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/ninel03.jpg"></center>'
-				'You open your mouth and she looks in, examining your sore throat.'
-				'"I see. Your throat is very red and inflamed. Now we need to take your temperature.'
-
-				act 'Put a thermometer in your mouth':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/ninel04.jpg"></center>'
-					'"No, not like that. The temperature needs to be measured rectally."'
-					'"What...?"'
-					'"It''s more precise. Don''t be afraid, it''s not painful."'
-					'"Well if I have to..."'
-					'"It''s necessary. Come on, lie down on your stomach and spread your buttocks with your hands please."'
-
-					act 'Change position':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom2.jpg"></center>'
-						'You obediently roll over and spread your ass as Ninel lubricates your anus with some vaseline and deftly introduces the thermometer. You flinch, not from pain but pleasure. The doctor doesn''t just stick the thermometer in your ass, but slowly moves it back and forth. It''s very nice and you feel your excitement growing.'
-						gs 'arousal', 'anal_dildo', 10
-						gs 'stat'
-
-						if pcs_horny >= 50:
-							act 'Moan in pleasure':
-								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom3.jpg"></center>'
-								'The doctor takes the thermometer out of your ass and checks it.'
-								'"39.2. Very bad. Please turn on your back, I need to palpate the lymph nodes."'
-
-								act 'Roll over on your back':
-									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom5.jpg"></center>'
-									'The doctor begins to stroke and knead your stomach and thighs. You''re not actually sure if this is a real medical procedure. She does it for far too long, but it''s too pleasant and you don''t object.'
-									'Your excitement continues to grow and you feel your pussy moistening as you start to moan softly.'
-									gs 'arousal', 'foreplay', 15
-									gs 'stat'
-
-									act 'Blush in embarrassment':
-										*clr & cla
-										'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom6.jpg"></center>'
-										'You blush with embarrassment, but then fall below the hands of Ninel as she starts caressing your pussy.'
-										'"Doctor, what are you doing!" you scream, feeling embarrassed, outraged and frightened.'
-										'"I feel the magic in you, which means you''re one of us, and I can use my healing powers on you," she replies.'
-										'"So you''re a succubus too?!"'
-										'"Yes, but only with a special kind of magic. Tantric. Have you heard of it?'
-										'"No, I don''t think so..."'
-										'"It''s based on sensuality and sex. Roughly speaking, I can only cast spells when having sex."'
-										'"So...?"'
-										'"That is, if I have sex with you, I will heal you. So? Do you agree?"'
-										'"And what should I do in return?"'
-										'"Nothing. I''m doing it solely for my own satisfaction."'
-										'"Then of course I agree."'
-										gs 'arousal', 'foreplay', 15
-										gs 'stat'
-
-										act 'Surrender to the gentle hands of Ninel':gt 'housecall', 'ninel2'
-									end
-								end
-							end
-						end
-
-						act 'Indignant':
-							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom3.jpg"></center>'
-							'"What the hell are you doing?!" you squeal.'
-							'She takes the thermometer out of your ass. "I''m measuring your temperature. 39.2. Very bad," she calmly replies.'
-
-							act 'What''s wrong with me?':
-								cla
-								'"Doctor, what''s wrong with me?" you ask, somewhat scared.'
-								'"You have a really bad flu, but I''ll make you an injection of antibiotics and antigens and you''ll soon feel better."'
-
-								act 'Get injection':
-									*clr & cla
-									minut += 10
-									sick -= 2
-									lekar += 3
-									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom4.jpg"></center>'
-									'You whimper slightly as Ninel jabs the needle into one of your ass cheeks and injects the contents.'
-									'"That''s about everything. You have to rest in bed, drink hot drinks, take antibiotics and nose drops and stay on a balanced diet. When your temperature drops, come to the clinic to see me."'
-									'"Thank you, Doctor, I''ll follow your instructions."'
-									'Ninel smiles and says goodbye before leaving.'
-
-									act 'Back to bed': gt 'bedr'
-								end
-							end
-						end
-
-						act 'What''s wrong with me?':
-							cla
-							'"Doctor, what''s wrong with me?" you ask fearfully.'
-							'"I''m afraid you have angina, <<$pcs_nickname>>. I would advise you recieve immediate treatment," she replies.'
-							'"What? You mean in the hospital?!" you shriek.'
-							'"Yes, at the clinic," she calmly replies.'
-
-							act 'Refuse':
-								*clr & cla
-								'"I can''t go to the hospital!"'
-								'She smiles at you. "Well... I guess we could do it a different way then. I''ll give you a few shots to start with."'
-								'"Oh thank you, doctor!"'
-
-								act 'Lie on your stomach and bare your ass':
-									*clr & cla
-									'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/nadom9.jpg"></center>'
-									'The doctor jabs a needle into your ass cheek and you find yourself suddenly becoming incredibly aroused, your pussy growing wet and aching to be invaded as your breath quickens and your nipples grow hard with desire.'
-									'"Doctor, what''s happening?" you ask, almost screaming. You feel embarrassed and frightened, but your voice breaks, betraying your arousal, and you moan voluptuously.'
-									'"I knew it! I can feel the magic in you, which means you''re one of us, and I can use my healing powers on you."'
-									'"So you''re a succubus too?!"'
-									'"Yes, but only with a special kind of magic. Tantric. Have you heard of it?"'
-									'"No, I don''t think so..."'
-									'"It''s based on sensuality and sex, roughly speaking, I can cast spells only while having sex."'
-									'"So...?"'
-									'"That''s it. If we have sex, I will heal you. Do you agree?"'
-									'"And what should I do in return?"'
-									'"Nothing. I''m doing it solely for my own satisfaction."'
-									'"Then I agree."'
-									gs 'arousal', 'foreplay', 15
-									gs 'stat'
-
-									act 'Surrender to the gentle touch of Ninel': gt 'housecall', 'ninel2'
-								end
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-}
-
-$drPP = {
-	cla
-	*clr
-	'You answer the door and an older, balding man with a medical bag in his hand is standing on the threshold.'
-	'"Hello, doctor."'
-	'"Hello, dear. I''m the local doctor. Now please go back to bed and don''t stand in this cold air."'
-
-	act 'Go back to bed':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp1.jpg"></center>'
-		'You walk back to the bedroom with the doctor. He sits on the edge of the bed and feels your forehead.'
-		'"So Miss <<$pcs_lastname>>. What are your symptoms?'
-		'"Ahem... I have a sore throat - very sore actually - and a high temperature."'
-		'"And a nasty cough too I see. And judging by your voice, also a running nose."'
-		'"Yes... Aachoo!!"'
-		'"Please remove your clothes so I can examine you."'
-
-		act 'Undress':
-			*clr & cla
-			minut += 5
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp2.jpg"></center>'
-			'You undress and the doctor listens to your lungs for a while.'
-			'"Now let''s take a look at your throat. Open your mouth wide and say ''ahh''."'
-
-			act 'Aahh':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp3.jpg"></center>'
-				'You open your mouth and the doctor looks in.'
-				'"Mmmm, I see. Well, let''s take your temperature."'
-
-				act 'Put the thermometer under your armpit':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp4.jpg"></center>'
-					'The doctor waits a few minutes, then looks at the thermometer and shakes his head.'
-
-					act 'What''s wrong with me?':
-						cla
-						'"You have the flu," he calmly replies. "Nothing too serious, I''ll just give you an injection and you''ll feel better soon. Stay in bed, drink plenty of fluids and try to rest as much as possible. Now please roll over so I can give you the injection."'
-
-						act 'Roll over and lay on your stomach':
-							*clr & cla
-							minut += 10
-							sick -= 2
-							mc_inventory['antibiotics'] += 3
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp5.jpg"></center>'
-							'You whimper slightly as the doctor jabs a needle into your ass and injects the contents.'
-							'"Now remember. Stay in bed, drink lots of fluids and try to rest. When you feel better, come by the clinic."'
-							'"Thank you, Doctor, I will."'
-							'You escort the doctor back to the entrance where he says goodbye and leaves. After shutting the door, you head back to bed.'
-
-							act 'Go back to bed': gt 'bedr'
-						end
-					end
-				end
-			end
-		end
-	end
-}
-
-$polidin = {
-	cla
-	*clr
-	minut += 15
-	callrand = rand(1, 3)
-	'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall.jpg"></center>'
-	'You dial the number of the clinic several times, but it''s always busy.'
-
-	act 'Keep trying':
-		cla
-		'Finally, a tired nurse''s voice answers. "Hello, this is the clinic. How can I help you?"'
-
-		act 'Ask for doctor':
-			cla
-			'"Hello. Can I get a house call?" you manage to say between coughing fits.'
-			'"Your name and address, please?" she asks.'
-
-			act 'Give your address':
-				cla
-				'You have a coughing fit before you''re able to answer. "Sorry, it''s <<$pcs_firstname>> <<$pcs_lastname>>. Street Park House 4, apartment 69," you manage before sneezing.'
-				'"One moment please," she responds before she puts you on hold.'
-
-				act 'Wait':
-					cla
-					minut += 5
-					gs 'stat'
-					'You wait for five minutes, occasionally coughing and sneezing, until she finally returns. "So Miss <<$pcs_lastname>>, what are your symptoms?"'
-					'You start to answer, but end up coughing. "Sorry. I have a fever, sore throat, a cough and a runny nose."'
-					'"Is your temperature high?"'
-					'"Yes, quite so. 39.2°C," you tell her, followed by a sneeze.'
-					'"Very well. A doctor will come see you at home."'
-					'"How soon?"'
-					'"As soon as one is free," she answers. "Yours isn''t an isolated case."'
-					'"Thank you," you respond and hang up.'
-
-					if ninelsex = 1:
-						act 'Is Ninel available?':
-							cla
-							'"Is Doctor Pavlovna available? She''s my regular doctor."'
-							'"Let me check." The nurse puts you on hold for a few minutes before returning. "Yes, she is free and will make the house call."'
-							'"Once again, thank you very much," you reply and hang up.'
-
-							act 'Continue': gt 'housecall', 'ninel3'
-						end
-					end
-
-					act 'Go back to bed':
-						*clr & cla
-						picrand = rand(21, 27)
-						'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick<<picrand>>.jpg"></center>'
-						timerand = rand(1, 6)
-						minut += timerand * 30
-						'You lie in bed, shivering while wrapped in a blanket. Time drags by painfully slow and you can''t say how much time passes before the doorbell rings.'
-
-						! WD: Uninitialised ~ 'ninel' use 'ninelmet'
-						act 'Answer the door':
-							if ninelmet > 0 and sick <= 50:
-								gt 'housecall', 'ninel1'
-							elseif ninelmet = 0 or sick > 50:
-								doctrnd = rand(0, 1)
-
-								if doctrnd = 0: dynamic $drPP
-								if doctrnd = 1: gt 'housecall', 'ninel0'
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-}
 
 --- korr ---------------------------------
-

+ 2 - 257
locations/korr2x.qsrc

@@ -24,27 +24,14 @@ elektro = elektro + 1
 gs'stat'
 gs 'themes', 'indoors'
 
-gs 'courtletter'
-
 '<center><b><font color = maroon>Corridor</font></b></center>'
 '<center><img <<$set_imgh>> src="images/locations/pushkin/apartment/korr2x.jpg"></center>'
 
+gs 'home_events', 'entry'
+
 if mc_inventory['umbrella'] > 0:'Your umbrella is on a hook.'
 if krolik = 1:'Your rabbit <a href="exec:gt ''krol'', ''start''"><<$namekrol>></a> sits in it''s cage on the floor.'
 if ParrotQW['Owned1'] = 1:'Your parrot <a href="exec:gt ''popu'', ''start''"><<$ParrotQW[''Name1'']>></a> sits in it''s cage.'
-if parkday ! daystart and parkblackmail = 1:
-	parkblackmail = 2
-	parkday = daystart
-	'A heavy envelope has arrived in the mail. When you open it, you''re horrified to find several pictures of you giving blowjobs to the guys in the park inside. A small note accompanying them says:'
-	*nl
-	'"If you don''t want these pictures to be posted on your door and sent to your work place, then come to this address. If you don''t come today, these pictures will be hanging in your stairwell tomorrow."'
-	*nl
-	'You check the address and find that it''s Aphrodite Photography in the City Center.'
-elseif parkday ! daystart and parkblackmail = 2:
-	parkblackmail = 0
-	fotoyousuck = 1
-	'You''re horrifed and embarrassed when you see photos of you with your face covered in cum with two dicks in your mouth covering your stairwell walls.'
-end
 
 act 'Go to the bedroom': gt'bedr2x'
 act 'Go to the bathroom': gt'vanr2x'
@@ -62,24 +49,6 @@ act '<b><font color="maroon">Go outside</font></b>':
 		xgt'pushkin_sq'
 	end
 end
-!!if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
-
-if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
-	'<b><font color = red>The doorbell rings</font></b>'
-	act 'Answer the door':
-		cla
-		gs 'stat'
-		'You go to the door and look through the peephole to see a dark male figure. "It''s me. Grisha, the plumber. You owe me some money, remember?" he says through the door.'
-		act 'Open the door':
-			cla
-			money -= santehnikDolg
-			santehnikDolg = 0
-			gs 'stat'
-			'You open the door and Grisha smiles. "I thought you were hiding from me. So, do you have my money?" You nod and pay him the money you owe.'
-			act 'Close the door':gt $curloc
-		end
-	end
-end
 
 if func('homes_properties', 'is_current_home') = 0:
 	act 'Set this apartment as your main home':gs 'homes_properties', 'set_home' & gt 'korr2x'
@@ -95,229 +64,5 @@ else
 	end
 end
 
-if BurgerQW['IlyQW']  = 3 and hour >= 9 and hour <= 20:
-	cls
-	BurgerQW['IlyQW']  = 4
-	if DolgRS <= moneySUM:
-		money = moneySUM-650000
-		karta = bankDebtLimit
-		stolmoney = 0
-		minut += 120
-		'The police arrive and take you to court. You manage to pay off your debts and are released.'
-		act 'Leave the courthouse':gt'city_center'
-	elseif DolgRS > moneySUM:
-		DolgRS = 650000-moneySUM-60000
-		money = 0
-		karta = bankDebtLimit
-		stolmoney = 0
-		vidage += 7
-		year += 5
-		age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
-		money = 2000
-		'The police arrive and take you to court. After standing trial, you''re given five years of jail time and are required to pay your debt of <<DolgRS>>.'
-		act 'Serve your time':
-			cla
-			srok_kolvo = 1
-			srok_otsidki += 5
-			pcs_mass['body'] = 10
-			fat = 10
-			if defcurly = 0:
-				curly = 0
-			else
-				curly = 2147483647
-			end
-			straight = 0
-			pcs_makeup = 1
-			pcs_skin = 0
-			pcs_tan = 0
-			pcs_leghair = 12
-			pcs_pubes = 30
-			bfa = 0
-			drugVars['cocaine_addict'] = 0
-			drugVars['cocaine_system'] = 0
-			drugVars['heroin_need'] = 0
-			work = 0
-			workKafe['job'] = 0
-			workhosp = 0
-			worksalon = 0
-			tanwork = 0
-			workSec = 0
-			preg = 0
-			young_shop_work = 0
-			gs 'uniutil', 'student', 'unenroll'
-			gs 'stat'
-			'Time drags on slowly. Your life and work are tedious and monotonous. You sew, have meals in the dining room and go to sleep surrounded by other female inmates. 1,000 <b>₽</b> of your 2,000 <b>₽</b> per month salary goes towards your debt repayment.'
-			'As slow as it seems, time doesn''t stand still and your torment finally comes to an end. You''re released and given 2,000 <b>₽</b>. You board the train and return to the city.'
-			act 'Get off the train': gt 'city_industrial_train', 'outside'
-		end
-	end
-	exit
-end
-if BurgerQW['IlyQWDay'] ! daystart and BurgerQW['IlyQW']  = 1 and hour >= 8 and hour <= 20:
-	'<b><font color = red>The doorbell rings</font></b>'
-	act 'Answer the door':
-		cla
-		gs 'stat'
-		'You walk up to the door and look through the peephole. You see a few men, and even in the dark, you recognize them from their caps. "<<$pcs_firstname>> <<$pcs_lastname>>! This is the police, open up!"'
-		act 'Open the door':
-			cla
-			minut += 120
-			BurgerQW['IlyQW']  = 2
-			gs 'stat'
-			'You open the door, wondering what they want from you. There are several men in uniform and others in civilian clothes. A lean and skinny man with with a weeks worth of stubble and a pistol in a holster slung under his armpit speaks to you. "Please take a seat while we search the apartment. This is a warrant for your arrest and this is a search warrant for your apartment. You can read them." The men start searching your apartment and a few minutes later, one of them reappears. "Here are the keys. According to the description, these look like the keys to the office and the safe where the money was stolen." The detective frowns at you and nods at the officer, who pulls your hands behind your back and snaps the handcuffs around your wrists.'
-			wait 1500
-			'You''re escorted out of the building in handcuffs and pushed into a police car. After the door slams shut, the car starts up and drives through the city streets until it stops outside the police station and you''re pulled out and brought into an interview room where the dectective is waiting for you. He takes the handcuffs off you and offers you a seat. You sit in a hard and uncomfortable chair while the detective turns the TV on and inserts a video tape. On the screen is footage from a security camera in Bystroeshke showing you appear in the corridor and enter the office before exiting a few minutes later holding a thick envelope. The detective takes the tape out and inserts another one.'
-			'It shows Chubais'' office. The door opens and you walk in holding some keys. You go to the safe, open it with one of the keys and take the envelope with <<$BurgerQW[''IlySecurityCamDesc'']>> written on it. The detective turns the TV off, picks up a plastic bag with the keys inside and finally speaks. "Tests prove that the keys found in your apartment are those to the office and the safe of Bystroezhki. The tapes from the surveillance cameras clearly show you entering the office and taking 650,000 rubles." He takes out a pen and paper and begins to write. While writing, he looks up at you with gloomy eyes. "A confession will help you in the court. Since this is a first time offense and provided you return the money, you may be given a suspended sentence if you admit your guilt."'
-			act 'Sign the confession':
-				cla
-				minut += 60
-				gs 'stat'
-				'You sign the confession and the detective signals for an officer, who enters the room as the detective nods in your direction. "Take her."'
-				act 'Go with him': gt'kameraKPZ'
-			end
-			act 'Tell the truth':
-				cla
-				minut += 60
-				gs 'stat'
-				'You tell the detective what actually happened and how Ilyushkin framed you, but he barely listens to you before he slams his fist on the table and yells at you. "I wasn''t born yesterday! If you will not cooperate, you''ll rot in prison!" An officer then enters the room and the detective nods in your direction. "Take her."'
-				act 'Go with him': gt'kameraKPZ'
-			end
-		end
-	end
-	exit
-end
-if gopstop > 30: gt 'police','1'
-
-if sick > 0 and doktorday ! daystart: act 'Call a doctor': doktorday = daystart & dynamic $polidin
-
-$drPP = {
-	*clr & cla
-	'You answer the door. On the threshold is an older, balding man with a medical bag in his hand.'
-	'"Hello, doctor."'
-	'"Hello, dear. I''m the local doctor. Now please go back to bed and don''t stand in this cold air.'
-	act 'Go back to bed':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp1.jpg"></center>'
-		'You walk back to the bedroom with the doctor. He sits on the edge of the bed and feels your forehead.'
-		'"So Miss <<$pcs_lastname>>. What are your symptoms?'
-		'"Ahem, ahem... Well, Doctor, I have a sore throat - very sore actually - and a high temperature," you reply.'
-		'"And a nasty cough too I see. And judging by your voice, also a running nose."'
-		'"Yes... Aachoo!!"'
-		'"Please remove your clothes so I can examine you," he orders.'
-		act 'Undress':
-			*clr & cla
-			minut += 5
-			clr
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp2.jpg"></center>'
-			'You undress and the doctor listens to your lungs for a while.'
-			'"Now let''s take a look at your throat. Open your mouth wide and say ''aahh''."'
-			act 'Ahh':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp3.jpg"></center>'
-				'You open your mouth and the doctor looks in.'
-				'"Mmmm, I see. Let''s take your temperature."'
-				act 'Put the thermometer under your armpit':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp4.jpg"></center>'
-					'The doctor waits a few minutes, then looks at the thermometer and shakes his head.'
-					act 'What''s wrong with me?':
-						cla
-						'You have the flu," he calmly replies. "Nothing too serious, I''ll just give you an injection and you''ll feel better soon. Stay in bed, drink plenty of fluids and try to rest as much as possible. When you feel better, come to the clinic. Now please roll over so I can give you the injection."'
-						act 'Roll over':
-							*clr & cla
-							minut += 10
-							sick -= 2
-							mc_inventory['antibiotics'] += 3
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/drpp5.jpg"></center>'
-							'The doctor jabs a needle into your ass and injects the contents.'
-							'"Now remember. Stay in bed, drink lots of fluids and try to rest. When you feel better come by the clinic."'
-							'"Thank you Doctor, I will."'
-							'You escort the doctor back to the entrance, where he says goodbye and leaves. After shutting the door, you head back to bed.'
-							act 'Go back to bed': gt'bedr2x'
-						end
-					end
-				end
-			end
-		end
-	end
-}
-
-$polidin = {
-	*clr & cla
-	minut + 15
-	gs 'stat'
-	callrand = rand(0,2)
-	if callrand = 0:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall.jpg"></center>'
-	if callrand = 1:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall.jpg"></center>'
-	if callrand = 2:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/housecall.jpg"></center>'
-	'You dial the number of the clinic several times, but it''s always busy.'
-	act 'Keep trying':
-		cla
-		'Finally, a tired nurse''s voice answers. "Hello, this is the clinic. How can I help you?"'
-		act 'Ask for doctor':
-			cla
-			'"Hello. Can I get a house call?" you manage to say between coughing fits.'
-			'"Your name and address, please?" she asks.'
-			act 'Give your address':
-				cla
-				'You have a coughing fit before you''re able to answer. "Sorry, it''s <<$pcs_firstname>> <<$pcs_lastname>>. Street Park House 4, apartment 69," you manage before sneezing.'
-				'"One moment please," she responds before she puts you on hold.'
-				act 'Wait':
-					cla
-					minut += 5
-					gs 'stat'
-					'You wait for five minutes, occasionally coughing and sneezing, until she finally returns. "So Miss <<$pcs_lastname>>, what are your symptoms?"'
-					'You start to answer, but end up coughing. "Sorry, I have a fever, sore throat, a cough and a runny nose."'
-					'"Is your temperature high?"'
-					'"Yes, quite so. 39.2°C," you tell her, followed by a sneeze.'
-					'"Very well. A doctor will come see you at home."'
-					'"How soon?"'
-					'"As soon as one is free," she answers. "Yours isn''t an isolated case."'
-					'"Thank you," you respond and hang up.'
-					if ninelsex = 1:
-						act 'Is Ninel available?':
-							cla
-							'"Is Doctor Pavlovna available? She is my regular doctor."'
-							'"Let me check." The nurse puts you on hold for a few minutes before returning. "Yes, she is free and will make the house call."'
-							'"Once again, thank you very much," you reply and hang up.'
-							act 'Continue':gt 'housecall', 'ninel3'
-						end
-					end
-					act 'Go back to bed':
-						*clr & cla
-						picrand = rand(0,6)
-						if picrand = 0:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick27.jpg"></center>'
-						if picrand = 1:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick21.jpg"></center>'
-						if picrand = 2:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick22.jpg"></center>'
-						if picrand = 3:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick23.jpg"></center>'
-						if picrand = 4:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick24.jpg"></center>'
-						if picrand = 5:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick25.jpg"></center>'
-						if picrand = 6:'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick26.jpg"></center>'
-						timerand = rand(0,5)
-						if timerand = 0:minut = minut + 30
-						if timerand = 1:minut = minut + 60
-						if timerand = 2:minut = minut + 90
-						if timerand = 3:minut = minut + 120
-						if timerand = 4:minut = minut + 150
-						if timerand = 5:minut = minut + 180
-						'You lie in bed, shivering while wrapped in a blanket. Time drags by painfully slow. You can''t say how much time passes before the doorbell rings.'
-						act 'Open the door':
-							if ninelmet > 0 and sick <= 50:
-								gt 'housecall','ninel1'
-							elseif ninelmet = 0 or sick > 50:
-								doctrnd = rand(0,1)
-								if doctrnd = 0:dynamic $drPP
-								if doctrnd = 1: gt 'housecall','ninel0'
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-}
 
 --- korr2x ---------------------------------
-

+ 3 - 3
locations/korrPar.qsrc

@@ -32,7 +32,7 @@ gs 'stat'
 
 if locat['Fam_inGad'] = 1:'With your parents away visiting your grandparents, the apartment seems quiet and empty.'
 
-gs 'courtletter'
+gs 'home_events', 'entry'
 
 if (hour ! 16 or hour ! 17) and blockBedrPar = 1:blockBedrPar = 0
 
@@ -54,12 +54,12 @@ act '<b>Leave and go to the courtyard</b>':
 			cla
 			act '<font color=red><b>Yes, go outside</b></font>':
 				minut += 5
-				gt'pav_complex', 'start'
+				gt 'pav_complex', 'start'
 			end
 			act 'No, stay inside':gt 'korrPar'
 		else
 			minut += 5
-			gt'pav_complex', 'start'
+			gt 'pav_complex', 'start'
 		end
 	else
 		msg'<b><font color = red>You need to get dressed.</font></b>'

+ 2 - 0
locations/mother.qsrc

@@ -614,6 +614,8 @@ if $ARGS[0] = '':
 		end
 		gs 'mother', 'pregreact'
 		if npc_pregtalk['A29'] = 1: gs 'mother', 'abortion_talk'
+
+		gs 'mother_chats', 'lover_talks'
 	end
 
 	if alko >= 3  and alkomday ! daystart:

+ 88 - 14
locations/mother_chats.qsrc

@@ -27,7 +27,7 @@ if $ARGS[0] = 'rape_talk':
 		'You feel that your chat with her has helped you and you continue to hug her and cry on her shoulder for a while.'
 		act 'Continue': gt $loc, $loc_arg
 	end
-	
+
 	act 'Talk a bit more about the event':
 		gs 'npc_relationship', 'modify', 'A29', 'like'
 		cla & *clr
@@ -37,7 +37,7 @@ if $ARGS[0] = 'rape_talk':
 		'"I just wanted to tell you," you reply. "I don''t really know what else there is to say."'
 		'Your <<$npc_nickname[''A29'']>> looks at you with concern. "Well, did he do anything else? I mean... Sorry, this isn''t coming out right."'
 		'She stops and you both start crying again as you hug each other for a while longer.'
-		
+
 		act 'You don''t know':
 			mc_inventory['morning_after_pill'] +=1
 			cla & *clr
@@ -48,7 +48,7 @@ if $ARGS[0] = 'rape_talk':
 			'After a very brief pause, your <<$npc_nickname[''A29'']>> adds her immediate thought. "Erm... <<$pcs_nickname>>, I take it you''ve taken the morning after pill? If not, then you need to do that as you don''t want to end up pregnant. I can get one for you."'
 			'You nod. "Okay <<$npc_nickname[''A29'']>>. Thanks."'
 			'Your <<$npc_nickname[''A29'']>> looks at you with mounting concern. "I guess we should also report it to the police and most importantly get you checked over at the clinic as you don''t know if he''s got anything unpleasant. I''ll come with you if you want so you don''t have to go through that on your own."'
-			
+
 			act 'Already done':
 				cla & *clr
 				if pcs_hydra >= 100:
@@ -81,7 +81,7 @@ if $ARGS[0] = 'rape_talk':
 				'Your <<$npc_nickname[''A29'']>> looks as though she''s going to say something, but has second thoughts and just shakes her head sadly.'
 				'Tears well up in your eyes again and she pulls you back into her arms and cuddles you, holding you tight as you both let out all your pain and anger.'
 				'As you calm down, your <<$npc_nickname[''A29'']>> looks at you as she strokes your face and smiles. "Okay, how about you get yourself freshened up and I''ll wait here for you. I''ll go to the clinic with you so you don''t need to do all this by yourself."'
-				
+
 				act 'Go to the clinic':
 					cla & *clr
 					minut += 30
@@ -137,7 +137,7 @@ if $ARGS[0] = 'miscarriage_talk1':
 	gs 'npc_relationship', 'modify', 'A29', 20
 	minut += rand(2,5)
 	gs 'stat'
-	
+
 	act 'Admit relief':
 		*clr & cla
 		minut += 10
@@ -163,7 +163,7 @@ if $ARGS[0] = 'miscarriage_talk1':
 		'You feel that your chat with her has helped you as you continue to hug her and cry on her shoulder for a while.'
 		act 'Continue': gt $loc, $loc_arg
 	end
-	
+
 	act 'Not ready to be a parent but still upset at the loss of your baby':
 		cla & *clr
 		minut += 10
@@ -187,7 +187,7 @@ if $ARGS[0] = 'lost_virginity_talk':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/stop_talk.jpg"></center>'
 	'You rip your arm out of your mother''s grasp. "How could you treat me like that?!" you hiss. "I''m not a naughty little girl you can pull around by the ear anymore! Yes, I had sex, but that doesn''t make me a whore or a slut!"'
 	'"I wanted the best for you and your sister!" your <<$npc_nickname[''A29'']>> shouts back. "All this trouble I went through to bring you up properly as a decent young lady and this is what I get! As long as you''re living in my house, you''ll do as I say!"'
-	
+
 	if momslut = 0:
 !! If Sveta has not witnessed any of Mum''s indiscretions
 		act 'So you want me to move out?':
@@ -197,9 +197,9 @@ if $ARGS[0] = 'lost_virginity_talk':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/walking.jpg"></center>'
 			'"So you''re saying you want me to move out?" you snap.'
 			'"Aaaargh! You insufferable brat!" she screeches back, practically tearing out her hair in frustration.'
-			
+
 			gs 'mother_chats', 'lost_virgin_leave_alone'
-		
+
 			act 'Get your stuff and leave (You will not be permanently banned from parents home)':
 				gs 'homes_properties', 'block_access', 'parents_home'
 				mother['kickedout_timer'] = daystart
@@ -221,9 +221,9 @@ if $ARGS[0] = 'lost_virginity_talk':
 			'Equally furious at the treatment you''ve received, you continue. "So you''re saying you don''t want me at home any more?!"'
 			'You take a deep breath and continue. "Oh and while we''re on the subject of sex, you''re in no position to preach to me as I''ve seen you cheating on Vlad!"'
 			'Your <<$npc_nickname[''A29'']>> just glares at you and opens her mouth, but all that comes out is a frustrated growl. She shoos you away with her arms and turns away from you.'
-			
+
 			gs 'mother_chats', 'lost_virgin_leave_alone'
-		
+
 			act 'Leave home (You will not be permanently banned from parents home)':
 				gs 'homes_properties', 'block_access', 'parents_home'
 				mother['kickedout_timer'] = daystart
@@ -296,7 +296,7 @@ if $ARGS[0] = 'reconciliation_talk':
 					'At this point, your <<$npc_nickname[''A29'']>> gets up and rushes around the table to give you a hug, nearly knocking her tea over in the process. "Thank you <<$pcs_nickname>>!"'
 					gs 'mother_chats', 'reconciliation_replies'
 				end
-					
+
 				act 'You need to think about it':
 					mother['kickedout_pending'] = 1
 					cla & *clr
@@ -340,7 +340,7 @@ if $ARGS[0] = 'knock':
 	'When you arrive at your parents'' apartment, you find that the door is locked. After a moment''s consideration, you decide to knock and see if your parents are home. You take a deep breath and knock on the door...'
 	'A few seconds later, the door opens and you see your <<$npc_nickname[''A29'']>> standing in front of you with a shocked but happy expression on her face. "So the wanderer returns, huh? Where on earth have you been?! Do you realize how worried we''ve been?!"'
 	'Before you can respond, she continues. "Never mind, you''re here now, that''s all that matters. Well don''t just stand there, come in!" She gives you a hug as you enter.'
-	
+
 	act 'Just visiting':
 		*clr & cla
 		minut += 25
@@ -352,7 +352,7 @@ if $ARGS[0] = 'knock':
 		'You follow your <<$npc_nickname[''A29'']>> into the kitchen, where you share a tea with her and have a chat, after which you get up to leave. Your <<$npc_nickname[''A29'']>> gives you another hug and you promise to visit again before you depart.'
 		act 'Stop talking': gt 'pod_ezd','etaj_2'
 	end
-	
+
 	act 'Move back in':
 		*clr & cla
 		minut += 25
@@ -378,4 +378,78 @@ if $ARGS[0] = 'knock_uni':
 end
 
 
+
+
+	!!===================================================================!!
+	!!                                                                   !!
+	!!                            Lover Talks                            !!
+	!!                                                                   !!
+	!!===================================================================!!
+
+
+if $ARGS[0] = 'lover_talks':
+	if natbel_unlock = 1 and NatBelQW['FriendLover'] = 8:
+		gs 'mother_chats', 'natbel'
+	end
+end
+
+
+if $ARGS[0] = 'natbel':
+	if $loc = 'kuhrPar' and func('homes_properties', 'is_current_home', 'parents_home'):
+		if NatBelQW['mother_talk'] = 0:
+			act 'Tell <<$npc_nickname[''A29'']>> about Natasha':
+				!If you live at home this option should now show in the kitchen when your mother is there
+				*clr & cla
+				menu_off = 1
+				minut += 10
+				NatBelQW['mother_talk'] = 1
+				NatBelQW['mother_talkday'] = daystart
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
+				'You decide that you need to get this over with as the longer it goes on the harder it''ll get and the more likely your <<$npc_nickname[''A29'']>> will find out by accident so you approach her in the kitchen.'
+				'"<<$npc_nickname[''A29'']>> I need to speak to you about something." You start.'
+				'Your <<$npc_nickname[''A29'']>> doesn''t reply so you continue. "I need to tell you something that''s important to me; I''ve become very good friends with a girl who lives upstairs. She''s been helping me with my studies and homework. You might have noticed my grades have improved recently." As you pause your <<$npc_nickname[''A29'']>> smiles at you, obviously pleased that your school work is improving.'
+				'You continue. "Okay, well... Things have sort of developed from there."'
+				'Your <<$npc_nickname[''A29'']>> interjects. "What are you telling me <<$pcs_nickname>>; it can''t be just that you''ve got a good friend who''s clever?"'
+				'You shake your head. "No <<$npc_nickname[''A29'']>> we''ve become more than just friends."'
+				'Your <<$npc_nickname[''A29'']>> explodes. "WHAT! NO! After all we''ve done to bring you up properly and you go off and spoil yourself... and with a girl! Aaargh! Just go away, get out of my sight! I can''t speak to you right now or I''ll say something I''ll regret."'
+				'Realising that this won''t end well if you continue you turn and leave. Maybe you can continue this once she''s had a chance to think things through and maybe talk to Vlad.'
+				act 'Stop talking': gt 'KorrPar'
+			end
+		elseif NatBelQW['mother_talk'] = 1 and daystart > NatBelQW['mother_talkday']:
+			act '<<$npc_nickname[''A29'']>> reconciliation':
+				!If Sveta lives at home the next day this option should show in the kitchen when your mother is there.
+				*clr & cla
+				menu_off = 1
+				minut += 5
+				NatBelQW['mother_talk'] = 2
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost2.jpg"></center>'
+				'You see your <<$npc_nickname[''A29'']>> in the kitchen and try to continue the conversation about Natasha. "<<$npc_nickname[''A29'']>>, can we talk further please? I don''t want to leave things as they ended the last time."'
+				'Your <<$npc_nickname[''A29'']>> turns to you and sighs "Okay <<$pcs_nickname>>, yes I guess we should clear the air."'
+				'After a brief pause to gather her thoughts she continues. "I know I was shocked and angry but only because I care for you. It''s normal at your age to experiment as I did but you mustn''t let people know. It could ruin your reputation and cause problems for you. Also if you grow out of it you''ll never be able to find a nice man.” She holds her hand up to stop you from responding then continues.'
+				'"I know girls your age experiment, I did too but it was just fun and I didn''t tell anyone. When you told me I was shocked but thinking about it reminded me of something I had forgotten all about. Your aunt Luda, not that you would guess by her choice in men, when she was at uni doing her pharmacy degree had a serious girlfriend... What was her name? Ah yes, Greta. Huh you don’t hear that name so much these days."'
+				'"Anyway, the two of them were as one you couldn''t split them apart for a second, Luda even said they would buy a pharmacy and grow old together. It lasted about two years and then suddenly she started dating African guys. I won''t share the details but she''s lucky she can still walk! Anyway what I realise is that this is normal at your age and I shouldn''t have shouted at you. Just be careful as there are people these days that do not understand and may hurt you if they knew."'
+				act 'It''s still early days':
+					*clr & cla
+					minut += 5
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost1.jpg"></center>'
+					'You smile and are happy that your <<$npc_nickname[''A29'']>> is no longer so angry about the situation.'
+					'"Thanks <<$npc_nickname[''A29'']>> and yes I agree that it''s still early days in our relationship but I didn''t want to keep it a secret from you as if you found out from someone else that''d only make matters worse."'
+					'Your <<$npc_nickname[''A29'']>> smiles and nods her agreement and you conclude the conversation. "Thanks for listening to me <<$npc_nickname[''A29'']>> as I didn''t want to fall out with you over it. I guess time will tell as to where this goes but as of now she''s important to me."'
+					'"Yes I know <<$pcs_nickname>> and I know it would have been difficult for you to tell me but thank you for having the courage to do so." She gives you a hug before returning to what she was dong before your chat.'
+					act 'Stop talking': gt 'KorrPar'
+				end
+			end
+		end
+	end
+end
+
+
+
+
 --- mother_chats ---------------------------------

+ 5 - 0
locations/natbel_chat.qsrc

@@ -534,6 +534,11 @@ if $ARGS[0] = 'lover_chat':
 	if NatbelQW['shopping'] = 3 and NatBelQW['FriendLover'] < 8 and daystart >= natbelQW['StP_trip_daystart'] and hour >= 12 and hour < 14 and (runnerQW['comp_day'] = daystart or runnerQW['prof_stage'] ! 14 or runnerQW['qualifiers'] < 9):
 		gs 'natbel_friend', 'city_date1'
 	end
+
+	if natbel_unlock = 1 and NatbelQW['Bella'] = 1: gs 'natbel_friend', 'bella_enters'
+
+	if natbel_unlock = 1 and NatbelQW['end_of_gschool_chat'] = 0 and year = 2017 and (month = 4 and day >= 26 or month = 5 and day < 26): gs 'natbel_friend', 'end_of_gschool'
+
 end
 
 if $ARGS[0] = 'arrange_shop_trip1':

+ 265 - 26
locations/natbel_friend.qsrc

@@ -1030,14 +1030,14 @@ if $ARGS[0] = 'city_date1':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha7.jpg"></center>'
 		'You enter Natasha''s bedroom and see her looking at a magazine so you join her.'
 		'"Okay Natasha, are you ready to go to St. Petersburg with me? I''m just checking as you asked for a bit of time."'
-		'"Oh yes <<$pcs_nickname>>, I don''t remember ever having gone there before so thank you for taking me. Let me just go and tell my <<$npc_nickname[''A29'']>> as I''ve worked hard and saved up enough so we can stay over and get breakfast."'
+		'"Oh yes <<$pcs_nickname>>, I don''t remember ever having gone there before so thank you for taking me. Let me just go and tell my mother as I''ve worked hard and saved up enough so we can stay over and get breakfast."'
 		'You are a little concerned and look at her quizzically, "Are you sure Natasha, that''s 500 rubles just for a standard room?"'
 		'Natasha replies, "Well I wanted to do a little something nice for you so, as I said I''ve worked hard and saved up enough for a room and some breakfast plus there should be some left over for something to eat while we are there. I want to make this a special trip for us and spend the night with you without <<$npc_nickname[''A29'']>> walking in." You both giggle remembering the embarrassing event when Bella entered while you were making out.'
 
 		act 'Bella''s present':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha9.jpg"></center>'
-			'Five minutes later Natasha returns smiling. "Okay <<$pcs_nickname>>, let''s go. I''ve let <<$npc_nickname[''A29'']>> know and she''s happy for us and has also given me a little bit more money so now we can definately have something to eat tonight as well."'
+			'Five minutes later Natasha returns smiling. "Okay <<$pcs_nickname>>, let''s go. I''ve let my mother know and she''s happy for us and has also given me a little bit more money so now we can definately have something to eat tonight as well."'
 			'"Well that was very generous of her, especially that I know how difficult things are for her."'
 			'"I know <<$pcs_nickname>> and don''t worry I gave her a big thank you for it. Do you need to let your parents know you won''t be back tonight?"'
 			'You shake your head, "No Natasha, it''ll be okay and I still need to work out how to tell <<$npc_nickname[''A29'']>> about us anyway... I''m really not looking forward to that conversation with her as I know she''ll probably be mad; I just hope she doesn''t go too far overboard as I''ve pretty much had it with her domineering attitude and don''t want to say something and make it even worse!"'
@@ -1563,7 +1563,8 @@ if $ARGS[0] = 'city_date1_fashionblog':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha43.jpg"></center>'
 			'You arrive back at the hotel and enter your room and immediately guide Natasha to the bed and after a passionate kiss you start pulling her dress down. "I''ve been wanting to do that for a while now, good thing we were in a public place earlier or you''d never have finished your meal!"'
 
-			gs 'arousal', 5, 'kiss', 'foreplay'
+			gs 'arousal', 'kiss', 5, 'lesbian'
+			gs 'arousal', 'foreplay', -5, 'lesbian'
 			gs 'stat'
 
 			act 'Get down to business':
@@ -1572,7 +1573,7 @@ if $ARGS[0] = 'city_date1_fashionblog':
 				'You pull her dress down and she steps out of it then sits back on the bed.'
 				'Wasting no time you crawl over to her and push her down onto her back and start massaging her breasts.'
 
-				gs 'arousal', 5, 'foreplay_give'
+				gs 'arousal', 'foreplay_give', 5, 'lesbian'
 				gs 'stat'
 
 				act 'Lick her':
@@ -1581,7 +1582,7 @@ if $ARGS[0] = 'city_date1_fashionblog':
 					'With your dress now loosely around your waist you turn your attention to Natasha''s pussy as she pulls her panties to the side for you.'
 					'As you start alternately licking and flicking your tongue in and out of her clit she starts moaning and you start tasting her juices which start flowing freely.'
 
-					gs 'arousal', 5, 'cuni_give'
+					gs 'arousal', 'cuni_give', 5, 'lesbian'
 					gs 'stat'
 
 					act 'Natasha takes control':
@@ -1591,7 +1592,8 @@ if $ARGS[0] = 'city_date1_fashionblog':
 						'Looking down at you with a mixture of love and lust she straddles your leg and starts riding it as she strokes your body.'
 						'It doesn''t take long before she cums on your thigh soaking it with her juices.'
 
-						gs 'arousal', 5, 'massage', 'erotic_nudity'
+						gs 'arousal', 'massage', 5, 'lesbian'
+						gs 'arousal', 'erotic_nudity', -5, 'lesbian'
 						gs 'stat'
 
 						act '69':
@@ -1601,8 +1603,9 @@ if $ARGS[0] = 'city_date1_fashionblog':
 							'As you get to work on her you feel Natasha sliding her tongue slowly up and down and flicking it inside you as she sucks up your juices that are flowing out by now.'
 							'Suddenly and almost without warning the dam bursts and you reach a toe curling orgasm squirting into her mouth and soaking her face with your juices.'
 
+							gs 'arousal', 'cuni_give', 5, 'lesbian'
 							$orgasm_or = 'yes'
-							gs 'arousal', 5, 'cuni', 'cuni_give', 'no_orgasm_msg'
+							gs 'arousal', 'cuni', 5, 'lesbian', 'no_orgasm_msg'
 							gs 'arousal', 'end'
 							gs 'stat'
 
@@ -1681,10 +1684,12 @@ if $ARGS[0] = 'city_date2_start':
 		'You lie pretty still just letting your body respond to her actions as you let her take control of the pace.'
 		'It''s not long before she gives you a long passionate kiss which you fully return as you roll over facing her.'
 
-		gs 'arousal', 5, 'kiss', 'massage'
+		gs 'arousal', 'kiss', 5, 'lesbian'
+		gs 'arousal', 'massage', -5, 'lesbian'
 		gs 'stat'
 
 		$temp_last_used = ''
+		NatbelQW['horny'] = 0
 		nat_org = 0
 		gs 'natbel_friend', 'city_date2_morningsex'
 	end
@@ -1701,12 +1706,12 @@ if $ARGS[0] = 'city_date2_morningsex':
 		act 'Boob kiss':
 			*clr & cla
 			$temp_last_used = 'boobkiss'
-			nat_org += 1
+			NatbelQW['horny'] += rand(10, 30)
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha52.jpg"></center>'
 			'You crawl on top of her and tweak her nipples at first.'
 			'Slowly you begin kissing, licking and sucking them then letting her nipple pop out before recommencing as you keep your eyes focused directly on hers.'
 
-			gs 'arousal', 5, 'foreplay_give'
+			gs 'arousal', 'foreplay_give', 5, 'lesbian'
 			gs 'stat'
 
 			gs 'natbel_friend', 'city_date2_morningsex'
@@ -1716,13 +1721,13 @@ if $ARGS[0] = 'city_date2_morningsex':
 		act 'Scissoring':
 			*clr & cla
 			$temp_last_used = 'scissoring'
-			nat_org += 1
+			NatbelQW['horny'] += rand(10, 30)
 
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha53.jpg"></center>'
 			'As both of your passion builds neither of you can resist moving so that your legs are intertwined.'
 			'You both begin rocking back and forth slowly at first but gradually increasing in speed and intensity bring you both higher and higher.'
 
-			gs 'arousal', 5, 'trib'
+			gs 'arousal', 'trib', 5, 'lesbian'
 			gs 'stat'
 
 			gs 'natbel_friend', 'city_date2_morningsex'
@@ -1732,23 +1737,24 @@ if $ARGS[0] = 'city_date2_morningsex':
 		act 'Special play':
 			*clr & cla
 			$temp_last_used = 'special'
-			nat_org += 1
+			NatbelQW['horny'] += rand(10, 30)
 
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha54.jpg"></center>'
 			'You decide to use your boob to massage her pussy and slowly lower yourself down her body until you can feel Natasha''s wetness.'
 			'Slowly moving your body up and down you start edging her using your boob, your hard erect nipple gliding over her soaking wet slit.'
 			'It''s not long before her hand appears between her leg gently brushing against your boob as she slowly massages her clit in rythm with your actions.'
 
-			gs 'arousal', 5, 'foreplay_give', 'foreplay'
+			gs 'arousal', 'foreplay', 5, 'lesbian'
+			gs 'arousal', 'foreplay_give', -5, 'lesbian'
 			gs 'stat'
 
 			gs 'natbel_friend', 'city_date2_morningsex'
 		end
 	end
-	if (nat_org mod 100) >= 5:
+	if (NatbelQW['horny'] mod 10000) >= 100:
 		act 'Making Natasha cum':
 			*clr & cla
-			nat_org = (nat_org / 100) * 100 + 100
+			NatbelQW['horny'] = (NatbelQW['horny'] / 10000) * 10000 + 10000
 
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha55.jpg"></center>'
 			'After you lie back and spread your legs for Natasha to lick you out. However, she smiles and shakes her head and instead climbs on top of you and slowly kisses your body as she gradually works her way down and begins licking you from above after kissing your pussy.'
@@ -1757,16 +1763,18 @@ if $ARGS[0] = 'city_date2_morningsex':
 			'It seems that she''s nearly there so you run your tongue up and down flicking it in and out of her and stopping to suck up her juices which are by now freely flowing.'
 			'All of a sudden she stops licking and kissing you as her breathing gets ragged and at the same time starts to tremble uncontrollably. She grabs hold of your right leg cuddling it and bringing it up to her face as she cums, her juices flowing into your waiting mouth.'
 
-			gs 'arousal', 5, 'cuni_give'
+			gs 'arousal', 'cuni_give', 5, 'lesbian'
 			gs 'stat'
 
 
 			gs 'natbel_friend', 'city_date2_morningsex'
 		end
 	end
-	if nat_org >= 100:
+	if NatbelQW['horny'] >= 10000:
 		act 'Natasha makes you cum':
 			*clr & cla
+			NatbelQW['horny'] = 0
+			killvar '$temp_last_used'
 			minut += 10
 			'<center><video autoplay loop <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha56.mp4"></center>'
 			'Your excitement has been building a while but you managed to contain it and keep yourself on the edge, however, all of a sudden Natasha starts changing the pace and her tongue hits just the right spot!'
@@ -1774,7 +1782,7 @@ if $ARGS[0] = 'city_date2_morningsex':
 			'You then spend a few minutes in each other''s arms enjoying the afterglow and a little reluctant to move.'
 
 			$orgasm_or = 'yes'
-			gs 'arousal', 10, 'cuni', 'no_orgasm_msg'
+			gs 'arousal', 10, 'cuni', 'lesbian', 'no_orgasm_msg'
 			gs 'arousal', 'end'
 
 			act 'Shower breakfast and leave':
@@ -1904,9 +1912,9 @@ if $ARGS[0] = 'city_date2_palace':
 
 						'On hearing this you reply. "Right well I can guess where this is going. I suppose I''d best be be leaving then!"'
 						'Bella shakes her head. "Oh no <<$pcs_nickname>>, please don''t do that." You pause as she continues. "Please sit back down, I didn''t mean any offence. You didn''t let me finish. I was going to say that irrespective of anything else you''ve been nothing but kind to my girl and she really needed someone in her corner; since you became her friend she''s perked up but especially so since you two got close. I''m really grateful to you for that."'
-						'A blushing Natasha interrupts. "<<$npc_nickname[''A29'']>>!"'
+						'A blushing Natasha interrupts. "Mother!"'
 						'Bella looks at her daughter. "What?! I just wanted to acknowledge that and say that <<$pcs_nickname>> is welcome here while you two are together and to say I don''t care about any other stuff; I just care how you two behave towards each other. Anyway Natasha, did you speak to <<$pcs_nickname>> following our discussion?"'
-						'She shakes her head sadly. "No sorry <<$npc_nickname[''A29'']>> I didn''t want to risk ruining our weekend... Well okay I guess I''ll do so now."'
+						'She shakes her head sadly. "No sorry mother I didn''t want to risk ruining our weekend... Well okay I guess I''ll do so now."'
 
 						act 'Relationship status':
 							*clr & cla
@@ -1916,7 +1924,7 @@ if $ARGS[0] = 'city_date2_palace':
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha15.jpg"></center>'
 							'You turn your attention to Natasha, who looks worried and wait for her to start.'
 							'Natasha brings her hand to her forehead and looks a little sad and thoughtful as she says "<<$pcs_nickname>>, I wanted to just clarify our relationship with you as I know that you didn''t initially mean to ask me to be your girlfriend. I sort of pressured you and that was wrong, I''m sorry for that..." She pauses and looks more upset but indicates she hasn''t finished. She takes a deep breath and continues "You''re doing so made me very happy and I love being your girlfriend but I just had to let you know that if you or I feel the need to have other relationships that''s okay for now."'
-							'"Sorry, Natasha, first off it that you speaking or your <<$npc_nickname[''A29'']>> and what exactly are you saying? Do you want us to break up or what?"'
+							'"Sorry, Natasha, first off is that you speaking or your mother and what exactly are you saying? Do you want us to break up or what?"'
 
 							act 'Discuss an open relationship':
 								*clr & cla
@@ -1925,8 +1933,8 @@ if $ARGS[0] = 'city_date2_palace':
 								gs 'stat'
 
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha1.jpg"></center>'
-								'A now distraught Natasha replies. "NO <<$PCS_NICKNAME>>! No! I love being your girlfriend! Fuck! I knew I''d mess this up! I guess I mean that if you need to experiment I might get upset but would accept it, at least for now. We can have a discussion later on as to the long term future. For now let''s just have fun together and enjoy each other''s company."'
-								'Before you can respond she continues. "Also to answer your other question, yes I spoke to <<$npc_nickname[''A29'']>> but that was because I felt bad about pressuring you and yes she suggested this as a possible option." She gives a big sigh. "But in the end I do agree that this is a possible solution for now."'
+								'A now distraught Natasha replies. "NO <<$pcs_nickname>>! No! I love being your girlfriend! Fuck! I knew I''d mess this up! I guess I mean that if you need to experiment I might get upset but would accept it, at least for now. We can have a discussion later on as to the long term future. For now let''s just have fun together and enjoy each other''s company."'
+								'Before you can respond she continues. "Also to answer your other question, yes I spoke to my mother but that was because I felt bad about pressuring you and yes she suggested this as a possible option." She gives a big sigh. "But in the end I do agree that this is a possible solution for now."'
 								'You take a moment to digest what she just said then respond, "Okay Natasha, I guess what you''re saying is that for now you''d be okay with an open relationship? Then if I go to university with you we can think about taking it to a different level at some point while we''re there?"'
 								'Natasha nods at you. "Yes I guess so. I mean I''d prefer it if it was just you and I but we''re both very young and as you said initially we shouldn''t jump into something and mess it up because it''s too soon."'
 								'"Okay Natasha, thanks for your honesty. I know that would have been hard for you." You give her a hug. "I haven''t really thought about it but don''t worry I won''t do anything to embarrass you." You pause. "Anyway, just because we can doesn''t mean we will."'
@@ -2047,12 +2055,243 @@ if $ARGS[0] = 'city_date2_after_rel_talk':
 end
 
 if $ARGS[0] = 'city_date2_cleanup':
-	killvar 'temp_last_used'
-	killvar 'nat_org'
 	gt 'natbelapt', 'natroom'
 end
 
 
 
+if $ARGS[0] = 'bella_enters':
+	act 'Bella enters':
+		*clr & cla
+		menu_off = 1
+		minut += 5
+		gs 'stat'
+
+		'<center><img <<$set_imgh>> src="images\locations\pavlovsk\resident\apartment\natbelapt/natmomserious.jpg"></center>'
+		'On hearing the door open you look up and see Bella enter. You smile at her and greet her. "Hello Bella, are you okay only you look very serious?"'
+		'She smiles at you fleetingly. "Yes but that''s only thanks to you two."'
+		'You look a little confused and she continues. "Well you both got me home the other night when I embarrassed myself; I can''t remember much after having a huge argument with my date; safe to say I won''t be seeing him again. Anyway I just wanted to apologise and thank you for helping Natasha. I don''t know how she''d have managed without help."'
+		'"Oh... Look, don''t worry about it. It''s just one of those things I guess and I''m sure that Natasha and I will need a friend to help us sometimes."'
+		'She looks sad. "Yes well I''m the parent and so I''m supposed to set a good example. I won''t go into it but I do need to reduce my drinking especially when things get on top of me; it''s not the answer to dealing with life''s problems."'
+		'Unsure of how to respond you simply smile at her.'
+		'"Anyway I''m sorry for what happened and very grateful to you two. I''ll leave you alone now." With that she turns and leaves.'
+
+		act 'Natasha is concerned':
+			*clr & cla
+			minut += 5
+			NatBelQW['Bella'] = 2
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha5.jpg"></center>'
+			'As she leaves Natasha also thanks you again for your help and gives you a hug.'
+			'She confides in you. "I''m getting a bit worried about my mother. She''s never got as bad as the other night but I have noticed that she''s been drinking more."'
+			'Unsure of what to do or say you give her a comforting hug and a supportive kiss.'
+			'She hugs you back. "Thank you <<$pcs_nickname>> for being there when I needed you."'
+			'You respond. "Look Natasha, I guess all you can do is be a good daughter and help her out as you have been doing around the house and such to make her life a little easier. There isn''t much else I can think of at the moment."'
+			'Natasha thanks you again and continues. "Yeah I guess you''re right. I''ll just have to do my best and see how it goes. Anyway enough of that."'
+
+			act 'Return to her room': gt 'natbelapt', 'natroom'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'end_of_gschool':
+	act 'We need a chat about the future':
+		*clr & cla
+		menu_off = 1
+		minut += 5
+		NatbelQW['end_of_gschool_chat'] = 1
+		gs 'stat'
+
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha18.jpg"></center>'
+		'While chatting you notice Natasha suddenly looks quite sertious so you raise a questioning eyebrow and wait for her to start.'
+		'She clears her throat and begins. "<<$pcs_nickname>>, I need to ask you what you will do after school. As you know I''m going to go to university."'
+		'You aren''t sure where this is going but as the time to make a final decision is fast approaching you decide to tell her your plans.'
+
+		act 'I''m going to university':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha4.jpg"></center>'
+			'"I''m going to try university. After all my grades are okay, thanks in no small part to your help, especuially with that pesky homework." You say with a smile.'
+			'Natasha breaks into a grin. "Oh <<$pcs_nickname>> that''s wonderful and I''m sure we can help and support each other there and make sure we pass our courses. That should be a great benefit for us in our future careers."'
+			'"Hey, aren''t you getting a little ajhead of yourself here; we haven''t even started university yet and you''ve got us passing with flying colours?! Anyway, why did you ask?"'
+			'"Well, I just wanted to make sure as I was concerned that if I was at university and you weren''t that our relationship couldn''t really continue as we''d have to focus on different tings so I got up the courage to ask you to set my mind at ease."'
+			'You grin at her. "You do realise that I''ll be looking for your help at university don''t you?"'
+			'She nods. "Yeah and I like helping you. Anyway, you''ve also helped me with my school work."'
+
+			act 'What do you mean?':
+				*clr & cla
+				minut += 5
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha16.jpg"></center>'
+				'"She''s one of the brightest kids in the school so you''re unsure what she''s getting at so you ask. "What do you mean? Okay I''ve helped a bit buying you some stuff but not in relation to your studies."'
+				'She smile at you happily. "Well in addition to that just having a good friend has helped, let alone a girlfriend who I love spending time with. You''ve just made me much happier in general and with that there''s less to worry about."'
+				'"So not with my intellectual abilities then?" You tease.'
+				'She looks very happy. "Oh shut up and stop teasing!'
+				'With that she takes hold of your face and gives you a long lingering kiss which stops further teasing.'
+
+				act 'Return to her room': gt 'natbelapt', 'natroom'
+			end
+		end
+
+!Following the above please note the Quest log as follows: 'You''ve reached the end of the love path for Natasha in Pav. You can still hang out and go on dates with her as well as do homework together. Her path will continue at university.'
+
+		act 'I''m going to go to work':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha1.jpg"></center>'
+			'You sigh as you know your answer won''t be what she wants to hear. "I''m going to go to work as I don''t think I''m cut out to go onto university."'
+			'At this Natasha looks very upset.'
+			'You try to comfort her. "Look Natasha it''s not the end of the world. Let''s just see how it goes."'
+			'A little surprisingly she shakes her head. "No <<$pcs_nickname>>. I''ve thought about this long and hard and if I go to university and you don''t I simply don''t think it''ll work out as I''d need to concentrarte on my studies and you''ll need to do likewise with your career."'
+
+			act 'Break up':
+				*clr & cla
+				minut += 5
+				NatbelQW['FriendLover'] = -NatbelQW['FriendLover']
+				gs 'npc_relationship', 'set', 'A16', 50
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha3.jpg"></center>'
+				'By now she''s crying with her head in her hands but she maintains her resolve before she continue.'
+				'"I respect your decision <<$pcs_nickname>> and wish you well. I''ve had a great time with you and this period of being your girlfriend has been one of the happiest for me but we need to call it a day on our relationship. I simply need to give 100% to my university education and I can''t see it would work if you aren''t at university too. I''m so sorry..."'
+				'You''re unsure of what to do for the best but feel it would only make it worse if you tried to persuade her to change her mind.'
+				'So with a long sigh and after a final look at her you get up and leave without responding.'
+!Note to coder: Please set relationship to 50 and block all further paths with her.
+
+				act 'Return to her room': gt 'natbelapt', 'natroom'
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'birthday_invitation':
+	if money < 1000 and karta < 1000:
+		act 'Natasha gives you an invitation (You need 1000 <b>₽</b>)': '<font color="red">You don''t have enough money</font>'
+	else
+		act 'Natasha gives you an invitation':
+			*clr & cla
+			menu_off = 1
+			minut += 5
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha6.jpg"></center>'
+			'While looking at some magasines with Natasha she asks you, "So <<$pcs_nickname>>, my birthday is comming up shortly and I wondered if you''d like to join my mother and I for a meal at Del Parco the Saturday after? I know it''s not much but I''d love it if you could join us."'
+			'"Oh I didn''t know, probably should have asked you."'
+			'"Don''t worry. I know it''s not much but it''s my mother''s treat so will you come?"'
+
+	!Note to coder: Wether Sveta accepts or declines she'll tell Bella the makeup Nat is after and give her 1,000 rubles towards it. Please deduct from Sveta's cash or bank.
+			act 'Accept (you''ll give 1000 towards a present)':
+				*clr & cla
+				minut += 5
+				NatbelQW['bday_invite'] = 1
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha7.jpg"></center>'
+				'"Yes, of course Natasha, I''d love to come and thanks for the invitation. What time do you want me to arrive?"'
+				'"If you get to Del Parco about 7PM that''d be great as the table is booked for then."'
+				'"Okay Natasha I''ll look forward to it."'
+	!Note to coder: Please add a note to Quest to remind players of the date and time
+				'A beaming Natasha looks at you. "Anyway <<$pcs_nickname>> when is yours? I hope I haven''t missed it?"'
+				'With a smile you tell your your birthday.'
+	!If Sveta''s birthday has passed
+				if month > birthmonth or month = birthmonth and day > birthday:
+					'"Oh I''m sorry <<$pcs_nickname>> I should probably have asked you earlier."'
+				else
+					'"So shall we do something for yours too? That''d be lovely!"'
+					'You reply, "Thanks Natasha but I really have no clue if my family will do anything for mine so best we leave it for this year."'
+					'Natasha nods. "Oh! Okay <<$pcs_nickname>>, let me know if you change your mind."'
+				end
+
+				act 'Return to her room': gt 'natbelapt', 'natroom'
+			end
+
+			act 'Decline (you''ll give 1000 towards a present)':
+				*clr & cla
+				minut += 5
+				NatbelQW['bday_invite'] = -1
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha8.jpg"></center>'
+				'You sigh and let her down gently. "I''m really sorry Natasha but I can''t make it but thank you for the invitation."'
+				'Natasha looks a little sad but gived you a brief hug anyway. "Not to worry <<$pcs_nickname>> I know it''s a bit short notice."'
+				'You decide to comfort her and reply "I''m really sorry Natasha, look we''ll have other trips out. I know it won''t be your birthday but I''m sure we''ll have fun anyway."'
+				act 'Return to her room': gt 'natbelapt', 'natroom'
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'bday_del_parco':
+	*clr & cla
+	menu_off = 1
+	gs 'stat'
+
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/delparco2.jpg"></center>'
+	'You arrive at Del Parco and look for Natasha and Bella. Spotting them at a table you head over and join them.'
+	'As you arrive they greet you and Bella leaves the two of you alone for a while as she excuses herself and heads off to the ladies.'
+	'You give Natasha a friendly kiss and wish her a happy birthday. "Well happy birthday <i>girlfriend</i>. Apologies as I haven''t got you a present yet. I was thinking of some perfume but I''d rather you were with me so you could choose what you wanted as I wouldn''t want to get the wrong one."'
+	'"Oh <<$pcs_nickname>> I wouldn''t mind and anyway I''m sure I''d like whatever you chose." Natasha response smiling. "In any event you don''t have to get me anything, you''ve bought me plenty of nice clothes and I''m very grategul."'
+
+	act 'Bella returns':
+		*clr & cla
+		minut += 5
+		gs 'stat'
+
+		'<center><img <<$set_imgh>> src="images\locations\pavlovsk\resident\apartment\natbelapt/natmomserious.jpg"></center>'
+		'You both look up as you see Bella returning to the table.'
+		'She smiles at Natasha and hands her a present. "Happy birthday darling. I''m sorry it''s not much but I hope you like it."'
+		'"I''m sure I will mom and thank you."'
+		'Bella gives you a wink as she looks at her daughter opening her present.'
+		'"Oh wow! Thank you mother that''s just the makeup I was looking at in the magasine but how did you..." Then she realises and looks at you."'
+		'With a broad grin you nod and tell her. "Well you''ve been going on about this makeup since forever and we didn''t really know what to get so your mother and I got this for you as a joint present. I''m glad you like it."'
+		'After a short pause and a short giggle you continue. "So now will you give my poor ears a rest about the makeup?"'
+		'"No promises <<$pcs_nickname>>..." She replies grinning.'
+
+		act 'Have a nice meal':
+			*clr & cla
+			minut += 40
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha64.jpg"></center>'
+			'Once Natasha has her present and cards the three of you sit down and enjoy a lovely meal and a glass of wine.'
+			'As the meal draws to a close Bella turns to you and thanks you for the tip regarding the birthday present and for your contribution.'
+			'Before the waiter comes over with the bill you offer to pay towards the meal.'
+			'"Thank you <<$pcs_nickname>> but that won''t be necessary. Anyway, you''ve already done so much for my daughter and I can''t thank you enough so this is a small thank you from me.'
+			'After a short pause she continues. "Anyway cheers girls and happy birthday darling."'
+
+			act 'Return':
+				*clr & cla
+				minut += 15
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/cafe/caffe_del_parco_night.jpg"></center>'
+				'Following the meal the three of you leave Del Parco and make your way back to Natasha''s appartment.'
+				'Along the way you chat about whatever comes to mind and Natasha is still saying that she loved her present and the meal.'
+				'As you approach the appartment Bella turns to you. "Please stay over tonight if you''d like <<$pcs_nickname>>. I''m sure you don''t want to be out on your own and I''m 100% sure Natasha would like you to stay over."'
+				'"Thank you Bella and yes that''d be lovely. Also thanks for accepting our erm... <i>girlfriend</i> relationship and not making it awkward for us."'
+				'"Well I have to say it was a bit of a shock but when I had a chance to think abouit it and I simply realised how happy my girl has been recently so clearly that wasn''t just a coincidence and as I just want to see her happy it was pretty much a no-brainer." Bella smiles and gives you a quick hug.'
+				'As you arrive back at Natasha''s she leans close to you and whispers. "I''ve got a present for you too but it hasn''t arrived yet so when it does I thought I''d take you out once we''re at university as that''s not long away now."'
+
+				gs 'shortgs', 'setloc', 'natbelapt', 'natroom'
+				$locclass = 'bedr'
+
+				gs 'natbel_kissinggames', 'set_main_sex_act'
+				!Note to coder: See document 'Natasha_repeats_4' and continue with act 'Have sex with Natasha' then in the morning continue with act 'Wake up sex'
+			end
+		end
+	end
+end
+
+
+
 
 --- natbel_friend ---------------------------------

+ 369 - 0
locations/natbel_kissinggames.qsrc

@@ -0,0 +1,369 @@
+# natbel_kissinggames
+
+
+!This opens the repeatable sub menu: Kissing_games. Please use the below text whenever this action is required going forward.
+!Care the 1st bit of this 'Kiss your girlfriend' (from part 3) is renamed to 'Have sex with Natasha' and has different text. It also finishes back the bedroom and not the stairwell if this happens in her apartment or the hotel room if they are in the hotel in St. P.
+!Available any time you are in a bedroom with Natasha (parents, hotel, your own place).
+
+if $ARGS[0] = 'set_main_sex_act':
+	act 'Have sex with Natasha': gt 'natbel_kissinggames', 'main'
+end
+
+!act 'Have sex with Natasha':
+if $ARGS[0] = 'main':
+	*clr & cla
+	menu_off = 1
+	minut += 5
+	gs 'stat'
+
+	'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha24a.mp4"></center>'
+	'You take hold of Natasha''s hand and gently lead her to the bed and notice that she''s looking at you longingly. Your eyes wander down to her delicious lips as you both make your way towards her bed.'
+	'She slowly leans in towards you. Taking hold of her face, you press your lips against hers and begin a long, sensual kiss.'
+	'After what seems like ages, but was probably only a few seconds, you breathlessly pull apart.'
+	'Smiling, you say. "Hello, hot stuff!"'
+	'"Well, hello to my sizzling girlfriend, too!" she replies, grinning at you and licking her lips. "Fuck! That was hot!"'
+	'"You think?!" you say to her as she sits there for a moment with a silly grin plastered over her face. "You ain''t seen nothing yet."'
+	'With a small giggle she murmurs softly, "No I guess not." With that she leans back in towards you and starts kissing you again.'
+
+	act 'Undress':
+		*clr & cla
+		minut += 5
+		gs 'clothing', 'strip_all'
+		NatbelQW['horny'] = 0
+		gs 'stat'
+
+		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha25.mp4"></center>'
+		'You slowly wriggle out of your top, allowing it to slip down your body.'
+		'You are both overcome by a loving feeling towards each other and lust quickly takes over.'
+		'She slowly makes her way down your body and tenderly starts kissing and sucking on your breasts.'
+
+		gs 'natbel_kissinggames', 'set_sex_acts1'
+	end
+end
+
+
+if $ARGS[0] = 'set_sex_acts1':
+!The below 4 acts can be done in any order
+!'Scissoring' is the finale.
+
+	if $temp_last_sexact ! 'breast':
+		act 'Breast play':
+			*clr & cla
+			$temp_last_sexact = 'breast'
+			NatbelQW['horny'] += rand(10, 30)
+
+			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha26.mp4"></center>'
+			'Natasha crawls over to you and starts slowly playing with and sucking on your boobs while gently massaging them. She then follows up by flicking her tongue over your nipple.'
+			'You don''t want her to feel left out, so you reciprocate.'
+
+			gs 'arousal', 'foreplay', -5, 'lesbian'
+			gs 'arousal', 'foreplay_give', -5, 'lesbian'
+			gs 'stat'
+
+
+			gs 'natbel_kissinggames', 'set_sex_acts1'
+		end
+	end
+
+	if $temp_last_sexact ! 'rub_clit':
+		act 'Rub her clit':
+			*clr & cla
+			$temp_last_sexact = 'rub_clit'
+			NatbelQW['horny'] += rand(10, 30)
+
+			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha27.mp4"></center>'
+			'Natasha turns over slowly and lying on her front she spreads her legs sticking her bum in the air giving you easy access to that sexy arse.'
+			iif(pcs_horny >= 50, 'You are already very turned on and', 'You') + ' quickly get to work massaging her clit and soon both of you are soaking wet.'
+			'Not wanting you to feel left out, she ensures that you receive the same attention by concentrating on your for a while.'
+
+			gs 'arousal', 'clit_finger_give', 5, 'lesbian'
+			gs 'arousal', 'clit_finger', -5, 'lesbian'
+			gs 'stat'
+
+			gs 'natbel_kissinggames', 'set_sex_acts1'
+		end
+	end
+
+	if $temp_last_sexact ! 'lick_pussy':
+		act 'Lick her pussy':
+			*clr & cla
+			$temp_last_sexact = 'lick_pussy'
+			NatbelQW['horny'] += rand(10, 30)
+
+			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha28.mp4"></center>'
+			iif(pcs_horny >= 50, 'Both of you are dripping with arousal as y', 'Y') +'ou push Natasha onto her back and bring your mouth to her pussy and start eating her out.'
+			'Breathing heavily, she lies back while you slowly take her to the edge before stopping, teasing her.'
+			'When you pull back, Natasha takes a few seconds to gather herself before she puts her mouth against your sex and returns the favor.'
+
+			gs 'arousal', 'cuni_give', 5, 'lesbian'
+			gs 'arousal', 'cuni', -5, 'lesbian'
+			gs 'stat'
+
+			gs 'natbel_kissinggames', 'set_sex_acts1'
+		end
+	end
+
+	if $temp_last_sexact ! 'dildo':
+		if stat['think_virgin'] = 1:
+			act 'Lose your virginity':
+				*clr & cla
+				$temp_last_sexact = 'dildo'
+				NatbelQW['horny'] += rand(10, 30)
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha29a.mp4"></center>'
+				'Natasha opens her bedside cabinet drawer and pulls out a double dildo and, after placing it inside her pussy, lines it up with yours.'
+				'Saying nothing, you slowly lower yourself onto it and start rocking to and fro, so that you are fucking Natasha while stimulating yourself at the same time.'
+				'You are starting to really enjoy the feeling and the building fire within your body and smiling between pants you tell Natasha, "Well <i>girlfriend</i>, I guess you just popped my cherry!"'
+				'She looks astonished and pulls you in for a long and passionate kiss. "Wow, thank you, <<$pcs_nickname>>. You should have said something. I would have stopped."'
+				'"No, I was ready. Anyway enough talk!"'
+
+				gs 'arousal', 'vaginal_dildo', 5, 'lesbian'
+				gs 'stat'
+
+				gs 'natbel_kissinggames', 'set_sex_acts1'
+			end
+
+			act 'No, I''m a virgin':
+				*clr & cla
+				$temp_last_sexact = 'dildo'
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha29b.jpg"></center>'
+				'Realising what''s happening, you decide to stop Natasha. "Wait, I''m still a virgin!"'
+				'She immediately stops and removes the dildo. "I''m sorry, <<$pcs_nickname>>! I didn''t know. Okay, let''s leave that for now."'
+				'You nod. "Thank you. Maybe next time?"'
+
+				gs 'natbel_kissinggames', 'set_sex_acts1'
+			end
+		else
+			act 'Use a dildo':
+				*clr & cla
+				$temp_last_sexact = 'dildo'
+				NatbelQW['horny'] += rand(10, 30)
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha29.mp4"></center>'
+				'Natasha opens her bedside cabinet drawer and pulls out a double dildo and, after placing it inside her pussy, lines it up with yours.'
+				'You slowly lower yourself onto it and start rocking to and fro, so that you are fucking Natasha while stimulating yourself at the same time.'
+
+				gs 'arousal', 'vaginal_dildo', 5, 'lesbian'
+				gs 'stat'
+
+				gs 'natbel_kissinggames', 'set_sex_acts1'
+			end
+		end
+	end
+
+	if NatbelQW['horny'] >= 100:
+		act 'Scissoring':
+			*clr & cla
+			killvar '$temp_last_sexact'
+
+			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha30.mp4"></center>'
+			iif(pcs_arousal >= 50, 'Overcome with arousal, y', 'Y') +'ou lay back on the bed with your legs wide open and pull Natasha on top of you.'
+			'Placing one leg between yours and straddling your right leg, she starts to grind on you, bringing you both closer and closer to the edge of an orgasm.'
+
+			gs 'arousal', 'trib', 5, 'lesbian'
+			gs 'stat'
+
+			act 'Orgasm':
+				*clr & cla
+
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha31.mp4"></center>'
+				'As the crescendo builds, you both speed up until the dam is ready to burst and you are desperate to cum together.'
+				'Your pussy starts tightening as Natasha picks up the pace. It''s not long before you let out a muted scream and squeeze your legs around Natasha as she brings you an explosive orgasm. You relax your grip slightly and speed up for Natasha who grips you and lies on the bed, riding the waves of pleasure rushing through her.'
+				'You both simply collapse on the bed and smile at each other in the afterglow, cuddling each other. Natasha gives you a long passionate kiss.'
+				'"Fuck, <<$pcs_nickname>>, that was something else!" she says, still short of breath.'
+				'"Yeah, Natasha, you are one foxy little minx, that''s for sure!"'
+				'"You want to go again or are you good? Gotta make sure my girlfriend is happy."'
+
+				$orgasm_or = 'yes'
+				gs 'arousal', 'trib', 5, 'lesbian', 'no_orgasm_msg'
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				act 'Yes':
+				!Repeat from 'Breast play'
+					cla
+					gs 'natbel_kissinggames', 'set_sex_acts1'
+				end
+
+				act 'Satisfied':
+					*clr & cla
+					minut += 5
+					gs 'stat'
+
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha32.jpg"></center>'
+					'You reply, "No, I''m very satisfied, thanks. You?"'
+					'"Yes, I''m happy and content."'
+					'"Okay, I better go before I get tempted and we both end up exhausted. I''ll see you soon."'
+					'"I''m looking forward to it," Natasha says as she leans over and gently kisses your boob. "Till next time, sexy."'
+					'You slip out of her bed, get redressed and exit her apartment.'
+
+					gs 'natbel_kissinggames', 'set_main_end_acts'
+				end
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'set_main_end_acts':
+	act 'Leave':
+		if $loc = 'natbelapt':
+			gt 'pod_ezd', 'etaj_4'
+		else
+			gt $loc, $loc_arg
+		end
+	end
+
+	if ($locclass = 'bedr' or $loc = 'HotelRoom') and hour >= 22:
+!Available any time after 10PM when you are in a bedroom with Natasha (parents, hotel, your own place).
+		act 'Go to bed':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha32.jpg"></center>'
+			'"Sorry, Natasha, I''m done!"'
+			'"She leans over and gives you a soft passionate kiss. "Stay with me," she suggests lovingly while licking her lips and savouring your taste. She then slowly moves down to your boobs and gives them a final kiss before settling down next to you.'
+			'You answer by cuddling up to her and you both drift off to sleep.'
+
+			act 'Sleep': gt 'pre_sleep', 'start'
+		end
+	end
+end
+
+
+
+
+!This opens the repeatable sub menu: Kissing_games. Please use the below text whenever this action is required going forward.
+!Care the 1st bit of this 'Wake up sex' (from part 4) is not included here so so instead . It also finishes back in her bedroom and not the stairwell if this happens in her apartment, a hotel room or your own place.
+
+if $ARGS[0] = 'set_wakeup_sex_act':
+	act 'Wake up sex': gt 'natbel_kissinggames', 'wakeup_sex'
+end
+
+if $ARGS[0] = 'wakeup_event_text':
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha50.jpg"></center>'
+	'You slowly wake up and look over at Natasha who is still asleep.'
+end
+
+!act 'Wake up sex':
+if $ARGS[0] = 'wakeup_sex':
+	*clr & cla
+	minut += 5
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha51.mp4"></center>'
+	'Natasha slowly wakes and slides over to you and wraps her arm around you. "Umm, this is a nice way to wake up <<$pcs_nickname>>" she says as she starts playing with your breast'
+	'"Umm... Yeah..." You respond closing your eyes and enjoying her embrace as you slowly start to feel your arousal building.'
+	'It seems that the same is happening to Natasha as you can hear her breathing change and she starts moving against you ever so slightly at first...'
+	'You lie pretty still just letting your body respond to her actions as you let her take control of the pace.'
+	'It''s not long before she gives you a long passionate kiss which you fully return as you roll over facing her.'
+
+	NatbelQW['horny'] = 0
+
+	gs 'natbel_kissinggames', 'set_sex_acts2'
+end
+
+
+if $ARGS[0] = 'set_sex_acts2':
+	if $temp_last_sexact ! 'boob_kiss':
+		act 'Boob kiss':
+			*clr & cla
+			$temp_last_sexact = 'boob_kiss'
+			NatbelQW['horny'] += rand(10, 30)
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha52.jpg"></center>'
+			'You crawl on top of her and tweak her nipples at first.'
+			'Slowly you begin kissing, licking and sucking them then letting her nipple pop out before recommencing as you keep your eyes focused directly on hers.'
+
+			gs 'arousal', 'foreplay', 5, 'lesbian'
+			gs 'arousal', 'foreplay_give', -5, 'lesbian'
+			gs 'stat'
+
+			gs 'natbel_kissinggames', 'set_sex_acts2'
+		end
+	end
+
+	if $temp_last_sexact ! 'scissoring':
+		act 'Scissoring':
+			*clr & cla
+			$temp_last_sexact = 'scissoring'
+			NatbelQW['horny'] += rand(10, 30)
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha53.jpg"></center>'
+			'As both of your passion builds neither of you can resist moving so that your legs are intertwined.'
+			'You both begin rocking back and forth slowly at first but gradually increasing in speed and intensity bring you higher and higher.'
+
+			gs 'arousal', 'trib', 5, 'lesbian'
+			gs 'stat'
+
+			gs 'natbel_kissinggames', 'set_sex_acts2'
+		end
+	end
+
+	if $temp_last_sexact ! 'special':
+		act 'Special play':
+			*clr & cla
+			$temp_last_sexact = 'special'
+			NatbelQW['horny'] += rand(10, 30)
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha54.jpg"></center>'
+			'You decide to use your boob to massage her pussy and slowly lower yourself down her body until you can feel Natasha''s wetness.'
+			'Slowly moving your body up and down you start edging her using your boob.'
+			'It''s not long before her hand appears between her leg gently brushing against your boob as she slowly massages her clit in rythm with your actions.'
+
+			gs 'arousal', 'foreplay_give', 5, 'lesbian'
+			gs 'arousal', 'foreplay', 5, 'lesbian'
+			gs 'stat'
+
+			gs 'natbel_kissinggames', 'set_sex_acts2'
+		end
+	end
+
+	if NatbelQW['horny'] >= 100:
+		act 'Making Natasha cum':
+			*clr & cla
+			NatbelQW['horny'] = (NatbelQW['horny'] / 10000) * 10000 + 10000
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha55.jpg"></center>'
+			'After you lie back and spread your legs for Natasha to lick you out. However, she smiles and shakes her head and instead climbs on top of you and slowly kisses your body as she gradually works her way down and begins licking you from above after kissing your pussy.'
+			'Her own is directly above your face and you can see it glistening with arousal with the odd drip forming.'
+			'It''s just so tempting that you lick up her moistness then flick your tongue in and out of her pussy at which point Natasha groans.'
+			'It seems that she''s nearly there so you run your tongue up and down flicking it in and out of her and stopping to suck up her juices which are by now freely flowing.'
+			'All of a sudden she stops licking and kissing you as her breathing gets ragged and she grabs hold of your right leg cuddling it and bringing it up to her face as she cums, her juices flowing into your waiting mouth.'
+
+			gs 'arousal', 'cuni', -1, 'lesbian'
+			gs 'arousal', 'cuni_give', 5, 'lesbian'
+			gs 'stat'
+
+			gs 'natbel_kissinggames', 'set_sex_acts2'
+		end
+	end
+
+	if NatbelQW['horny'] >= 10000:
+		act 'Natasha makes you cum':
+			*clr & cla
+			minut += 5
+			NatbelQW['horny'] = 0
+
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/kissing_games/natasha56.jpg"></center>'
+			'Your excitement has been building a while but you managed to contain it and keep yourself on the edge, however, all of a sudden Natasha starts changing the pace and her tongue hits just the right spot!'
+			'Unable to hold back any longer you groan loudly and squirt into her mouth as you grab her arse squeezing her buttocks together.'
+			'You both lie next to each other catching your breath before considering what to do next.'
+
+			$orgasm_or = 'yes'
+			gs 'arousal', 'trib', 5, 'lesbian', 'no_orgasm_msg'
+			gs 'arousal', 'end'
+			gs 'stat'
+
+			if $loc = 'natbelapt':
+				act 'Return to her room':
+					gt 'natbelapt', 'natroom'
+				end
+			else
+				act 'Return to location':
+					gt $loc, $loc_arg
+				end
+			end
+		end
+	end
+end
+
+
+--- natbel_kissinggames ---------------------------------

+ 19 - 1
locations/npcStat.qsrc

@@ -8,6 +8,14 @@
 !! eg. "gs 'boyStat', 'A56'" would call for Roma. Likewise, "gs 'boyStat', 'A56'" also calls for Roma.
 !! A second argument calls for multiple partners. They are output as stats1, stats2, stats3, and stats4, for a total of 5 stats.
 !! If ARGS[1] is not set it defaults to zero, so you can use the variables it sets with or without [0] e.g. dick or dick[0] are equivalent
+!! $ARGS[2] is the condom type. Current types are:
+!!	- 'none':		no conddom
+!!	- 'normal':		a normal condom
+!!	- 'sabotaged'	a sabotaged condom
+!!	- 'extra_thin'
+!!	- 'ribbed'
+
+
 
 if ($ARGS[0] = '' and ARGS[0] > 0) or (isnum(mid($ARGS[0],1,1)) and val(mid($ARGS[0],1,1)) < 10):
 	npclastcalledn = iif($ARGS[1] ! '' and isnum($ARGS[0]), val($ARGS[0]), ARGS[0])
@@ -95,7 +103,17 @@ else
 	npcStatVars['age'] = rand(18, 35)
 end
 
-$npcStatVars['condom'] = $ARGS[2]
+if $ARGS[2] = '':
+	if preziktype = 0 and (mc_inventory['equipped_condoms']+mc_inventory['normal_condoms']) > 0:
+		$npcStatVars['condom'] = 'normal'
+	elseif preziktype = 2 and (mc_inventory['equipped_condoms']+mc_inventory['sabotaged_condoms']) > 0:
+		$npcStatVars['condom'] = 'sabotaged'
+	else
+		$npcStatVars['condom'] = 'none'
+	end
+else
+	$npcStatVars['condom'] = $ARGS[2]
+end
 
 
 !! ----- AGE --------------------------------------------------

+ 1 - 2
locations/shortgs.qsrc

@@ -900,13 +900,12 @@ if $ARGS[0] = 'setloc':
 	!! Sets the location variables based on $ARGS[1] = loc, $ARGS[2] = loc arg
 	!! Primary key
 	$prevloc = $loc
-	$prevarg = $loc_arg
-
 	$loc = $ARGS[1]
 	$menu_loc = $ARGS[1]
 	$locM = $ARGS[1]
 
 	!! Secondary key
+	$prevarg = $loc_arg
 	$loc_arg = $ARGS[2]
 	$menu_arg = $ARGS[2]
 	$locM_arg = $ARGS[2]

+ 19 - 1
locations/wakeup_events.qsrc

@@ -46,6 +46,9 @@ if $ARGS[0] = 'start' or $ARGS[0] = '':
 			$sleep_events_priority[] = 'gs ''therapist_home'', ''wakeup'' '
 		end
 
+		if natbel_unlock = 1 and $loc = 'natbelapt' and $loc_arg = 'natroom':
+			$sleep_events_priority[] = "gs 'wakeup_events', 'nat_wakeup_sex'"
+		end
 
 		if mid($start_type, 1, 2) = 'sg' and sleepVars['slept_in'] = 1 and kanikuli = 0 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and suspended['on'] ! 1:
 			if (hour = 7 or hour = 8):
@@ -179,12 +182,26 @@ if $ARGS[0] = 'vomiting_check':
 	gs 'wakeup_events', 'event_end'
 end
 
+if $ARGS[0] = 'nat_wakeup_sex':
+	gt 'wakeup_events', 'nat_wakeup_sex1'
+end
+
+if $ARGS[0] = 'nat_wakeup_sex1':
+	gs 'natbel_kissinggames', 'wakeup_event_text'
+
+	act 'Get out of bed': gs 'wakeup_events', 'event_end'
+	act 'Have morning sex with Natasha':
+		gs 'wakeup_events', 'exit'
+		gt 'natbel_kissinggames', 'wakeup_sex'
+	end
+end
+
 
 
 
 if $ARGS[0] = 'marisha_ev_morning':
 	*clr
-	'<center><img src="images/characters/pavlovsk/resident/marisha/marisha.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/marisha/marisha.jpg"></center>'
 	'You wake up feeling relaxed then look over to see Marisha already up. She gives you a smile and says, "Thanks for everything <<$pcs_firstname>>. See you later." She then leaves as you continue getting up.'
 	MarishaQW['marisha_sleepover'] = 0
 	gs 'wakeup_events', 'event_end'
@@ -229,4 +246,5 @@ if $ARGS[0] = 'sg_slept_in':
 	gs 'wakeup_events', 'event_end'
 end
 
+
 --- wakeup_events ---------------------------------