|
@@ -1,18 +1,15 @@
|
|
|
# body
|
|
|
-
|
|
|
-!! I have gone through and added a new category of string variables, standardised to be used for descriptive writing. You will notice some duplication here -- this is for purposes of backwards compatibility, as if I completely rename and discard some of these strings,
|
|
|
-!! extant saved games will irreparably break, and this would be Bad. One day down the line, most of the duplicated variables here can be culled, when there is a new release that warrants new saves being used, but until then the duplication needs to stay. Use of
|
|
|
-!! strings for descriptions that do not begin with $pcdesc_ should be avoided, as it would be best to have everything standardised when moving forward into the present and future.
|
|
|
-!! Available strings follow this format: $pcdesc_type, $pcdesc_typewordy, and $pcdesc_typerandom. The last will give a new string each time, to allow for repeatedly referencing something accurately without it becoming repetitive. Not EVERYTHING has a wordy
|
|
|
-!! or even random variation, but these should work regardless -- they just may use a non-wordy, or non-random version, if it is something that does not really warrant such.
|
|
|
-!! There is also a special string, $pcdesc_typeinsertive, that follows the format " , descriptive text" as in, " , invitingly-glossed". Please check the master string document to see if this exists for the string you need. - xerya, July 2017
|
|
|
-
|
|
|
$this = 'body'
|
|
|
|
|
|
if $ARGS[0] = '':
|
|
|
+ !{
|
|
|
+ PC's appearance is updated regularly in stat.qsrc.
|
|
|
+ Note: A huge part of PC's appearance is from base appearance, which is updated once a day. Because it's
|
|
|
+ a global variable, it does not show in this function in particular, but it's used in 'CalcAppearance'
|
|
|
+ }
|
|
|
if pcs_makeup = 6 and bimbolevel >= 2: extra_supnatvnesh = 2*bimbolevel - 2
|
|
|
|
|
|
- !! Calculate hotcat etc
|
|
|
+ !STD check. STD will make appearance automatically -10
|
|
|
if Gerpes >= 3 or Sifilis >= 21 or Triper > 2:
|
|
|
pcs_apprnc = -10
|
|
|
else:
|
|
@@ -23,10 +20,11 @@ if $ARGS[0] = '':
|
|
|
pcs_apprnc = func($this, 'CalcAppearance', (supnatvnesh + extra_supnatvnesh))
|
|
|
Hotcat = func($this, 'ConvertToHotcat')
|
|
|
end
|
|
|
- !{killvar 'clothingBonus'
|
|
|
+
|
|
|
+ killvar 'clothingBonus'
|
|
|
killvar 'accessoriesBonus'
|
|
|
killvar 'groomingBonus'
|
|
|
- killvar 'groomingPenalty'}
|
|
|
+ killvar 'groomingPenalty'
|
|
|
end
|
|
|
|
|
|
if $args[0] = 'UpdateBaseAppearnce':
|
|
@@ -51,8 +49,14 @@ if $args[0] = 'UpdateBaseAppearnce':
|
|
|
skinBonus = (pcs_skin * 2 / 5)
|
|
|
bodyShapeBonus = func($this, 'SetBodyShapeBonus')
|
|
|
|
|
|
- ! Calculte vnesh
|
|
|
+ ! Calculte base appearance
|
|
|
pcs_apprncbase = (vidageBonus * (skinBonus + bodyShapeBonus + faceBonus + attributeBonus) / 100) + supnatvnesh
|
|
|
+
|
|
|
+ killvar 'vidageBonus'
|
|
|
+ killvar 'skinBonus'
|
|
|
+ killvar 'bodyShapeBonus'
|
|
|
+ killvar 'faceBonus'
|
|
|
+ killvar 'attributeBonus'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'CalcFaceBonus':
|
|
@@ -102,6 +106,9 @@ if $ARGS[0] = 'CalcFaceBonus':
|
|
|
|
|
|
result = eyelashesBonus + eyeSizeBonus + lipBonus
|
|
|
|
|
|
+ killvar 'eyelashesBonus'
|
|
|
+ killvar 'eyeSizeBonus'
|
|
|
+ killvar 'lipBonus'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'CalcAttributeBonus':
|
|
@@ -200,6 +207,7 @@ if $ARGS[0] = 'CalcClothingBonus':
|
|
|
end
|
|
|
|
|
|
result = tempRevealing/ 76 * PCloQuality
|
|
|
+ killvar 'tempRevealing'
|
|
|
|
|
|
end
|
|
|
|
|
@@ -252,11 +260,11 @@ if $ARGS[0] = 'CalcGroomingBonus':
|
|
|
!result = tempGroomingBonus
|
|
|
result = func($this, 'AdjustFromBMI', tempGroomingBonus)
|
|
|
|
|
|
- !{killvar 'lipBalmBonus'
|
|
|
+ killvar 'lipBalmBonus'
|
|
|
killvar 'makeupBonus'
|
|
|
killvar 'hairBonus'
|
|
|
killvar 'breathBonus'
|
|
|
- killvar 'tempGroomingBonus'}
|
|
|
+ killvar 'tempGroomingBonus'
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'CalcGroomingPenalty':
|
|
@@ -313,21 +321,17 @@ end
|
|
|
|
|
|
|
|
|
if $ARGS[0] = 'CalcAppearance':
|
|
|
- !!Appearance factors; hairkoef = very short hair / mopkoef = makeup bonus / legkoef = shaved legs / CloAdjustedBeauty = clothes / pcs_hairbsh = Hair brushed / lipbalmKoef = lip balm / pcs_breath = freash breath / sweatKoef = pcs_sweat / glassvnesh = glasses / dyevmod = hair dye fading
|
|
|
- !!Moved to base calculation in "body_shape"; bimbobeauty = Bimbo bonus; pcs_lip = lip size; skin = skin condition; pcs_lashes = eyelashes; pcs_eyesize = eyes; bodykoef = hips:waist ratio; pcs_teeth = missing teeth; vidagebonus = youth
|
|
|
- tempsupnatvnesh = ARGS[1] & !! supnatvnesh
|
|
|
+ superNaturalBonus = ARGS[1] & !! supnatvnesh
|
|
|
|
|
|
temp_apprnc = pcs_apprncbase + clothingBonus + accessoriesBonus + groomingBonus - groomingPenalty
|
|
|
|
|
|
if temp_apprnc >= 200: temp_apprnc = 200
|
|
|
-
|
|
|
- temp_apprnc = temp_apprnc + tempsupnatvnesh
|
|
|
-
|
|
|
if temp_apprnc < 0: temp_apprnc = 0
|
|
|
|
|
|
- result = temp_apprnc
|
|
|
+ !Any super natural bonuses are allowed to go above the max scale
|
|
|
+ result = temp_apprnc + superNaturalBonus
|
|
|
|
|
|
- killvar 'tempsupnatvnesh'
|
|
|
+ killvar 'superNaturalBonus'
|
|
|
killvar 'temp_apprnc'
|
|
|
end
|
|
|
|
|
@@ -370,6 +374,5 @@ if $ARGS[0] = 'AdjustFromBMI':
|
|
|
|
|
|
result = tempValue
|
|
|
killvar 'tempValue'
|
|
|
- killvar 'tempadjpcs_bmi'
|
|
|
end
|
|
|
--- body ---------------------------------
|