stat_display.qsrc 117 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207
  1. # stat_display
  2. if default_status_icons = 0:set_siconht = 54
  3. if default_wbanner = 0:set_weatherht = 72
  4. if default_menu_icons = 0:set_miconht = 54
  5. gs 'outdoors', 'main'
  6. !!----------------image Extra messages, start--------------------------
  7. $stat_imgtool_msg=''
  8. $stat_imgextra_msg=''
  9. if Enable_showstatimg = 1:
  10. !There are 3 display mode, with toobar / top / bottom, controlled by Enable_statimg_loc
  11. if Enable_statimg_face = 0:
  12. $stat_imgtool_msg += '<a href="exec:Enable_statimg_face = 1 & gs ''$menu_obnovit''">◇Face</a>'
  13. else
  14. $stat_imgtool_msg += '<a href="exec:Enable_statimg_face = 0 & gs ''$menu_obnovit''">◆Face</a>'
  15. $img_temp = FUNC('$face_image')
  16. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  17. end
  18. if Enable_statimg_body = 0:
  19. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_body = 1 & gs ''$menu_obnovit''">◇Body</a>'
  20. else
  21. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_body = 0 & gs ''$menu_obnovit''">◆Body</a>'
  22. $img_temp = FUNC('$body_image','body')
  23. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  24. end
  25. if Enable_statimg_coat = 0:
  26. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_coat = 1 & gs ''$menu_obnovit''">◇Coat</a>'
  27. else
  28. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_coat = 0 & gs ''$menu_obnovit''">◆Coat</a>'
  29. $img_temp = FUNC('$body_image','coat')
  30. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  31. end
  32. if Enable_statimg_cloth = 0:
  33. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_cloth = 1 & gs ''$menu_obnovit''">◇Clothes</a>'
  34. else
  35. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_cloth = 0 & gs ''$menu_obnovit''">◆Clothes</a>'
  36. $img_temp = FUNC('$body_image','clothes')
  37. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  38. end
  39. if Enable_statimg_bra = 0:
  40. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_bra = 1 & gs ''$menu_obnovit''">◇Bra</a>'
  41. else
  42. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_bra = 0 & gs ''$menu_obnovit''">◆Bra</a>'
  43. $img_temp = FUNC('$body_image','bra')
  44. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  45. end
  46. if Enable_statimg_panties = 0:
  47. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_panties = 1 & gs ''$menu_obnovit''">◇Panties</a>'
  48. else
  49. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_panties = 0 & gs ''$menu_obnovit''">◆Panties</a>'
  50. $img_temp = FUNC('$body_image','panties')
  51. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  52. end
  53. if Enable_statimg_shoes = 0:
  54. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_shoes = 1 & gs ''$menu_obnovit''">◇Shoes</a>'
  55. else
  56. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_shoes = 0 & gs ''$menu_obnovit''">◆Shoes</a>'
  57. $img_temp = FUNC('$body_image','shoes')
  58. if $img_temp ! null: $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  59. end
  60. if $menu_loc ! '': $stat_imgtool_msg += ' <a href="exec:gs ''Cheatmenu_din'' & dynamic $cheatmenu[''setting'']">◎Settings</a>'
  61. end
  62. !!----------------image Extra messages, end --------------------------
  63. if Enable_statimg_loc = 1: $stat_msg = '<<$stat_imgtool_msg>><br><<$stat_imgextra_msg>><br><<$stat_msg>>'
  64. $stat_android = '<b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>'
  65. $stat_msg += '<table><tr><td><a href="exec:msg ''<<$weather>>''"><<$weatherImage>></a></td><td><<$temperature>></td></tr></table>'
  66. if Enable_statfsize>0: $stat_msg = '<font size=<<Enable_statfsize>>><<$stat_msg>>'
  67. $stat_disable_msg = 'Menu is disabled for this event.'
  68. !$stat_msg += '<<$weather>><BR>'
  69. !pl '<<$weatherImage>>'
  70. if timeHidden = 0: $stat_msg += '<BR><<$stat_android>> <<$week[week]>> <<day>> <<$month>> <<year>>'
  71. $stat_android += '<<$week[week]>> <<day>>/<<month>>, <<money>> ₽, <a href="exec:clr & pl $stat_android">Status</a>'
  72. ! $stat_android for short desc in android mode, $stat_msg for status bar.
  73. if StoryLine > 0 and SchoolAtestat ! 1 and $holyday ! '': $stat_msg += '<BR><<$holyday>>' & $stat_msg += '<BR>'
  74. if birthday = day and birthmonth = month: $stat_msg += '<BR><b>Today is your birthday.</b>' & $stat_msg += '<BR>'
  75. !New icon based menu.
  76. if MagikDostup = 0:
  77. $journal_tooltip = 'Spellbook & Journal'
  78. $journalIcon = 'journal_magic.png'
  79. else
  80. $journal_tooltip = 'Journal'
  81. $journalIcon = 'journal_norm.png'
  82. end
  83. if menu_off = 0:
  84. $menuBarTab = '<table><tr>'
  85. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''description''"><img title="Character description" height = <<set_miconht>> src="images/system/menu icons/icon_character.png"></a></td>'
  86. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''face''"><img title="Looks (Face, body, clothing,...)"height = <<set_miconht>> src="images/system/menu icons/icon_lookself.png"></a></td>'
  87. if bag > 0: $menuBarTab += '<td><a href="exec:gs ''din_bad'', ''d_bag''"><img title="Your purse"height = <<set_miconht>> src="images/system/menu icons/icon_purse.png"></a></td>'
  88. $menuBarTab += '<td><a href="exec:gs ''telefon'',''Phone_menu''"><img title="Your phone" height = <<set_miconht>> src="images/system/menu icons/icon_phone.png"></a></td>'
  89. $menuBarTab += '<td><a href="exec:gs ''obj_din'', ''records''"><img title="<<$journal_tooltip>>" height = <<set_miconht>> src="images/system/menu icons/<<$journalIcon>>"></a></td>'
  90. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs''$menu_setting''"><img title="Menu & Cheatmenu" height = <<set_miconht>> src="images/system/menu icons/icon_menu.png"></a></td>'
  91. $menuBarTab += '</tr></table>'
  92. $stat_msg += func('cleanHTML',$menuBarTab)
  93. killvar '$menuBarTab'
  94. elseif menu_off = 1:
  95. $menuBarTab = '<table><tr>'
  96. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/menu icons/icon_character.png"></a></td>'
  97. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/menu icons/icon_lookself.png"></a></td>'
  98. if bag > 0:
  99. $menuBarTab += '<td><a href="exec:gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/menu icons/icon_purse.png"></a></td>'
  100. end
  101. $menuBarTab += '<td><a href="exec:gs ''telefon'',''Phone_menu''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/menu icons/icon_phone.png"></a></td>'
  102. $menuBarTab += '<td><a href="exec:gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/menu icons/<<$journalIcon>>"></a></td>'
  103. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/menu icons/icon_menu.png"></a></td>'
  104. $menuBarTab += '</tr></table>'
  105. $stat_msg += func('cleanHTML',$menuBarTab)
  106. killvar '$menuBarTab'
  107. end
  108. !!----------------- Money -------------------------------
  109. if bankAccount = 0 and stolmoney = 0:
  110. $stat_msg += 'You have <b><<money>> ₽</b> in your '+iif(bag > 0, 'purse.', 'pockets.')
  111. else
  112. $stat_msg += '<br>'+iif(bag > 0, 'Purse.', 'Pockets.')+': <b><<money>> ₽</b>'
  113. if stolmoney > 0: $stat_msg += ', Drawer <b><<stolmoney>> ₽</b>'
  114. if bankAccount = 1:
  115. if karta >= 0:
  116. $stat_msg += ', Bank: <b><<karta>> ₽</b>'
  117. else
  118. $stat_msg += '<font color="red"> Your bank account is overdrawn by <b><<karta>> ₽</b>!!</font>'
  119. end
  120. end
  121. end
  122. !!---------------- Messages for Icons/Texts (Start)--------------------------
  123. if cheatNoSweat = 0:
  124. if pcs_sweat < 0:
  125. pcs_sweat = 0
  126. elseif pcs_sweat > 69:
  127. pcs_sweat = 69
  128. end
  129. if pcs_sweat > 59:
  130. $stat_sweat_msg = 'You are dripping wet from sweat and smell like a gym sock.'
  131. elseif pcs_sweat > 49:
  132. $stat_sweat_msg = 'You really stink.'
  133. elseif pcs_sweat > 39:
  134. $stat_sweat_msg = 'You stink.'
  135. elseif pcs_sweat > 29:
  136. $stat_sweat_msg = 'You are a little smelly.'
  137. elseif pcs_sweat > 19:
  138. $stat_sweat_msg = 'You''re sweating.'
  139. elseif pcs_sweat > 9 and deodorant_on = 1:
  140. $stat_sweat_msg = 'You feel fresh with your deodorant.'
  141. elseif arrsize('sparrvol') = 0:
  142. $stat_sweat_msg = 'You are sparkling clean.'
  143. elseif deodorant_on = 1:
  144. $stat_sweat_msg = 'You feel fresh with your deodorant on.'
  145. else
  146. $stat_sweat_msg = ''
  147. end
  148. end
  149. if body_write > 1 and face_write = 0:
  150. $stat_writing_msg = 'Your body is inscribed with derogatory graffiti.'
  151. elseif body_write = 1 and face_write = 0:
  152. $stat_writing_msg = 'Your body has an obscene message written on it.'
  153. elseif body_write = 0 and face_write > 1:
  154. $stat_writing_msg = 'Your face is covered in obscene writing.'
  155. elseif body_write = 0 and face_write = 1:
  156. $stat_writing_msg = 'Your face has a humiliating label written on it.'
  157. elseif body_write > 0 and face_write > 0:
  158. $stat_writing_msg = 'Your body and face are covered in obscene graffiti.'
  159. else
  160. $stat_writing_msg = ''
  161. end
  162. if pcs_energy < 5:
  163. $stat_hunger_msg = 'You feel faint from hunger, if you don''t have something to eat very soon, you will pass out.'
  164. $stat_hunger_tooltip = 'You feel faint from hunger.'
  165. elseif pcs_energy < 10:
  166. $stat_hunger_msg = 'You are starving, you really need to have something to eat.'
  167. $stat_hunger_tooltip = 'You are starving.'
  168. elseif pcs_energy < 20:
  169. $stat_hunger_msg = 'You are very hungry and struggle to concentrate on anything other than food.'
  170. $stat_hunger_tooltip = 'You are very hungry.'
  171. elseif pcs_energy < 30:
  172. $stat_hunger_msg = 'You feel peckish and your thoughts sometimes drift towards food.'
  173. $stat_hunger_tooltip = 'You feel peckish.'
  174. else
  175. $stat_hunger_msg = ''
  176. end
  177. if pcs_hydra < 5:
  178. $stat_thirst_msg = 'You feel light-headed, if you don''t have something to drink very soon, you will pass out.'
  179. $stat_thirst_tooltip = 'You feel light-headed.'
  180. elseif pcs_hydra < 10:
  181. $stat_thirst_msg = 'You are dehydrated, you really need to have something to drink.'
  182. $stat_thirst_tooltip = 'You are dehydrated.'
  183. elseif pcs_hydra < 20:
  184. $stat_thirst_msg = 'You are thirsty and your dry throat is irritating and distracting you.'
  185. $stat_thirst_tooltip = 'You are thirsty.'
  186. elseif pcs_hydra < 30:
  187. $stat_thirst_msg = 'You feel a little thirsty and your mouth is a little dry.'
  188. $stat_thirst_tooltip = 'You feel a little thirsty.'
  189. else
  190. $stat_thirst_msg = ''
  191. end
  192. if pcs_sleep < 5:
  193. $stat_sleep_msg = 'You can''t keep your eyes open, if you don''t go to bed now, you will fall asleep right here.'
  194. $stat_sleep_tooltip = 'You can''t keep your eyes open.'
  195. elseif pcs_sleep < 10:
  196. $stat_sleep_msg = 'You are exhausted, you really need to go to bed soon.'
  197. $stat_sleep_tooltip = 'You are exhausted.'
  198. elseif pcs_sleep < 20:
  199. $stat_sleep_msg = 'You are tired and you are struggling to concentrate.'
  200. $stat_sleep_tooltip = 'You are tired.'
  201. elseif pcs_sleep < 30:
  202. $stat_sleep_msg = 'You feel a little tired.'
  203. $stat_sleep_tooltip = 'You feel a little tired.'
  204. else
  205. $stat_sleep_msg = ''
  206. end
  207. if hypnoAddict > 0 and hypnoWithdrawal = 1 and missCum >= timeTresh:
  208. $stat_hypno_msg = 'You really miss the feeling of sperm in your body, you are strangely craving it. You should talk to your therapist about it.'
  209. $stat_hypno_tooltip = 'Talk to your therapist.'
  210. elseif hypnoAddict > 0 and hypnoWithdrawal = 1 and missCum < timeTresh:
  211. $stat_hypno_msg = 'You feel like talking to your therapist. You miss your sessions.'
  212. $stat_hypno_tooltip = 'Maybe visit your therapist.'
  213. elseif hypnoAddict > 0 and hypnoWithdrawal = 2 and missCum >= timeTresh:
  214. $stat_hypno_msg = 'You want some sperm inside of you NOW! You have to talk to your therapist, immediately.'
  215. $stat_hypno_tooltip = 'Talk to your therapist, immediately.'
  216. elseif hypnoAddict > 0 and hypnoWithdrawal = 1 and missCum < timeTresh:
  217. $stat_hypno_msg = 'You need to talk to your therapist. You feel unbalanced without your sessions.'
  218. $stat_hypno_tooltip = 'Talk to your therapist.'
  219. elseif hypnoAddict > 0:
  220. $stat_hypno_msg = 'You miss the feeling of sperm in your body and you feel moody.'
  221. $stat_hypno_tooltip = 'Maybe visit your therapist.'
  222. else
  223. $stat_hypno_msg = ''
  224. end
  225. if courthearing_date - 1 = daystart:
  226. $stat_court_msg = 'You have a court hearing tomorrow between 07:00 and 11:00. The court is located in the city center of St.Petersburg.'
  227. $stat_court_tooltip = 'Court hearing tomorrow (07:00 and 11:00).'
  228. elseif courthearing_date = daystart and hour < 11:
  229. $stat_court_msg = 'You have a court hearing today between 07:00 and 11:00. The court is located in the city center of St.Petersburg.'
  230. $stat_court_tooltip = 'Court hearing today (07:00 - 11:00).'
  231. else
  232. $stat_court_msg = ''
  233. end
  234. if frost > 0 and frost < 6:
  235. $stat_frost_msg = 'You are a little chilly.'
  236. elseif frost > 0 and frost < 11:
  237. $stat_frost_msg = 'You are cold.'
  238. elseif frost > 0:
  239. $stat_frost_msg = 'You are freezing.'
  240. else
  241. $stat_frost_msg = ''
  242. end
  243. if sick = 1:
  244. $stat_sick_tooltip = 'You are have a mild cold.'
  245. $stat_sick_msg = 'This is not good, a tickle in the throat and a little runny nose.'
  246. elseif sick > 0 and sick < 24:
  247. $stat_sick_tooltip = 'You are have a cold.'
  248. $stat_sick_msg = 'You have chills. You nose is running and throat is raw, you cough and sneeze - it looks like you got a cold.'
  249. elseif sick > 0 and sick < 48:
  250. $stat_sick_tooltip = 'You are have a serious cold.'
  251. $stat_sick_msg = 'You have a fever. Your nose is clogged, it hurts to swallow - throat aches. You continually cough and sneeze - it looks like your cold is pretty bad.'
  252. elseif sick > 0 and sick < 72:
  253. $stat_sick_tooltip = 'You are have the flu.'
  254. $stat_sick_msg = 'You have a high fever. You have a stuffy nose, sore head and throat, your coughing badly - it looks like you got a strong cold. Maybe it''s the flu.'
  255. elseif sick > 0:
  256. $stat_sick_tooltip = 'You are seriously sick.'
  257. $stat_sick_msg = 'You toss in the heat. You have a stuffy nose, headache and ache to the bone. Your throat is inflamed and very sore. You think you''re going to cough up a lung - it looks like you are seriously ill, or maybe it''s just a sore throat.'
  258. else
  259. $stat_sick_msg = ''
  260. end
  261. if week = 1:
  262. $stat_school_schedule = ' Today you have the following lessons math, russian, literature, art, biology and P.E.'
  263. elseif week = 2:
  264. $stat_school_schedule = ' Today you have the following lessons english, geography, science, shop, computer, music.'
  265. elseif week = 3:
  266. $stat_school_schedule = ' Today you have the following lessons math, russian, biology, history, computer and P.E.'
  267. elseif week = 4:
  268. $stat_school_schedule = ' Today you have the following lessons english, geography, science, shop, computer and music.'
  269. elseif week = 5:
  270. $stat_school_schedule = ' Today you have the following lessons math, russian, literature, art, history and P.E.'
  271. else
  272. $stat_school_schedule = ''
  273. end
  274. if StoryLine = 1 and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and hour < 9:
  275. $stat_school_msg = 'You have to be at school before 07:55 if you don''t want to be late.'
  276. $stat_school_tooltip = 'School starts at 07:55.'
  277. elseif StoryLine = 1 and SchoolAtestat = 0 and week = 6 and hour < 9 and detention_set = 1 and SchoolAtestat = 0:
  278. $stat_school_msg = 'You have detention this morning and must be at school before 09:00.'
  279. $stat_school_tooltip = 'Detention starts at 09:00.'
  280. else
  281. $stat_school_msg = ''
  282. $stat_school_icon_msg = ''
  283. end
  284. if $stat_school_msg ! '': $stat_school_icon_msg = $stat_school_msg + $stat_school_schedule
  285. $stat_bra_msg = ''
  286. $stat_bra_text = ''
  287. if $clothingworntype ! 'nude':
  288. if CloThinness = 6:
  289. if $clothingworntype = 'swimwear':
  290. $stat_bra_msg = 'Your breasts are clearly showing through your transparent swimsuit.'
  291. $stat_bra_text = '<BR><font color = #FF00FF><<$stat_bra_msg>></font>'
  292. elseif $braworntype = 'exhibitionist':
  293. $stat_bra_msg = 'Your breasts are fully on display through your transparent bra and top.'
  294. $stat_bra_text = '<BR><font color = #FF00FF><<$stat_bra_msg>></font>'
  295. elseif $braworntype ! 'none':
  296. $stat_bra_msg = 'Your bra is clearly showing through your transparent top.'
  297. $stat_bra_text = '<BR><font color = #FF00FF><<$stat_bra_msg>></font>'
  298. else
  299. $stat_bra_msg = 'Your breasts are fully on display through your transparent top.'
  300. $stat_bra_text = '<BR><font color = #FF00FF><<$stat_bra_msg>></font>'
  301. end
  302. elseif CloThinness = 5:
  303. if $clothingworntype = 'swimwear':
  304. $stat_bra_msg = 'Your nipples are fully outlined through your swimsuit.'
  305. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  306. elseif $braworntype = 'exhibitionist':
  307. $stat_bra_msg = 'Your nipples are being fully outlined through the thin fabric of your top and bra.'
  308. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  309. elseif $braworntype ! 'none':
  310. $stat_bra_msg = 'Your bra is being outlined through your top.'
  311. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  312. elseif $braworntype = 'none' and pcs_horny >= 50:
  313. $stat_bra_msg = 'Your aroused nipples are hard and showing through your top.'
  314. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  315. elseif $braworntype = 'none' and temper < 14:
  316. $stat_bra_msg = 'Your nipples are freezing cold and visibly hard through your top.'
  317. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  318. elseif CloBra = 1:
  319. $stat_bra_msg = 'Your top is replacing a bra.'
  320. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  321. elseif $braworntype = 'none':
  322. $stat_bra_msg = 'Your nipples are being completely outlined through your thin top.'
  323. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  324. end
  325. elseif CloThinness = 4:
  326. if $clothingworntype = 'swimwear':
  327. $stat_bra_msg = 'Your nipples are slightly poking through your swimsuit.'
  328. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  329. elseif $braworntype = 'exhibitionist':
  330. $stat_bra_msg = 'You are wearing such a thin bra that your nipples are still being fainly outlined through your top.'
  331. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  332. elseif $braworntype ! 'none':
  333. $stat_bra_msg = 'Your bra is being outlined through your top.'
  334. elseif $braworntype = 'none' and pcs_horny >= 50:
  335. $stat_bra_msg = 'Your aroused nipples are visibly hard.'
  336. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  337. elseif $braworntype = 'none' and temper < 14:
  338. $stat_bra_msg = 'Your nipples are freezing cold and visibly hard through your top.'
  339. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  340. elseif CloBra = 1:
  341. $stat_bra_msg = 'Your top is replacing a bra.'
  342. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  343. elseif $braworntype = 'none':
  344. $stat_bra_msg = 'Your nipples are being faintly outlined through your top.'
  345. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  346. end
  347. elseif CloBra = 1:
  348. $stat_bra_msg = 'Your top is replacing a bra.'
  349. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  350. elseif $braworntype = 'none' and pcs_horny >= 50:
  351. $stat_bra_msg = 'You are not wearing a bra and your aroused nipples are rock hard.'
  352. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  353. elseif $braworntype = 'none' and temper < 14:
  354. $stat_bra_msg = 'You are not wearing a bra and your nipples are freezing cold.'
  355. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  356. elseif $braworntype = 'none':
  357. $stat_bra_msg = 'You are not wearing a bra.'
  358. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  359. end
  360. end
  361. $stat_panty_msg = ''
  362. $stat_panty_text = ''
  363. if $pantyworntype = 'none' and $clothingworntype ! 'swimwear':
  364. if PCloStyle = 4:
  365. $stat_panty_msg = 'You are not wearing panties, but you are dressed as a hooker, so that''s hardly surprising.'
  366. $stat_panty_text = '<BR><font color= #FF00FF><<$stat_panty_msg>></font>'
  367. elseif PCloBimbo = 1 or bimbolevel > 0 and PCloSkirt > 3 and cheatBimbo = 0:
  368. $stat_panty_msg = 'You like, totally forgot to put on any panties. You are such a bimbo.'
  369. $stat_panty_text = '<BR><font color = #FF00FF><<$stat_panty_msg>></font>'
  370. elseif PCloSkirt > 3 and pcs_inhib > 50:
  371. $stat_panty_msg = 'You feel liberated not wearing panties as your naked ass flashes from under your short skirt.'
  372. $stat_panty_text = '<BR><font color=#0064FF><<$stat_panty_msg>></font>'
  373. elseif PCloSkirt > 3 and pcs_inhib <= 50:
  374. $stat_panty_msg = 'Your face is flushed with shame, you are not wearing panties and your naked ass flashes from under your short skirt.'
  375. $stat_panty_text = '<BR><b><font color="red"><<$stat_panty_msg>></font></b>'
  376. elseif PCloPants > 0 and $braworntype = 'none':
  377. $stat_panty_msg = 'You aren''t wearing underwear, and your bare pussy is rubbing against your clothing.'
  378. $stat_panty_text = '<BR><b><font color="red"><<$stat_panty_msg>></font></b>'
  379. elseif PCloPants > 0 and $braworntype ! 'none':
  380. $stat_panty_msg = 'You aren''t wearing panties, and your bare pussy is rubbing against your clothing.'
  381. $stat_panty_text = '<BR><b><font color="red"><<$stat_panty_msg>></font></b>'
  382. elseif towel = 1:
  383. $stat_panty_msg = 'Your naked body is covered only by a short towel.'
  384. $stat_panty_text = '<BR><font color = #AB052A><<$stat_panty_msg>></font>'
  385. elseif $clothingworntype ! 'nude':
  386. $stat_panty_msg = 'You are not wearing '+iif($braworntype = 'none', 'any underwear.', 'panties.')
  387. $stat_panty_text = '<BR><font color = #AB052A><<$stat_panty_msg>></font>'
  388. end
  389. elseif $pantyworntype = 'exhibitionist' and $clothingworntype ! 'swimwear':
  390. if PCloStyle = 4:
  391. $stat_panty_msg = 'You are wearing see-through panties, but you are dressed as a hooker, so that''s hardly surprising.'
  392. $stat_panty_text = '<BR><font color= #FF00FF><<$stat_panty_msg>></font>'
  393. elseif PCloSkirt > 3 and pcs_inhib > 50:
  394. $stat_panty_msg = 'You feel liberated as your ass, clearly visible through your panties, flashes from under your short skirt.'
  395. $stat_panty_text = '<BR><font color=#0064FF><<$stat_panty_msg>></font>'
  396. elseif PCloSkirt > 3 and pcs_inhib <= 50:
  397. $stat_panty_msg = 'Your face is flushed with shame, you are wearing panties so thin, they leave your ass clearly visible, as it flashes from under your short skirt.'
  398. $stat_panty_text = '<BR><b><font color="red"><<$stat_panty_msg>></font></b>'
  399. end
  400. end
  401. $stat_clothes_msg = ''
  402. $stat_clothes_text = ''
  403. if $clothingworntype = 'nude':
  404. if $pantyworntype = 'exhibitionist':
  405. if $braworntype = 'none':
  406. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through panties and your boobs sway invitingly as you walk.</font>'
  407. $stat_clothes_tooltip = 'You are wearing your see-through panties.'
  408. $stat_clothes_msg = 'You are only wearing your see-through panties and your boobs sway invitingly as you walk.'
  409. elseif $braworntype = 'exhibitionist':
  410. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through underwear.</font>'
  411. $stat_clothes_tooltip = 'You are wearing your see-through underwear.'
  412. $stat_clothes_msg = 'You are only wearing your see-through underwear.'
  413. else
  414. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through panties and bra.</font>'
  415. $stat_clothes_tooltip = 'You are wearing your see-through panties and bra.'
  416. $stat_clothes_msg = 'You are only wearing your see-through panties and bra.'
  417. end
  418. elseif $pantyworntype ! 'none':
  419. if $braworntype = 'none':
  420. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your panties and your boobs sway invitingly as you walk.</font>'
  421. $stat_clothes_tooltip = 'You are wearing your panties.'
  422. $stat_clothes_msg = 'You are only wearing your panties and your boobs sway invitingly as you walk.'
  423. elseif $braworntype = 'exhibitionist':
  424. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through bra and panties.</font>'
  425. $stat_clothes_tooltip = 'You are wearing your see-through bra and panties.'
  426. $stat_clothes_msg = 'You are only wearing your see-through bra and panties.'
  427. else
  428. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your underwear.</font>'
  429. $stat_clothes_tooltip = 'You are wearing your underwear.'
  430. $stat_clothes_msg = 'You are wearing your underwear.'
  431. end
  432. else
  433. if $braworntype ! 'none':
  434. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your bra, leaving your pussy and ass completely exposed.</font>'
  435. $stat_clothes_tooltip = 'You are only wearing your bra.'
  436. $stat_clothes_msg = 'You are only wearing your bra, leaving your pussy and ass completely exposed.'
  437. else
  438. if pcs_inhib < 5:
  439. $stat_clothes_text = '<BR><b><font color = #AB052A>You are completely naked, and it makes you feel nervous and ashamed.</font></b>'
  440. $stat_clothes_tooltip = 'You don''t like being naked.'
  441. $stat_clothes_msg = 'You are completely naked, and it makes you feel nervous and ashamed.'
  442. elseif pcs_inhib < 20:
  443. $stat_clothes_text = '<BR><b><font color = orange>You are completely naked, you''re not too comfortable with nudity but it is a little exciting.</font></b>'
  444. $stat_clothes_tooltip = 'It''s a bit exciting to be naked.'
  445. $stat_clothes_msg = 'You are completely naked, you''re not too comfortable with nudity but it is a little exciting.'
  446. elseif pcs_inhib >= 90:
  447. $stat_clothes_text = '<BR><b><font color=#0064FF>You are completely naked, which is far better than having to wear clothes.</font></b>'
  448. $stat_clothes_tooltip = 'Being naked is far better than wearing clothes.'
  449. $stat_clothes_msg = 'You are completely naked, which is far better than having to wear clothes.'
  450. else
  451. $stat_clothes_text = '<BR><b><font color = #FF00FF>You are completely naked. It''s exciting and you feel tingly inside.</font></b>'
  452. $stat_clothes_tooltip = 'It''s exciting to be naked.'
  453. $stat_clothes_msg = 'You are completely naked. It''s exciting and you feel tingly inside.'
  454. end
  455. end
  456. end
  457. $stat_clothes_style = 'nude'
  458. elseif $clothingworntype = 'exercise':
  459. if PCloBimbo = 1 and cheatBimbo = 0:
  460. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  461. $stat_clothes_msg = 'You are wearing a gym outfit a bimbo would wear.'
  462. $stat_clothes_tooltip = 'Bimbo gym outfit.'
  463. $stat_clothes_style = 'exercise_b'
  464. elseif PCloInhibit >= 30:
  465. $stat_clothes_msg = 'You''re wearing a revealing gym outfit.'
  466. $stat_clothes_tooltip = 'Revealing gym outfit.'
  467. $stat_clothes_style = 'exercise_s'
  468. elseif PCloInhibit >= 20:
  469. $stat_clothes_msg = 'You''re wearing a slightly revealing gym outfit.'
  470. $stat_clothes_tooltip = 'Slightly revealing gym outfit.'
  471. $stat_clothes_style = 'exercise_s'
  472. else
  473. $stat_clothes_msg = 'You''re wearing a normal gym outfit.'
  474. $stat_clothes_tooltip = 'Normal gym outfit.'
  475. $stat_clothes_style = 'exercise'
  476. end
  477. elseif $clothingworntype = 'swimwear':
  478. if (PCloInhibit >= 50 or PCloThinness = 6) and PCloBimbo = 1 and cheatBimbo = 0:
  479. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  480. $stat_clothes_msg = 'You''re wearing an exhibitionist swimsuit a bimbo would wear.'
  481. $stat_clothes_tooltip = 'Exhibitionist/Bimbo swimsuit.'
  482. $stat_clothes_style = 'swimsuit_eb'
  483. elseif (PCloInhibit >= 50 or PCloThinness = 6) and (PCloBimbo = 0 or cheatBimbo = 1):
  484. $stat_clothes_msg = 'You are wearing an exhibitionist swimsuit.'
  485. $stat_clothes_tooltip = 'Exhibitionist swimsuit.'
  486. $stat_clothes_style = 'swimsuit_e'
  487. elseif PCloBimbo = 1 and cheatBimbo = 0:
  488. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  489. $stat_clothes_msg = 'You are wearing a swimsuit a bimbo would wear.'
  490. $stat_clothes_tooltip = 'Bimbo swimsuit.'
  491. $stat_clothes_style = 'swimsuit_b'
  492. elseif PCloInhibit >= 40:
  493. $stat_clothes_msg = 'You''re wearing a very revealing swimsuit.'
  494. $stat_clothes_tooltip = 'Very revealing swimsuit.'
  495. $stat_clothes_style = 'swimsuit_s'
  496. elseif PCloInhibit >= 30:
  497. $stat_clothes_msg = 'You''re wearing a revealing swimsuit.'
  498. $stat_clothes_tooltip = 'Revealing swimsuit.'
  499. $stat_clothes_style = 'swimsuit_s'
  500. elseif PCloInhibit >= 25:
  501. $stat_clothes_msg = 'You''re wearing a slightly revealing swimsuit.'
  502. $stat_clothes_tooltip = 'Slightly revealing swimsuit.'
  503. $stat_clothes_style = 'swimsuit_s'
  504. else
  505. $stat_clothes_msg = 'You''re wearing a normal swimsuit.'
  506. $stat_clothes_tooltip = 'Normal swimsuit.'
  507. $stat_clothes_style = 'swimsuit'
  508. end
  509. elseif $clothingworntype = 'office':
  510. if PCloStyle = 4 and PCloBimbo = 1 and cheatBimbo = 0:
  511. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  512. $stat_clothes_msg = 'You''re wearing an office dress a bimbo or a prostitute would wear.'
  513. $stat_clothes_tooltip = 'Prostitute/Bimbo office dress.'
  514. $stat_clothes_style = 'office_pb'
  515. elseif PCloStyle = 4 and (PCloBimbo = 0 or cheatBimbo = 1):
  516. $stat_clothes_msg = 'You''re wearing an office dress a prostitute would wear.'
  517. $stat_clothes_tooltip = 'Prostitute office dress.'
  518. $stat_clothes_style = 'office_p'
  519. elseif (PCloInhibit >= 40 or PCloThinness = 6) and PCloBimbo = 1 and cheatBimbo = 0:
  520. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  521. $stat_clothes_msg = 'You''re wearing an exhibitionist office dress a bimbo would wear.'
  522. $stat_clothes_tooltip = 'Exhibitionist/Bimbo office office dress.'
  523. $stat_clothes_style = 'office_eb'
  524. elseif (PCloInhibit >= 40 or PCloThinness = 6) and (PCloBimbo = 0 or cheatBimbo = 1):
  525. $stat_clothes_msg = 'You are wearing an exhibitionist office dress.'
  526. $stat_clothes_tooltip = 'Exhibitionist office dress.'
  527. $stat_clothes_style = 'office_e'
  528. elseif PCloBimbo = 1 and cheatBimbo = 0:
  529. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  530. $stat_clothes_msg = 'You are wearing an office dress a bimbo would wear.'
  531. $stat_clothes_tooltip = 'Bimbo office dress.'
  532. $stat_clothes_style = 'office_b'
  533. elseif PCloInhibit >= 30:
  534. $stat_clothes_msg = 'You''re wearing a very revealing office dress.'
  535. $stat_clothes_tooltip = 'Very revealing office dress.'
  536. $stat_clothes_style = 'office_s'
  537. elseif PCloInhibit >= 25:
  538. $stat_clothes_msg = 'You''re wearing a revealing office dress.'
  539. $stat_clothes_tooltip = 'Revealing office dress.'
  540. $stat_clothes_style = 'office_s'
  541. elseif PCloInhibit >= 20:
  542. $stat_clothes_msg = 'You''re wearing a slightly revealing office dress.'
  543. $stat_clothes_tooltip = 'Slightly revealing office dress.'
  544. $stat_clothes_style = 'office_s'
  545. else
  546. $stat_clothes_msg = 'You''re wearing a normal office dress.'
  547. $stat_clothes_tooltip = 'Normal office dress.'
  548. $stat_clothes_style = 'office'
  549. end
  550. elseif PCloStyle2 = 4:
  551. if PCloStyle = 4 and PCloBimbo = 1 and cheatBimbo = 0:
  552. if enable_extra_msg = 1: $stat_msg += '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  553. $stat_clothes_msg = 'You''re wearing a school uniform a prostitute or bimbo would wear.'
  554. $stat_clothes_tooltip = 'Prostitute/Bimbo school uniform'
  555. $stat_clothes_style = 'uniform_pb'
  556. elseif PCloStyle = 4 and (PCloBimbo = 0 or cheatBimbo = 1):
  557. $stat_clothes_msg = 'You''re wearing a school uniform a prostitute would wear.'
  558. $stat_clothes_tooltip = 'Prostitute school uniform.'
  559. $stat_clothes_style = 'uniform_p'
  560. elseif PCloBimbo = 1 and cheatBimbo = 0:
  561. if enable_extra_msg = 1: $stat_msg += '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  562. $stat_clothes_msg = 'You''re wearing a school uniform a bimbo would wear.'
  563. $stat_clothes_tooltip = 'Bimbo school uniform.'
  564. $stat_clothes_style = 'uniform_b'
  565. elseif PCloInhibit >= 30:
  566. $stat_clothes_msg = 'You''re wearing a very revealing school uniform.'
  567. $stat_clothes_tooltip = 'Very revealing school uniform.'
  568. $stat_clothes_style = 'uniform_s'
  569. elseif PCloInhibit >= 25:
  570. $stat_clothes_msg = 'You''re wearing a revealing school uniform.'
  571. $stat_clothes_tooltip = 'Revealing school uniform.'
  572. $stat_clothes_style = 'uniform_s'
  573. elseif PCloInhibit >= 20:
  574. $stat_clothes_msg = 'You''re wearing a slightly revealing school uniform.'
  575. $stat_clothes_tooltip = 'Slightly revealing school uniform.'
  576. $stat_clothes_style = 'uniform_s'
  577. else
  578. $stat_clothes_msg = 'You''re wearing a normal school uniform.'
  579. $stat_clothes_tooltip = 'Normal school uniform.'
  580. $stat_clothes_style = 'uniform'
  581. end
  582. elseif $clothingworntype = 'cheap' and clothingwornnumber = '414':
  583. $stat_clothes_text = '<BR><b><font color = "yellow">You are wearing an old hessian sack the hunters gave you.</font></b>'
  584. $stat_clothes_tooltip = 'You''re wearing an hessian sack.'
  585. $stat_clothes_msg = 'You are wearing an old hessian sack the hunters gave you.'
  586. $stat_clothes_style = 'clothes'
  587. else
  588. if PCloStyle = 4 and PCloBimbo = 1 and cheatBimbo = 0:
  589. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  590. $stat_clothes_msg = 'You''re wearing an outfit a bimbo or a prostitute would wear.'
  591. $stat_clothes_tooltip = 'Prostitute/Bimbo outfit.'
  592. $stat_clothes_style = 'clothes_pb'
  593. elseif PCloStyle = 4 and (PCloBimbo = 0 or cheatBimbo = 1):
  594. $stat_clothes_msg = 'You''re wearing an outfit a prostitute would wear.'
  595. $stat_clothes_tooltip = 'Prostitute outfit.'
  596. $stat_clothes_style = 'clothes_p'
  597. elseif (PCloInhibit >= 40 or PCloThinness = 6) and PCloBimbo = 1 and cheatBimbo = 0:
  598. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  599. $stat_clothes_msg = 'You''re wearing exhibitionist clothes a bimbo would wear.'
  600. $stat_clothes_tooltip = 'Exhibitionist/Bimbo outfit.'
  601. $stat_clothes_style = 'clothes_eb'
  602. elseif (PCloInhibit >= 40 or PCloThinness = 6) and (PCloBimbo = 0 or cheatBimbo = 1):
  603. $stat_clothes_msg = 'You are wearing exhibitionist clothes.'
  604. $stat_clothes_tooltip = 'Exhibitionist outfit.'
  605. $stat_clothes_style = 'clothes_e'
  606. elseif PCloBimbo = 1 and cheatBimbo = 0:
  607. $stat_clothes_text = '<BR><font color = #FF00FF>You are dressed as a bimbo</font>'
  608. $stat_clothes_msg = 'You are wearing bimbo clothes.'
  609. $stat_clothes_tooltip = 'Bimbo outfit.'
  610. $stat_clothes_style = 'clothes_b'
  611. elseif PCloInhibit >= 30:
  612. $stat_clothes_msg = 'You''re wearing very revealing clothes.'
  613. $stat_clothes_tooltip = 'Very revealing outfit.'
  614. $stat_clothes_style = 'clothes_s'
  615. elseif PCloInhibit >= 25:
  616. $stat_clothes_msg = 'You''re wearing revealing clothes.'
  617. $stat_clothes_tooltip = 'Revealing outfit.'
  618. $stat_clothes_style = 'clothes_s'
  619. elseif PCloInhibit >= 20:
  620. $stat_clothes_msg = 'You''re wearing slightly revealing clothes.'
  621. $stat_clothes_tooltip = 'Slightly revealing outfit.'
  622. $stat_clothes_style = 'clothes_s'
  623. else
  624. $stat_clothes_msg = 'You''re wearing normal clothes.'
  625. $stat_clothes_tooltip = 'Normal outfit.'
  626. $stat_clothes_style = 'clothes'
  627. end
  628. end
  629. $stat_img_temp = func('$body_image','clothes')
  630. $stat_clothes_msg += '<br><img src="<<$stat_img_temp>>">'
  631. !!------ Cum management (Start) -------
  632. if Enable_clearcum > 0: gs 'cum_cleanup', 'reset'
  633. killvar 'cumvolume'
  634. killvar 'i'
  635. killvar 'knownguy'
  636. killvar 'cumcount'
  637. killvar 'cumowner'
  638. if arrsize('sparrvol') > 0:
  639. !!go through every location
  640. :locationloop
  641. !!start from the freshest load
  642. idx = arrsize('sparrloc')-1
  643. :spermitemloop
  644. !!if the currently examined load loaction is the location of the current cycle, execute
  645. if sparrloc[idx] = i:
  646. !!setting the age of the current load
  647. !! 0: mouth
  648. !! 1: in this hour
  649. !! 2: in four hours
  650. !! 3: at least five hours ago
  651. !! 4: in body (pussy or ass)
  652. !! 5: no more than 12 hours in condom
  653. !! 6: no more than 48 hours in condom
  654. !! 7: more than two days old, in condom
  655. if i = 12:
  656. j = 0
  657. elseif i = 17:
  658. if sparrage[idx] <= 12:
  659. j = 5
  660. elseif sparrage[idx] <= 48:
  661. j = 6
  662. else
  663. j = 7
  664. end
  665. elseif i = 0 or i = 3:
  666. j = 4
  667. else
  668. if sparrage[idx] <= 1:
  669. j = 1
  670. elseif sparrage[idx] <= 5:
  671. j = 2
  672. else
  673. j = 3
  674. end
  675. end
  676. cumvolume['<<i>>:<<j>>'] += sparrvol[idx]
  677. if sparrvol[idx] > 0:
  678. if sparridt[idx] = 0:
  679. !!unknown partner
  680. cumcount['<<i>>:<<j>>'] += 1
  681. elseif sparridt[idx] = 1:
  682. !!known partner
  683. !!storing the name of the cum owner (format: $cumowner[<cum location>:<age of cum>:<index of cum owner>])
  684. if knownguy['<<i>>:<<j>>'] > 0:
  685. gchk = 0
  686. :sameguycheck
  687. if $cumowner['<<i>>:<<j>>:<<gchk>>'] ! $sparrnam[idx] and gchk <= knownguy['<<i>>:<<j>>']:gchk += 1 & jump 'sameguycheck'
  688. if gchk > knownguy['<<i>>:<<j>>']:
  689. $cumowner['<<i>>:<<j>>:<<knownguy[''<<i>>:<<j>>'']>>'] = $sparrnam[idx]
  690. knownguy['<<i>>:<<j>>'] += 1
  691. cumcount['<<i>>:<<j>>'] += 1
  692. end
  693. else
  694. $cumowner['<<i>>:<<j>>:<<knownguy[''<<i>>:<<j>>'']>>'] = $sparrnam[idx]
  695. knownguy['<<i>>:<<j>>'] += 1
  696. cumcount['<<i>>:<<j>>'] += 1
  697. end
  698. end
  699. end
  700. end
  701. if idx > 0:idx -= 1 & jump 'spermitemloop'
  702. if i < 18:i += 1 & jump 'locationloop'
  703. killvar 'i'
  704. killvar 'idx'
  705. killvar 'j'
  706. end
  707. !!Clearing cum location array before positive entries are applied below in the icon and the text message codes
  708. killvar 'cumloc'
  709. $stat_cum_msg = ''
  710. $stat_cum_text = ''
  711. stat_visible_cum = 0
  712. stat_cumloc_check = 0
  713. i = 0
  714. :cumlocloop
  715. if i = 0:
  716. $icon_txtloc = 'your pussy'
  717. $txtloc = 'your <a href="exec:view''images/pc/body/cum/creampie/cumpussy'+rand(1,14)+'.jpg''">pussy</a>'
  718. elseif i = 1:
  719. $icon_txtloc = 'your labia'
  720. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumpussy/cumpus'+rand(1,4)+'.jpg''">labia</a>'
  721. elseif i = 2:
  722. $txtloc = 'the front of your panties'
  723. $icon_txtloc = $txtloc
  724. elseif i = 3:
  725. $icon_txtloc = 'your ass'
  726. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumanal/cumanal'+rand(1,11)+'.jpg''">ass</a>'
  727. elseif i = 4:
  728. $icon_txtloc = 'your butt'
  729. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumass/cumass'+rand(1,6)+'.jpg''">butt</a>'
  730. elseif i = 5:
  731. $txtloc = 'the back of your panties'
  732. $icon_txtloc = $txtloc
  733. elseif i = 6:
  734. $icon_txtloc = 'your clothes near your groin'
  735. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumclothes/'+rand(1,3)+'.jpg''">clothes near your groin</a>'
  736. elseif i = 7:
  737. $icon_txtloc = 'your clothes'
  738. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumclothes/cumclothes'+rand(1,21)+'.jpg''">clothes</a>'
  739. elseif i = 8:
  740. $txtloc = 'your back'
  741. $icon_txtloc = $txtloc
  742. elseif i = 9:
  743. $txtloc = 'your legs'
  744. $icon_txtloc = $txtloc
  745. elseif i = 10:
  746. $txtloc = 'your arms'
  747. $icon_txtloc = $txtloc
  748. elseif i = 11:
  749. if pcs_haircol = 0:
  750. $cum_face_image = 'brown/'
  751. $cum_face_image += rand(1, 31)
  752. elseif pcs_haircol = 1:
  753. $cum_face_image = 'black/'
  754. $cum_face_image += rand(1, 23)
  755. elseif pcs_haircol = 2:
  756. $cum_face_image = 'red/'
  757. $cum_face_image += rand(1, 19)
  758. elseif pcs_haircol = 3:
  759. $cum_face_image = 'blonde/'
  760. $cum_face_image += rand(1, 25)
  761. elseif pcs_haircol > 3:
  762. $cum_face_image = 'custom/'
  763. $cum_face_image += rand(1, 20)
  764. end
  765. $icon_txtloc = 'your face'
  766. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumface/<<$cum_face_image>>.jpg''">face</a>'
  767. killvar 'cum_face_image'
  768. elseif i = 13:
  769. $txtloc = 'your hands'
  770. $icon_txtloc = $txtloc
  771. elseif i = 14:
  772. $icon_txtloc = 'your stomach'
  773. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumbelly/cumbelly'+rand(1,12)+'.jpg''">stomach</a>'
  774. elseif i = 15:
  775. $icon_txtloc = 'your breasts'
  776. $txtloc = 'your <a href="exec:view''images/pc/body/cum/cumtits/cumtits'+rand(1,19)+'.jpg''">breasts</a>'
  777. elseif i = 16:
  778. $icon_txtloc = 'your hair'
  779. $txtloc = 'your hair</a>'
  780. elseif i = 17:
  781. $txtloc = 'in your vagina in a slipped condom'
  782. $icon_txtloc = $txtloc
  783. else
  784. $icon_txtloc = 'the gusset of your panties'
  785. $txtloc = 'the gusset of your panties</a>'
  786. end
  787. j = 0
  788. :ageloop
  789. if cumvolume['<<i>>:<<j>>'] > 0:
  790. !!Cum locations set for checking npc reactions
  791. cumloc[i] = 1
  792. if stat_cumloc_check ! 1 and i ! 12: stat_cumloc_check = 1
  793. !!amount setting
  794. if cumvolume['<<i>>:<<j>>'] > 250:
  795. !! 25 ml, about four-five load, gushing
  796. $txtamount = 'Enormous '
  797. elseif cumvolume['<<i>>:<<j>>'] > 100:
  798. !! 10 ml, about two load, flowing
  799. $txtamount = 'Huge '
  800. elseif cumvolume['<<i>>:<<j>>'] >= 20:
  801. !! 2 ml, seeping out
  802. $txtamount = 'Decent '
  803. else
  804. !! residue amount, no leakage
  805. $txtamount = 'Small '
  806. end
  807. !! if sperm age stage is 4, it means inside the body
  808. if j = 4:
  809. if (vibratorIN = 1 and i = 0) or (analplugin = 1 and i = 3):
  810. $txtproxy = 'being plugged in '
  811. elseif i = 0 and cumvolume['<<i>>:<<j>>'] < pcs_vag*5:
  812. $txtproxy = 'staying inside of '
  813. elseif i = 3 and pcs_ass <= 25:
  814. $txtproxy = 'staying inside of '
  815. else
  816. if cumvolume['<<i>>:<<j>>'] > 250:
  817. $txtproxy = 'gushing out of '
  818. elseif cumvolume['<<i>>:<<j>>'] > 100:
  819. $txtproxy = 'flowing out of '
  820. elseif cumvolume['<<i>>:<<j>>'] >= 40:
  821. $txtproxy = 'seeping out of '
  822. else
  823. $txtproxy = 'staying inside of '
  824. end
  825. end
  826. elseif j >= 5:
  827. !! if sperm age stage is over 4, meaning in condom
  828. if j = 5:
  829. $txtproxy = 'buried '
  830. elseif j = 6:
  831. $txtproxy = 'marinating '
  832. else
  833. $txtproxy = 'rotting '
  834. end
  835. if cumcondslip_deep > (vagina / 2): $txtproxy += 'deep '
  836. elseif j < 4 and j > 0:
  837. !!amount setting
  838. if cumvolume['<<i>>:<<j>>'] > 160:
  839. !! 10 ml, about two load, flowing
  840. $txtproxy = 'coating '
  841. elseif cumvolume['<<i>>:<<j>>'] > 40:
  842. !! 2 ml, seeping out
  843. $txtproxy = 'covering '
  844. else
  845. !! residue amount, no leakage
  846. $txtproxy = 'spattering '
  847. end
  848. if j = 1:
  849. $txtproxy += 'wetly '
  850. elseif j = 2:
  851. $txtproxy += 'dryly '
  852. else
  853. $txtproxy += 'powderly '
  854. end
  855. end
  856. $txtperson = ''
  857. if cumcount['<<i>>:<<j>>'] = 0:
  858. !!ToDo: No idea how to do the icon here (julzor)
  859. $txtiscum = 'some whitish substance '
  860. else
  861. $txtiscum = 'cum'
  862. if cumcount['<<i>>:<<j>>'] = knownguy['<<i>>:<<j>>']:
  863. !! everyone is known (one or more)
  864. if knownguy['<<i>>:<<j>>'] = 1:
  865. $txtperson = $npc_usedname[$cumowner['<<i>>:<<j>>:0']] + ' '
  866. else
  867. kmax = 0
  868. :nullocator1
  869. if $cumowner['<<i>>:<<j>>:<<kmax>>'] ! '':kmax += 1 & jump 'nullocator1'
  870. kmax -= 1
  871. k = 0
  872. :knownloop
  873. $txtperson += $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']]
  874. if k < kmax-1:$txtperson += ', ' & k += 1 & jump 'knownloop'
  875. k += 1
  876. $txtperson += ' and ' + $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] + ' '
  877. end
  878. elseif knownguy['<<i>>:<<j>>'] = 0:
  879. !! no one is known (one or more)
  880. if cumcount['<<i>>:<<j>>'] = 1:
  881. $txtperson += 'some guy '
  882. else
  883. $txtperson += 'some guys '
  884. end
  885. else
  886. !! there are known and unknown guys in the mix
  887. if knownguy['<<i>>:<<j>>'] = 1:
  888. $txtperson = $npc_usedname[$cumowner['<<i>>:<<j>>:0']] + ' and some guy'
  889. else
  890. kmax = 0
  891. :nullocator2
  892. if $cumowner['<<i>>:<<j>>:<<kmax>>'] ! '':kmax += 1 & jump 'nullocator2'
  893. kmax -= 1
  894. k = 0
  895. :mixloop
  896. $txtperson += $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] + ', '
  897. if k < kmax: k += 1 & jump 'mixloop'
  898. $txtperson += 'and some guy'
  899. end
  900. if cumcount['<<i>>:<<j>>'] - knownguy['<<i>>:<<j>>'] > 1:
  901. $txtperson += 's '
  902. else
  903. $txtperson += ' '
  904. end
  905. end
  906. end
  907. $icon_txtiscum = $txtiscum
  908. if j <= 4 and trt_cumeater = 1 and $txtiscum = 'cum': $txtiscum = '<a href="exec:gs ''cum_manage'', ''cumeater'', <<i>>"><font color=#0064FF>' + $txtiscum + '</font></a>'
  909. $txtiscum += ' from '
  910. $icon_txtiscum += ' from '
  911. if i = 0 and j = 4 and vibratorIN = 0 and pcs_vag*10 < cumvolume['<<i>>:<<j>>'] and cumvolume['<<i>>:<<j>>'] >= 20:
  912. $stat_cum_text += '<BR><b><font color="red">' + $txtamount + 'amounts of ' + $txtiscum + $txtperson + 'is ' + $txtproxy + $txtloc + iif($pantyworntype ! 'none', ' into your panties.', ' down your legs.')+'</font></b>'
  913. if $stat_cum_msg ! '': $stat_cum_msg += '<br>'
  914. $stat_cum_msg += $txtamount + 'amounts of ' + $icon_txtiscum + $txtperson + 'is ' + $txtproxy + $icon_txtloc + iif($pantyworntype ! 'none', ' into your panties.', ' down your legs.')
  915. elseif sparragestage >= 5:
  916. if cumcondslip_aware > 0: $stat_cum_text += '<BR><b><font color="red">' + $txtamount + 'amounts of ' + $txtiscum + $txtperson + 'is ' + $txtproxy + $txtloc + '.</font></b>'
  917. if $stat_cum_msg ! '': $stat_cum_msg += '<br>'
  918. $stat_cum_msg += $txtamount + 'amounts of ' + $icon_txtiscum + $txtperson + 'is ' + $txtproxy + $icon_txtloc + '.'
  919. elseif j ! 0:
  920. $stat_cum_text += '<BR><b><font color="red">' + $txtamount + 'amounts of ' + $txtiscum + $txtperson + 'is ' + $txtproxy + $txtloc + '.</font></b>'
  921. if $stat_cum_msg ! '': $stat_cum_msg += '<br>'
  922. $stat_cum_msg += $txtamount + 'amounts of ' + $icon_txtiscum + $txtperson + 'is ' + $txtproxy + $icon_txtloc + '.'
  923. else
  924. $stat_cum_text += '<BR><b><font color="red">Your breath smells like sperm.</font></b>'
  925. if $stat_cum_msg ! '': $stat_cum_msg += '<br>'
  926. $stat_cum_msg += 'Your breath smells like sperm.'
  927. end
  928. end
  929. if j < 7: j+=1 & jump 'ageloop'
  930. if i < 18: i+=1 & jump 'cumlocloop'
  931. killvar 'i'
  932. killvar 'j'
  933. killvar 'txtperson'
  934. killvar 'k'
  935. killvar 'kmax'
  936. killvar 'txtamount'
  937. killvar 'txtiscum'
  938. killvar '$icon_txtiscum'
  939. killvar 'txtperson'
  940. killvar 'txtproxy'
  941. killvar 'txtloc'
  942. killvar '$icon_txtloc'
  943. killvar 'cumvolume'
  944. killvar 'cumcount'
  945. killvar 'knownguy'
  946. killvar 'cumowner'
  947. $stat_visible_cum_temp = ''
  948. $stat_visible_cum_msg = ''
  949. if cumloc[6] = 1 or cumloc[7] = 1 or cumloc[11] = 1 or cumloc[13] = 1 or cumloc[16] = 1:
  950. if cumloc[6] = 1:
  951. stat_visible_cum = 1
  952. if $stat_visible_cum_temp ! '': $stat_visible_cum_temp += ', '
  953. $stat_visible_cum_temp += 'your clothes near your groin'
  954. end
  955. if cumloc[7] = 1:
  956. stat_visible_cum = 1
  957. if $stat_visible_cum_temp ! '': $stat_visible_cum_temp += ', '
  958. $stat_visible_cum_temp += 'your clothes'
  959. end
  960. if cumloc[11] = 1:
  961. stat_visible_cum = 1
  962. if $stat_visible_cum_temp ! '': $stat_visible_cum_temp += ', '
  963. $stat_visible_cum_temp += 'your face'
  964. end
  965. if cumloc[13] = 1:
  966. stat_visible_cum = 1
  967. if $stat_visible_cum_temp ! '': $stat_visible_cum_temp += ', '
  968. $stat_visible_cum_temp += 'your hands'
  969. end
  970. if cumloc[16] = 1:
  971. stat_visible_cum = 1
  972. if $stat_visible_cum_temp ! '': $stat_visible_cum_temp += ', '
  973. $stat_visible_cum_temp += 'your hair'
  974. end
  975. $stat_visible_cum_msg = 'People can see the cum on '+ $stat_visible_cum_temp + '.'
  976. end
  977. !!------ Cum management (End) ------
  978. $stat_bfgf_msg_0 = ''
  979. $stat_bfgf_tooltip_0 = ''
  980. $stat_bfgf_msg_1 = ''
  981. $stat_bfgf_tooltip_1 = ''
  982. $stat_bfgf_msg_2 = ''
  983. $stat_bfgf_tooltip_2 = ''
  984. if hour < meethour[0] and svidanie[0] = 1:
  985. $stat_bfgf_msg_0 = '<<$loverdesc[0]>> will be waiting for you near <<$streetev_home>> at <<meethour[0]>>:00.'
  986. $stat_bfgf_tooltip_0 = 'Your date with <<$loverdesc[0]>> starts at <<meethour[0]>>:00 near <<$streetev_home>>.'
  987. elseif hour = meethour[0] and svidanie[0] = 1:
  988. $stat_bfgf_msg_0 = '<<$loverdesc[0]>> is waiting for you by <<$streetev_home>>.'
  989. $stat_bfgf_tooltip_0 = '<<$loverdesc[0]>> is waiting near <<$streetev_home>>.'
  990. elseif meetday[0] < daystart and svidanie[0] = 1:
  991. pcs_lovers_rel[0] -= 10 & svidanie[0] = 0
  992. end
  993. if hour < meethour[1] and svidanie[1] = 1:
  994. $stat_bfgf_msg_1 = '<<$loverdesc[1]>> will be waiting for you near <<$streetev_home>> at <<meethour[1]>>:00.'
  995. $stat_bfgf_tooltip_1 = 'Your date with <<$loverdesc[1]>> starts at <<meethour[1]>>:00 near <<$streetev_home>>.'
  996. elseif hour = meethour[1] and svidanie[1] = 1:
  997. $stat_bfgf_msg_1 = '<<$loverdesc[1]>> is waiting for you by <<$streetev_home>>.'
  998. $stat_bfgf_tooltip_1 = '<<$loverdesc[1]>> is waiting near <<$streetev_home>>.'
  999. elseif meetday[1] < daystart and svidanie[1] = 1:
  1000. pcs_lovers_rel[1] -= 10 & svidanie[1] = 0
  1001. end
  1002. if hour < meethour[2] and svidanie[2] = 1:
  1003. $stat_bfgf_msg_2 = '<<$loverdesc[2]>> will be waiting for you near <<$streetev_home>> at <<meethour[2]>>:00.'
  1004. $stat_bfgf_tooltip_2 = 'Your date starts at <<meethour[2]>>:00 near <<$streetev_home>>.'
  1005. elseif hour = meethour[2] and svidanie[2] = 1:
  1006. $stat_bfgf_msg_2 = '<<$loverdesc[2]>> is waiting for you by <<$streetev_home>>.'
  1007. $stat_bfgf_tooltip_2 = '<<$loverdesc[2]>> is waiting near <<$streetev_home>>.'
  1008. elseif meetday[2] < daystart and svidanie[2] = 1:
  1009. pcs_lovers_rel[2] -= 10 & svidanie[2] = 0
  1010. end
  1011. !!---------------- Messages for Icons/Texts (End)----------------------------
  1012. if ((young_shop_work = 1 and hour = 16 and week < 6) or (young_shop_work1 = 1 and hour = 9 and week >= 6) or (young_shop_work2 = 1 and hour = 9 and week < 6)) and inWorkYoungShop = 0 and misscheck ! daystart:
  1013. misscheck = daystart
  1014. young_shop_miss += 1
  1015. end
  1016. if pornstack > 0:
  1017. porndays = 0
  1018. :pfilmtime
  1019. if porndays < 200 and pfilmday[porndays] = 0: porndays += 1 & jump 'pfilmtime'
  1020. end
  1021. !!-----------------Status Icons (Start)------------------
  1022. if cheatStatusIcons = 0:
  1023. $stat_msg += '<br><br>'
  1024. !!Row 1: Appearance
  1025. $statusIconBarTab = '<table><tr>'
  1026. $stat_hotcat_msg = 'People would rate your appearance as a <<hotcat>> out of 10.<br><img src="<<func(''$face_image'')>>">'
  1027. $statusIconBarTab += '<td><a href="exec:msg $stat_hotcat_msg"><img title="You are a <<hotcat>> out of 10." height = <<set_siconht>> src="images/system/icon/status_icons/appearance.png"></a></td>'
  1028. if pcs_makeup < 5:
  1029. $statusIconBarTab += '<td><a href="exec:msg $pcs_makeup_msg"><img title="<<$pcs_makeup_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/makeup_'+pcs_makeup+'.png"></a></td>'
  1030. elseif pcs_makeup = 5:
  1031. $statusIconBarTab += '<td><a href="exec:msg $pcs_makeup_msg"><img title="<<$pcs_makeup_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/makeup_4.png"></a></td>'
  1032. end
  1033. if greben = 0 or pcs_hairbsh = 1:
  1034. $stat_brush_msg = 'Your hair is <<$pcs_hairbsh>>.'
  1035. $statusIconBarTab += '<td><a href="exec:msg $stat_brush_msg"><img title="<<$stat_brush_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/hair_'+pcs_hairbsh+'.png"></a></td>'
  1036. else
  1037. $statusIconBarTab += '<td><a href="exec: minut += 2 & pcs_hairbsh = 1 & gs ''stat''"><img title="Click to brush your hair." height = <<set_siconht>> src="images/system/icon/status_icons/hair_0.png"></a></td>'
  1038. end
  1039. if pcs_lipbalm > 0: $statusIconBarTab += '<td><a href="exec: ''Your lips are covered in moisturizing balm.''"><img title="You have applied lip balm." height = <<set_siconht>> src="images/system/icon/status_icons/lipstick.png"></a></td>'
  1040. if false_lashes >= 1:
  1041. $stat_lashes_msg = 'You''re wearing false'+iif(pcs_lashes = 4, ' mink ', ' ')+'lashes.'
  1042. $statusIconBarTab +='<td><a href="exec: $stat_lashes_msg"><img title="<<$stat_lashes_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/lashes.png"></a></td>'
  1043. end
  1044. if deodorant_on = 1 and pcs_sweat < 20: $statusIconBarTab += '<td><a href="exec:msg $stat_sweat_msg"><img title="<<$stat_sweat_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/deodorant.png"></a></td>'
  1045. if pcs_sweat > 19: $statusIconBarTab += '<td><a href="exec:msg $stat_sweat_msg"><img title="<<$stat_sweat_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/need_shower.png"></a></td>'
  1046. if pcs_leghair > 3 or (pubestyle = 1 and pcs_pubes > 3) or (((pubestyle >= 2 and pubestyle <= 7) or pubestyle = 12) and pcs_pubes >= 15) or (pubestyle = 8 and pcs_pubes >= 20) or (pubestyle = 9 and pcs_pubes >= 25) or (pubestyle = 10 and pcs_pubes >= 40):
  1047. if (pubestyle = 1 and pcs_pubes > 3) or (((pubestyle >= 2 and pubestyle <= 7) or pubestyle = 12) and pcs_pubes >= 15) or (pubestyle = 8 and pcs_pubes >= 20) or ((pubestyle = 9 or pubestyle >= 13) and pcs_pubes >= 26) or (pubestyle = 10 and pcs_pubes >= 40):
  1048. $stat_shave_msg = 'You need to shave your'+iif(pcs_leghair > 3, ' legs and ', ' ')+'pussy.'
  1049. elseif pcs_leghair > 3:
  1050. $stat_shave_msg = 'You need to shave your legs.'
  1051. end
  1052. $statusIconBarTab += '<td><a href="exec:msg $stat_shave_msg"><img title="<<$stat_shave_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/need_shave.png"></a></td>'
  1053. end
  1054. $statusIconBarTab += '</tr><tr>'
  1055. !!Row 2: Mood, Arousal, Hunger, Thirst, Health without STDs...
  1056. willpower_percent = (100 * pcs_willpwr)/willpowermax
  1057. if willpower_percent > 60:
  1058. $stat_willpower_msg = 'You feel confident and in control. You still have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
  1059. $stat_willpower_tooltip = 'You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
  1060. $statusIconBarTab += '<td><a href="exec:msg $stat_willpower_msg"><img title="<<$stat_willpower_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/willpower_high.png"></a></td>'
  1061. elseif willpower_percent > 30:
  1062. $stat_willpower_msg = 'You feel like you have less control over yourself than usual. You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
  1063. $stat_willpower_tooltip = 'You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
  1064. $statusIconBarTab += '<td><a href="exec:msg $stat_willpower_msg"><img title="<<$stat_willpower_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/willpower_med.png"></a></td>'
  1065. else
  1066. $stat_willpower_msg = 'In your current state, you could easily be pressured into doing things against your will. You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
  1067. $stat_willpower_tooltip = 'You only have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
  1068. $statusIconBarTab += '<td><a href="exec:msg $stat_willpower_msg"><img title="<<$stat_willpower_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/willpower_low.png"></a></td>'
  1069. end
  1070. if pcs_mood >= 80:
  1071. $statusIconBarTab += '<td><a href="exec:msg ''You are in a great mood.''"><img title="You are in a great mood." height = <<set_siconht>> src="images/system/icon/status_icons/mood_1.png"></a></td>'
  1072. elseif pcs_mood >= 60:
  1073. $statusIconBarTab += '<td><a href="exec:msg ''You are in an OK mood.''"><img title="You are in an OK mood." height = <<set_siconht>> src="images/system/icon/status_icons/mood_2.png"></a></td>'
  1074. elseif pcs_mood >= 40:
  1075. $statusIconBarTab += '<td><a href="exec:msg ''You are in a good mood.''"><img title="You are in a good mood." height = <<set_siconht>> src="images/system/icon/status_icons/mood_3.png"></a></td>'
  1076. elseif pcs_mood >= 20:
  1077. $statusIconBarTab += '<td><a href="exec:msg ''You are in a bad mood.''"><img title="You are in a bad mood." height = <<set_siconht>> src="images/system/icon/status_icons/mood_4.png"></a></td>'
  1078. elseif pcs_mood >= 5:
  1079. $statusIconBarTab += '<td><a href="exec:msg ''You are in a terrible mood.''"><img title="You are in a terrible mood." height = <<set_siconht>> src="images/system/icon/status_icons/mood_5.png"></a></td>'
  1080. else
  1081. $statusIconBarTab += '<td><a href="exec:msg ''You are really depressed and need to improve your mood.''"><img title="You are really depressed." height = <<set_siconht>> src="images/system/icon/status_icons/mood_6.png"></a></td>'
  1082. end
  1083. if menu_off = 0:
  1084. if pain['total'] > 90:
  1085. $statusIconBarTab += '<td><a href="exec: menu_page = 3 & gs ''obj_din'', ''pain''"><img title="You feel you are at your limit with the amount of pain you''re feeling! Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/pain_3.png"></a></td>'
  1086. elseif pain['total'] > 60:
  1087. $statusIconBarTab += '<td><a href="exec: menu_page = 3 & gs ''obj_din'', ''pain''"><img title="You are in a fair amount of pain, making you noticeably uncomfortable. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/pain_2.png"></a></td>'
  1088. elseif pain['total'] > 30:
  1089. $statusIconBarTab += '<td><a href="exec: menu_page = 3 & gs ''obj_din'', ''pain''"><img title="The pain you''re feeling is minimal. It makes you a little uncomfortable. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/pain_1.png"></a></td>'
  1090. end
  1091. else
  1092. if pain['total'] > 90:
  1093. $statusIconBarTab += '<td><a href="exec: msg $stat_disable_msg"><img title="You feel you are at your limit with the amount of pain you''re feeling!" height = <<set_siconht>> src="images/system/icon/status_icons/pain_3.png"></a></td>'
  1094. elseif pain['total'] > 60:
  1095. $statusIconBarTab += '<td><a href="exec: msg $stat_disable_msg"><img title="You are in a fair amount of pain, making you noticeably uncomfortable." height = <<set_siconht>> src="images/system/icon/status_icons/pain_2.png"></a></td>'
  1096. elseif pain['total'] > 30:
  1097. $statusIconBarTab += '<td><a href="exec: msg $stat_disable_msg"><img title="The pain you''re feeling is minimal. It makes you a little uncomfortable." height = <<set_siconht>> src="images/system/icon/status_icons/pain_1.png"></a></td>'
  1098. end
  1099. end
  1100. if pcs_horny > 90:
  1101. $statusIconBarTab += '<td><a href="exec:msg ''You can not stop thinking about sex, you are soaked between your legs from your juices.''"><img title="You can not stop thinking about sex." height = <<set_siconht>> src="images/system/icon/status_icons/arousal_high.png"></a></td>'
  1102. elseif pcs_horny > 60:
  1103. $statusIconBarTab += '<td><a href="exec:msg ''You are a little nervous, feeling itchy between your legs from arousal.''"><img title="You are feeling aroused." height = <<set_siconht>> src="images/system/icon/status_icons/arousal_med.png"></a></td>'
  1104. elseif pcs_horny > 30:
  1105. $statusIconBarTab += '<td><a href="exec:msg ''You are feeling a tingling sensation between your legs.''"><img title="You are feeling a bit aroused." height = <<set_siconht>> src="images/system/icon/status_icons/arousal_low.png"></a></td>'
  1106. end
  1107. if cheatNoEat = 0 and $stat_hunger_msg ! '' and buterbrod = 0:
  1108. $statusIconBarTab += '<td><a href="exec:msg $stat_hunger_msg"><img title="<<$stat_hunger_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/need_food.png"></a></td>'
  1109. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and buterbrod = 1 and menu_off = 0:
  1110. $statusIconBarTab += '<td><a href="exec: buterbrod = 0 & pcs_energy += 40 & cumspclnt = 2 & gs ''cum_cleanup'' & fat += 1 & gs ''stat''"><img title="Click to eat your sandwich." height = <<set_siconht>> src="images/system/icon/status_icons/need_food.png"></a></td>'
  1111. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and buterbrod = 1 and menu_off = 1:
  1112. $statusIconBarTab += '<td><a href="exec: $stat_hunger_msg"><img title="Your sandwich has to wait until you can spare a minute." height = <<set_siconht>> src="images/system/icon/status_icons/need_food.png"></a></td>'
  1113. end
  1114. if cheatNoDrink = 0 and $stat_thirst_msg ! '' and bottle = 0 and refillable_bottle < 2:
  1115. $statusIconBarTab += '<td><a href="exec:msg $stat_thirst_msg"><img title="<<$stat_thirst_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/need_drink.png"></a></td>'
  1116. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and refillable_bottle > 1 and menu_off = 0:
  1117. $statusIconBarTab += '<td><a href="exec: refillable_bottle -= 1 & pcs_hydra += 100 & cumspclnt = 2 & gs ''cum_cleanup'' & gs ''stat''"><img title="Click to drink from your refillable water bottle." height = <<set_siconht>> src="images/system/icon/status_icons/need_drink.png"></a></td>'
  1118. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and bottle > 0 and menu_off = 0:
  1119. $statusIconBarTab += '<td><a href="exec: bottle = 0 & pcs_hydra += 100 & cumspclnt = 2 & gs ''cum_cleanup'' & gs ''stat''"><img title="Click to drink from your water bottle." height = <<set_siconht>> src="images/system/icon/status_icons/need_drink.png"></a></td>'
  1120. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and (bottle > 0 or refillable_bottle > 1) and menu_off = 1:
  1121. $statusIconBarTab += '<td><a href="exec:msg $stat_thirst_msg"><img title="Your water bottle has to wait until you can spare a minute." height = <<set_siconht>> src="images/system/icon/status_icons/need_drink.png"></a></td>'
  1122. end
  1123. if cheatNoSleep= 0 and $stat_sleep_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_sleep_msg"><img title="<<$stat_sleep_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/need_sleep.png"></a></td>'
  1124. $statusIconBarTab += '</tr><tr>'
  1125. !!Row 3: Pregnancy, cum, lactation, STD...
  1126. if menu_off = 0:
  1127. $statusIconBarTab += '<td><a href="exec:dynamic $d_cycreport_choice"><img title="Click to open the cycle menu." height = <<set_siconht>> src="images/system/icon/status_icons/vagina.png"></a></td>'
  1128. elseif menu_off = 1:
  1129. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vagina.png"></a></td>'
  1130. end
  1131. if mesec > 0 and isprok = 0 and isprokp = 0:
  1132. $stat_bleed_msg = 'You need to use your feminine hygiene products'+iif($pantyworntype = 'none', ' and you need to also wear panties if you want to use a sanitary pad.', '.')
  1133. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vperiod_bleeding.png"></a></td>'
  1134. elseif mesec > 0 and (isprok > 0 or isprokp > 0):
  1135. $stat_bleed_msg = 'You''re using feminine hygiene products.'
  1136. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vperiod_sanitaries.png"></a></td>'
  1137. elseif placebopart > 0 and LutH > 0 and knowpreg = 0:
  1138. $stat_bleed_msg = 'Your period is due to start soon.'
  1139. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vunknown.png"></a></td>'
  1140. elseif implant_day > 0 and ((daystart - implant_day) * 24 + hour - implant_hour) < 5:
  1141. $stat_bleed_msg = 'You feel a slight twinge in your abdomen.'
  1142. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vunknown.png"></a></td>'
  1143. elseif thinkpreg = 0 and knowpreg = 0 and cycle ! 6 and pillcon2 <= 30000 and succubusflag ! 1 and cheatSlut = 0 and mesec = 0:
  1144. if abortionbirthdate = 0 and daystart - daylastperiod > 28:
  1145. if (daystart - daylastperiod > 28) and (daystart - daylastperiod <= 35):
  1146. $stat_bleed_msg = 'Your period is late by <<daystart - daylastperiod - 28>> days.'
  1147. elseif (daystart - daylastperiod > 35) and (daystart - daylastperiod <= 42):
  1148. $stat_bleed_msg = 'Your period is late by more than a week!'
  1149. elseif (daystart - daylastperiod > 42) and (daystart - daylastperiod <= 56):
  1150. $stat_bleed_msg = 'Your period is late by more than two weeks! Maybe you should see a doctor?'
  1151. elseif (daystart - daylastperiod > 56) and (daystart - daylastperiod <= 84):
  1152. $stat_bleed_msg = 'Your period is late by more than a month! You really should see a doctor about it.'
  1153. elseif daystart - daylastperiod > 84:
  1154. $stat_bleed_msg = 'You should consider the possibility of a pregnancy, since apparently you no longer have periods.'
  1155. end
  1156. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vunknown.png"></a></td>'
  1157. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate <= 26:
  1158. if daystart - abortionbirthdate <= 13:
  1159. $stat_bleed_msg = 'You are still in your recovery period. Nothing to worry about.'
  1160. elseif daystart - abortionbirthdate > 13 and daystart - abortionbirthdate <= 16:
  1161. $stat_bleed_msg = 'You are maybe still in your recovery period, but there could be a risk.'
  1162. elseif daystart - abortionbirthdate > 16 and daystart - abortionbirthdate <= 21:
  1163. $stat_bleed_msg = 'You should have recovered from you abortion by know... Right?'
  1164. elseif daystart - abortionbirthdate > 21 and daystart - abortionbirthdate <= 26:
  1165. $stat_bleed_msg = 'You should have definitely recovered from your abortion by now.'
  1166. end
  1167. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vunknown.png"></a></td>'
  1168. elseif pregbirthdate ! 0 and daystart - pregbirthdate <= 80:
  1169. if daystart - pregbirthdate <= 41:
  1170. $stat_bleed_msg = 'You are still in your recovery period. Nothing to worry about.'
  1171. elseif daystart - pregbirthdate > 41 and daystart - pregbirthdate <= 48:
  1172. $stat_bleed_msg = 'You are probably still in your recovery period.'
  1173. elseif daystart - pregbirthdate > 48 and daystart - pregbirthdate <= 55:
  1174. $stat_bleed_msg = 'You are maybe still in your recovery period, but there could be a risk.'
  1175. elseif daystart - pregbirthdate > 55 and daystart - pregbirthdate <= 70:
  1176. $stat_bleed_msg = 'You should have recovered by know... Right?'
  1177. elseif daystart - pregbirthdate > 70 and daystart - pregbirthdate <= 80:
  1178. $stat_bleed_msg = 'You should have definitely recovered from giving birth by now.'
  1179. end
  1180. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/vunknown.png"></a></td>'
  1181. end
  1182. elseif preg = 1:
  1183. if thinkpreg = 1 and knowpreg = 0:
  1184. $stat_preg_msg = 'You think you''re pregnant, but aren''t sure.'
  1185. $stat_preg_tooltip = 'I think I''m pregnant.'
  1186. elseif knowpreg = 1:
  1187. $stat_preg_tooltip = 'I''m pregnant.'
  1188. $stat_preg_msg = 'You are pregnant. Your due date is around <<$pregduedate>>.'
  1189. end
  1190. $statusIconBarTab += '<td><a href="exec:msg $stat_preg_msg"><img title="<<$stat_preg_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/vpregnant.png"></a></td>'
  1191. elseif preg = 2:
  1192. $stat_preg_msg = 'Broken water and contractions, it''s pretty clear what is going on. You need to get to a hospital ASAP.'
  1193. $stat_preg_tooltip = 'Go to the hospital, ASAP! You''re in labour!'
  1194. $statusIconBarTab += '<td><a href="exec:msg $stat_preg_msg"><img title="<<$stat_preg_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/labour.png"></a></td>'
  1195. end
  1196. gs 'lact_lib','breast_stat_icons'
  1197. if $stat_cum_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_cum_msg"><img title="You have cum in and/or on your body. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/cum_covered.png"></a></td>'
  1198. if $stat_visible_cum_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_visible_cum_msg"><img title="People can see the cum on your body!" height = <<set_siconht>> src="images/system/icon/status_icons/visible_cum.png"></a></td>'
  1199. if stat_cumloc_check = 1 and trt_cumeater = 1 and cumeater_cheat = 0 and menu_off = 0:
  1200. $statusIconBarTab += '<td><a href="exec: gs ''cum_manage'', ''cumeater_icon'' & gs ''stat''"><img title="Click to lick up all that delicious cum." height = <<set_siconht>> src="images/system/icon/status_icons/cum_eater.png"></a></td>'
  1201. elseif stat_cumloc_check = 1 and trt_cumeater = 1 and cumeater_cheat = 0 and menu_off = 1:
  1202. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/cum_eater.png"></a></td>'
  1203. end
  1204. if stat_cumloc_check = 1 and salfetka > 0 and menu_off = 0:
  1205. $statusIconBarTab += '<td><a href="exec:dynamic $d_salf"><img title="Click to use your wipes." height = <<set_siconht>> src="images/system/icon/status_icons/wipes.png"></a></td>'
  1206. elseif stat_cumloc_check = 1 and salfetka > 0 and menu_off = 1:
  1207. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/wipes.png"></a></td>'
  1208. end
  1209. stat_STD_count = 0
  1210. $stat_STD_msg = ''
  1211. if Gerpes >= 10 and GenHerpes = 1:
  1212. stat_STD_count += 1
  1213. $stat_STD_msg += 'Sores have appeared on your vagina. You have genital herpes.'
  1214. elseif Gerpes >= 5 and GenHerpes = 1:
  1215. stat_STD_count += 1
  1216. $stat_STD_msg += 'Your vagina is red and very itchy. You have genital herpes.'
  1217. elseif Gerpes >= 3 and Orerpes = 1:
  1218. stat_STD_count += 1
  1219. $stat_STD_msg += 'You have cold Sores on your lips. You have oral herpes.'
  1220. end
  1221. if Gerpes >= 20 and GenHerpes = 1:
  1222. stat_STD_count += 1
  1223. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1224. $stat_STD_msg += 'The herpes sores also cover your ass.'
  1225. end
  1226. if Sifilis >= 50:
  1227. stat_STD_count += 1
  1228. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1229. $stat_STD_msg += 'Syphilitic rashes cover your whole body.'
  1230. elseif Sifilis >= 21:
  1231. stat_STD_count += 1
  1232. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1233. $stat_STD_msg += 'You have a single large, hard sore on the lip. You have syphilis.'
  1234. end
  1235. if Triper > 2:
  1236. stat_STD_count += 1
  1237. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1238. $stat_STD_msg += 'It stings, when you''re urinating. You have gonorrhea.'
  1239. end
  1240. if Kandidoz > 30:
  1241. stat_STD_count += 1
  1242. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1243. $stat_STD_msg += 'There''s a white discharge coming from your vagina. You have thrush.'
  1244. end
  1245. if stat_STD_count > 0:
  1246. $stat_STD_tooltip = 'You have '+iif(stat_STD_count = 1, 'a', '<<stat_STD_count>>')+' STD'+iif(stat_STD_count = 1, '.', 's.')+' Click to find out more.'
  1247. $statusIconBarTab += '<td><a href="exec:msg $stat_STD_msg"><img title="<<$stat_STD_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/std.png"></a></td>'
  1248. end
  1249. $statusIconBarTab += '</tr><tr>'
  1250. !!Row 4: Status, Jobs, School, Clothes,...
  1251. if bimbolevel > 0: $statusIconBarTab += '<td><a href="exec:msg $bimbostatus"><img title="<<$bimbo_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/bimbo.png"></a></td>'
  1252. if $stat_hypno_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_hypno_msg"><img title="<<$stat_hypno_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/hypno_addict.png"></a></td>'
  1253. if succubusflag = 1 and succhungry > 0:
  1254. $stat_succ_msg = 'You have needed to feed for <<succhungry>> day'+iif(succhungry > 1, 's.', '.')
  1255. $statusIconBarTab += '<td><a href="exec:msg $stat_succ_msg"><img title="You need to feed." height = <<set_siconht>> src="images/system/icon/status_icons/need_succubus_feeding.png"></a></td>'
  1256. end
  1257. if $stat_court_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_court_msg"><img title="<<$stat_court_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/court.png"></a></td>'
  1258. if $stat_school_icon_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_school_icon_msg"><img title="<<$stat_school_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/school.png"></a></td>'
  1259. if work > 0 or model > 0 or pornstack > 0: $statusIconBarTab += '<td><a href="exec: gt ''journal'', ''records''"><img title="You have a job. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/work.png"></a></td>'
  1260. if $stat_bfgf_msg_0 ! '': $statusIconBarTab += '<td><a href="exec: $stat_bfgf_msg_0"><img title="<<$stat_bfgf_tooltip_0>>" height = <<set_siconht>> src="images/system/icon/status_icons/date.png"></a></td>'
  1261. if $stat_bfgf_msg_1 ! '': $statusIconBarTab += '<td><a href="exec: $stat_bfgf_msg_1"><img title="<<$stat_bfgf_tooltip_1>>" height = <<set_siconht>> src="images/system/icon/status_icons/date.png"></a></td>'
  1262. if $stat_bfgf_msg_2 ! '': $statusIconBarTab += '<td><a href="exec: $stat_bfgf_msg_2"><img title="<<$stat_bfgf_tooltip_2>>" height = <<set_siconht>> src="images/system/icon/status_icons/date.png"></a></td>'
  1263. if $stat_clothes_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_clothes_msg"><img title="<<$stat_clothes_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/<<$stat_clothes_style>>.png"></a></td>'
  1264. if $stat_bra_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_bra_msg"><img title="<<$stat_bra_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/bra.png"></a></td>'
  1265. if $stat_panty_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_panty_msg"><img title="<<$stat_panty_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/panties.png"></a></td>'
  1266. if analplugIN = 1 and vibratorin = 0:
  1267. $statusIconBarTab += '<td><a href="exec:msg ''A butt plug is inside your ass.''"><img title="A butt plug is inside your ass." height = <<set_siconht>> src="images/system/icon/status_icons/tbutt_plug.png"></a></td>'
  1268. elseif analplugIN = 0 and vibratorin = 1:
  1269. $statusIconBarTab += '<td><a href="exec:msg ''A vibrator is inside your vagina.''"><img title="A vibrator is inside your vagina." height = <<set_siconht>> src="images/system/icon/status_icons/tvibrator.png"></a></td>'
  1270. elseif analplugIN = 1 and vibratorin = 1:
  1271. $statusIconBarTab += '<td><a href="exec:msg ''You are wearing a plug and a vibrator.''"><img title="You are wearing a plug and a vibrator." height = <<set_siconht>> src="images/system/icon/status_icons/tdouble_stuffed.png"></a></td>'
  1272. end
  1273. $statusIconBarTab += '</tr><tr>'
  1274. !!Row 5: Drugs and other short term stuff
  1275. if siga > 0:
  1276. $stat_smoker_msg = 'You have <<siga>> cigarette'+iif(siga = 1, '', 's')+iif(smokerNeed > 0 and NarkImmune = 0, ' and you want to smoke.' , '.')
  1277. $statusIconBarTab += '<td><a href="exec:msg $stat_smoker_msg"><img title="<<$stat_smoker_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/cigarettes.png"></a></td>'
  1278. end
  1279. if smoker >= 20 and NarkImmune = 0 and smokerNeed > 20 and siga > 0:
  1280. $statusIconBarTab += '<td><a href="exec: gs ''drugs'',''smoke'' & ''You are smoking a cigarette.''"><img title="You really need to smoke, click to smoke a cigarette." height = <<set_siconht>> src="images/system/icon/status_icons/craving_nicotine.png"></a></td>'
  1281. elseif smoker >= 20 and NarkImmune = 0 and smokerNeed > 20 and siga <= 0:
  1282. $statusIconBarTab += '<td><a href="exec:msg ''You really need to smoke, but you have no cigarettes.''"><img title="You really need to smoke, but you have no cigarettes." height = <<set_siconht>> src="images/system/icon/status_icons/craving_nicotine.png"></a></td>'
  1283. elseif siga > 0:
  1284. $statusIconBarTab += '<td><a href="exec: gs ''drugs'',''smoke'' & ''You are smoking a cigarette.''"><img title="Click to smoke a cigarette." height = <<set_siconht>> src="images/system/icon/status_icons/smoke_cigarette.png"></a></td>'
  1285. end
  1286. if narkday ! daystart and narkoman = 1 and Slomka > 0:
  1287. $stat_drug_msg += 'You need heroin and cocaine.'
  1288. elseif narkday ! daystart and narkoman = 1 and Slomka <= 0:
  1289. $stat_drug_msg += 'You need cocaine.'
  1290. elseif SLomka > 0:
  1291. $stat_drug_msg += 'You need heroin.'
  1292. else
  1293. $stat_drug_msg = ''
  1294. end
  1295. if $stat_drug_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_drug_msg"><img title="<<$stat_drug_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/craving_drugs.png"></a></td>'
  1296. if alko > 0 and alko = 1:
  1297. $statusIconBarTab += '<td><a href="exec:msg ''You feel a little buzz from drinking.''"><img title="You feel a little buzz from drinking." height = <<set_siconht>> src="images/system/icon/status_icons/alko_1.png"></a></td>'
  1298. elseif alko > 0 and alko < 4:
  1299. $statusIconBarTab += '<td><a href="exec:msg ''You are feeling a bit tipsy.''"><img title="You are feeling a bit tipsy." height = <<set_siconht>> src="images/system/icon/status_icons/alko_2.png"></a></td>'
  1300. elseif alko > 0 and alko < 6:
  1301. $statusIconBarTab += '<td><a href="exec:msg ''You are drunk.''"><img title="You are drunk." height = <<set_siconht>> src="images/system/icon/status_icons/alko_3.png"></a></td>'
  1302. elseif alko > 0 and alko < 10:
  1303. $statusIconBarTab += '<td><a href="exec:msg ''You are very drunk.''"><img title="You are very drunk." height = <<set_siconht>> src="images/system/icon/status_icons/alko_4.png"></a></td>'
  1304. elseif alko > 0:
  1305. $statusIconBarTab += '<td><a href="exec:msg ''You are wasted.''"><img title="You are wasted." height = <<set_siconht>> src="images/system/icon/status_icons/alko_4.png"></a></td>'
  1306. end
  1307. if mentats_dose >= 1: $statusIconBarTab += '<td><a href="exec:msg ''You feel sharp and focused.''"><img title="You feel sharp and focused." height = <<set_siconht>> src="images/system/icon/status_icons/drugs.png"></a></td>'
  1308. if aphrodisiac_timer > 0: $statusIconBarTab +='<td><a href="exec:msg ''You are feeling hot and every move causes your groin to tingle.''"><img title="You are feeling hot." height = <<set_siconht>> src="images/system/icon/status_icons/aphro_gum.png"></a></td>'
  1309. if $stat_frost_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_frost_msg"><img title="<<$stat_frost_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/hypothermia.png"></a></td>'
  1310. if sick > 0: $statusIconBarTab += '<td><a href="exec:msg $stat_sick_msg"><img title="<<$stat_sick_tooltip>>" height = <<set_siconht>> src="images/system/icon/status_icons/health.png"></a></td>'
  1311. if recuperation = 1: $statusIconBarTab += '<td><a href="exec:msg ''You are still recovering from major surgery.''"><img title="You are recovering from major surgery." height = <<set_siconht>> src="images/system/icon/status_icons/health.png"></a></td>'
  1312. if bcream_used = 1: $statusIconBarTab += '<td><a href="exec:msg ''Your breasts feel hot and tingly.''"><img title="Your breasts feel hot and tingly." height = <<set_siconht>> src="images/system/icon/status_icons/breast_cream.png"></a></td>'
  1313. if cumcondslip > 0: $statusIconBarTab += '<td><a href="exec:msg ''You feel sick and you are wondering about the used condom you never found. Maybe those two things are related?''"><img title="You feel sick. Click to find out more." height = <<set_siconht>> src="images/system/icon/status_icons/stuck_condom.png"></a></td>'
  1314. if $stat_writing_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_writing_msg"><img title="<<$stat_writing_msg>>" height = <<set_siconht>> src="images/system/icon/status_icons/body_writing.png"></a></td>'
  1315. $statusIconBarTab += '</tr></table>'
  1316. $stat_msg += func('cleanHTML',$statusIconBarTab)
  1317. killvar '$statusIconBarTab'
  1318. else
  1319. $stat_msg += '<br>'
  1320. end
  1321. !!-----------------Status Icons (End)------------------
  1322. !!----------------Stat Display, start--------------------------
  1323. $stat_tool_msg=''
  1324. $stat_extra_msg=''
  1325. if cheatStatusIcons = 1:
  1326. $stat_tool_msg += '<a href="exec:cheatStatusIcons = 0 & gs ''$menu_obnovit''">▽Icons</a> '
  1327. else
  1328. $stat_tool_msg += '<a href="exec:cheatStatusIcons = 1 & gs ''$menu_obnovit''">▲Icons</a> '
  1329. end
  1330. if enable_show_status = 0:
  1331. $stat_tool_msg += '<a href="exec:enable_show_status = 1 & gs ''$menu_obnovit''">▲Status</a> '
  1332. else
  1333. $stat_tool_msg += '<a href="exec:enable_show_status = 0 & gs ''$menu_obnovit''">▽Status</a> '
  1334. end
  1335. if enable_show_status = 0:
  1336. if ETOmenu = 1:
  1337. $stat_extra_msg += '<BR><b><<$pcs_health>></b>'
  1338. $stat_extra_msg += '<BR><b><<$pcs_willpwr>></b>'
  1339. if cheatNoEat = 0: $stat_extra_msg += '<BR><b><<$pcs_energy>></b>'
  1340. if cheatNoDrink = 0: $stat_extra_msg += '<BR><b><<$pcs_hydra>></b>'
  1341. if cheatNoSleep = 0: $stat_extra_msg += '<BR><b><<$pcs_sleep>></b>'
  1342. elseif Enable_scalepic = 2:
  1343. $st_temp='rgb(<<(16777216 + fcolor) mod 256>>,<<(16777216 + fcolor)/256 mod 256>>,<<(16777216 + fcolor)/65536>>)'
  1344. $stat_extra_msg += '<p><font color="<<$st_temp>>"><TABLE width="300" cellpadding="1" cellspacing="0"><TR><TD width="85%">'+FUNC('indiktab', '2', pcs_horny, pcs_horny)+'</TD><TD> Arousal</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '2', pain['total'], pain['total'])+'</TD><TD> Pain</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_health * 100 / healthmax, pcs_health)+'</TD><TD> Health</TD></TR>'
  1345. if MagikDostup = 0: $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_mana * 100 / manamax, pcs_mana)+'</TD><TD> Mana</TD></TR>'
  1346. $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_willpwr * 100 / willpowermax, pcs_willpwr)+'</TD><TD> Willpower</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_stam * 100 / stammax, pcs_stam)+'</TD><TD> Stamina</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_mood, pcs_mood)+'</TD><TD> Mood</TD></TR>'
  1347. if cheatNoEat = 0: $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_energy, pcs_energy)+'</TD><TD> Hunger</TD></TR>'
  1348. if cheatNoDrink = 0: $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_hydra, pcs_hydra)+'</TD><TD> Thirst</TD></TR>'
  1349. if cheatNoSleep = 0: $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_sleep, pcs_sleep)+'</TD><TD> Sleep</TD></TR></TABLE></font></p>'
  1350. else
  1351. gs 'indik', '2', pcs_horny, pcs_horny
  1352. $stat_extra_msg += '<BR><<$ind>> Arousal'
  1353. gs 'indik', '2', pain['total'], pain['total'], pain['damage']
  1354. $stat_extra_msg += '<BR><<$ind>> Pain'
  1355. gs 'indik', '1', pcs_health * 100 / healthmax, pcs_health
  1356. $stat_extra_msg += '<BR><<$ind>> Health'
  1357. if MagikDostup = 0:
  1358. gs 'indik', '1', pcs_mana * 100 / manamax, pcs_mana
  1359. $stat_extra_msg += '<BR><<$ind>> Mana'
  1360. end
  1361. gs 'indik', '1', pcs_willpwr * 100 / willpowermax, pcs_willpwr
  1362. $stat_extra_msg += '<BR><<$ind>> Willpower'
  1363. gs 'indik', '1', pcs_stam * 100 / stammax, pcs_stam
  1364. $stat_extra_msg += '<BR><<$ind>> Stamina'
  1365. gs 'indik', '1', pcs_mood, pcs_mood
  1366. $stat_extra_msg += '<BR><<$ind>> Mood'
  1367. if cheatNoEat = 0:
  1368. gs 'indik', '1', pcs_energy, pcs_energy
  1369. $stat_extra_msg += '<BR><<$ind>> Hunger'
  1370. end
  1371. if cheatNoDrink = 0:
  1372. gs 'indik', '1', pcs_hydra, pcs_hydra
  1373. $stat_extra_msg += '<BR><<$ind>> Thirst'
  1374. end
  1375. if cheatNoSleep = 0:
  1376. gs 'indik', '1', pcs_sleep, pcs_sleep
  1377. $stat_extra_msg += '<BR><<$ind>> Sleep'
  1378. end
  1379. end
  1380. end
  1381. !!----------------Extra messages, start--------------------------
  1382. !!----------------▽Attributes--------------------------
  1383. if Enable_showattr = 0:
  1384. $stat_tool_msg += '<a href="exec:Enable_showattr = 1 & gs ''$menu_obnovit''">▽Attributes</a>'
  1385. else
  1386. $stat_tool_msg += '<a href="exec:Enable_showattr = 0 & gs ''$menu_obnovit''">▲Attributes</a>'
  1387. !skip if this is first message
  1388. if $stat_extra_msg ! null: $stat_extra_msg += '<br><a href="exec:Enable_showattr = 0 & gs ''$menu_obnovit''">▲Attributes:</a>'
  1389. if Enable_scalepic = 2:
  1390. $stat_extra_msg += '<font color="<<$st_temp>>"><TABLE cellpadding="1" cellspacing="0" width="300"><TR><TD width="85%">'+FUNC('indiktab', '1', 100 - pcs_inhib, 100 - pcs_inhib)+'</TD><TD> Inhibition</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_stren, pcs_stren)+'</TD><TD> Strength</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_agil, pcs_agil)+'</TD><TD> Agility</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_vital, pcs_vital)+'</TD><TD> Endurance</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_intel, pcs_intel)+'</TD><TD> Intelligence</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_sprt, pcs_sprt)+'</TD><TD> Spirit</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_react, pcs_react)+'</TD><TD nowrap> Reaction</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_chrsm, pcs_chrsm)+'</TD><TD> Charisma</TD></TR><TR><TD width="85%">'+FUNC('indiktab', '1', pcs_prcptn, pcs_prcptn)+'</TD><TD> Perception</TD></TR>'
  1391. if MagikDostup = 0: $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_magik, pcs_magik)+'</TD><TD> Magic</TD></TR>'
  1392. if succubusflag = 1: $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', sucexcess, sucexcess)+'</TD><TD> Succubus Energy</TD></TR>'
  1393. $stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_apprnc / 2, pcs_apprnc)+'</TD><TD> Attractiveness</TD></TR>'
  1394. if SchoolAtestat = 0 and StoryLine > 0:$stat_extra_msg += '<TR><TD width="85%">'+FUNC('indiktab', '1', pcs_grades, pcs_grades)+'</TD><TD nowrap> School Grades</TD></TR>'
  1395. $stat_extra_msg += '</TABLE></font>'
  1396. else
  1397. gs 'indik', '1', 100 - pcs_inhib, 100 - pcs_inhib
  1398. $stat_extra_msg += '<BR><<$ind>> Inhibition'
  1399. gs 'indik', '1', pcs_stren, pcs_stren
  1400. $stat_extra_msg += '<BR><<$ind>> Strength'
  1401. gs 'indik', '1', pcs_agil, pcs_agil
  1402. $stat_extra_msg += '<BR><<$ind>> Agility'
  1403. gs 'indik', '1', pcs_vital, pcs_vital
  1404. $stat_extra_msg += '<BR><<$ind>> Endurance'
  1405. gs 'indik', '1', pcs_intel, pcs_intel
  1406. $stat_extra_msg += '<BR><<$ind>> Intelligence'
  1407. gs 'indik', '1', pcs_sprt, pcs_sprt
  1408. $stat_extra_msg += '<BR><<$ind>> Spirit'
  1409. gs 'indik', '1', pcs_react, pcs_react
  1410. $stat_extra_msg += '<BR><<$ind>> Reaction'
  1411. gs 'indik', '1', pcs_chrsm, pcs_chrsm
  1412. $stat_extra_msg += '<BR><<$ind>> Charisma'
  1413. gs 'indik', '1', pcs_prcptn, pcs_prcptn
  1414. $stat_extra_msg += '<BR><<$ind>> Perception'
  1415. if MagikDostup = 0:
  1416. gs 'indik', '1', pcs_magik, pcs_magik
  1417. $stat_extra_msg += '<BR><<$ind>> Magic'
  1418. if succubusflag = 1:
  1419. gs 'indik', '1', sucexcess, sucexcess
  1420. $stat_extra_msg += '<BR><<$ind>> Succubus energy'
  1421. end
  1422. end
  1423. gs 'indik', '1', pcs_apprnc / 2, pcs_apprnc
  1424. $stat_extra_msg += '<BR><<$ind>> Attractiveness'
  1425. if SchoolAtestat = 0 and StoryLine > 0:
  1426. gs 'indik', '1', pcs_grades, pcs_grades
  1427. $stat_extra_msg += '<BR><<$ind>> School Grades'
  1428. end
  1429. $stat_extra_msg += '<BR>'
  1430. end
  1431. end
  1432. killvar '$st_temp'
  1433. !!----------------▽Skills--------------------------
  1434. if Enable_showskill = 0:
  1435. $stat_tool_msg += ' <a href="exec:Enable_showskill = 1 & gs ''$menu_obnovit''">▽Skills</a>'
  1436. else
  1437. $stat_tool_msg += ' <a href="exec:Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills</a>'
  1438. !!----------------------▲Skills display------------------------
  1439. $stat_sktool_msg=''
  1440. st_count=0
  1441. $show_table=''
  1442. !!----------------Mental skills--------------------------
  1443. if Enable_show_mental_skill = 0:
  1444. $stat_sktool_msg += ' <a href="exec:Enable_show_mental_skill = 1 & gs ''$menu_obnovit''">◇Mental</a>'
  1445. else
  1446. $stat_sktool_msg += ' <a href="exec:Enable_show_mental_skill = 0 & gs ''$menu_obnovit''">◆Mental</a>'
  1447. if pcs_splcstng > 0 and MagikDostup = 0: gs 'show_table', '<<pcs_splcstng>> Spell Casting', '2'
  1448. if pcs_humint > 0: gs 'show_table', '<<pcs_humint>> People skills', '2'
  1449. if pcs_persuas > 0: gs 'show_table', '<<pcs_persuas>> Persuasion', '2'
  1450. if pcs_observ > 0: gs 'show_table', '<<pcs_observ>> Observation', '2'
  1451. end
  1452. !!-----------------Sport skills--------------------------
  1453. if Enable_show_sport_skill = 0:
  1454. $stat_sktool_msg += ' <a href="exec:Enable_show_sport_skill = 1 & gs ''$menu_obnovit''">◇Sport</a>'
  1455. else
  1456. $stat_sktool_msg += ' <a href="exec:Enable_show_sport_skill = 0 & gs ''$menu_obnovit''">◆Sport</a>'
  1457. if pcs_jab > 0: gs 'show_table', '<<pcs_jab>> Jabs', '2'
  1458. if pcs_punch > 0: gs 'show_table', '<<pcs_punch>> Power Strikes', '2'
  1459. if pcs_kick > 0: gs 'show_table', '<<pcs_kick>> Kicks', '2'
  1460. if pcs_def > 0: gs 'show_table', '<<pcs_def>> Defence', '2'
  1461. if pcs_run > 0: gs 'show_table', '<<pcs_run>> Running', '2'
  1462. if pcs_vball > 0: gs 'show_table', '<<pcs_vball>> Volleyball', '2'
  1463. if pcs_ftbll > 0: gs 'show_table', '<<pcs_ftbll>> Football', '2'
  1464. if pcs_wrstlng > 0: gs 'show_table', '<<pcs_wrstlng>> Wrestling', '2'
  1465. if pcs_shoot > 0: gs 'show_table', '<<pcs_shoot>> Marksmanship', '2'
  1466. if pcs_bushcraft > 0: gs 'show_table', '<<pcs_bushcraft>> Bushcraft', '2'
  1467. if pcs_chess > 0: gs 'show_table', '<<pcs_chess>> Chess', '2'
  1468. if pcs_icesktng > 0: gs 'show_table', '<<pcs_icesktng>> Ice Skating', '2'
  1469. if pcs_gaming > 0: gs 'show_table', '<<pcs_gaming>> Gaming', '2'
  1470. if pcs_pool > 0: gs 'show_table', '<<pcs_pool>> Pool', '2'
  1471. end
  1472. !!-----------------Beauty/Modelling skills---------------
  1473. if Enable_show_beauty_skill = 0:
  1474. $stat_sktool_msg += ' <a href="exec:Enable_show_beauty_skill = 1 & gs ''$menu_obnovit''">◇Beauty</a>'
  1475. else
  1476. $stat_sktool_msg += ' <a href="exec:Enable_show_beauty_skill = 0 & gs ''$menu_obnovit''">◆Beauty</a>'
  1477. if pcs_makupskl > 0: gs 'show_table', '<<pcs_makupskl>> Makeup Skill', '2'
  1478. if pcs_danc > 0: gs 'show_table', '<<pcs_danc>> Modern Dancing', '2'
  1479. if pcs_dancero > 0: gs 'show_table', '<<pcs_dancero>> Erotic Dancing', '2'
  1480. if pcs_dancpol > 0: gs 'show_table', '<<pcs_dancpol>> Pole Dancing', '2'
  1481. if pcs_mdlng > 0: gs 'show_table', '<<pcs_mdlng>> Modelling', '2'
  1482. if pcs_heels > 0: gs 'show_table', '<<pcs_heels>> Heels', '2'
  1483. end
  1484. !!---------------------Artistic skills-------------------
  1485. if Enable_show_art_skill = 0:
  1486. $stat_sktool_msg += ' <a href="exec:Enable_show_art_skill = 1 & gs ''$menu_obnovit''">◇Artistic</a>'
  1487. else
  1488. $stat_sktool_msg += ' <a href="exec:Enable_show_art_skill = 0 & gs ''$menu_obnovit''">◆Artistic</a>'
  1489. if pcs_vokal > 0: gs 'show_table', '<<pcs_vokal>> Singing', '2'
  1490. if pcs_instrmusic > 0: gs 'show_table', '<<pcs_instrmusic>> Instrumental Music', '2'
  1491. if pcs_photoskl > 0: gs 'show_table', '<<pcs_photoskl>> Photography', '2'
  1492. if pcs_artskls > 0: gs 'show_table', '<<pcs_artskls>> Artistic Skills', '2'
  1493. end
  1494. !!----------------------Job skills------------------------
  1495. if Enable_show_job_skill = 0:
  1496. $stat_sktool_msg += ' <a href="exec:Enable_show_job_skill = 1 & gs ''$menu_obnovit''">◇Job</a>'
  1497. else
  1498. $stat_sktool_msg += ' <a href="exec:Enable_show_job_skill = 0 & gs ''$menu_obnovit''">◆Job</a>'
  1499. if pcs_cleaning > 0: gs 'show_table', '<<pcs_cleaning>> Cleaning Skill', '2'
  1500. if pcs_compskl > 0: gs 'show_table', '<<pcs_compskl>> Computer Skill', '2'
  1501. if pcs_comphckng > 0: gs 'show_table', '<<pcs_comphckng>> Hacking', '2'
  1502. if pcs_hndiwrk > 0: gs 'show_table', '<<pcs_hndiwrk>> Handy-work', '2'
  1503. if pcs_sewng > 0: gs 'show_table', '<<pcs_sewng>> Tailoring', '2'
  1504. if pcs_servng > 0: gs 'show_table', '<<pcs_servng>> Serving', '2'
  1505. if pcs_medcn > 0: gs 'show_table', '<<pcs_medcn>> Medicine', '2'
  1506. if workPTU > 1: gs 'show_table','<<teachlevel>> Teacher credibility','2'
  1507. end
  1508. !skip if this is first message
  1509. if $stat_extra_msg ! null:
  1510. $stat_extra_msg += '<br><a href="exec:Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills:</a> <<$stat_sktool_msg>>'
  1511. else
  1512. $stat_extra_msg += '<br><<$stat_sktool_msg>>'
  1513. end
  1514. if st_count > 0 :
  1515. $stat_extra_msg += '<BR><TABLE BORDER=1><<$show_table>></TR></TABLE>'
  1516. end
  1517. end
  1518. killvar 'stat_sktool_msg'
  1519. killvar 'stat_skextra_msg'
  1520. !!----------------▽relations--------------------------
  1521. if Enable_showrelation = 0:
  1522. $stat_tool_msg += ' <a href="exec:Enable_showrelation = 1 & gs ''$menu_obnovit''">▽Relations</a>'
  1523. else
  1524. $stat_tool_msg += ' <a href="exec:Enable_showrelation = 0 & gs ''$menu_obnovit''">▲Relations</a>'
  1525. st_count=0
  1526. $show_table=''
  1527. if npc_QW['A192'] > 0:gs'show_table','Nastja: <<npc_QW[''A192'']>>','2'
  1528. if npc_rel['A218'] > 0:gs'show_table','Tanya: <<npc_rel[''A218'']>>','2'
  1529. if npc_rel['A219'] > 0:gs'show_table','Kat: <<npc_rel[''A219'']>>','2'
  1530. if npc_rel['A220'] > 0:gs'show_table','Vika: <<npc_rel[''A220'']>>','2'
  1531. if npc_rel['A93'] > 0:gs'show_table','Ira: <<npc_rel[''A93'']>>','2'
  1532. if npc_rel['A43'] > 0:gs'show_table','Tamara: <<npc_rel[''A43'']>>','2'
  1533. if alla > 0:gs'show_table','Alla: <<alla>>','2'
  1534. if masha > 0:gs'show_table','Masha: <<masha>>','2'
  1535. if npc_rel['A41'] > 0:gs'show_table','Givi Karapetovich: <<npc_rel[''A41'']>>','2'
  1536. if npc_rel['A42'] > 0:gs'show_table','Ashot: <<npc_rel[''A42'']>>','2'
  1537. if afra > 0:gs'show_table','Blacks: <<afra>>','2'
  1538. if npc_rel['A57'] > 0:gs'show_table','Rex: <<npc_rel[''A57'']>>','2'
  1539. if npc_rel['A217'] > 0:gs'show_table','Pavlin: <<npc_rel[''A217''] >>','2'
  1540. if npc_rel['A69'] > 0:gs'show_table','Mikhail Nikolaevich: <<npc_rel[''A69'']>>','2'
  1541. if npc_rel['A89'] > 0:gs'show_table','Eugene: <<npc_rel[''A89'']>>','2'
  1542. if npc_rel['A112'] > 0:gs'show_table','Sergei Shulgin: <<npc_rel[''A112'']>>','2'
  1543. if npc_rel['A11'] > 0:gs'show_table','Vasily Shulgin: <<npc_rel[''A11'']>>','2'
  1544. if huntersAndreiQw > 0:gs'show_table','Hunter Andrew: <<huntersAndreiQw>>','2'
  1545. if huntersSergeiQw > 0:gs'show_table','Hunter Sergei: <<huntersSergeiQw>>','2'
  1546. if huntersIgorQw > 0:gs'show_table','Hunter Igor: <<huntersIgorQw>>','2'
  1547. if pcs_lovers[0] = 1:gs'show_table', 'BF <<$loverdesc[0]>>: <<loverrelation[0]>>','2'
  1548. if pcs_lovers[1] = 1:gs'show_table', 'BF <<$loverdesc[1]>>: <<loverrelation[1]>>','2'
  1549. if pcs_lovers[2] = 1:gs'show_table', 'BF <<$loverdesc[2]>>: <<loverrelation[2]>>','2'
  1550. if StoryLine > 0:
  1551. if npc_rel['A29'] > 0:gs'show_table','Mother: <<npc_rel[''A29'']>>','2'
  1552. if npc_rel['A28'] > 0:gs'show_table','Father: <<npc_rel[''A28'']>>','2'
  1553. if npc_rel['A33'] > 0:gs'show_table','Sister: <<npc_rel[''A33'']>>','2'
  1554. if npc_rel['A34'] > 0:gs'show_table','Brother: <<npc_rel[''A34'']>>','2'
  1555. end
  1556. if st_count > 0 :
  1557. !skip if this is first message
  1558. if $stat_extra_msg ! null: $stat_extra_msg += '<BR><a href="exec:Enable_showrelation = 0 & gs ''$menu_obnovit''">▲Relations:</a>'
  1559. $stat_extra_msg += '<BR><TABLE BORDER=1> <<$show_table>></TR></TABLE>'
  1560. end
  1561. end
  1562. !!----------------▽image, default to toolbar, can move to top or bottom from setting--------------------------
  1563. if Enable_statimg_loc = 0:
  1564. if Enable_showstatimg = 0:
  1565. $stat_tool_msg += ' <a href="exec:Enable_showstatimg = 1 & gs ''$menu_obnovit''">▽Image</a>'
  1566. else
  1567. $stat_tool_msg += ' <a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image</a>'
  1568. !skip if this is first message
  1569. if $stat_extra_msg ! null:
  1570. $stat_extra_msg += '<br><a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image:</a> <<$stat_imgtool_msg>>'
  1571. else
  1572. $stat_extra_msg += '<br><<$stat_imgtool_msg>>'
  1573. end
  1574. $stat_extra_msg += '<br><<$stat_imgextra_msg>>'
  1575. end
  1576. end
  1577. if enable_extra_msg = 0:
  1578. $stat_tool_msg += ' <a href="exec: enable_extra_msg = 1 & gs ''stat'' ">▽Texts</a>'
  1579. else
  1580. $stat_tool_msg += ' <a href="exec: enable_extra_msg = 0 & gs ''stat''">▲Texts</a>'
  1581. end
  1582. !all end, push back and clean up
  1583. $stat_msg += '<br>'
  1584. $stat_msg += func('cleanHTML',$stat_tool_msg)
  1585. if $stat_extra_msg ! NULL : $stat_msg += func('cleanHTML',$stat_extra_msg)
  1586. $stat_msg += '<br>'
  1587. killvar 'stat_tool_msg'
  1588. killvar 'stat_extra_msg'
  1589. !!----------------Extra messages, End--------------------------
  1590. if enable_extra_msg = 1:
  1591. if opPRE = 0: $stat_msg += '<BR><<$pcs_makeup>> and your hair is <<$pcs_hairbsh>>.' & !$stat_msg += '<BR>'
  1592. if thinkpreg = 0 and knowpreg = 0 and cycle ! 6 and pillcon2 <= 30000 and succubusflag ! 1 and cheatSlut = 0 and mesec = 0:
  1593. if abortionbirthdate = 0 and daystart - daylastperiod > 28:
  1594. if (daystart - daylastperiod > 28) and (daystart - daylastperiod <= 35):
  1595. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by <<daystart - daylastperiod - 28>> days.</b></font>'
  1596. elseif (daystart - daylastperiod > 35) and (daystart - daylastperiod <= 42):
  1597. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by more than a week!</b></font>'
  1598. elseif (daystart - daylastperiod > 42) and (daystart - daylastperiod <= 56):
  1599. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by more than two weeks! Maybe you should see a doctor?</b></font>'
  1600. elseif (daystart - daylastperiod > 56) and (daystart - daylastperiod <= 84):
  1601. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by more than a month! You really should see a doctor about it.</b></font>'
  1602. elseif daystart - daylastperiod > 84:
  1603. $stat_msg += '<BR><font color = #AB052A><b>You should consider the possibility of a pregnancy, since apparently you no longer have periods.</b></font>'
  1604. end
  1605. !!Recovery period after an abortion is ~14-21 days
  1606. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate <= 13:
  1607. $stat_msg += '<BR><font color = #705243><b>You are still in your recovery period. Nothing to worry about.</b></font>'
  1608. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 13 and daystart - abortionbirthdate <= 16:
  1609. $stat_msg += '<BR><font color = #705243><b>You are maybe still in your recovery period, but there could be a risk.</b></font>'
  1610. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 16 and daystart - abortionbirthdate <= 21:
  1611. $stat_msg += '<BR><font color = #820000><b>You should have recovered from you abortion by know... Right?</b></font>'
  1612. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 21:
  1613. $stat_msg += '<BR><font color = #820000><b>You should have definitely recovered from your abortion by now.</b></font>'
  1614. !!Recovery period after giving birth is ~42-70 days
  1615. elseif pregbirthdate ! 0 and daystart - pregbirthdate <= 41:
  1616. $stat_msg += '<BR><font color = #705243><b>You are still in your recovery period. Nothing to worry about.</b></font>'
  1617. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 41 and daystart - pregbirthdate <= 48:
  1618. $stat_msg += '<BR><font color = #705243><b>You are probably still in your recovery period.</b></font>'
  1619. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 48 and daystart - pregbirthdate <= 55:
  1620. $stat_msg += '<BR><font color = #705243><b>You are maybe still in your recovery period, but there could be a risk.</b></font>'
  1621. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 55 and daystart - pregbirthdate <= 70:
  1622. $stat_msg += '<BR><font color = #820000><b>You should have recovered by know... Right?</b></font>'
  1623. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 70:
  1624. $stat_msg += '<BR><font color = #820000><b>You should have definitely recovered from giving birth by now.</b></font>'
  1625. end
  1626. end
  1627. if implant_day > 0 and ((daystart - implant_day) * 24 + hour - implant_hour) < 5:
  1628. $stat_msg += '<BR><font color=#AB052A>You feel a slight twinge in your abdomen.</font>'
  1629. end
  1630. if mesec > 0:
  1631. $stat_msg += '<BR><font color="red">You are currently having your period. '
  1632. if isprok = 0 and isprokp = 0:
  1633. $stat_msg += 'You need to use your feminine hygiene products.'
  1634. elseif isprokp = 1 and $pantyworntype = 'none':
  1635. isprokp = 0
  1636. $stat_msg += 'You need to wear panties to use a sanitary pad.'
  1637. end
  1638. $stat_msg += '</font>'
  1639. elseif placebopart > 0 and LutH > 0 and knowpreg = 0:
  1640. $stat_msg += '<BR><font color="red">Your period is due to start soon.'
  1641. $stat_msg += '</font>'
  1642. end
  1643. if $cycreport_txt ! null and menu_off = 0:
  1644. $stat_msg += '<BR><a href="exec:dynamic $d_cycreport_choice"><<$cycreport_txt>></a><br>'
  1645. elseif $cycreport_txt ! null and menu_off = 1:
  1646. $stat_msg += '<BR><a href="exec:gs ''obj_din'', ''menu_disabled''"><<$cycreport_txt>></a><br>'
  1647. end
  1648. !!if shame > 0:$stat_msg += '<BR><<$shame>>' & $stat_msg += '<BR>'
  1649. if $pcs_mood ! '': $stat_msg += '<BR><font color="green"><b><<$pcs_mood>></b></font>'
  1650. if mentats_dose >= 1: $stat_msg += '<BR><font color = green>You feel sharp and focused.</font>'
  1651. if bcream_used = 1: $stat_msg += '<BR><font color = #DB7093>Your breasts are feeling hot and tingly.</font>'
  1652. if aphrodisiac_timer > 0: $stat_msg += '<BR><font color = #DB7093>You are feeling hot and every move causes your groin to tingle.</font>'
  1653. if cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 5:
  1654. $stat_msg += '<BR><font color="red"><b><<$stat_hunger_msg>></b></font>'
  1655. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 10:
  1656. $stat_msg += '<BR><font color="red"><<$stat_hunger_msg>></font>'
  1657. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 20:
  1658. $stat_msg += '<BR><<$stat_hunger_msg>>'
  1659. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 30:
  1660. $stat_msg += '<BR><<$stat_hunger_msg>>'
  1661. end
  1662. if cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 5:
  1663. $stat_msg += '<BR><font color="red"><b><<$stat_thirst_msg>></b></font>'
  1664. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 10:
  1665. $stat_msg += '<BR><font color="red"><<$stat_thirst_msg>></font>'
  1666. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 20:
  1667. $stat_msg += '<BR><<$stat_thirst_msg>>'
  1668. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 30:
  1669. $stat_msg += '<BR><<$stat_thirst_msg>>'
  1670. end
  1671. if cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 5:
  1672. $stat_msg += '<BR><font color="red"><b><<$stat_sleep_msg>></b></font>'
  1673. elseif cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 10:
  1674. $stat_msg += '<BR><font color="red"><<$stat_sleep_msg>></font>'
  1675. elseif cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 20:
  1676. $stat_msg += '<BR><<$stat_sleep_msg>>'
  1677. elseif cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 30:
  1678. $stat_msg += '<BR><<$stat_sleep_msg>>'
  1679. end
  1680. if pcs_horny >= 50:
  1681. if pcs_horny < 90 and $pantyworntype ! 'none':
  1682. $stat_msg += '<BR><font color = #DB7093>You are a little nervous, feeling nice between your legs <a href="exec:view''images/pc/body/pussy/briefs1.jpg''">itchy</a> from arousal.</font>'
  1683. elseif pcs_horny < 90 and $pantyworntype = 'none':
  1684. $stat_msg += '<BR><font color = #DB7093>You are a little nervous, feeling nice between your legs <a href="exec:view''images/pc/body/pussy/briefs1a.jpg''">itchy</a> from arousal.</font>'
  1685. elseif $pantyworntype ! 'none':
  1686. $stat_msg += '<BR><font color = #FF1493>You can''t stop thinking about sex, between your legs you are <a href="exec:view''images/pc/body/pussy/briefs2.jpg''">soaked</a> from your juices.</font>'
  1687. else
  1688. $stat_msg += '<BR><font color = #FF1493>You can''t stop thinking about sex, between your legs you are <a href="exec:view''images/pc/body/pussy/briefs2a.jpg''">soaked</a> from your juices.</font>'
  1689. end
  1690. end
  1691. if smoker >= 20 and NarkImmune = 0:
  1692. if smokerNeed > 0:
  1693. if siga > 0:
  1694. $stat_msg += '<BR><a href="exec:gs ''drugs'',''smoke''"><font color="red"><b>You want to smoke. You have <<siga>> cigarettes left.</b></font></a><BR>'
  1695. else
  1696. $stat_msg += '<BR><font color="red"><b>You want to smoke, but you have no cigarettes left.</b></font><BR>'
  1697. end
  1698. else
  1699. if siga > 0:
  1700. $stat_msg += '<BR><a href="exec:gs ''drugs'',''smoke''"><font color=#0064FF><b>You have <<siga>> cigarettes left.</b></font></a><BR>'
  1701. else
  1702. $stat_msg += '<BR><font color=#0064FF><b>You feel like you should get some cigarettes.</b></font><BR>'
  1703. end
  1704. end
  1705. elseif siga > 0:
  1706. $stat_msg += '<BR><a href="exec:gs ''drugs'',''smoke''"><font color=#0064FF><b>You have <<siga>> cigarettes.</b></font></a><BR>'
  1707. end
  1708. if smokeHour = hour and smokeday = daystart and smokeminut >= minut: $stat_msg += '<BR><font color="green">You are smoking a cigarette.</font><BR>'
  1709. if jointhour = hour and jointday = daystart and jointminut >= minut: $stat_msg += '<BR><font color="green">You are smoking a joint.</font><BR>'
  1710. if cheatNoSweat = 0 and pcs_sweat > 59:
  1711. $stat_msg += '<br><b><font color="red"><<$stat_sweat_msg>></font></b><br>'
  1712. elseif cheatNoSweat = 0 and pcs_sweat > 49:
  1713. $stat_msg += '<br><b><font color="red"><<$stat_sweat_msg>></font></b>'
  1714. elseif cheatNoSweat = 0 and pcs_sweat > 39:
  1715. $stat_msg += '<br><font color="red"><<$stat_sweat_msg>></font>'
  1716. elseif cheatNoSweat = 0 and pcs_sweat > 29:
  1717. $stat_msg += '<br><font color="red"><<$stat_sweat_msg>></font>'
  1718. elseif cheatNoSweat = 0 and pcs_sweat > 19:
  1719. $stat_msg += '<br><font color="brown"><<$stat_sweat_msg>></font>'
  1720. elseif cheatNoSweat = 0 and pcs_sweat > 9 and deodorant_on = 1:
  1721. $stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font>'
  1722. elseif cheatNoSweat = 0 and arrsize('sparrvol') = 0:
  1723. $stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font></b>'
  1724. elseif cheatNoSweat = 0 and deodorant_on = 1:
  1725. $stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font></b>'
  1726. end
  1727. !! breast status
  1728. gs 'lact_lib','breast_stat_disp'
  1729. if $stat_writing_msg ! '': $stat_msg += '<br><b><font color = red><<$stat_writing_msg>></font></b>'
  1730. if recuperation = 1: $stat_msg += '<b><font color="red">You are still recovering from major surgery.</font></b>'
  1731. $stat_msg += $stat_cum_text
  1732. !!stds
  1733. if Gerpes >= 10 and GenHerpes = 1:
  1734. $stat_msg += '<BR><b><font color="red">Sores have appeared on your vagina. You have genital herpes.</font></b>'
  1735. elseif Gerpes >= 5 and GenHerpes =1:
  1736. $stat_msg += '<BR><b><font color="red">Your vagina is red and very itchy. You have genital herpes.</font></b>'
  1737. elseif Gerpes >= 3 and Orerpes = 1:
  1738. $stat_msg += '<BR><b><font color="red">You have cold Sores on your lips. You have oral herpes.</font></b>'
  1739. end
  1740. if Gerpes >= 20 and GenHerpes =1:$stat_msg += '<BR> <b><font color="red">The herpes sores also cover your ass.</font></b>'
  1741. if Sifilis >= 50:
  1742. $stat_msg += '<BR><b><font color="red">Syphilitic rashes cover your whole body.</font></b>'
  1743. elseif Sifilis >= 21:
  1744. $stat_msg += '<BR><b><font color="red">You have a single large, hard sore on the lip. You have syphilis.</font></b>'
  1745. end
  1746. if Triper > 2:$stat_msg += '<BR><b><font color="red">There''s a white discharge and a strong smell coming from your vagina, and it stings when urinating. You have gonorrhea.</font></b>'
  1747. if Kandidoz > 30:$stat_msg += '<BR><b><font color="red">There''s a white discharge and strong smell from your vagina. You have thrush.</font></b>'
  1748. !!drug withdrawal
  1749. if SLomka > 0:$stat_msg += '<BR><b><font color="red">You are very weak and hurt to the bone. You''re suffering withdrawal.</font></b>'
  1750. if narkday ! daystart and narkoman = 1:$stat_msg += '<BR><b><font color="red">You are very weak and hurt to the bone. You urgently need some cocaine.</font></b>'
  1751. ! WD: Bimbo look
  1752. if bimbolevel > 0: $stat_msg += '<BR><<$bimbostatus>>'
  1753. if analplugIN = 1:$stat_msg += '<BR><font color = #FF1493>You have a butt plug inserted in your ass.</font>'
  1754. if vibratorin = 1:$stat_msg += '<BR><font color = #FF1493>You have a vibrator inserted in your vagina.</font>'
  1755. if alko > 0 and alko = 1:
  1756. $stat_msg += '<br><b><font color="green">You feel a little buzz from drinking.</font></b>'
  1757. elseif alko > 0 and alko < 4:
  1758. $stat_msg += '<br><b><font color="orange">You''re feeling a bit tipsy.</font></b>'
  1759. elseif alko > 0 and alko < 6:
  1760. $stat_msg += '<br><b><font color="orange">You''re drunk.</font></b>'
  1761. elseif alko > 0 and alko < 10:
  1762. $stat_msg += '<br><b><font color="red">You''re very drunk.</font></b>'
  1763. elseif alko > 0:
  1764. $stat_msg += '<br><b><font color="red">You''re wasted.</font></b>'
  1765. end
  1766. if $stat_frost_msg ! '': $stat_msg += '<BR><b><font color="red"><<$stat_frost_msg>></font></b>'
  1767. if $stat_sick_msg ! '': $stat_msg += '<BR><b><font color="red"><<$stat_sick_msg>></font></b>'
  1768. $stat_msg += $stat_bra_text
  1769. $stat_msg += $stat_panty_text
  1770. $stat_msg += $stat_clothes_text
  1771. if $stat_school_msg ! '' and StoryLine = 1 and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and hour < 9:
  1772. $stat_msg += '<BR><b><<$stat_school_msg>></b>'
  1773. elseif $stat_school_msg ! '' and StoryLine = 1 and SchoolAtestat = 0 and week = 6 and hour < 9 and detention_set = 1 and SchoolAtestat = 0:
  1774. $stat_msg += '<BR><b><<$stat_school_msg>></b>'
  1775. end
  1776. end
  1777. !!------------------ Things without an icon (Start) -------------------
  1778. if fingal > 0:$stat_msg += '<BR><b><font color="red">You have a black eye.</font></b>'
  1779. if mosol >= 50:
  1780. $stat_msg += '<BR><b><font color="red">Your pussy itches a great deal and is affecting your mood, you should use some cream or stop wearing pants without underwear.</font></b>'
  1781. elseif mosol >= 30:
  1782. $stat_msg += '<BR><b><font color="red">Your pussy feels a little itchy, it seems to be from rubbing against your clothing.</font></b>'
  1783. end
  1784. if $pantyworntype ! 'none' and clit_size >= 25: $stat_msg += '<BR><font color = #FF1493>Your panties keep rubbing against your clit and making you horny.</font>'
  1785. if $mudnerd ! '':$stat_msg += '<BR><<$mudnerd>>'
  1786. if home_owned[1] > 0:
  1787. $streetev_home = 'your apartment'
  1788. elseif tanwork = 1:
  1789. $streetev_home = 'Tanya''s apartment'
  1790. elseif student > 0:
  1791. $streetev_home = 'your dorm'
  1792. elseif home_owned[2] = 1:
  1793. $streetev_home = 'outside your apartment block'
  1794. else
  1795. $streetev_home = 'the train station'
  1796. end
  1797. if StrongNarkota > 20 or jointhigh > 0:$stat_msg += '<BR><b><font color="red">You are stoned.</font></b>'
  1798. if amphHigh > 0: $stat_msg += '<BR><b><font color="red">You feel a little wired.</font></b>'
  1799. !!--------------- Storyline = 1 Events (Start) ------------------------
  1800. if StoryLine = 1 and sisboyday + 1 = daystart and hour < 19 and (npc_QW['A33'] = 3 or npc_QW['A33'] = 5 or npc_QW['A33'] = 7 or (npc_QW['A33'] >= 9 and sisboytrioQW ! 1)):$stat_msg += '<BR>' & $stat_msg += '<BR>You promised your sister not to go into your room at 18:00.'
  1801. if StoryLine = 1 and sisboyday + 1 = daystart and hour < 19 and sisboytrioQW = 1:$stat_msg += '<BR>' & $stat_msg += '<BR>You promised your sister to meet her in your room at 18:00.'
  1802. if StoryLine = 1 and day = nyp_day and month = 12 and SchoolAtestat = 0 and hour >= 5 and hour <= 14 and StoryLine = 1:
  1803. $stat_msg += '<BR>At 14:00 your school''s New Year''s party will start.'
  1804. elseif StoryLine = 1 and InvitationToDimkaNYparty = 1 and month = 12 and day = 31:
  1805. $stat_msg += '<BR><b>Go to the residential area between 15:00 and 18:00 to go to Dimka''s New Year party.</b>'
  1806. end
  1807. if StoryLine = 1 and gopnik_initiation = 1 and gopnik_initiation_day = daystart and hour > 15 and hour < 21: $stat_msg += '<BR><b>Meet Lena and Lera at the apartment garages at eight</b>'
  1808. if StoryLine = 1 and nerd_night_game = 1 and nerd_night_game_day = daystart and hour > 15 and hour < 21: $stat_msg += '<BR><b>Join nerds at the community center at eight</b>'
  1809. !!--------------- Storyline = 1 Events (End) ------------------------
  1810. if home_owned[1] = 1 and home_owned[4] > 0:
  1811. $stat_msg += '<BR>You have rented an apartment in the city residential area, which is paid up for <b><<ArendHouseSL>></b> days, and you also have an apartment in Pushkin, which is paid up for <b><<ArendHouseSL4>></b> days. Utilities are due on the 25th of <<$month>>.'
  1812. elseif home_owned[1] = 1:
  1813. $stat_msg += '<BR>You have rented an apartment in the city residential area, and you''re paid up for <<ArendHouseSL>> days. Utilities are due on the 25th of <<$month>>.'
  1814. elseif home_owned[4] > 0:
  1815. $stat_msg += '<BR>You have rented an apartment in Pushkin, and you''re paid up for <<ArendHouseSL4>> days. Utilities are due on the 25th of <<$month>>.'
  1816. end
  1817. if $nichStatMsg ! '': $stat_msg += '<br><b><<$nichStatMsg>></b>'
  1818. if npc_QW['A113'] = 1: $stat_msg += '<br>You owe Vadim Bely <<belgangpay>> <b><b>₽</b></b> and you need to pay him <<belgangpayweek>> <b>₽</b></b> this week.'
  1819. if display_bb = 1:
  1820. if boletus + bilberry > 0:
  1821. if boletus + bilberry >= 10:
  1822. $stat_msg +='<br><font color = Olive>You have a full basket. </font> '
  1823. else
  1824. $stat_msg +='<br><font color = Olive>In Your basket: </font>'
  1825. end
  1826. if hour > 6 and (month < 6 or month > 9) and boletus + bilberry > 0:
  1827. boletus = 0 & bilberry = 0
  1828. '<br>You throw away your mushrooms and berries.'
  1829. end
  1830. if boletus > 0:$stat_msg +='Mushrooms: <b><<boletus>></b> kg. '
  1831. if bilberry > 0:$stat_msg +='Berries: <b><<bilberry>></b> kg. '
  1832. end
  1833. end
  1834. !!------------------ Things without an icon (End) -------------------
  1835. if enable_extra_msg = 1:
  1836. if hour < meethour[0] and svidanie[0] = 1:
  1837. $stat_msg += '<BR><<$stat_bfgf_msg_0>>'
  1838. elseif hour = meethour[0] and svidanie[0] = 1:
  1839. $stat_msg += '<BR><b><font color="red"><<$stat_bfgf_msg_0>></font></b>'
  1840. end
  1841. if hour < meethour[1] and svidanie[1] = 1:
  1842. $stat_msg += '<BR><<$stat_bfgf_msg_1>>'
  1843. elseif hour = meethour[1] and svidanie[1] = 1:
  1844. $stat_msg += '<BR><b><font color="red"><<$stat_bfgf_msg_1>></font></b>'
  1845. end
  1846. if hour < meethour[2] and svidanie[2] = 1:
  1847. $stat_msg += '<BR><<$stat_bfgf_msg_2>>'
  1848. elseif hour = meethour[2] and svidanie[2] = 1:
  1849. $stat_msg += '<BR><b><font color="red"><<$stat_bfgf_msg_2>></font></b>'
  1850. end
  1851. if $stat_court_msg ! '': $stat_msg += '<BR><b><font color="red"><<$stat_court_msg>></font></b>'
  1852. if young_shop_work = 1 and hour = 16 and minut <= 5 and week < 6 and inWorkYoungShop = 0:
  1853. $stat_msg += 'You are late for work at Pussy-Cats.'
  1854. elseif young_shop_work = 1 and hour = 16 and week < 6 and inWorkYoungShop = 0 and misscheck ! daystart:
  1855. $stat_msg += '<BR><b><font color="red">You missed work.</font></b>'
  1856. elseif young_shop_work = 1 and (hour = 14 or hour = 15) and week < 6:
  1857. $stat_msg += '<BR><b><font color="red">You start work at Pussy-Cats today at 16:00.</font></b>'
  1858. end
  1859. if young_shop_work1 = 1 and hour = 9 and minut <= 5 and week >= 6 and inWorkYoungShop = 0:
  1860. $stat_msg += 'You are late for work at Pussy-Cats.'
  1861. elseif young_shop_work1 = 1 and hour = 9 and week >= 6 and inWorkYoungShop = 0 and misscheck ! daystart:
  1862. $stat_msg += '<BR><b><font color="red">You missed work.</font></b>'
  1863. elseif young_shop_work1 = 1 and (hour = 7 or hour = 8) and week >= 6:
  1864. $stat_msg += '<BR><b><font color="red">By 9:00 you have to be at Pussy-Cats to start work.</font></b>'
  1865. end
  1866. if young_shop_work2 = 1 and hour = 9 and minut <= 5 and week < 6 and inWorkYoungShop = 0:
  1867. $stat_msg += 'You are late for work at Pussy-Cats.'
  1868. elseif young_shop_work2 = 1 and hour = 9 and week < 6 and inWorkYoungShop = 0 and misscheck ! daystart:
  1869. $stat_msg += '<BR><b><font color="red">You missed work.</font></b>'
  1870. elseif young_shop_work2 = 1 and (hour = 7 or hour = 8) and week < 6:
  1871. $stat_msg += '<BR><b><font color="red">By 9:00 you have to be at Pussy-Cats to start work.</font></b>'
  1872. end
  1873. if workrin = 1 and (week = 2 or week = 4 or week = 6) and hour > 5 and hour < 8:
  1874. $stat_msg += '<BR><b><font color="red">At 8 o''clock you start work on the market.</font></b>'
  1875. elseif workrin = 1 and (week = 2 or week = 4 or week = 6) and hour = 8:
  1876. $stat_msg += '<BR><b><font color="red">You need to work on the market now.</font></b>'
  1877. end
  1878. if model > 0 and model_week = (daystart - week) / 7 and model_job_week >= 2:
  1879. $stat_msg += '<BR><b>You have no more modeling jobs available this week.</b>'
  1880. elseif model > 0 and model_week < (daystart - week) / 7 and model_job_week = 1:
  1881. $stat_msg += '<BR><b>You can get paid for 1 more modeling job this week.</b>'
  1882. elseif model > 0 and model_week < (daystart - week) / 7 and model_job_week < 1:
  1883. $stat_msg += '<BR><b>You can get paid for 2 modeling jobs this week.</b>'
  1884. end
  1885. if pornstack > 0 and pfilmday[0] = 0:
  1886. if pfilmday[1] = 0:
  1887. $stat_msg += '<br><b>You will star in another porno in <<porndays>> days.</b>'
  1888. else
  1889. $stat_msg += '<br><b>You have a porno shoot scheduled tomorrow.</b>'
  1890. end
  1891. end
  1892. if pfilmday[0] > 0:
  1893. if pornnow = 1:
  1894. $stat_msg += '<br><b>You are at a porn shooting.</b>'
  1895. else
  1896. if hour < 11: $stat_msg += '<br><b>You are expected in the porno studio at 10:00.</b>'
  1897. if hour >= 11 and hour < 13: $stat_msg += '<br><b>You should be at the porno studio, shooting!</b>'
  1898. if hour >= 13: $stat_msg += '<br><b>You missed a scheduled porno shoot!</b>'
  1899. end
  1900. end
  1901. if pornmiss = 1: $stat_msg += '<br><b>You missed a scheduled porno shoot!</b>'
  1902. if prodcosttrue > 0: $stat_msg += '<br><b>You owe money to the porn studio <<prodcost>>?</b>'
  1903. if firstkasting > 0 and pfilmNO < 1:
  1904. if pornstack <= 10:
  1905. $stat_msg += '<br>You are currently unable to book any more porn shoots at the Porn Studio.'
  1906. elseif pornstack = 11:
  1907. $stat_msg += '<br>You can contract <<10-pornstack>> porn shoot at the Porn Studio.'
  1908. else
  1909. $stat_msg += '<br>You can contract up to <<10-pornstack>> porn shoots at the Porn Studio.'
  1910. end
  1911. end
  1912. if hour < 22 and week >= 2 and week <= 4 and workKafe = 1:$stat_msg += '<BR><b><font color="red">Today you have a shift at The Roadhouse cafe starting at 11:00.</font></b>'
  1913. if hour < 17 and week < 5 and workSec >= 1 or hour < 17 and week < 5 and workSec = 1:$stat_msg += '<BR><b><font color="red">Today you have a shift as a secretary at Titran-Express from 9:00 to 17:00</font></b>'
  1914. if hour < 17 and week < 5 and PersSecWork = 1:$stat_msg += '<BR><b><font color="red">Today you have a shift as a secretary at Diner Bystroeshka from 9:00 to 17:00</font></b>'
  1915. if hour < 20 and week => 1 and week <= 5 and age < 18 and workFabrika = 1:$stat_msg += '<BR><b><font color = red>Today you have work in the garment factory in Pavlovsk. Shift starts at 16:00.</font></b>'
  1916. if hour < 16 and week => 1 and week <= 5 and age >= 18 and workFabrika = 1:$stat_msg += '<BR><b><font color = red>Today you have work in the garment factory in Pavlovsk. Shift starts at 8:00.</font></b>'
  1917. if hour < 16 and week > 1 and week <= 5 and workhosp = 1:$stat_msg += '<BR><b><font color="red">You work as a nurse in the city residential area clinic. Your shift starts at 8:00.</font></b>'
  1918. if hour < 10 and worksalon = 1 and (week = 1 or week = 3 or week = 5):$stat_msg += '<BR><b><font color = red>Today you have work as masseuse in beauty salon. Shift starts at 9:00.</font></b>'
  1919. if leonidVisit = 1 and hour < 21 and hour > 6: $stat_msg += '<br><b>You have to serve Leonid at 20:00 in his Pavlovsk office!</b>'
  1920. if hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 1 and missCum >= timeTresh:
  1921. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  1922. elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 1 and missCum < timeTresh:
  1923. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  1924. elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 2 and missCum >= timeTresh:
  1925. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  1926. elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 2 and missCum < timeTresh:
  1927. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  1928. elseif hypnoAddict > 0 and $stat_hypno_msg ! '':
  1929. $stat_msg += '<BR><b><font color="magenta"><<$stat_hypno_msg>></font></b>'
  1930. end
  1931. end
  1932. gs 'brother', 'brotherSexCount'
  1933. !! List Current Active Spells
  1934. if arrsize('spellComplete') > 0:
  1935. $tempSpellText="<br><b><font color='#FF99FF'>Active Spells</font></b>"
  1936. i=0
  1937. :ActiveSpellLoop
  1938. if i < arrsize('spellComplete'):
  1939. $tempSpellText += "<br><font color='#FF99FF'><<$spellName[$spellTimeName[i]]>></font>"
  1940. i += 1
  1941. jump 'ActiveSpellLoop'
  1942. end
  1943. $stat_msg += func('cleanHTML',$tempSpellText)
  1944. killvar '$tempSpellText'
  1945. killvar 'i'
  1946. end
  1947. !!zero checks marriage
  1948. proverka1 = 0
  1949. proverka2 = 0
  1950. proverka3 = 0
  1951. proverka4 = 0
  1952. proverka5 = 0
  1953. if disable_LoadSave = 0:
  1954. $stat_msg += '<br><br><a href="exec:savegame ''quicksave.sav'' && pl''Quicksave Done''"><img src="images/system/icon/stat_qsave.png"></a> <a href="exec:savegame"><img src="images/system/icon/stat_save.png"></a> <a href="exec:opengame"><img src="images/system/icon/stat_load.png"></a> <a href="exec:if input(''Input Anything to confirm Quick Load'') ! null: opengame ''quicksave.sav''"><img src="images/system/icon/stat_qload.png"></a>'
  1955. elseif disable_LoadSave = 2:
  1956. $stat_msg += '<br><br><a href="exec:savegame ''quicksave.sav'' && pl''Quicksave Done''">Quick Save</a> <a href="exec:savegame">Save</a> <a href="exec:opengame">Load</a> <a href="exec:if input(''Input Anything to confirm Quick Load'') ! null: opengame ''quicksave.sav''">Quick Load</a>'
  1957. end
  1958. if PillToggle = 1 and tabletki > 0:
  1959. Stabletki += tabletki
  1960. tabletki = 0
  1961. elseif PillToggle = 0 and Stabletki > 0:
  1962. tabletki += Stabletki
  1963. Stabletki = 0
  1964. end
  1965. if CondomToggle = 1 and prezik > 0:
  1966. Sprezik += prezik
  1967. prezik = 0
  1968. elseif CondomToggle = 0 and Sprezik > 0:
  1969. prezik += Sprezik
  1970. Sprezik = 0
  1971. end
  1972. $stat_android += ' <a href="exec:savegame ''quicksave.sav'' && pl''Quicksave Done''">Q.S</a> <a href="exec:if input(''Input Anything to confirm Quick Load'') ! null: opengame ''quicksave.sav''">Q.L</a>'
  1973. if Enable_statimg_loc = 2: $stat_msg += '<br><<$stat_imgtool_msg>><br><<$stat_imgextra_msg>>'
  1974. killvar 'stat_imgtool_msg'
  1975. killvar 'stat_imgextra_msg'
  1976. if Enable_statfsize > 0: $stat_msg += '</font>' & !disable this, all texts comes from pl will have the same font size, like[time]
  1977. if Enable_faceturn = 1: view FUNC('$face_image')
  1978. if Enable_Android = 0:
  1979. pl '<<$stat_msg>>'
  1980. else
  1981. '<<$stat_android>>'
  1982. $stat_msg = 'Android mode, <a href="exec:gs ''$menu_obnovit''">Refresh</a><<$stat_msg>>'
  1983. end
  1984. --- stat_display ---------------------------------