|
@@ -13,7 +13,13 @@ if $ARGS[0] = 'chat':
|
|
|
'<center><h4><font color="maroon">Natasha''s Room</font></h4></center>'
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg"></center>'
|
|
|
'The two of you lay on her bed and talk about a variety of topics.'
|
|
|
-
|
|
|
+ if NatbelQW['chatDay'] < daystart:
|
|
|
+ if NatbelQW['chat'] <= 0:
|
|
|
+ NatbelQW['chat'] = 1
|
|
|
+ else
|
|
|
+ NatbelQW['chat'] += 1
|
|
|
+ end
|
|
|
+ NatbelQW['chatDay'] = daystart
|
|
|
act 'Stop talking': gt 'natbelapt','natroom'
|
|
|
|
|
|
if npc_pregtalk['A16'] = 0 and kid = 0:
|
|
@@ -98,8 +104,9 @@ if $ARGS[0] = 'chat':
|
|
|
end
|
|
|
end
|
|
|
end
|
|
|
-
|
|
|
- if NatbelQW['chrispaid'] <= 3 and NatbelQW['QWstage'] ! 99:
|
|
|
+ ! Only start if you have chatted more than 3 times with her
|
|
|
+ ! Todo this should probably depend on relationship/trust level.
|
|
|
+ if NatbelQW['chrispaid'] <= 3 and NatbelQW['QWstage'] ! 99 and NatbelQW['chat'] > 3:
|
|
|
act 'Talk about money':
|
|
|
minut += 15
|
|
|
gs 'stat'
|
|
@@ -107,13 +114,16 @@ if $ARGS[0] = 'chat':
|
|
|
'<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.'
|
|
|
!! set up gates:
|
|
|
- if NatbelQW['QWstage'] = 1:
|
|
|
- '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."'
|
|
|
- gs 'natbel_chat', 'debttalk'
|
|
|
- elseif NatbelQW['QWstage'] >= 2:
|
|
|
- '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."'
|
|
|
- gs 'natbel_chat', 'debttalk'
|
|
|
+ !! Todo the text below is duplicated as the gs will also display text.
|
|
|
+! if NatbelQW['QWstage'] = 1:
|
|
|
+! '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."'
|
|
|
+! gs 'natbel_chat', 'debttalk'
|
|
|
+! elseif NatbelQW['QWstage'] >= 2:
|
|
|
+! '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."'
|
|
|
+ gs 'natbel_chat', 'debttalk'
|
|
|
end
|
|
|
+ act 'Keep talking': gt 'natbel_chat', 'chat'
|
|
|
+ act 'Stop talking': gt 'natbelapt', 'natroom'
|
|
|
end
|
|
|
end
|
|
|
if NatbelQW['chrispaid'] = 4:
|
|
@@ -399,18 +409,17 @@ if $ARGS[0] = 'debttalk':
|
|
|
'"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."'
|
|
|
end
|
|
|
- end
|
|
|
+ end
|
|
|
+ ! This one does appear 2x in the box and is confusing then.
|
|
|
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."'
|
|
|
+ 'Suddenly Natasha says: "Hey <<$pcs_nickname>>, you seem to have tons of cash, could you lend me '+iif(NatbelQW['BestFriend'] >= 3, '5000', '2000')+' <b>₽</b>, 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."'
|
|
|
elseif NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] > daystart:
|
|
|
- 'Natasha promises you to repay the <<NatbelQW[''Debt'']>><b>₽</b> in <<NatbelQW[''DebtDay'']-daystart>> day(s).'
|
|
|
-
|
|
|
+ 'Natasha promises you to repay the <<NatbelQW[''Debt'']>><b>₽</b> in <<NatbelQW[''DebtDay'']-daystart>> day(s).'
|
|
|
end
|
|
|
- end
|
|
|
-
|
|
|
act 'Keep talking': gt 'natbel_chat', 'chat'
|
|
|
act 'Stop talking': gt 'natbelapt', 'natroom'
|
|
|
+ end
|
|
|
end
|
|
|
if $ARGS[0] = 'debt_forgive':
|
|
|
if NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] <= daystart:
|