UnitAppearance.qsrc 43 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551
  1. # UnitAppearance
  2. if $ARGS[0] = '':
  3. unitDisplayType = ARGS[1]
  4. unitRowType = ARGS[2]
  5. *clr
  6. 'Hotcat'
  7. '<table>'
  8. gs 'UnitAppearance', 'GenerateSvetas'
  9. '</table>'
  10. end
  11. if $ARGS[0] = 'gashtest':
  12. end
  13. if $ARGS[0] = 'GenRow':
  14. if unitDisplayType = 0:
  15. if unitRowType = 0:
  16. '<tr><td align="left"><<$ARGS[1]>></td><td align="right"><<unitHotcat>></td></td><td align="right"><<unitpcs_apprnc>></td><td align="right"><<unitbmi_calc>></td><td align="right"><<unitbodykoef>></td><td align="right"><<unitHeadBonus>></td><td align="right"><<unitAttributeBonus>></td><td align="right"><<unitclothingbonus>></td><td align="right"><<unitAccessoriesBonus>></td><td align="right"><<unitGroomingBonus>></td><td align="right"><<unitGroomingPenalty>></td><td align="right"><<unitpcs_apprncbase>></tr>'
  17. else
  18. '<tr><td align="left"><<$ARGS[1]>></td><td align="right"><<unitclothingbonus1>></td><td align="right"><<unitclothingbonus2>></td><td align="right"><<unitclothingbonus3>></td><td align="right"><<unitclothingbonus4>></td><td align="right"><<unitclothingbonus5>></td><td align="right"><<unitclothingbonus6>></td><td align="right"><<unitclothingbonus7>></td><td align="right"><<unitclothingbonusnude>></td></tr>'
  19. end
  20. else
  21. '<<$ARGS[1]>>,<<unitHotcat>>,<<unitpcs_apprnc>>,<<unitbmi_calc>>,<<unitbodykoef>>,<<unitHeadBonus>>,<<unitAttributeBonus>>,<<unitclothingbonus>>,<<unitAccessoriesBonus>>,<<unitGroomingBonus>>,<<unitGroomingPenalty>>,<<unitpcs_apprncbase>>'
  22. end
  23. end
  24. if $ARGS[0] = 'GenRowBreak':
  25. if unitDisplayType = 0:
  26. if unitRowType = 0:
  27. '<tr><th align="left"><<$ARGS[1]>></th><th align="right">hotcat</th><th align="right">pcs_apprnc</th><th align="right">bmi</th><th>bodykoef</th><th align="right">HeadBonus</th><th align="right">AttributeBonus</th><th align="right">clothingbonus</th><th align="right">AccessoriesBonus</th><th align="right">GroomingBonus</th><th align="right">GroomingPenalty</th><th align="right">pcs_apprncbase</th></tr>'
  28. else
  29. '<tr><th align="left"><<$ARGS[1]>></th><th align="right">clothingbonus Q1</th></th><th align="right">clothingbonus Q2</th></th><th align="right">clothingbonus Q3</th></th><th align="right">clothingbonus Q4</th></th><th align="right">clothingbonus Q5</th></th><th align="right">clothingbonus Q6</th></th><th align="right">clothingbonus Q7</th><th align="right">clothingbonus Nude</th></tr>'
  30. end
  31. else
  32. '<<$ARGS[1]>>,hotcat,pcs_apprnc,bmi,bodykoef,HeadBonus,AttributeBonus,clothingbonus,AccessoriesBonus,GroomingBonus,GroomingPenalty,pcs_apprncbase'
  33. end
  34. end
  35. if $ARGS[0] = 'calcHotcat':
  36. unitbmi_calc = FUNC('body_shape', 'bmicalc', unitsalo, unitpcs_hgt)
  37. unitbodykoef = FUNC('body_shape', 'setbodykoef', unitbmi_calc, unitstrenbuf, unitsalocatnow, unitvofat)
  38. unitHeadBonus = FUNC('body_shape', 'calcHeadBonus', unitpcs_lashes, unitpcs_eyesize, unitpcs_lip, unitpcs_teeth, unitbmi_calc)
  39. unitAttributeBonus = FUNC('body_shape', 'calcAttributeBonus', unitpcs_agil, unitpcs_vital, unitbmi_calc)
  40. unitpcs_apprncbase = FUNC('body_shape', 'basebeautycalc2', unitResetBase, unitvidage, unitpcs_skin, unitbodykoef, unitHeadBonus, unitAttributeBonus, unitpcs_apprncbase)
  41. unitclothingbonus = FUNC('body', 'calcClothesBonus', unitPXCloThinness, unitPXCloTopCut, unitPXCloBottomShortness, unitPCloQuality, $unitclothingworntype, unitbmi_calc)
  42. unitAccessoriesBonus = FUNC('body', 'calcAccessoriesBonus', unitbonusZ, unitPShoQuality, $unitpantyworntype, $unitbraworntype)
  43. unitGroomingBonus = FUNC('body', 'calcGroomingBonus', unitpcs_lipbalm, unitmopkoef, unitpcs_hairbsh, unitpcs_breath, unitdeodorant_on, unitbmi_calc)
  44. unitGroomingPenalty = FUNC('body', 'calcGroomingPenalty', unitpcs_hairlng, unitpcs_sweat, unitglassvnesh, unitdyevmod, unitlegkoef)
  45. unitHotcat = FUNC('body', 'calcHotcat', unitpcs_apprncbase, unitsupnatvnesh, unitclothingbonus, unitAccessoriesBonus, unitGroomingBonus, unitGroomingPenalty)
  46. !!use value without the cap as what gets returned in temppcs_apprnc is capped at 200
  47. unitpcs_apprnc = temppcs_maxapprnc & killvar 'temppcs_apprnc' & killvar 'temppcs_maxapprnc'
  48. if unitRowType = 0: gs 'UnitAppearance', 'GenRow', $ARGS[1]
  49. end
  50. if $ARGS[0] = 'headbonus':
  51. *clr
  52. 'HeadBonus'
  53. '<table>'
  54. '<tr>
  55. <th>headbonus</th>
  56. <th>pcs_lashes</th>
  57. <th>pcs_eyesize</th>
  58. <th>pcs_lip</th>
  59. <th>pcs_teeth</th>
  60. </tr>'
  61. gs 'UnitAppearance', 'HeadBonusCalc'
  62. '</table>'
  63. end
  64. if $ARGS[0] = 'HeadBonusCalc':
  65. gs 'UnitAppearance', 'GenHeadRow', 5,3,3,-1
  66. gs 'UnitAppearance', 'GenHeadRow', 4,3,4,-1
  67. gs 'UnitAppearance', 'GenHeadRow', 3,2,2,0
  68. gs 'UnitAppearance', 'GenHeadRow', 2,2,2,0
  69. gs 'UnitAppearance', 'GenHeadRow', 1,1,1,1
  70. gs 'UnitAppearance', 'GenHeadRow', 0,0,0,3
  71. end
  72. if $ARGS[0] = 'GenHeadRow':
  73. unitHeadBonus = FUNC('body_shape', 'calcHeadBonus', ARGS[1], ARGS[2], ARGS[3], ARGS[4])
  74. '<tr>'
  75. '<td><<unitHeadBonus>></td>'
  76. '<td><<ARGS[1]>></td>'
  77. '<td><<ARGS[2]>></td>'
  78. '<td><<ARGS[3]>></td>'
  79. '<td><<ARGS[4]>></td>'
  80. '</tr>'
  81. end
  82. if $ARGS[0] = 'attributebonus':
  83. *clr
  84. 'AttributeBonus'
  85. '<table>'
  86. '<tr>
  87. <th>attributebonus</th>
  88. <th>pcs_agil</th>
  89. <th>pcs_vital</th>
  90. </tr>'
  91. gs 'UnitAppearance', 'AttribBonusCalc'
  92. '</table>'
  93. end
  94. if $ARGS[0] = 'AttribBonusCalc':
  95. gs 'UnitAppearance', 'GenAttribRow', 100,100
  96. gs 'UnitAppearance', 'GenAttribRow', 80,80
  97. gs 'UnitAppearance', 'GenAttribRow', 60,60
  98. gs 'UnitAppearance', 'GenAttribRow', 40,40
  99. gs 'UnitAppearance', 'GenAttribRow', 20,20
  100. gs 'UnitAppearance', 'GenAttribRow', 0,0
  101. end
  102. if $ARGS[0] = 'GenAttribRow':
  103. unitAttribBonus = FUNC('body_shape', 'calcAttributeBonus', ARGS[1], ARGS[2])
  104. '<tr>'
  105. '<td><<unitAttribBonus>></td>'
  106. '<td><<ARGS[1]>></td>'
  107. '<td><<ARGS[2]>></td>'
  108. '</tr>'
  109. end
  110. if $ARGS[0] = 'GenerateSvetas':
  111. $svetadesc = 'Current Sveta'
  112. unitsalo = salo
  113. unitpcs_hgt = pcs_hgt
  114. unitstrenbuf = strenbuf
  115. unitsalocatnow = salocatnow
  116. unitvofat = vofat
  117. unitpcs_lashes = pcs_lashes
  118. unitpcs_eyesize = pcs_eyesize
  119. unitpcs_lip = pcs_lip
  120. unitpcs_teeth = pcs_teeth
  121. unitpcs_agil = pcs_agil
  122. unitpcs_vital = pcs_vital
  123. unitvidage = vidage
  124. unitpcs_skin = pcs_skin
  125. unitPXCloThinness = PXCloThinness
  126. unitPXCloTopCut = PXCloTopCut
  127. unitPXCloBottomShortness = PXCloBottomShortness
  128. unitPCloQuality = PCloQuality
  129. $unitclothingworntype = $clothingworntype
  130. unitbonusZ = bonusZ
  131. unitPShoQuality = PShoQuality
  132. $unitpantyworntype = $pantyworntype
  133. $unitbraworntype = $braworntype
  134. unitpcs_lipbalm = pcs_lipbalm
  135. unitmopkoef = mopkoef
  136. unitpcs_hairbsh = pcs_hairbsh
  137. unitpcs_breath = pcs_breath
  138. unitdeodorant_on = deodorant_on
  139. unitpcs_hairlng = pcs_hairlng
  140. unitpcs_sweat = pcs_sweat
  141. unitglassvnesh = glassvnesh
  142. unitdyevmod = dyevmod
  143. unitlegkoef = legkoef
  144. unitsupnatvnesh = supnatvnesh
  145. unitpcs_apprncbase = pcs_apprncbase
  146. unitResetBase = 0
  147. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  148. $svetadesc = 'Queen Nerd Start'
  149. unitsalo = 103
  150. unitpcs_hgt = 170
  151. unitstrenbuf = 30
  152. unitsalocatnow = 5
  153. unitvofat = 0
  154. unitpcs_lashes = 1
  155. unitpcs_eyesize = 3
  156. unitpcs_lip = 2
  157. unitpcs_teeth = 0
  158. unitpcs_agil = 30
  159. unitpcs_vital = 30
  160. unitvidage = 16
  161. unitpcs_skin = 50
  162. unitPXCloThinness = 300
  163. unitPXCloTopCut = 200
  164. unitPXCloBottomShortness = 250
  165. unitPCloQuality = 1
  166. $unitclothingworntype = 'cheap'
  167. unitbonusZ = 0
  168. unitPShoQuality = 0
  169. $unitpantyworntype = 'cheap'
  170. $unitbraworntype = 'cheap'
  171. unitpcs_lipbalm = 0
  172. unitmopkoef = 0
  173. unitpcs_hairbsh = 1
  174. unitpcs_breath = 0
  175. unitdeodorant_on = 0
  176. unitpcs_hairlng = 300
  177. unitpcs_sweat = 0
  178. unitglassvnesh = 0
  179. unitdyevmod = 0
  180. unitlegkoef = 9
  181. unitsupnatvnesh = 0
  182. unitpcs_apprncbase = 0
  183. unitResetBase = 1
  184. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  185. $svetadesc = 'Good Student Start'
  186. unitsalo = 161
  187. unitpcs_hgt = 170
  188. unitstrenbuf = 30
  189. unitsalocatnow = 8
  190. unitvofat = 10
  191. unitpcs_lashes = 0
  192. unitpcs_eyesize = 1
  193. unitpcs_lip = 1
  194. unitpcs_teeth = 0
  195. unitpcs_agil = 30
  196. unitpcs_vital = 30
  197. unitvidage = 16
  198. unitpcs_skin = 20
  199. unitPXCloThinness = 200
  200. unitPXCloTopCut = 100
  201. unitPXCloBottomShortness = 100
  202. unitPCloQuality = 1
  203. $unitclothingworntype = 'cheap'
  204. unitbonusZ = 0
  205. unitPShoQuality = 0
  206. $unitpantyworntype = 'cheap'
  207. $unitbraworntype = 'cheap'
  208. unitpcs_lipbalm = 0
  209. unitmopkoef = 0
  210. unitpcs_hairbsh = 1
  211. unitpcs_breath = 0
  212. unitdeodorant_on = 0
  213. unitpcs_hairlng = 200
  214. unitpcs_sweat = 0
  215. unitglassvnesh = 10
  216. unitdyevmod = 0
  217. unitlegkoef = 9
  218. unitsupnatvnesh = 0
  219. unitpcs_apprncbase = 0
  220. unitResetBase = 1
  221. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  222. $svetadesc = 'Computer Geek Start'
  223. unitsalo = 132
  224. unitpcs_hgt = 170
  225. unitstrenbuf = 30
  226. unitsalocatnow = 7
  227. unitvofat = 3
  228. unitpcs_lashes = 0
  229. unitpcs_eyesize = 1
  230. unitpcs_lip = 1
  231. unitpcs_teeth = 0
  232. unitpcs_agil = 30
  233. unitpcs_vital = 30
  234. unitvidage = 16
  235. unitpcs_skin = 30
  236. unitPXCloThinness = 300
  237. unitPXCloTopCut = 200
  238. unitPXCloBottomShortness = 250
  239. unitPCloQuality = 1
  240. $unitclothingworntype = 'cheap'
  241. unitbonusZ = 0
  242. unitPShoQuality = 0
  243. $unitpantyworntype = 'cheap'
  244. $unitbraworntype = 'cheap'
  245. unitpcs_lipbalm = 0
  246. unitmopkoef = 0
  247. unitpcs_hairbsh = 1
  248. unitpcs_breath = 0
  249. unitdeodorant_on = 0
  250. unitpcs_hairlng = 120
  251. unitpcs_sweat = 0
  252. unitglassvnesh = 10
  253. unitdyevmod = 0
  254. unitlegkoef = 9
  255. unitsupnatvnesh = 0
  256. unitpcs_apprncbase = 0
  257. unitResetBase = 1
  258. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  259. $svetadesc = 'Chess Player Start'
  260. unitsalo = 40
  261. unitpcs_hgt = 170
  262. unitstrenbuf = 30
  263. unitsalocatnow = 2
  264. unitvofat = 0
  265. unitpcs_lashes = 0
  266. unitpcs_eyesize = 1
  267. unitpcs_lip = 1
  268. unitpcs_teeth = 0
  269. unitpcs_agil = 30
  270. unitpcs_vital = 30
  271. unitvidage = 16
  272. unitpcs_skin = 35
  273. unitPXCloThinness = 250
  274. unitPXCloTopCut = 300
  275. unitPXCloBottomShortness = 100
  276. unitPCloQuality = 1
  277. $unitclothingworntype = 'cheap'
  278. unitbonusZ = 0
  279. unitPShoQuality = 0
  280. $unitpantyworntype = 'cheap'
  281. $unitbraworntype = 'cheap'
  282. unitpcs_lipbalm = 0
  283. unitmopkoef = 0
  284. unitpcs_hairbsh = 1
  285. unitpcs_breath = 0
  286. unitdeodorant_on = 0
  287. unitpcs_hairlng = 200
  288. unitpcs_sweat = 0
  289. unitglassvnesh = 0
  290. unitdyevmod = 0
  291. unitlegkoef = 9
  292. unitsupnatvnesh = 0
  293. unitpcs_apprncbase = 0
  294. unitResetBase = 1
  295. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  296. $svetadesc = 'Volleyball Start'
  297. unitsalo = 75
  298. unitpcs_hgt = 170
  299. unitstrenbuf = 45
  300. unitsalocatnow = 4
  301. unitvofat = 0
  302. unitpcs_lashes = 1
  303. unitpcs_eyesize = 3
  304. unitpcs_lip = 2
  305. unitpcs_teeth = 0
  306. unitpcs_agil = 50
  307. unitpcs_vital = 50
  308. unitvidage = 16
  309. unitpcs_skin = 50
  310. unitPXCloThinness = 300
  311. unitPXCloTopCut = 200
  312. unitPXCloBottomShortness = 250
  313. unitPCloQuality = 1
  314. $unitclothingworntype = 'cheap'
  315. unitbonusZ = 0
  316. unitPShoQuality = 0
  317. $unitpantyworntype = 'cheap'
  318. $unitbraworntype = 'cheap'
  319. unitpcs_lipbalm = 0
  320. unitmopkoef = 0
  321. unitpcs_hairbsh = 1
  322. unitpcs_breath = 0
  323. unitdeodorant_on = 0
  324. unitpcs_hairlng = 55
  325. unitpcs_sweat = 0
  326. unitglassvnesh = 0
  327. unitdyevmod = 0
  328. unitlegkoef = 9
  329. unitsupnatvnesh = 0
  330. unitpcs_apprncbase = 0
  331. unitResetBase = 1
  332. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  333. $svetadesc = 'Dancer Start'
  334. unitsalo = 55
  335. unitpcs_hgt = 170
  336. unitstrenbuf = 40
  337. unitsalocatnow = 3
  338. unitvofat = 0
  339. unitpcs_lashes = 1
  340. unitpcs_eyesize = 2
  341. unitpcs_lip = 2
  342. unitpcs_teeth = 0
  343. unitpcs_agil = 55
  344. unitpcs_vital = 50
  345. unitvidage = 16
  346. unitpcs_skin = 60
  347. unitPXCloThinness = 350
  348. unitPXCloTopCut = 200
  349. unitPXCloBottomShortness = 250
  350. unitPCloQuality = 1
  351. $unitclothingworntype = 'cheap'
  352. unitbonusZ = 0
  353. unitPShoQuality = 0
  354. $unitpantyworntype = 'cheap'
  355. $unitbraworntype = 'cheap'
  356. unitpcs_lipbalm = 0
  357. unitmopkoef = 0
  358. unitpcs_hairbsh = 0
  359. unitpcs_breath = 0
  360. unitdeodorant_on = 0
  361. unitpcs_hairlng = 200
  362. unitpcs_sweat = 0
  363. unitglassvnesh = 0
  364. unitdyevmod = 0
  365. unitlegkoef = 9
  366. unitsupnatvnesh = 0
  367. unitpcs_apprncbase = 0
  368. unitResetBase = 1
  369. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  370. $svetadesc = 'Runner Start'
  371. unitsalo = 51
  372. unitpcs_hgt = 170
  373. unitstrenbuf = 45
  374. unitsalocatnow = 3
  375. unitvofat = 0
  376. unitpcs_lashes = 1
  377. unitpcs_eyesize = 3
  378. unitpcs_lip = 2
  379. unitpcs_teeth = 0
  380. unitpcs_agil = 50
  381. unitpcs_vital = 60
  382. unitvidage = 16
  383. unitpcs_skin = 40
  384. unitPXCloThinness = 350
  385. unitPXCloTopCut = 200
  386. unitPXCloBottomShortness = 250
  387. unitPCloQuality = 1
  388. $unitclothingworntype = 'cheap'
  389. unitbonusZ = 0
  390. unitPShoQuality = 0
  391. $unitpantyworntype = 'cheap'
  392. $unitbraworntype = 'cheap'
  393. unitpcs_lipbalm = 0
  394. unitmopkoef = 0
  395. unitpcs_hairbsh = 1
  396. unitpcs_breath = 0
  397. unitdeodorant_on = 0
  398. unitpcs_hairlng = 55
  399. unitpcs_sweat = 0
  400. unitglassvnesh = 0
  401. unitdyevmod = 0
  402. unitlegkoef = 9
  403. unitsupnatvnesh = 0
  404. unitpcs_apprncbase = 0
  405. unitResetBase = 1
  406. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  407. $svetadesc = 'Football Start'
  408. unitsalo = 80
  409. unitpcs_hgt = 170
  410. unitstrenbuf = 50
  411. unitsalocatnow = 4
  412. unitvofat = 0
  413. unitpcs_lashes = 1
  414. unitpcs_eyesize = 3
  415. unitpcs_lip = 2
  416. unitpcs_teeth = 0
  417. unitpcs_agil = 40
  418. unitpcs_vital = 50
  419. unitvidage = 16
  420. unitpcs_skin = 50
  421. unitPXCloThinness = 300
  422. unitPXCloTopCut = 200
  423. unitPXCloBottomShortness = 250
  424. unitPCloQuality = 1
  425. $unitclothingworntype = 'cheap'
  426. unitbonusZ = 0
  427. unitPShoQuality = 0
  428. $unitpantyworntype = 'cheap'
  429. $unitbraworntype = 'cheap'
  430. unitpcs_lipbalm = 0
  431. unitmopkoef = 0
  432. unitpcs_hairbsh = 1
  433. unitpcs_breath = 0
  434. unitdeodorant_on = 0
  435. unitpcs_hairlng = 55
  436. unitpcs_sweat = 0
  437. unitglassvnesh = 0
  438. unitdyevmod = 0
  439. unitlegkoef = 9
  440. unitsupnatvnesh = 0
  441. unitpcs_apprncbase = 0
  442. unitResetBase = 1
  443. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  444. $svetadesc = 'Popular Friends Start'
  445. unitsalo = 80
  446. unitpcs_hgt = 170
  447. unitstrenbuf = 30
  448. unitsalocatnow = 4
  449. unitvofat = 0
  450. unitpcs_lashes = 1
  451. unitpcs_eyesize = 2
  452. unitpcs_lip = 2
  453. unitpcs_teeth = 0
  454. unitpcs_agil = 30
  455. unitpcs_vital = 30
  456. unitvidage = 16
  457. unitpcs_skin = 50
  458. unitPXCloThinness = 300
  459. unitPXCloTopCut = 300
  460. unitPXCloBottomShortness = 250
  461. unitPCloQuality = 1
  462. $unitclothingworntype = 'cheap'
  463. unitbonusZ = 0
  464. unitPShoQuality = 0
  465. $unitpantyworntype = 'cheap'
  466. $unitbraworntype = 'cheap'
  467. unitpcs_lipbalm = 0
  468. unitmopkoef = 0
  469. unitpcs_hairbsh = 1
  470. unitpcs_breath = 0
  471. unitdeodorant_on = 0
  472. unitpcs_hairlng = 200
  473. unitpcs_sweat = 0
  474. unitglassvnesh = 0
  475. unitdyevmod = 0
  476. unitlegkoef = 9
  477. unitsupnatvnesh = 0
  478. unitpcs_apprncbase = 0
  479. unitResetBase = 1
  480. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  481. $svetadesc = 'Popular Beautiful Start'
  482. unitsalo = 65
  483. unitpcs_hgt = 170
  484. unitstrenbuf = 30
  485. unitsalocatnow = 3
  486. unitvofat = 0
  487. unitpcs_lashes = 2
  488. unitpcs_eyesize = 2
  489. unitpcs_lip = 3
  490. unitpcs_teeth = 0
  491. unitpcs_agil = 30
  492. unitpcs_vital = 30
  493. unitvidage = 16
  494. unitpcs_skin = 70
  495. unitPXCloThinness = 350
  496. unitPXCloTopCut = 300
  497. unitPXCloBottomShortness = 250
  498. unitPCloQuality = 1
  499. $unitclothingworntype = 'cheap'
  500. unitbonusZ = 0
  501. unitPShoQuality = 0
  502. $unitpantyworntype = 'cheap'
  503. $unitbraworntype = 'cheap'
  504. unitpcs_lipbalm = 0
  505. unitmopkoef = 0
  506. unitpcs_hairbsh = 1
  507. unitpcs_breath = 0
  508. unitdeodorant_on = 0
  509. unitpcs_hairlng = 300
  510. unitpcs_sweat = 0
  511. unitglassvnesh = 0
  512. unitdyevmod = 0
  513. unitlegkoef = 9
  514. unitsupnatvnesh = 0
  515. unitpcs_apprncbase = 0
  516. unitResetBase = 1
  517. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  518. $svetadesc = 'Gopnik Start'
  519. unitsalo = 80
  520. unitpcs_hgt = 170
  521. unitstrenbuf = 40
  522. unitsalocatnow = 4
  523. unitvofat = 0
  524. unitpcs_lashes = 1
  525. unitpcs_eyesize = 3
  526. unitpcs_lip = 2
  527. unitpcs_teeth = 0
  528. unitpcs_agil = 35
  529. unitpcs_vital = 40
  530. unitvidage = 16
  531. unitpcs_skin = 40
  532. unitPXCloThinness = 350
  533. unitPXCloTopCut = 250
  534. unitPXCloBottomShortness = 250
  535. unitPCloQuality = 1
  536. $unitclothingworntype = 'cheap'
  537. unitbonusZ = 0
  538. unitPShoQuality = 0
  539. $unitpantyworntype = 'cheap'
  540. $unitbraworntype = 'cheap'
  541. unitpcs_lipbalm = 0
  542. unitmopkoef = 0
  543. unitpcs_hairbsh = 1
  544. unitpcs_breath = 0
  545. unitdeodorant_on = 0
  546. unitpcs_hairlng = 120
  547. unitpcs_sweat = 0
  548. unitglassvnesh = 0
  549. unitdyevmod = 0
  550. unitlegkoef = 9
  551. unitsupnatvnesh = 0
  552. unitpcs_apprncbase = 0
  553. unitResetBase = 1
  554. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  555. $svetadesc = 'Punk Start'
  556. unitsalo = 80
  557. unitpcs_hgt = 170
  558. unitstrenbuf = 40
  559. unitsalocatnow = 4
  560. unitvofat = 0
  561. unitpcs_lashes = 1
  562. unitpcs_eyesize = 3
  563. unitpcs_lip = 2
  564. unitpcs_teeth = 0
  565. unitpcs_agil = 35
  566. unitpcs_vital = 35
  567. unitvidage = 16
  568. unitpcs_skin = 40
  569. unitPXCloThinness = 350
  570. unitPXCloTopCut = 250
  571. unitPXCloBottomShortness = 250
  572. unitPCloQuality = 1
  573. $unitclothingworntype = 'cheap'
  574. unitbonusZ = 0
  575. unitPShoQuality = 0
  576. $unitpantyworntype = 'cheap'
  577. $unitbraworntype = 'cheap'
  578. unitpcs_lipbalm = 0
  579. unitmopkoef = 0
  580. unitpcs_hairbsh = 1
  581. unitpcs_breath = 0
  582. unitdeodorant_on = 0
  583. unitpcs_hairlng = 55
  584. unitpcs_sweat = 0
  585. unitglassvnesh = 0
  586. unitdyevmod = 0
  587. unitlegkoef = 9
  588. unitsupnatvnesh = 0
  589. unitpcs_apprncbase = 0
  590. unitResetBase = 1
  591. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  592. $svetadesc = 'Viteks Girlfriend Start'
  593. unitsalo = 60
  594. unitpcs_hgt = 170
  595. unitstrenbuf = 30
  596. unitsalocatnow = 3
  597. unitvofat = 0
  598. unitpcs_lashes = 1
  599. unitpcs_eyesize = 2
  600. unitpcs_lip = 2
  601. unitpcs_teeth = 0
  602. unitpcs_agil = 30
  603. unitpcs_vital = 30
  604. unitvidage = 16
  605. unitpcs_skin = 50
  606. unitPXCloThinness = 350
  607. unitPXCloTopCut = 300
  608. unitPXCloBottomShortness = 250
  609. unitPCloQuality = 1
  610. $unitclothingworntype = 'cheap'
  611. unitbonusZ = 0
  612. unitPShoQuality = 0
  613. $unitpantyworntype = 'cheap'
  614. $unitbraworntype = 'cheap'
  615. unitpcs_lipbalm = 0
  616. unitmopkoef = 0
  617. unitpcs_hairbsh = 1
  618. unitpcs_breath = 0
  619. unitdeodorant_on = 0
  620. unitpcs_hairlng = 200
  621. unitpcs_sweat = 0
  622. unitglassvnesh = 0
  623. unitdyevmod = 0
  624. unitlegkoef = 9
  625. unitsupnatvnesh = 0
  626. unitpcs_apprncbase = 0
  627. unitResetBase = 1
  628. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  629. $svetadesc = 'Alt Party Girl Start'
  630. unitsalo = 60
  631. unitpcs_hgt = 170
  632. unitstrenbuf = 35
  633. unitsalocatnow = 3
  634. unitvofat = 0
  635. unitpcs_lashes = 1
  636. unitpcs_eyesize = 2
  637. unitpcs_lip = 2
  638. unitpcs_teeth = 0
  639. unitpcs_agil = 40
  640. unitpcs_vital = 40
  641. unitvidage = 16
  642. unitpcs_skin = 60
  643. unitPXCloThinness = 300
  644. unitPXCloTopCut = 250
  645. unitPXCloBottomShortness = 300
  646. unitPCloQuality = 1
  647. $unitclothingworntype = 'cheap'
  648. unitbonusZ = 0
  649. unitPShoQuality = 0
  650. $unitpantyworntype = 'cheap'
  651. $unitbraworntype = 'cheap'
  652. unitpcs_lipbalm = 0
  653. unitmopkoef = 0
  654. unitpcs_hairbsh = 1
  655. unitpcs_breath = 0
  656. unitdeodorant_on = 0
  657. unitpcs_hairlng = 120
  658. unitpcs_sweat = 0
  659. unitglassvnesh = 0
  660. unitdyevmod = 0
  661. unitlegkoef = 9
  662. unitsupnatvnesh = 0
  663. unitpcs_apprncbase = 0
  664. unitResetBase = 1
  665. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  666. $svetadesc = 'Outcast No Friends Start'
  667. unitsalo = 104
  668. unitpcs_hgt = 170
  669. unitstrenbuf = 30
  670. unitsalocatnow = 5
  671. unitvofat = 0
  672. unitpcs_lashes = 0
  673. unitpcs_eyesize = 1
  674. unitpcs_lip = 1
  675. unitpcs_teeth = 0
  676. unitpcs_agil = 30
  677. unitpcs_vital = 30
  678. unitvidage = 16
  679. unitpcs_skin = 10
  680. unitPXCloThinness = 200
  681. unitPXCloTopCut = 100
  682. unitPXCloBottomShortness = 100
  683. unitPCloQuality = 1
  684. $unitclothingworntype = 'cheap'
  685. unitbonusZ = 0
  686. unitPShoQuality = 0
  687. $unitpantyworntype = 'cheap'
  688. $unitbraworntype = 'cheap'
  689. unitpcs_lipbalm = 0
  690. unitmopkoef = 0
  691. unitpcs_hairbsh = 1
  692. unitpcs_breath = 0
  693. unitdeodorant_on = 0
  694. unitpcs_hairlng = 200
  695. unitpcs_sweat = 0
  696. unitglassvnesh = 0
  697. unitdyevmod = 0
  698. unitlegkoef = 9
  699. unitsupnatvnesh = 0
  700. unitpcs_apprncbase = 0
  701. unitResetBase = 1
  702. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  703. $svetadesc = 'Ugly Duckling Start'
  704. unitsalo = 220
  705. unitpcs_hgt = 170
  706. unitstrenbuf = 30
  707. unitsalocatnow = 11
  708. unitvofat = 25
  709. unitpcs_lashes = 2
  710. unitpcs_eyesize = 0
  711. unitpcs_lip = 0
  712. unitpcs_teeth = 0
  713. unitpcs_agil = 30
  714. unitpcs_vital = 30
  715. unitvidage = 16
  716. unitpcs_skin = 1
  717. unitPXCloThinness = 150
  718. unitPXCloTopCut = 100
  719. unitPXCloBottomShortness = 100
  720. unitPCloQuality = 1
  721. $unitclothingworntype = 'cheap'
  722. unitbonusZ = 0
  723. unitPShoQuality = 0
  724. $unitpantyworntype = 'cheap'
  725. $unitbraworntype = 'cheap'
  726. unitpcs_lipbalm = 0
  727. unitmopkoef = 0
  728. unitpcs_hairbsh = 1
  729. unitpcs_breath = 0
  730. unitdeodorant_on = 0
  731. unitpcs_hairlng = 200
  732. unitpcs_sweat = 0
  733. unitglassvnesh = 10
  734. unitdyevmod = 0
  735. unitlegkoef = 9
  736. unitsupnatvnesh = 0
  737. unitpcs_apprncbase = 0
  738. unitResetBase = 1
  739. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  740. $svetadesc = 'Good Girl Start'
  741. unitsalo = 104
  742. unitpcs_hgt = 170
  743. unitstrenbuf = 30
  744. unitsalocatnow = 5
  745. unitvofat = 0
  746. unitpcs_lashes = 1
  747. unitpcs_eyesize = 3
  748. unitpcs_lip = 2
  749. unitpcs_teeth = 0
  750. unitpcs_agil = 30
  751. unitpcs_vital = 30
  752. unitvidage = 16
  753. unitpcs_skin = 30
  754. unitPXCloThinness = 150
  755. unitPXCloTopCut = 100
  756. unitPXCloBottomShortness = 100
  757. unitPCloQuality = 1
  758. $unitclothingworntype = 'cheap'
  759. unitbonusZ = 0
  760. unitPShoQuality = 0
  761. $unitpantyworntype = 'cheap'
  762. $unitbraworntype = 'cheap'
  763. unitpcs_lipbalm = 0
  764. unitmopkoef = 0
  765. unitpcs_hairbsh = 1
  766. unitpcs_breath = 0
  767. unitdeodorant_on = 0
  768. unitpcs_hairlng = 300
  769. unitpcs_sweat = 0
  770. unitglassvnesh = 0
  771. unitdyevmod = 0
  772. unitlegkoef = 9
  773. unitsupnatvnesh = 0
  774. unitpcs_apprncbase = 0
  775. unitResetBase = 1
  776. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  777. $svetadesc = 'Slut Start'
  778. unitsalo = 60
  779. unitpcs_hgt = 170
  780. unitstrenbuf = 30
  781. unitsalocatnow = 3
  782. unitvofat = 0
  783. unitpcs_lashes = 1
  784. unitpcs_eyesize = 2
  785. unitpcs_lip = 2
  786. unitpcs_teeth = 0
  787. unitpcs_agil = 30
  788. unitpcs_vital = 30
  789. unitvidage = 16
  790. unitpcs_skin = 60
  791. unitPXCloThinness = 350
  792. unitPXCloTopCut = 400
  793. unitPXCloBottomShortness = 300
  794. unitPCloQuality = 2
  795. $unitclothingworntype = 'cheap'
  796. unitbonusZ = 0
  797. unitPShoQuality = 0
  798. $unitpantyworntype = 'cheap'
  799. $unitbraworntype = 'none'
  800. unitpcs_lipbalm = 0
  801. unitmopkoef = 0
  802. unitpcs_hairbsh = 1
  803. unitpcs_breath = 0
  804. unitdeodorant_on = 0
  805. unitpcs_hairlng = 120
  806. unitpcs_sweat = 0
  807. unitglassvnesh = 0
  808. unitdyevmod = 0
  809. unitlegkoef = 9
  810. unitsupnatvnesh = 0
  811. unitpcs_apprncbase = 0
  812. unitResetBase = 1
  813. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  814. $svetadesc = 'Goth Start'
  815. unitsalo = 45
  816. unitpcs_hgt = 170
  817. unitstrenbuf = 30
  818. unitsalocatnow = 2
  819. unitvofat = 0
  820. unitpcs_lashes = 1
  821. unitpcs_eyesize = 3
  822. unitpcs_lip = 1
  823. unitpcs_teeth = 0
  824. unitpcs_agil = 30
  825. unitpcs_vital = 30
  826. unitvidage = 16
  827. unitpcs_skin = 50
  828. unitPXCloThinness = 350
  829. unitPXCloTopCut = 200
  830. unitPXCloBottomShortness = 250
  831. unitPCloQuality = 1
  832. $unitclothingworntype = 'cheap'
  833. unitbonusZ = 0
  834. unitPShoQuality = 0
  835. $unitpantyworntype = 'cheap'
  836. $unitbraworntype = 'cheap'
  837. unitpcs_lipbalm = 0
  838. unitmopkoef = 0
  839. unitpcs_hairbsh = 1
  840. unitpcs_breath = 0
  841. unitdeodorant_on = 0
  842. unitpcs_hairlng = 265
  843. unitpcs_sweat = 0
  844. unitglassvnesh = 0
  845. unitdyevmod = 0
  846. unitlegkoef = 9
  847. unitsupnatvnesh = 0
  848. unitpcs_apprncbase = 0
  849. unitResetBase = 1
  850. gs 'UnitAppearance', 'GenerateSvetaOptions', $svetadesc
  851. gs 'UnitAppearance', 'GenRowBreak', 'BMI Maximums'
  852. unitstrenbuf = 100
  853. unitpcs_lashes = 5
  854. unitpcs_eyesize = 3
  855. unitpcs_lip = 3
  856. unitpcs_teeth = -1
  857. unitpcs_agil = 100
  858. unitpcs_vital = 100
  859. unitvidage = 20
  860. unitpcs_skin = 100
  861. unitpcs_lipbalm = 1
  862. unitmopkoef = 30
  863. unitpcs_hairbsh = 1
  864. unitpcs_breath = 1
  865. unitdeodorant_on = 1
  866. unitpcs_hairlng = 200
  867. unitpcs_sweat = 0
  868. unitglassvnesh = 0
  869. unitdyevmod = 0
  870. unitlegkoef = 0
  871. unitsupnatvnesh = 0
  872. unitpcs_apprncbase = 0
  873. unitResetBase = 1
  874. unitpcs_hgt = 170
  875. $unitclothingworntype = ''
  876. unitPCloQuality = 7
  877. unitbonusZ = 5
  878. unitPShoQuality = 7
  879. $unitpantyworntype = 'boutique'
  880. $unitbraworntype = 'boutique'
  881. $svetadesc = 'Max morbidly obese'
  882. unitsalo = 220
  883. gs 'UnitAppearance', 'CalcSaloVars'
  884. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  885. $svetadesc = 'Max very severely obese'
  886. unitsalo = 190
  887. gs 'UnitAppearance', 'CalcSaloVars'
  888. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  889. $svetadesc = 'Max severely obese'
  890. unitsalo = 160
  891. gs 'UnitAppearance', 'CalcSaloVars'
  892. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  893. $svetadesc = 'Max moderately obese'
  894. unitsalo = 135
  895. gs 'UnitAppearance', 'CalcSaloVars'
  896. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  897. $svetadesc = 'Max overweight'
  898. unitsalo = 105
  899. gs 'UnitAppearance', 'CalcSaloVars'
  900. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  901. $svetadesc = 'Max normal'
  902. unitsalo = 75
  903. gs 'UnitAppearance', 'CalcSaloVars'
  904. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  905. $svetadesc = 'Max underweight'
  906. unitsalo = 40
  907. gs 'UnitAppearance', 'CalcSaloVars'
  908. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  909. $svetadesc = 'Max severely underweight'
  910. unitsalo = 25
  911. gs 'UnitAppearance', 'CalcSaloVars'
  912. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  913. gs 'UnitAppearance', 'GenRowBreak', 'BMI Average Apperance cheap clothes'
  914. unitstrenbuf = 30
  915. unitpcs_lashes = 1
  916. unitpcs_eyesize = 3
  917. unitpcs_lip = 1
  918. unitpcs_teeth = 0
  919. unitpcs_agil = 30
  920. unitpcs_vital = 30
  921. unitvidage = 16
  922. unitpcs_skin = 50
  923. unitpcs_lipbalm = 1
  924. unitmopkoef = 19
  925. unitpcs_hairbsh = 1
  926. unitpcs_breath = 0
  927. unitdeodorant_on = 1
  928. unitpcs_hairlng = 200
  929. unitpcs_sweat = 0
  930. unitglassvnesh = 0
  931. unitdyevmod = 0
  932. unitlegkoef = 0
  933. unitsupnatvnesh = 0
  934. unitpcs_apprncbase = 0
  935. unitResetBase = 1
  936. unitpcs_hgt = 170
  937. $unitclothingworntype = 'cheap'
  938. unitPCloQuality = 1
  939. unitbonusZ = 0
  940. unitPShoQuality = 1
  941. $unitpantyworntype = 'cheap'
  942. $unitbraworntype = 'cheap'
  943. $svetadesc = 'morbidly obese'
  944. unitsalo = 220
  945. gs 'UnitAppearance', 'CalcSaloVars'
  946. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  947. $svetadesc = 'very severely obese'
  948. unitsalo = 190
  949. gs 'UnitAppearance', 'CalcSaloVars'
  950. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  951. $svetadesc = 'severely obese'
  952. unitsalo = 160
  953. gs 'UnitAppearance', 'CalcSaloVars'
  954. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  955. $svetadesc = 'moderately obese'
  956. unitsalo = 135
  957. gs 'UnitAppearance', 'CalcSaloVars'
  958. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  959. $svetadesc = 'overweight'
  960. unitsalo = 105
  961. gs 'UnitAppearance', 'CalcSaloVars'
  962. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  963. $svetadesc = 'normal'
  964. unitsalo = 75
  965. gs 'UnitAppearance', 'CalcSaloVars'
  966. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  967. $svetadesc = 'underweight'
  968. unitsalo = 40
  969. gs 'UnitAppearance', 'CalcSaloVars'
  970. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  971. $svetadesc = 'severely underweight'
  972. unitsalo = 25
  973. gs 'UnitAppearance', 'CalcSaloVars'
  974. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  975. gs 'UnitAppearance', 'GenRowBreak', 'BMI Average Apperance expensive clothes'
  976. unitstrenbuf = 30
  977. unitpcs_lashes = 1
  978. unitpcs_eyesize = 3
  979. unitpcs_lip = 1
  980. unitpcs_teeth = 0
  981. unitpcs_agil = 30
  982. unitpcs_vital = 30
  983. unitvidage = 16
  984. unitpcs_skin = 50
  985. unitpcs_lipbalm = 1
  986. unitmopkoef = 19
  987. unitpcs_hairbsh = 1
  988. unitpcs_breath = 0
  989. unitdeodorant_on = 1
  990. unitpcs_hairlng = 200
  991. unitpcs_sweat = 0
  992. unitglassvnesh = 0
  993. unitdyevmod = 0
  994. unitlegkoef = 0
  995. unitsupnatvnesh = 0
  996. unitpcs_apprncbase = 0
  997. unitResetBase = 1
  998. unitpcs_hgt = 170
  999. $unitclothingworntype = ''
  1000. unitPCloQuality = 7
  1001. unitbonusZ = 0
  1002. unitPShoQuality = 7
  1003. $unitpantyworntype = 'boutique'
  1004. $unitbraworntype = 'boutique'
  1005. $svetadesc = 'morbidly obese'
  1006. unitsalo = 220
  1007. gs 'UnitAppearance', 'CalcSaloVars'
  1008. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1009. $svetadesc = 'very severely obese'
  1010. unitsalo = 190
  1011. gs 'UnitAppearance', 'CalcSaloVars'
  1012. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1013. $svetadesc = 'severely obese'
  1014. unitsalo = 160
  1015. gs 'UnitAppearance', 'CalcSaloVars'
  1016. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1017. $svetadesc = 'moderately obese'
  1018. unitsalo = 135
  1019. gs 'UnitAppearance', 'CalcSaloVars'
  1020. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1021. $svetadesc = 'overweight'
  1022. unitsalo = 105
  1023. gs 'UnitAppearance', 'CalcSaloVars'
  1024. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1025. $svetadesc = 'normal'
  1026. unitsalo = 75
  1027. gs 'UnitAppearance', 'CalcSaloVars'
  1028. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1029. $svetadesc = 'underweight'
  1030. unitsalo = 40
  1031. gs 'UnitAppearance', 'CalcSaloVars'
  1032. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1033. $svetadesc = 'severely underweight'
  1034. unitsalo = 25
  1035. gs 'UnitAppearance', 'CalcSaloVars'
  1036. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1037. end
  1038. if $ARGS[0] = 'CalcSaloVars':
  1039. unitvhips = (unitsalo - 80) / 2
  1040. unithrtemp = (2 * unitpcs_agil + unitpcs_vital + unitstrenbuf) /4
  1041. if unithrtemp < 35:
  1042. unithratio = 60
  1043. elseif unithrtemp < 45:
  1044. unithratio = 59
  1045. elseif unithrtemp < 60:
  1046. unithratio = 58
  1047. elseif unithrtemp < 80:
  1048. unithratio = 57
  1049. else
  1050. unithratio = 56
  1051. end
  1052. unitvofat = ((unitpcs_hgt * unithratio) / 100 + unitvhips - (unitpcs_hgt * 72) / 100) / 2
  1053. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1054. unitbmi_calc = FUNC('body_shape', 'bmicalc', unitsalo, unitpcs_hgt)
  1055. gs 'UnitAppearance', 'GetClothThick', unitbmi_calc
  1056. end
  1057. if $ARGS[0] = 'GenerateSvetaOptions':
  1058. gs 'UnitAppearance', 'SaveBase'
  1059. gs 'UnitAppearance', 'GenRowBreak', $ARGS[1]
  1060. unitbmi_calc = FUNC('body_shape', 'bmicalc', unitsalo, unitpcs_hgt)
  1061. $svetadesc = 'Current Clothes'
  1062. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1063. $svetadesc = 'Naked'
  1064. unitPXCloThinness = 0
  1065. unitPXCloTopCut = 0
  1066. unitPXCloBottomShortness = 0
  1067. unitPCloQuality = 0
  1068. $unitclothingworntype = 'nude'
  1069. unitbonusZ = 0
  1070. unitPShoQuality = 0
  1071. $unitpantyworntype = ''
  1072. $unitbraworntype = ''
  1073. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1074. gs 'UnitAppearance', 'RestoreBase'
  1075. $svetadesc = 'Max Bonus'
  1076. unitpcs_teeth = -1
  1077. unitpcs_skin = 100
  1078. unitpcs_lashes = 5
  1079. unitmopkoef = 30
  1080. unitpcs_lipbalm = 1
  1081. unitlegkoef = 0
  1082. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1083. gs 'UnitAppearance', 'RestoreBase'
  1084. $svetadesc = 'Low Clothes'
  1085. gs 'UnitAppearance', 'GetClothThick', unitbmi_calc
  1086. unitPCloQuality = 1
  1087. $unitclothingworntype = ''
  1088. unitbonusZ = 1
  1089. unitPShoQuality = 1
  1090. $unitpantyworntype = ''
  1091. $unitbraworntype = ''
  1092. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1093. gs 'UnitAppearance', 'RestoreBase'
  1094. $svetadesc = 'Med Clothes'
  1095. gs 'UnitAppearance', 'GetClothThick', unitbmi_calc
  1096. unitPCloQuality = 4
  1097. $unitclothingworntype = ''
  1098. unitbonusZ = 3
  1099. unitPShoQuality = 4
  1100. $unitpantyworntype = 'fashionista'
  1101. $unitbraworntype = 'fashionista'
  1102. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1103. gs 'UnitAppearance', 'RestoreBase'
  1104. $svetadesc = 'High Clothes'
  1105. gs 'UnitAppearance', 'GetClothThick', unitbmi_calc
  1106. unitPCloQuality = 7
  1107. $unitclothingworntype = ''
  1108. unitbonusZ = 5
  1109. unitPShoQuality = 7
  1110. $unitpantyworntype = 'boutique'
  1111. $unitbraworntype = 'boutique'
  1112. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1113. gs 'UnitAppearance', 'RestoreBase'
  1114. $svetadesc = 'High Clothes Max Bonus'
  1115. gs 'UnitAppearance', 'GetClothThick', unitbmi_calc
  1116. unitPCloQuality = 7
  1117. $unitclothingworntype = ''
  1118. unitbonusZ = 5
  1119. unitPShoQuality = 7
  1120. $unitpantyworntype = 'boutique'
  1121. $unitbraworntype = 'boutique'
  1122. unitpcs_teeth = -1
  1123. unitpcs_skin = 100
  1124. unitpcs_lashes = 5
  1125. unitmopkoef = 30
  1126. unitpcs_lipbalm = 1
  1127. unitlegkoef = 0
  1128. gs 'UnitAppearance', 'calcHotcat', $svetadesc
  1129. end
  1130. if $ARGS[0] = 'GetClothThick':
  1131. if ARGS[1] < 16:
  1132. !!severely underweight
  1133. unitPXCloThinness = 150
  1134. unitPXCloTopCut = 100
  1135. unitPXCloBottomShortness = 100
  1136. elseif ARGS[1] >= 16 and ARGS[1] < 19:
  1137. !!underweight
  1138. unitPXCloThinness = 150
  1139. unitPXCloTopCut = 100
  1140. unitPXCloBottomShortness = 100
  1141. elseif ARGS[1] >= 19 and ARGS[1] < 25:
  1142. !!normal, healthy weight
  1143. unitPXCloThinness = 400
  1144. unitPXCloTopCut = 500
  1145. unitPXCloBottomShortness = 400
  1146. elseif ARGS[1] >= 25 and ARGS[1] < 30:
  1147. !!overweight
  1148. unitPXCloThinness = 400
  1149. unitPXCloTopCut = 500
  1150. unitPXCloBottomShortness = 400
  1151. elseif ARGS[1] >= 30 and ARGS[1] < 35:
  1152. !!moderately obese
  1153. unitPXCloThinness = 150
  1154. unitPXCloTopCut = 100
  1155. unitPXCloBottomShortness = 100
  1156. elseif ARGS[1] >= 35 and ARGS[1] < 40:
  1157. !!severely obese
  1158. unitPXCloThinness = 150
  1159. unitPXCloTopCut = 100
  1160. unitPXCloBottomShortness = 100
  1161. elseif ARGS[1] >= 40 and ARGS[1] < 45:
  1162. !!very severely obese
  1163. unitPXCloThinness = 150
  1164. unitPXCloTopCut = 100
  1165. unitPXCloBottomShortness = 100
  1166. elseif ARGS[1] >= 45:
  1167. !!morbidly obese
  1168. unitPXCloThinness = 150
  1169. unitPXCloTopCut = 100
  1170. unitPXCloBottomShortness = 100
  1171. end
  1172. end
  1173. if $args[0] = 'SaloTest':
  1174. unitDisplayType = ARGS[1]
  1175. unitRowType = ARGS[2]
  1176. *clr
  1177. 'Hotcat'
  1178. '<table>'
  1179. unitstrenbuf = 19
  1180. unitvofat = 0
  1181. unitpcs_lashes = 5
  1182. unitpcs_eyesize = 3
  1183. unitpcs_lip = 3
  1184. unitpcs_teeth = -1
  1185. unitpcs_agil = 100
  1186. unitpcs_vital = 100
  1187. unitvidage = 20
  1188. unitpcs_skin = 1
  1189. unitpcs_lipbalm = 1
  1190. unitmopkoef = 5
  1191. unitpcs_hairbsh = 1
  1192. unitpcs_breath = 1
  1193. unitdeodorant_on = 1
  1194. unitpcs_hairlng = 200
  1195. unitpcs_sweat = 0
  1196. unitglassvnesh = 10
  1197. unitdyevmod = 0
  1198. unitlegkoef = 9
  1199. unitsupnatvnesh = 0
  1200. unitpcs_apprncbase = 0
  1201. unitResetBase = 1
  1202. unitpcs_hgt = 170
  1203. $unitclothingworntype = ''
  1204. unitbonusZ = 1
  1205. unitPShoQuality = 1
  1206. $unitpantyworntype = ''
  1207. $unitbraworntype = ''
  1208. unitsalo = 220
  1209. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1210. gs 'UnitAppearance', 'SaloGenerateTest', 'morbidly obese'
  1211. unitsalo = 190
  1212. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1213. gs 'UnitAppearance', 'SaloGenerateTest', 'very severely obese'
  1214. unitsalo = 160
  1215. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1216. gs 'UnitAppearance', 'SaloGenerateTest', 'severely obese'
  1217. unitsalo = 135
  1218. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1219. gs 'UnitAppearance', 'SaloGenerateTest', 'moderately obese'
  1220. unitsalo = 105
  1221. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1222. gs 'UnitAppearance', 'SaloGenerateTest', 'overweight'
  1223. unitsalo = 75
  1224. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1225. gs 'UnitAppearance', 'SaloGenerateTest', 'normal'
  1226. unitsalo = 40
  1227. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1228. gs 'UnitAppearance', 'SaloGenerateTest', 'underweight'
  1229. unitsalo = 25
  1230. unitsalocatnow = 1 + (unitsalo - 10) / 20
  1231. gs 'UnitAppearance', 'SaloGenerateTest', 'severely underweight'
  1232. '</table>'
  1233. end
  1234. if $args[0] = 'SaloGenerateTest':
  1235. gs 'UnitAppearance', 'GenRowBreak', $ARGS[1]
  1236. unitPXCloThinness = 400
  1237. unitPXCloTopCut = 500
  1238. unitPXCloBottomShortness = 400
  1239. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], 'Most Revealing'
  1240. unitPXCloThinness = 350
  1241. unitPXCloTopCut = 400
  1242. unitPXCloBottomShortness = 350
  1243. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], ''
  1244. unitPXCloThinness = 300
  1245. unitPXCloTopCut = 350
  1246. unitPXCloBottomShortness = 300
  1247. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], ''
  1248. unitPXCloThinness = 250
  1249. unitPXCloTopCut = 300
  1250. unitPXCloBottomShortness = 250
  1251. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], ''
  1252. unitPXCloThinness = 200
  1253. unitPXCloTopCut = 250
  1254. unitPXCloBottomShortness = 200
  1255. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], ''
  1256. unitPXCloThinness = 150
  1257. unitPXCloTopCut = 200
  1258. unitPXCloBottomShortness = 150
  1259. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], ''
  1260. unitPXCloThinness = 150
  1261. unitPXCloTopCut = 150
  1262. unitPXCloBottomShortness = 100
  1263. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], ''
  1264. unitPXCloThinness = 150
  1265. unitPXCloTopCut = 100
  1266. unitPXCloBottomShortness = 100
  1267. gs 'UnitAppearance', 'SaloGenerateRows', $ARGS[1], 'Least Revealing'
  1268. end
  1269. if $args[0] = 'SaloGenerateRows':
  1270. $unitclothingworntype = ''
  1271. unitPCloQuality = 1
  1272. $svetadesc = '<<$ARGS[2]>> Q1'
  1273. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1274. unitclothingbonus1 = unitclothingbonus
  1275. unitPCloQuality = 2
  1276. $svetadesc = '<<$ARGS[2]>> Q2'
  1277. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1278. unitclothingbonus2 = unitclothingbonus
  1279. unitPCloQuality = 3
  1280. $svetadesc = '<<$ARGS[2]>> Q3'
  1281. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1282. unitclothingbonus3 = unitclothingbonus
  1283. unitPCloQuality = 4
  1284. $svetadesc = '<<$ARGS[2]>> Q4'
  1285. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1286. unitclothingbonus4 = unitclothingbonus
  1287. unitPCloQuality = 5
  1288. $svetadesc = '<<$ARGS[2]>> Q5'
  1289. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1290. unitclothingbonus5 = unitclothingbonus
  1291. unitPCloQuality = 6
  1292. $svetadesc = '<<$ARGS[2]>> Q6'
  1293. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1294. unitclothingbonus6 = unitclothingbonus
  1295. unitPCloQuality = 7
  1296. $svetadesc = '<<$ARGS[2]>> Q7'
  1297. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1298. unitclothingbonus7 = unitclothingbonus
  1299. $unitclothingworntype = 'nude'
  1300. $svetadesc = '<<$ARGS[2]>> Nude'
  1301. gs 'UnitAppearance', 'calcHotcat', '<<$ARGS[1]>> <<$svetadesc>>'
  1302. unitclothingbonusnude = unitclothingbonus
  1303. if unitRowType = 1: $svetadesc = '<<$ARGS[2]>>' & gs 'UnitAppearance', 'GenRow', $svetadesc, ARGS[1]
  1304. end
  1305. if $ARGS[0] = 'SaveBase':
  1306. tunitsalo = unitsalo
  1307. tunitpcs_hgt = unitpcs_hgt
  1308. tunitstrenbuf = unitstrenbuf
  1309. tunitsalocatnow = unitsalocatnow
  1310. tunitvofat = unitvofat
  1311. tunitpcs_lashes = unitpcs_lashes
  1312. tunitpcs_eyesize = unitpcs_eyesize
  1313. tunitpcs_lip = unitpcs_lip
  1314. tunitpcs_teeth = unitpcs_teeth
  1315. tunitpcs_agil = unitpcs_agil
  1316. tunitpcs_vital = unitpcs_vital
  1317. tunitvidage = unitvidage
  1318. tunitpcs_skin = unitpcs_skin
  1319. tunitPXCloThinness = unitPXCloThinness
  1320. tunitPXCloTopCut = unitPXCloTopCut
  1321. tunitPXCloBottomShortness = unitPXCloBottomShortness
  1322. tunitPCloQuality = unitPCloQuality
  1323. $tunitclothingworntype = $unitclothingworntype
  1324. tunitbonusZ = unitbonusZ
  1325. tunitPShoQuality = unitPShoQuality
  1326. $tunitpantyworntype = $unitpantyworntype
  1327. $tunitbraworntype = $unitbraworntype
  1328. tunitpcs_lipbalm = unitpcs_lipbalm
  1329. tunitmopkoef = unitmopkoef
  1330. tunitpcs_hairbsh = unitpcs_hairbsh
  1331. tunitpcs_breath = unitpcs_breath
  1332. tunitdeodorant_on = unitdeodorant_on
  1333. tunitpcs_hairlng = unitpcs_hairlng
  1334. tunitpcs_sweat = unitpcs_sweat
  1335. tunitglassvnesh = unitglassvnesh
  1336. tunitdyevmod = unitdyevmod
  1337. tunitlegkoef = unitlegkoef
  1338. tunitsupnatvnesh = unitsupnatvnesh
  1339. tunitpcs_apprncbase = unitpcs_apprncbase
  1340. tunitResetBase = unitResetBase
  1341. end
  1342. if $ARGS[0] = 'RestoreBase':
  1343. unitsalo = tunitsalo
  1344. unitpcs_hgt = tunitpcs_hgt
  1345. unitstrenbuf = tunitstrenbuf
  1346. unitsalocatnow = tunitsalocatnow
  1347. unitvofat = tunitvofat
  1348. unitpcs_lashes = tunitpcs_lashes
  1349. unitpcs_eyesize = tunitpcs_eyesize
  1350. unitpcs_lip = tunitpcs_lip
  1351. unitpcs_teeth = tunitpcs_teeth
  1352. unitpcs_agil = tunitpcs_agil
  1353. unitpcs_vital = tunitpcs_vital
  1354. unitvidage = tunitvidage
  1355. unitpcs_skin = tunitpcs_skin
  1356. unitPXCloThinness = tunitPXCloThinness
  1357. unitPXCloTopCut = tunitPXCloTopCut
  1358. unitPXCloBottomShortness = tunitPXCloBottomShortness
  1359. unitPCloQuality = tunitPCloQuality
  1360. $unitclothingworntype = $tunitclothingworntype
  1361. unitbonusZ = tunitbonusZ
  1362. unitPShoQuality = tunitPShoQuality
  1363. $unitpantyworntype = $tunitpantyworntype
  1364. $unitbraworntype = $tunitbraworntype
  1365. unitpcs_lipbalm = tunitpcs_lipbalm
  1366. unitmopkoef = tunitmopkoef
  1367. unitpcs_hairbsh = tunitpcs_hairbsh
  1368. unitpcs_breath = tunitpcs_breath
  1369. unitdeodorant_on = tunitdeodorant_on
  1370. unitpcs_hairlng = tunitpcs_hairlng
  1371. unitpcs_sweat = tunitpcs_sweat
  1372. unitglassvnesh = tunitglassvnesh
  1373. unitdyevmod = tunitdyevmod
  1374. unitlegkoef = tunitlegkoef
  1375. unitsupnatvnesh = tunitsupnatvnesh
  1376. unitpcs_apprncbase = tunitpcs_apprncbase
  1377. unitResetBase = tunitResetBase
  1378. end
  1379. if $ARGS[0] = 'CurVal':
  1380. $SvetaDesc = input("Enter a description for Sveta")
  1381. *clr
  1382. ''
  1383. ' $svetadesc = ''<<$SvetaDesc>>'''
  1384. ' unitsalo = <<salo>>'
  1385. ' unitpcs_hgt = <<pcs_hgt>>'
  1386. ' unitstrenbuf = <<strenbuf>>'
  1387. ' unitsalocatnow = <<salocatnow>>'
  1388. ' unitvofat = <<vofat>>'
  1389. ' unitpcs_lashes = <<pcs_lashes>>'
  1390. ' unitpcs_eyesize = <<pcs_eyesize>>'
  1391. ' unitpcs_lip = <<pcs_lip>>'
  1392. ' unitpcs_teeth = <<pcs_teeth>>'
  1393. ' unitpcs_agil = <<pcs_agil>>'
  1394. ' unitpcs_vital = <<pcs_vital>>'
  1395. ' unitvidage = <<vidage>>'
  1396. ' unitpcs_skin = <<pcs_skin>>'
  1397. ' unitPXCloThinness = <<PXCloThinness>>'
  1398. ' unitPXCloTopCut = <<PXCloTopCut>>'
  1399. ' unitPXCloBottomShortness = <<PXCloBottomShortness>>'
  1400. ' unitPCloQuality = <<PCloQuality>>'
  1401. ' $unitclothingworntype = ''<<$clothingworntype>>'''
  1402. ' unitbonusZ = <<bonusZ>>'
  1403. ' unitPShoQuality = <<PShoQuality>>'
  1404. ' $unitpantyworntype = ''<<$pantyworntype>>'''
  1405. ' $unitbraworntype = ''<<$braworntype>>'''
  1406. ' unitpcs_lipbalm = <<pcs_lipbalm>>'
  1407. ' unitmopkoef = <<mopkoef>>'
  1408. ' unitpcs_hairbsh = <<pcs_hairbsh>>'
  1409. ' unitpcs_breath = <<pcs_breath>>'
  1410. ' unitdeodorant_on = <<deodorant_on>>'
  1411. ' unitpcs_hairlng = <<pcs_hairlng>>'
  1412. ' unitpcs_sweat = <<pcs_sweat>>'
  1413. ' unitglassvnesh = <<glassvnesh>>'
  1414. ' unitdyevmod = <<dyevmod>>'
  1415. ' unitlegkoef = <<legkoef>>'
  1416. ' unitsupnatvnesh = <<supnatvnesh>>'
  1417. ' unitpcs_apprncbase = 0'
  1418. ' unitResetBase = 1'
  1419. ' gs ''UnitAppearance'', ''GenerateSvetaOptions'', $svetadesc'
  1420. ''
  1421. end
  1422. --- UnitAppearance ---------------------------------