stat_display.qsrc 138 KB

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