|
|
@@ -20,19 +20,19 @@ if $ARGS[0] = '':
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
|
|
|
'Your mother Natasha is still quite young and attractive. She''s only <<motherAge>> years. She works at the station cafe.'
|
|
|
|
|
|
- if (motherKnowWhore > 0 or motherKnowSpravka > 0) and npc_QW['A29'] = 0:npc_QW['A29'] = 1
|
|
|
- if npc_QW['A29'] = 1 and npc_rel['A29'] > 40:npc_rel['A29'] = 40
|
|
|
- if npc_rel['A29'] < 20:'Your relationship with your <<$npc_nickname[''A29'']>> is terrible.'
|
|
|
- if npc_rel['A29'] >= 20 and npc_rel['A29'] < 40:'Your relationship with your <<$npc_nickname[''A29'']>> is tense.'
|
|
|
- if npc_rel['A29'] >= 40 and npc_rel['A29'] < 60:'You have a normal relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
- if npc_rel['A29'] >= 60 and npc_rel['A29'] < 80:'You have a good relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
- if npc_rel['A29'] >= 80:'You have a great relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
+ if (motherKnowWhore > 0 or motherKnowSpravka > 0) and npc_QW['A29'] = 0: npc_QW['A29'] = 1
|
|
|
+ if npc_QW['A29'] = 1 and npc_rel['A29'] > 40: npc_rel['A29'] = 40
|
|
|
+ if npc_rel['A29'] < 20: 'Your relationship with your <<$npc_nickname[''A29'']>> is terrible.'
|
|
|
+ if npc_rel['A29'] >= 20 and npc_rel['A29'] < 40: 'Your relationship with your <<$npc_nickname[''A29'']>> is tense.'
|
|
|
+ if npc_rel['A29'] >= 40 and npc_rel['A29'] < 60: 'You have a normal relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
+ if npc_rel['A29'] >= 60 and npc_rel['A29'] < 80: 'You have a good relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
+ if npc_rel['A29'] >= 80: 'You have a great relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
|
|
|
- act 'Move away from her':gt $loc, $metka
|
|
|
+ act 'Move away from her': gt $loc, $metka
|
|
|
|
|
|
if motherWorry = 1 and indorf = 0:
|
|
|
motherWorry = 0
|
|
|
- npc_rel['A29'] -= 1
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'
|
|
|
delin_beh += 1 &!counter for getting sent to Gadukino for the summer
|
|
|
if $loc = 'gkafe':
|
|
|
'Your <<$npc_nickname[''A29'']>> looks at you from across the cafe counter, "<<$pcs_firstname>> <<$pcs_lastname>>, Where the hell have you been! I have been worried sick!" You <<$npc_nickname[''A29'']>> then looks around the small cafe and says with a frown, "We will talk about this when we get home."'
|
|
|
@@ -52,24 +52,24 @@ if $ARGS[0] = '':
|
|
|
end
|
|
|
|
|
|
!check hair color
|
|
|
- if hcolfronce=0:
|
|
|
- hcolmotherremember=pcs_haircol
|
|
|
- hcolfronce=1
|
|
|
+ if hcolfronce = 0:
|
|
|
+ hcolmotherremember = pcs_haircol
|
|
|
+ hcolfronce = 1
|
|
|
end
|
|
|
|
|
|
- if hcolmotherremember!pcs_haircol:
|
|
|
+ if hcolmotherremember ! pcs_haircol:
|
|
|
if pcs_haircol = nathcol:
|
|
|
$texthcol = 'Or, rather, un-dyed your hair. Good, you decided to go back to your natural color!'
|
|
|
- elseif pcs_haircol=0:
|
|
|
+ elseif pcs_haircol = 0:
|
|
|
$texthcol='I see you decided to go with black hair?'
|
|
|
- elseif pcs_haircol=1:
|
|
|
+ elseif pcs_haircol = 1:
|
|
|
$texthcol='I see you decided to become a brunette?'
|
|
|
- elseif pcs_haircol=2:
|
|
|
+ elseif pcs_haircol = 2:
|
|
|
$texthcol='I see you decided to become a redhead?'
|
|
|
- elseif pcs_haircol=3:
|
|
|
+ elseif pcs_haircol = 3:
|
|
|
$texthcol='I see you decided to go blonde?'
|
|
|
- elseif pcs_haircol >=4:
|
|
|
- npc_rel['A29'] -= 25
|
|
|
+ elseif pcs_haircol >= 4:
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', -25
|
|
|
$texthcol='What were you thinking? Do you think you''ll get into university with hair like that!'
|
|
|
end
|
|
|
if pcs_haircol ! nathcol and pcs_haircol <= 3 and npc_rel['A29'] < 60:
|
|
|
@@ -83,7 +83,7 @@ if $ARGS[0] = '':
|
|
|
'Your <<$npc_nickname[''A29'']>> immediately notices you dyed your hair and says: "Wait a minute, you dyed your hair! <<$texthcol>>"'
|
|
|
'She fingers your hair and <<$texthcol2>>'
|
|
|
|
|
|
- hcolmotherremember=pcs_haircol
|
|
|
+ hcolmotherremember = pcs_haircol
|
|
|
end
|
|
|
|
|
|
$mother_clothes[1] = {
|
|
|
@@ -133,11 +133,11 @@ if $ARGS[0] = '':
|
|
|
}
|
|
|
|
|
|
if $clothingworntype = 'nude' and towel = 1 and $pantyworntype = 'none':
|
|
|
- npc_rel['A29'] -= 2
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'
|
|
|
''
|
|
|
dynamic $mother_clothes[1]
|
|
|
elseif $clothingworntype = 'nude':
|
|
|
- npc_rel['A29'] -= 2
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'
|
|
|
''
|
|
|
dynamic $mother_clothes[2]
|
|
|
end
|
|
|
@@ -211,7 +211,7 @@ if $ARGS[0] = '':
|
|
|
act 'Ask for a tampon':
|
|
|
cla
|
|
|
sanpad += 3
|
|
|
- npc_rel['A29'] -= 15
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'5
|
|
|
minut += 3
|
|
|
'You tell your <<$npc_nickname[''A29'']>> you''re menstruating and ran out of tampons, but really need one right now. She looks at you knowingly, gives you three sanitary pads from her own supply and sternly tells you to next time take care of this in advance.'
|
|
|
|
|
|
@@ -241,11 +241,11 @@ if $ARGS[0] = '':
|
|
|
|
|
|
if SchoolAtestat = 1 and SAtestatGift = 0:
|
|
|
if pcs_grades >= 90:
|
|
|
- npc_rel['A29']+=40
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 40
|
|
|
'Your <<$npc_nickname[''A29'']>> is delighted you graduated. "I''m so proud right now <<$pcs_nickname>>! All I want to do is see you succeed in life, and graduating from school is a very important step. And you outdid all my expectations. When the Principal mentioned you being the best student of the year I could not have been happier. Your stepfather and I saved some money to reward you for your efforts. Please, take these 10000 <b>₽</b>. Go buy yourself something nice, you''ve earned it." You thank her and give her a hug.'
|
|
|
SAtestatGift = 10000
|
|
|
elseif pcs_grades >= 70:
|
|
|
- npc_rel['A29']+=20
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 20
|
|
|
'Your <<$npc_nickname[''A29'']>> is delighted you graduated. "I''m so happy right now <<$pcs_nickname>>! All I want to do is see you succeed in life, and graduating from school is a very important step. You did really well. Please, take these 7000 <b>₽</b>. Go buy yourself something nice, you''ve earned it." You thank her and give her a hug.'
|
|
|
SAtestatGift = 7000
|
|
|
elseif pcs_grades >= 40:
|
|
|
@@ -262,7 +262,7 @@ if $ARGS[0] = '':
|
|
|
if hour > 5:
|
|
|
if unintendedabort = 1 and pregTalkFamily = 1:
|
|
|
pregTalkFamily = 2
|
|
|
- npc_rel['A29'] += 20
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 10
|
|
|
'<br>'
|
|
|
'Your <<$npc_nickname[''A29'']>> looks at you in shock." <<$pcs_nickname>>, did you get an abortion?"'
|
|
|
'You break down crying and tell your <<$npc_nickname[''A29'']>> you had a miscarriage.'
|
|
|
@@ -271,7 +271,7 @@ if $ARGS[0] = '':
|
|
|
end
|
|
|
if abort = 1 and pregTalkFamily = 1:
|
|
|
pregTalkFamily = 2
|
|
|
- npc_rel['A29'] = 0
|
|
|
+ gs 'npc_relationship', 'set', 'A29', 0
|
|
|
'Your <<$npc_nickname[''A29'']>> looks at you through teary eyes, stricken with sadness. "You are such a fool, <<$pcs_nickname>>! Getting an abortion... what if you can''t have any more children? Do you think you''ll be young and healthy forever? You''re going to regret this, I just know it..."'
|
|
|
end
|
|
|
|
|
|
@@ -297,24 +297,24 @@ if $ARGS[0] = '':
|
|
|
act 'Chat':
|
|
|
*clr & cla
|
|
|
minut+=rand(10,15)
|
|
|
- npc_rel['A29']+=1
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'like'
|
|
|
gs'stat'
|
|
|
'<center><b><font color = maroon>Your <<$npc_nickname[''A29'']>>, Natasha <<$pcs_lastname>></font></b></center>'
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
|
|
|
'Your <<$npc_nickname[''A29'']>> Natasha is still quite young and attractive. She''s only <<motherAge>> years. She works at the station cafe.'
|
|
|
- if npc_rel['A29']<20:'Your <<$npc_nickname[''A29'']>> can''t stand you, and she avoids you as much as she can.'
|
|
|
- if npc_rel['A29']>=20 and npc_rel['A29']<40:'You and <<$npc_nickname[''A29'']>> have a tense relationship.'
|
|
|
- if npc_rel['A29']>=40 and npc_rel['A29']<60:'You have a normal relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
- if npc_rel['A29']>=60 and npc_rel['A29']<80:'You have a good relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
- if npc_rel['A29']>=80:'You have a great relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
- act 'Continue':gt 'mother'
|
|
|
- if npc_rel['A29']<20:
|
|
|
+ if npc_rel['A29'] < 20: 'Your <<$npc_nickname[''A29'']>> can''t stand you, and she avoids you as much as she can.'
|
|
|
+ if npc_rel['A29'] >= 20 and npc_rel['A29'] < 40: 'You and <<$npc_nickname[''A29'']>> have a tense relationship.'
|
|
|
+ if npc_rel['A29'] >= 40 and npc_rel['A29'] < 60: 'You have a normal relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
+ if npc_rel['A29'] >= 60 and npc_rel['A29'] < 80: 'You have a good relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
+ if npc_rel['A29'] >= 80: 'You have a great relationship with your <<$npc_nickname[''A29'']>>.'
|
|
|
+ act 'Continue': gt 'mother'
|
|
|
+ if npc_rel['A29'] < 20:
|
|
|
dynamic $d_mother[1]
|
|
|
exit
|
|
|
- elseif npc_rel['A29']>=20 and npc_rel['A29']<40:
|
|
|
+ elseif npc_rel['A29'] >= 20 and npc_rel['A29']<40:
|
|
|
dynamic $d_mother[2]
|
|
|
exit
|
|
|
- elseif npc_rel['A29'] >=40:
|
|
|
+ elseif npc_rel['A29'] >= 40:
|
|
|
dynamic $d_mother[3]
|
|
|
end
|
|
|
end
|
|
|
@@ -345,7 +345,7 @@ if $ARGS[0] = '':
|
|
|
end
|
|
|
|
|
|
if npc_rel['A29'] >= 40:
|
|
|
- npc_rel['A29'] -= 1
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'
|
|
|
motherPayDay = daystart
|
|
|
|
|
|
if pcs_grades >= 90:
|
|
|
@@ -472,7 +472,7 @@ if $ARGS[0] = '':
|
|
|
act 'Offer to help around the house':
|
|
|
cla
|
|
|
minut += 60
|
|
|
- npc_rel['A29'] += rand(1, 5)
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', rand(1,5)
|
|
|
pcs_mood -= 10
|
|
|
delin_beh -= 1 &!counter for getting sent to Gadukino for the summer
|
|
|
TotalMomPom += 1
|
|
|
@@ -528,13 +528,13 @@ if $ARGS[0] = '':
|
|
|
mqwtRand = rand(1, 10)
|
|
|
|
|
|
if mqwtRand <= 2:
|
|
|
- npc_rel['A29'] -= rand(1, 5)
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', -rand(1,5)
|
|
|
minut += 30
|
|
|
'You try to have a talk with your <<$npc_nickname[''A29'']>>, to hopefully patch up your horrible relationship. You''re not sure whether you said something wrong, or whether she''s just in a bad mood, but your attempt to reconcile backfired horribly; within moments the conversation turns into a screaming contest, and your <<$npc_nickname[''A29'']>> ends up disliking you even more.'
|
|
|
|
|
|
act 'Leave her be for now':gt $loc, $metka
|
|
|
elseif mqwtRand > 2 and mqwtRand <= 8:
|
|
|
- npc_rel['A29'] += rand(0, 1)
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', rand(0,1)
|
|
|
minut += 30
|
|
|
'You try to have a talk with your <<$npc_nickname[''A29'']>>, to try and patch up your horrible relationship. Despite your best efforts, the whole half-hour conversation consists mainly of a fairly aggressive monologue from your <<$npc_nickname[''A29'']>> about morality, diseases and what awaits you in the future, if you do not change your ways. Still, there is some improvement in your relationship.'
|
|
|
|
|
|
@@ -552,7 +552,7 @@ if $ARGS[0] = '':
|
|
|
|
|
|
if alko >= 3 and alkomday ! daystart:
|
|
|
alkomday = daystart
|
|
|
- npc_rel['A29'] -= 1
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'
|
|
|
delin_beh += 1 &!counter for getting sent to Gadukino for the summer
|
|
|
'Your <<$npc_nickname[''A29'']>> can smell you have been drinking alcohol, and gives you a lecture: "<<$pcs_nickname>>, why do you smell of alcohol? You''re still too young to drink, you could get into all sorts of trouble!"'
|
|
|
end
|
|
|
@@ -561,7 +561,7 @@ if $ARGS[0] = '':
|
|
|
cla
|
|
|
whoremday = daystart
|
|
|
if motherKnowWhore = 0 and motherKnowSpravka = 0 and npc_QW['A29'] = 0:
|
|
|
- npc_rel['A29'] = 0
|
|
|
+ gs 'npc_relationship', 'set', 'A29', 0
|
|
|
if motherKnowWhore = 0:motherKnowWhore = 1
|
|
|
|
|
|
if momslut < 2:
|
|
|
@@ -583,7 +583,7 @@ if $ARGS[0] = '':
|
|
|
|
|
|
act 'Move away':gt $loc, $metka
|
|
|
elseif (motherKnowWhore > 0 or motherKnowSpravka > 0) and npc_QW['A29'] = 1:
|
|
|
- npc_rel['A29'] -= 20
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'0
|
|
|
|
|
|
if motherKnowWhore = 0:motherKnowWhore = 1
|
|
|
|
|
|
@@ -598,7 +598,7 @@ if $ARGS[0] = '':
|
|
|
|
|
|
act 'Move away':gt $loc, $metka
|
|
|
elseif npc_QW['A29'] >= 2:
|
|
|
- npc_rel['A29'] -= 10
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'0
|
|
|
|
|
|
if motherKnowWhore = 0:motherKnowWhore = 1
|
|
|
|
|
|
@@ -638,7 +638,7 @@ if $ARGS[0] = 'referral':
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
|
|
|
*nl
|
|
|
if GspravkaT = 0 and GspravkaTimes >= 3 and hour >= 6 and hour <= 21:
|
|
|
- npc_rel['A29'] -= 1
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'
|
|
|
if $clothingworntype ! 'nude':
|
|
|
'Your <<$npc_nickname[''A29'']>> frowns and gets her handbag: "<<$pcs_nickname>>, why haven''t you been to the gynaecologist like I asked you to? You don''t have anything to hide, do you? Come on, we''re going there right now." Your <<$npc_nickname[''A29'']>> takes you by the hand and leads you to the clinic, ushering you into the gynaecologist''s office.'
|
|
|
act 'Get a referral from the gynaecologist': gt 'gpoli', 'referral'
|
|
|
@@ -684,7 +684,7 @@ if $ARGS[0] = 'referral_fail':
|
|
|
end
|
|
|
*nl
|
|
|
if motherKnowWhore = 0:
|
|
|
- npc_rel['A29'] = 0
|
|
|
+ gs 'npc_relationship', 'set', 'A29', 0
|
|
|
motherKnowSpravka = 1
|
|
|
|
|
|
if npc_QW['A29'] = 0:npc_QW['A29'] = 1
|
|
|
@@ -699,7 +699,7 @@ if $ARGS[0] = 'referral_fail':
|
|
|
act 'Walk home': gt 'korrPar'
|
|
|
end
|
|
|
elseif motherKnowWhore > 0 and npc_QW['A29'] < 2:
|
|
|
- npc_rel['A29'] -= 10
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'0
|
|
|
motherKnowSpravka = 1
|
|
|
!counter for getting sent to Gadukino for the summer
|
|
|
delin_beh += 1
|
|
|
@@ -720,7 +720,7 @@ if $ARGS[0] = 'referral_pass':
|
|
|
'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
|
|
|
*nl
|
|
|
Gspassed = 0
|
|
|
- npc_rel['A29'] += 10
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 10
|
|
|
'You hand your <<$npc_nickname[''A29'']>> the referral. She opens it, closes her eyes for a second, and breathes a sigh of relief. "I''m not even surprised, you''re a good girl <<$pcs_nickname>>, just as I raised you to be."'
|
|
|
act 'Continue': gt 'mother'
|
|
|
end
|
|
|
@@ -748,7 +748,7 @@ if $ARGS[0] = 'pregreact':
|
|
|
act 'Tell your <<$npc_nickname[''A29'']>> you are pregnant':
|
|
|
*clr & cla
|
|
|
minut += 5
|
|
|
- npc_rel['A29'] -= 20
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'0
|
|
|
pregTalkFamily = 1
|
|
|
npc_pregtalk['A29'] = 1
|
|
|
delin_beh += 1 &!counter for getting sent to Gadukino for the summer
|
|
|
@@ -768,7 +768,7 @@ if $ARGS[0] = 'pregreact':
|
|
|
act 'Tell your <<$npc_nickname[''A29'']>> you are pregnant':
|
|
|
*clr & cla
|
|
|
minut += 5
|
|
|
- npc_rel['A29'] -= 20
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', 'dislike'0
|
|
|
pregTalkFamily = 1
|
|
|
npc_pregtalk['A29'] = 1
|
|
|
delin_beh += 1 &!counter for getting sent to Gadukino for the summer
|
|
|
@@ -1096,7 +1096,7 @@ end
|
|
|
if $ARGS[0] = 'motherQW_2':
|
|
|
minut += 60
|
|
|
npc_QW['A29'] = 2
|
|
|
- npc_rel['A29'] += rand(5,10)
|
|
|
+ gs 'npc_relationship', 'modify', 'A29', rand(5,10)
|
|
|
menu_off = 1
|
|
|
gs'stat'
|
|
|
'<center><b><font color = maroon><<$npc_nickname[''A29'']>></font></b></center>'
|
