stat_display.qsrc 145 KB

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