# body
if throat = 0:
thpic = 0
$throat = 'You have a chaste mouth.'
$throattipe = 'absolutely unusual'
elseif throat <= 5:
thpic = 1
$throat = 'You have an inexperienced mouth.'
$throattipe = 'virgin'
elseif throat <= 10:
thpic = 2
$throat = 'Your working mouth leads to a sensitive throat.'
$throattipe = 'sensitive'
elseif throat <= 15:
thpic = 3
$throat = 'You have an experienced mouth and slightly stretched throat.'
$throattipe = 'slightly stretched'
elseif throat <= 25:
thpic = 4
$throat = 'You have a capacious mouth and trained throat.'
$throattipe = 'stretched'
elseif throat <= 35:
thpic = 5
$throat = 'Your deep tunnel of a throat may adopt any member.'
$throattipe = 'tinned'
else
thpic = 6
$throat = 'Your completely absent gag reflex and ravenous throat is like a bottomless pit.'
$throattipe = 'bottomless'
end
if fbreath = 1:$throat += ' Which smelled fresh and minty last time you checked.'
if vagina = 0:
puspic = 0
$vagina = 'Your virgin pussy still has a membrane.'
$vaginatipe = 'virgin'
elseif vagina <= 5:
puspic = 1
$vagina = 'Your pussy has a tiny hole.'
$vaginatipe = 'narrow'
elseif vagina <= 10:
puspic = 2
$vagina = 'Your closed, similar to a slit vagina.'
$vaginatipe = 'close'
elseif vagina <= 15:
puspic = 3
$vagina = 'You have a slightly stretched, elastic vagina.'
$vaginatipe = 'tight'
elseif vagina <= 25:
puspic = 4
$vagina = 'You have a well-developed vagina.'
$vaginatipe = 'developed'
elseif vagina <= 35:
puspic = 5
$vagina = 'Between your legs and unable to close, you have a hefty tunnel.'
$vaginatipe = 'broken-down'
else
puspic = 6
$vagina = 'The fact is, in place of a pussy, you have a well as deep as the Mariana Trench.'
$vaginatipe = 'dimensionless'
end
if analplugIN = 0:
if anus = 0:
anpic = 0
$anus = 'You have a virgin anus.'
elseif anus <= 5:
anpic = 1
$anus = 'Your anus is barely used, and looking at it noone would know it had used for sex.'
elseif anus <= 10:
anpic = 2
$anus = 'Your anus has the shape of an asterisk.'
elseif anus <= 15:
anpic = 3
$anus = 'Your anus is now slightly parted, it has been used quite often.'
elseif anus <= 25:
anpic = 4
$anus = 'Your anus look like a wide hole, anyone would definitely think that the only thing you do is anal sex.'
elseif anus <= 35:
anpic = 5
$anus = 'Your anus doesn''t fully close on its own anymore. You could put a fist through it and it wouldn''t stretch at all.'
else
anpic = 6
$anus = 'Your anus is almost completely wrecked. Even with conscious effort it''s hard to close it.' & $anustipe = 'destroyed'
end
elseif analplugIN = 1 and tanga = 1:
$anus = 'Your anus is currently filled with your butt plug.'
elseif analplugIN = 1 and tanga = 0:
if pirsG = 1 and pirsGL = 1:
$anus = 'Your anus is currently filled with your butt plug.'
elseif pirsG ! 1 and pirsGL = 1:
$anus = 'Your anus is currently filled with your butt plug.'
elseif pirsG = 1 and pirsGL ! 1:
$anus = 'Your anus is currently filled with your butt plug.'
else
$anus = 'Your anus is currently filled with your butt plug.'
end
end
!!!!!!!!!!!!!!!!
!!!!!SIZE AND WEIGHT!!!
!!!!!!!!!!!!!!!!
if dounspell = 0:
strenbuf = stren / 2
vitalbuf = vital / 2
vmeat = (strenbuf + vitalbuf) / 8
vfat = salo / 10
Kves = vmeat + vfat
krost = rost - 130
ves = Kves + krost - (agilbuf / 10)
talia = ves - (agilbuf / 10)
grudi = talia + 10 + vfat + silicone + nbsize
grutal = talia
bedra = talia + 15 + (vmeat / 2) + vfat
titK = grudi - talia
if (bedra - talia) > 45 and musle < salo:
if ves < 70:koefvesbt = 0
if ves >= 70:koefvesbt = ves - 70
koefbt = koefvesbt + ((bedra - talia) - 45)
talia += koefbt
end
if titK <= 10:
tits = 0
$titsize = 'A cup'
elseif titK <= 15:
tits = 1
$titsize = 'B cup'
elseif titK <= 20:
tits = 2
$titsize = 'C cup'
elseif titK <= 25:
tits = 3
$titsize = 'D cup'
elseif titK <= 30:
tits = 4
$titsize = 'E cup'
elseif titK <= 35:
tits = 5
$titsize = 'F cup'
elseif titK <= 40:
tits = 6
$titsize = 'G cup'
elseif titK <= 45:
tits = 7
$titsize = 'H cup'
elseif titK <= 50:
tits = 8
$titsize = 'I cup'
elseif titK <= 55:
tits = 9
$titsize = 'J cup'
else
tits = 10
$titsize = 'K cup'
end
!!!
else
fat = 0
bedra = bedraDoun
talia = TaliaDoun
grudi = talia + 14 + silicone + nbsize
ves = TaliaDoun
titK = grudi - talia
if titK <= 10:
tits = 0
$titsize = 'A cup'
elseif titK <= 15:
tits = 1
$titsize = 'B cup'
elseif titK <= 20:
tits = 2
$titsize = 'C cup'
elseif titK <= 25:
tits = 3
$titsize = 'D cup'
elseif titK <= 30:
tits = 4
$titsize = 'E cup'
elseif titK <= 35:
tits = 5
$titsize = 'F cup'
elseif titK <= 40:
tits = 6
$titsize = 'G cup'
elseif titK <= 45:
tits = 7
$titsize = 'H cup'
elseif titK <= 50:
tits = 8
$titsize = 'I cup'
elseif titK <= 55:
tits = 9
$titsize = 'J cup'
else
tits = 10
$titsize = 'K cup'
end
end
!!! Maruda Hair Mod
if hairlength <= 80:
hpigtail = 0
hscrunchw = 0
hpingripw = 0
curly = 0
hbraids = 0
if hairlength <= 30 and hbangs = 1:hbangs = 0
end
if hairlength > 400:
hpingripw = 0
hbraids = 0
end
if hairlength > 400 and hpigtail >= 1:
hscrunchw = 0
hpigtail = 0
end
if hbraids >= 1:
curly = 0
hscrunchw = 0
hpingripw = 0
hbangs = 0
hpigtail = 0
end
if hapri = 0:$hapri = 'tangled, you should comb it, to keep it healthy'
if hapri = 1:$hapri = 'neatly arranged'
if curly <= 0:$curly = 'straight, slightly wavy '
if curly > 0:$curly = 'curly '
if hbangs <= 0:$hbangs = ''
if hbangs > 0:$hbangs = ', with a fringe covering your forehead'
if hscrunchw <= 0:$hscrunch = ''
if hscrunchw = 1:$hscrunch = ' A hair-tie holds your hair in place with a ponytail.'
if hpingripw <= 0:$hpingrip = ''
if hpingripw > 0:$hpingrip = 'The Hair-pins holds your hair in place with an updo-hairstyle.'
if hscrunchw <= 0:$hpigtail = ''
if hscrunchw = 2:$hpigtail = ' Two scrunchies holds your hair in place with a twin-tail pigtail style.'
if hbraids <= 0:$hbraids = ''
if hbraids > 0:$hbraids = ' You have your hair beautifully braided.'
if hcol = 0:$hcol = 'black'
if hcol = 1:$hcol = 'brown'
if hcol = 2:$hcol = 'red'
if hcol = 3:$hcol = 'blonde'
if avatar_hair = 1:
$hair = $av_hair
else
if hairlength <= 30:$hair = 'You have very short <<$hcol>> hair. It doesn''t cover your ears, with some masculine complexions, someone might mistake you for a man. Nonetheless, some people like this style, as it''s easy to take care off.'
if hairlength > 30 and hairlength <= 80:$hair = 'You have short <<$hcol>> hair, which may cover your ears to the the earlobes. It''s a modern, yet classy, hairstyle. Currently your hair is <<$hapri>>.'
if hairlength > 80 and hairlength <= 160:$hair = 'You have <<$curly>><<$hcol>> 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 hairlength > 160 and hairlength <= 260:$hair = 'You have <<$curly>><<$hcol>> hair<<$hbangs>>. Your hair reaches your shoulders, with several strains going beyond. Currently your hair is <<$hapri>>.<<$hscrunch>><<$hpingrip>><<$hbraids>><<$hpigtail>>'
if hairlength > 260 and hairlength <= 400:$hair = 'You have <<$curly>><<$hcol>> hair<<$hbangs>>. As your hair reaches your bra-strapline, 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 hairlength > 400:$hair = 'You have very long <<$hcol>> hair<<$hbangs>>, that goes beyond your bra-strapline. Rapunzel would be jealous. Your hair is currently <<$hapri>>.<<$hscrunch>><<$hbraids>>'
end
!!! Maruda Hair Mod
if lip > 4:lip = 4
if lip < 0: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'
else
$lipbalmstat = ''
end
if pirsA = 1:$pirsA = 'When you are talking to people, they can get a glimpse of your tongue piercing.'
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 tan <= 0:$tan = 'pale'
if tan > 0:$tan = 'tanned'
if skin > 4:skin = 4
if skin < 0:skin = 0
if pirsC = 1:$pirsC = 'Your ears are pierced and you are wearing earrings.'
if pirsC ! 1:$pirsC = ''
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 skin = 0:$skin = 'Your <<$tan>> skin is rough and covered with pimples and blackheads. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'very bad'
if skin = 1:$skin = 'Your <<$tan>> skin rough and has a few pimples. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'bad'
if skin = 2:$skin = 'Your <<$tan>> skin is clear of acne but still slightly rough. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'normal'
if skin = 3:$skin = 'You have <<$tan>>, smooth and well-groomed skin. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'good'
if skin = 4:$skin = 'You have <<$tan>>, very smooth skin, which almost feels like silk, when touching it. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'excellent'
if glacol = 0:$glacol = 'brown'
if glacol = 1:$glacol = 'gray'
if glacol = 2:$glacol = 'green'
if glacol = 3:$glacol = '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 brow = 0 and browper = 0:$brow = 'little neat eyebrows'
if brow > 0 and browper = 0:$brow = 'groomed eyebrows' & brokoef = 1
if browper > 0:$brow = 'permanent tattooed eyebrows' & brokoef = 2
if glass <= 0:$glass = '' & glassvnesh = 0
if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh = 10
!!!CV edition: from glassvnesh = 5 to glassvnesh = 0
if glass = 2:$glass = ' You wear glasses.' & glassvnesh = 0
!!!
if glaraz > 3:glaraz = 3
if glaraz = 0:$glaza = 'You have little <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
if glaraz = 1:$glaza = 'You have a medium-sized <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
if glaraz = 2:$glaza = 'You have large <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
if glaraz = 3:$glaza = 'You have a huge <<$glacol>> eyes that almost look like they''re out of anime, <<$resnic>> and <<$brow>>.<<$glass>>'
if mop = 0:$mop = 'Your makeup is smeared all over your face'
if mop = 1:$mop = 'You''re not wearing any kind of makeup'
if mop = 2:$mop = 'Your makeup is very light, just with a very few touch-ups here and there'
if mop = 3:$mop = 'You have "everyday"-like makeup applied'
if mop = 4:$mop = 'You have thick makeup, possible a bit too flashy for daytime wear'
if leghair <= 0:legkoef = 3 & $leghair = 'You have smooth legs.'
if leghair > 0 and leghair <= 2:legkoef = 0 & $leghair = 'You can''t see any hair, but your legs are rough to the touch'
if leghair > 2 and leghair <= 5:legkoef = 0 & $leghair = 'You clearly have visible thin hairs on the legs.'
if leghair > 5:legkoef = 0 & $leghair = 'You have long hair standing out on your legs.'
if pirsG = 1 and pirsGL ! 1:$pirspiz = 'There are several piercings hanging from the lips of your vagina.'
if pirsG ! 1 and pirsGL = 1:$pirspiz = 'A rod is inserted into your clitoris.'
if pirsG = 1 and pirsGL = 1:$pirspiz = 'You have a clitoris piercing and labia rings inserted'
! WD: Move missing Image ~ "pussy.jpg" from "images\picb" to "images\Body"
if lobok <= 0:lobkoef = 3 & $lobok = 'You have a smoothly shaved pussy. <<$pirsG>>'
if lobok > 0 and lobok <= 2:lobkoef = 0 & $lobok = 'You have light but visible hair above your crotch. <<$pirsG>>'
! 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 pubic hair. <<$pirsG>>'
bodytipe = bedra - talia
if bodytipe < 20:bodykoef = 0
if bodytipe >= 20 and bodytipe < 25:bodykoef = 2
if bodytipe >= 25 and bodytipe < 30:bodykoef = 4
if bodytipe >= 30 and bodytipe < 35:bodykoef = 8
if bodytipe >= 35:bodykoef = 4
if tan > 0:tanKoef = 1
if tan = 0:tanKoef = 0
! WD: Add braids (Maruda Hair Mod) to bonus to vnesh
if curly > 0 or hbraids > 0:
curlykoef = 1
else
curlykoef = 0
end
if sweat <= 0:
sweatKoef = 0
else
sweatKoef = sweat * 5
end
if lipbalmstat > 0:
lipbalmKoef = 1
else
lipbalmKoef = 0
end
if vidage < 21:vidagebonus = 0
if vidage >= 21 and vidage < 26:vidagebonus = 1
if vidage >= 26 and vidage < 30:vidagebonus = 3
if vidage >= 30 and vidage < 34:vidagebonus = 6
if vidage >= 34 and vidage < 36:vidagebonus = 9
if vidage >= 36 and vidage < 38:vidagebonus = 12
if vidage >= 38 and vidage < 40:vidagebonus = 16
if vidage >= 40 and vidage < 45:vidagebonus = 25
if vidage >= 45:vidagebonus = 50
if age < 18:leghair = -5
CloNaturalBeauty = (3*(9 + curlykoef + lip + tanKoef + skin + mop + resnic + glaraz + bodykoef + legkoef + hapri + bonusZ + lipbalmKoef + fbreath - sweatKoef + vidagebonus - (zub * 2) + tatKeof - glassvnesh + bimbobeauty))
CloBaseBeauty = (CloNaturalBeauty * PXCloThinness) + (CloNaturalBeauty * PXCloTopCut) + (CloNaturalBeauty * PXCloSkirtShortness) + (CloNaturalBeauty * PXCloPantsShortness)
CloAdjustedBeauty = CloBaseBeauty / 2000
!!CV edition: tits and lobkoef (pubic hair) removed from calc, replaced with flat bonus of 9 (6 tits, 3 hair)
!curlykoef = perm / lip = lip size / tanKoef = suntan / skin = skin condition / mop = makeup / resnic = eyelashes / glaraz = eyes / bodykoef = hips:waist ratio / legkoef = shaved legs / odevnesh = clothes
!hapri Hair brushed / bonusZ = coat (if cold) / lipbalmKoef = lip balm / fbreath = freash breath / sweatKoef = sweat / vidagebonus = youth / zub = missing teeth / tatKeof = tatoos / glassvnesh = glasses
!bimbobeauty = Bimbo bonus
vnesh = (3*(9 + curlykoef + lip + tanKoef + skin + mop + resnic + glaraz + bodykoef + legkoef + hapri + bonusZ + lipbalmKoef + fbreath - sweatKoef + vidagebonus - (zub * 2) + tatKeof - glassvnesh + bimbobeauty)) + CloAdjustedBeauty
if vnesh < 0:vnesh = 0
if StrongNarkota <= 0:
if SNarkTimes >= 3 and SLomka = 0:SLomka = 1
if Gerpes >= 3 or Sifilis >= 21 or Triper > 2:vnesh = -10
end
if StrongNarkota > 0:
if SLomka > 0:SLomka = 0
manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
end
if vnesh = -10:
$vnesh = 'Your looks are even worse than terrible. It''s terribad. No one wants to see or talk to you and people avoid you at any cost.'
elseif vnesh < 20:
$vnesh = 'Your looks are terrible. People try to avoid looking and talking to you.'
elseif vnesh < 60:
$vnesh = 'You''re a wallflower. Hardly anyone notices you.'
elseif vnesh < 120:
$vnesh = 'You have good looks. Men and women check you out when they think you aren''t looking.'
elseif vnesh < 200:
$vnesh = 'You have a simply stunning appearence. Other girls are a bit jealous and guys constantly check you out.'
else
$vnesh = 'Your appearence is divine! No one is able to take his or her eyes off of you.'
end
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!BODY
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
musle = strenbuf + vitalbuf
if musle >= salo:
!!muscular type
if bedra < 60:
$body = 'You are very thin with virtually no fat on your body, your muscles appear through the skin.'
elseif bedra >= 60 and bedra < 70:
$body = 'You are really thin and there is little fat on your body, your muscles appear through the skin.'
elseif bedra >= 70 and bedra < 80:
$body = 'You are and there is little fat on your body, your muscles appear through the skin.'
elseif bedra >= 80 and bedra < 90:
$body = 'You are thin and there is little fat on your body, your muscles appear through the skin.'
elseif bedra >= 90 and bedra < 100:
$body = 'You are thin and there is little fat on your body. Large muscles appear through your skin.'
elseif bedra >= 100 and bedra < 110:
$body = 'You have little fat on your body, Large muscles appear through your skin.'
elseif bedra >= 110 and bedra < 120:
$body = 'You have little fat on your body. Massive muscles appear through your skin.'
elseif bedra >= 120:
$body = 'You have little fat on your body. Massive muscles appear through your skin.'
end
else
!!bold type
if bedra < 60:
$body = 'You are very lean and you have virtually no muscle.'
elseif bedra >= 60 and bedra < 70:
$body = 'You have a very thin body with a small soft booty and you have virtually no muscle.'
elseif bedra >= 70 and bedra < 80:
$body = 'You have a very skinny body.'
elseif bedra >= 80 and bedra < 90:
$body = 'You have a slender body.'
elseif bedra >= 90 and bedra < 100:
$body = 'You have a curvy body.'
elseif bedra >= 100 and bedra < 110:
$body = 'You have a chubby body.'
elseif bedra >= 110 and bedra < 120:
$body = 'You have a plump body.'
elseif bedra >= 120:
$body = 'You are very fat.'
end
end
$fat = $body
--- body ---------------------------------