|
@@ -30,7 +30,7 @@ else
|
|
|
$throattipe = 'bottomless'
|
|
|
end
|
|
|
|
|
|
-if fbreath = 1:$throat += ' Which smelled fresh and minty last time you checked.'
|
|
|
+if pcs_breath = 1:$throat += ' Which smelled fresh and minty last time you checked.'
|
|
|
|
|
|
|
|
|
if vagina = 0:
|
|
@@ -104,7 +104,7 @@ end
|
|
|
!!!!!SIZE AND WEIGHT!!!
|
|
|
!!!!!!!!!!!!!!!!
|
|
|
if dounspell = 0:
|
|
|
- bedra = (rost * hratio) / 100 + vhips
|
|
|
+ bedra = (pcs_hgt * hratio) / 100 + vhips
|
|
|
talia = (bedra * wratio) / 100 + vofat
|
|
|
grutal = (talia * bratio) / 100 + vofat
|
|
|
pcs_bust = (talia * bratio) / 100 + nbsize + magicf2b + silicone
|
|
@@ -146,7 +146,7 @@ if dounspell = 0:
|
|
|
end
|
|
|
!!!
|
|
|
!!This sets weight
|
|
|
- ves = (rost * 62 / 170) + (vhips + (vofat * 2)) / 4 + tits
|
|
|
+ ves = (pcs_hgt * 62 / 170) + (vhips + (vofat * 2)) / 4 + tits
|
|
|
else
|
|
|
fat = 0
|
|
|
bedra = bedraDoun
|
|
@@ -222,14 +222,14 @@ if hbraids >= 1:
|
|
|
hpigtail = 0
|
|
|
end
|
|
|
|
|
|
-if hapri = 0:
|
|
|
+if pcs_hairbsh = 0:
|
|
|
if pcs_hairlng > 30:
|
|
|
- $hapri = '<b>tangled</b>. You should comb it to keep it healthy'
|
|
|
+ $pcs_hairbsh = '<b>tangled</b>. You should comb it to keep it healthy'
|
|
|
else
|
|
|
- $hapri = '<b>messy</b>. You should style it to keep it looking good'
|
|
|
+ $pcs_hairbsh = '<b>messy</b>. You should style it to keep it looking good'
|
|
|
end
|
|
|
else
|
|
|
- $hapri = 'neatly styled'
|
|
|
+ $pcs_hairbsh = 'neatly styled'
|
|
|
end
|
|
|
|
|
|
if curly <= 0:$curly = 'straight, slightly wavy '
|
|
@@ -259,11 +259,11 @@ if avatar_hair = 1:
|
|
|
$hair = $av_hair
|
|
|
else
|
|
|
if pcs_hairlng <= 30:$hair = 'You have very short <<$pcs_haircol>> hair. It doesn''t cover your ears, with some masculine complexions. One might mistake you for a man. Nonetheless, some people like this style as it''s easy to take care off.'
|
|
|
- if pcs_hairlng > 30 and pcs_hairlng <= 80:$hair = 'You have short <<$pcs_haircol>> hair which may cover your ears to the earlobes. It''s a modern, yet classy, hairstyle. Currently your hair is <<$hapri>>.'
|
|
|
- if pcs_hairlng > 80 and pcs_hairlng <= 160:$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. Your hair goes down to your chin line and can be considered of a medium length. It fits almost all face shapes. Your hair is at the moment <<$hapri>>. <<$hscrunch>><<$hpingrip>><<$hpigtail>>'
|
|
|
- if pcs_hairlng > 160 and pcs_hairlng <= 260:$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. Your hair reaches your shoulders with several strains going beyond. Currently your hair is <<$hapri>>. <<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
|
|
|
- if pcs_hairlng > 260 and pcs_hairlng <= 400:$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. As your hair reaches your bra strap line, hairdressers would consider this a rather long hair style, yet beautiful styles are created with this length. Your hair is <<$hapri>>. <<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
|
|
|
- if pcs_hairlng > 400:$hair = 'You have very long <<$pcs_haircol>> hair<<$hbangs>>, that goes beyond your bra-strapline. Rapunzel would be jealous. Your hair is currently <<$hapri>>. <<$hscrunch>><<$hbraids>>'
|
|
|
+ if pcs_hairlng > 30 and pcs_hairlng <= 80:$hair = 'You have short <<$pcs_haircol>> hair which may cover your ears to the earlobes. It''s a modern, yet classy, hairstyle. Currently your hair is <<$pcs_hairbsh>>.'
|
|
|
+ if pcs_hairlng > 80 and pcs_hairlng <= 160:$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. Your hair goes down to your chin line and can be considered of a medium length. It fits almost all face shapes. Your hair is at the moment <<$pcs_hairbsh>>. <<$hscrunch>><<$hpingrip>><<$hpigtail>>'
|
|
|
+ if pcs_hairlng > 160 and pcs_hairlng <= 260:$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. Your hair reaches your shoulders with several strains going beyond. Currently your hair is <<$pcs_hairbsh>>. <<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
|
|
|
+ if pcs_hairlng > 260 and pcs_hairlng <= 400:$hair = 'You have <<$curly>><<$pcs_haircol>> hair<<$hbangs>>. As your hair reaches your bra strap line, hairdressers would consider this a rather long hair style, yet beautiful styles are created with this length. Your hair is <<$pcs_hairbsh>>. <<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
|
|
|
+ if pcs_hairlng > 400:$hair = 'You have very long <<$pcs_haircol>> hair<<$hbangs>>, that goes beyond your bra-strapline. Rapunzel would be jealous. Your hair is currently <<$pcs_hairbsh>>. <<$hscrunch>><<$hbraids>>'
|
|
|
end
|
|
|
|
|
|
!!! Maruda Hair Mod
|
|
@@ -284,7 +284,7 @@ $milk_me = {
|
|
|
breastpumped = 1
|
|
|
temp = rand(0,1)
|
|
|
if bcream_used = 1:temp += 1
|
|
|
- nipple_size += temp
|
|
|
+ pcs_nips += temp
|
|
|
|
|
|
elseif lactate = 0 and pain['nipples'] < 60:
|
|
|
if rand(1,100) + breastcounter >= rand(100,200):
|
|
@@ -300,7 +300,7 @@ $milk_me = {
|
|
|
breastpumped = 1
|
|
|
temp = rand(0,1)
|
|
|
if bcream_used = 1:temp += 1
|
|
|
- nipple_size += temp
|
|
|
+ pcs_nips += temp
|
|
|
end
|
|
|
else
|
|
|
'Your nipples feel too sore to use the pump right now.'
|
|
@@ -310,15 +310,15 @@ $milk_me = {
|
|
|
|
|
|
!! Appearance factors and calculations
|
|
|
|
|
|
-if lip > 4:lip = 4
|
|
|
-if lip < 0:lip = 0
|
|
|
+if pcs_lip > 4:pcs_lip = 4
|
|
|
+if pcs_lip < 0:pcs_lip = 0
|
|
|
|
|
|
if lipbalmstat > 0:
|
|
|
- if lip = 0:$lipbalmstat = ' shiny'
|
|
|
- if lip = 1:$lipbalmstat = ' shiny'
|
|
|
- if lip = 2:$lipbalmstat = ' brilliant and juicy'
|
|
|
- if lip = 3:$lipbalmstat = ' juicy'
|
|
|
- if lip = 4:$lipbalmstat = ' glossy'
|
|
|
+ if pcs_lip = 0:$lipbalmstat = ' shiny'
|
|
|
+ if pcs_lip = 1:$lipbalmstat = ' shiny'
|
|
|
+ if pcs_lip = 2:$lipbalmstat = ' brilliant and juicy'
|
|
|
+ if pcs_lip = 3:$lipbalmstat = ' juicy'
|
|
|
+ if pcs_lip = 4:$lipbalmstat = ' glossy'
|
|
|
else
|
|
|
$lipbalmstat = ''
|
|
|
end
|
|
@@ -327,11 +327,11 @@ if pirsA = 1:$pirsA = 'When you are talking to people, they can get a glimpse of
|
|
|
if pirsA ! 1:$pirsA = ''
|
|
|
if pirsB = 1:$pirsB = 'You lower lip is pierced with a ring.'
|
|
|
if pirsB ! 1:$pirsB = ''
|
|
|
-if lip = 0:$lip = 'You have thin<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips' & $lip1 = 'thin'
|
|
|
-if lip = 1:$lip = 'You have normal<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'soft lips' & $liptalk2 = 'soft lips' & $liptalk3 = 'soft lips' & $lip1 = 'normal'
|
|
|
-if lip = 2:$lip = 'You have plump<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips' & $lip1 = 'plump'
|
|
|
-if lip = 3:$lip = 'You have big, pouting,<<$lipbalmstat>> full lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'pouting lips' & $liptalk2 = 'pouting lips' & $liptalk3 = 'pouting lips' & $lip1 = 'pouting'
|
|
|
-if lip = 4:$lip = 'You have thick<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thick lips' & $liptalk2 = 'her thick lips' & $liptalk3 = 'thick lips' & $lip1 = 'large thick'
|
|
|
+if pcs_lip = 0:$lip = 'You have thin<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips' & $lip1 = 'thin'
|
|
|
+if pcs_lip = 1:$lip = 'You have normal<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'soft lips' & $liptalk2 = 'soft lips' & $liptalk3 = 'soft lips' & $lip1 = 'normal'
|
|
|
+if pcs_lip = 2:$lip = 'You have plump<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips' & $lip1 = 'plump'
|
|
|
+if pcs_lip = 3:$lip = 'You have big, pouting,<<$lipbalmstat>> full lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'pouting lips' & $liptalk2 = 'pouting lips' & $liptalk3 = 'pouting lips' & $lip1 = 'pouting'
|
|
|
+if pcs_lip = 4:$lip = 'You have thick<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thick lips' & $liptalk2 = 'her thick lips' & $liptalk3 = 'thick lips' & $lip1 = 'large thick'
|
|
|
if pcs_tan <= 0:$pcs_tan = 'pale'
|
|
|
if pcs_tan > 0:$pcs_tan = 'tanned'
|
|
|
if pirsC = 1:$pirsC = 'Your ears are pierced and you are wearing earrings.'
|
|
@@ -340,15 +340,15 @@ if pirsD = 1:$pirsD = 'You have a nosering inserted in your nose.'
|
|
|
if pirsD ! 1:$pirsD = ''
|
|
|
if pirsE = 1:$pirsE = 'Your eyebrow is pierced and a rod is sticking through it.'
|
|
|
if pirsE ! 1:$pirsE = ''
|
|
|
-if skinvan > 100: skinvan = 100
|
|
|
-if skinvan < 0: skinvan = 0
|
|
|
-if skinvan < 20:
|
|
|
+if pcs_skin > 100: pcs_skin = 100
|
|
|
+if pcs_skin < 0: pcs_skin = 0
|
|
|
+if pcs_skin < 20:
|
|
|
$skin = 'Your <<$pcs_tan>> skin is rough and covered with pimples and moles. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'very bad'
|
|
|
-elseif skinvan < 40:
|
|
|
+elseif pcs_skin < 40:
|
|
|
$skin = 'Your <<$pcs_tan>> skin rough and has a few pimples. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'bad'
|
|
|
-elseif skinvan < 60:
|
|
|
+elseif pcs_skin < 60:
|
|
|
$skin = 'Your <<$pcs_tan>> skin is clear of acne but still slightly rough. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'normal'
|
|
|
-elseif skinvan < 80:
|
|
|
+elseif pcs_skin < 80:
|
|
|
$skin = 'You have <<$pcs_tan>>, smooth and well-groomed skin. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'good'
|
|
|
else
|
|
|
$skin = 'You have <<$pcs_tan>>, very smooth skin, which almost feels like silk, when touching it. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'excellent'
|
|
@@ -357,10 +357,10 @@ if pcs_eyecol = 0:$pcs_eyecol = 'brown'
|
|
|
if pcs_eyecol = 1:$pcs_eyecol = 'gray'
|
|
|
if pcs_eyecol = 2:$pcs_eyecol = 'green'
|
|
|
if pcs_eyecol = 3:$pcs_eyecol = 'blue'
|
|
|
-if resnic > 2:resnic = 2
|
|
|
-if resnic = 0:$resnic = 'with short eyelashes'
|
|
|
-if resnic = 1:$resnic = 'normal eyelashes'
|
|
|
-if resnic = 2:$resnic = 'with long eyelashes'
|
|
|
+if pcs_lashes > 2:pcs_lashes = 2
|
|
|
+if pcs_lashes = 0:$pcs_lashes = 'with short eyelashes'
|
|
|
+if pcs_lashes = 1:$pcs_lashes = 'normal eyelashes'
|
|
|
+if pcs_lashes = 2:$pcs_lashes = 'with long eyelashes'
|
|
|
if brow = 0 and browper = 0:$brow = 'natural eyebrows'
|
|
|
if brow > 0 and browper = 0:$brow = 'groomed eyebrows' & brokoef = 1
|
|
|
if glass <= 0:$glass = '' & glassvnesh = 0
|
|
@@ -369,10 +369,10 @@ if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh =
|
|
|
if glass = 2:$glass = ' You wear glasses.' & glassvnesh = 0
|
|
|
!!!
|
|
|
if pcs_eyesize > 3:pcs_eyesize = 3
|
|
|
-if pcs_eyesize = 0:$glaza = 'You have little <<$pcs_eyecol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>'
|
|
|
-if pcs_eyesize = 1:$glaza = 'You have medium-sized <<$pcs_eyecol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>'
|
|
|
-if pcs_eyesize = 2:$glaza = 'You have large <<$pcs_eyecol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>'
|
|
|
-if pcs_eyesize = 3:$glaza = 'You have huge <<$pcs_eyecol>> eyes that almost look like they''re out of an anime, <<$resnic>> and <<$brow>>.<<$glass>>'
|
|
|
+if pcs_eyesize = 0:$glaza = 'You have little <<$pcs_eyecol>> eyes <<$pcs_lashes>> and <<$brow>>.<<$glass>>'
|
|
|
+if pcs_eyesize = 1:$glaza = 'You have medium-sized <<$pcs_eyecol>> eyes <<$pcs_lashes>> and <<$brow>>.<<$glass>>'
|
|
|
+if pcs_eyesize = 2:$glaza = 'You have large <<$pcs_eyecol>> eyes <<$pcs_lashes>> and <<$brow>>.<<$glass>>'
|
|
|
+if pcs_eyesize = 3:$glaza = 'You have huge <<$pcs_eyecol>> eyes that almost look like they''re out of an anime, <<$pcs_lashes>> and <<$brow>>.<<$glass>>'
|
|
|
|
|
|
if mop = 0: mopkoef = -5 & $mop = '<b><font color="red">Your makeup is smeared all over your face</font></b>'
|
|
|
if mop = 1: mopkoef = 0 & $mop = 'You''re not wearing any kind of makeup'
|
|
@@ -396,18 +396,18 @@ if clit_size >= 60 and clit_size < 80:$clitsize = 'You have a big <a href="exec:
|
|
|
if clit_size >= 80:$clitsize = 'Your <a href="exec:view''images/body/clit/clit5.jpg''">clit</a> is so large it can be mistaken for a penis.'
|
|
|
|
|
|
! WD: Move missing Image ~ "pussy.jpg" from "images/picb" to "images/body"
|
|
|
-if lashair = 1:$lobok = 'You have a smooth, <a href="exec:view''images/body/pussy.jpg''">bald pussy</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
-if lashair = 0 and lobok <= 0:lobkoef = 3 & $lobok = 'You have a smoothly <a href="exec:view''images/body/pussy.jpg''">shaved pussy</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
-if lashair = 0 and lobok > 0 and lobok <= 2:lobkoef = 0 & $lobok = 'You have light but visible hair above your <a href="exec:view''images/body/spussy.jpg''">crotch</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
+if lashair = 1:$pcs_pubes = 'You have a smooth, <a href="exec:view''images/body/pussy.jpg''">bald pussy</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
+if lashair = 0 and pcs_pubes <= 0:lobkoef = 3 & $pcs_pubes = 'You have a smoothly <a href="exec:view''images/body/pussy.jpg''">shaved pussy</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
+if lashair = 0 and pcs_pubes > 0 and pcs_pubes <= 2:lobkoef = 0 & $pcs_pubes = 'You have light but visible hair above your <a href="exec:view''images/body/spussy.jpg''">crotch</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
|
|
|
-if nipple_size < 20:$nipplesize = 'You have average <a href="exec:view''images/body/nipples/nipples1.jpg''">nipples</a>.'
|
|
|
-if nipple_size >= 20 and nipple_size < 40:$nipplesize = 'Your <a href="exec:view''images/body/nipples/nipples2.jpg''">nipples</a> are slightly on the large side.'
|
|
|
-if nipple_size >= 40 and nipple_size < 60:$nipplesize = 'You have large, puffy <a href="exec:view''images/body/nipples/nipples3.jpg''">nipples</a>.'
|
|
|
-if nipple_size >= 60 and nipple_size < 80:$nipplesize = 'Your <a href="exec:view''images/body/nipples/nipples4.jpg''">nipples</a> are the size of radio knobs.'
|
|
|
-if nipple_size >= 80:$nipplesize = 'You have huge <a href="exec:view''images/body/nipples/nipples5.jpg''">nipples</a>.'
|
|
|
+if pcs_nips < 20:$nipplesize = 'You have average <a href="exec:view''images/body/nipples/nipples1.jpg''">nipples</a>.'
|
|
|
+if pcs_nips >= 20 and pcs_nips < 40:$nipplesize = 'Your <a href="exec:view''images/body/nipples/nipples2.jpg''">nipples</a> are slightly on the large side.'
|
|
|
+if pcs_nips >= 40 and pcs_nips < 60:$nipplesize = 'You have large, puffy <a href="exec:view''images/body/nipples/nipples3.jpg''">nipples</a>.'
|
|
|
+if pcs_nips >= 60 and pcs_nips < 80:$nipplesize = 'Your <a href="exec:view''images/body/nipples/nipples4.jpg''">nipples</a> are the size of radio knobs.'
|
|
|
+if pcs_nips >= 80:$nipplesize = 'You have huge <a href="exec:view''images/body/nipples/nipples5.jpg''">nipples</a>.'
|
|
|
|
|
|
! WD: Move missing Image ~ "hpussy.jpg" from "images/picb" to "images/body"
|
|
|
-if lobok > 2:lobkoef = 0 & $lobok = 'You have a full triangle of thick <a href="exec:view''images/body/hpussy.jpg''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
+if pcs_pubes > 2:lobkoef = 0 & $pcs_pubes = 'You have a full triangle of thick <a href="exec:view''images/body/hpussy.jpg''">pubic hair</a>. <<$pirspiz>><br><<$clitsize>>'
|
|
|
|
|
|
If dounspell = 1:
|
|
|
bodytipe = bedra - talia
|
|
@@ -453,10 +453,10 @@ end
|
|
|
!!Clothing appearance factors to appearance; bonusZ = coat (if cold); PXClo variables, see "clothing"
|
|
|
CloAdjustedBeauty = bonusZ + vneshbase * (PXCloThinness + PXCloTopCut + PXCloSkirtShortness + PXCloPantsShortness) / 750
|
|
|
|
|
|
-!!Appearance factors; hairkoef = very short hair / mopkoef = makeup bonus / legkoef = shaved legs / CloAdjustedBeauty = clothes / hapri = Hair brushed / lipbalmKoef = lip balm / fbreath = freash breath / sweatKoef = sweat / glassvnesh = glasses / dyevmod = hair dye fading
|
|
|
-!!Moved to base calculation in "body_shape"; bimbobeauty = Bimbo bonus; lip = lip size; skin = skin condition; resnic = eyelashes; pcs_eyesize = eyes; bodykoef = hips:waist ratio; zub = missing teeth; vidagebonus = youth
|
|
|
+!!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 = 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; zub = missing teeth; vidagebonus = youth
|
|
|
!!Removed as primary appearance factors; will be eventually used in an NPC preference system instead; tanKoef = suntan
|
|
|
-vnesh = vneshbase + CloAdjustedBeauty + mopkoef + (hapri * 10) + lipbalmKoef + (fbreath * 5) - sweatKoef - glassvnesh - dyevmod - hairkoef - legkoef
|
|
|
+vnesh = vneshbase + CloAdjustedBeauty + mopkoef + (pcs_hairbsh * 10) + lipbalmKoef + (pcs_breath * 5) - sweatKoef - glassvnesh - dyevmod - hairkoef - legkoef
|
|
|
|
|
|
if vnesh >= 200: vnesh = 200 + supnatvnesh
|
|
|
if vnesh < 0: vnesh = 0
|