Browse Source

[fixed/changed] Fixed a home work loop in Julia's event. Fixed some stuff that used the old way of coding instead of gs 'arousal' and adde realtionship gains.

bgkjdgbizgblzdgbr 2 years ago
parent
commit
0d2537779e
1 changed files with 23 additions and 16 deletions
  1. 23 16
      locations/JuliaMilHome.qsrc

+ 23 - 16
locations/JuliaMilHome.qsrc

@@ -13,19 +13,20 @@ gs 'stat'
 '<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big12.jpg"></center>'
 'Julia has a nice room, decorated with high quality furnishings. There are books everywhere, she must really like to read.'
 
-if lernHome > 0:
+if lernHome > 0 and juliaQW['homework_day'] ! daystart:
 	'Julia arranges her school books on a large desk and gets ready to do her homework, inviting you to join her.'
 
 	act 'Do your homework with Julia':
 		cls
 		menu_off = 1
 		minut += 60
-		!npc_rel['A14'] += 10
 		if lernHome > 1:
 			gs 'grades', 'homework', 'school', 'yes', 2, 1, 'A12'
 		else
 			gs 'grades', 'homework', 'school', 'yes', 1, 1, 'A12'
 		end
+		juliaQW['homework_day'] = daystart
+		gs 'npc_relationship', 'modify', 'A12', 'love' 
 		lern += rand(3,6)
 		intel_exp += rand(1,2) + (mentats_dose - rand(0,mentats_dose))
 		gs 'stat'
@@ -34,7 +35,7 @@ if lernHome > 0:
 
 		act 'Relax after doing your homework':gt $curloc
 	end
-elseif lernHome = 0:
+else
 	'Julia is sitting on her bed.'
 
 	if eatJulMilDay!daystart:
@@ -71,8 +72,8 @@ elseif lernHome = 0:
 				minut += 30
 				wine = 0
 				gs 'drugs', 'alcohol', 'wine', 2
+				gs 'npc_relationship', 'modify', 'A12', 'like' 
 				JulMilBestFrend += 1
-				pcs_horny += 10
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big12.jpg"></center>'
 				'You offer Julia some wine and she happily accepts, leaving the room quickly to get a corkscrew and some glasses. When she finishes pouring the wine, you propose a toast to your friendship and both have a sip. For the next half hour, the two of you enjoy the wine while sharing some juicy gossip. When the bottle is drained you both feel more than a bit tipsy and giggle happily, lying against each other on her bed.'
@@ -98,7 +99,8 @@ elseif lernHome = 0:
 							act '"Oh, really? Do tell!"':
 								cls
 								minut += 5
-								pcs_horny += 10
+								gs 'arousal', 'verbal_erotica', -10
+								gs 'npc_relationship', 'modify', 'A12', 'love' 
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/sex/outdoor.jpg"></center>'
 								'Julia smiles mysteriously and begins her story, "My parents send me to summer camp every year. Last year, I met a guy there... his name is Vovka. He was one of the youth councelors there, a fair bit older than me. After the day''s regular events had concluded, we found ourselves alone in the forest."'
@@ -115,7 +117,8 @@ elseif lernHome = 0:
 							act '"Go on, keep going!"':
 								cls
 								minut += 5
-								pcs_horny += 10
+								gs 'arousal', 'verbal_erotica', -10
+								gs 'npc_relationship', 'modify', 'A12', 'love' 
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/sex/otrad.jpg"></center>'
 								'Julia once again smiles mysteriously and continues her story where she left off, "Remember when I told you about Vovka last time? I slept with him again, before leaving the camp! One afternoon when no one else was in the cabin, I bumped into him there. Ever since that first time he had been pestering me, wanting more sex. He was cute though, and really treated me like I was special... so I let him."'
@@ -144,6 +147,7 @@ elseif lernHome = 0:
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/sex/jultit.jpg"></center>'
 									'Julia bares your chest and slowly lowers her kisses, slowly trailing her way down to your chest. You do your best to stifle your moans when she takes your nipple in her mouth, gently biting it as her fingers rub the other one. Then her fingers find their way down between your legs, pulling your clothes to the side.'
 
+									gs 'npc_relationship', 'modify', 'A12', 'adore' 
 									gs 'arousal', 'foreplay', 5, 'lesbian'
 									gs 'stat'
 								
@@ -151,12 +155,10 @@ elseif lernHome = 0:
 										cls
 										minut += 15
 
-										npc_sex['A12'] += 1
-
-										lesbian += 1
-										pcs_horny = 0
-										orgasm += 1
-										gs 'stat'
+										if npc_sex['A12'] = 0: 
+											npc_sex['A12'] = 1
+											lesbian += 1
+										end
 										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/julia/sex/julick.jpg"></center>'
 										'You and Julia giddily take off your clothes and you lie back down on the bed. Julia, eager to taste you, throws her leg over your head and buries her face between your legs, grinding her pussy against your lips as she gets to work.'
 										'Feeling her tongue lapping against your pussy like her life depended on it, you don''t want to let her finish you without reciprocating. Equally enthusiastically you stick out your tongue and lick up her juices from her budding flower, and soon enough it feels like a contest as to which of you can get the other off first. Julia wins: even though you tried to fight it as long as you could, your body spasms against her tongue as you groan into her pussy in orgasm.'
@@ -165,18 +167,23 @@ elseif lernHome = 0:
 										'This sends Julia over the edge as well. Her hips squirm against your mouth, and you feel a splash of warm liquid hit you as her pussy squirts her sweet nectar all over your face. You lick up some of it, and then give Julia another deep kiss. Quickly leaving the room to wash up, you return a minute later and cuddle for a while.'
 
 										gs 'arousal', 'cuni_give', 15, 'lesbian'
+										gs 'arousal', 'end'
 										gs 'stat'
 								
 										act 'Relax in Julia''s room':gt $curloc
 									end
 								end
 
-								act 'Ask her to please stop touching you': gt $curloc
+								act 'Ask her to please stop touching you': 
+									gs 'npc_relationship', 'modify', 'A12', 'hate' 
+									gt $curloc
+								end
 							end
 										
-							act 'Whoa! Tell her to stop right now!': gt $curloc
-
-							exit
+							act 'Whoa! Tell her to stop right now!':
+								gs 'npc_relationship', 'modify', 'A12', 'loathe' 
+								gt $curloc
+							end
 						end
 
 						gs 'arousal', 'end'