stat_display.qsrc 144 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312231323142315231623172318231923202321232223232324232523262327232823292330233123322333233423352336233723382339234023412342234323442345234623472348234923502351235223532354235523562357235823592360236123622363236423652366236723682369237023712372237323742375237623772378237923802381238223832384238523862387238823892390239123922393239423952396239723982399240024012402240324042405240624072408240924102411241224132414241524162417241824192420242124222423242424252426242724282429243024312432243324342435243624372438243924402441244224432444244524462447244824492450245124522453245424552456245724582459246024612462246324642465246624672468246924702471247224732474247524762477247824792480248124822483248424852486248724882489249024912492249324942495249624972498249925002501250225032504250525062507250825092510251125122513251425152516251725182519252025212522252325242525
  1. # stat_display
  2. !!2021/04/04
  3. !! --- CALL TRACE, when enabled (`debug['trace_shown'] = 1`) replaces stat_display
  4. if debug['trace_shown'] ! 0:
  5. clear
  6. p '<center>'
  7. if $git_hash ! '': pl '<<$git_hash>>'
  8. if debug['call_trace_selector'] = 0:
  9. p 'loc change&nbsp;|&nbsp;'
  10. p '<a href="exec:debug[''call_trace_selector''] = 1 & gs ''stat_display''">direct</a>'
  11. nl '<hr>'
  12. if debug['trace_loc_change'] = 0:
  13. p '<a href="exec:debug[''trace_loc_change''] = 1 & gs ''stat_display''">start</a>&nbsp;|&nbsp;'
  14. else
  15. p '<a href="exec:debug[''trace_loc_change''] = 0 & gs ''stat_display''">stop</a>&nbsp;|&nbsp;'
  16. end
  17. p '<a href="exec:$debug[''loc_change_trace''] = '''' & gs ''stat_display''">clear</a>&nbsp;|&nbsp;'
  18. pl '<a href="exec:debug[''trace_shown''] = 0 & gs ''stat''">return</a></center>'
  19. p $debug['loc_change_trace']
  20. else
  21. p '<a href="exec:debug[''call_trace_selector''] = 0 & gs ''stat_display''">loc change</a>&nbsp;|&nbsp;'
  22. p 'direct'
  23. nl '<hr>'
  24. p '<a href="exec:$trace_locations[] = $input(''location name'') & gs ''stat_display''">add by name</a>&nbsp;|&nbsp;'
  25. p '<a href="exec:$trace_locations[] = $curloc & gs ''stat_display''">add $curloc</a>'
  26. nl '<hr>'
  27. if arrsize('$trace_locations') > 0:
  28. p '<a href="exec:gs ''debug_tools'', ''trace_list_locs''">list locations</a>&nbsp;|&nbsp;'
  29. p '<a href="exec:killvar ''$trace_locations'' & gs ''stat_display''">clear</a>'
  30. else
  31. p 'list locations&nbsp;|&nbsp;'
  32. p 'clear'
  33. end
  34. nl '<hr>'
  35. p '<a href="exec:$debug[''direct_trace''] = '''' & gs ''stat_display''">clear</a>&nbsp;|&nbsp;'
  36. pl '<a href="exec:debug[''trace_shown''] = 0 & gs ''stat''">return</a></center>'
  37. p $debug['direct_trace']
  38. end
  39. exit
  40. end
  41. !! --- STAT_DISPLAY
  42. if default_status_icons = 0:set_siconht = 54
  43. if default_wbanner = 0:set_weatherht = 72
  44. if default_menu_icons = 0:set_miconht = 54
  45. gs 'outdoors', 'main'
  46. !!----------------image Extra messages, start--------------------------
  47. $stat_imgtool_msg=''
  48. $stat_imgextra_msg=''
  49. if Enable_showstatimg = 1:
  50. !There are 3 display mode, with toobar / top / bottom, controlled by Enable_statimg_loc
  51. if Enable_statimg_face = 0:
  52. $stat_imgtool_msg += '<a href="exec:Enable_statimg_face = 1 & gs ''$menu_obnovit''">◇Face</a>'
  53. else
  54. $stat_imgtool_msg += '<a href="exec:Enable_statimg_face = 0 & gs ''$menu_obnovit''">◆Face</a>'
  55. $img_temp = func('$face_image')
  56. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  57. end
  58. if Enable_statimg_body = 0:
  59. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_body = 1 & gs ''$menu_obnovit''">◇Body</a>'
  60. else
  61. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_body = 0 & gs ''$menu_obnovit''">◆Body</a>'
  62. $img_temp = func('$body_image','body')
  63. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  64. end
  65. if Enable_statimg_coat = 0:
  66. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_coat = 1 & gs ''$menu_obnovit''">◇Coat</a>'
  67. else
  68. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_coat = 0 & gs ''$menu_obnovit''">◆Coat</a>'
  69. $img_temp = func('$body_image','coat')
  70. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  71. end
  72. if Enable_statimg_cloth = 0:
  73. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_cloth = 1 & gs ''$menu_obnovit''">◇Clothes</a>'
  74. else
  75. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_cloth = 0 & gs ''$menu_obnovit''">◆Clothes</a>'
  76. $img_temp = func('$body_image','clothes')
  77. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  78. end
  79. if Enable_statimg_bra = 0:
  80. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_bra = 1 & gs ''$menu_obnovit''">◇Bra</a>'
  81. else
  82. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_bra = 0 & gs ''$menu_obnovit''">◆Bra</a>'
  83. $img_temp = func('$body_image','bra')
  84. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  85. end
  86. if Enable_statimg_panties = 0:
  87. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_panties = 1 & gs ''$menu_obnovit''">◇Panties</a>'
  88. else
  89. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_panties = 0 & gs ''$menu_obnovit''">◆Panties</a>'
  90. $img_temp = func('$body_image','panties')
  91. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  92. end
  93. if bodysuitwornnumber > 0 and (Enable_statimg_bra = 1 or Enable_statimg_panties = 1):
  94. $img_temp = func('$body_image','bodysuit')
  95. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  96. end
  97. if Enable_statimg_shoes = 0:
  98. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_shoes = 1 & gs ''$menu_obnovit''">◇Shoes</a>'
  99. else
  100. $stat_imgtool_msg += ' <a href="exec:Enable_statimg_shoes = 0 & gs ''$menu_obnovit''">◆Shoes</a>'
  101. $img_temp = func('$body_image','shoes')
  102. if $img_temp ! '': $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
  103. end
  104. if $menu_loc ! '': $stat_imgtool_msg += ' <a href="exec:gs ''Cheatmenu_din'' & dynamic $cheatmenu[''setting'']">◎Settings</a>'
  105. end
  106. !!----------------image Extra messages, end --------------------------
  107. if Enable_statimg_loc = 1: $stat_msg = '<<$stat_imgtool_msg>><br><<$stat_imgextra_msg>><br><<$stat_msg>>'
  108. $stat_android = '<b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>'
  109. if $notification_message[0] ! '':
  110. if _n_counter['shown'] ! 1: gs 'notification', 'display'
  111. $stat_msg += $notification_message[0]
  112. end
  113. $stat_msg += '<table><tr><td><a href="exec:msg ''<<$weather>>''"><<$weatherImage>></a></td><td><<$temperature>></td></tr></table>'
  114. if Enable_statfsize>0: $stat_msg = '<font size=<<Enable_statfsize>>><<$stat_msg>>'
  115. $stat_disable_msg = 'Menu is disabled for this event.'
  116. !$stat_msg += '<<$weather>><BR>'
  117. !pl '<<$weatherImage>>'
  118. !! $stat_day_suffix is generated at midnight in cikl
  119. if timeHidden = 0: $stat_msg += '<BR><<$stat_android>> <<$week[week]>> <<day>><<$stat_day_suffix>> <<$month>> <<year>>'
  120. $stat_android += '<<$week[week]>> <<day>>/<<month>>, <<money>> ₽, <a href="exec:clr & pl $stat_android">Status</a>'
  121. ! $stat_android for short desc in android mode, $stat_msg for status bar.
  122. if mid($start_type,1,2) = 'sg' and SchoolAtestat ! 1 and $holyday ! '': $stat_msg += '<BR><<$holyday>>' & $stat_msg += '<BR>'
  123. if birthday = day and birthmonth = month: $stat_msg += '<BR><b>Today is your birthday.</b>' & $stat_msg += '<BR>'
  124. if telefon['UnreadSMS'] > 0: $stat_msg += '<BR><b>You have <<telefon[''UnreadSMS'']>> unread message(s).</b><BR>'
  125. !New icon based menu.
  126. if $start_type[1] ! 'nomagic':
  127. $journal_tooltip = 'Spellbook & Journal'
  128. $journalIcon = 'journal_magic.png'
  129. else
  130. $journal_tooltip = 'Journal'
  131. $journalIcon = 'journal_norm.png'
  132. end
  133. if menu_off = 0:
  134. $menuBarTab = '<table><tr>'
  135. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''description''"><img title="Character description" height = <<set_miconht>> src="images/system/icons/menu/icon_character.png"></a></td>'
  136. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''face''"><img title="Looks (Face, body, clothing,...)"height = <<set_miconht>> src="images/system/icons/menu/icon_lookself.png"></a></td>'
  137. if bag > 0: $menuBarTab += '<td><a href="exec:gs ''din_bad'', ''d_bag''"><img title="Your purse"height = <<set_miconht>> src="images/system/icons/menu/icon_purse.png"></a></td>'
  138. $menuBarTab += '<td><a href="exec:gs ''telefon'',''Phone_menu''"><img title="Your phone" height = <<set_miconht>> src="images/system/icons/menu/<<iif(telefon[''UnreadSMS'']=0,''icon_phone.png'',''icon_phone_sms.gif'')>>"></a></td>'
  139. $menuBarTab += '<td><a href="exec:gs ''obj_din'', ''records''"><img title="<<$journal_tooltip>>" height = <<set_miconht>> src="images/system/icons/menu/<<$journalIcon>>"></a></td>'
  140. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs''$menu_setting''"><img title="Menu & Cheatmenu" height = <<set_miconht>> src="images/system/icons/menu/icon_menu.png"></a></td>'
  141. $menuBarTab += '</tr></table>'
  142. $stat_msg += func('cleanHTML',$menuBarTab)
  143. killvar '$menuBarTab'
  144. elseif menu_off = 1:
  145. $menuBarTab = '<table><tr>'
  146. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_character.png"></a></td>'
  147. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_lookself.png"></a></td>'
  148. if bag > 0:
  149. $menuBarTab += '<td><a href="exec:gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_purse.png"></a></td>'
  150. end
  151. $menuBarTab += '<td><a href="exec:gs ''telefon'',''Phone_menu''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/<<iif(telefon[''UnreadSMS'']=0,''icon_phone.png'',''icon_phone_sms.gif'')>>"></a></td>'
  152. $menuBarTab += '<td><a href="exec:gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/<<$journalIcon>>"></a></td>'
  153. $menuBarTab += '<td><a href="exec:killvar ''menu_page'' & gs''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_menu.png"></a></td>'
  154. $menuBarTab += '</tr></table>'
  155. $stat_msg += func('cleanHTML',$menuBarTab)
  156. killvar '$menuBarTab'
  157. end
  158. !!----------------- Money -------------------------------
  159. if bankAccount = 0 and stolmoney = 0:
  160. $stat_msg += '<br>You have <b><<func(''agentned'', ''format_price_string'', money)>> ₽</b> in your '+iif(bag > 0, 'purse.', 'pockets.')
  161. else
  162. $stat_msg += '<br>'+iif(bag > 0, 'Purse', 'Pockets')+': <b><<func(''agentned'', ''format_price_string'', money)>> ₽</b>'
  163. if stolmoney > 0: $stat_msg += ', Drawer <b><<func(''agentned'', ''format_price_string'', stolmoney)>>₽</b>'
  164. if bankAccount = 1:
  165. if karta >= 0:
  166. $stat_msg += ', Bank: <b><<func(''agentned'', ''format_price_string'', karta)>> ₽</b>'
  167. else
  168. $stat_msg += '<font color="red"> Your bank account is overdrawn by <b><<func(''agentned'', ''format_price_string'', karta)>> ₽</b>!!</font>'
  169. end
  170. end
  171. end
  172. !!---------------- Messages for Icons/Texts (Start)--------------------------
  173. if cheatNoSweat = 0:
  174. if pcs_sweat < 0:
  175. pcs_sweat = 0
  176. elseif pcs_sweat > 69:
  177. pcs_sweat = 69
  178. end
  179. if pcs_sweat > 59:
  180. $stat_sweat_msg = 'You are dripping wet from sweat and smell like a gym sock.'
  181. elseif pcs_sweat > 49:
  182. $stat_sweat_msg = 'You really stink.'
  183. elseif pcs_sweat > 39:
  184. $stat_sweat_msg = 'You stink.'
  185. elseif pcs_sweat > 29:
  186. $stat_sweat_msg = 'You are a little smelly.'
  187. elseif pcs_sweat > 19:
  188. $stat_sweat_msg = 'You''re sweating.'
  189. elseif pcs_sweat > 9 and deodorant_on = 1:
  190. $stat_sweat_msg = 'You feel fresh with your deodorant.'
  191. elseif arrsize('sparrvol') = 0:
  192. $stat_sweat_msg = 'You are sparkling clean.'
  193. elseif deodorant_on = 1:
  194. $stat_sweat_msg = 'You feel fresh with your deodorant on.'
  195. else
  196. $stat_sweat_msg = ''
  197. end
  198. end
  199. if body_write > 1 and face_write = 0:
  200. $stat_writing_msg = 'Your body is inscribed with derogatory graffiti.'
  201. elseif body_write = 1 and face_write = 0:
  202. $stat_writing_msg = 'Your body has an obscene message written on it.'
  203. elseif body_write = 0 and face_write > 1:
  204. $stat_writing_msg = 'Your face is covered in obscene writing.'
  205. elseif body_write = 0 and face_write = 1:
  206. $stat_writing_msg = 'Your face has a humiliating label written on it.'
  207. elseif body_write > 0 and face_write > 0:
  208. $stat_writing_msg = 'Your body and face are covered in obscene graffiti.'
  209. else
  210. $stat_writing_msg = ''
  211. end
  212. if pcs_energy < 5:
  213. $stat_hunger_msg = 'You feel faint from hunger, if you don''t have something to eat very soon, you will pass out.'
  214. $stat_hunger_tooltip = 'You feel faint from hunger.'
  215. elseif pcs_energy < 10:
  216. $stat_hunger_msg = 'You are starving, you really need to have something to eat.'
  217. $stat_hunger_tooltip = 'You are starving.'
  218. elseif pcs_energy < 20:
  219. $stat_hunger_msg = 'You are very hungry and struggle to concentrate on anything other than food.'
  220. $stat_hunger_tooltip = 'You are very hungry.'
  221. elseif pcs_energy < 30:
  222. $stat_hunger_msg = 'You feel peckish, and your thoughts sometimes drift towards food.'
  223. $stat_hunger_tooltip = 'You feel peckish.'
  224. else
  225. $stat_hunger_msg = ''
  226. end
  227. if pcs_hydra < 5:
  228. $stat_thirst_msg = 'You feel light-headed, if you don''t have something to drink very soon, you will pass out.'
  229. $stat_thirst_tooltip = 'You feel light-headed.'
  230. elseif pcs_hydra < 10:
  231. $stat_thirst_msg = 'You are dehydrated, you really need to have something to drink.'
  232. $stat_thirst_tooltip = 'You are dehydrated.'
  233. elseif pcs_hydra < 20:
  234. $stat_thirst_msg = 'You are thirsty, and your dry throat is irritating and distracting you.'
  235. $stat_thirst_tooltip = 'You are thirsty.'
  236. elseif pcs_hydra < 30:
  237. $stat_thirst_msg = 'You feel a little thirsty, and your mouth is a little dry.'
  238. $stat_thirst_tooltip = 'You feel a little thirsty.'
  239. else
  240. $stat_thirst_msg = ''
  241. end
  242. if pcs_sleep < 5:
  243. $stat_sleep_msg = 'You can''t keep your eyes open, if you don''t go to bed now, you will fall asleep right here.'
  244. $stat_sleep_tooltip = 'You can''t keep your eyes open.'
  245. elseif pcs_sleep < 10:
  246. $stat_sleep_msg = 'You are exhausted, you really need to go to bed soon.'
  247. $stat_sleep_tooltip = 'You are exhausted.'
  248. elseif pcs_sleep < 20:
  249. $stat_sleep_msg = 'You are tired and you are struggling to concentrate.'
  250. $stat_sleep_tooltip = 'You are tired.'
  251. elseif pcs_sleep < 30:
  252. $stat_sleep_msg = 'You feel a little tired.'
  253. $stat_sleep_tooltip = 'You feel a little tired.'
  254. else
  255. $stat_sleep_msg = ''
  256. end
  257. if pcs_condition['lack_of_sleep'] >= 20:
  258. $stat_lack_of_sleep_msg = 'You are not getting enough sleep at all. This is severely inhibiting your ability to learn new things. You need to have a full nights rest to be better.'
  259. $stat_lack_of_sleep_tooltip = 'You are not getting enough sleep at all.'
  260. elseif pcs_condition['lack_of_sleep'] >= 10:
  261. $stat_lack_of_sleep_msg = 'You are not getting enough sleep. This has a large negative effect on your ability to learn new things. You need to sleep more maybe have a full nights rest.'
  262. $stat_lack_of_sleep_tooltip = 'You are not getting enough sleep.'
  263. elseif pcs_condition['lack_of_sleep'] >= 5:
  264. $stat_lack_of_sleep_msg = 'You are not getting enough sleep. This is modestly inhibiting your ability to learn new things. You need to sleep more.'
  265. $stat_lack_of_sleep_tooltip = 'You are not getting enough sleep.'
  266. elseif pcs_condition['lack_of_sleep'] >= 2:
  267. $stat_lack_of_sleep_msg = 'You are not sleeping as much as you should. This has a small effect on your ability to learn new things. You sleep more, or else you risk this getting worse.'
  268. $stat_lack_of_sleep_tooltip = 'You are not sleeping as much as you should.'
  269. else
  270. $stat_lack_of_sleep_msg = ''
  271. end
  272. if mc_inventory['contraceptive_pill'] = 0 and pillsleft[ptype] = 0:
  273. $stat_out_of_birth_control_msg = 'You need to buy more birth control pills'
  274. end
  275. if daystart = policeQW_courthearing_dates[0] - 1:
  276. $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.'
  277. $stat_court_tooltip = 'Court hearing tomorrow (07:00 and 11:00).'
  278. elseif daystart = policeQW_courthearing_dates[0] and hour < 11:
  279. $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.'
  280. $stat_court_tooltip = 'Court hearing today (07:00 - 11:00).'
  281. else
  282. $stat_court_msg = ''
  283. end
  284. if policeQW['legal_fine'] > 0:
  285. $stat_fines_msg = 'You have outstanding fines totalling ₽<<policeQW[''legal_fine'']>> and you have <<policeQW[''fine_deadline'']-daystart>> days left to pay them. You can settle your debt at the post office.'
  286. $stat_fines_tooltip = ''
  287. else
  288. $stat_fines_msg = ''
  289. $stat_fines_tooltip = ''
  290. end
  291. killvar '$stat_hypno_msg'
  292. killvar '$stat_hypno_tooltip'
  293. if hypnoAddict > 0:
  294. if hypnoWithdrawal = 2:
  295. if missCum >= timeTresh:
  296. $stat_hypno_msg = 'You want some sperm inside of you NOW! You have to talk to your therapist, immediately.'
  297. $stat_hypno_tooltip = 'You have to talk to your therapist, immediately.'
  298. else
  299. $stat_hypno_msg = 'You need to talk to your therapist. You feel unbalanced without your sessions.'
  300. $stat_hypno_tooltip = 'You feel unbalanced without your sessions.'
  301. end
  302. elseif hypnoWithdrawal = 1:
  303. if missCum >= timeTresh:
  304. $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.'
  305. $stat_hypno_tooltip = 'You should talk to your therapist.'
  306. else
  307. $stat_hypno_msg = 'You feel like talking to your therapist. You miss your sessions.'
  308. $stat_hypno_tooltip = 'You miss your sessions.'
  309. end
  310. elseif missCum > 0:
  311. $stat_hypno_msg = 'You miss the feeling of sperm in your body, and you feel moody.'
  312. $stat_hypno_tooltip = 'You feel moody for some reason.'
  313. end
  314. end
  315. if hypnoSchedule = 1:
  316. if therapist_weekly_block = 0 and week = 4 and therapistday ! daystart:
  317. if $stat_hypno_msg ! '':
  318. $stat_hypno_msg += '<br>'
  319. $stat_hypno_tooltip += '<br>'
  320. end
  321. if hour < 18:
  322. $stat_hypno_msg += 'You have a meeting scheduled with your therapist today at 18:00.'
  323. $stat_hypno_tooltip += 'Session at 18:00!'
  324. elseif hour < 19 and hour > 18:
  325. $stat_hypno_msg += 'You have a meeting scheduled with your therapist right now.'
  326. $stat_hypno_tooltip += 'Session right now!'
  327. end
  328. end
  329. end
  330. if frost > 0 and frost < 6:
  331. $stat_frost_msg = 'You are a little chilly.'
  332. elseif frost > 0 and frost < 11:
  333. $stat_frost_msg = 'You are cold.'
  334. elseif frost > 0:
  335. $stat_frost_msg = 'You are freezing.'
  336. else
  337. $stat_frost_msg = ''
  338. end
  339. if sick = 1:
  340. $stat_sick_tooltip = 'You have a mild cold.'
  341. $stat_sick_msg = 'This is not good, a tickle in the throat and a little runny nose.'
  342. elseif sick > 0 and sick < 24:
  343. $stat_sick_tooltip = 'You have a cold.'
  344. $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.'
  345. elseif sick > 0 and sick < 48:
  346. $stat_sick_tooltip = 'You have a serious cold.'
  347. $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.'
  348. elseif sick > 0 and sick < 72:
  349. $stat_sick_tooltip = 'You have the flu.'
  350. $stat_sick_msg = 'You have a high fever. You have a stuffy nose, sore head and throat, you''re coughing badly - it looks like you got a strong cold. Maybe it''s the flu.'
  351. elseif sick > 0:
  352. $stat_sick_tooltip = 'You are seriously sick.'
  353. $stat_sick_msg = 'You toss in the heat. You have a stuffy nose and 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.'
  354. else
  355. $stat_sick_msg = ''
  356. end
  357. if SchoolBlock = 0:
  358. if week = 1:
  359. $stat_school_schedule = ' Today you have the following lessons math, russian, literature, art, biology and P.E.'
  360. elseif week = 2:
  361. $stat_school_schedule = ' Today you have the following lessons english, geography, science, shop, computer, music.'
  362. elseif week = 3:
  363. $stat_school_schedule = ' Today you have the following lessons math, russian, biology, history, computer and P.E.'
  364. elseif week = 4:
  365. $stat_school_schedule = ' Today you have the following lessons english, geography, science, shop, computer and music.'
  366. elseif week = 5:
  367. $stat_school_schedule = ' Today you have the following lessons math, russian, literature, art, history and P.E.'
  368. else
  369. $stat_school_schedule = ''
  370. end
  371. if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and hour < 9:
  372. $stat_school_msg = 'You have to be at school before 07:55 if you don''t want to be late.'
  373. $stat_school_tooltip = 'School starts at 07:55.'
  374. elseif mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour < 9 and detention_set = 1 and SchoolAtestat = 0:
  375. $stat_school_msg = 'You have detention this morning and must be at school before 09:00.'
  376. $stat_school_tooltip = 'Detention starts at 09:00.'
  377. else
  378. $stat_school_msg = ''
  379. $stat_school_icon_msg = ''
  380. end
  381. if $stat_school_msg ! '': $stat_school_icon_msg = $stat_school_msg + $stat_school_schedule
  382. end
  383. if university['student'] = 1:
  384. if university['semester_week'] = -1:
  385. $stat_uni_msg = 'Your next semester at the university starts next week. Classes will be Monday to Thursday starting at 9:00.'
  386. $stat_uni_tooltip = 'Your next semester at the university starts next week.'
  387. elseif university['semester_week'] > 0 and week < 5 and hour < 9 and uni_period['first'] ! daystart:
  388. $stat_uni_msg = 'You have classes at the university today, the first class starts at 9:00.'
  389. $stat_uni_tooltip = 'First class today is at 9:00.'
  390. elseif university['semester_week'] > 0 and week < 5 and hour < 11 and uni_period['second'] ! daystart:
  391. $stat_uni_msg = 'You have classes at the university today, the next class starts at 11:00.'
  392. $stat_uni_tooltip = 'Next class today is at 11:00.'
  393. elseif university['semester_week'] > 0 and week = 1 and (hour < 13 or (hour = 13 and minut < 15)) and uni_period['third'] ! daystart and $university['elective1'] ! '':
  394. $stat_uni_msg = 'You have elective class at the university today, it starts at 13:15.'
  395. $stat_uni_tooltip = 'Your elective clas today is at 13:15.'
  396. elseif university['semester_week'] > 0 and week = 2 and (hour < 13 or (hour = 13 and minut < 15)) and uni_period['third'] ! daystart and $university['elective2'] ! '':
  397. $stat_uni_msg = 'You have elective class at the university today, it starts at 13:15.'
  398. $stat_uni_tooltip = 'Your elective clas today is at 13:15.'
  399. elseif university['semester_week'] > 0 and week = 3 and (hour < 13 or (hour = 13 and minut < 15)) and uni_period['third'] ! daystart:
  400. $stat_uni_msg = 'You have classes at the university today, the last class starts at 13:15.'
  401. $stat_uni_tooltip = 'Last class today is at 13:15.'
  402. elseif university['semester_week'] > 0 and week = 4 and (hour < 13 or (hour = 13 and minut < 15)) and uni_period['third'] ! daystart and $university['elective3'] ! '':
  403. $stat_uni_msg = 'You have elective class at the university today, it starts at 13:15.'
  404. $stat_uni_tooltip = 'Your elective class today is at 13:15.'
  405. elseif university['exam_week'] = 1 and week < 4:
  406. $stat_uni_msg = 'You have exams at the university this week and the next . Your first exam is Thursdy this week at 9:00.'
  407. $stat_uni_tooltip = 'First week of exams.'
  408. elseif university['exam_week'] = 1 and week = 4 and hour < 9:
  409. $stat_uni_msg = 'You have exams at the university this week and the next . Your first exam is today 9:00.'
  410. $stat_uni_tooltip = 'First week of exams.'
  411. elseif university['exam_week'] = 1:
  412. $stat_uni_msg = 'You have no more exams this week. Your next exam will be Tuesday next week at 9:00.'
  413. $stat_uni_tooltip = 'First week of exams.'
  414. elseif university['exam_week'] = 2 and week < 2:
  415. $stat_uni_msg = 'This is the last week of exams at the university this semester. Your next exam will be Tuesday this week at 9:00.'
  416. $stat_uni_tooltip = 'Second week of exams.'
  417. elseif university['exam_week'] = 2 and week < 2 and hour < 9:
  418. $stat_uni_msg = 'This is the last week of exams at the university this semester. Your next exam will be today at 9:00.'
  419. $stat_uni_tooltip = 'Second week of exams.'
  420. elseif university['exam_week'] = 2 and week < 4:
  421. $stat_uni_msg = 'This is the last week of exams at the university this semester. Your last exam will be Thursday this week at 9:00.'
  422. $stat_uni_tooltip = 'Second week of exams.'
  423. elseif university['exam_week'] = 2 and week < 4 and hour < 9:
  424. $stat_uni_msg = 'This is the last week of exams at the university this semester. Your last exam will be today at 9:00.'
  425. $stat_uni_tooltip = 'Second week of exams.'
  426. elseif university['exam_week'] = 2:
  427. $stat_uni_msg = 'This is the last week of exams at the university this semester. All your exams are over. Now is just waiting to get the result on Monday.'
  428. $stat_uni_tooltip = 'Second week of exams.'
  429. elseif university['enrolled_in_semester'] = university['semester_passed'] and university['semester_passed'] < 8:
  430. $stat_uni_msg = 'Your need to register for your next semester before it starts at the university administration.'
  431. $stat_uni_tooltip = 'Your need to register for your next semester.'
  432. else
  433. $stat_uni_msg = ''
  434. $stat_uni_icon_msg = ''
  435. end
  436. if $stat_uni_msg ! '': $stat_uni_icon_msg = $stat_uni_msg
  437. end
  438. if ml_guitarlesson['nextlesson'] = daystart and hour < 15:
  439. $stat_musiclesson_msg = 'You have a guitar lesson scheduled for 1500 at the Community Hall.'
  440. $stat_musiclesson_tip = 'Guitar lesson day.'
  441. else
  442. $stat_musiclesson_msg = ''
  443. $stat_musiclesson_tip = ''
  444. end
  445. if yearstart > 1 and nerd_game['game_day'] = daystart and hour < 19:
  446. $stat_game_night_msg = 'Game night starts tonight at 18:00 at the Coffee Hole'
  447. $stat_game_night_tooltip = 'Nerd Game Night'
  448. elseif yearstart <= 1 and nerd_game['game_day'] = daystart and hour < 21:
  449. $stat_game_night_msg = 'Game night starts tonight at 20:00 at the Community Center'
  450. $stat_game_night_tooltip = 'Nerd Game Night'
  451. else
  452. $stat_game_night_msg = ''
  453. $stat_game_night_tooltip = ''
  454. end
  455. $stat_bra_msg = ''
  456. $stat_bra_text = ''
  457. if $clothingworntype ! 'nude':
  458. if PCloThinness = 6 and $braworntype ! 'none':
  459. $stat_bra_msg = 'Your bra is clearly showing through your transparent top.'
  460. $stat_bra_text = '<BR><font color = #FF0000><<$stat_bra_msg>></font>'
  461. elseif PCloThinness = 5 and $braworntype ! 'none':
  462. if PCloDress = 1:
  463. $stat_bra_msg = 'The outline of your bra is visible through your dress.'
  464. $stat_bra_text = '<BR><font color = #0064FF><<$stat_bra_msg>></font>'
  465. else
  466. $stat_bra_msg = 'Your outline of your bra is visible through your top.'
  467. $stat_bra_text = '<BR><font color = #0064FF><<$stat_bra_msg>></font>'
  468. end
  469. elseif CloTopCut = 4 and $braworntype ! 'none':
  470. if PCloDress = 1:
  471. $stat_bra_msg = 'Parts of your bra are visible due to your dress''s cut.'
  472. $stat_bra_text = '<BR><font color = #0064FF><<$stat_bra_msg>></font>'
  473. else
  474. $stat_bra_msg = 'Parts of your bra are visible due to your top''s cut.'
  475. $stat_bra_text = '<BR><font color = #0064FF><<$stat_bra_msg>></font>'
  476. end
  477. elseif CloTopCut = 3 and $braworntype ! 'none':
  478. $stat_bra_msg = 'Some glimpses of your bra are visible due to your plunging neckline.'
  479. $stat_bra_text = '<BR><font color = #0064FF><<$stat_bra_msg>></font>'
  480. elseif $braworntype = 'none' and pcs_horny >= 50:
  481. $stat_bra_msg = 'You are not wearing a bra and your aroused nipples are rock hard.'
  482. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  483. elseif $braworntype = 'none' and temper < 14:
  484. $stat_bra_msg = 'You are not wearing a bra and your nipples are freezing cold.'
  485. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  486. elseif $braworntype = 'none':
  487. if pcs_cupsize <= 5:
  488. $stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts feel comfortable against the inside of your clothes.'
  489. !! $titsize = 'AA cup'
  490. elseif pcs_cupsize <= 10:
  491. $stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts ever so slightly bounce as you walk.'
  492. !! $titsize = 'A cup'
  493. elseif pcs_cupsize <= 15:
  494. $stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts jiggle softly as you walk.'
  495. !! $titsize = 'B cup'
  496. elseif pcs_cupsize <= 20:
  497. $stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts bounce with every step.'
  498. !! $titsize = 'C cup'
  499. elseif pcs_cupsize <= 30:
  500. $stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts bounce with every step.'
  501. !! $titsize = 'E cup'
  502. else
  503. $stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts bounce dramatically with every step.'
  504. !! $titsize = 'K cup'
  505. end
  506. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  507. end
  508. if PCloBra = 1:
  509. $stat_bra_msg = 'Your top is replacing your bra.'
  510. $stat_bra_text = '<BR><font color = #AB052A><<$stat_bra_msg>></font>'
  511. end
  512. if PCloCoverTop = 4:
  513. $stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are completely exposed.'
  514. $stat_bra_text = '<BR><font color = #FF0000><<$stat_bra_msg>></font>'
  515. elseif PCloCoverTop = 3:
  516. $stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are clearly visible through your clothing.'
  517. $stat_bra_text = '<BR><font color = #FF0000><<$stat_bra_msg>></font>'
  518. elseif PCloCoverTop = 2:
  519. $stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are visible through your clothing.'
  520. $stat_bra_text = '<BR><font color = #FF0000><<$stat_bra_msg>></font>'
  521. elseif PCloCoverTop = 1:
  522. $stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are barely visible through your clothing.'
  523. $stat_bra_text = '<BR><font color = #0064FF><<$stat_bra_msg>></font>'
  524. end
  525. end
  526. $stat_panty_msg = ''
  527. $stat_panty_text = ''
  528. if $clothingworntype ! 'nude':
  529. if PCloThinness = 6:
  530. if $pantyworntype ! 'none':
  531. if PCloSkirt = 6:
  532. $stat_panty_msg = 'Your dress is so short that your panties clearly visible.'
  533. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  534. elseif PCloSkirt = 5:
  535. if PCloDress = 1:
  536. $stat_panty_msg = 'Your dress is short and transparent so anyone can see your panties.'
  537. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  538. else
  539. $stat_panty_msg = 'Your skirt is short and transparent so anyone can see your panties.'
  540. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  541. end
  542. elseif PCloDress = 1:
  543. $stat_panty_msg = 'Your panties are clearly showing through your transparent dress.'
  544. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  545. elseif PCloSkirt > 0:
  546. $stat_panty_msg = 'Your panties are clearly showing through your transparent skirt.'
  547. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  548. else
  549. $stat_panty_msg = 'Your panties are clearly showing through your transparent pants.'
  550. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  551. end
  552. end
  553. elseif PCloThinness = 5:
  554. if $pantyworntype ! 'none':
  555. if PCloSkirt = 6:
  556. if PCloDress = 1:
  557. $stat_panty_msg = 'Your dress is so short that your panties clearly visible.'
  558. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  559. else
  560. $stat_panty_msg = 'Your skirt is so short that your panties clearly visible.'
  561. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  562. end
  563. elseif PCloSkirt = 5:
  564. if PCloDress = 1:
  565. $stat_panty_msg = 'The outline of your panties can be seen and often exposed by your short dress.'
  566. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  567. else
  568. $stat_panty_msg = 'The outline of your panties can be seen and often exposed by your short skirt.'
  569. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  570. end
  571. elseif PCloDress = 1:
  572. $stat_panty_msg = 'The outline of your panties is visible through your dress.'
  573. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  574. elseif PCloSkirt > 0:
  575. $stat_panty_msg = 'The outline of your panties is visible through your skirt.'
  576. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  577. else
  578. if PCloPants = 6:
  579. $stat_panty_msg = 'Your short shorts expose your panties and are so thin the outline of the rest of your panties can be seen.'
  580. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  581. else
  582. $stat_panty_msg = 'The outline of your panties is visible through your pants.'
  583. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  584. end
  585. end
  586. end
  587. elseif PCloSkirt = 6:
  588. $stat_panty_msg = 'Your dress is so short that your panties clearly visible.'
  589. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  590. elseif PCloSkirt = 5:
  591. $stat_panty_msg = 'Your dress is short and your panties can often be seen.'
  592. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  593. elseif PCloSkirt = 4:
  594. $stat_panty_msg = 'Your dress is short enough that and your panties can be seen when you bend over.'
  595. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  596. elseif PCloPants = 6:
  597. $stat_panty_msg = 'Your short shorts expose your panties.'
  598. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  599. end
  600. if PCloPanties = 1:
  601. $stat_panty_msg = 'Your outfit is replacing your panties.'
  602. $stat_panty_text = '<BR><font color = #AB052A><<$stat_panty_msg>></font>'
  603. elseif $pantyworntype = 'none':
  604. if pcs_inhib < 30:
  605. $stat_panty_msg = 'You are not wearing panties.'
  606. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  607. elseif pcs_inhib < 70:
  608. $stat_panty_msg = 'You are not wearing panties.'
  609. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  610. else
  611. $stat_panty_msg = 'You are not wearing panties.'
  612. $stat_panty_text = '<BR><font color = #AB052A><<$stat_panty_msg>></font>'
  613. end
  614. end
  615. if PCloCoverBack = 4:
  616. if PCloCoverFront = 4:
  617. $stat_panty_msg = 'Your pussy and butt are completely exposed.'
  618. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  619. elseif PCloCoverFront = 3:
  620. $stat_panty_msg = 'Your pussy is clearly visible and your butt completely exposed through your clothing.'
  621. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  622. elseif PCloCoverFront = 2:
  623. $stat_panty_msg = 'Your pussy is visible and your butt completely exposed through your clothing.'
  624. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  625. elseif PCloCoverFront = 1:
  626. $stat_panty_msg = 'Your pussy is barely visible and your butt completely exposed through your clothing.'
  627. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  628. end
  629. elseif PCloCoverBack = 3:
  630. if PCloCoverFront = 4:
  631. $stat_panty_msg = 'Your butt is clearly visible and your pussy completely exposed.'
  632. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  633. elseif PCloCoverFront = 3:
  634. $stat_panty_msg = 'Your pussy and your butt are clearly visible through your clothing.'
  635. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  636. elseif PCloCoverFront = 2:
  637. $stat_panty_msg = 'Your pussy is visible and your butt clearly visible through your clothing.'
  638. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  639. elseif PCloCoverFront = 1:
  640. $stat_panty_msg = 'Your pussy is barely visible and your butt clearly visible through your clothing.'
  641. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  642. end
  643. elseif PCloCoverBack = 2:
  644. if PCloCoverFront = 4:
  645. $stat_panty_msg = 'Your butt is visible and your pussy completely exposed.'
  646. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  647. elseif PCloCoverFront = 3:
  648. $stat_panty_msg = 'Your pussy is clearly visible and your butt visible through your clothing.'
  649. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  650. elseif PCloCoverFront = 2:
  651. $stat_panty_msg = 'Your pussy and butt are visible through your clothing.'
  652. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  653. elseif PCloCoverFront = 1:
  654. $stat_panty_msg = 'Your pussy is barely visible and your butt visible through your clothing.'
  655. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  656. end
  657. elseif PCloCoverBack = 1:
  658. if PCloCoverFront = 4:
  659. $stat_panty_msg = 'Your butt is barely visible and your pussy completely exposed.'
  660. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  661. elseif PCloCoverFront = 3:
  662. $stat_panty_msg = 'Your pussy is clearly visible and your butt barely visible through your clothing.'
  663. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  664. elseif PCloCoverFront = 2:
  665. $stat_panty_msg = 'Your pussy is visible and your butt barely visible through your clothing.'
  666. $stat_panty_text = '<BR><font color = #FF0000><<$stat_panty_msg>></font>'
  667. elseif PCloCoverFront = 1:
  668. $stat_panty_msg = 'Your pussy and your butt are barely visible through your clothing.'
  669. $stat_panty_text = '<BR><font color = #0064FF><<$stat_panty_msg>></font>'
  670. end
  671. end
  672. end
  673. $stat_clothes_msg = ''
  674. $stat_clothes_text = ''
  675. if $clothingworntype = 'nude':
  676. if PanThinness >= 5 and $pantyworntype ! 'none':
  677. if $braworntype = 'none':
  678. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through panties, and your boobs sway invitingly as you walk.</font>'
  679. $stat_clothes_tooltip = 'You are wearing your see-through panties.'
  680. $stat_clothes_msg = 'You are only wearing your see-through panties, and your boobs sway invitingly as you walk.'
  681. elseif BraThinness >= 5:
  682. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through underwear.</font>'
  683. $stat_clothes_tooltip = 'You are wearing your see-through underwear.'
  684. $stat_clothes_msg = 'You are only wearing your see-through underwear.'
  685. else
  686. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through panties and bra.</font>'
  687. $stat_clothes_tooltip = 'You are wearing your see-through panties and a regular bra.'
  688. $stat_clothes_msg = 'You are only wearing your see-through panties and a regular bra.'
  689. end
  690. elseif $pantyworntype ! 'none':
  691. if $braworntype = 'none':
  692. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your panties, and your boobs sway invitingly as you walk.</font>'
  693. $stat_clothes_tooltip = 'You are wearing your panties.'
  694. $stat_clothes_msg = 'You are only wearing your panties, and your boobs sway invitingly as you walk.'
  695. elseif BraThinness >= 5:
  696. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your see-through bra and panties.</font>'
  697. $stat_clothes_tooltip = 'You are wearing your see-through bra and panties.'
  698. $stat_clothes_msg = 'You are only wearing your see-through bra and panties.'
  699. else
  700. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your underwear.</font>'
  701. $stat_clothes_tooltip = 'You are wearing your underwear.'
  702. $stat_clothes_msg = 'You are wearing your underwear.'
  703. end
  704. else
  705. if $braworntype ! 'none':
  706. $stat_clothes_text = '<BR><font color = #AB052A>You are only wearing your bra, leaving your pussy and ass completely exposed.</font>'
  707. $stat_clothes_tooltip = 'You are only wearing your bra.'
  708. $stat_clothes_msg = 'You are only wearing your bra, leaving your pussy and ass completely exposed.'
  709. else
  710. if pcs_inhib < 5:
  711. $stat_clothes_text = '<BR><b><font color = #AB052A>You are completely naked, and it makes you feel nervous and ashamed.</font></b>'
  712. $stat_clothes_tooltip = 'You don''t like being naked.'
  713. $stat_clothes_msg = 'You are completely naked, and it makes you feel nervous and ashamed.'
  714. elseif pcs_inhib < 20:
  715. $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>'
  716. $stat_clothes_tooltip = 'It''s a bit exciting to be naked.'
  717. $stat_clothes_msg = 'You are completely naked. You''re not too comfortable with nudity, but it is a little exciting.'
  718. elseif pcs_inhib >= 90:
  719. $stat_clothes_text = '<BR><b><font color=#0064FF>You are completely naked, which is far better than having to wear clothes.</font></b>'
  720. $stat_clothes_tooltip = 'Being naked is far better than wearing clothes.'
  721. $stat_clothes_msg = 'You are completely naked, which is far better than having to wear clothes.'
  722. else
  723. $stat_clothes_text = '<BR><b><font color = #FF00FF>You are completely naked. It''s exciting, and you feel tingly inside.</font></b>'
  724. $stat_clothes_tooltip = 'It''s exciting to be naked.'
  725. $stat_clothes_msg = 'You are completely naked. It''s exciting, and you feel tingly inside.'
  726. end
  727. end
  728. end
  729. $stat_clothes_style = 'nude'
  730. elseif $clothingworntype = 'danilovich_outfits':
  731. if PCloBimbo = 1 and cheatBimbo = 0:
  732. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  733. $stat_clothes_msg = 'You are wearing a gym outfit a bimbo would wear'
  734. $stat_clothes_tooltip = 'Bimbo gym outfit.'
  735. $stat_clothes_style = 'exercise_b'
  736. elseif PCloInhibit >= 30:
  737. $stat_clothes_msg = 'You''re wearing a revealing gym outfit.'
  738. $stat_clothes_tooltip = 'Revealing gym outfit.'
  739. $stat_clothes_style = 'exercise_s'
  740. elseif PCloInhibit >= 20:
  741. $stat_clothes_msg = 'You''re wearing a slightly revealing gym outfit.'
  742. $stat_clothes_tooltip = 'Slightly revealing gym outfit.'
  743. $stat_clothes_style = 'exercise_s'
  744. else
  745. $stat_clothes_msg = 'You''re wearing a normal gym outfit.'
  746. $stat_clothes_tooltip = 'Normal gym outfit.'
  747. $stat_clothes_style = 'exercise'
  748. end
  749. elseif PCloswimwear = 1:
  750. if (PCloInhibit >= 50 or PCloThinness = 6) and PCloBimbo = 1 and cheatBimbo = 0:
  751. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  752. $stat_clothes_msg = 'You''re wearing an exhibitionist swimsuit a bimbo would wear.'
  753. $stat_clothes_tooltip = 'Exhibitionist/Bimbo swimsuit.'
  754. $stat_clothes_style = 'swimsuit_eb'
  755. elseif (PCloInhibit >= 50 or PCloThinness = 6) and (PCloBimbo = 0 or cheatBimbo = 1):
  756. $stat_clothes_msg = 'You are wearing an exhibitionist swimsuit.'
  757. $stat_clothes_tooltip = 'Exhibitionist swimsuit.'
  758. $stat_clothes_style = 'swimsuit_e'
  759. elseif PCloBimbo = 1 and cheatBimbo = 0:
  760. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  761. $stat_clothes_msg = 'You are wearing a swimsuit a bimbo would wear.'
  762. $stat_clothes_tooltip = 'Bimbo swimsuit.'
  763. $stat_clothes_style = 'swimsuit_b'
  764. elseif PCloInhibit >= 40:
  765. $stat_clothes_msg = 'You''re wearing a very revealing swimsuit.'
  766. $stat_clothes_tooltip = 'Very revealing swimsuit.'
  767. $stat_clothes_style = 'swimsuit_s'
  768. elseif PCloInhibit >= 30:
  769. $stat_clothes_msg = 'You''re wearing a revealing swimsuit.'
  770. $stat_clothes_tooltip = 'Revealing swimsuit.'
  771. $stat_clothes_style = 'swimsuit_s'
  772. elseif PCloInhibit >= 25:
  773. $stat_clothes_msg = 'You''re wearing a slightly revealing swimsuit.'
  774. $stat_clothes_tooltip = 'Slightly revealing swimsuit.'
  775. $stat_clothes_style = 'swimsuit_s'
  776. else
  777. $stat_clothes_msg = 'You''re wearing a normal swimsuit.'
  778. $stat_clothes_tooltip = 'Normal swimsuit.'
  779. $stat_clothes_style = 'swimsuit'
  780. end
  781. elseif $clothingworntype = 'gm_office':
  782. if PCloStyle = 4 and PCloBimbo = 1 and cheatBimbo = 0:
  783. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  784. $stat_clothes_msg = 'You''re wearing an office dress a bimbo or a prostitute would wear'
  785. $stat_clothes_tooltip = 'Prostitute/Bimbo office dress.'
  786. $stat_clothes_style = 'office_pb'
  787. elseif PCloStyle = 4 and (PCloBimbo = 0 or cheatBimbo = 1):
  788. $stat_clothes_msg = 'You''re wearing an office dress a prostitute would wear.'
  789. $stat_clothes_tooltip = 'Prostitute office dress.'
  790. $stat_clothes_style = 'office_p'
  791. elseif (PCloInhibit >= 40 or PCloThinness = 6) and PCloBimbo = 1 and cheatBimbo = 0:
  792. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  793. $stat_clothes_msg = 'You''re wearing an exhibitionist office dress a bimbo would wear'
  794. $stat_clothes_tooltip = 'Exhibitionist/Bimbo office office dress.'
  795. $stat_clothes_style = 'office_eb'
  796. elseif (PCloInhibit >= 40 or PCloThinness = 6) and (PCloBimbo = 0 or cheatBimbo = 1):
  797. $stat_clothes_msg = 'You are wearing an exhibitionist office dress.'
  798. $stat_clothes_tooltip = 'Exhibitionist office dress.'
  799. $stat_clothes_style = 'office_e'
  800. elseif PCloBimbo = 1 and cheatBimbo = 0:
  801. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  802. $stat_clothes_msg = 'You are wearing an office dress a bimbo would wear'
  803. $stat_clothes_tooltip = 'Bimbo office dress.'
  804. $stat_clothes_style = 'office_b'
  805. elseif PCloInhibit >= 30:
  806. $stat_clothes_msg = 'You''re wearing a very revealing office dress.'
  807. $stat_clothes_tooltip = 'Very revealing office dress.'
  808. $stat_clothes_style = 'office_s'
  809. elseif PCloInhibit >= 25:
  810. $stat_clothes_msg = 'You''re wearing a revealing office dress.'
  811. $stat_clothes_tooltip = 'Revealing office dress.'
  812. $stat_clothes_style = 'office_s'
  813. elseif PCloInhibit >= 20:
  814. $stat_clothes_msg = 'You''re wearing a slightly revealing office dress.'
  815. $stat_clothes_tooltip = 'Slightly revealing office dress.'
  816. $stat_clothes_style = 'office_s'
  817. else
  818. $stat_clothes_msg = 'You''re wearing a normal office dress.'
  819. $stat_clothes_tooltip = 'Normal office dress.'
  820. $stat_clothes_style = 'office'
  821. end
  822. elseif PCloStyle2 = 4:
  823. if PCloStyle = 4 and PCloBimbo = 1 and cheatBimbo = 0:
  824. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  825. $stat_clothes_msg = 'You''re wearing a school uniform a prostitute or bimbo would wear.'
  826. $stat_clothes_tooltip = 'Prostitute/Bimbo school uniform'
  827. $stat_clothes_style = 'uniform_pb'
  828. elseif PCloStyle = 4 and (PCloBimbo = 0 or cheatBimbo = 1):
  829. $stat_clothes_msg = 'You''re wearing a school uniform a prostitute would wear.'
  830. $stat_clothes_tooltip = 'Prostitute school uniform.'
  831. $stat_clothes_style = 'uniform_p'
  832. elseif PCloBimbo = 1 and cheatBimbo = 0:
  833. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  834. $stat_clothes_msg = 'You''re wearing a school uniform a bimbo would wear.'
  835. $stat_clothes_tooltip = 'Bimbo school uniform.'
  836. $stat_clothes_style = 'uniform_b'
  837. elseif PCloInhibit >= 30:
  838. $stat_clothes_msg = 'You''re wearing a very revealing school uniform.'
  839. $stat_clothes_tooltip = 'Very revealing school uniform.'
  840. $stat_clothes_style = 'uniform_s'
  841. elseif PCloInhibit >= 25:
  842. $stat_clothes_msg = 'You''re wearing a revealing school uniform.'
  843. $stat_clothes_tooltip = 'Revealing school uniform.'
  844. $stat_clothes_style = 'uniform_s'
  845. elseif PCloInhibit >= 20:
  846. $stat_clothes_msg = 'You''re wearing a slightly revealing school uniform.'
  847. $stat_clothes_tooltip = 'Slightly revealing school uniform.'
  848. $stat_clothes_style = 'uniform_s'
  849. else
  850. $stat_clothes_msg = 'You''re wearing a normal school uniform.'
  851. $stat_clothes_tooltip = 'Normal school uniform.'
  852. $stat_clothes_style = 'uniform'
  853. end
  854. elseif $clothingworntype = 'misc_outfits' and clothingwornnumber = '1':
  855. $stat_clothes_text = '<BR><b><font color = "yellow">You are wearing an old hessian sack the hunters gave you.</font></b>'
  856. $stat_clothes_tooltip = 'You''re wearing a hessian sack.'
  857. $stat_clothes_msg = 'You are wearing an old hessian sack the hunters gave you.'
  858. $stat_clothes_style = 'clothes'
  859. else
  860. if PCloStyle = 4 and PCloBimbo = 1 and cheatBimbo = 0:
  861. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo, prostitute outfit</font>'
  862. $stat_clothes_msg = 'You''re wearing an outfit a bimbo, prostitute would wear.'
  863. $stat_clothes_tooltip = 'Prostitute/Bimbo outfit.'
  864. $stat_clothes_style = 'clothes_pb'
  865. elseif PCloStyle = 4:
  866. $stat_clothes_msg = 'You''re wearing an outfit a prostitute would wear.'
  867. $stat_clothes_tooltip = 'Prostitute outfit.'
  868. $stat_clothes_style = 'clothes_p'
  869. elseif (PCloInhibit >= 40 or PCloThinness = 6) and PCloBimbo = 1 and cheatBimbo = 0:
  870. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo, exhibitionist outfit</font>'
  871. $stat_clothes_msg = 'You''re wearing exhibitionist clothes a bimbo would wear.'
  872. $stat_clothes_tooltip = 'Exhibitionist/Bimbo outfit.'
  873. $stat_clothes_style = 'clothes_eb'
  874. elseif (PCloInhibit >= 40 or PCloThinness = 6):
  875. $stat_clothes_msg = 'You are wearing exhibitionist clothes.'
  876. $stat_clothes_tooltip = 'Exhibitionist outfit.'
  877. $stat_clothes_style = 'clothes_e'
  878. elseif PCloBimbo = 1 and cheatBimbo = 0:
  879. $stat_clothes_text = '<BR><font color = #FF00FF>You are wearing a bimbo outfit</font>'
  880. $stat_clothes_msg = 'You are wearing bimbo clothes.'
  881. $stat_clothes_tooltip = 'Bimbo outfit.'
  882. $stat_clothes_style = 'clothes_b'
  883. elseif PCloInhibit >= 30:
  884. $stat_clothes_msg = 'You''re wearing very revealing clothes.'
  885. $stat_clothes_tooltip = 'Very revealing outfit.'
  886. $stat_clothes_style = 'clothes_s'
  887. elseif PCloInhibit >= 25:
  888. $stat_clothes_msg = 'You''re wearing revealing clothes.'
  889. $stat_clothes_tooltip = 'Revealing outfit.'
  890. $stat_clothes_style = 'clothes_s'
  891. elseif PCloInhibit >= 20:
  892. $stat_clothes_msg = 'You''re wearing slightly revealing clothes.'
  893. $stat_clothes_tooltip = 'Slightly revealing outfit.'
  894. $stat_clothes_style = 'clothes_s'
  895. else
  896. $stat_clothes_msg = 'You''re wearing normal clothes.'
  897. $stat_clothes_tooltip = 'Normal outfit.'
  898. $stat_clothes_style = 'clothes'
  899. end
  900. end
  901. if PCloBimbo = 1:
  902. if ShoStyle = 2:
  903. if pcs_makeup = 6:
  904. $stat_clothes_text += '<font color = #FF00FF>, bimbo shoes and bimbo make up</font>'
  905. $stat_clothes_text += '<BR><font color = #FF00FF>You look like a bimbo</font>'
  906. bimbo_flag = 1
  907. else
  908. $stat_clothes_text += '<font color = #FF00FF> and bimbo shoes</font>'
  909. end
  910. end
  911. end
  912. $stat_img_temp = func('$body_image','clothes')
  913. $stat_clothes_msg += '<br><img src="<<$stat_img_temp>>">'
  914. gs 'cum_manage', 'cum_stat_display'
  915. $stat_bfgf_msg_0 = ''
  916. $stat_bfgf_tooltip_0 = ''
  917. $stat_bfgf_msg_1 = ''
  918. $stat_bfgf_tooltip_1 = ''
  919. $stat_bfgf_msg_2 = ''
  920. $stat_bfgf_tooltip_2 = ''
  921. if hour < meethour[0] and svidanie[0] = 1:
  922. $stat_bfgf_msg_0 = '<<$loverdesc[0]>> will be waiting for you near <<$streetev_home>> at <<meethour[0]>>:00.'
  923. $stat_bfgf_tooltip_0 = 'Your date with <<$loverdesc[0]>> starts at <<meethour[0]>>:00 near <<$streetev_home>>.'
  924. elseif hour = meethour[0] and svidanie[0] = 1:
  925. $stat_bfgf_msg_0 = '<<$loverdesc[0]>> is waiting for you by <<$streetev_home>>.'
  926. $stat_bfgf_tooltip_0 = '<<$loverdesc[0]>> is waiting near <<$streetev_home>>.'
  927. elseif meetday[0] < daystart and svidanie[0] = 1:
  928. pcs_lovers_rel[0] -= 10 & svidanie[0] = 0
  929. end
  930. if hour < meethour[1] and svidanie[1] = 1:
  931. $stat_bfgf_msg_1 = '<<$loverdesc[1]>> will be waiting for you near <<$streetev_home>> at <<meethour[1]>>:00.'
  932. $stat_bfgf_tooltip_1 = 'Your date with <<$loverdesc[1]>> starts at <<meethour[1]>>:00 near <<$streetev_home>>.'
  933. elseif hour = meethour[1] and svidanie[1] = 1:
  934. $stat_bfgf_msg_1 = '<<$loverdesc[1]>> is waiting for you by <<$streetev_home>>.'
  935. $stat_bfgf_tooltip_1 = '<<$loverdesc[1]>> is waiting near <<$streetev_home>>.'
  936. elseif meetday[1] < daystart and svidanie[1] = 1:
  937. pcs_lovers_rel[1] -= 10 & svidanie[1] = 0
  938. end
  939. if hour < meethour[2] and svidanie[2] = 1:
  940. $stat_bfgf_msg_2 = '<<$loverdesc[2]>> will be waiting for you near <<$streetev_home>> at <<meethour[2]>>:00.'
  941. $stat_bfgf_tooltip_2 = 'Your date starts at <<meethour[2]>>:00 near <<$streetev_home>>.'
  942. elseif hour = meethour[2] and svidanie[2] = 1:
  943. $stat_bfgf_msg_2 = '<<$loverdesc[2]>> is waiting for you by <<$streetev_home>>.'
  944. $stat_bfgf_tooltip_2 = '<<$loverdesc[2]>> is waiting near <<$streetev_home>>.'
  945. elseif meetday[2] < daystart and svidanie[2] = 1:
  946. pcs_lovers_rel[2] -= 10 & svidanie[2] = 0
  947. end
  948. !!---------------- Messages for Icons/Texts (End)----------------------------
  949. ! if pornstack > 0:
  950. ! porndays = 0
  951. ! :pfilmtime
  952. ! if porndays < 200 and pfilmday[porndays] = 0: porndays += 1 & jump 'pfilmtime'
  953. ! end
  954. !!-----------------Status Icons (Start)------------------
  955. if cheatStatusIcons = 0:
  956. $stat_msg += '<br><br>'
  957. !!Row 1: Appearance
  958. $statusIconBarTab = '<table><tr>'
  959. $stat_hotcat_msg = 'People would rate your appearance as a <<hotcat>> out of 10.<br><img src="<<func(''$face_image'')>>">'
  960. $statusIconBarTab += '<td><a href="exec:msg $stat_hotcat_msg"><img title="You are a <<hotcat>> out of 10." height = <<set_siconht>> src="images/system/icons/status/appearance.png"></a></td>'
  961. if pcs_makeup = 1 and mc_inventory['travel_mirror'] > 0 and mc_inventory['travel_makeup'] > 0 and menu_off = 0:
  962. $statusIconBarTab += '<td><a href="exec: minut += 3 & gs ''exp_gain'', ''makupskl'', rand(1,3) & pcs_makeup = 2 & mc_inventory[''travel_makeup''] -= 1 & gs ''stat''"><img title="<<$pcs_makeup_tooltip>> Click to put on light makeup." height = <<set_siconht>> src="images/system/icons/status/makeup_'+pcs_makeup+'.png"></a></td>'
  963. elseif pcs_makeup < 5:
  964. $statusIconBarTab += '<td><a href="exec:msg $pcs_makeup_msg"><img title="<<$pcs_makeup_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/makeup_'+pcs_makeup+'.png"></a></td>'
  965. elseif pcs_makeup >= 5:
  966. $statusIconBarTab += '<td><a href="exec:msg $pcs_makeup_msg"><img title="<<$pcs_makeup_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/makeup_4.png"></a></td>'
  967. end
  968. $stat_brush_msg = 'Your hair is <<$pcs_hairbsh>>.'
  969. if pcs_hairbsh <> 1 and mc_inventory['comb'] > 0 and menu_off = 0:
  970. $statusIconBarTab += '<td><a href="exec: minut += min(15, max(1, pcs_hairlng / 80)) & pcs_hairbsh = 1 & gs ''stat''"><img title="<<$stat_brush_msg>> Click to brush. It would take about <<min(15, max(1, pcs_hairlng / 80))>> minutes." height = <<set_siconht>> src="images/system/icons/status/hair_0.png"></a></td>'
  971. else
  972. $statusIconBarTab += '<td><a href="exec:msg $stat_brush_msg"><img title="<<$stat_brush_msg>>" height = <<set_siconht>> src="images/system/icons/status/hair_'+max(0, pcs_hairbsh)+'.png"></a></td>'
  973. end
  974. if pcs_lipbalm > 0:
  975. $stat_lipbalm_msg = 'Your lips are covered in moisturizing balm.'
  976. $statusIconBarTab += '<td><a href="exec:msg $stat_lipbalm_msg"><img title="You have applied lip balm." height = <<set_siconht>> src="images/system/icons/status/lipstick.png"></a></td>'
  977. end
  978. if false_lashes >= 1:
  979. $stat_lashes_msg = 'You''re wearing false'+iif(pcs_lashes = 4, ' mink ', ' ')+'lashes.'
  980. $statusIconBarTab +='<td><a href="exec: $stat_lashes_msg"><img title="<<$stat_lashes_msg>>" height = <<set_siconht>> src="images/system/icons/status/lashes.png"></a></td>'
  981. end
  982. 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/icons/status/deodorant.png"></a></td>'
  983. if pcs_sweat > 19: $statusIconBarTab += '<td><a href="exec:msg $stat_sweat_msg"><img title="<<$stat_sweat_msg>>" height = <<set_siconht>> src="images/system/icons/status/need_shower.png"></a></td>'
  984. if pcs_leghair > 3 or (pubestyle > 0 and pcs_pubes >= shave_trigger):
  985. if (pubestyle > 0 and pcs_pubes >= shave_trigger):
  986. $stat_shave_msg = 'You need to shave your'+iif(pcs_leghair > 3, ' legs and ', ' ')+'pussy.'
  987. elseif pcs_leghair > 3:
  988. $stat_shave_msg = 'You need to shave your legs.'
  989. end
  990. $statusIconBarTab += '<td><a href="exec:msg $stat_shave_msg"><img title="<<$stat_shave_msg>>" height = <<set_siconht>> src="images/system/icons/status/need_shave.png"></a></td>'
  991. end
  992. $statusIconBarTab += '</tr><tr>'
  993. !!Row 2: Mood, Arousal, Hunger, Thirst, Health without STDs...
  994. willpower_percent = (100 * pcs_willpwr)/willpowermax
  995. if willpower_percent > 60:
  996. $stat_willpower_msg = 'You feel confident and in control. You still have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
  997. $stat_willpower_tooltip = 'You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
  998. $statusIconBarTab += '<td><a href="exec:msg $stat_willpower_msg"><img title="<<$stat_willpower_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/willpower_high.png"></a></td>'
  999. elseif willpower_percent > 30:
  1000. $stat_willpower_msg = 'You feel like you have less control over yourself than usual. You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
  1001. $stat_willpower_tooltip = 'You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
  1002. $statusIconBarTab += '<td><a href="exec:msg $stat_willpower_msg"><img title="<<$stat_willpower_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/willpower_med.png"></a></td>'
  1003. else
  1004. $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.'
  1005. $stat_willpower_tooltip = 'You only have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
  1006. $statusIconBarTab += '<td><a href="exec:msg $stat_willpower_msg"><img title="<<$stat_willpower_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/willpower_low.png"></a></td>'
  1007. end
  1008. if pcs_mood >= 80:
  1009. $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/icons/status/mood_1.png"></a></td>'
  1010. elseif pcs_mood >= 60:
  1011. $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/icons/status/mood_2.png"></a></td>'
  1012. elseif pcs_mood >= 40:
  1013. $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/icons/status/mood_3.png"></a></td>'
  1014. elseif pcs_mood >= 20:
  1015. $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/icons/status/mood_4.png"></a></td>'
  1016. elseif pcs_mood >= 5:
  1017. $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/icons/status/mood_5.png"></a></td>'
  1018. else
  1019. $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/icons/status/mood_6.png"></a></td>'
  1020. end
  1021. if mood_trauma > 0:
  1022. mood_max_calc = max(10, mood_max)
  1023. $stat_trauma_msg = 'Recent events have lowered your maximum mood to <<mood_max_calc>>.'
  1024. $statusIconBarTab += '<td><a href="exec:msg $stat_trauma_msg"><img title="<<$stat_trauma_msg>>" height = <<set_siconht>> src="images/system/icons/status/mood_6.png"></a></td>'
  1025. killvar 'mood_max_calc'
  1026. end
  1027. if menu_off = 0:
  1028. if pain['total'] > 90:
  1029. $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/icons/status/pain_3.png"></a></td>'
  1030. elseif pain['total'] > 60:
  1031. $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/icons/status/pain_2.png"></a></td>'
  1032. elseif pain['total'] > 30:
  1033. $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/icons/status/pain_1.png"></a></td>'
  1034. end
  1035. else
  1036. if pain['total'] > 90:
  1037. $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/icons/status/pain_3.png"></a></td>'
  1038. elseif pain['total'] > 60:
  1039. $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/icons/status/pain_2.png"></a></td>'
  1040. elseif pain['total'] > 30:
  1041. $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/icons/status/pain_1.png"></a></td>'
  1042. end
  1043. end
  1044. if pcs_horny > 90:
  1045. $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/icons/status/arousal_high.png"></a></td>'
  1046. elseif pcs_horny > 60:
  1047. $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/icons/status/arousal_med.png"></a></td>'
  1048. elseif pcs_horny > 30:
  1049. $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/icons/status/arousal_low.png"></a></td>'
  1050. end
  1051. if cheatNoEat = 0 and $stat_hunger_msg ! '' and mc_inventory['food_sandwich'] = 0:
  1052. $statusIconBarTab += '<td><a href="exec:msg $stat_hunger_msg"><img title="<<$stat_hunger_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/need_food.png"></a></td>'
  1053. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and mc_inventory['food_sandwich'] = 1 and menu_off = 0:
  1054. $statusIconBarTab += '<td><a href="exec: mc_inventory[''food_sandwich''] = 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/icons/status/need_food.png"></a></td>'
  1055. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and mc_inventory['food_sandwich'] = 1 and menu_off = 1:
  1056. $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/icons/status/need_food.png"></a></td>'
  1057. end
  1058. if cheatNoDrink = 0 and $stat_thirst_msg ! '' and mc_inventory['food_water'] = 0 and mc_inventory['refill_bottle'] < 2:
  1059. $statusIconBarTab += '<td><a href="exec:msg $stat_thirst_msg"><img title="<<$stat_thirst_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/need_drink.png"></a></td>'
  1060. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and mc_inventory['refill_bottle'] > 1 and menu_off = 0:
  1061. $statusIconBarTab += '<td><a href="exec: mc_inventory[''refill_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/icons/status/need_drink.png"></a></td>'
  1062. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and mc_inventory['food_water'] > 0 and menu_off = 0:
  1063. $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/icons/status/need_drink.png"></a></td>'
  1064. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and (mc_inventory['food_water'] > 0 or mc_inventory['refill_bottle'] > 1) and menu_off = 1:
  1065. $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/icons/status/need_drink.png"></a></td>'
  1066. end
  1067. 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/icons/status/need_sleep.png"></a></td>'
  1068. $statusIconBarTab += '</tr><tr>'
  1069. !!Row 3: Pregnancy, cum, lactation, STD...
  1070. if menu_off = 0 and cheatSlut = 0:
  1071. $statusIconBarTab += '<td><a href="exec:dynamic $d_cycreport_choice"><img title="Click to open the cycle menu." height = <<set_siconht>> src="images/system/icons/status/vagina.png"></a></td>'
  1072. elseif menu_off = 1 and cheatSlut = 0:
  1073. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icons/status/vagina.png"></a></td>'
  1074. end
  1075. if menu_off = 0 and birth_control['remind_icon'] = 1:
  1076. if mc_inventory['contraceptive_pill'] = 0 and pillsleft[ptype] = 0:
  1077. $statusIconBarTab += '<td><a href="exec:msg ''You are out of birth control pills!''"><img title="It''s time to take your birth control pill, but you are out of pills" height = <<set_siconht>> src="images/system/icons/status/bc_pill.png"></a></td>'
  1078. else
  1079. $statusIconBarTab += '<td><a href="exec:gs ''din_bad'', ''quick_takepill''"><img title="It''s time to take your birth control pill!" height = <<set_siconht>> src="images/system/icons/status/bc_pill.png"></a></td>'
  1080. end
  1081. elseif menu_off = 1 and birth_control['remind_icon'] = 1:
  1082. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icons/status/bc_pill.png"></a></td>'
  1083. end
  1084. if mesec > 0 and isprok = 0 and isprokp = 0:
  1085. $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.', '.')
  1086. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vperiod_bleeding.png"></a></td>'
  1087. elseif mesec > 0 and (isprok > 0 or isprokp > 0):
  1088. $stat_bleed_msg = 'You''re using feminine hygiene products.'
  1089. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vperiod_sanitaries.png"></a></td>'
  1090. elseif placebopart > 0 and LutH > 0 and knowpreg = 0:
  1091. $stat_bleed_msg = 'Your period is due to start soon.'
  1092. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vunknown.png"></a></td>'
  1093. !!TMI elseif implant_day > 0 and ((daystart - implant_day) * 24 + hour - implant_hour) < 5:
  1094. !!pregnancy spoiler $stat_bleed_msg = 'You feel a slight twinge in your abdomen.'
  1095. !! $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vunknown.png"></a></td>'
  1096. elseif thinkpreg = 0 and knowpreg = 0 and cycle ! 6 and pillcon2 <= 30000 and succubusflag ! 1 and cheatSlut = 0 and mesec = 0:
  1097. if abortionbirthdate = 0 and daystart - daylastperiod > 28:
  1098. if (daystart - daylastperiod > 28) and (daystart - daylastperiod <= 35):
  1099. $stat_bleed_msg = 'Your period is late by <<daystart - daylastperiod - 28>> days.'
  1100. elseif (daystart - daylastperiod > 35) and (daystart - daylastperiod <= 42):
  1101. $stat_bleed_msg = 'Your period is late by more than a week!'
  1102. elseif (daystart - daylastperiod > 42) and (daystart - daylastperiod <= 56):
  1103. $stat_bleed_msg = 'Your period is late by more than two weeks! Maybe you should see a doctor?'
  1104. elseif (daystart - daylastperiod > 56) and (daystart - daylastperiod <= 84):
  1105. $stat_bleed_msg = 'Your period is late by more than a month! You really should see a doctor about it.'
  1106. elseif daystart - daylastperiod > 84:
  1107. $stat_bleed_msg = 'You should consider the possibility of a pregnancy, since apparently you no longer have periods.'
  1108. end
  1109. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vunknown.png"></a></td>'
  1110. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate <= 26:
  1111. if daystart - abortionbirthdate <= 13:
  1112. $stat_bleed_msg = 'You are still in your recovery period. Nothing to worry about.'
  1113. elseif daystart - abortionbirthdate > 13 and daystart - abortionbirthdate <= 16:
  1114. $stat_bleed_msg = 'You are maybe still in your recovery period, but there could be a risk.'
  1115. elseif daystart - abortionbirthdate > 16 and daystart - abortionbirthdate <= 21:
  1116. $stat_bleed_msg = 'You should have recovered from you abortion by know... Right?'
  1117. elseif daystart - abortionbirthdate > 21 and daystart - abortionbirthdate <= 26:
  1118. $stat_bleed_msg = 'You should have definitely recovered from your abortion by now.'
  1119. end
  1120. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vunknown.png"></a></td>'
  1121. elseif pregbirthdate ! 0 and daystart - pregbirthdate <= 80:
  1122. if daystart - pregbirthdate <= 41:
  1123. $stat_bleed_msg = 'You are still in your recovery period. Nothing to worry about.'
  1124. elseif daystart - pregbirthdate > 41 and daystart - pregbirthdate <= 48:
  1125. $stat_bleed_msg = 'You are probably still in your recovery period.'
  1126. elseif daystart - pregbirthdate > 48 and daystart - pregbirthdate <= 55:
  1127. $stat_bleed_msg = 'You are maybe still in your recovery period, but there could be a risk.'
  1128. elseif daystart - pregbirthdate > 55 and daystart - pregbirthdate <= 70:
  1129. $stat_bleed_msg = 'You should have recovered by know... Right?'
  1130. elseif daystart - pregbirthdate > 70 and daystart - pregbirthdate <= 80:
  1131. $stat_bleed_msg = 'You should have definitely recovered from giving birth by now.'
  1132. end
  1133. $statusIconBarTab += '<td><a href="exec:msg $stat_bleed_msg"><img title="<<$stat_bleed_msg>>" height = <<set_siconht>> src="images/system/icons/status/vunknown.png"></a></td>'
  1134. end
  1135. elseif preg = 1:
  1136. if thinkpreg = 1 and knowpreg = 0:
  1137. $stat_preg_msg = 'You think you''re pregnant, but aren''t sure.'
  1138. $stat_preg_tooltip = 'I think I''m pregnant.'
  1139. elseif knowpreg = 1:
  1140. $stat_preg_tooltip = 'I''m pregnant.'
  1141. $stat_preg_msg = 'You are pregnant. Your due date is around <<$pregduedate>>.'
  1142. $statusIconBarTab += '<td><a href="exec:msg $stat_preg_msg"><img title="<<$stat_preg_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/vpregnant.png"></a></td>'
  1143. end
  1144. elseif preg = 2:
  1145. $stat_preg_msg = 'Broken water and contractions, it''s pretty clear what is going on. You need to get to a hospital ASAP.'
  1146. $stat_preg_tooltip = 'Go to the hospital, ASAP! You''re in labour!'
  1147. $statusIconBarTab += '<td><a href="exec:msg $stat_preg_msg"><img title="<<$stat_preg_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/labour.png"></a></td>'
  1148. end
  1149. gs 'lact_lib','breast_stat_icons'
  1150. 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/icons/status/cum_covered.png"></a></td>'
  1151. 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/icons/status/visible_cum.png"></a></td>'
  1152. if stat_cumloc_check = 1 and pcs_traits['cumeater'] = 1 and cumeater_cheat = 0 and menu_off = 0:
  1153. $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/icons/status/cum_eater.png"></a></td>'
  1154. elseif stat_cumloc_check = 1 and pcs_traits['cumeater'] = 1 and cumeater_cheat = 0 and menu_off = 1:
  1155. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icons/status/cum_eater.png"></a></td>'
  1156. end
  1157. if stat_cumloc_check = 1 and mc_inventory['makeup_wipes'] > 0 and menu_off = 0:
  1158. $statusIconBarTab += '<td><a href="exec:dynamic $d_salf"><img title="Click to use your wipes." height = <<set_siconht>> src="images/system/icons/status/wipes.png"></a></td>'
  1159. elseif stat_cumloc_check = 1 and mc_inventory['makeup_wipes'] > 0 and menu_off = 1:
  1160. $statusIconBarTab += '<td><a href="exec:msg $stat_disable_msg"><img title="<<$stat_disable_msg>>" height = <<set_siconht>> src="images/system/icons/status/wipes.png"></a></td>'
  1161. end
  1162. stat_STD_count = 0
  1163. $stat_STD_msg = ''
  1164. if Gerpes >= 10 and GenHerpes = 1:
  1165. stat_STD_count += 1
  1166. $stat_STD_msg += 'Sores have appeared on your vagina. You have genital herpes.'
  1167. elseif Gerpes >= 5 and GenHerpes = 1:
  1168. stat_STD_count += 1
  1169. $stat_STD_msg += 'Your vagina is red and very itchy. You have genital herpes.'
  1170. elseif Gerpes >= 3 and Orerpes = 1:
  1171. stat_STD_count += 1
  1172. $stat_STD_msg += 'You have cold sores on your lips. You have oral herpes.'
  1173. end
  1174. if Gerpes >= 20 and GenHerpes = 1:
  1175. stat_STD_count += 1
  1176. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1177. $stat_STD_msg += 'The herpes sores also cover your ass.'
  1178. end
  1179. if Sifilis >= 50:
  1180. stat_STD_count += 1
  1181. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1182. $stat_STD_msg += 'Syphilitic rashes cover your whole body.'
  1183. elseif Sifilis >= 21:
  1184. stat_STD_count += 1
  1185. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1186. $stat_STD_msg += 'You have a single large, hard sore on the lip. You have syphilis.'
  1187. end
  1188. if Triper > 2:
  1189. stat_STD_count += 1
  1190. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1191. $stat_STD_msg += 'It stings when you''re urinating. You have gonorrhea.'
  1192. end
  1193. if Kandidoz > 30:
  1194. stat_STD_count += 1
  1195. if stat_STD_count > 1: $stat_STD_msg += '<br>'
  1196. $stat_STD_msg += 'There''s a white discharge coming from your vagina. You have yeast infection.'
  1197. end
  1198. if stat_STD_count > 0:
  1199. $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.'
  1200. $statusIconBarTab += '<td><a href="exec:msg $stat_STD_msg"><img title="<<$stat_STD_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/std.png"></a></td>'
  1201. end
  1202. if $stat_lack_of_sleep_msg ! '':
  1203. if pcs_condition['lack_of_sleep'] >= 20:
  1204. $statusIconBarTab += '<td><a href="exec:msg $stat_lack_of_sleep_msg"><img title="<<$stat_lack_of_sleep_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/lack_of_sleep_4.png"></a></td>'
  1205. elseif pcs_condition['lack_of_sleep'] >= 10:
  1206. $statusIconBarTab += '<td><a href="exec:msg $stat_lack_of_sleep_msg"><img title="<<$stat_lack_of_sleep_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/lack_of_sleep_3.png"></a></td>'
  1207. elseif pcs_condition['lack_of_sleep'] >= 5:
  1208. $statusIconBarTab += '<td><a href="exec:msg $stat_lack_of_sleep_msg"><img title="<<$stat_lack_of_sleep_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/lack_of_sleep_2.png"></a></td>'
  1209. elseif pcs_condition['lack_of_sleep'] >= 2:
  1210. $statusIconBarTab += '<td><a href="exec:msg $stat_lack_of_sleep_msg"><img title="<<$stat_lack_of_sleep_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/lack_of_sleep_1.png"></a></td>'
  1211. end
  1212. end
  1213. $statusIconBarTab += '</tr><tr>'
  1214. !!Row 4: Status, Jobs, School
  1215. if bimbolevel > 0: $statusIconBarTab += '<td><a href="exec:msg $bimbostatus"><img title="<<$bimbo_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/bimbo.png"></a></td>'
  1216. if $stat_hypno_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_hypno_msg"><img title="<<$stat_hypno_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/hypno_addict.png"></a></td>'
  1217. if succubusflag = 1 and succhungry > 0:
  1218. $stat_succ_msg = 'You have needed to feed for <<succhungry>> day'+iif(succhungry > 1, 's.', '.')
  1219. $statusIconBarTab += '<td><a href="exec:msg $stat_succ_msg"><img title="You need to feed." height = <<set_siconht>> src="images/system/icons/status/need_succubus_feeding.png"></a></td>'
  1220. end
  1221. if $stat_court_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_court_msg"><img title="<<$stat_court_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/court.png"></a></td>'
  1222. if $stat_fines_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_fines_msg"><img title="<<$stat_fines_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/court.png"></a></td>'
  1223. if $stat_musiclesson_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_musiclesson_msg "><img title="<<$stat_musiclesson_tip>>" height = <<set_siconht>> src="images/system/icons/status/musiclesson.png"></a></td>'
  1224. if $stat_school_icon_msg ! '' and SchoolBlock = 0: $statusIconBarTab += '<td><a href="exec:msg $stat_school_icon_msg"><img title="<<$stat_school_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/school.png"></a></td>'
  1225. if $stat_uni_icon_msg ! '' and (university['semester_week'] = -1 or (university['semester_passed'] = university['enrolled_in_semester'] and university['diploma'] = 0)): $statusIconBarTab += '<td><a href="exec:msg $stat_uni_icon_msg"><img title="<<$stat_uni_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/uni_class_3.png"></a></td>'
  1226. if $stat_uni_icon_msg ! '' and university['semester_week'] > 0: $statusIconBarTab += '<td><a href="exec:msg $stat_uni_icon_msg"><img title="<<$stat_uni_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/uni_class_1.png"></a></td>'
  1227. if $stat_uni_icon_msg ! '' and university['exam_week'] > 0: $statusIconBarTab += '<td><a href="exec:msg $stat_uni_icon_msg"><img title="<<$stat_uni_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/uni_class_2.png"></a></td>'
  1228. if $stat_game_night_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_game_night_msg"><img title="<<$stat_game_night_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/game_night.png"></a></td>'
  1229. !!maybe we should remove this one, and create specialized icons for all the jobs? This one is not informative
  1230. if work > 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/icons/status/work.png"></a></td>'
  1231. if masseuse['jobtype'] > 0:
  1232. if (masseuse['<<week>>_shift_1'] = 1 and hour <= 9) or (masseuse['<<week>>_shift_2'] = 1 and hour <= 13) or (masseuse['<<week>>_shift_3'] = 1 and hour <= 17):
  1233. $stat_masseuse_msg = 'You work at the beauty salon today, at '
  1234. if masseuse['<<week>>_shift_1'] = 1 and hour <= 9:
  1235. $stat_masseuse_msg += '9:00, '
  1236. end
  1237. if masseuse['<<week>>_shift_2'] = 1 and hour <= 13:
  1238. $stat_masseuse_msg += '13:00, '
  1239. end
  1240. if masseuse['<<week>>_shift_3'] = 1 and hour < 17:
  1241. $stat_masseuse_msg += '17:00, '
  1242. end
  1243. $stat_masseuse_msg += 'and you have worked <<masseuse[''shifts_worked'']>> of the required <<masseuse[''shifts_required'']>> shifts.'
  1244. $statusIconBarTab += '<td><a href="exec: msg $stat_masseuse_msg"><img title="<<$stat_masseuse_msg>>" height = <<set_siconht>> src="images/system/icons/status/masseuse.png"></a></td>'
  1245. end
  1246. end
  1247. if model['icon'] = 1:
  1248. if model_job_week >= 2:
  1249. $stat_model_msg = 'You have no more modeling jobs available this week.'
  1250. elseif model_job_week = 1:
  1251. $stat_model_msg = 'You can get paid for 1 more modeling job this week.'
  1252. elseif model_job_week < 1:
  1253. $stat_model_msg = 'You can get paid for 2 modeling jobs this week.'
  1254. end
  1255. $statusIconBarTab += '<td><a href="exec: msg $stat_model_msg"><img title="<<$stat_model_msg>>" height = <<set_siconht>> src="images/system/icons/status/model_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
  1256. end
  1257. if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and starlets_on = 1:
  1258. if hour > 16 and starlets_practice > 0:
  1259. $stat_starlet_msg = 'You missed practice with the Starlets today!'
  1260. else
  1261. $stat_starlet_msg = 'You must be at Starlets practice between 15:00 and 16:00 today.'
  1262. end
  1263. if (hour < 16 or starlets_missed > 0) and starlets['late_message'] = 0:
  1264. if starlets_missed = 0:
  1265. $statusIconBarTab += '<td><a href="exec:msg $stat_starlet_msg"><img title="<<$stat_starlet_msg>>" height = <<set_siconht>> src="images/system/icons/status/starlets_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
  1266. else
  1267. $statusIconBarTab += '<td><a href="exec: starlets[''late_message''] = 1 & msg $stat_starlet_msg"><img title="<<$stat_starlet_msg>>" height = <<set_siconht>> src="images/system/icons/status/starlets_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
  1268. end
  1269. end
  1270. end
  1271. if volleysostav > 0 and week = 6 and sorevday ! daystart and hour <= 18:
  1272. $stat_volleyball_msg = 'There is volleyball tournament today at 18:00.'
  1273. $statusIconBarTab += '<td><a href="exec: msg $stat_volleyball_msg"><img title="<<$stat_volleyball_msg>>" height = <<set_siconht>> src="images/system/icons/status/volleball'+iif(theme['is_dark'] = 1, '_white', '')+'.png"></a></td>'
  1274. end
  1275. if pfilmNO ! 1:
  1276. if pornstar['icon'] = 1 and pornstar['icon_disable'] ! daystart:
  1277. if hour < 11:
  1278. $stat_porn_msg = 'You are starring in a porno today at 10:00.'
  1279. $statusIconBarTab += '<td><a href="exec: msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icons/status/porn_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
  1280. elseif hour >= 11 and hour < 13:
  1281. $stat_porn_msg = 'You''re late for your shoot at the porn studio!'
  1282. $statusIconBarTab += '<td><a href="exec: msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icons/status/porn_red.png"></a></td>'
  1283. else
  1284. $stat_porn_msg = 'You missed a scheduled porn shoot!'
  1285. $statusIconBarTab += '<td><a href="exec: pornstar[''icon_disable''] = daystart & msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icons/status/porn_red.png"></a></td>'
  1286. end
  1287. end
  1288. end
  1289. $statusIconBarTab += '</tr><tr>'
  1290. !!Row 5: Clothes,...
  1291. 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/icons/status/date.png"></a></td>'
  1292. 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/icons/status/date.png"></a></td>'
  1293. 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/icons/status/date.png"></a></td>'
  1294. if $stat_clothes_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_clothes_msg"><img title="<<$stat_clothes_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/<<$stat_clothes_style>>.png"></a></td>'
  1295. if $stat_bra_msg ! '' and $braworntype ! 'none': $statusIconBarTab += '<td><a href="exec:msg $stat_bra_msg"><img title="<<$stat_bra_msg>>" height = <<set_siconht>> src="images/system/icons/status/bra.png"></a></td>'
  1296. if $stat_bra_msg ! '' and $braworntype = 'none': $statusIconBarTab += '<td><a href="exec: msg $stat_bra_msg"><img title="<<$stat_bra_msg>>" height = <<set_siconht>> src="images/system/icons/status/boobs_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
  1297. if $stat_panty_msg ! '' and $pantyworntype ! 'none' and pcs_traits['commando_lvl'] < 3:
  1298. $statusIconBarTab += '<td><a href="exec:msg $stat_panty_msg"><img title="<<$stat_panty_msg>>" height = <<set_siconht>> src="images/system/icons/status/panties.png"></a></td>'
  1299. elseif $stat_panty_msg ! '' and $pantyworntype ! 'none' and pcs_traits['commando_lvl'] = 3:
  1300. $statusIconBarTab += '<td><a href="exec:msg $stat_panty_msg"><img title="<<$stat_panty_msg>>" height = <<set_siconht>> src="images/system/icons/status/panties_red.png"></a></td>'
  1301. end
  1302. if $stat_panty_msg ! '' and $pantyworntype = 'none' and PCloPanties = 0: $statusIconBarTab += '<td><a href="exec: msg $stat_panty_msg"><img title="<<$stat_panty_msg>>" height = <<set_siconht>> src="images/system/icons/status/commando_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
  1303. if analplugIN = 1 and vibratorin = 0:
  1304. $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/icons/status/tbutt_plug.png"></a></td>'
  1305. elseif analplugIN = 0 and vibratorin = 1:
  1306. $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/icons/status/tvibrator.png"></a></td>'
  1307. elseif analplugIN = 1 and vibratorin = 1:
  1308. $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/icons/status/tdouble_stuffed.png"></a></td>'
  1309. end
  1310. $statusIconBarTab += '</tr><tr>'
  1311. !!Row 5: Drugs and other short term stuff
  1312. if mc_inventory['cigarettes'] > 0:
  1313. $stat_smoker_msg = 'You have <<mc_inventory[''cigarettes'']>> cigarette'+iif(mc_inventory['cigarettes'] = 1, '', 's')+iif(smokerNeed > 0 and NarkImmune = 0, ' and you want to smoke.' , '.')
  1314. $statusIconBarTab += '<td><a href="exec:msg $stat_smoker_msg"><img title="<<$stat_smoker_msg>>" height = <<set_siconht>> src="images/system/icons/status/cigarettes.png"></a></td>'
  1315. end
  1316. if smoker >= 20 and NarkImmune = 0 and smokerNeed > 20 and mc_inventory['cigarettes'] > 0:
  1317. $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/icons/status/craving_nicotine.png"></a></td>'
  1318. elseif smoker >= 20 and NarkImmune = 0 and smokerNeed > 20 and mc_inventory['cigarettes'] <= 0:
  1319. $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/icons/status/craving_nicotine.png"></a></td>'
  1320. elseif mc_inventory['cigarettes'] > 0:
  1321. $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/icons/status/smoke_cigarette.png"></a></td>'
  1322. end
  1323. if narkday ! daystart and narkoman = 1 and Slomka > 0:
  1324. $stat_drug_msg += 'You need heroin and cocaine.'
  1325. elseif narkday ! daystart and narkoman = 1 and Slomka <= 0:
  1326. $stat_drug_msg += 'You need cocaine.'
  1327. elseif SLomka > 0:
  1328. $stat_drug_msg += 'You need heroin.'
  1329. else
  1330. $stat_drug_msg = ''
  1331. end
  1332. if $stat_drug_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_drug_msg"><img title="<<$stat_drug_msg>>" height = <<set_siconht>> src="images/system/icons/status/craving_drugs.png"></a></td>'
  1333. if alko > 0:
  1334. if alko = 1:
  1335. $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/icons/status/alko_1.png"></a></td>'
  1336. elseif alko < 4:
  1337. $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/icons/status/alko_2.png"></a></td>'
  1338. elseif alko < 6:
  1339. $statusIconBarTab += '<td><a href="exec:msg ''You are drunk.''"><img title="You are drunk." height = <<set_siconht>> src="images/system/icons/status/alko_3.png"></a></td>'
  1340. elseif alko < 10:
  1341. $statusIconBarTab += '<td><a href="exec:msg ''You are very drunk.''"><img title="You are very drunk." height = <<set_siconht>> src="images/system/icons/status/alko_4.png"></a></td>'
  1342. else
  1343. $statusIconBarTab += '<td><a href="exec:msg ''You are wasted.''"><img title="You are wasted." height = <<set_siconht>> src="images/system/icons/status/alko_4.png"></a></td>'
  1344. end
  1345. end
  1346. 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/icons/status/drugs.png"></a></td>'
  1347. 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/icons/status/aphro_gum.png"></a></td>'
  1348. if $stat_frost_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_frost_msg"><img title="<<$stat_frost_msg>>" height = <<set_siconht>> src="images/system/icons/status/hypothermia.png"></a></td>'
  1349. if sick > 0: $statusIconBarTab += '<td><a href="exec:msg $stat_sick_msg"><img title="<<$stat_sick_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/health.png"></a></td>'
  1350. 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/icons/status/health.png"></a></td>'
  1351. 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/icons/status/breast_cream.png"></a></td>'
  1352. 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/icons/status/stuck_condom.png"></a></td>'
  1353. if $stat_writing_msg ! '': $statusIconBarTab += '<td><a href="exec:msg $stat_writing_msg"><img title="<<$stat_writing_msg>>" height = <<set_siconht>> src="images/system/icons/status/body_writing.png"></a></td>'
  1354. $statusIconBarTab += '</tr></table>'
  1355. $stat_msg += func('cleanHTML',$statusIconBarTab)
  1356. killvar '$statusIconBarTab'
  1357. else
  1358. $stat_msg += '<br>'
  1359. end
  1360. !!-----------------Status Icons (End)------------------
  1361. !!----------------Stat Display, start--------------------------
  1362. $stat_tool_msg=''
  1363. $stat_extra_msg=''
  1364. if cheatStatusIcons = 1:
  1365. $stat_tool_msg += '<a href="exec:cheatStatusIcons = 0 & gs ''$menu_obnovit''">▽Icons</a> '
  1366. else
  1367. $stat_tool_msg += '<a href="exec:cheatStatusIcons = 1 & gs ''$menu_obnovit''">▲Icons</a> '
  1368. end
  1369. if enable_show_status = 0:
  1370. $stat_tool_msg += '<a href="exec:enable_show_status = 1 & gs ''$menu_obnovit''">▲Status</a> '
  1371. else
  1372. $stat_tool_msg += '<a href="exec:enable_show_status = 0 & gs ''$menu_obnovit''">▽Status</a> '
  1373. end
  1374. if enable_show_status = 0:
  1375. if ETOmenu = 1:
  1376. $stat_extra_msg += '<BR><b><<$pcs_health>></b>'
  1377. $stat_extra_msg += '<BR><b><<$pcs_willpwr>></b>'
  1378. if cheatNoEat = 0: $stat_extra_msg += '<BR><b><<$pcs_energy>></b>'
  1379. if cheatNoDrink = 0: $stat_extra_msg += '<BR><b><<$pcs_hydra>></b>'
  1380. if cheatNoSleep = 0: $stat_extra_msg += '<BR><b><<$pcs_sleep>></b>'
  1381. elseif Enable_scalepic = 0:
  1382. $stat_extra_msg += '<font color="<<$fcolor>>"><TABLE cellpadding="1" cellspacing="0" width="200">'
  1383. $stat_extra_msg += '<TR><TD>'+func('indiktab', 2, pcs_horny, pcs_horny)+'</TD><TD>&nbsp;Arousal</TD></TR>'
  1384. $stat_extra_msg += '<TR><TD>'+func('indiktab', 2, pain['total'], pain['total'], pain['damage'])+'</TD><TD>&nbsp;Pain</TD></TR>'
  1385. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_health * 100 / healthmax, pcs_health)+'</TD><TD>&nbsp;Health</TD></TR>'
  1386. if $start_type[1] ! 'nomagic': $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_mana * 100 / manamax, pcs_mana)+'</TD><TD>&nbsp;Mana</TD></TR>'
  1387. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_willpwr * 100 / willpowermax, pcs_willpwr)+'</TD><TD>&nbsp;Willpower</TD></TR>'
  1388. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_stam * 100 / stammax, pcs_stam)+'</TD><TD>&nbsp;Stamina</TD></TR>'
  1389. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_mood, pcs_mood)+'</TD><TD>&nbsp;Mood</TD></TR>'
  1390. if cheatNoEat = 0: $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_energy, pcs_energy)+'</TD><TD>&nbsp;Hunger</TD></TR>'
  1391. if cheatNoDrink = 0: $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_hydra, pcs_hydra)+'</TD><TD>&nbsp;Thirst</TD></TR>'
  1392. if cheatNoSleep = 0: $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_sleep, pcs_sleep)+'</TD><TD>&nbsp;Sleep</TD></TR>'
  1393. $stat_extra_msg += '</TABLE></font>'
  1394. else
  1395. gs 'indik', '2', pcs_horny, pcs_horny
  1396. $stat_extra_msg += '<BR><<$ind>> Arousal'
  1397. gs 'indik', '2', pain['total'], pain['total'], pain['damage']
  1398. $stat_extra_msg += '<BR><<$ind>> Pain'
  1399. gs 'indik', '1', pcs_health * 100 / healthmax, pcs_health
  1400. $stat_extra_msg += '<BR><<$ind>> Health'
  1401. if $start_type[1] ! 'nomagic':
  1402. gs 'indik', '1', pcs_mana * 100 / manamax, pcs_mana
  1403. $stat_extra_msg += '<BR><<$ind>> Mana'
  1404. end
  1405. gs 'indik', '1', pcs_willpwr * 100 / willpowermax, pcs_willpwr
  1406. $stat_extra_msg += '<BR><<$ind>> Willpower'
  1407. gs 'indik', '1', pcs_stam * 100 / stammax, pcs_stam
  1408. $stat_extra_msg += '<BR><<$ind>> Stamina'
  1409. gs 'indik', '1', pcs_mood, pcs_mood
  1410. $stat_extra_msg += '<BR><<$ind>> Mood'
  1411. if cheatNoEat = 0:
  1412. gs 'indik', '1', pcs_energy, pcs_energy
  1413. $stat_extra_msg += '<BR><<$ind>> Hunger'
  1414. end
  1415. if cheatNoDrink = 0:
  1416. gs 'indik', '1', pcs_hydra, pcs_hydra
  1417. $stat_extra_msg += '<BR><<$ind>> Thirst'
  1418. end
  1419. if cheatNoSleep = 0:
  1420. gs 'indik', '1', pcs_sleep, pcs_sleep
  1421. $stat_extra_msg += '<BR><<$ind>> Sleep'
  1422. end
  1423. end
  1424. end
  1425. !!----------------Extra messages, start--------------------------
  1426. !!----------------▽Attributes--------------------------
  1427. if Enable_showattr = 0:
  1428. $stat_tool_msg += '<a href="exec:Enable_showattr = 1 & gs ''$menu_obnovit''">▽Attributes</a>'
  1429. else
  1430. $stat_tool_msg += '<a href="exec:Enable_showattr = 0 & gs ''$menu_obnovit''">▲Attributes</a>'
  1431. !skip if this is first message
  1432. if $stat_extra_msg ! '': $stat_extra_msg += '<br><a href="exec:Enable_showattr = 0 & gs ''$menu_obnovit''">▲Attributes:</a>'
  1433. if Enable_scalepic = 0:
  1434. $stat_extra_msg += '<font color="<<$fcolor>>"><TABLE cellpadding="1" cellspacing="0" width="200">'
  1435. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, 100 - pcs_inhib, 100 - pcs_inhib)+'</TD><TD>&nbsp;Inhibition</TD></TR>'
  1436. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_stren, pcs_stren)+'</TD><TD>&nbsp;Strength</TD></TR>'
  1437. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_agil, pcs_agil)+'</TD><TD>&nbsp;Agility</TD></TR>'
  1438. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_vital, pcs_vital)+'</TD><TD>&nbsp;Endurance</TD></TR>'
  1439. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_intel, pcs_intel)+'</TD><TD>&nbsp;Intelligence</TD></TR>'
  1440. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_sprt, pcs_sprt)+'</TD><TD>&nbsp;Spirit</TD></TR>'
  1441. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_react, pcs_react)+'</TD><TD>&nbsp;Reaction</TD></TR>'
  1442. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_chrsm, pcs_chrsm)+'</TD><TD>&nbsp;Charisma</TD></TR>'
  1443. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_prcptn, pcs_prcptn)+'</TD><TD>&nbsp;Perception</TD></TR>'
  1444. if $start_type[1] ! 'nomagic': $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_magik, pcs_magik)+'</TD><TD>&nbsp;Magic</TD></TR>'
  1445. if succubusflag = 1: $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, sucexcess, sucexcess)+'</TD><TD>&nbsp;Succubus Energy</TD></TR>'
  1446. $stat_extra_msg += '<TR><TD>'+func('indiktab', 1, pcs_apprnc / 2, pcs_apprnc)+'</TD><TD>&nbsp;Attractiveness</TD></TR>'
  1447. $stat_extra_msg += '</TABLE></font>'
  1448. else
  1449. gs 'indik', '1', 100 - pcs_inhib, 100 - pcs_inhib
  1450. $stat_extra_msg += '<BR><<$ind>> Inhibition'
  1451. gs 'indik', '1', pcs_stren, pcs_stren
  1452. $stat_extra_msg += '<BR><<$ind>> Strength'
  1453. gs 'indik', '1', pcs_agil, pcs_agil
  1454. $stat_extra_msg += '<BR><<$ind>> Agility'
  1455. gs 'indik', '1', pcs_vital, pcs_vital
  1456. $stat_extra_msg += '<BR><<$ind>> Endurance'
  1457. gs 'indik', '1', pcs_intel, pcs_intel
  1458. $stat_extra_msg += '<BR><<$ind>> Intelligence'
  1459. gs 'indik', '1', pcs_sprt, pcs_sprt
  1460. $stat_extra_msg += '<BR><<$ind>> Spirit'
  1461. gs 'indik', '1', pcs_react, pcs_react
  1462. $stat_extra_msg += '<BR><<$ind>> Reaction'
  1463. gs 'indik', '1', pcs_chrsm, pcs_chrsm
  1464. $stat_extra_msg += '<BR><<$ind>> Charisma'
  1465. gs 'indik', '1', pcs_prcptn, pcs_prcptn
  1466. $stat_extra_msg += '<BR><<$ind>> Perception'
  1467. if $start_type[1] ! 'nomagic':
  1468. gs 'indik', '1', pcs_magik, pcs_magik
  1469. $stat_extra_msg += '<BR><<$ind>> Magic'
  1470. if succubusflag = 1:
  1471. gs 'indik', '1', sucexcess, sucexcess
  1472. $stat_extra_msg += '<BR><<$ind>> Succubus energy'
  1473. end
  1474. end
  1475. gs 'indik', '1', pcs_apprnc / 2, pcs_apprnc
  1476. $stat_extra_msg += '<BR><<$ind>> Attractiveness'
  1477. $stat_extra_msg += '<BR>'
  1478. end
  1479. end
  1480. !!----------------▽Skills--------------------------
  1481. if Enable_showskill = 0:
  1482. $stat_tool_msg += ' <a href="exec:Enable_showskill = 1 & gs ''$menu_obnovit''">▽Skills</a>'
  1483. else
  1484. $stat_tool_msg += ' <a href="exec:Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills</a>'
  1485. !!----------------------▲Skills display------------------------
  1486. $stat_sktool_msg=''
  1487. st_count=0
  1488. $show_table=''
  1489. !!----------------Mental skills--------------------------
  1490. if Enable_show_mental_skill = 0:
  1491. $stat_sktool_msg += ' <a href="exec:Enable_show_mental_skill = 1 & gs ''$menu_obnovit''">◇Mental</a>'
  1492. else
  1493. $stat_sktool_msg += ' <a href="exec:Enable_show_mental_skill = 0 & gs ''$menu_obnovit''">◆Mental</a>'
  1494. if pcs_splcstng > 0 and $start_type[1] ! 'nomagic': gs 'show_table', '<<pcs_splcstng>> Spell Casting', '2'
  1495. if pcs_humint > 0: gs 'show_table', '<<pcs_humint>> People skills', '2'
  1496. if pcs_persuas > 0: gs 'show_table', '<<pcs_persuas>> Persuasion', '2'
  1497. if pcs_observ > 0: gs 'show_table', '<<pcs_observ>> Observation', '2'
  1498. end
  1499. !!-----------------Sport skills--------------------------
  1500. if Enable_show_sport_skill = 0:
  1501. $stat_sktool_msg += ' <a href="exec:Enable_show_sport_skill = 1 & gs ''$menu_obnovit''">◇Sport</a>'
  1502. else
  1503. $stat_sktool_msg += ' <a href="exec:Enable_show_sport_skill = 0 & gs ''$menu_obnovit''">◆Sport</a>'
  1504. if pcs_jab > 0: gs 'show_table', '<<pcs_jab>> Jabs', '2'
  1505. if pcs_punch > 0: gs 'show_table', '<<pcs_punch>> Power Strikes', '2'
  1506. if pcs_kick > 0: gs 'show_table', '<<pcs_kick>> Kicks', '2'
  1507. if pcs_def > 0: gs 'show_table', '<<pcs_def>> Defence', '2'
  1508. if pcs_run > 0: gs 'show_table', '<<pcs_run>> Running', '2'
  1509. if pcs_vball > 0: gs 'show_table', '<<pcs_vball>> Volleyball', '2'
  1510. if pcs_ftbll > 0: gs 'show_table', '<<pcs_ftbll>> Football', '2'
  1511. if pcs_wrstlng > 0: gs 'show_table', '<<pcs_wrstlng>> Wrestling', '2'
  1512. if pcs_shoot > 0: gs 'show_table', '<<pcs_shoot>> Marksmanship', '2'
  1513. if pcs_bushcraft > 0: gs 'show_table', '<<pcs_bushcraft>> Bushcraft', '2'
  1514. if pcs_chess > 0: gs 'show_table', '<<pcs_chess>> Chess', '2'
  1515. if pcs_icesktng > 0: gs 'show_table', '<<pcs_icesktng>> Ice Skating', '2'
  1516. if pcs_gaming > 0: gs 'show_table', '<<pcs_gaming>> Gaming', '2'
  1517. if pcs_pool > 0: gs 'show_table', '<<pcs_pool>> Pool', '2'
  1518. end
  1519. !!-----------------Beauty/Modelling skills---------------
  1520. if Enable_show_beauty_skill = 0:
  1521. $stat_sktool_msg += ' <a href="exec:Enable_show_beauty_skill = 1 & gs ''$menu_obnovit''">◇Beauty</a>'
  1522. else
  1523. $stat_sktool_msg += ' <a href="exec:Enable_show_beauty_skill = 0 & gs ''$menu_obnovit''">◆Beauty</a>'
  1524. if pcs_makupskl > 0: gs 'show_table', '<<pcs_makupskl>> Makeup Skill', '2'
  1525. if pcs_danc > 0: gs 'show_table', '<<pcs_danc>> Modern Dancing', '2'
  1526. if pcs_dancero > 0: gs 'show_table', '<<pcs_dancero>> Erotic Dancing', '2'
  1527. if pcs_dancpol > 0: gs 'show_table', '<<pcs_dancpol>> Pole Dancing', '2'
  1528. if pcs_cheer > 0: gs 'show_table', '<<pcs_cheer>> Cheerleading', '2'
  1529. if pcs_mdlng > 0: gs 'show_table', '<<pcs_mdlng>> Modelling', '2'
  1530. if pcs_heels > 0: gs 'show_table', '<<pcs_heels>> Heels', '2'
  1531. end
  1532. if SMTV_commercial = daystart + 1: $stat_msg += '<BR><b><i>Aurora Talent Agency</i> commercial shoot scheduled tomorrow at 10:00!</b>'
  1533. if hour <= 11 and SMTV_commercial = daystart: $stat_msg += '<BR><b><i>Aurora Talent Agency</i> commercial shoot in the city center at 10:00!</b>'
  1534. !!---------------------Artistic skills-------------------
  1535. if Enable_show_art_skill = 0:
  1536. $stat_sktool_msg += ' <a href="exec:Enable_show_art_skill = 1 & gs ''$menu_obnovit''">◇Artistic</a>'
  1537. else
  1538. $stat_sktool_msg += ' <a href="exec:Enable_show_art_skill = 0 & gs ''$menu_obnovit''">◆Artistic</a>'
  1539. if pcs_vokal > 0: gs 'show_table', '<<pcs_vokal>> Singing', '2'
  1540. if pcs_instrmusic > 0: gs 'show_table', '<<pcs_instrmusic>> Instrumental Music', '2'
  1541. if pcs_photoskl > 0: gs 'show_table', '<<pcs_photoskl>> Photography', '2'
  1542. if pcs_artskls > 0: gs 'show_table', '<<pcs_artskls>> Artistic Skills', '2'
  1543. if pcs_perform > 0: gs 'show_table', '<<pcs_perform>> Performance', '2'
  1544. if pcs_musicprod > 0: gs 'show_table', '<<pcs_musicprod>> Music Production', '2'
  1545. end
  1546. !!----------------------Job skills------------------------
  1547. if Enable_show_job_skill = 0:
  1548. $stat_sktool_msg += ' <a href="exec:Enable_show_job_skill = 1 & gs ''$menu_obnovit''">◇Job</a>'
  1549. else
  1550. $stat_sktool_msg += ' <a href="exec:Enable_show_job_skill = 0 & gs ''$menu_obnovit''">◆Job</a>'
  1551. if pcs_cleaning > 0: gs 'show_table', '<<pcs_cleaning>> Cleaning Skill', '2'
  1552. if pcs_compskl > 0: gs 'show_table', '<<pcs_compskl>> Computer Skill', '2'
  1553. if pcs_comphckng > 0: gs 'show_table', '<<pcs_comphckng>> Hacking', '2'
  1554. if pcs_hndiwrk > 0: gs 'show_table', '<<pcs_hndiwrk>> Handy-work', '2'
  1555. if pcs_sewng > 0: gs 'show_table', '<<pcs_sewng>> Tailoring', '2'
  1556. if pcs_servng > 0: gs 'show_table', '<<pcs_servng>> Serving', '2'
  1557. if pcs_medcn > 0: gs 'show_table', '<<pcs_medcn>> Medicine', '2'
  1558. if workPTU > 1: gs 'show_table','<<teachlevel>> Teacher credibility','2'
  1559. end
  1560. !skip if this is first message
  1561. if $stat_extra_msg ! '':
  1562. $stat_extra_msg += '<br><a href="exec:Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills:</a> <<$stat_sktool_msg>>'
  1563. else
  1564. $stat_extra_msg += '<br><<$stat_sktool_msg>>'
  1565. end
  1566. if st_count > 0 :
  1567. $stat_extra_msg += '<BR><TABLE BORDER=1><<$show_table>></TR></TABLE>'
  1568. end
  1569. end
  1570. killvar 'stat_sktool_msg'
  1571. killvar 'stat_skextra_msg'
  1572. !!----------------▽relations--------------------------
  1573. if Enable_showrelation = 0:
  1574. $stat_tool_msg += ' <a href="exec:Enable_showrelation = 1 & gs ''$menu_obnovit''">▽Relations</a>'
  1575. else
  1576. $stat_tool_msg += ' <a href="exec:Enable_showrelation = 0 & gs ''$menu_obnovit''">▲Relations</a>'
  1577. st_count=0
  1578. $show_table=''
  1579. if npc_QW['A192'] > 0:gs'show_table','Nastja: <<npc_QW[''A192'']>>','2'
  1580. if npc_rel['A218'] > 0:gs'show_table','Tanya: <<npc_rel[''A218'']>>','2'
  1581. if npc_rel['A219'] > 0:gs'show_table','Kat: <<npc_rel[''A219'']>>','2'
  1582. if npc_rel['A220'] > 0:gs'show_table','Vika: <<npc_rel[''A220'']>>','2'
  1583. if npc_rel['A93'] > 0:gs'show_table','Ira: <<npc_rel[''A93'']>>','2'
  1584. if npc_rel['A43'] > 0:gs'show_table','Tamara: <<npc_rel[''A43'']>>','2'
  1585. if alla > 0:gs'show_table','Alla: <<alla>>','2'
  1586. if masha > 0:gs'show_table','Masha: <<masha>>','2'
  1587. if npc_rel['A41'] > 0:gs'show_table','Givi Karapetovich: <<npc_rel[''A41'']>>','2'
  1588. if npc_rel['A42'] > 0:gs'show_table','Ashot: <<npc_rel[''A42'']>>','2'
  1589. if npc_rel['A57'] > 0:gs'show_table','Rex: <<npc_rel[''A57'']>>','2'
  1590. if npc_rel['A217'] > 0:gs'show_table','Pavlin: <<npc_rel[''A217''] >>','2'
  1591. if npc_rel['A69'] > 0:gs'show_table','Mikhail Nikolaevich: <<npc_rel[''A69'']>>','2'
  1592. if npc_rel['A89'] > 0:gs'show_table','Eugene: <<npc_rel[''A89'']>>','2'
  1593. if npc_rel['A112'] > 0:gs'show_table','Sergei Shulgin: <<npc_rel[''A112'']>>','2'
  1594. if npc_rel['A11'] > 0:gs'show_table','Vasily Shulgin: <<npc_rel[''A11'']>>','2'
  1595. if huntersAndreiQw > 0:gs'show_table','Hunter Andrei: <<huntersAndreiQw>>','2'
  1596. if huntersSergeiQw > 0:gs'show_table','Hunter Sergei: <<huntersSergeiQw>>','2'
  1597. if huntersIgorQw > 0:gs'show_table','Hunter Igor: <<huntersIgorQw>>','2'
  1598. if pcs_lovers[0] = 1:gs'show_table', 'BF <<$loverdesc[0]>>: <<loverrelation[0]>>','2'
  1599. if pcs_lovers[1] = 1:gs'show_table', 'BF <<$loverdesc[1]>>: <<loverrelation[1]>>','2'
  1600. if pcs_lovers[2] = 1:gs'show_table', 'BF <<$loverdesc[2]>>: <<loverrelation[2]>>','2'
  1601. if mid($start_type,1,2) = 'sg':
  1602. if npc_rel['A29'] > 0:gs'show_table','Mother: <<npc_rel[''A29'']>>','2'
  1603. if npc_rel['A28'] > 0:gs'show_table','Father: <<npc_rel[''A28'']>>','2'
  1604. if npc_rel['A33'] > 0:gs'show_table','Sister: <<npc_rel[''A33'']>>','2'
  1605. if npc_rel['A34'] > 0:gs'show_table','Brother: <<npc_rel[''A34'']>>','2'
  1606. end
  1607. if st_count > 0 :
  1608. !skip if this is first message
  1609. if $stat_extra_msg ! '': $stat_extra_msg += '<BR><a href="exec:Enable_showrelation = 0 & gs ''$menu_obnovit''">▲Relations:</a>'
  1610. $stat_extra_msg += '<BR><TABLE BORDER=1> <<$show_table>></TR></TABLE>'
  1611. end
  1612. end
  1613. !!----------------▽image, default to toolbar, can move to top or bottom from setting--------------------------
  1614. if Enable_statimg_loc = 0:
  1615. if Enable_showstatimg = 0:
  1616. $stat_tool_msg += ' <a href="exec:Enable_showstatimg = 1 & gs ''$menu_obnovit''">▽Image</a>'
  1617. else
  1618. $stat_tool_msg += ' <a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image</a>'
  1619. !skip if this is first message
  1620. if $stat_extra_msg ! '':
  1621. $stat_extra_msg += '<br><a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image:</a> <<$stat_imgtool_msg>>'
  1622. else
  1623. $stat_extra_msg += '<br><<$stat_imgtool_msg>>'
  1624. end
  1625. $stat_extra_msg += '<br><<$stat_imgextra_msg>>'
  1626. end
  1627. end
  1628. if enable_extra_msg = 0:
  1629. $stat_tool_msg += ' <a href="exec: enable_extra_msg = 1 & gs ''stat'' ">▽Texts</a>'
  1630. else
  1631. $stat_tool_msg += ' <a href="exec: enable_extra_msg = 0 & gs ''stat''">▲Texts</a>'
  1632. end
  1633. !all end, push back and clean up
  1634. $stat_msg += '<br>'
  1635. $stat_msg += func('cleanHTML',$stat_tool_msg)
  1636. if $stat_extra_msg ! '' : $stat_msg += func('cleanHTML',$stat_extra_msg)
  1637. $stat_msg += '<br>'
  1638. killvar 'stat_tool_msg'
  1639. killvar 'stat_extra_msg'
  1640. !!----------------Extra messages, End--------------------------
  1641. if enable_extra_msg = 1:
  1642. if opPRE = 0: $stat_msg += '<BR><<$pcs_makeup>> and your hair is <<$pcs_hairbsh>>.' & !$stat_msg += '<BR>'
  1643. if thinkpreg = 0 and knowpreg = 0 and cycle ! 6 and pillcon2 <= 30000 and succubusflag ! 1 and cheatSlut = 0 and mesec = 0:
  1644. if abortionbirthdate = 0 and daystart - daylastperiod > 28:
  1645. if (daystart - daylastperiod > 28) and (daystart - daylastperiod <= 35):
  1646. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by <<daystart - daylastperiod - 28>> days.</b></font>'
  1647. elseif (daystart - daylastperiod > 35) and (daystart - daylastperiod <= 42):
  1648. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by more than a week!</b></font>'
  1649. elseif (daystart - daylastperiod > 42) and (daystart - daylastperiod <= 56):
  1650. $stat_msg += '<BR><font color = #AB052A><b>Your period is late by more than two weeks! Maybe you should see a doctor?</b></font>'
  1651. elseif (daystart - daylastperiod > 56) and (daystart - daylastperiod <= 84):
  1652. $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>'
  1653. elseif daystart - daylastperiod > 84:
  1654. $stat_msg += '<BR><font color = #AB052A><b>You should consider the possibility of a pregnancy, since apparently you no longer have periods.</b></font>'
  1655. end
  1656. !!Recovery period after an abortion is ~14-21 days
  1657. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate <= 13:
  1658. $stat_msg += '<BR><font color = #705243><b>You are still in your recovery period. Nothing to worry about.</b></font>'
  1659. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 13 and daystart - abortionbirthdate <= 16:
  1660. $stat_msg += '<BR><font color = #705243><b>You are maybe still in your recovery period, but there could be a risk.</b></font>'
  1661. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 16 and daystart - abortionbirthdate <= 21:
  1662. $stat_msg += '<BR><font color = #820000><b>You should have recovered from you abortion by know... Right?</b></font>'
  1663. elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 21:
  1664. $stat_msg += '<BR><font color = #820000><b>You should have definitely recovered from your abortion by now.</b></font>'
  1665. !!Recovery period after giving birth is ~42-70 days
  1666. elseif pregbirthdate ! 0 and daystart - pregbirthdate <= 41:
  1667. $stat_msg += '<BR><font color = #705243><b>You are still in your recovery period. Nothing to worry about.</b></font>'
  1668. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 41 and daystart - pregbirthdate <= 48:
  1669. $stat_msg += '<BR><font color = #705243><b>You are probably still in your recovery period.</b></font>'
  1670. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 48 and daystart - pregbirthdate <= 55:
  1671. $stat_msg += '<BR><font color = #705243><b>You are maybe still in your recovery period, but there could be a risk.</b></font>'
  1672. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 55 and daystart - pregbirthdate <= 70:
  1673. $stat_msg += '<BR><font color = #820000><b>You should have recovered by know... Right?</b></font>'
  1674. elseif pregbirthdate ! 0 and daystart - pregbirthdate > 70:
  1675. $stat_msg += '<BR><font color = #820000><b>You should have definitely recovered from giving birth by now.</b></font>'
  1676. end
  1677. end
  1678. !!TMI if implant_day > 0 and ((daystart - implant_day) * 24 + hour - implant_hour) < 5:
  1679. !!pregnancy spoiler $stat_msg += '<BR><font color=#AB052A>You feel a slight twinge in your abdomen.</font>'
  1680. !! end
  1681. if mesec > 0:
  1682. $stat_msg += '<BR><font color="red">You are currently having your period. '
  1683. if isprok = 0 and isprokp = 0:
  1684. $stat_msg += 'You need to use your feminine hygiene products.'
  1685. elseif isprokp = 1 and $pantyworntype = 'none':
  1686. isprokp = 0
  1687. $stat_msg += 'You need to wear panties to use a sanitary pad.'
  1688. end
  1689. $stat_msg += '</font>'
  1690. elseif placebopart > 0 and LutH > 0 and knowpreg = 0:
  1691. $stat_msg += '<BR><font color="red">Your period is due to start soon.'
  1692. $stat_msg += '</font>'
  1693. end
  1694. if $cycreport_txt ! '' and menu_off = 0 and cheatSlut = 0:
  1695. $stat_msg += '<BR><a href="exec:dynamic $d_cycreport_choice"><<$cycreport_txt>></a><br>'
  1696. elseif $cycreport_txt ! '' and menu_off = 1 and cheatSlut = 0:
  1697. $stat_msg += '<BR><a href="exec:gs ''obj_din'', ''menu_disabled''"><<$cycreport_txt>></a><br>'
  1698. end
  1699. !!if shame > 0:$stat_msg += '<BR><<$shame>>' & $stat_msg += '<BR>'
  1700. if $pcs_mood ! '': $stat_msg += '<BR><font color="green"><b><<$pcs_mood>></b></font>'
  1701. if mentats_dose >= 1: $stat_msg += '<BR><font color = green>You feel sharp and focused.</font>'
  1702. if bcream_used = 1: $stat_msg += '<BR><font color = #DB7093>Your breasts are feeling hot and tingly.</font>'
  1703. if aphrodisiac_timer > 0: $stat_msg += '<BR><font color = #DB7093>You are feeling hot, and every move causes your groin to tingle.</font>'
  1704. if cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 5:
  1705. $stat_msg += '<BR><font color="red"><b><<$stat_hunger_msg>></b></font>'
  1706. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 10:
  1707. $stat_msg += '<BR><font color="red"><<$stat_hunger_msg>></font>'
  1708. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 20:
  1709. $stat_msg += '<BR><<$stat_hunger_msg>>'
  1710. elseif cheatNoEat = 0 and $stat_hunger_msg ! '' and pcs_energy < 30:
  1711. $stat_msg += '<BR><<$stat_hunger_msg>>'
  1712. end
  1713. if cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 5:
  1714. $stat_msg += '<BR><font color="red"><b><<$stat_thirst_msg>></b></font>'
  1715. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 10:
  1716. $stat_msg += '<BR><font color="red"><<$stat_thirst_msg>></font>'
  1717. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 20:
  1718. $stat_msg += '<BR><<$stat_thirst_msg>>'
  1719. elseif cheatNoDrink = 0 and $stat_thirst_msg ! '' and pcs_hydra < 30:
  1720. $stat_msg += '<BR><<$stat_thirst_msg>>'
  1721. end
  1722. if cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 5:
  1723. $stat_msg += '<BR><font color="red"><b><<$stat_sleep_msg>></b></font>'
  1724. elseif cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 10:
  1725. $stat_msg += '<BR><font color="red"><<$stat_sleep_msg>></font>'
  1726. elseif cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 20:
  1727. $stat_msg += '<BR><<$stat_sleep_msg>>'
  1728. elseif cheatNoSleep= 0 and $stat_sleep_msg ! '' and pcs_sleep < 30:
  1729. $stat_msg += '<BR><<$stat_sleep_msg>>'
  1730. end
  1731. if pcs_horny >= 50:
  1732. if pcs_horny < 90 and $pantyworntype ! 'none':
  1733. $stat_msg += '<BR><font color = #DB7093>You are a little nervous, feeling nice between your legs <a href="exec:view''images/pc/body/pussy/aroused/panties_low.jpg''">itchy</a> from arousal.</font>'
  1734. elseif pcs_horny < 90 and $pantyworntype = 'none':
  1735. $stat_msg += '<BR><font color = #DB7093>You are a little nervous, feeling nice between your legs <a href="exec:view''images/pc/body/pussy/aroused/none_low.jpg''">itchy</a> from arousal.</font>'
  1736. elseif $pantyworntype ! 'none':
  1737. $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/aroused/panties_high.jpg''">soaked</a> from your juices.</font>'
  1738. else
  1739. $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/aroused/none_high.jpg''">soaked</a> from your juices.</font>'
  1740. end
  1741. end
  1742. if smoker >= 20 and NarkImmune = 0:
  1743. if smokerNeed > 0:
  1744. if mc_inventory['cigarettes'] > 0:
  1745. $stat_msg += '<BR><a href="exec:gs ''drugs'',''smoke''"><font color="red"><b>You want to smoke. You have <<mc_inventory[''cigarettes'']>> cigarettes left.</b></font></a><BR>'
  1746. else
  1747. $stat_msg += '<BR><font color="red"><b>You want to smoke, but you have no cigarettes left.</b></font><BR>'
  1748. end
  1749. else
  1750. if mc_inventory['cigarettes'] > 0:
  1751. $stat_msg += '<BR><a href="exec:gs ''drugs'',''smoke''"><font color=#0064FF><b>You have <<mc_inventory[''cigarettes'']>> cigarettes left.</b></font></a><BR>'
  1752. else
  1753. $stat_msg += '<BR><font color=#0064FF><b>You feel like you should get some cigarettes.</b></font><BR>'
  1754. end
  1755. end
  1756. elseif mc_inventory['cigarettes'] > 0:
  1757. $stat_msg += '<BR><a href="exec:gs ''drugs'',''smoke''"><font color=#0064FF><b>You have <<mc_inventory[''cigarettes'']>> cigarettes.</b></font></a><BR>'
  1758. end
  1759. if smokeHour = hour and smokeday = daystart and smokeminut >= minut: $stat_msg += '<BR><font color="green">You are smoking a cigarette.</font><BR>'
  1760. if jointhour = hour and jointday = daystart and jointminut >= minut: $stat_msg += '<BR><font color="green">You are smoking a joint.</font><BR>'
  1761. if cheatNoSweat = 0 and pcs_sweat > 59:
  1762. $stat_msg += '<br><b><font color="red"><<$stat_sweat_msg>></font></b><br>'
  1763. elseif cheatNoSweat = 0 and pcs_sweat > 49:
  1764. $stat_msg += '<br><b><font color="red"><<$stat_sweat_msg>></font></b>'
  1765. elseif cheatNoSweat = 0 and pcs_sweat > 39:
  1766. $stat_msg += '<br><font color="red"><<$stat_sweat_msg>></font>'
  1767. elseif cheatNoSweat = 0 and pcs_sweat > 29:
  1768. $stat_msg += '<br><font color="red"><<$stat_sweat_msg>></font>'
  1769. elseif cheatNoSweat = 0 and pcs_sweat > 19:
  1770. $stat_msg += '<br><font color="brown"><<$stat_sweat_msg>></font>'
  1771. elseif cheatNoSweat = 0 and pcs_sweat > 9 and deodorant_on = 1:
  1772. $stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font>'
  1773. elseif cheatNoSweat = 0 and arrsize('sparrvol') = 0:
  1774. $stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font></b>'
  1775. elseif cheatNoSweat = 0 and deodorant_on = 1:
  1776. $stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font></b>'
  1777. end
  1778. !! breast status
  1779. gs 'lact_lib','breast_stat_disp'
  1780. if $stat_writing_msg ! '': $stat_msg += '<br><b><font color = red><<$stat_writing_msg>></font></b>'
  1781. if recuperation = 1: $stat_msg += '<b><font color="red">You are still recovering from major surgery.</font></b>'
  1782. $stat_msg += $stat_cum_text
  1783. !!stds
  1784. if Gerpes >= 10 and GenHerpes = 1:
  1785. $stat_msg += '<BR><b><font color="red">Sores have appeared on your vagina. You have genital herpes.</font></b>'
  1786. elseif Gerpes >= 5 and GenHerpes =1:
  1787. $stat_msg += '<BR><b><font color="red">Your vagina is red and very itchy. You have genital herpes.</font></b>'
  1788. elseif Gerpes >= 3 and Orerpes = 1:
  1789. $stat_msg += '<BR><b><font color="red">You have cold sores on your lips. You have oral herpes.</font></b>'
  1790. end
  1791. if Gerpes >= 20 and GenHerpes =1:$stat_msg += '<BR> <b><font color="red">The herpes sores also cover your ass.</font></b>'
  1792. if Sifilis >= 50:
  1793. $stat_msg += '<BR><b><font color="red">Syphilitic rashes cover your whole body.</font></b>'
  1794. elseif Sifilis >= 21:
  1795. $stat_msg += '<BR><b><font color="red">You have a single large, hard sore on the lip. You have syphilis.</font></b>'
  1796. end
  1797. 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>'
  1798. if Kandidoz > 30:$stat_msg += '<BR><b><font color="red">There''s a white discharge and strong smell from your vagina. You have yeast infection.</font></b>'
  1799. !!drug withdrawal
  1800. if SLomka > 0:$stat_msg += '<BR><b><font color="red">You are very weak and hurt to the bone. You are suffering from heroin withdrawal.</font></b>'
  1801. 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>'
  1802. ! WD: Bimbo look
  1803. if bimbolevel > 0: $stat_msg += '<BR><<$bimbostatus>>'
  1804. if analplugIN = 1:$stat_msg += '<BR><font color = #FF1493>You have a butt plug inserted in your ass.</font>'
  1805. if vibratorin = 1:$stat_msg += '<BR><font color = #FF1493>You have a vibrator inserted in your vagina.</font>'
  1806. if alko > 0 and alko = 1:
  1807. $stat_msg += '<br><b><font color="green">You feel a little buzz from drinking.</font></b>'
  1808. elseif alko > 0 and alko < 4:
  1809. $stat_msg += '<br><b><font color="orange">You''re feeling a bit tipsy.</font></b>'
  1810. elseif alko > 0 and alko < 6:
  1811. $stat_msg += '<br><b><font color="orange">You''re drunk.</font></b>'
  1812. elseif alko > 0 and alko < 10:
  1813. $stat_msg += '<br><b><font color="red">You''re very drunk.</font></b>'
  1814. elseif alko > 0:
  1815. $stat_msg += '<br><b><font color="red">You''re wasted.</font></b>'
  1816. end
  1817. if $stat_frost_msg ! '': $stat_msg += '<BR><b><font color="red"><<$stat_frost_msg>></font></b>'
  1818. if $stat_sick_msg ! '': $stat_msg += '<BR><b><font color="red"><<$stat_sick_msg>></font></b>'
  1819. $stat_msg += $stat_bra_text
  1820. $stat_msg += $stat_panty_text
  1821. $stat_msg += $stat_clothes_text
  1822. if SchoolBlock = 0:
  1823. if $stat_school_msg ! '' and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and hour < 9:
  1824. $stat_msg += '<BR><b><<$stat_school_msg>></b>'
  1825. elseif $stat_school_msg ! '' and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour < 9 and detention_set = 1 and SchoolAtestat = 0:
  1826. $stat_msg += '<BR><b><<$stat_school_msg>></b>'
  1827. end
  1828. end
  1829. end
  1830. !!------------------ Things without an icon (Start) -------------------
  1831. if fingal > 0:$stat_msg += '<BR><b><font color="red">You have a black eye.</font></b>'
  1832. if mosol >= 50:
  1833. $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>'
  1834. elseif mosol >= 30:
  1835. $stat_msg += '<BR><b><font color="red">Your pussy feels a little itchy. It seems to be from rubbing against your clothing.</font></b>'
  1836. end
  1837. 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>'
  1838. if $mudnerd ! '':$stat_msg += '<BR><<$mudnerd>>'
  1839. if $home['current'] = 'city_apartment':
  1840. $streetev_home = 'your apartment'
  1841. elseif $home['location'] = 'pav_complex':
  1842. $streetev_home = 'your apartment block'
  1843. elseif $home['current'] = 'village_cottage':
  1844. $streetev_home = 'your cottage'
  1845. elseif $home['current'] = 'old_town_apartment':
  1846. $streetev_home = 'your apartment building at Okhlopkov Square'
  1847. elseif $home['current'] = 'matryona_mansion':
  1848. $streetev_home = 'the entrance to your mansion'
  1849. elseif $home['current'] = 'pavlovsk_hotel':
  1850. $streetev_home = 'the hotel at Pavlovsk market.'
  1851. elseif $home['current'] = 'maid_bedroom':
  1852. $streetev_home = 'Tanya''s apartment'
  1853. elseif $home['current'] = 'niko_apartment':
  1854. $streetev_home = 'Niko''s apartment block'
  1855. elseif $home['current'] = 'lyceum_dorm':
  1856. $streetev_home = 'High Street in the Pavlovsk Comercial District'
  1857. elseif $home['current'] = 'university_dorm':
  1858. $streetev_home = 'your dorm'
  1859. elseif $home['town'] = 'gadukino':
  1860. $streetev_home = 'the street in Gadukino'
  1861. elseif $home['current'] = 'city_house':
  1862. $streetev_home = 'your house'
  1863. elseif $home['current'] = 'meynold_household':
  1864. $streetev_home = 'the Meynold Residence'
  1865. else
  1866. $streetev_home = 'the city center'
  1867. end
  1868. if StrongNarkota > 20 or jointhigh > 0:$stat_msg += '<BR><b><font color="red">You are stoned.</font></b>'
  1869. if amphHigh > 0: $stat_msg += '<BR><b><font color="red">You feel a little wired.</font></b>'
  1870. !!--------------- mid($start_type,1,2) = 'sg' Events (Start) ------------------------
  1871. if mid($start_type,1,2) = 'sg' and sisboyday + 1 = daystart and hour < 18 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 16:00.'
  1872. if mid($start_type,1,2) = 'sg' and sisboyday + 1 = daystart and hour < 18 and sisboytrioQW = 1:$stat_msg += '<BR>' & $stat_msg += '<BR>You promised your sister to meet her in your room at 16:00.'
  1873. if mid($start_type,1,2) = 'sg' and day = nyp_day and month = 12 and SchoolAtestat = 0 and hour >= 5 and hour <= 14 and mid($start_type,1,2) = 'sg':
  1874. $stat_msg += '<BR>At 14:00, your school''s New Year''s party will start.'
  1875. elseif mid($start_type,1,2) = 'sg' and InvitationToDimkaNYparty = 1 and month = 12 and day = 31:
  1876. $stat_msg += '<BR><b>Go to the residential area between 15:00 and 18:00 to go to Dimka''s New Year party.</b>'
  1877. end
  1878. if mid($start_type,1,2) = 'sg' 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>'
  1879. if mid($start_type,1,2) = 'sg' 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>'
  1880. !!--------------- mid($start_type,1,2) = 'sg' Events (End) ------------------------
  1881. if accessible_property['city_house'] = 1 and accessible_property['old_town_apartment'] > 0:
  1882. $stat_msg += '<BR>You have rented an apartment in the city residential area, which is paid up for <b><<func(''homes_properties'', ''get_rent_days'', ''city_apartment'')>></b> days, and you also have an apartment in Pushkin, which is paid up for <b><<func(''homes_properties'', ''get_rent_days'', ''old_town_apartment'')>></b> days. Utilities are due on the 25th of <<$month>>.'
  1883. elseif accessible_property['city_house'] = 1:
  1884. $stat_msg += '<BR>You have rented an apartment in the city residential area, and you''re paid up for <<func(''homes_properties'', ''get_rent_days'', ''city_apartment'')>> days. Utilities are due on the 25th of <<$month>>.'
  1885. elseif accessible_property['old_town_apartment'] > 0:
  1886. $stat_msg += '<BR>You have rented an apartment in Pushkin, and you''re paid up for <<func(''homes_properties'', ''get_rent_days'', ''old_town_apartment'')>> days. Utilities are due on the 25th of <<$month>>.'
  1887. end
  1888. if $nichStatMsg ! '': $stat_msg += '<br><b><<$nichStatMsg>></b>'
  1889. 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.'
  1890. !!------------------ Things without an icon (End) -------------------
  1891. !!------------------ Gadukino chores and such -------------------
  1892. if display_bb = 1:
  1893. if boletus + boletus_cooked + bilberry > 0:
  1894. $stat_msg += '<br> '
  1895. if boletus + boletus_cooked + bilberry >= 5:
  1896. $stat_msg +='<br><font color = Olive>Your basket is full, and you cannot carry more. </font> '
  1897. else
  1898. $stat_msg +='<br><font color = Olive>Your basket is partially full. </font>'
  1899. end
  1900. $stat_msg += '<br><font color = Olive>(Click numbers to throw away one a time) </font>'
  1901. if boletus > 0:$stat_msg +='<br><font color = Olive>Mushrooms: <a href="exec:boletus -= 1 & gs ''stat''"><b><<boletus>></b></a> kg. </font>'
  1902. if boletus_cooked > 0:$stat_msg +='<br><font color = Olive>Cooked Mushrooms: <a href="exec:boletus_cooked -= 1 & gs ''stat''"><b><<boletus_cooked>></b></a> kg. </font>'
  1903. if bilberry > 0:$stat_msg +='<br><font color = Olive>Berries: <a href="exec:bilberry -= 1 & gs ''stat''"><b><<bilberry>></b></a> kg. </font>'
  1904. end
  1905. end
  1906. !! Grandma chores
  1907. if grandmaQW['chore_clean_floor'] = 1:
  1908. $stat_msg += '<br><b>You promised Grandma you would clean the floors in her house today.</b>'
  1909. elseif grandmaQW['chore_clean_floor'] = 2:
  1910. $stat_msg += '<br><b>You cleaned the floors for Grandma - you should let her know that it is done.</b>'
  1911. elseif grandmaQW['chore_wash_clothes'] = 1:
  1912. $stat_msg += '<br><b>You promised Grandma you would wash clothes for her today.</b>'
  1913. elseif grandmaQW['chore_wash_clothes'] = 2:
  1914. $stat_msg += '<br><b>You washed clothes for Grandma - you should let her know that it is done.</b>'
  1915. elseif grandmaQW['chore_milk_cow'] = 1:
  1916. $stat_msg += '<br><b>You promised Grandma you would milk the cow in the barn for her today.</b>'
  1917. elseif grandmaQW['chore_milk_cow'] = 2:
  1918. $stat_msg += '<br><b>You milked the cow for Grandma - you should let her know that it is done.</b>'
  1919. elseif grandmaQW['chore_groceries'] = 1:
  1920. $stat_msg += '<br><b>You promised Grandma you would go get groceries for her today.</b>'
  1921. elseif grandmaQW['chore_groceries'] = 2:
  1922. $stat_msg += '<br><b>You got the groceries for Grandma - you should go give them to her.</b>'
  1923. elseif grandmaQW['chore_can_mushrooms'] = 1:
  1924. $stat_msg += '<br><b>You promised Grandma you would help her can mushrooms today.</b>'
  1925. elseif grandmaQW['chore_can_berries'] = 1:
  1926. $stat_msg += '<br><b>You promised Grandma you would help her can berries today.</b>'
  1927. elseif grandmaQW['can_veggies'] = 1:
  1928. $stat_msg += '<br><b>You promised Grandma you would help her can vegetables today.</b>'
  1929. elseif grandmaQW['chore_feed_chickens'] = 1:
  1930. $stat_msg += '<br><b>You promised Grandma you would feed the chickens for her today.</b>'
  1931. elseif grandmaQW['chore_feed_chickens'] = 2:
  1932. $stat_msg += '<br><b>You fed the chickens for Grandma - you should let her know that it is done.</b>'
  1933. elseif grandmaQW['chore_work_in_garden'] = 1:
  1934. $stat_msg += '<br><b>You promised Grandma you would work in the garden today.</b>'
  1935. elseif grandmaQW['chore_work_in_garden'] = 2:
  1936. $stat_msg += '<br><b>You worked in the garden for Grandma - you should let her know that it is done.</b>'
  1937. elseif grandmaQW['chore_water_garden'] = 1:
  1938. $stat_msg += '<br><b>You promised Grandma you would water the plants in the garden today.</b>'
  1939. elseif grandmaQW['chore_water_garden'] = 2:
  1940. $stat_msg += '<br><b>You watered the plants in the garden for Grandma - you should let her know that it is done.</b>'
  1941. elseif grandmaQW['chore_collect_strawberries'] = 1:
  1942. $stat_msg += '<br><b>You promised Grandma you would pick strawberries from the garden for her today.</b>'
  1943. elseif grandmaQW['chore_collect_strawberries'] = 2:
  1944. $stat_msg += '<br><b>You picked strawberries for Grandma - you should give them to her.</b>'
  1945. elseif grandmaQW['chore_collect_fruit'] = 1:
  1946. $stat_msg += '<br><b>You promised Grandma you would collect fruit from the garden for her today.</b>'
  1947. elseif grandmaQW['chore_collect_fruit'] = 2:
  1948. $stat_msg += '<br><b>You collected fruit for Grandma - you should give them to her.</b>'
  1949. elseif grandmaQW['chore_harvest_garden'] = 1:
  1950. $stat_msg += '<br><b>You promised Grandma you would harvest vegetables from the garden for her today.</b>'
  1951. elseif grandmaQW['chore_harvest_garden'] = 2:
  1952. $stat_msg += '<br><b>You harvested vegetables for Grandma - you should give them to her.</b>'
  1953. elseif grandmaQW['chore_gather_mushrooms'] > 0 and grandmaQW['chore_gather_mushrooms'] < 3:
  1954. if boletus < grandmaQW['chore_mushroom_quantity']:
  1955. grandmaQW['chore_gather_mushrooms'] = 1
  1956. $stat_msg += '<br><b>You promised Grandma you would pick <<grandmaQW[''chore_mushroom_quantity'']>> kg of mushrooms for her today.</b>'
  1957. else
  1958. grandmaQW['chore_gather_mushrooms'] = 2
  1959. $stat_msg += '<br><b>You have picked the <<grandmaQW[''chore_mushroom_quantity'']>> kg of mushrooms that Grandma asked for - you should give them to her.</b>'
  1960. end
  1961. elseif grandmaQW['chore_gather_berries'] > 0 and grandmaQW['chore_gather_berries'] < 3:
  1962. if bilberry < grandmaQW['chore_berry_quantity']:
  1963. grandmaQW['chore_gather_berries'] = 1
  1964. $stat_msg += '<br><b>You promised Grandma you would pick <<grandmaQW[''chore_berry_quantity'']>> kg of berries for her today.</b>'
  1965. else
  1966. grandmaQW['chore_gather_berries'] = 2
  1967. $stat_msg += '<br><b>You have picked the <<grandmaQW[''chore_berry_quantity'']>> kg of berries that Grandma asked for - you should give them to her.</b>'
  1968. end
  1969. elseif grandmaQW['chore_gather_both'] > 0 and grandmaQW['chore_gather_both'] < 3:
  1970. if bilberry < grandmaQW['chore_berry_quantity'] or boletus < grandmaQW['chore_mushroom_quantity']:
  1971. grandmaQW['chore_gather_both'] = 1
  1972. $stat_msg += '<br><b>You promised Grandma you would pick <<grandmaQW[''chore_mushroom_quantity'']>> kg of mushrooms and <<grandmaQW[''chore_berry_quantity'']>> kg of berries for her today.</b>'
  1973. else
  1974. grandmaQW['chore_gather_both'] = 2
  1975. $stat_msg += '<br><b>You have picked the <<grandmaQW[''chore_mushroom_quantity'']>> kg of mushrooms and <<grandmaQW[''chore_berry_quantity'']>> kg of berries that Grandma asked for - you should give them to her.</b>'
  1976. end
  1977. end
  1978. !! Grandpa chores
  1979. if grandpaQW['chore_fetch_firewood'] = 1:
  1980. $stat_msg += '<br><b>You promised Grandpa you would fetch firewood for him today.</b>'
  1981. elseif grandpaQW['chore_fetch_firewood'] = 2:
  1982. $stat_msg += '<br><b>You fetched some firewood for Grandpa - you should give it to him.</b>'
  1983. elseif grandpaQW['chore_feed_horse'] = 1:
  1984. $stat_msg += '<br><b>You promised Grandpa you would feed the horse in the barn for him today.</b>'
  1985. elseif grandpaQW['chore_feed_horse'] = 2:
  1986. $stat_msg += '<br><b>You fed the horse for Grandpa - you should let him know that it is done.</b>'
  1987. elseif grandpaQW['chore_feed_cow'] = 1:
  1988. $stat_msg += '<br><b>You promised Grandpa you would feed the cow in the barn for him today.</b>'
  1989. elseif grandpaQW['chore_feed_cow'] = 2:
  1990. $stat_msg += '<br><b>You fed the cow for Grandpa - you should let him know that it is done.</b>'
  1991. elseif grandpaQW['chore_clean_yard'] = 1:
  1992. $stat_msg += '<br><b>You promised Grandpa you would clean the yard for him today.</b>'
  1993. elseif grandpaQW['chore_clean_yard'] = 2:
  1994. $stat_msg += '<br><b>You cleaned the yard for Grandpa - you should let him know that it is done.</b>'
  1995. elseif grandpaQW['chore_brush_horse'] = 1:
  1996. $stat_msg += '<br><b>You promised Grandpa you would groom the horse for him today.</b>'
  1997. elseif grandpaQW['chore_brush_horse'] = 2:
  1998. $stat_msg += '<br><b>You groomed the horse for Grandpa - you should let him know that it is done.</b>'
  1999. elseif grandpaQW['chore_feed_boar'] = 1:
  2000. $stat_msg += '<br><b>You promised Grandpa you would feed the pig in the barn for him today.</b>'
  2001. elseif grandpaQW['chore_feed_boar'] = 2:
  2002. $stat_msg += '<br><b>You fed the pig for Grandpa - you should let him know that it is done.</b>'
  2003. elseif grandpaQW['chore_lead_horse_to_field'] = 1:
  2004. $stat_msg += '<br><b>You promised Grandpa you would take the horse from the barn to the field for him today.</b>'
  2005. elseif grandpaQW['chore_lead_horse_to_field'] = 2:
  2006. $stat_msg += '<br><b>You took the horse to the field for Grandpa - you should let him know that it is done.</b>'
  2007. elseif grandpaQW['chore_lead_cow_to_field'] = 1:
  2008. $stat_msg += '<br><b>You promised Grandpa you would take the cow from the barn to the field for him today.</b>'
  2009. elseif grandpaQW['chore_lead_cow_to_field'] = 2:
  2010. $stat_msg += '<br><b>You took the cow to the field for Grandpa - you should let him know that it is done.</b>'
  2011. elseif grandpaQW['chore_bathe_horse'] = 1:
  2012. $stat_msg += '<br><b>You promised Grandpa you would take the horse from the barn and bathe it in the river for him today.</b>'
  2013. if grandpaQW['chore_bathe_horse_prog'] = 1:
  2014. $stat_msg += '<br><b>You have taken the horse to the river, but haven''t bathed him yet.</b>'
  2015. elseif grandpaQW['chore_bathe_horse'] = 2:
  2016. $stat_msg += '<br><b>You have bathed the horse in the river, but haven''t led him back home yet.</b>'
  2017. end
  2018. elseif grandpaQW['chore_bathe_horse'] = 2:
  2019. $stat_msg += '<br><b>You bathed the horse for Grandpa - you should let him know that it is done.</b>'
  2020. elseif grandpaQW['chore_gather_mushrooms'] > 0 and grandpaQW['chore_gather_mushrooms'] < 3:
  2021. if boletus < grandpaQW['chore_mushroom_quantity']:
  2022. grandpaQW['chore_gather_mushrooms'] = 1
  2023. $stat_msg += '<br><b>You promised Grandpa you would pick <<grandpaQW[''chore_mushroom_quantity'']>> kg of mushrooms for him today.</b>'
  2024. else
  2025. grandpaQW['chore_gather_mushrooms'] = 2
  2026. $stat_msg += '<br><b>You have picked the <<grandpaQW[''chore_mushroom_quantity'']>> kg of mushrooms that Grandpa asked for - you should give them to him.</b>'
  2027. end
  2028. elseif grandpaQW['chore_gather_berries'] > 0 and grandpaQW['chore_gather_berries'] < 3:
  2029. if bilberry < grandpaQW['chore_berry_quantity']:
  2030. grandpaQW['chore_gather_berries'] = 1
  2031. $stat_msg += '<br><b>You promised Grandpa you would pick <<grandpaQW[''chore_berry_quantity'']>> kg of berries for him today.</b>'
  2032. else
  2033. grandpaQW['chore_gather_berries'] = 2
  2034. $stat_msg += '<br><b>You have picked the <<grandpaQW[''chore_berry_quantity'']>> kg of berries that Grandpa asked for - you should give them to him.</b>'
  2035. end
  2036. elseif grandpaQW['chore_gather_both'] > 0 and grandpaQW['chore_gather_both'] < 3:
  2037. if bilberry < grandpaQW['chore_berry_quantity'] or boletus < grandpaQW['chore_mushroom_quantity']:
  2038. grandpaQW['chore_gather_both'] = 1
  2039. $stat_msg += '<br><b>You promised Grandpa you would pick <<grandpaQW[''chore_mushroom_quantity'']>> kg of mushrooms and <<grandpaQW[''chore_berry_quantity'']>> kg of berries for him today.</b>'
  2040. else
  2041. grandpaQW['chore_gather_both'] = 2
  2042. $stat_msg += '<br><b>You have picked the <<grandpaQW[''chore_mushroom_quantity'']>> kg of mushrooms and <<grandpaQW[''chore_berry_quantity'']>> kg of berries that Grandpa asked for - you should give them to him.</b>'
  2043. end
  2044. end
  2045. !! in case both grandparents gave you forest gathering chores
  2046. if (boletus >= grandpaQW['chore_mushroom_quantity'] or boletus >= grandmaQW['chore_mushroom_quantity']) and (boletus < (grandpaQW['chore_mushroom_quantity'] + grandmaQW['chore_mushroom_quantity'])):
  2047. temp_boletus = (grandpaQW['chore_mushroom_quantity'] + grandmaQW['chore_mushroom_quantity']) - boletus
  2048. $stat_msg += '<br><b>You need <<temp_boletus>> more '+iif(temp_boletus = 1, 'kilo', 'kilos')+' of mushrooms to satisfy both of your grandparents'' requests.</b>'
  2049. end
  2050. if (bilberry >= grandpaQW['chore_berry_quantity'] or bilberry >= grandmaQW['chore_berry_quantity']) and (bilberry < (grandpaQW['chore_berry_quantity'] + grandmaQW['chore_berry_quantity'])):
  2051. temp_bilberry = (grandpaQW['chore_berry_quantity'] + grandmaQW['chore_berry_quantity']) - bilberry
  2052. $stat_msg += '<br><b>You need <<temp_bilberry>> more '+iif(temp_bilberry = 1, 'kilo', 'kilos')+' of berries to satisfy both of your grandparents'' requests.</b>'
  2053. end
  2054. !!------------------ Gadukino chores and such (End) -------------------
  2055. if enable_extra_msg = 1:
  2056. if hour < meethour[0] and svidanie[0] = 1:
  2057. $stat_msg += '<BR><<$stat_bfgf_msg_0>>'
  2058. elseif hour = meethour[0] and svidanie[0] = 1:
  2059. $stat_msg += '<BR><b><font color="red"><<$stat_bfgf_msg_0>></font></b>'
  2060. end
  2061. if hour < meethour[1] and svidanie[1] = 1:
  2062. $stat_msg += '<BR><<$stat_bfgf_msg_1>>'
  2063. elseif hour = meethour[1] and svidanie[1] = 1:
  2064. $stat_msg += '<BR><b><font color="red"><<$stat_bfgf_msg_1>></font></b>'
  2065. end
  2066. if hour < meethour[2] and svidanie[2] = 1:
  2067. $stat_msg += '<BR><<$stat_bfgf_msg_2>>'
  2068. elseif hour = meethour[2] and svidanie[2] = 1:
  2069. $stat_msg += '<BR><b><font color="red"><<$stat_bfgf_msg_2>></font></b>'
  2070. end
  2071. if $stat_court_msg ! '': $stat_msg += '<BR><b><font color="red"><<$stat_court_msg>></font></b>'
  2072. if young_shop_work = 1 and hour = 16 and minut <= 5 and week < 6 and inWorkYoungShop = 0:
  2073. $stat_msg += 'You are late for work at Pussy-Cats.'
  2074. elseif young_shop_work = 1 and hour = 16 and week < 6 and inWorkYoungShop = 0:
  2075. if kats_absent_check ! daystart:
  2076. kats_absent_check = daystart
  2077. young_shop_miss += 1
  2078. end
  2079. $stat_msg += '<BR><b><font color="red">You missed work.</font></b>'
  2080. elseif young_shop_work = 1 and (hour = 14 or hour = 15) and week < 6:
  2081. $stat_msg += '<BR><b><font color="red">You start work at Pussy-Cats today at 16:00.</font></b>'
  2082. end
  2083. if young_shop_work1 = 1 and hour = 9 and minut <= 5 and week >= 6 and inWorkYoungShop = 0:
  2084. $stat_msg += 'You are late for work at Pussy-Cats.'
  2085. elseif young_shop_work1 = 1 and hour = 9 and week >= 6 and inWorkYoungShop = 0:
  2086. if kats_absent_check ! daystart:
  2087. kats_absent_check = daystart
  2088. young_shop_miss += 1
  2089. end
  2090. $stat_msg += '<BR><b><font color="red">You missed work.</font></b>'
  2091. elseif young_shop_work1 = 1 and (hour = 7 or hour = 8) and week >= 6:
  2092. $stat_msg += '<BR><b><font color="red">By 9:00, you have to be at Pussy-Cats to start work.</font></b>'
  2093. end
  2094. if young_shop_work2 = 1 and hour = 9 and minut <= 5 and week < 6 and inWorkYoungShop = 0:
  2095. $stat_msg += 'You are late for work at Pussy-Cats.'
  2096. elseif young_shop_work2 = 1 and hour = 9 and week < 6 and inWorkYoungShop = 0:
  2097. if kats_absent_check ! daystart:
  2098. kats_absent_check = daystart
  2099. young_shop_miss += 1
  2100. end
  2101. $stat_msg += '<BR><b><font color="red">You missed work.</font></b>'
  2102. elseif young_shop_work2 = 1 and (hour = 7 or hour = 8) and week < 6:
  2103. $stat_msg += '<BR><b><font color="red">By 9:00, you have to be at Pussy-Cats to start work.</font></b>'
  2104. end
  2105. if workrin = 1 and (week = 2 or week = 4 or week = 6) and hour > 5 and hour < 8:
  2106. $stat_msg += '<BR><b><font color="red">At 8 o''clock, you start work in the market.</font></b>'
  2107. elseif workrin = 1 and (week = 2 or week = 4 or week = 6) and hour = 8:
  2108. $stat_msg += '<BR><b><font color="red">You need to work in the market now.</font></b>'
  2109. end
  2110. if model['status'] > 0:
  2111. if model_job_week >= 2:
  2112. $stat_msg += '<BR><b>You have no more modeling jobs available this week.</b>'
  2113. elseif model_job_week = 1:
  2114. $stat_msg += '<BR><b>You can get paid for 1 more modeling job this week.</b>'
  2115. elseif model_job_week < 1:
  2116. $stat_msg += '<BR><b>You can get paid for 2 modeling jobs this week.</b>'
  2117. end
  2118. end
  2119. if pornstack > 0:
  2120. if pfilmday[0] = 0:
  2121. if pfilmday[1] = 0:
  2122. $stat_msg += '<br><b>You will star in another porno in <<porndays>> days.</b>'
  2123. else
  2124. $stat_msg += '<br><b>You have a porno shoot scheduled tomorrow.</b>'
  2125. end
  2126. else
  2127. if pornnow = 1:
  2128. $stat_msg += '<br><b>You are at a porn shooting.</b>'
  2129. else
  2130. if hour < 11:
  2131. $stat_msg += '<br><b>You are expected in the porno studio at 10:00.</b>'
  2132. elseif hour >= 11 and hour < 13:
  2133. $stat_msg += '<br><b>You should be at the porno studio, shooting!</b>'
  2134. elseif hour >= 13:
  2135. $stat_msg += '<br><b>You missed a scheduled porno shoot!</b>'
  2136. end
  2137. end
  2138. end
  2139. end
  2140. if pornmiss = 1: $stat_msg += '<br><b>You missed a scheduled porno shoot!</b>'
  2141. if prodcosttrue > 0: $stat_msg += '<br><b>You owe money to the porn studio <<prodcost>>?</b>'
  2142. if firstkasting > 0 and pfilmNO < 1:
  2143. if pornstack >= 10:
  2144. $stat_msg += '<br>You are currently unable to book any more porn shoots at the Porn Studio.'
  2145. elseif pornstack = 11:
  2146. $stat_msg += '<br>You can contract <<10-pornstack>> porn shoot at the Porn Studio.'
  2147. else
  2148. $stat_msg += '<br>You can contract up to <<10-pornstack>> porn shoots at the Porn Studio.'
  2149. end
  2150. end
  2151. if masseuse['jobtype'] > 0:
  2152. if masseuse['<<week>>_shift_1'] = 1 and hour < 9:
  2153. $stat_msg +='<BR><b><font color="blue">You have a shift at the salon today at 9:00.</font></b>'
  2154. elseif masseuse['<<week>>_shift_1'] = 1 and hour < 9:
  2155. $stat_msg +='<BR><b><font color="red">You''re late for your 9:00 shift at the salon!</font></b>'
  2156. elseif masseuse['<<week>>_shift_2'] = 1 and hour < 13:
  2157. $stat_msg +='<BR><b><font color="blue">You have a shift at the salon today at 13:00.</font></b>'
  2158. elseif masseuse['<<week>>_shift_2'] = 1 and hour < 13:
  2159. $stat_msg +='<BR><b><font color="red">You''re late for your 13:00 shift at the salon!</font></b>'
  2160. elseif masseuse['<<week>>_shift_3'] and hour < 17:
  2161. $stat_msg +='<BR><b><font color="blue">You have a shift at the salon today at 17:00.</font></b>'
  2162. elseif masseuse['<<week>>_shift_3'] = 1 and hour < 17:
  2163. $stat_msg +='<BR><b><font color="red">You''re late for your 17:00 shift at the salon!</font></b>'
  2164. end
  2165. end
  2166. !! Work at city cafe, workKafe['job'] is having the job and at_work is set when she is at work
  2167. if hour < 22 and week >= 2 and week <= 4 and workKafe['job'] = 1 and workKafe['at_work'] = 0:
  2168. if hour >= 12: $stat_msg += '<BR><b><font color="red">You missed your shift at The Roadhouse cafe today.</font></b>'
  2169. if hour < 12: $stat_msg += '<BR><b><font color="red">Today you have a shift at The Roadhouse cafe starting at 11:00.</font></b>'
  2170. end
  2171. 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>'
  2172. if hour < 17 and week < 5 and BurgerQW['Secretary'] = 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>'
  2173. 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>'
  2174. 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>'
  2175. 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>'
  2176. 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 the beauty salon. Shift starts at 9:00.</font></b>'
  2177. 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>'
  2178. if hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 1 and missCum >= timeTresh:
  2179. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  2180. elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 1 and missCum < timeTresh:
  2181. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  2182. elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 2 and missCum >= timeTresh:
  2183. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  2184. elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 2 and missCum < timeTresh:
  2185. $stat_msg += '<BR><b><font color="red"><<$stat_hypno_msg>></font></b>'
  2186. elseif hypnoAddict > 0 and $stat_hypno_msg ! '':
  2187. $stat_msg += '<BR><b><font color="magenta"><<$stat_hypno_msg>></font></b>'
  2188. end
  2189. end
  2190. gs 'brother', 'brotherSexCount'
  2191. !! List Current Active Spells
  2192. if arrsize('spellComplete') > 0:
  2193. $tempSpellText="<br><b><font color='#FF99FF'>Active Spells</font></b>"
  2194. i=0
  2195. :ActiveSpellLoop
  2196. if i < arrsize('spellComplete'):
  2197. $tempSpellText += "<br><font color='#FF99FF'><<$spellName[$spellTimeName[i]]>></font>"
  2198. i += 1
  2199. jump 'ActiveSpellLoop'
  2200. end
  2201. $stat_msg += func('cleanHTML',$tempSpellText)
  2202. killvar '$tempSpellText'
  2203. killvar 'i'
  2204. end
  2205. !!Guitar icon goes here
  2206. if ml_guitar['carried'] = 2 or $ml_guitar['location'] = 'testlab':
  2207. $stat_msg +='<br><br><a href="exec: gt ''music_actions'', ''start'', $curloc"><img src="images/system/icons/icon_guitar.png"></a>'
  2208. end
  2209. !!
  2210. !!zero checks marriage
  2211. proverka1 = 0
  2212. proverka2 = 0
  2213. proverka3 = 0
  2214. proverka4 = 0
  2215. proverka5 = 0
  2216. $stat_msg += '<br><br>'
  2217. if disable_LoadSave = 0:
  2218. $stat_msg += '<a href="exec:savegame ''quicksave.sav'' && pl''Quicksave Done''"><img src="images/system/icons/stat_qsave.png" height="<<set_miconht>>"></a> '
  2219. $stat_msg += '<a href="exec:savegame"><img src="images/system/icons/stat_save.png" height="<<set_miconht>>"></a> '
  2220. $stat_msg += '<a href="exec:opengame"><img src="images/system/icons/stat_load.png" height="<<set_miconht>>"></a> '
  2221. $stat_msg += '<a href="exec:if input(''Input Anything to confirm Quick Load'') ! '''': opengame ''quicksave.sav''"><img src="images/system/icons/stat_qload.png" height="<<set_miconht>>"></a>'
  2222. elseif disable_LoadSave = 2:
  2223. $stat_msg += '<a href="exec:savegame ''quicksave.sav'' && pl''Quicksave Done''">Quick Save</a> '
  2224. $stat_msg += '<a href="exec:savegame">Save</a> '
  2225. $stat_msg += '<a href="exec:opengame">Load</a> '
  2226. $stat_msg += '<a href="exec:if input(''Input Anything to confirm Quick Load'') ! '''': opengame ''quicksave.sav''">Quick Load</a>'
  2227. end
  2228. if PillToggle = 1 and mc_inventory['contraceptive_pill'] > 0:
  2229. Stabletki += mc_inventory['contraceptive_pill']
  2230. mc_inventory['contraceptive_pill'] = 0
  2231. elseif PillToggle = 0 and Stabletki > 0:
  2232. mc_inventory['contraceptive_pill'] += Stabletki
  2233. Stabletki = 0
  2234. end
  2235. if CondomToggle = 1 and mc_inventory['equipped_condoms'] > 0:
  2236. Sprezik += mc_inventory['equipped_condoms']
  2237. mc_inventory['equipped_condoms'] = 0
  2238. elseif CondomToggle = 0 and Sprezik > 0:
  2239. mc_inventory['equipped_condoms'] += Sprezik
  2240. Sprezik = 0
  2241. end
  2242. $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'') ! '''': opengame ''quicksave.sav''">Q.L</a>'
  2243. if Enable_statimg_loc = 2: $stat_msg += '<br><<$stat_imgtool_msg>><br><<$stat_imgextra_msg>>'
  2244. killvar 'stat_imgtool_msg'
  2245. killvar 'stat_imgextra_msg'
  2246. if Enable_statfsize > 0: $stat_msg += '</font>' & !disable this, all texts comes from pl will have the same font size, like[time]
  2247. if Enable_faceturn = 1: view func('$face_image')
  2248. if $git_hash ! '': $stat_msg = '<center><<$git_hash>></center><<$stat_msg>>'
  2249. if Enable_Android = 0:
  2250. pl '<<$stat_msg>>'
  2251. else
  2252. '<<$stat_android>>'
  2253. $stat_msg = 'Android mode, <a href="exec:gs ''$menu_obnovit''">Refresh</a><<$stat_msg>>'
  2254. end
  2255. !!end of bimbo withdrawal
  2256. if bimbowithdrawal > 14:
  2257. bimbowithdrawal = 0
  2258. bimbo = 0
  2259. bimbolevel = 0
  2260. msg 'You suddenly feel as if your head is clear, instead of filled with pink thoughts.'
  2261. end
  2262. --- stat_display ---------------------------------