[added] New attibutes for training "bodybuilder" strength and for a bigger butt. Changed the apperance calculation and body picture selection to take the new strength pluss varibale into account.

locations/ApperanceSystem.qsrc

@@ -174,23 +174,29 @@ if $ARGS[0] = 'SetBodyShapeBonus':
 		if succubusflag = 1:
 			tempBodyShapeBonus += 10
 		else
-			if strenbuf > 180:
-				tempBodyShapeBonus -= 70
+			if strenbuf > 190:
+				tempBodyShapeBonus -= 130
+			elseif strenbuf > 180:
+				tempBodyShapeBonus -= 100
+			elseif strenbuf > 170:
+				tempBodyShapeBonus -= 75
 			elseif strenbuf > 160:
-				tempBodyShapeBonus -= 50
-			elseif strenbuf > 140:
+				tempBodyShapeBonus -= 60
+			elseif strenbuf > 150:
+				tempBodyShapeBonus -= 45
+			elseif trenbuf <= 5 or strenbuf > 140:
 				tempBodyShapeBonus -= 30
-			elseif strenbuf <= 5 or strenbuf > 120:
+			elseif strenbuf <= 10:
 				tempBodyShapeBonus -= 20
-			elseif strenbuf <= 10 or strenbuf > 100:
+			elseif strenbuf <= 15 or strenbuf > 130:
 				tempBodyShapeBonus -= 15
-			elseif strenbuf <= 15 or strenbuf > 95:
+			elseif strenbuf <= 25:
 				tempBodyShapeBonus -= 10
-			elseif strenbuf <= 25 or strenbuf > 85:
+			elseif strenbuf <= 35 or strenbuf > 120:
 				tempBodyShapeBonus -= 5
-			elseif strenbuf <= 35 or strenbuf > 75:
+			elseif strenbuf <= 50 or strenbuf > 110:
 				tempBodyShapeBonus += 0
-			elseif strenbuf <= 45 or strenbuf > 60:
+			elseif strenbuf <= 70 or strenbuf > 100:
 				tempBodyShapeBonus += 5
 			else
 				tempBodyShapeBonus += 10

locations/body.qsrc

@@ -392,7 +392,7 @@ if $ARGS[0] = 'UpdateBodyMeasurement':
 	pcs_waist = (pcs_hips * wratio) / 100 + vofat
 	pcs_band = (pcs_waist * bratio) / 100 + vofat
 	pcs_bust = (pcs_waist * bratio) / 100 + nbsize + magicf2b + silicone
-	pcs_butt = (pcs_hips / 10) + silicone_butt + butt_cheat
+	pcs_butt = (pcs_hips / 10) + silicone_butt + butt_cheat + pcs_butt_tr
 	pcs_cupsize = pcs_bust - pcs_band
 
 end
@@ -419,9 +419,9 @@ if $ARGS[0] = 'UpdateBodyImage':
 		if bdsetlock = 0:
 			if (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)):
 				bodset = 3
-			elseif strenbuf >= 70:
+			elseif strenbuf >= 100 and stren_plus_lvl > 0:
 				bodset = 2
-			elseif strenbuf <= 40:
+			elseif strenbuf <= 50:
 				bodset = 0
 			else
 				bodset = 1
@@ -432,9 +432,9 @@ if $ARGS[0] = 'UpdateBodyImage':
 	elseif (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)) and bodet ! 3 and bdsetlock = 0:
 		bodset = 3
 	elseif preg = 0 and bdsetlock = 0:
-		if strenbuf >= 70:
+		if strenbuf >= 100 and stren_plus_lvl > 0:
 			bodset = 2
-		elseif strenbuf <= 40:
+		elseif strenbuf <= 50:
 			bodset = 0
 		else
 			bodset = 1

locations/body_desc.qsrc

@@ -413,7 +413,7 @@ if $ARGS[0] = 'butt':
 		$pcs_butt = 'You have an average, feminine looking <a href="exec:view''images/pc/body/ass/2.jpg''">ass</a>. While it''s not flat, it''s nothing special either.'
 	elseif pcs_butt <= 12:
 		$pcs_butt = 'Your tight <a href="exec:view''images/pc/body/ass/3.jpg''">ass</a> is bigger, rounder and firmer than average. You often draw the stares of guys around you.'
-	elseif pcs_butt <= 16:
+	else
 		$pcs_butt = 'You have a large and natural bubble <a href="exec:view''images/pc/body/ass/4.jpg''">butt</a> that jiggles and sways as you walk. Guys hungrily fixate on you with their tongues hanging out and other girls are often envious of your booty.'
 	end
 

locations/exercise.qsrc

@@ -493,7 +493,7 @@ if $ARGS[0] = 'tier1':
 	mcnt = 0
 	:timeexploop1
 	if $ARGS[3] = '':
-		gs 'exp_gain', $ARGS[2], 1
+		gs 'exp_gain', $ARGS[2], 1, steroid_dose
 		if $ARGS[2] = 'vital' or $ARGS[2] = 'stren':
 			gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
 			if steroid_dose > 0 and rand(1,5) <= steroid_dose:clit_size += rand(0,1)
@@ -502,7 +502,7 @@ if $ARGS[0] = 'tier1':
 		i = 2
 		:exploop1
 		if $ARGS[i] ! '':
-			gs 'exp_gain', $ARGS[i], rand(0,1)
+			gs 'exp_gain', $ARGS[i], rand(0,1), steroid_dose
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
 				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
@@ -541,7 +541,7 @@ if $ARGS[0] = 'tier2':
 	mcnt = 0
 	:timeexploop2
 	if $ARGS[3] = '':
-		gs 'exp_gain', $ARGS[2], rand(2,3)
+		gs 'exp_gain', $ARGS[2], rand(2,3), steroid_dose
 		if $ARGS[2] = 'vital' or $ARGS[2] = 'stren':
 			gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
 			if steroid_dose > 0 and rand(1,5) <= steroid_dose:clit_size += rand(0,1)
@@ -550,7 +550,7 @@ if $ARGS[0] = 'tier2':
 		i = 2
 		:exploop2
 		if $ARGS[i] ! '':
-			gs 'exp_gain', $ARGS[i], rand(1,2)
+			gs 'exp_gain', $ARGS[i], rand(1,2), steroid_dose
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
 				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
@@ -589,7 +589,7 @@ if $ARGS[0] = 'tier3':
 	mcnt = 0
 	:timeexploop3
 	if $ARGS[3] = '':
-		gs 'exp_gain', $ARGS[2], rand(3,5)
+		gs 'exp_gain', $ARGS[2], rand(3,5), steroid_dose
 		if $ARGS[2] = 'vital' or $ARGS[2] = 'stren':
 			gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
 			if steroid_dose > 0 and rand(1,5) <= steroid_dose:clit_size += rand(0,1)
@@ -598,7 +598,7 @@ if $ARGS[0] = 'tier3':
 		i = 2
 		:exploop3
 		if $ARGS[i] ! '':
-			gs 'exp_gain', $ARGS[i], rand(2,3)
+			gs 'exp_gain', $ARGS[i], rand(2,3), steroid_dose
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
 				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
@@ -637,7 +637,7 @@ if $ARGS[0] = 'tier4':
 	mcnt = 0
 	:timeexploop4
 	if $ARGS[3] = '':
-		gs 'exp_gain', $ARGS[2], rand(7,10)
+		gs 'exp_gain', $ARGS[2], rand(7,10), steroid_dose
 		if $ARGS[2] = 'vital' or $ARGS[2] = 'stren':
 			gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
 			if steroid_dose > 0 and rand(1,5) <= steroid_dose:clit_size += rand(0,1)
@@ -646,7 +646,7 @@ if $ARGS[0] = 'tier4':
 		i = 2
 		:exploop4
 		if $ARGS[i] ! '':
-			gs 'exp_gain', $ARGS[i], rand(3,5)
+			gs 'exp_gain', $ARGS[i], rand(3,5), steroid_dose
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
 				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1

locations/exp_gain.qsrc

@@ -5,16 +5,20 @@
 
 !Modify exp gain if Sveta does not get enough sleep.
 if ARGS[1] > 0:
-	if pcs_condition['lack_of_sleep'] >= 20:
-		dynamic "<<$ARGS[0]>>_exp += <<ARGS[1]>>/4"
-	elseif pcs_condition['lack_of_sleep'] >= 10:
-		dynamic "<<$ARGS[0]>>_exp += <<ARGS[1]>>/2"
-	elseif pcs_condition['lack_of_sleep'] >= 5:
-		dynamic "<<$ARGS[0]>>_exp += (<<ARGS[1]>>*3)/4"
-	elseif pcs_condition['lack_of_sleep'] >= 2 and ARGS[1] > 1:
-		dynamic "<<$ARGS[0]>>_exp += (<<ARGS[1]>>*9)/10"
+	if $ARGS[0] = 'stren_plus' and ARGS[2] = 0 and stren_plus_lvl > 50:
+		!!This is so that exp only is awarded to additional strength if it is high when you use steroids
 	else
-		dynamic "<<$ARGS[0]>>_exp += <<ARGS[1]>>"
+		if pcs_condition['lack_of_sleep'] >= 20:
+			dynamic "<<$ARGS[0]>>_exp += <<ARGS[1]>>/4"
+		elseif pcs_condition['lack_of_sleep'] >= 10:
+			dynamic "<<$ARGS[0]>>_exp += <<ARGS[1]>>/2"
+		elseif pcs_condition['lack_of_sleep'] >= 5:
+			dynamic "<<$ARGS[0]>>_exp += (<<ARGS[1]>>*3)/4"
+		elseif pcs_condition['lack_of_sleep'] >= 2 and ARGS[1] > 1:
+			dynamic "<<$ARGS[0]>>_exp += (<<ARGS[1]>>*9)/10"
+		else
+			dynamic "<<$ARGS[0]>>_exp += <<ARGS[1]>>"
+		end
 	end
 end
 

locations/stat_sklattrib.qsrc

@@ -46,6 +46,9 @@ $att_name[5] = 'sprt'
 $att_name[6] = 'chrsm'
 $att_name[7] = 'prcptn'
 $att_name[8] = 'magik'
+!! The following two are hidden attributes. The first for exceptional strength that can be trained separately to develop strength above 100 and get the body of a bodybuilder. The second for training to get a big round butt.
+$att_name[9] = 'stren_plus'
+$att_name[10] = 'butt_tr'
 
 !!Skill variable list
 !!Add new skills to the end; if removing a skill, move the rest up and then edit the Traits so that the index numbers are correct

locations/stat_sklattrib_lvlset.qsrc

@@ -4,7 +4,7 @@
 !!This is where an attribute pcs_"name" is set by "name"_lvl and any adjustments are added
 !!Even though most of these could be done without doing a _lvl to pcs_ conversion, doing so is future proofing
 
-pcs_stren = stren_lvl
+pcs_stren = stren_lvl + stren_plus_lvl
 if pcs_stren < 1: pcs_stren = 1
 
 pcs_agil = agil_lvl
@@ -31,6 +31,9 @@ if pcs_prcptn < 1: pcs_prcptn = 1
 pcs_magik = magik_lvl
 if pcs_magik < 0: pcs_magik = 0
 
+pcs_butt_tr = butt_tr_lvl/10
+if pcs_butt_tr < 0: pcs_butt_tr = 0
+
 !!---------------------- Skill set Section -----------------------
 !!Each skill has three lines, the first is the comment that says what the skill is, the next that sets pcs_"name", and the finial which sets "name"[1] to [x] with the attribute index of the attribute(s) ending with a -1 to show end.
 !! Clarification on the third line: