7 Commits 910600cac5 ... e06449baf0

Author SHA1 Message Date
  KevinSmarts e06449baf0 Merge remote-tracking branch 'sovietmercader/master' 4 years ago
  KevinSmarts a695aa5843 Merge remote-tracking branch 'hornguy6/master' 4 years ago
  KevinSmarts 578c68b57e [fixed] Syntax error 4 years ago
  hornguy6 b776cb7d02 [fixed] incorrect code for a one-time payment 4 years ago
  hornguy6 6d388dfb00 [changed] block when trying to enter parents room late at night instead of taking away the option 4 years ago
  KevinSmarts 3d33347ac4 [fixed] Pubic hair growth more consistant, shaving and depilation values altered to fit new scale 4 years ago
  KevinSmarts 724ac1d302 [fixed] Lacking description so no one could tell what the treatment was 4 years ago

+ 6 - 1
locations/cikl.qsrc

@@ -598,7 +598,12 @@ if ArrSize('$MenCal') = 60: killvar '$MenCal',0
 
 if lashair ! 1:
 	pcs_leghair += 1
-	pcs_pubes += rand(0,1)
+	!!Pubic hair growth at 1/2 per night
+	if pcs_pubes['growth'] > 1:
+		pcs_pubes['growth'] = 0
+		pcs_pubes += 1
+	end
+	pcs_pubes['growth'] += 1
 end
 
 if age < 18 and rand (0,2) = 0 and pcs_leghair > 0: pcs_leghair -= 1

+ 1 - 1
locations/din_van.qsrc

@@ -266,7 +266,7 @@ $brit = {
 				minut += 15
 				pcs_leghair = 0
 				if pubestyle = 1:
-					pcs_pubes = 0
+					pcs_pubes = 1
 				elseif (pubestyle >= 2 and pubestyle <= 9) or pubestyle >= 12:
 					pcs_pubes = 16
 				elseif pubestyle = 10 and pcs_pubes > 29:

+ 1 - 1
locations/foto_shoot.qsrc

@@ -694,7 +694,7 @@ if $ARGS[0] = 'nude':
 	minut += 120
 	modelpay = (pcs_mdlng/2 * 10) + min(city_modelling, 700) + pcs_apprnc
 	modelpayfin = 600 + (modelpay * 2) + (15*rand(0,5))
-	if modelfoto_nude = 0: modelpayfin * 2 & foto_persuade = 0
+	if modelfoto_nude = 0: modelpayfin = modelpayfin * 2 & foto_persuade = 0
 	modelfoto_nude += 1
 	modelfoto_fullnude += 1
 	modelfoto_nip += 1

+ 1 - 1
locations/journal.qsrc

@@ -495,7 +495,7 @@ if $ARGS[0] = 'nerds':
 	'Natasha is an excellent student and one of the smartest people in your school. Even though you are living in the same building, her parents are very poor, and it shows as Natasha is always dressed in second-hand clothes and can never afford to do anything fun. As a result, she doesn''t have many friends, as most of the other girls shun her or mock her poor clothing.'
 
 	'<center><img <<$set_imgh>> src="images/pc/notebook/240.png"></center>'
-	'<center><<"Natalia "Nat" Pavlova">></center>'	
+	'<center><<"Natalia [Nat] Pavlova">></center>'	
 	'Natalia is a very smart but weak willed girl. She constantly struggles to maintain friendships but her good looks and eagerness to help others, prevents her from being an outcast. She is rarely seen with anyone but one thing she always keeps with her, is a special notebook that she never lets anyone touch.'
 	
 	act 'Go back': gt 'journal', 'school'

+ 2 - 2
locations/korrPar.qsrc

@@ -134,14 +134,14 @@ if momloc = 1:
 			end
 		end
 	else
-		'Your parents are asleep in their room'
+		act 'Go to your parents'' room': msg'Your parents are probably asleep, you shouldn''t go in right now.'
 	end
 else
 	act 'Go to your parents'' room':gt 'bedrPar2'
 end
 act 'Go to the living room':gt 'sitrPar'
 if momloc = 5:
-	'The bathroom door is locked as your Mom takes a shower'
+	act 'Go to the bathroom':msg'You try to open the bathroom door but it immediately stops, banging against the latch. You hear the water running and your mother shouting at the door. "Doesn''t anybody in this family know how to knock?!"'
 else
 	act 'Go to the bathroom':minut += 1 & gt 'vanrPar'
 end

+ 2 - 2
locations/poli.qsrc

@@ -1236,9 +1236,9 @@ if $ARGS[0] = 'cosmetic1':
 	'String implants slowly absorb your body fluids and grow larger over time. We can also drain it for you if it becomes too large.'
 	*nl
 	if money >= 80000 and lashair = 0:
-		'<a href="exec:gt ''poli'', ''electrolysis''">Electrolysis treatment</a> - 80,000 <b>₽</b>'
+		'<a href="exec:gt ''poli'', ''electrolysis''">Electrolysis</a> laser hair removal of legs and pubic area - 80,000 <b>₽</b>'
 		else
-		'Electrolysis treatment - 80,000 <b>₽</b>'
+		'Electrolysis - laser hair removal of legs and pubic area - 80,000 <b>₽</b>'
 	end
 	if money >= 25000 and pcs_lip < 4:
 		'<a href="exec:gt ''poli'', ''lipPlus''">Lip enlargement surgery</a> - 25,000 <b>₽</b>'

+ 1 - 1
locations/salon.qsrc

@@ -502,7 +502,7 @@ if $ARGS[0] = 'epilyaciya':
 	cla & *clr
 	minut += 60
 	pcs_leghair = -10
-	pcs_pubes = -10
+	pcs_pubes = -5
 	inhib_exp += rand(1,5)
 	money -= 2000
 	if salonrand = 0 and masha = 0:gt 'salon', '0'