body 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479
  1. # body
  2. if throat = 0:
  3. thpic = 0
  4. $throat = 'You have a chaste <a href="exec:view''images/body/th0.jpg''">mouth</a>.'
  5. $throattipe = 'absolutely unusual'
  6. elseif throat <= 5:
  7. thpic = 1
  8. $throat = 'You have an inexperienced <a href="exec:view''images/body/th1.jpg''">mouth</a>.'
  9. $throattipe = 'virgin'
  10. elseif throat <= 10:
  11. thpic = 2
  12. $throat = 'Your working mouth leads to a sensitive <a href="exec:view''images/body/th2.jpg''">throat</a>.'
  13. $throattipe = 'sensitive'
  14. elseif throat <= 15:
  15. thpic = 3
  16. $throat = 'You have an experienced mouth and slightly stretched <a href="exec:view''images/body/th3.jpg''">throat</a>.'
  17. $throattipe = 'slightly stretched'
  18. elseif throat <= 25:
  19. thpic = 4
  20. $throat = 'You have a capacious mouth and trained <a href="exec:view''images/body/th4.jpg''">throat</a>.'
  21. $throattipe = 'stretched'
  22. elseif throat <= 35:
  23. thpic = 5
  24. $throat = 'Your deep tunnel of a <a href="exec:view''images/body/th5.jpg''">throat</a> may adopt any member.'
  25. $throattipe = 'tinned'
  26. else
  27. thpic = 6
  28. $throat = 'Your completely absent gag reflex and ravenous <a href="exec:view''images/body/th6.jpg''">throat</a> is like a bottomless pit.'
  29. $throattipe = 'bottomless'
  30. end
  31. if fbreath = 1:$throat += ' Which smelled fresh and minty last time you checked.'
  32. if vagina = 0:
  33. puspic = 0
  34. $vagina = 'Your virgin <a href="exec:view''images/body/vag0.jpg''">pussy</a> still has a membrane.'
  35. $vaginatipe = 'virgin'
  36. elseif vagina <= 5:
  37. puspic = 1
  38. $vagina = 'Your <a href="exec:view''images/body/vag1.jpg''">pussy</a> has a tiny hole.'
  39. $vaginatipe = 'narrow'
  40. elseif vagina <= 10:
  41. puspic = 2
  42. $vagina = 'Your closed, similar to a slit <a href="exec:view''images/body/vag2.jpg''">vagina</a>.'
  43. $vaginatipe = 'close'
  44. elseif vagina <= 15:
  45. puspic = 3
  46. $vagina = 'You have a slightly stretched, elastic <a href="exec:view''images/body/vag3.jpg''">vagina</a>.'
  47. $vaginatipe = 'tight'
  48. elseif vagina <= 25:
  49. puspic = 4
  50. $vagina = 'You have a well-developed <a href="exec:view''images/body/vag4.jpg''">vagina</a>.'
  51. $vaginatipe = 'developed'
  52. elseif vagina <= 35:
  53. puspic = 5
  54. $vagina = 'Between your legs and unable to close, you have a hefty <a href="exec:view''images/body/vag5.jpg''">tunnel</a>.'
  55. $vaginatipe = 'broken-down'
  56. else
  57. puspic = 6
  58. $vagina = 'The fact is, in place of a pussy, you have a <a href="exec:view''images/body/vag6.jpg''">well</a> as deep as the Mariana Trench.'
  59. $vaginatipe = 'dimensionless'
  60. end
  61. if analplugIN = 0:
  62. if anus = 0:
  63. anpic = 0
  64. $anus = 'You have a virgin <a href="exec:view''images/body/0.jpg''">anus</a>.'
  65. elseif anus <= 5:
  66. anpic = 1
  67. $anus = 'Your <a href="exec:view''images/body/1.jpg''">anus</a> is barely used, and looking at it noone would know it had used for sex.'
  68. elseif anus <= 10:
  69. anpic = 2
  70. $anus = 'Your <a href="exec:view''images/body/2.jpg''">anus</a> has the shape of an asterisk.'
  71. elseif anus <= 15:
  72. anpic = 3
  73. $anus = 'Your <a href="exec:view''images/body/3.jpg''">anus</a> is now slightly parted, it has been used quite often.'
  74. elseif anus <= 25:
  75. anpic = 4
  76. $anus = 'Your <a href="exec:view''images/body/4.jpg''">anus</a> look like a wide hole, anyone would definitely think that the only thing you do is anal sex.'
  77. elseif anus <= 35:
  78. anpic = 5
  79. $anus = 'Your <a href="exec:view''images/body/5.jpg''">anus</a> doesn''t fully close on its own anymore. You could put a fist through it and it wouldn''t stretch at all.'
  80. else
  81. anpic = 6
  82. $anus = 'Your <a href="exec:view''images/body/6.jpg''">anus</a> is almost completely wrecked. Even with conscious effort it''s hard to close it.' & $anustipe = 'destroyed'
  83. end
  84. elseif analplugIN = 1 and tanga = 1:
  85. $anus = 'Your <a href="exec:view''images/body/analplug.jpg''">anus</a> is currently filled with your butt plug.'
  86. elseif analplugIN = 1 and tanga = 0:
  87. if pirsG = 1 and pirsGL = 1:
  88. $anus = 'Your <a href="exec:view''images/picb/analplugpirscligub.jpg''">anus</a> is currently filled with your butt plug.'
  89. elseif pirsG ! 1 and pirsGL = 1:
  90. $anus = 'Your <a href="exec:view''images/picb/analplugpirsclit.jpg''">anus</a> is currently filled with your butt plug.'
  91. elseif pirsG = 1 and pirsGL ! 1:
  92. $anus = 'Your <a href="exec:view''images/picb/analplugpirsring.jpg''">anus</a> is currently filled with your butt plug.'
  93. else
  94. $anus = 'Your <a href="exec:view''images/picb/analplugnotanga.jpg''">anus</a> is currently filled with your butt plug.'
  95. end
  96. end
  97. !!!!!!!!!!!!!!!!
  98. !!!!!SIZE AND WEIGHT!!!
  99. !!!!!!!!!!!!!!!!
  100. if dounspell = 0:
  101. strenbuf = stren / 2
  102. vitalbuf = vital / 2
  103. vmeat = (strenbuf + vitalbuf) / 8
  104. vfat = salo / 10
  105. Kves = vmeat + vfat
  106. krost = rost - 130
  107. ves = Kves + krost - (agilbuf / 10)
  108. talia = ves - (agilbuf / 10)
  109. grudi = talia + 10 + vfat + silicone + nbsize
  110. grutal = talia
  111. bedra = talia + 15 + (vmeat / 2) + vfat
  112. titK = grudi - talia
  113. if (bedra - talia) > 45 and musle < salo:
  114. if ves < 70:koefvesbt = 0
  115. if ves >= 70:koefvesbt = ves - 70
  116. koefbt = koefvesbt + ((bedra - talia) - 45)
  117. talia += koefbt
  118. end
  119. if titK <= 10:
  120. tits = 0
  121. $titsize = 'A cup'
  122. elseif titK <= 15:
  123. tits = 1
  124. $titsize = 'B cup'
  125. elseif titK <= 20:
  126. tits = 2
  127. $titsize = 'C cup'
  128. elseif titK <= 25:
  129. tits = 3
  130. $titsize = 'D cup'
  131. elseif titK <= 30:
  132. tits = 4
  133. $titsize = 'E cup'
  134. elseif titK <= 35:
  135. tits = 5
  136. $titsize = 'F cup'
  137. elseif titK <= 40:
  138. tits = 6
  139. $titsize = 'G cup'
  140. elseif titK <= 45:
  141. tits = 7
  142. $titsize = 'H cup'
  143. elseif titK <= 50:
  144. tits = 8
  145. $titsize = 'I cup'
  146. elseif titK <= 55:
  147. tits = 9
  148. $titsize = 'J cup'
  149. else
  150. tits = 10
  151. $titsize = 'K cup'
  152. end
  153. !!!
  154. else
  155. fat = 0
  156. bedra = bedraDoun
  157. talia = TaliaDoun
  158. grudi = talia + 14 + silicone + nbsize
  159. ves = TaliaDoun
  160. titK = grudi - talia
  161. if titK <= 10:
  162. tits = 0
  163. $titsize = 'A cup'
  164. elseif titK <= 15:
  165. tits = 1
  166. $titsize = 'B cup'
  167. elseif titK <= 20:
  168. tits = 2
  169. $titsize = 'C cup'
  170. elseif titK <= 25:
  171. tits = 3
  172. $titsize = 'D cup'
  173. elseif titK <= 30:
  174. tits = 4
  175. $titsize = 'E cup'
  176. elseif titK <= 35:
  177. tits = 5
  178. $titsize = 'F cup'
  179. elseif titK <= 40:
  180. tits = 6
  181. $titsize = 'G cup'
  182. elseif titK <= 45:
  183. tits = 7
  184. $titsize = 'H cup'
  185. elseif titK <= 50:
  186. tits = 8
  187. $titsize = 'I cup'
  188. elseif titK <= 55:
  189. tits = 9
  190. $titsize = 'J cup'
  191. else
  192. tits = 10
  193. $titsize = 'K cup'
  194. end
  195. end
  196. !!! Maruda Hair Mod
  197. if hairlength <= 80:
  198. hpigtail = 0
  199. hscrunchw = 0
  200. hpingripw = 0
  201. curly = 0
  202. hbraids = 0
  203. if hairlength <= 30 and hbangs = 1:hbangs = 0
  204. end
  205. if hairlength > 400:
  206. hpingripw = 0
  207. hbraids = 0
  208. end
  209. if hairlength > 400 and hpigtail >= 1:
  210. hscrunchw = 0
  211. hpigtail = 0
  212. end
  213. if hbraids >= 1:
  214. curly = 0
  215. hscrunchw = 0
  216. hpingripw = 0
  217. hbangs = 0
  218. hpigtail = 0
  219. end
  220. if hapri = 0:$hapri = '<b>tangled</b>, you should comb it, to keep it healthy'
  221. if hapri = 1:$hapri = 'neatly arranged'
  222. if curly <= 0:$curly = 'straight, slightly wavy '
  223. if curly > 0:$curly = 'curly '
  224. if hbangs <= 0:$hbangs = ''
  225. if hbangs > 0:$hbangs = ', with a fringe covering your forehead'
  226. if hscrunchw <= 0:$hscrunch = ''
  227. if hscrunchw = 1:$hscrunch = ' A hair-tie holds your hair in place with a ponytail.'
  228. if hpingripw <= 0:$hpingrip = ''
  229. if hpingripw > 0:$hpingrip = 'The Hair-pins holds your hair in place with an updo-hairstyle.'
  230. if hscrunchw <= 0:$hpigtail = ''
  231. if hscrunchw = 2:$hpigtail = ' Two scrunchies holds your hair in place with a twin-tail pigtail style.'
  232. if hbraids <= 0:$hbraids = ''
  233. if hbraids > 0:$hbraids = ' You have your hair beautifully braided.'
  234. if hcol = 0:$hcol = 'black'
  235. if hcol = 1:$hcol = 'brown'
  236. if hcol = 2:$hcol = 'red'
  237. if hcol = 3:$hcol = 'blonde'
  238. if avatar_hair = 1:
  239. $hair = $av_hair
  240. else
  241. 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.'
  242. 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>>.'
  243. 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>>'
  244. 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>>'
  245. 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>>'
  246. 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>>'
  247. end
  248. !!! Maruda Hair Mod
  249. if lip > 4:lip = 4
  250. if lip < 0:lip = 0
  251. if lipbalmstat > 0:
  252. if lip = 0:$lipbalmstat = ' shiny'
  253. if lip = 1:$lipbalmstat = ' shiny'
  254. if lip = 2:$lipbalmstat = ' brilliant and juicy'
  255. if lip = 3:$lipbalmstat = ' juicy'
  256. if lip = 4:$lipbalmstat = ' glossy'
  257. else
  258. $lipbalmstat = ''
  259. end
  260. if pirsA = 1:$pirsA = 'When you are talking to people, they can get a glimpse of your tongue piercing.'
  261. if pirsA ! 1:$pirsA = ''
  262. if pirsB = 1:$pirsB = 'You lower lip is pierced with a ring.'
  263. if pirsB ! 1:$pirsB = ''
  264. if lip = 0:$lip = 'You have thin<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips' & $lip1 = 'thin'
  265. if lip = 1:$lip = 'You have normal<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'soft lips' & $liptalk2 = 'soft lips' & $liptalk3 = 'soft lips' & $lip1 = 'normal'
  266. if lip = 2:$lip = 'You have plump<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips' & $lip1 = 'plump'
  267. if lip = 3:$lip = 'You have big, pouting,<<$lipbalmstat>> full lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'pouting lips' & $liptalk2 = 'pouting lips' & $liptalk3 = 'pouting lips' & $lip1 = 'pouting'
  268. if lip = 4:$lip = 'You have thick<<$lipbalmstat>> lips. <<$pirsB>> <<$pirsA>>' & $liptalk = 'thick lips' & $liptalk2 = 'her thick lips' & $liptalk3 = 'thick lips' & $lip1 = 'large thick'
  269. if tan <= 0:$tan = 'pale'
  270. if tan > 0:$tan = 'tanned'
  271. if skin > 4:skin = 4
  272. if skin < 0:skin = 0
  273. if pirsC = 1:$pirsC = 'Your ears are pierced and you are wearing earrings.'
  274. if pirsC ! 1:$pirsC = ''
  275. if pirsD = 1:$pirsD = 'You have a nosering inserted in your nose.'
  276. if pirsD ! 1:$pirsD = ''
  277. if pirsE = 1:$pirsE = 'Your eyebrow is pierced and a rod is sticking through it.'
  278. if pirsE ! 1:$pirsE = ''
  279. if skin = 0:$skin = 'Your <<$tan>> skin is rough and covered with pimples and blackheads. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'very bad'
  280. if skin = 1:$skin = 'Your <<$tan>> skin rough and has a few pimples. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'bad'
  281. if skin = 2:$skin = 'Your <<$tan>> skin is clear of acne but still slightly rough. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'normal'
  282. if skin = 3:$skin = 'You have <<$tan>>, smooth and well-groomed skin. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'good'
  283. if skin = 4:$skin = 'You have <<$tan>>, very smooth skin, which almost feels like silk, when touching it. <<$pirsC>> <<$pirsD>> <<$pirsE>>' & $skin1 = 'excellent'
  284. if glacol = 0:$glacol = 'brown'
  285. if glacol = 1:$glacol = 'gray'
  286. if glacol = 2:$glacol = 'green'
  287. if glacol = 3:$glacol = 'blue'
  288. if resnic > 2:resnic = 2
  289. if resnic = 0:$resnic = 'with short eyelashes'
  290. if resnic = 1:$resnic = 'normal eyelashes'
  291. if resnic = 2:$resnic = 'with long eyelashes'
  292. if brow = 0 and browper = 0:$brow = 'little neat eyebrows'
  293. if brow > 0 and browper = 0:$brow = 'groomed eyebrows' & brokoef = 1
  294. if browper > 0:$brow = 'permanent tattooed eyebrows' & brokoef = 2
  295. if glass <= 0:$glass = '' & glassvnesh = 0
  296. if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh = 10
  297. !!!CV edition: from glassvnesh = 5 to glassvnesh = 0
  298. if glass = 2:$glass = ' You wear glasses.' & glassvnesh = 0
  299. !!!
  300. if glaraz > 3:glaraz = 3
  301. if glaraz = 0:$glaza = 'You have little <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
  302. if glaraz = 1:$glaza = 'You have a medium-sized <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
  303. if glaraz = 2:$glaza = 'You have large <<$glacol>> eyes <<$resnic>> and <<$brow>>.<<$glass>>.'
  304. if glaraz = 3:$glaza = 'You have a huge <<$glacol>> eyes that almost look like they''re out of anime, <<$resnic>> and <<$brow>>.<<$glass>>'
  305. if mop = 0:$mop = '<b><font color="red">Your makeup is smeared all over your face</font></b>'
  306. if mop = 1:$mop = 'You''re not wearing any kind of makeup'
  307. if mop = 2:$mop = 'Your makeup is very light, just with a very few touch-ups here and there'
  308. if mop = 3:$mop = 'You have "everyday"-like makeup applied'
  309. if mop = 4:$mop = 'You have thick makeup, possible a bit too flashy for daytime wear'
  310. if leghair <= 0:legkoef = 3 & $leghair = 'You have smooth legs.'
  311. if leghair > 0 and leghair <= 2:legkoef = 0 & $leghair = 'You can''t see any hair, but your legs are rough to the touch'
  312. if leghair > 2 and leghair <= 5:legkoef = 0 & $leghair = 'You clearly have visible thin hairs on the legs.'
  313. if leghair > 5:legkoef = 0 & $leghair = 'You have long hair standing out on your legs.'
  314. if pirsG = 1 and pirsGL ! 1:$pirspiz = 'There are several piercings hanging from the lips of your vagina.'
  315. if pirsG ! 1 and pirsGL = 1:$pirspiz = 'A rod is inserted into your clitoris.'
  316. if pirsG = 1 and pirsGL = 1:$pirspiz = 'You have a clitoris piercing and labia rings inserted'
  317. ! WD: Move missing Image ~ "pussy.jpg" from "images\picb" to "images\Body"
  318. if lobok <= 0:lobkoef = 3 & $lobok = 'You have a smoothly <a href="exec:view''images/body/pussy.jpg''">shaved pussy</a>. <<$pirsG>>'
  319. if 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>. <<$pirsG>>'
  320. ! WD: Move missing Image ~ "hpussy.jpg" from "images\picb" to "images\Body"
  321. if lobok > 2:lobkoef = 0 & $lobok = 'You have a full triangle of thick <a href="exec:view''images/body/hpussy.jpg''">pubic hair</a>. <<$pirsG>>'
  322. bodytipe = bedra - talia
  323. if bodytipe < 20:bodykoef = 0
  324. if bodytipe >= 20 and bodytipe < 25:bodykoef = 2
  325. if bodytipe >= 25 and bodytipe < 30:bodykoef = 4
  326. if bodytipe >= 30 and bodytipe < 35:bodykoef = 8
  327. if bodytipe >= 35:bodykoef = 4
  328. if tan > 0:tanKoef = 1
  329. if tan = 0:tanKoef = 0
  330. ! WD: Add braids (Maruda Hair Mod) to bonus to vnesh
  331. if curly > 0 or hbraids > 0:
  332. curlykoef = 1
  333. else
  334. curlykoef = 0
  335. end
  336. if sweat <= 0:
  337. sweatKoef = 0
  338. else
  339. sweatKoef = sweat * 5
  340. end
  341. if lipbalmstat > 0:
  342. lipbalmKoef = 1
  343. else
  344. lipbalmKoef = 0
  345. end
  346. if vidage < 21:vidagebonus = 0
  347. if vidage >= 21 and vidage < 26:vidagebonus = 1
  348. if vidage >= 26 and vidage < 30:vidagebonus = 3
  349. if vidage >= 30 and vidage < 34:vidagebonus = 6
  350. if vidage >= 34 and vidage < 36:vidagebonus = 9
  351. if vidage >= 36 and vidage < 38:vidagebonus = 12
  352. if vidage >= 38 and vidage < 40:vidagebonus = 16
  353. if vidage >= 40 and vidage < 45:vidagebonus = 25
  354. if vidage >= 45:vidagebonus = 50
  355. if age < 18:leghair = -5
  356. CloNaturalBeauty = (3*(9 + curlykoef + lip + tanKoef + skin + mop + resnic + glaraz + bodykoef + legkoef + hapri + bonusZ + lipbalmKoef + fbreath - sweatKoef + vidagebonus - (zub * 2) + tatKeof - glassvnesh + bimbobeauty))
  357. CloBaseBeauty = (CloNaturalBeauty * PXCloThinness) + (CloNaturalBeauty * PXCloTopCut) + (CloNaturalBeauty * PXCloSkirtShortness) + (CloNaturalBeauty * PXCloPantsShortness)
  358. CloAdjustedBeauty = CloBaseBeauty / 2000
  359. !!CV edition: tits and lobkoef (pubic hair) removed from calc, replaced with flat bonus of 9 (6 tits, 3 hair)
  360. !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
  361. !hapri Hair brushed / bonusZ = coat (if cold) / lipbalmKoef = lip balm / fbreath = freash breath / sweatKoef = sweat / vidagebonus = youth / zub = missing teeth / tatKeof = tatoos / glassvnesh = glasses
  362. !bimbobeauty = Bimbo bonus
  363. vnesh = (3*(9 + curlykoef + lip + tanKoef + skin + mop + resnic + glaraz + bodykoef + legkoef + hapri + bonusZ + lipbalmKoef + fbreath - sweatKoef + vidagebonus - (zub * 2) + tatKeof - glassvnesh + bimbobeauty)) + CloAdjustedBeauty
  364. if vnesh < 0:vnesh = 0
  365. if StrongNarkota <= 0:
  366. if SNarkTimes >= 3 and SLomka = 0:SLomka = 1
  367. if Gerpes >= 3 or Sifilis >= 21 or Triper > 2:vnesh = -10
  368. end
  369. if StrongNarkota > 0:
  370. if SLomka > 0:SLomka = 0
  371. manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
  372. end
  373. if vnesh = -10:
  374. $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.'
  375. elseif vnesh < 20:
  376. $vnesh = 'Your looks are terrible. People try to avoid looking and talking to you.'
  377. elseif vnesh < 60:
  378. $vnesh = 'You''re a wallflower. Hardly anyone notices you.'
  379. elseif vnesh < 120:
  380. $vnesh = 'You have good looks. Men and women check you out when they think you aren''t looking.'
  381. elseif vnesh < 200:
  382. $vnesh = 'You have a simply stunning appearence. Other girls are a bit jealous and guys constantly check you out.'
  383. else
  384. $vnesh = 'Your appearence is divine! No one is able to take his or her eyes off of you.'
  385. end
  386. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  387. !!!!!!!!BODY
  388. !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  389. musle = strenbuf + vitalbuf
  390. if musle >= salo:
  391. !!muscular type
  392. if bedra < 60:
  393. $body = 'You are very thin with virtually no fat on your body, your muscles appear through the skin.'
  394. elseif bedra >= 60 and bedra < 70:
  395. $body = 'You are really thin and there is little fat on your body, your muscles appear through the skin.'
  396. elseif bedra >= 70 and bedra < 80:
  397. $body = 'You are and there is little fat on your body, your muscles appear through the skin.'
  398. elseif bedra >= 80 and bedra < 90:
  399. $body = 'You are thin and there is little fat on your body, your muscles appear through the skin.'
  400. elseif bedra >= 90 and bedra < 100:
  401. $body = 'You are thin and there is little fat on your body. Large muscles appear through your skin.'
  402. elseif bedra >= 100 and bedra < 110:
  403. $body = 'You have little fat on your body, Large muscles appear through your skin.'
  404. elseif bedra >= 110 and bedra < 120:
  405. $body = 'You have little fat on your body. Massive muscles appear through your skin.'
  406. elseif bedra >= 120:
  407. $body = 'You have little fat on your body. Massive muscles appear through your skin.'
  408. end
  409. else
  410. !!bold type
  411. if bedra < 60:
  412. $body = 'You are very lean and you have virtually no muscle.'
  413. elseif bedra >= 60 and bedra < 70:
  414. $body = 'You have a very thin body with a small soft booty and you have virtually no muscle.'
  415. elseif bedra >= 70 and bedra < 80:
  416. $body = 'You have a very skinny body.'
  417. elseif bedra >= 80 and bedra < 90:
  418. $body = 'You have a slender body.'
  419. elseif bedra >= 90 and bedra < 100:
  420. $body = 'You have a curvy body.'
  421. elseif bedra >= 100 and bedra < 110:
  422. $body = 'You have a chubby body.'
  423. elseif bedra >= 110 and bedra < 120:
  424. $body = 'You have a plump body.'
  425. elseif bedra >= 120:
  426. $body = 'You are very fat.'
  427. end
  428. end
  429. $fat = $body
  430. --- body ---------------------------------