[added] exhibitionism as a trait and reworking of bimbo as a trait in 'traits' and 'cikl'

locations/cikl.qsrc

@@ -142,8 +142,6 @@ if coatH[defaultcoat] <= 0: defaultcoat = 0
 !!------------------------------------------------------------------------------------------------------------
 !!	Bimbo
 !!------------------------------------------------------------------------------------------------------------
-!!A Succubus cannot be a Bimbo
-if succubusflag = 1 and bimbo > 0: bimbo -= succublvl * 2
 
 !!Bonus from clothing and shoes
 if succubusflag = 0 and $cheatBimbo ! '<b>ON</b>':
@@ -180,15 +178,49 @@ if bimbolevel = 1: supnatvnesh = 2 & bimbostupidity = (pcs_intel / 6)
 if bimbolevel = 2: supnatvnesh = 4 & bimbostupidity = (pcs_intel / 4)
 if bimbolevel = 3: supnatvnesh = 8 & bimbostupidity = (pcs_intel / 3)
 
+!!A Succubus cannot be a Bimbo
+if succubusflag = 1:
+	if bimbolevel > 0 and bimbo > 0: bimbowithdrawal = 40
+elseif bimbolevel >= 1:
+!!Checks how often sex has occured in the last 24 hours and for drops in bimbo score, for calculating withdrawal
+	bimbo += ((stat['vaginal'] + stat['bj'] + stat['anal']) - snapshotX) - 3
+	if bimbo > snapshotY:
+		bimbowithdrawal = 0
+	else
+		bimbowithdrawal += 1
+	end
+end
+
+if bimbo < 0: bimbo = 0
+snapshotX = (stat['vaginal'] + stat['bj'] + stat['anal'])
+snapshotY = bimbo
+
+!!------------------------------------------------------------------------------------------------------------
+!!	Exhibitionist
+!!------------------------------------------------------------------------------------------------------------
+
+if Exhibitionist > 0 or Exhibitionist_lvl > 0:
+    if Exhibitionist < 10:
+        Exhibitionist -= 1
+    elseif Exhibitionist < 20:
+    	Exhibitionist_lvl = 1
+    elseif Exhibitionist < 30:
+    	Exhibitionist_lvl = 2
+    else
+        Exhibitionist_lvl = 3
+    end
+end
+
+!!------------------------------------------------------------------------------------------------------------
+!!	Succubus
+!!------------------------------------------------------------------------------------------------------------
+
 !!Succubus Level & hunger calcs
 if succubusflag = 1:
 
 	cheatHealth = 1
 	dynamic $cheatmenu['std_cure']
 
-!!	A Succubus cannot be a Bimbo
-	if bimbolevel > 0 and bimbo > 0: bimbowithdrawal = 40
-
 !!	Hunger handling
 	if sucxpsnapshot >= succubxp: succhungry += 1
 	sucxpsnapshot = succubxp
@@ -274,21 +306,6 @@ if succubusflag = 1:
 	end
 end
 
-!!Bimbo second half, after Succubus so changes there can be reflected here if still bimbo and Succubus
-!!Checks how often sex has occured in the last 24 hours and for drops in bimbo score, for calculating withdrawal
-if bimbolevel >= 1:
-	bimbo += ((stat['vaginal'] + stat['bj'] + stat['anal']) - snapshotX) - 3
-	if bimbo > snapshotY:
-		bimbowithdrawal = 0
-	else
-		bimbowithdrawal += 1
-	end
-end
-
-if bimbo < 0: bimbo = 0
-snapshotX = (stat['vaginal'] + stat['bj'] + stat['anal'])
-snapshotY = bimbo
-
 !!------------------------------------------------------------------------------------------------------------
 
 if defcurly = 0 and curly > 0:curly -= 1

locations/traits.qsrc

@@ -5,8 +5,63 @@ if $ARGS[0] = 'menu':
 	pl '<center>Traits Menu</center>'
 	pl'<a href="exec:gs ''stat''">Leave</a>'
 	nl
-!!	pl '<b>Bimbo</b>'
-
+	pl '<b>Bimbo</b>'
+	if bimbolevel = 0:
+		pl 'You do not have this trait.'
+		pl 'To gain this trait you must wear bimbo clothing / shoes for a few days.'
+		pl 'You have <<bimbo>> out of 10 points towards level 1.'
+	elseif bimbolevel = 1:
+		pl 'You have this trait at level 1.'
+		pl 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
+		pl 'Due to this trait you gain a very small bonus to appearance and a very small penalty to intelligence.'
+		pl 'You have <<bimbo>> out of 20 points towards level 2.'
+		if bimbowithdrawal = 0:
+			pl 'You are not in withdrawal.'
+		else
+			pl 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
+		end
+	elseif bimbolevel = 2:
+		pl 'You have this trait at level 2.'
+		pl 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
+		pl 'Due to this trait you gain a small bonus to appearance and a small penalty to intelligence.'
+		pl 'You have <<bimbo>> out of 30 points towards level 3.'
+		if bimbowithdrawal = 0:
+			pl 'You are not in withdrawal.'
+		else
+			pl 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
+		end
+	else
+		pl 'You have this trait at level 3.'
+		pl 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
+		pl 'Due to this trait you gain a moderate bonus to appearance and a moderate penalty to intelligence.'
+		if bimbowithdrawal = 0:
+			pl 'You are not in withdrawal.'
+		else
+			pl 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
+		end
+	end
+	nl
+	pl '<b>Exhibitionist</b>'
+	if Exhibitionist_lvl = 0:
+		pl 'You do not have this trait.'
+		pl 'To gain this trait you must have low enough inhibition and choose to expose your breasts in public.'
+		pl 'You have <<Exhibitionist>> out of 10 points towards level 1.'
+    elseif Exhibitionist_lvl = 1:
+		pl 'You have this trait at level 1.'
+		pl 'To increase this trait you must choose to expose your breasts and/or bare bottom in public.'
+		pl 'This trait grants you a small amount or excitement from exposing yourself.'
+		pl 'You have <<Exhibitionist>> out of 20 points towards level 2.'
+    elseif Exhibitionist_lvl = 2:
+		pl 'You have this trait at level 2.'
+		pl 'To increase this trait you must choose to expose your breasts, bare bottom and/or pussy in public.'
+		pl 'This trait grants you a moderate amount or excitement from exposing yourself.'
+		pl 'You have <<Exhibitionist>> out of 30 points towards level 3.'
+    else
+		pl 'You have this trait at level 3.'
+		pl 'This is the highest level of this trait.'
+		pl 'This trait grants you a large amount or excitement from exposing yourself.'
+    end
+	nl
 	pl '<b>Cumeater</b>'
 	if trt_cumeater = 0:
 		pl 'You do not have this trait.'