Browse Source

[fixed] could loan Nat money too soon and removed old bestfriend variable as it did nothing except work as a timer which I added as NatbelQW['homework']

Kevin_Smarts 7 tháng trước cách đây
mục cha
commit
30200a7397

+ 1 - 0
locations/natbelEv.qsrc

@@ -142,6 +142,7 @@ if $ARGS[0] = 'study_together':
 	lern += rand(3, 6)
 	gs 'exp_gain', 'intel', rand(1, 2)
 	if NatbelQW['QWstage'] = 0: NatbelQW['QWstage'] = 1
+	NatbelQW['homework'] += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/study.jpg"></center>'
 	'"Let''s do our homework." You tell Natasha as you start taking your things from your bag.'

+ 172 - 167
locations/natbel_chat.qsrc

@@ -28,8 +28,6 @@ if $ARGS[0] = 'chat':
 	gs 'natbel_chat', 'lover_chat'
 end
 
-
-
 if $ARGS[0] = 'preg_chat':
 	if npc_pregtalk['A16'] = 0 and kid = 0:
 		if NatbelQW['pregday'] > 0 and (daystart-NatbelQW['pregday']) > 90 and (daystart-NatbelQW['pregday']) < 200 and func('body_din','pregnancyVisibility') = 1:
@@ -122,190 +120,204 @@ if $ARGS[0] = 'events_chat':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
 		'You talk about the price of clothes and cosmetics for a while. Natasha seems to know a lot about the latest fashion, even though she can''t afford it.'
-		if NatbelQW['FriendLover'] = 0:
-			if NatbelQW['QWstage'] = 1 and NatbelQW['BestFriend'] >= 3 and NatbelQW['Debt'] = 0 and money >= 5000:
-				'Natasha looks down in embarrassment. "<<$pcs_nickname>>, you have lots of money. Could you lend me 5000 <b>₽</b>? I will pay it back, I give you my word."'
+		if NatbelQW['homework'] < 5:
+			act 'Keep talking': gt 'natbel_chat', 'chat'
+			act 'Stop talking': gt 'natbelapt', 'natroom'
+		elseif NatbelQW['FriendLover'] = 0:
+			gs 'natbelapt', 'loan_events_chat'
+		else
+			gs 'natbelapt', 'lover_events_chat'
+		end
+	end
+end
 
-				act 'Don''t give her the money': gt 'natbel_chat', 'chat'
-				act 'Lend Natasha the 5000 <b>₽</b>':
-					*clr & cla
-					if NatbelQW['QWstage'] = 1: NatbelQW['QWstage'] = 2
+if $ARGS[0] = 'loan_events_chat':
+	if NatbelQW['Debt'] > 0:
+		if NatbelQW['DebtDay'] > daystart:
+			'Natasha promises you to repay the <<NatbelQW[''Debt'']>><b>₽</b> in <<NatbelQW[''DebtDay'']-daystart>> days.'
+
+			act 'Keep talking': gt 'natbel_chat', 'chat'
+			act 'Stop talking': gt 'natbelapt', 'natroom'
+		else
+			'Natasha looks at the floor, "<<$pcs_nickname>>, I... I''m sorry, I don''t have your money."'
+			if NatbelQW['QWstage'] = 2:
+				act 'Demand repayment':
+					NatbelQW['QWstage'] = 3
 					minut += 5
-					NatbelQW['Debt'] = 5000
-					money -= 5000
-					NatbelQW['MoneyGivenTimes'] += 1
-					NatbelQW['DebtDay'] = daystart + 30
-					NatbelQW['BestFriend'] += 1
 					gs 'stat'
+					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
-					'"Hmmm. Ok, but you have to do my homework whenever I ask, and you still have to pay me back."'
-					'You get your purse and give Natasha the money. Natasha is delighted and says that she will pay it back in a month.'
-
-					act 'Keep talking': gt 'natbel_chat', 'chat'
-					act 'Stop talking': gt 'natbelapt', 'natroom'
+					'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"'
+					*nl
+					'Natasha looks at you with fearful eyes, and you''re getting some ideas as to how you could "use" her. She did say "anything," after all...'
+					'You snarl at her with an evil hiss: "You''ll be my little pet until you''ve worked off every last Kopeck. And don''t you dare tell anyone about this!"'
+					'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
+					if lernHome > 0:
+						gs 'natbel_cp_1', 'make_her_do_homework'
+					else
+						*clr & cla
+						minut += 60
+						menu_off = 1
+						NatbelQW['homework'] += 1
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/study.jpg"></center>'
+						'Natasha sighs with a resigned look as she nods meekly.'
+						'"I should make you do my homework but I''ve already done it, so instead you can write out some lines for me. Write ''I will do as <<$pcs_firstname>> tells me'' one thousand times."'
+						'You relax on her bed and start daydreaming for a while.'
+						'You are woken out of your daydream by Natasha saying: "It''s done <<$pcs_nickname>>."'
+						'"Good, let me have a look at it."'
+						'You tear the paper up and throw the pieces in the bin.'
+						act 'Let''s hope she learned her lesson': gt 'natbelapt', 'natroom'
+					end
 				end
-			elseif NatbelQW['QWstage'] >= 2 and NatbelQW['Debt'] = 0 and money >= 2000:
-				'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me some money, please? I swear I''ll pay you back before you even miss it."'
-
-				act 'Don''t give her the money': gt 'natbel_chat', 'chat'
-				act 'Give her the money (2000 <b>₽</b>)':
+			else
+				act 'Demand repayment':
+					minut += 5
+					gs 'stat'
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
-					NatbelQW['Debt'] = 2000
-					money -= 2000
-					NatbelQW['MoneyGivenTimes'] += 1
-					gs 'stat'
 					if NatbelQW['MoneyGivenTimes'] < 4:
-						!!set timer for repayment
-						NatbelQW['DebtDay'] = daystart + 30
-						gs 'stat'
-						'"Ok. I am sure I can think of more things for you to do for me." You get your purse and give Natasha the money.'
-						'"Thank you <<$pcs_nickname>>, you''re the best. I promise you''ll have it back within a month."'
-
-						act 'Keep talking': gt 'natbel_chat', 'chat'
-						act 'Stop talking': gt 'natbelapt', 'natroom'
-					elseif NatbelQW['MoneyGivenTimes'] < 7:
-						'"Or I could ...uhm... I could do those things again for you to... to repay you."'
-						'"Ok. I am sure I can think of more things for you to do for me." You get your purse and give Natasha the money.'
-						'"Thank you <<$pcs_nickname>>, you''re the best. I promise you won''t regret it."'
+						'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"'
+						*nl
+						'Natasha looks at you with fearful eyes, and you are getting some more ideas as to how you could "use" her this time. She did say "anything," after all...'
+						'You snarl at her with an evil hiss: "You''ll be my little pet again until you''ve worked off every last Kopeck. And don''t you dare tell anyone about this!"'
+						'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
 
 						act 'Keep talking': gt 'natbel_chat', 'chat'
 						act 'Stop talking': gt 'natbelapt', 'natroom'
 					else
-						'You get your purse and give Natasha the money.'
-						'"I see someone wants to be my little bitch again. You''re going to do whatever I want until you''ve worked off that debt."'
-						'"You know I will, I''ve proven that haven''t I?"'
+						'"Well, you did agree to be my toy again if you couldn''t pay me back. I guess we''re going to have some more fun very soon Natasha."'
 
 						act 'Keep talking': gt 'natbel_chat', 'chat'
 						act 'Stop talking': gt 'natbelapt', 'natroom'
 					end
 				end
-			elseif NatbelQW['Debt'] <= 0 and ((money < 2000 and NatbelQW['BestFriend'] < 3) or (money < 5000 and NatbelQW['BestFriend'] >= 3)):
-				'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me '+iif(NatbelQW['BestFriend'] >= 3, '5000', '2000')+', please? I swear I''ll pay you back before you even miss it."'
-				'You shake your head. "Sorry Natasha, I don''t have that much money with me."'
+			end
+				gs 'natbel_chat', 'debt_forgive'
+			else
+			act 'Keep talking': gt 'natbel_chat', 'chat'
+			act 'Stop talking': gt 'natbelapt', 'natroom'
+		end
+	else
+		if NatbelQW['QWstage'] = 1 and money >= 5000:
+			'Natasha looks down in embarrassment. "<<$pcs_nickname>>, you have lots of money. Could you lend me 5000 <b>₽</b>? I will pay it back, I give you my word."'
 
-				act 'Keep talking': gt 'natbel_chat', 'chat'
-				act 'Stop talking': gt 'natbelapt', 'natroom'
-			elseif NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] > daystart:
-				'Natasha promises you to repay the <<NatbelQW[''Debt'']>><b>₽</b> in <<NatbelQW[''DebtDay'']-daystart>> days.'
+			act 'Don''t give her the money': gt 'natbel_chat', 'chat'
+			act 'Lend Natasha the 5000 <b>₽</b>':
+				*clr & cla
+				NatbelQW['QWstage'] = 2
+				minut += 5
+				NatbelQW['Debt'] = 5000
+				money -= 5000
+				NatbelQW['MoneyGivenTimes'] += 1
+				NatbelQW['DebtDay'] = daystart + 30
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
+				'"Hmmm. Ok, but you have to do my homework whenever I ask, and you still have to pay me back."'
+				'You get your purse and give Natasha the money. Natasha is delighted and says that she will pay it back in a month.'
 
 				act 'Keep talking': gt 'natbel_chat', 'chat'
 				act 'Stop talking': gt 'natbelapt', 'natroom'
-			elseif NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] <= daystart:
-				'Natasha looks at the floor, "<<$pcs_nickname>>, I... I''m sorry, I don''t have your money."'
-				if NatbelQW['QWstage'] = 2:
-					act 'Demand repayment':
-						NatbelQW['QWstage'] = 3
-						minut += 5
-						gs 'stat'
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
-						'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"'
-						*nl
-						'Natasha looks at you with fearful eyes, and you''re getting some ideas as to how you could "use" her. She did say "anything," after all...'
-						'You snarl at her with an evil hiss: "You''ll be my little pet until you''ve worked off every last Kopeck. And don''t you dare tell anyone about this!"'
-						'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
-						if lernHome > 0:
-							gs 'natbel_cp_1', 'make_her_do_homework'
-						else
-							*clr & cla
-							minut += 60
-							menu_off = 1
-							NatbelQW['homework'] += 1
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/study.jpg"></center>'
-							'Natasha sighs with a resigned look as she nods meekly.'
-							'"I should make you do my homework but I''ve already done it, so instead you can write out some lines for me. Write ''I will do as <<$pcs_firstname>> tells me'' one thousand times."'
-							'You relax on her bed and start daydreaming for a while.'
-							'You are woken out of your daydream by Natasha saying: "It''s done <<$pcs_nickname>>."'
-							'"Good, let me have a look at it."'
-							'You tear the paper up and throw the pieces in the bin.'
-							act 'Let''s hope she learned her lesson': gt 'natbelapt', 'natroom'
-						end
-					end
-				else
-					act 'Demand repayment':
-						minut += 5
-						gs 'stat'
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
-						if NatbelQW['MoneyGivenTimes'] < 4:
-							'You decide not to reduce Natasha''s debt. You angrily confront her, demanding that she return the money to you, one way or another. Natasha curls up into a ball on her bed: "<<$pcs_nickname>>, I''m so sorry! I will do anything you say! Anything!"'
-							*nl
-							'Natasha looks at you with fearful eyes, and you are getting some more ideas as to how you could "use" her this time. She did say "anything," after all...'
-							'You snarl at her with an evil hiss: "You''ll be my little pet again until you''ve worked off every last Kopeck. And don''t you dare tell anyone about this!"'
-							'You give her a soft slap on the cheek to test your newfound power over her rather than to hurt her, but she flinches and nods profusely. Looks like you''ve got your own little slave now.'
+			end
+		elseif NatbelQW['QWstage'] >= 2 and money >= 2000:
+			'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me some money, please? I swear I''ll pay you back before you even miss it."'
 
-							act 'Keep talking': gt 'natbel_chat', 'chat'
-							act 'Stop talking': gt 'natbelapt', 'natroom'
-						else
-							'"Well, you did agree to be my toy again if you couldn''t pay me back. I guess we''re going to have some more fun very soon Natasha."'
+			act 'Don''t give her the money': gt 'natbel_chat', 'chat'
+			act 'Give her the money (2000 <b>₽</b>)':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
+				NatbelQW['Debt'] = 2000
+				money -= 2000
+				NatbelQW['MoneyGivenTimes'] += 1
+				gs 'stat'
+				if NatbelQW['MoneyGivenTimes'] < 4:
+					!!set timer for repayment
+					NatbelQW['DebtDay'] = daystart + 30
+					gs 'stat'
+					'"Ok. I am sure I can think of more things for you to do for me." You get your purse and give Natasha the money.'
+					'"Thank you <<$pcs_nickname>>, you''re the best. I promise you''ll have it back within a month."'
 
-							act 'Keep talking': gt 'natbel_chat', 'chat'
-							act 'Stop talking': gt 'natbelapt', 'natroom'
-						end
-					end
-				end
-					gs 'natbel_chat', 'debt_forgive'
+					act 'Keep talking': gt 'natbel_chat', 'chat'
+					act 'Stop talking': gt 'natbelapt', 'natroom'
+				elseif NatbelQW['MoneyGivenTimes'] < 7:
+					'"Or I could ...uhm... I could do those things again for you to... to repay you."'
+					'"Ok. I am sure I can think of more things for you to do for me." You get your purse and give Natasha the money.'
+					'"Thank you <<$pcs_nickname>>, you''re the best. I promise you won''t regret it."'
+
+					act 'Keep talking': gt 'natbel_chat', 'chat'
+					act 'Stop talking': gt 'natbelapt', 'natroom'
 				else
-				act 'Keep talking': gt 'natbel_chat', 'chat'
-				act 'Stop talking': gt 'natbelapt', 'natroom'
+					'You get your purse and give Natasha the money.'
+					'"I see someone wants to be my little bitch again. You''re going to do whatever I want until you''ve worked off that debt."'
+					'"You know I will, I''ve proven that haven''t I?"'
+
+					act 'Keep talking': gt 'natbel_chat', 'chat'
+					act 'Stop talking': gt 'natbelapt', 'natroom'
+				end
 			end
 		else
+			'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me '+iif(NatbelQW['QWstage'] = 1, '5000', '2000')+', please? I swear I''ll pay you back before you even miss it."'
+			'You shake your head. "Sorry Natasha, I don''t have that much money with me."'
+
 			act 'Keep talking': gt 'natbel_chat', 'chat'
 			act 'Stop talking': gt 'natbelapt', 'natroom'
-			if NatbelQW['chrispaid'] = 1  and (NatbelQW['evt_day'] + 1) <= daystart:
-				act 'Natasha repaid Christina''s debt':
-					*clr & cla
-					minut += 5
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha1.jpg"></center>'
-					'"Have you repaid Christina yet?" you ask Natasha.'
-					'At the mere mention of Christina''s name, Natasha''s eyes go wide and she covers her face with her hands. Remaining silent not trusting her voice, she simply nods her head to confirm that she did.'
-					'You look at her with concern, "Did something else happen with her?"'
-					'"No, nothing happened," she says with a sigh. "She''s just such a bully, she frightens me!"'
-					'You give her a reassuring smile, "I''m sorry. If I''d realized that she worried you so much, I''d have offered to deal with her for you."'
-					'Natasha shakes her head, "No, I wouldn''t have asked you to do that! I know she picks on you just as much as she does me if not more, and besides it was my debt to pay back. But it was still so nerve-wracking!"'
-					'"Well, it''s done now," you answer. "So let''s put it behind us. Just don''t borrow money from her - or anyone - anymore, okay?"'
-					'Natasha looks at you with a weak smile, "Don''t worry, <<$pcs_nickname>>. I''ve learned my lesson! And thank you for helping me clear all my debts; it was such a worry."'
-					'Your smile widens, "I''m glad I could help." After a brief pause you continue "I need to think about how to deal with Christina..."'
-					'A worried looking Natasha pleads with you. "Don''t do anything and get hurt because of me."'
-					'Giving her a reassuring smile you reply. "Don''t worry about me with Christina, she''s my problem to deal with. Okay?"'		
-					'Natasha nods in confirmation.'
-
-					NatbelQW['chrispaid'] = 4
-					act 'Return to her room': gt 'natbelapt', 'natroom'
-				end
-			elseif NatbelQW['chrispaid'] = 3 and (NatbelQW['evt_day'] + 1) <= daystart:
-				act 'You paid the debt to Christina':
-					*clr & cla
-					minut += 5
-					gs 'stat'
-					NatbelQW['chrispaid'] = 4
-					gs 'npc_relationship', 'modify', 'A16', 'adore'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natasha4.jpg"></center>'
-					'You look at Natasha and decide to put her out of her misery regarding Christina, "Okay, I''ve repaid Christina, so you''re all good there. Now that <i>really</i> is your last debt, isn''t it? I don''t want any more nasty surprises."'
-					'"Yes."'
-					'You look at her quizzically, unsure that you really believe her.'
-					'Natasha sees your expression, "Yes, yes, <<$pcs_nickname>>, I swear! I just ran out of money; I was so worried as I had loads of little debts and couldn''t keep track anymore and I was getting pressured for repayment. I repaid all but Christina''s. I was going to do it but Mum needed some help and once I''d done that, I ran out of cash." She continues, "Did... umm, did she say anything?"'
-					act 'Tell her what Christina said':
-						*clr & cla
-						minut += 5
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natasha1.jpg"></center>'
-						'At this point, even though she''s relieved that her final debt has been cleared, she still seems to be panicking about Christina. She slumps forward with her head in her hands.'
-						'While comforting her, you reply, "Sorry, you mean Christina? No, why would she?"'
-						'"It''s just, umm, I''m so scared of her. She..." Natasha tries to compose herself but fails and starts crying again. "She scares me," she sobs and reaches out for you, hugging you tight. You hug her back, holding her gently until the tears subside.'
-						'"Hey, come on, Natasha. It''s done now, I''ve paid her."'
-						*nl
-						'Natasha looks at you a bit confused, she''s obviously not used to classmates being affectionate towards her. You smile and say, "Well, from here on in, let''s try to change that. Okay?"'
-						'"Okay, <<$pcs_nickname>>," she sniffles. "Thanks!"'
-						'"Good! And one last thing, enough with the tears, okay. I''ve told you, you are a good friend and I like looking out for you," you tell her, smiling reassuringly.'
-						'"Yes, okay, <<$pcs_nickname>>. I''m just not used to this."'
-						act 'Keep talking': gt 'natbel_chat', 'chat'
-						act 'Stop talking': gt 'natbelapt', 'natroom'
-					end
-				end
+		end
+	end
+end
+
+if $ARGS[0] = 'lover_events_chat':
+	act 'Keep talking': gt 'natbel_chat', 'chat'
+	act 'Stop talking': gt 'natbelapt', 'natroom'
+	if NatbelQW['chrispaid'] = 1  and (NatbelQW['evt_day'] + 1) <= daystart:
+		act 'Natasha repaid Christina''s debt':
+			*clr & cla
+			minut += 5
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha1.jpg"></center>'
+			'"Have you repaid Christina yet?" you ask Natasha.'
+			'At the mere mention of Christina''s name, Natasha''s eyes go wide and she covers her face with her hands. Remaining silent not trusting her voice, she simply nods her head to confirm that she did.'
+			'You look at her with concern, "Did something else happen with her?"'
+			'"No, nothing happened," she says with a sigh. "She''s just such a bully, she frightens me!"'
+			'You give her a reassuring smile, "I''m sorry. If I''d realized that she worried you so much, I''d have offered to deal with her for you."'
+			'Natasha shakes her head, "No, I wouldn''t have asked you to do that! I know she picks on you just as much as she does me if not more, and besides it was my debt to pay back. But it was still so nerve-wracking!"'
+			'"Well, it''s done now," you answer. "So let''s put it behind us. Just don''t borrow money from her - or anyone - anymore, okay?"'
+			'Natasha looks at you with a weak smile, "Don''t worry, <<$pcs_nickname>>. I''ve learned my lesson! And thank you for helping me clear all my debts; it was such a worry."'
+			'Your smile widens, "I''m glad I could help." After a brief pause you continue "I need to think about how to deal with Christina..."'
+			'A worried looking Natasha pleads with you. "Don''t do anything and get hurt because of me."'
+			'Giving her a reassuring smile you reply. "Don''t worry about me with Christina, she''s my problem to deal with. Okay?"'		
+			'Natasha nods in confirmation.'
+
+			NatbelQW['chrispaid'] = 4
+			act 'Return to her room': gt 'natbelapt', 'natroom'
+		end
+	elseif NatbelQW['chrispaid'] = 3 and (NatbelQW['evt_day'] + 1) <= daystart:
+		act 'You paid the debt to Christina':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+			NatbelQW['chrispaid'] = 4
+			gs 'npc_relationship', 'modify', 'A16', 'adore'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natasha4.jpg"></center>'
+			'You look at Natasha and decide to put her out of her misery regarding Christina, "Okay, I''ve repaid Christina, so you''re all good there. Now that <i>really</i> is your last debt, isn''t it? I don''t want any more nasty surprises."'
+			'"Yes."'
+			'You look at her quizzically, unsure that you really believe her.'
+			'Natasha sees your expression, "Yes, yes, <<$pcs_nickname>>, I swear! I just ran out of money; I was so worried as I had loads of little debts and couldn''t keep track anymore and I was getting pressured for repayment. I repaid all but Christina''s. I was going to do it but Mum needed some help and once I''d done that, I ran out of cash." She continues, "Did... umm, did she say anything?"'
+			act 'Tell her what Christina said':
+				*clr & cla
+				minut += 5
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/natasha1.jpg"></center>'
+				'At this point, even though she''s relieved that her final debt has been cleared, she still seems to be panicking about Christina. She slumps forward with her head in her hands.'
+				'While comforting her, you reply, "Sorry, you mean Christina? No, why would she?"'
+				'"It''s just, umm, I''m so scared of her. She..." Natasha tries to compose herself but fails and starts crying again. "She scares me," she sobs and reaches out for you, hugging you tight. You hug her back, holding her gently until the tears subside.'
+				'"Hey, come on, Natasha. It''s done now, I''ve paid her."'
+				*nl
+				'Natasha looks at you a bit confused, she''s obviously not used to classmates being affectionate towards her. You smile and say, "Well, from here on in, let''s try to change that. Okay?"'
+				'"Okay, <<$pcs_nickname>>," she sniffles. "Thanks!"'
+				'"Good! And one last thing, enough with the tears, okay. I''ve told you, you are a good friend and I like looking out for you," you tell her, smiling reassuringly.'
+				'"Yes, okay, <<$pcs_nickname>>. I''m just not used to this."'
+				act 'Keep talking': gt 'natbel_chat', 'chat'
+				act 'Stop talking': gt 'natbelapt', 'natroom'
 			end
 		end
 	end
@@ -391,7 +403,6 @@ if $ARGS[0] = 'friend_chat':
 	act 'Hangout':
 
 		minut += 15
-		NatbelQW['BestFriend'] += 1
 		gs 'stat'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
@@ -495,16 +506,12 @@ if $ARGS[0] = 'friend_chat':
 end
 
 if $ARGS[0] = 'small_talk':
-	NatbelQW['BestFriend'] += 1
 	minut += 15
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
-	if NatbelQW['BestFriend'] = 1:
-		'Natasha knows that she lives in a very poor family. She has no father, and her mother works for a pittance at the garment factory. You feel sorry for her.'
-	else
-		'Natasha is envious that other girls can dress smartly and buy cosmetics while she has to wear her mother''s things.'
-	end
+	'Natasha knows that she lives in a very poor family. She has no father, and her mother works for a pittance at the garment factory. You feel sorry for her.'
+	'She is envious that other girls can dress smartly and buy cosmetics while she has to wear her mother''s things.'
 	*nl
 	'You talk with Natasha about this and that, passing fifteen minutes with ease.'
 
@@ -742,7 +749,6 @@ if $ARGS[0] = 'debt_forgive':
 			act 'Forgive Natasha''s debt':
 				NatbelQW['Debt'] = 0
 				NatbelQW['DebtDay'] = 0
-				NatbelQW['BestFriend'] += 10
 				gs 'npc_relationship', 'modify', 'A16', 'adore'
 				minut += 5
 				gs 'stat'
@@ -803,7 +809,6 @@ if $ARGS[0] = 'debt_forgive':
 			act 'Forgive Natasha''s debt':
 				NatbelQW['Debt'] = 0
 				NatbelQW['DebtDay'] = 0
-				NatbelQW['BestFriend'] += 10
 				minut += 5
 				gs 'stat'
 				*clr & cla

+ 1 - 0
locations/natbel_cp_1.qsrc

@@ -46,6 +46,7 @@ NatbelQW['chrispaid'] = 4: Sveta tells Natasha she''s done so.
 NatbelQW['chrispaid'] = 5: Stopped Christina from bullying Natasha
 NatbelQW['chrispaid'] = 6: Unable to stop Christina from bullying Natasha
 
+NatbelQW['homework'] counter for studying together with Nat
 NatbelQW['panty_stuff_day'] is set to daystart each morning you stuff Natasha''s panties into her pussy when going to school.
 NatbelQW['evt_day'] day tracker for events, set to daystart used to control quest timings.
 }

+ 1 - 0
locations/natbelapt.qsrc

@@ -43,6 +43,7 @@ NatbelQW['chrispaid'] = 4: Sveta tells Natasha she''s done so.
 NatbelQW['chrispaid'] = 5: Stopped Christina from bullying Natasha
 NatbelQW['chrispaid'] = 6: Unable to stop Christina from bullying Natasha
 
+NatbelQW['homework'] counter for studying together with Nat
 NatbelQW['panty_stuff_day'] is set to daystart each morning you stuff Natasha''s panties into her pussy when going to school.
 NatbelQW['evt_day'] day tracker for events, set to daystart used to control quest timings.
 }

+ 1 - 1
locations/post_deliveries.qsrc

@@ -670,7 +670,7 @@ if $ARGS[0] = '12':
 	act 'Stay a few minutes and try to cheer her up':
 		cla
 		minut += 10
-		if NatbelQW['BestFriend'] > 0: NatbelQW['BestFriend'] += 5
+		gs 'npc_relationship', 'modify', 'A16', 'adore'
 		gs 'stat'
 		'She really looks like she could use a friend right now.'
 		'"Natasha, wait!" you say, and put your foot between the door so she can''t close it.'