glife/locations/stat_display.qsrc

# stat_display
!!2021/04/04

!! --- CALL TRACE, when enabled (`debug['trace_shown'] = 1`) replaces stat_display
if debug['trace_shown'] ! 0:
	clear
	p '<center>'
	if $git_hash ! '': pl '<<$git_hash>>'
	if debug['call_trace_selector'] = 0:
		p 'loc change&nbsp;|&nbsp;'
		p '<a href="exec: debug[''call_trace_selector''] = 1 & gs ''stat_display''">direct</a>'
		nl '<hr>'

		if debug['trace_loc_change'] = 0:
			p '<a href="exec: debug[''trace_loc_change''] = 1 & gs ''stat_display''">start</a>&nbsp;|&nbsp;'
		else
			p '<a href="exec: debug[''trace_loc_change''] = 0 & gs ''stat_display''">stop</a>&nbsp;|&nbsp;'
		end
		p '<a href="exec: $debug[''loc_change_trace''] = '''' & gs ''stat_display''">clear</a>&nbsp;|&nbsp;'
		pl '<a href="exec: debug[''trace_shown''] = 0 & gs ''stat''">return</a></center>'

		p $debug['loc_change_trace']
	else
		p '<a href="exec: debug[''call_trace_selector''] = 0 & gs ''stat_display''">loc change</a>&nbsp;|&nbsp;'
		p 'direct'
		nl '<hr>'

		p '<a href="exec: $trace_locations[] = $input(''location name'') & gs ''stat_display''">add by name</a>&nbsp;|&nbsp;'
		p '<a href="exec: $trace_locations[] = $curloc & gs ''stat_display''">add $curloc</a>'
		nl '<hr>'

		if arrsize('$trace_locations') > 0:
			p '<a href="exec: gs ''debug_tools'', ''trace_list_locs''">list locations</a>&nbsp;|&nbsp;'
			p '<a href="exec: killvar ''$trace_locations'' & gs ''stat_display''">clear</a>'
		else
			p 'list locations&nbsp;|&nbsp;'
			p 'clear'
		end
		nl '<hr>'

		p '<a href="exec: $debug[''direct_trace''] = '''' & gs ''stat_display''">clear</a>&nbsp;|&nbsp;'
		pl '<a href="exec: debug[''trace_shown''] = 0 & gs ''stat''">return</a></center>'

		p $debug['direct_trace']
	end
	exit
end


!! --- STAT_DISPLAY
if default_status_icons = 0:set_siconht = 54
if default_wbanner = 0:set_weatherht = 72
if default_menu_icons = 0:set_miconht = 54

!!----------------image Extra messages, start--------------------------

$stat_imgtool_msg  = ''
$stat_imgextra_msg = ''

if Enable_showstatimg = 1:
	!There are 3 display mode, with toobar / top / bottom, controlled by Enable_statimg_loc
	if Enable_statimg_face = 0:
		$stat_imgtool_msg += '<a href="exec: Enable_statimg_face = 1 & gs ''$menu_obnovit''">◇Face</a>'
	else
		$stat_imgtool_msg += '<a href="exec: Enable_statimg_face = 0 & gs ''$menu_obnovit''">◆Face</a>'
		$img_temp = func('$face_image')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if Enable_statimg_body = 0:
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_body = 1 & gs ''$menu_obnovit''">◇Body</a>'
	else
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_body = 0 & gs ''$menu_obnovit''">◆Body</a>'
		$img_temp = func('$body_image','body')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if Enable_statimg_coat = 0:
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_coat = 1 & gs ''$menu_obnovit''">◇Coat</a>'
	else
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_coat = 0 & gs ''$menu_obnovit''">◆Coat</a>'
		$img_temp = func('$body_image','coat')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if Enable_statimg_cloth = 0:
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_cloth = 1 & gs ''$menu_obnovit''">◇Clothes</a>'
	else
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_cloth = 0 & gs ''$menu_obnovit''">◆Clothes</a>'
		$img_temp = func('$body_image','clothes')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if Enable_statimg_bra = 0:
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_bra = 1 & gs ''$menu_obnovit''">◇Bra</a>'
	else
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_bra = 0 & gs ''$menu_obnovit''">◆Bra</a>'
		$img_temp = func('$body_image','bra')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if Enable_statimg_panties = 0:
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_panties = 1 & gs ''$menu_obnovit''">◇Panties</a>'
	else
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_panties = 0 & gs ''$menu_obnovit''">◆Panties</a>'
		$img_temp = func('$body_image','panties')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if bodysuitwornnumber > 0 and (Enable_statimg_bra = 1 or Enable_statimg_panties = 1):
		$img_temp = func('$body_image','bodysuit')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end

	if Enable_statimg_shoes = 0:
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_shoes = 1 & gs ''$menu_obnovit''">◇Shoes</a>'
	else
		$stat_imgtool_msg += ' <a href="exec: Enable_statimg_shoes = 0 & gs ''$menu_obnovit''">◆Shoes</a>'
		$img_temp = func('$body_image','shoes')
		if $img_temp ! '':  $stat_imgextra_msg += '<a href="exec: view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
	end
	if $menu_loc ! '': $stat_imgtool_msg += ' <a href="exec: gs ''Cheatmenu_din'' & dynamic $cheatmenu[''setting'']">◎Settings</a>'
end
!!----------------image Extra messages, end --------------------------

if Enable_statimg_loc = 1: $stat_msg = '<<$stat_imgtool_msg>><br><<$stat_imgextra_msg>><br><<$stat_msg>>'

$stat_android = '<b><<func(''time'', ''get_time_string'', hour, minut)>></b>'

if $notification_message[0] ! '':
	if _n_counter['shown'] ! 1: gs 'notification', 'display'
	$stat_msg += $notification_message[0]
end

$stat_msg += '<table><tr><td><a href="exec: msg ''<<$weather>>''"><<$weatherImage>></a></td><td><<$temperature>></td></tr></table>'

if Enable_statfsize>0: $stat_msg = '<font size=<<Enable_statfsize>>><<$stat_msg>>'

$stat_disable_msg = 'Menu is disabled for this event.'
$stat_private_msg = 'Need a private place.'

!$stat_msg += '<<$weather>><br>'
!pl '<<$weatherImage>>'
!! $stat_day_suffix is generated at midnight in cikl
if timeHidden = 0: $stat_msg += '<br><<$stat_android>> <<$week[week]>> <<day>><<$stat_day_suffix>> <<$month>> <<year>>'
$stat_android += '<<$week[week]>> <<day>>/<<month>>, <<money>> ₽, <a href="exec: clr & pl $stat_android">Status</a>'
! $stat_android for short desc in android mode, $stat_msg for status bar.
if mid($start_type,1,2) = 'sg' and SchoolAtestat ! 1 and $holyday ! '': $stat_msg += '<br><<$holyday>>' & $stat_msg += '<br>'
if birthday = day and birthmonth = month: $stat_msg += '<br><b>Today is your birthday.</b>' & $stat_msg += '<br>'
if telefon['UnreadSMS'] > 0: $stat_msg += '<br><b>You have <<telefon[''UnreadSMS'']>> unread message(s).</b><br>'

!New icon based menu.
if $start_type[1] ! 'nomagic':
	$journal_tooltip = 'Spellbook & Journal'
	$journalIcon = 'journal_magic.png'
else
	$journal_tooltip = 'Journal'
	$journalIcon = 'journal_norm.png'
end
if menu_off = 0:
	$menuBarTab = '<table><tr>'
	$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>'
	$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>'
	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>'
	$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>'
	$menuBarTab += '<td><a href="exec: jclose = 1 & $jumploc = '''' & gs ''obj_din'', ''records''"><img title="<<$journal_tooltip>>" height = <<set_miconht>> src="images/system/icons/menu/<<$journalIcon>>"></a></td>'
	$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>'
	$menuBarTab += '<td><a href="exec: gs ''obj_din'', ''wait''"><img title="Pass time" height = <<set_miconht>> src="images/system/icons/menu/icon_clock.png"></a></td>'
	$menuBarTab += '</tr></table>'
	$stat_msg += func('cleanHTML',$menuBarTab)
	killvar '$menuBarTab'
elseif menu_off = 1:
	$menuBarTab = '<table><tr>'
	$menuBarTab += '<td><a href="exec: gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_character.png"></a></td>'
	$menuBarTab += '<td><a href="exec: gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_lookself.png"></a></td>'
	if bag > 0: $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>'
	$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>'
	$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>'
	$menuBarTab += '<td><a href="exec: gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_menu.png"></a></td>'
	$menuBarTab += '<td><a href="exec: gs ''obj_din'', ''menu_disabled''"><img title="<<$stat_disable_msg>>" height = <<set_miconht>> src="images/system/icons/menu/icon_clock.png"></a></td>'
	$menuBarTab += '</tr></table>'
	$stat_msg += func('cleanHTML',$menuBarTab)
	killvar '$menuBarTab'
end

!!----------------- Money -------------------------------

if bankAccount = 0 and stolmoney = 0:
	$stat_msg += '<br>You have <b><<func(''agentned'', ''format_price_string'', money)>> ₽</b> in your '+iif(bag > 0, 'purse.', 'pockets.')
else
	$stat_msg += '<br>'+iif(bag > 0, 'Purse', 'Pockets')+': <b><<func(''agentned'', ''format_price_string'', money)>> ₽</b>'
	if stolmoney > 0: $stat_msg += ', Drawer <b><<func(''agentned'', ''format_price_string'', stolmoney)>>₽</b>'
	if bankAccount = 1:
		if karta >= bankDebtLimit:
			$stat_msg += ', Bank: <b><<func(''agentned'', ''format_price_string'', karta - bankDebtLimit)>> ₽</b>'
		else
			$stat_msg += '<font color="red"> Your bank account is overdrawn by <b><<func(''agentned'', ''format_price_string'', bankDebtLimit - karta)>> ₽</b>!!</font>'
		end
	end
end

!!---------------- Messages for Icons/Texts (Start)--------------------------

if cheatVars['no_sweat'] = 0:
	if pcs_sweat < 0:
		pcs_sweat = 0
	elseif pcs_sweat > 69:
		pcs_sweat = 69
	end

	if pcs_sweat > 59:
		$stat_sweat_msg = 'You are dripping wet from sweat and smell like a gym sock.'
	elseif pcs_sweat > 49:
		$stat_sweat_msg = 'You really stink.'
	elseif pcs_sweat > 39:
		$stat_sweat_msg = 'You stink.'
	elseif pcs_sweat > 29:
		$stat_sweat_msg = 'You are a little smelly.'
	elseif pcs_sweat > 19:
		$stat_sweat_msg = 'You''re sweating.'
	elseif pcs_sweat > 9 and deodorant_on = 1:
		$stat_sweat_msg = 'You feel fresh with your deodorant.'
	elseif arrsize('sparrvol') = 0:
		$stat_sweat_msg = 'You are sparkling clean.'
	elseif deodorant_on = 1:
		$stat_sweat_msg = 'You feel fresh with your deodorant on.'
	else
		$stat_sweat_msg = ''
	end
end

if body_write > 1 and face_write = 0:
	$stat_writing_msg = 'Your body is inscribed with derogatory graffiti.'
elseif body_write = 1 and face_write = 0:
	$stat_writing_msg = 'Your body has an obscene message written on it.'
elseif body_write = 0 and face_write > 1:
	$stat_writing_msg = 'Your face is covered in obscene writing.'
elseif body_write = 0 and face_write = 1:
	$stat_writing_msg = 'Your face has a humiliating label written on it.'
elseif body_write > 0 and face_write > 0:
	$stat_writing_msg = 'Your body and face are covered in obscene graffiti.'
else
	$stat_writing_msg = ''
end

if pcs_energy < 5:
	$stat_hunger_msg = 'You feel faint from hunger, if you don''t have something to eat very soon, you will pass out.'
	$stat_hunger_tooltip = 'You feel faint from hunger.'
elseif pcs_energy < 10:
	$stat_hunger_msg = 'You are starving, you really need to have something to eat.'
	$stat_hunger_tooltip = 'You are starving.'
elseif pcs_energy < 20:
	$stat_hunger_msg = 'You are very hungry and struggle to concentrate on anything other than food.'
	$stat_hunger_tooltip = 'You are very hungry.'
elseif pcs_energy < 30:
	$stat_hunger_msg = 'You feel peckish, and your thoughts sometimes drift towards food.'
	$stat_hunger_tooltip = 'You feel peckish.'
else
	$stat_hunger_msg = ''
end

if pcs_hydra < 5:
	$stat_thirst_msg = 'You feel light-headed, if you don''t have something to drink very soon, you will pass out.'
	$stat_thirst_tooltip = 'You feel light-headed.'
elseif pcs_hydra < 10:
	$stat_thirst_msg = 'You are dehydrated, you really need to have something to drink.'
	$stat_thirst_tooltip = 'You are dehydrated.'
elseif pcs_hydra < 20:
	$stat_thirst_msg = 'You are thirsty, and your dry throat is irritating and distracting you.'
	$stat_thirst_tooltip = 'You are thirsty.'
elseif pcs_hydra < 30:
	$stat_thirst_msg = 'You feel a little thirsty, and your mouth is a little dry.'
	$stat_thirst_tooltip = 'You feel a little thirsty.'
else
	$stat_thirst_msg = ''
end

if pcs_sleep < 5:
	$stat_sleep_msg = 'You can''t keep your eyes open, if you don''t go to bed now, you will fall asleep right here.'
	$stat_sleep_tooltip = 'You can''t keep your eyes open.'
elseif pcs_sleep < 10:
	$stat_sleep_msg = 'You are exhausted, you really need to go to bed soon.'
	$stat_sleep_tooltip = 'You are exhausted.'
elseif pcs_sleep < 20:
	$stat_sleep_msg = 'You are tired and you are struggling to concentrate.'
	$stat_sleep_tooltip = 'You are tired.'
elseif pcs_sleep < 30:
	$stat_sleep_msg = 'You feel a little tired.'
	$stat_sleep_tooltip = 'You feel a little tired.'
else
	$stat_sleep_msg = ''
end

if pcs_condition['lack_of_sleep'] >= 20:
	$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.'
	$stat_lack_of_sleep_tooltip = 'You are not getting enough sleep at all.'
elseif pcs_condition['lack_of_sleep'] >= 10:
	$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.'
	$stat_lack_of_sleep_tooltip = 'You are not getting enough sleep.'
elseif pcs_condition['lack_of_sleep'] >= 5:
	$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.'
	$stat_lack_of_sleep_tooltip = 'You are not getting enough sleep.'
elseif pcs_condition['lack_of_sleep'] >= 2:
	$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.'
	$stat_lack_of_sleep_tooltip = 'You are not sleeping as much as you should.'
else
	$stat_lack_of_sleep_msg = ''
end

if mc_inventory['contraceptive_pill'] = 0 and pillsleft[ptype] = 0:
	$stat_out_of_birth_control_msg = 'You need to buy more birth control pills'
end


if daystart = policeQW_courthearing_dates[0] - 1:
	$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.'
	$stat_court_tooltip = 'Court hearing tomorrow (07:00 and 11:00).'
elseif daystart = policeQW_courthearing_dates[0] and hour < 11:
	$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.'
	$stat_court_tooltip = 'Court hearing today (07:00 - 11:00).'
else
	$stat_court_msg = ''
end

if policeQW['legal_fine'] > 0:
	$stat_fines_msg = 'You have outstanding fines totalling ₽<<policeQW[''legal_fine'']>> and you have <<policeQW[''fine_deadline'']-daystart>> days left to pay them. You can settle your debt at the post office.'
	$stat_fines_tooltip = ''
else
	$stat_fines_msg = ''
	$stat_fines_tooltip = ''

end


killvar '$stat_hypno_msg'
killvar '$stat_hypno_tooltip'
if hypnoAddict > 0:
	if hypnoWithdrawal = 2:
		if missCum >= timeTresh:
			$stat_hypno_msg = 'You want some sperm inside of you NOW! You have to talk to your therapist, immediately.'
			$stat_hypno_tooltip = 'You have to talk to your therapist, immediately.'
		else
			$stat_hypno_msg = 'You need to talk to your therapist. You feel unbalanced without your sessions.'
			$stat_hypno_tooltip = 'You feel unbalanced without your sessions.'
		end
	elseif hypnoWithdrawal = 1:
		if missCum >= timeTresh:
			$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.'
			$stat_hypno_tooltip = 'You should talk to your therapist.'
		else
			$stat_hypno_msg = 'You feel like talking to your therapist. You miss your sessions.'
			$stat_hypno_tooltip = 'You miss your sessions.'
		end
	elseif missCum > 0:
		$stat_hypno_msg = 'You miss the feeling of sperm in your body, and you feel moody.'
		$stat_hypno_tooltip = 'You feel moody for some reason.'
	end
end

if hypnoHair > 0 and (pcs_pubes > 3 or pcs_leghair > 3):
	if $stat_hypno_msg ! '':
		$stat_hypno_msg += '<br>'
		$stat_hypno_tooltip += '<br>'
	end

	if pcs_pubes > 3 and pcs_leghair > 3:
		$stat_hypno_msg += 'Your legs and pubic mound feel rough to the touch, lowering your mood.'
	elseif pcs_pubes > 3:
		$stat_hypno_msg += 'Your pubic mound feels rough to the touch, lowering your mood.'
	else
		$stat_hypno_msg += 'Your legs feel rough to the touch, lowering your mood.'
	end
	$stat_hypno_tooltip += 'You should shave.'
end

if hypnoSchedule = 1:
	if therapist_weekly_block = 0 and week = 4 and therapistday ! daystart:
		if $stat_hypno_msg ! '':
			$stat_hypno_msg += '<br>'
			$stat_hypno_tooltip += '<br>'
		end
		if hour < 18:
			$stat_hypno_msg += 'You have a meeting scheduled with your therapist today at 18:00.'
			$stat_hypno_tooltip += 'Session at 18:00!'
		elseif hour < 19 and hour > 18:
			$stat_hypno_msg += 'You have a meeting scheduled with your therapist right now.'
			$stat_hypno_tooltip += 'Session right now!'
		end
	end
end

if frost > 0 and frost < 6:
	$stat_frost_msg = 'You are a little chilly.'
elseif frost > 0 and frost < 11:
	$stat_frost_msg = 'You are cold.'
elseif frost > 0:
	$stat_frost_msg = 'You are freezing.'
else
	$stat_frost_msg = ''
end

if sick = 1:
	$stat_sick_tooltip = 'You have a mild cold.'
	$stat_sick_msg = 'This is not good, a tickle in the throat and a little runny nose.'
elseif sick > 0 and sick < 24:
	$stat_sick_tooltip = 'You have a cold.'
	$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.'
elseif sick > 0 and sick < 48:
	$stat_sick_tooltip = 'You have a serious cold.'
	$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.'
elseif sick > 0 and sick < 72:
	$stat_sick_tooltip = 'You have the flu.'
	$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.'
elseif sick > 0:
	$stat_sick_tooltip = 'You are seriously sick.'
	$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.'
else
	$stat_sick_msg = ''
end

if SchoolBlock = 0:
	if week = 1:
		$stat_school_schedule = ' Today you have the following lessons math, russian, literature, art, biology and P.E.'
	elseif week = 2:
		$stat_school_schedule = ' Today you have the following lessons english, geography, science, shop, computer, music.'
	elseif week = 3:
		$stat_school_schedule = ' Today you have the following lessons math, russian, biology, history, computer and P.E.'
	elseif week = 4:
		$stat_school_schedule = ' Today you have the following lessons english, geography, science, shop, computer and music.'
	elseif week = 5:
		$stat_school_schedule = ' Today you have the following lessons math, russian, literature, art, history and P.E.'
	else
		$stat_school_schedule = ''
	end

	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and hour < 9:
		$stat_school_msg = 'You have to be at school before 07:55 if you don''t want to be late.'
		$stat_school_tooltip = 'School starts at 07:55.'
	elseif mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour < 9 and detention_set = 1 and SchoolAtestat = 0:
		$stat_school_msg = 'You have detention this morning and must be at school before 09:00.'
		$stat_school_tooltip = 'Detention starts at 09:00.'
	else
		$stat_school_msg = ''
		$stat_school_icon_msg = ''
	end
	if $stat_school_msg ! '': $stat_school_icon_msg = $stat_school_msg + $stat_school_schedule
end

if university['student'] = 1:

	if university['semester_week'] = -1:
		$stat_uni_msg = 'Your next semester at the university starts next week. Classes will be Monday to Thursday starting at 9:00.'
		$stat_uni_tooltip = 'Your next semester at the university starts next week.'
	elseif university['semester_week'] > 0 and week < 5 and hour < 9 and uni_period['first'] ! daystart:
		$stat_uni_msg = 'You have classes at the university today, the first class starts at 9:00.'
		$stat_uni_tooltip = 'First class today is at 9:00.'
	elseif university['semester_week'] > 0 and week < 5 and hour < 11 and uni_period['second'] ! daystart:
		$stat_uni_msg = 'You have classes at the university today, the next class starts at 11:00.'
		$stat_uni_tooltip = 'Next class today is at 11:00.'
	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'] ! '':
		$stat_uni_msg = 'You have elective class at the university today, it starts at 13:15.'
		$stat_uni_tooltip = 'Your elective clas today is at 13:15.'
	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'] ! '':
		$stat_uni_msg = 'You have elective class at the university today, it starts at 13:15.'
		$stat_uni_tooltip = 'Your elective clas today is at 13:15.'
	elseif university['semester_week'] > 0 and week = 3 and (hour < 13 or (hour = 13 and minut < 15)) and uni_period['third'] ! daystart:
		$stat_uni_msg = 'You have classes at the university today, the last class starts at 13:15.'
		$stat_uni_tooltip = 'Last class today is at 13:15.'
	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'] ! '':
		$stat_uni_msg = 'You have elective class at the university today, it starts at 13:15.'
		$stat_uni_tooltip = 'Your elective class today is at 13:15.'
	elseif university['exam_week'] = 1 and week < 4:
		$stat_uni_msg = 'You have exams at the university this week and the next . Your first exam is Thursdy this week at 9:00.'
		$stat_uni_tooltip = 'First week of exams.'
	elseif university['exam_week'] = 1 and week = 4 and hour < 9:
		$stat_uni_msg = 'You have exams at the university this week and the next . Your first exam is today 9:00.'
		$stat_uni_tooltip = 'First week of exams.'
	elseif university['exam_week'] = 1:
		$stat_uni_msg = 'You have no more exams this week. Your next exam will be Tuesday next week at 9:00.'
		$stat_uni_tooltip = 'First week of exams.'
	elseif university['exam_week'] = 2 and week < 2:
		$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.'
		$stat_uni_tooltip = 'Second week of exams.'
	elseif university['exam_week'] = 2 and week < 2 and hour < 9:
		$stat_uni_msg = 'This is the last week of exams at the university this semester. Your next exam will be today at 9:00.'
		$stat_uni_tooltip = 'Second week of exams.'
	elseif university['exam_week'] = 2 and week < 4:
		$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.'
		$stat_uni_tooltip = 'Second week of exams.'
	elseif university['exam_week'] = 2 and week < 4 and hour < 9:
		$stat_uni_msg = 'This is the last week of exams at the university this semester. Your last exam will be today at 9:00.'
		$stat_uni_tooltip = 'Second week of exams.'
	elseif university['exam_week'] = 2:
		$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.'
		$stat_uni_tooltip = 'Second week of exams.'
	elseif university['enrolled_in_semester'] = university['semester_passed'] and university['semester_passed'] < 8:
		$stat_uni_msg = 'Your need to register for your next semester before it starts at the university administration.'
		$stat_uni_tooltip = 'Your need to register for your next semester.'
	else
		$stat_uni_msg = ''
		$stat_uni_icon_msg = ''
	end
	if $stat_uni_msg ! '': $stat_uni_icon_msg = $stat_uni_msg
end

if ml_guitarlesson['nextlesson'] = daystart and hour < 15:
	$stat_musiclesson_msg = 'You have a guitar lesson scheduled for 1500 at the Community Hall.'
	$stat_musiclesson_tip = 'Guitar lesson day.'
else
	$stat_musiclesson_msg = ''
	$stat_musiclesson_tip = ''
end

if yearstart > 1 and nerd_game['game_day'] = daystart and hour < 19:
	$stat_game_night_msg = 'Game night starts tonight at 18:00 at the Coffee Hole'
	$stat_game_night_tooltip = 'Nerd Game Night'
elseif yearstart <= 1 and nerd_game['game_day'] = daystart and hour < 21:
	$stat_game_night_msg = 'Game night starts tonight at 20:00 at the Community Center'
	$stat_game_night_tooltip = 'Nerd Game Night'
else
	$stat_game_night_msg = ''
	$stat_game_night_tooltip = ''
end




	!!==============================================================================!!
	!!                                                                              !!
	!!                                   CLOTHING                                   !!
	!!                                                                              !!
	!!==============================================================================!!


!!--------------- BRAS ---------------!!
$stat_bra_msg = ''
$stat_bra_text = ''

if $clothingworntype ! 'nude':
	if $braworntype ! 'none':
		if PCloThinness = 6:
			$stat_bra_text = '<br><font color = #FF0000><<$stat_bra_msg>></font>'
			$stat_bra_msg = 'Your bra is clearly showing through your transparent top.'
		else
			$stat_bra_text = '<br><font color = #0064FF><<$stat_bra_msg>></font>'
			if PCloThinness = 5 and $braworntype ! 'none':
				$stat_bra_msg = 'The outline of your bra is visible through your <<iif(PCloDress = 1, ''dress'', ''top'')>>.'
			elseif CloTopCut = 4 and $braworntype ! 'none':
				$stat_bra_msg = 'Parts of your bra are visible due to your <<iif(PCloDress = 1, ''dress'', ''top'')>>''s cut.'
			elseif CloTopCut = 3 and $braworntype ! 'none':
				$stat_bra_msg = 'Some glimpses of your bra are visible due to your plunging neckline.'
			end
		end
	else
		$stat_bra_text = '<br><font color = #AB052A><<$stat_bra_msg>></font>'
		if PCloBra = 1:
			$stat_bra_msg = 'Your top is replacing your bra.'
		elseif pcs_horny >= 50:
			$stat_bra_msg = 'You are not wearing a bra and your aroused nipples are rock-hard.'
		elseif temper < 14:
			$stat_bra_msg = 'You are not wearing a bra and your nipples are freezing cold.'
		else
			if pcs_cupsize <= 5:
				$stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts feel comfortable against the inside of your clothes.'
	!!			$titsize = 'AA cup'
			elseif pcs_cupsize <= 10:
				$stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts ever so slightly bounce as you walk.'
	!!			$titsize = 'A cup'
			elseif pcs_cupsize <= 15:
				$stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts jiggle softly as you walk.'
	!!			$titsize = 'B cup'
			elseif pcs_cupsize <= 20:
				$stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts bounce with every step.'
	!!			$titsize = 'C cup'
			elseif pcs_cupsize <= 30:
				$stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts bounce with every step.'
	!!			$titsize = 'E cup'
			else
				$stat_bra_msg = 'You are not wearing a bra and your <<$pcdesc_breasts>> breasts bounce dramatically with every step.'
	!!			$titsize = 'K cup'
			end
		end
	end

	if PCloCoverTop = 4:
		$stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are completely exposed.'
		$stat_bra_text = '<br><font color = #FF0000><<$stat_bra_msg>></font>'
	elseif PCloCoverTop = 3:
		$stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are clearly visible through your clothing.'
		$stat_bra_text = '<br><font color = #FF0000><<$stat_bra_msg>></font>'
	elseif PCloCoverTop = 2:
		$stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are visible through your clothing.'
		$stat_bra_text = '<br><font color = #FF0000><<$stat_bra_msg>></font>'
	elseif PCloCoverTop = 1:
		$stat_bra_msg = 'Your <<$pcdesc_breasts>> breasts are barely visible through your clothing.'
		$stat_bra_text = '<br><font color = #0064FF><<$stat_bra_msg>></font>'
	end
end

!!--------------- PANTIES ---------------!!
$stat_panty_msg = ''
$stat_panty_text = ''

if $clothingworntype ! 'nude':
	if PCloThinness = 6:
		if $pantyworntype ! 'none':
			if PCloSkirt = 6:
				$stat_panty_msg = 'Your dress is so short that your panties are clearly visible.'
			elseif PCloSkirt = 5:
				$stat_panty_msg = 'Your <<iif(PCloDress = 1, ''dress'', ''skirt'')>> is short and transparent so anyone can see your panties.'
			else
				$stat_panty_msg = 'Your panties are clearly showing through your transparent <<iif(PCloDress = 1, ''dress'', iif(PCloSkirt > 0, ''skirt'', ''pants''))>>.'
			end

			$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
		end
	elseif PCloThinness = 5:
		if $pantyworntype ! 'none':
			if PCloSkirt = 6:
				$stat_panty_msg = 'Your <<iif(PCloDress = 1, ''dress'', ''skirt'')>> is so short that your panties are clearly visible.'
				$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
			elseif PCloSkirt = 5:
				$stat_panty_msg = 'The outline of your panties can be seen and often exposed by your short <<iif(PCloDress = 1, ''dress'', ''skirt'')>>.'
				$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
			elseif PCloPants = 6:
				$stat_panty_msg = 'Your short shorts expose your panties and are so thin the outline of the rest of your panties can be seen.'
				$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
			else
				$stat_panty_msg = 'The outline of your panties is visible through your <<iif(PCloDress = 1, ''dress'', iif(PCloSkirt > 0, ''skirt'', ''pants''))>>.'
				$stat_panty_text = '<br><font color = #0064FF><<$stat_panty_msg>></font>'
			end
		end
	elseif PCloSkirt = 6:
		$stat_panty_msg = 'Your dress is so short that your panties clearly visible.'
		$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
	elseif PCloPants = 6:
		$stat_panty_msg = 'Your short shorts expose your panties.'
		$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
	elseif PCloSkirt = 5:
		$stat_panty_msg = 'Your dress is short and your panties can often be seen.'
		$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
	elseif PCloSkirt = 4:
		$stat_panty_msg = 'Your dress is short enough that and your panties can be seen when you bend over.'
		$stat_panty_text = '<br><font color = #0064FF><<$stat_panty_msg>></font>'
	end

	if PCloPanties = 1:
		$stat_panty_msg = 'Your outfit is replacing your panties.'
		$stat_panty_text = '<br><font color = #AB052A><<$stat_panty_msg>></font>'
	elseif $pantyworntype = 'none':
		$stat_panty_msg = 'You are not wearing panties.'
		if pcs_inhib < 30:
			$stat_panty_text = '<br><font color = #FF0000><<$stat_panty_msg>></font>'
		elseif pcs_inhib < 70:
			$stat_panty_text = '<br><font color = #0064FF><<$stat_panty_msg>></font>'
		else
			$stat_panty_text = '<br><font color = #AB052A><<$stat_panty_msg>></font>'
		end
	end

	if PCloCoverFront > 0 and PCloCoverBack > 0:
		$temp_sdp_text[1] = 'barely visible'
		$temp_sdp_text[2] = 'visible'
		$temp_sdp_text[3] = 'clearly visible'
		$temp_sdp_text[4] = 'completely exposed'
		if PCloCoverFront = PCloCoverBack:
			$stat_panty_msg = 'Your pussy and your butt are <<$temp_sdp_text[PCloCoverFront]>> through your clothing.'
		else
			$stat_panty_msg = 'Your pussy is <<$temp_sdp_text[PCloCoverFront]>> and your butt is <<$temp_sdp_text[PCloCoverBack]>> through your clothing.'
		end

		$stat_panty_text = '<br><font color = <<iif(PCloCoverFront = 1, ''#0064FF'', ''#FF0000'')>>><<$stat_panty_msg>></font>'
		killvar '$temp_sdp_text'
	end
end

!!--------------- CLOTHING ---------------!!
$stat_clothes_msg = ''
$stat_clothes_text = ''

if $clothingworntype = 'nude':
	$stat_clothes_style = 'nude'
	if $pantyworntype ! 'none':
		if PanThinness >= 5:
			if $braworntype = 'none':
				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your see-through panties, and your boobs sway invitingly as you walk.</font>'
				$stat_clothes_tooltip = 'You are wearing your see-through panties.'
				$stat_clothes_msg = 'You are only wearing your see-through panties, and your boobs sway invitingly as you walk.'
			elseif BraThinness >= 5:
				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your see-through underwear.</font>'
				$stat_clothes_tooltip = 'You are wearing your see-through underwear.'
				$stat_clothes_msg = 'You are only wearing your see-through underwear.'
			else
				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your see-through panties and bra.</font>'
				$stat_clothes_tooltip = 'You are wearing your see-through panties and a regular bra.'
				$stat_clothes_msg = 'You are only wearing your see-through panties and a regular bra.'
			end
		else
			if $braworntype = 'none':
				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your panties, and your boobs sway invitingly as you walk.</font>'
				$stat_clothes_tooltip = 'You are wearing your panties.'
				$stat_clothes_msg = 'You are only wearing your panties, and your boobs sway invitingly as you walk.'
			elseif BraThinness >= 5:
				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your see-through bra and panties.</font>'
				$stat_clothes_tooltip = 'You are wearing your see-through bra and panties.'
				$stat_clothes_msg = 'You are only wearing your see-through bra and panties.'
			else
				$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your underwear.</font>'
				$stat_clothes_tooltip = 'You are wearing your underwear.'
				$stat_clothes_msg = 'You are wearing your underwear.'
			end
		end
	elseif $braworntype ! 'none':
		$stat_clothes_text = '<br><font color = #AB052A>You are only wearing your bra, leaving your pussy and ass completely exposed.</font>'
		$stat_clothes_tooltip = 'You are only wearing your bra.'
		$stat_clothes_msg = 'You are only wearing your bra, leaving your pussy and ass completely exposed.'
	else
		if pcs_inhib < 5:
			$stat_clothes_text = '<br><b><font color = #AB052A>You are completely naked, and it makes you feel nervous and ashamed.</font></b>'
			$stat_clothes_tooltip = 'You don''t like being naked.'
			$stat_clothes_msg = 'You are completely naked, and it makes you feel nervous and ashamed.'
		elseif pcs_inhib < 20:
			$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>'
			$stat_clothes_tooltip = 'It''s a bit exciting to be naked.'
			$stat_clothes_msg = 'You are completely naked. You''re not too comfortable with nudity, but it is a little exciting.'
		elseif pcs_inhib >= 90:
			$stat_clothes_text = '<br><b><font color=#0064FF>You are completely naked, which is far better than having to wear clothes.</font></b>'
			$stat_clothes_tooltip = 'Being naked is far better than wearing clothes.'
			$stat_clothes_msg = 'You are completely naked, which is far better than having to wear clothes.'
		else
			$stat_clothes_text = '<br><b><font color = #FF00FF>You are completely naked. It''s exciting, and you feel tingly inside.</font></b>'
			$stat_clothes_tooltip = 'It''s exciting to be naked.'
			$stat_clothes_msg = 'You are completely naked. It''s exciting, and you feel tingly inside.'
		end
	end
elseif $clothingworntype = 'misc_outfits' and clothingwornnumber = '1':
	!!Difficult
	$stat_clothes_text = '<br><b><font color = "yellow">You are wearing an old hessian sack the hunters gave you.</font></b>'
	$stat_clothes_tooltip = 'You''re wearing a hessian sack.'
	$stat_clothes_msg = 'You are wearing an old hessian sack the hunters gave you.'
	$stat_clothes_style = 'clothes'
else
	$stat_clothes_msg = 'You''re wearing '

	if PCloStyle2 = 6:
		$temp_clo_base_pf = 'a'
		$temp_clo_type = 'gym outfit'
		$stat_clothes_style = 'exercise'
	elseif PCloswimwear = 1:
		$temp_clo_base_pf = 'a'
		$temp_clo_type = 'swimsuit'
		$stat_clothes_style = 'swimsuit'
	elseif PCloStyle2 = 5:
		$temp_clo_base_pf = 'an'
		$temp_clo_type = 'office dress'
		$stat_clothes_style = 'office'
	elseif PCloStyle2 = 4:
		$temp_clo_base_pf = 'a'
		$temp_clo_type = 'school uniform'
		$stat_clothes_style = 'uniform'
	else
		$temp_clo_base_pf = 'an'
		$temp_clo_type = 'outfit'
		$stat_clothes_style = 'clothes'
	end

	killvar '$temp_clo_style'
	killvar '$temp_clo_suffix'
	killvar '$temp_tooltip'
	killvar '$temp_stat_clothes_msg'
	$temp_stat_clothes_text_color = ''

	if PCloStyle = 4:
		$temp_stat_clothes_msg[1] = '<<$temp_clo_base_pf>> <<$temp_clo_type>>'
		$temp_clo_suffix[4] = 'prostitute'
		$temp_tooltip[5] = 'Prostitute'
		$temp_clo_style[0] += 'p'
	elseif PCloInhibit >= 40 or PCloThinness = 6:
		$temp_stat_clothes_msg[0] += 'an exhibitionist <<$temp_clo_type>>'
		$temp_clo_suffix[3] = 'exhibitionist'
		$temp_tooltip[1] = 'Exhibitionist'
		$temp_clo_style[0] += 'e'
	end

	if PCloBimbo = 1 and cheatVars['bimbo'] = 0:
		$temp_stat_clothes_msg[1] = '<<$temp_clo_base_pf>> <<$temp_clo_type>>'
		$temp_clo_suffix[0] = 'bimbo'
		$temp_tooltip[2] = 'Bimbo'
		$temp_clo_style[1] += 'b'
		$temp_stat_clothes_text_color = '#FF00FF'
	end

	if PCloGoth = 1:
		$temp_stat_clothes_msg[3] = '<<$temp_clo_base_pf>> <<$temp_clo_type>>'
		$temp_clo_suffix[1] = 'goth'
		$temp_tooltip[2] = 'Goth'
	end

	if PCloPunk = 1:
		$temp_stat_clothes_msg[3] = '<<$temp_clo_base_pf>> <<$temp_clo_type>>'
		$temp_clo_suffix[2] = 'punk'
		$temp_tooltip[3] = 'Punk'
	end

	if PCloInhibit < 20:
		$temp_stat_clothes_msg[4] += 'a normal <<$temp_clo_type>>'
		$temp_tooltip[0] = 'Normal'
	elseif PCloInhibit < 25:
		$temp_stat_clothes_msg[2] += 'a slightly revealing <<$temp_clo_type>>'
		$temp_tooltip[0] = 'Slightly revealing <<$temp_clo_type>>'
		$temp_clo_style[2] = 's'
	elseif PCloInhibit < 30:
		$temp_stat_clothes_msg[2] += 'a revealing <<$temp_clo_type>>'
		$temp_tooltip[0] = 'Revealing <<$temp_clo_type>>'
		$temp_clo_style[2] = 's'
	else
		$temp_stat_clothes_msg[2] += 'a very revealing <<$temp_clo_type>>'
		$temp_tooltip[0] = 'Very revealing <<$temp_clo_type>>'
		$temp_clo_style[2] = 's'
	end


	temp_sd_i = 0
	temp_sd_max_i = 4
	:temp_stat_msg_loop1
		if $temp_stat_clothes_msg[temp_sd_i] ! '':
			$stat_clothes_msg += $temp_stat_clothes_msg[temp_sd_i]
			jump 'temp_stat_msg_loop1_esc'
		end
		temp_sd_i += 1
	if temp_sd_i <= temp_sd_max_i: jump 'temp_stat_msg_loop1'
	:temp_stat_msg_loop1_esc

	$stat_clothes_tooltip = ''
	if arrsize('$temp_tooltip') = 1:
		$stat_clothes_tooltip = '<<$temp_tooltip[0]>> <<$temp_clo_type>>.'
	elseif arrsize('$temp_tooltip') > 1:
		temp_sd_i = 1
		temp_sd_max_i = 5
		:tooltip_loop1
			if $temp_tooltip[temp_sd_i] ! '':
				if $stat_clothes_tooltip ! '': $stat_clothes_tooltip += '/'
				$stat_clothes_tooltip += $temp_tooltip[temp_sd_i]
			end
			temp_sd_i += 1
		if temp_sd_i <= temp_sd_max_i: jump 'tooltip_loop1'
		$stat_clothes_tooltip += ' <<$temp_clo_type>>.'
	end

	if arrsize('$temp_clo_suffix') = 0:
		$stat_clothes_msg += '.'
	else
		$stat_clothes_msg += ' a'
		temp_sd_i = 0
		temp_sd_max_i = 4
		:clo_suffix_loop1
			if $temp_clo_suffix[temp_sd_i] ! '' and $temp_clo_suffix[temp_sd_i] ! 'exhibitionist':
				$stat_clothes_msg += ' <<$temp_clo_suffix[temp_sd_i]>>'
			end
			temp_sd_i += 1
		if temp_sd_i <= temp_sd_max_i: jump 'clo_suffix_loop1'
		$stat_clothes_msg += ' would wear.'
	end

	if $temp_clo_style[0] ! '' or $temp_clo_style[1] ! '':
		$stat_clothes_style += '_' + $temp_clo_style[0] + $temp_clo_style[1]
	elseif $temp_clo_style[2] ! '':
		$stat_clothes_style += '_' + $temp_clo_style[2]
	end


	killvar '$temp_clo_style'
	killvar '$temp_tooltip'
	killvar '$temp_stat_clothes_msg'
	killvar 'temp_sd_i'
	killvar 'temp_sd_max_i'
	killvar '$temp_clo_base_pf'
end


if arrsize('$temp_clo_suffix') > 0:
	$stat_clothes_text = '<br>'

	if $temp_stat_clothes_text_color ! '': $stat_clothes_text += '<font color = <<$temp_stat_clothes_text_color>>>'
	$stat_clothes_text += 'You are wearing a'

	temp_sd_comma_flag = 0
	temp_sd_exhib_flag = 1
	temp_sd_i = 0
	temp_sd_max_i = 4
	:clo_suffix_loop2
		if $temp_clo_suffix[temp_sd_i] ! '':
			if mid($temp_clo_suffix[temp_sd_i], 1, 1) = 'e': $stat_clothes_text += 'n'
			temp_sd_exhib_flag = 0
			if temp_sd_comma_flag = 0:
				temp_sd_comma_flag = 1
				$stat_clothes_text += ' <<$temp_clo_suffix[temp_sd_i]>>'
			else
				$stat_clothes_text += ', <<$temp_clo_suffix[temp_sd_i]>>'
			end
		end
		temp_sd_i += 1
	if temp_sd_i <= temp_sd_max_i: jump 'clo_suffix_loop2'
	$stat_clothes_text += ' <<$temp_clo_type>>'
	if $temp_stat_clothes_text_color ! '': $stat_clothes_text += '</font>'

	killvar 'temp_sd_comma_flag'
	killvar 'temp_sd_exhib_flag'
end


killvar '$temp_sd_shoe_text'
killvar '$temp_sd_mu_text'
killvar '$temp_sd_tot_text'

if PCloBimbo = 1:
	if PShoBimbo = 1:
		$temp_sd_shoe_text[0] = 'bimbo'
		if pcs_makeup = 6:
			$temp_sd_mu_text[0] = 'bimbo'
			$temp_sd_tot_text[0] = 'bimbo'
			bimbo_flag = 1
		end
	end
end
if PCloGoth = 1:
	if PShoGoth = 1:
		$temp_sd_shoe_text[1] = 'goth'
		if pcs_makeup = 7:
			$temp_sd_mu_text[1] = 'goth'
			$temp_sd_tot_text[1] = 'goth'
			goth_flag = 1
		end
	end
end
if PCloPunk = 1:
	if PShoPunk = 1:
		$temp_sd_shoe_text[2] = 'punk'
		if pcs_makeup >= 1 and pcs_makeup <= 2:
			$temp_sd_mu_text[2] = iif(pcs_makeup = 1, 'no', 'punk')
			$temp_sd_tot_text[2] = 'punk'
			punk_flag = 1
		end
	end
end

if arrsize('$temp_sd_shoe_text') = 0:
	$stat_clothes_text += '.'
else
	if $temp_stat_clothes_text_color ! '': $stat_clothes_text += '<font color = <<$temp_stat_clothes_text_color>>>'
	if arrsize('$temp_sd_mu_text') = 0:
		$stat_clothes_text += ' and'
	else
		$stat_clothes_text += ','
	end
	temp_sd_i = 0
	temp_sd_max_i = 2
	:stat_clothes_text_loop1
		if $temp_sd_shoe_text[temp_sd_i] ! '':
			$stat_clothes_text += ' <<$temp_sd_shoe_text[temp_sd_i]>>'
		end
		temp_sd_i += 1
	if temp_sd_i <= temp_sd_max_i: jump 'stat_clothes_text_loop1'
	$stat_clothes_text += ' shoes'

	if arrsize('$temp_sd_mu_text') > 0:
		$stat_clothes_text += ' and'
		temp_sd_i = 0
		temp_sd_max_i = 2
		:stat_clothes_text_loop2
			if $temp_sd_mu_text[temp_sd_i] ! '':
				$stat_clothes_text += ' <<$temp_sd_mu_text[temp_sd_i]>>'
			end
			temp_sd_i += 1
		if temp_sd_i <= temp_sd_max_i: jump 'stat_clothes_text_loop2'
		$stat_clothes_text += ' make up'
	end
	$stat_clothes_text += '.'

	if $temp_stat_clothes_text_color ! '': $stat_clothes_text += '</font>'

	if arrsize('$temp_sd_tot_text') > 0:
		$stat_clothes_text += '<br>'
		if $temp_stat_clothes_text_color ! '': $stat_clothes_text += '<font color = <<$temp_stat_clothes_text_color>>>'
		$stat_clothes_text += 'You look like a'
		temp_sd_i = 0
		temp_sd_max_i = 2
		:stat_clothes_text_loop3
			if $temp_sd_tot_text[temp_sd_i] ! '':
				$stat_clothes_text += ' <<$temp_sd_tot_text[temp_sd_i]>>'
			end
			temp_sd_i += 1
		if temp_sd_i <= temp_sd_max_i: jump 'stat_clothes_text_loop3'

		$stat_clothes_text += '.'
		if $temp_stat_clothes_text_color ! '': $stat_clothes_text += '</font>'
	end
end


$stat_img_temp = func('$body_image','clothes')
$stat_clothes_msg += '<br><img src="<<$stat_img_temp>>">'

killvar '$temp_clo_base_pf'
killvar '$temp_clo_type'
killvar '$temp_sd_shoe_text'
killvar '$temp_sd_mu_text'
killvar '$temp_sd_tot_text'
killvar '$temp_stat_clothes_text_color'

!!--------------- END OF CLOTHES ---------------


gs 'cum_manage', 'cum_stat_display'

$stat_bfgf_msg_0 = ''
$stat_bfgf_tooltip_0 = ''
$stat_bfgf_msg_1 = ''
$stat_bfgf_tooltip_1 = ''
$stat_bfgf_msg_2 = ''
$stat_bfgf_tooltip_2 = ''

if hour < meethour[0] and svidanie[0] = 1:
	$stat_bfgf_msg_0 = '<<$loverdesc[0]>> will be waiting for you near <<$streetev_home>> at <<meethour[0]>>:00.'
	$stat_bfgf_tooltip_0 = 'Your date with <<$loverdesc[0]>> starts at <<meethour[0]>>:00 near <<$streetev_home>>.'
elseif hour = meethour[0] and svidanie[0] = 1:
	$stat_bfgf_msg_0 = '<<$loverdesc[0]>> is waiting for you by <<$streetev_home>>.'
	$stat_bfgf_tooltip_0 = '<<$loverdesc[0]>> is waiting near <<$streetev_home>>.'
elseif meetday[0] < daystart and svidanie[0] = 1:
	pcs_lovers_rel[0] -= 10 & svidanie[0] = 0
end

if hour < meethour[1] and svidanie[1] = 1:
	$stat_bfgf_msg_1 = '<<$loverdesc[1]>> will be waiting for you near <<$streetev_home>> at <<meethour[1]>>:00.'
	$stat_bfgf_tooltip_1 = 'Your date with <<$loverdesc[1]>> starts at <<meethour[1]>>:00 near <<$streetev_home>>.'
elseif hour = meethour[1] and svidanie[1] = 1:
	$stat_bfgf_msg_1 = '<<$loverdesc[1]>> is waiting for you by <<$streetev_home>>.'
	$stat_bfgf_tooltip_1 = '<<$loverdesc[1]>> is waiting near <<$streetev_home>>.'
elseif meetday[1] < daystart and svidanie[1] = 1:
	pcs_lovers_rel[1] -= 10 & svidanie[1] = 0
end

if hour < meethour[2] and svidanie[2] = 1:
	$stat_bfgf_msg_2 = '<<$loverdesc[2]>> will be waiting for you near <<$streetev_home>> at <<meethour[2]>>:00.'
	$stat_bfgf_tooltip_2 = 'Your date starts at <<meethour[2]>>:00 near <<$streetev_home>>.'
elseif hour = meethour[2] and svidanie[2] = 1:
	$stat_bfgf_msg_2 = '<<$loverdesc[2]>> is waiting for you by <<$streetev_home>>.'
	$stat_bfgf_tooltip_2 = '<<$loverdesc[2]>> is waiting near <<$streetev_home>>.'
elseif meetday[2] < daystart and svidanie[2] = 1:
	pcs_lovers_rel[2] -= 10 & svidanie[2] = 0
end

!!---------------- Messages for Icons/Texts (End)----------------------------

! if pornstack > 0:
! 	porndays = 0
! 	:pfilmtime
! 	if porndays < 200 and pfilmday[porndays] = 0: porndays += 1 & jump 'pfilmtime'
! end

!!-----------------Status Icons (Start)------------------

if cheatStatusIcons ! 0:
	$stat_msg += '<br>'
else

	$stat_msg += '<br><br>'

	!!Row 1: Appearance

	$statusIconBarTab = '<table><tr>'

	$stat_hotcat_msg = 'People would rate your appearance as a <<pcs_hotcat>> out of 10.<br><img src="<<func(''$face_image'')>>">'
	$statusIconBarTab += '<td><a href="exec: msg $stat_hotcat_msg"><img title="You are a <<pcs_hotcat>> out of 10." height = <<set_siconht>> src="images/system/icons/status/appearance.png"></a></td>'

	if pcs_makeup = 1 and mc_inventory['travel_mirror'] > 0 and mc_inventory['travel_makeup'] > 0 and menu_off = 0:
		$statusIconBarTab += '<td><a href="exec: minut += 3 & gs ''exp_gain'', ''makupskl'', rand(1,3) & pcs_makeup = 2 & mc_inventory[''travel_makeup''] -= 1 & gs ''stat''"><img title="<<$pcs_makeup_tooltip>> Click to put on light makeup." height = <<set_siconht>> src="images/system/icons/status/makeup_'+pcs_makeup+'.png"></a></td>'
	elseif pcs_makeup < 5:
		$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>'
	elseif pcs_makeup >= 5:
		$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>'
	end

	$stat_brush_msg = 'Your hair is <<$pcs_hairbsh>>.'
	if pcs_hairbsh <> 1 and mc_inventory['comb'] > 0 and menu_off = 0:
		$statusIconBarTab += '<td><a href="exec: minut += min(15, max(1, pcs_hairlng / 80)) & pcs_hairbsh = 1 & gs ''stat''"><img title="<<$stat_brush_msg>> Click to brush. It would take about <<min(15, max(1, pcs_hairlng / 80))>> minutes." height = <<set_siconht>> src="images/system/icons/status/hair_0.png"></a></td>'
	else
		$statusIconBarTab += '<td><a href="exec: msg $stat_brush_msg"><img title="<<$stat_brush_msg>>" height = <<set_siconht>> src="images/system/icons/status/hair_'+max(0, pcs_hairbsh)+'.png"></a></td>'
	end

	if pcs_lipbalm > 0:
		$stat_lipbalm_msg = 'Your lips are covered in moisturizing balm.'
		$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>'
	end

	if false_lashes >= 1:
		$stat_lashes_msg = 'You''re wearing false'+iif(pcs_lashes = 4, ' mink ', ' ')+'lashes.'
		$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>'
	end

	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>'

	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>'

	if pcs_leghair > 3 or (pubestyle > 0 and pcs_pubes >= shave_trigger):
		if (pubestyle > 0 and pcs_pubes >= shave_trigger):
			$stat_shave_msg = 'You need to shave your'+iif(pcs_leghair > 3, ' legs and ', ' ')+'pussy.'
		elseif pcs_leghair > 3:
			$stat_shave_msg = 'You need to shave your legs.'
		end
		$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>'
	end

	$statusIconBarTab += '</tr><tr>'

	!!Row 2: Mood, Arousal, Hunger, Thirst, Health without STDs...

	willpower_percent = (100 * pcs_willpwr)/willpowermax
	if willpower_percent > 60:
		$stat_willpower_msg = 'You feel confident and in control. You still have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
		$stat_willpower_tooltip = 'You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
		$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>'
	elseif willpower_percent > 30:
		$stat_willpower_msg = 'You feel like you have less control over yourself than usual. You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower left.'
		$stat_willpower_tooltip = 'You have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
		$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>'
	else
		$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.'
		$stat_willpower_tooltip = 'You only have <<pcs_willpwr>> (<<willpower_percent>>%) of your willpower.'
		$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>'
	end

	if pcs_mood >= 80:
		$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>'
	elseif pcs_mood >= 60:
		$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>'
	elseif pcs_mood >= 40:
		$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>'
	elseif pcs_mood >= 20:
		$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>'
	elseif pcs_mood >= 5:
		$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>'
	else
		$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>'
	end

	if mood_trauma > 0:
		mood_max_calc = max(10, mood_max)
		$stat_trauma_msg = 'Recent events have lowered your maximum mood to <<mood_max_calc>>.'
		$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>'
		killvar 'mood_max_calc'
	end

	if menu_off = 0:
		if pain['total'] > 90:
			$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>'
		elseif pain['total'] > 60:
			$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>'
		elseif pain['total'] > 30:
			$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>'
		end
	else
		if pain['total'] > 90:
			$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>'
		elseif pain['total'] > 60:
			$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>'
		elseif pain['total'] > 30:
			$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>'
		end
	end

	if pcs_horny > 90:
		$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>'
	elseif pcs_horny > 60:
		$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>'
	elseif pcs_horny > 30:
		$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>'
	end

	if cheatVars['hunger'] = 0 and $stat_hunger_msg ! '':
		if mc_inventory['food_sandwich'] = 0:
			$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>'
		elseif mc_inventory['food_sandwich'] = 1 and menu_off = 0:
			$statusIconBarTab += '<td><a href="exec: mc_inventory[''food_sandwich''] = 0 & pcs_energy += 40 & cumspclnt = 2 & gs ''cum_cleanup'' & fat += 1 & gs ''stat''"><img title="Click to eat your sandwich." height = <<set_siconht>> src="images/system/icons/status/need_food.png"></a></td>'
		elseif mc_inventory['food_sandwich'] = 1 and menu_off = 1:
			$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>'
		end
	end

	if cheatVars['thirst'] = 0 and $stat_thirst_msg ! '':
		if mc_inventory['food_water'] = 0 and mc_inventory['refill_bottle_water'] = 0:
			$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>'
		elseif mc_inventory['refill_bottle_water'] > 0 and menu_off = 0:
			$statusIconBarTab += '<td><a href="exec: mc_inventory[''refill_bottle_water''] -= 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>'
		elseif mc_inventory['food_water'] > 0 and menu_off = 0:
			$statusIconBarTab += '<td><a href="exec: mc_inventory[''food_water''] = 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>'
		elseif (mc_inventory['food_water'] > 0 or mc_inventory['refill_bottle_water'] > 0) and menu_off = 1:
			$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>'
		end
	end

	if cheatVars['sleep'] = 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>'

	$statusIconBarTab += '</tr><tr>'

	!!Row 3: Pregnancy, cum, lactation, STD...

	if menu_off = 0 and cheatVars['no_periods'] = 0:
		$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>'
	elseif menu_off = 1 and cheatVars['no_periods'] = 0:
		$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>'
	end

	if menu_off = 0 and birth_control['remind_icon'] = 1:
		if mc_inventory['contraceptive_pill'] = 0 and pillsleft[ptype] = 0:
			$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>'
		else
			$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>'
		end
	elseif menu_off = 1 and birth_control['remind_icon'] = 1:
		$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>'
	end

	if mesec > 0 and isprok = 0 and isprokp = 0:
		$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.', '.')
		$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>'
	elseif mesec > 0 and (isprok > 0 or isprokp > 0):
		$stat_bleed_msg = 'You''re using feminine hygiene products.'
		$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>'
	elseif placebopart > 0 and LutH > 0 and knowpreg = 0:
		$stat_bleed_msg = 'Your period is due to start soon.'
		$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>'
!!TMI				elseif implant_day > 0 and ((daystart - implant_day) * 24 + hour - implant_hour) < 5:
!!pregnancy spoiler		$stat_bleed_msg = 'You feel a slight twinge in your abdomen.'
!!				$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>'
	elseif thinkpreg = 0 and knowpreg = 0 and cycle ! 6 and pillcon2 <= 30000 and succubusflag ! 1 and cheatVars['no_periods'] = 0 and mesec = 0:
		if abortionbirthdate = 0 and daystart - daylastperiod > 28:
			if (daystart - daylastperiod > 28) and (daystart - daylastperiod <= 35):
				$stat_bleed_msg = 'Your period is late by <<daystart - daylastperiod - 28>> days.'
			elseif (daystart - daylastperiod > 35) and (daystart - daylastperiod <= 42):
				$stat_bleed_msg = 'Your period is late by more than a week!'
			elseif (daystart - daylastperiod > 42) and (daystart - daylastperiod <= 56):
				$stat_bleed_msg = 'Your period is late by more than two weeks! Maybe you should see a doctor?'
			elseif (daystart - daylastperiod > 56) and (daystart - daylastperiod <= 84):
				$stat_bleed_msg = 'Your period is late by more than a month! You really should see a doctor about it.'
			elseif daystart - daylastperiod > 84:
				$stat_bleed_msg = 'You should consider the possibility of a pregnancy, since apparently you no longer have periods.'
			end
			$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>'
		elseif abortionbirthdate ! 0 and daystart - abortionbirthdate <= 26:
			if daystart - abortionbirthdate <= 13:
				$stat_bleed_msg = 'You are still in your recovery period. Nothing to worry about.'
			elseif daystart - abortionbirthdate > 13 and daystart - abortionbirthdate <= 16:
				$stat_bleed_msg = 'You are maybe still in your recovery period, but there could be a risk.'
			elseif daystart - abortionbirthdate > 16 and daystart - abortionbirthdate <= 21:
				$stat_bleed_msg = 'You should have recovered from you abortion by know... Right?'
			elseif daystart - abortionbirthdate > 21 and daystart - abortionbirthdate <= 26:
				$stat_bleed_msg = 'You should have definitely recovered from your abortion by now.'
			end
			$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>'
		elseif pregbirthdate ! 0 and daystart - pregbirthdate <= 80:
			if daystart - pregbirthdate <= 41:
				$stat_bleed_msg = 'You are still in your recovery period. Nothing to worry about.'
			elseif daystart - pregbirthdate > 41 and daystart - pregbirthdate <= 48:
				$stat_bleed_msg = 'You are probably still in your recovery period.'
			elseif daystart - pregbirthdate > 48 and daystart - pregbirthdate <= 55:
				$stat_bleed_msg = 'You are maybe still in your recovery period, but there could be a risk.'
			elseif daystart - pregbirthdate > 55 and daystart - pregbirthdate <= 70:
				$stat_bleed_msg = 'You should have recovered by know... Right?'
			elseif daystart - pregbirthdate > 70 and daystart - pregbirthdate <= 80:
				$stat_bleed_msg = 'You should have definitely recovered from giving birth by now.'
			end
			$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>'
		end
	elseif preg = 1:
		if thinkpreg = 1 and knowpreg = 0:
			$stat_preg_msg = 'You think you''re pregnant, but aren''t sure.'
			$stat_preg_tooltip = 'I think I''m pregnant.'
		elseif knowpreg = 1:
			$stat_preg_tooltip = 'I''m pregnant.'
			$stat_preg_msg = 'You are pregnant. Your due date is around <<$pregduedate>>.'
			$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>'
		end
	elseif preg = 2:
		$stat_preg_msg = 'Broken water and contractions, it''s pretty clear what is going on. You need to get to a hospital ASAP.'
		$stat_preg_tooltip = 'Go to the hospital, ASAP! You''re in labour!'
		$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>'
	end

	gs 'lact_lib','breast_stat_icons'

	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>'

	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>'

	if pcs_traits['cumeater'] = 1 and cheatVars['no_trait_cumeater'] = 0 and $stat_cum_msg ! '' and $stat_cum_msg ! 'Your mouth has the tangy aftertaste of sperm.':
		if menu_off = 1:
			$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>'
		else
			if cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0 or cumloc[9] > 0 or cumloc[10] > 0 or  cumloc[11] > 0 or cumloc[13] > 0 or  cumloc[14] > 0 or cumloc[16] > 0:
				$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>'
			elseif FUNC('Cum_Manage', 'check_private') = 1 and (cumloc[1] + cumloc[4] > 0 or FUNC('Cum_Manage', 'check_innards', 0) = 1 or FUNC('Cum_Manage', 'check_innards', 3) = 1) or (FUNC('Cum_Manage', 'check_private', 15) = 1 and cumloc[15] > 0) :
				$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>'
			else
				$statusIconBarTab += '<td><a href="exec: msg $stat_private_msg"><img title="<<$stat_private_msg>>" height = <<set_siconht>> src="images/system/icons/status/cum_eater.png"></a></td>'
			end
		end
	end

	if mc_inventory['makeup_wipes'] > 0 and $stat_cum_msg ! '' and $stat_cum_msg ! 'Your mouth has the tangy aftertaste of sperm.':
		if menu_off = 1:
			$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>'
		else
			if cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0 or cumloc[9] > 0 or cumloc[10] > 0 or  cumloc[11] > 0 or cumloc[13] > 0 or  cumloc[14] > 0 or cumloc[16] > 0:
				$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>'
			elseif FUNC('Cum_Manage', 'check_private') = 1 and (cumloc[1] + cumloc[4] > 0 or FUNC('Cum_Manage', 'check_innards', 0) = 1 or FUNC('Cum_Manage', 'check_innards', 3) = 1) or (FUNC('Cum_Manage', 'check_private', 15) = 1 and cumloc[15] > 0) :
				$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>'
			else
				$statusIconBarTab += '<td><a href="exec: msg $stat_private_msg"><img title="<<$stat_private_msg>>" height = <<set_siconht>> src="images/system/icons/status/wipes.png"></a></td>'
			end
		end
	end

	stat_STD_count = 0
	$stat_STD_msg = ''

	if Gerpes >= 10 and GenHerpes = 1:
		stat_STD_count += 1
		$stat_STD_msg += 'Sores have appeared on your vagina. You have genital herpes.'
	elseif Gerpes >= 5 and GenHerpes = 1:
		stat_STD_count += 1
		$stat_STD_msg += 'Your vagina is red and very itchy. You have genital herpes.'
	elseif Gerpes >= 3 and Orerpes = 1:
		stat_STD_count += 1
		$stat_STD_msg += 'You have cold sores on your lips. You have oral herpes.'
	end
	if Gerpes >= 20 and GenHerpes = 1:
		stat_STD_count += 1
		if stat_STD_count > 1: $stat_STD_msg += '<br>'
		$stat_STD_msg += 'The herpes sores also cover your ass.'
	end
	if Sifilis >= 50:
		stat_STD_count += 1
		if stat_STD_count > 1: $stat_STD_msg += '<br>'
		$stat_STD_msg += 'Syphilitic rashes cover your whole body.'
	elseif Sifilis >= 21:
		stat_STD_count += 1
		if stat_STD_count > 1: $stat_STD_msg += '<br>'
		$stat_STD_msg += 'You have a single large, hard sore on the lip. You have syphilis.'
	end
	if Triper > 2:
		stat_STD_count += 1
		if stat_STD_count > 1: $stat_STD_msg += '<br>'
		$stat_STD_msg += 'It stings when you''re urinating. You have gonorrhea.'
	end
	if Kandidoz > 30:
		stat_STD_count += 1
		if stat_STD_count > 1: $stat_STD_msg += '<br>'
		$stat_STD_msg += 'There''s a white discharge coming from your vagina. You have yeast infection.'
	end

	if stat_STD_count > 0:
		$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.'
		$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>'
	end

	if $stat_lack_of_sleep_msg ! '':
		if pcs_condition['lack_of_sleep'] >= 20:
			$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>'
		elseif pcs_condition['lack_of_sleep'] >= 10:
			$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>'
		elseif pcs_condition['lack_of_sleep'] >= 5:
			$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>'
		elseif pcs_condition['lack_of_sleep'] >= 2:
			$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>'
		end
	end

	$statusIconBarTab += '</tr><tr>'

	!!Row 4: Status, Jobs, School


	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>'
	if gothlevel > 0: $statusIconBarTab += '<td><a href="exec: msg $gothstatus"><img title="<<$goth_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/goth.png"></a></td>'
	if punklevel > 0: $statusIconBarTab += '<td><a href="exec: msg $punkstatus"><img title="<<$punk_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/punk.png"></a></td>'



	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>'

	if succubusflag = 1 and succhungry > 0:
		$stat_succ_msg = 'You have needed to feed for <<succhungry>> day'+iif(succhungry > 1, 's.', '.')
		$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>'
	end

	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>'
	if $stat_fines_msg ! '': $statusIconBarTab += '<td><a href="exec: msg $stat_fines_msg"><img title="<<$stat_fines_tooltip>>" height = <<set_siconht>> src="images/system/icons/status/court.png"></a></td>'

	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>'

	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>'

	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>'

	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>'

	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>'

	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>'

	if job_check ! daystart:
		!! Restrict to calling check to once a day
		job_check = daystart
		!! set job_start and job_end variables using week variable for jobs that are tracked.
		gs 'emp_functions', 'job_alert'
	end
	if work > 0 and  hour < job_end:
		!! jclose and $jumploc are used to set landing pages in journal.
		$statusIconBarTab += '<td><a href="exec: jclose = 1 & $jumploc = ''worktab'' & gt ''journal_work'', ''start''"><img title="You have a job. Click to find out more." height = <<set_siconht>> src="images/system/icons/status/work.png"></a></td>'
	end
	if masseuse['jobtype'] > 0:
		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):
			$stat_masseuse_msg = 'You work at the beauty salon today, at '
			if masseuse['<<week>>_shift_1'] = 1 and hour <= 9:
				$stat_masseuse_msg += '9:00, '
			end
			if masseuse['<<week>>_shift_2'] = 1 and hour <= 13:
				$stat_masseuse_msg += '13:00, '
			end
			if masseuse['<<week>>_shift_3'] = 1 and hour < 17:
				$stat_masseuse_msg += '17:00, '
			end
			$stat_masseuse_msg += 'and you have worked <<masseuse[''shifts_worked'']>> of the required <<masseuse[''shifts_required'']>> shifts.'

			$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>'
		end
	end

	if model['icon'] = 1:
		if model_job_week >= 2:
			$stat_model_msg = 'You have no more modeling jobs available this week.'
		elseif model_job_week = 1:
			$stat_model_msg = 'You can get paid for 1 more modeling job this week.'
		elseif model_job_week < 1:
			$stat_model_msg = 'You can get paid for 2 modeling jobs this week.'
		end
		$statusIconBarTab += '<td><a href="exec: msg $stat_model_msg"><img title="<<$stat_model_msg>>" height = <<set_siconht>> src="images/system/icons/status/model_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
	end

	if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and starlets_on = 1:
		if hour > 16 and starlets_practice > 0:
			$stat_starlet_msg = 'You missed practice with the Starlets today!'
		else
			$stat_starlet_msg = 'You must be at Starlets practice between 15:00 and 16:00 today.'
		end
		if (hour < 16 or starlets_missed > 0) and starlets['late_message'] = 0:
			if starlets_missed = 0:
				$statusIconBarTab += '<td><a href="exec: msg $stat_starlet_msg"><img title="<<$stat_starlet_msg>>" height = <<set_siconht>> src="images/system/icons/status/starlets_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
			else
				$statusIconBarTab += '<td><a href="exec: starlets[''late_message''] = 1 & msg $stat_starlet_msg"><img title="<<$stat_starlet_msg>>" height = <<set_siconht>> src="images/system/icons/status/starlets_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
			end
		end
	end

	if volleysostav > 0 and week = 6 and sorevday ! daystart and hour <= 18:
		$stat_volleyball_msg = 'There is volleyball tournament today at 18:00.'
		$statusIconBarTab += '<td><a href="exec: msg $stat_volleyball_msg"><img title="<<$stat_volleyball_msg>>" height = <<set_siconht>> src="images/system/icons/status/volleball'+iif(theme['is_dark'] = 1, '_white', '')+'.png"></a></td>'
	end

	if pfilmNO ! 1:
		if pornstar['icon'] = 1 and pornstar['icon_disable'] ! daystart:
			if hour < 11:
				$stat_porn_msg = 'You are starring in a porno today at 10:00.'
				$statusIconBarTab += '<td><a href="exec: msg $stat_porn_msg"><img title="<<$stat_porn_msg>>" height = <<set_siconht>> src="images/system/icons/status/porn_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'
			elseif hour >= 11 and hour < 13:
				$stat_porn_msg = 'You''re late for your shoot at the porn studio!'
				$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>'
			else
				$stat_porn_msg = 'You missed a scheduled porn shoot!'
				$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>'
			end
		end
	end

	$statusIconBarTab += '</tr><tr>'

	!!Row 5: Clothes,...

	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>'

	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>'

	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>'

	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>'

	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>'

	if $stat_bra_msg ! '' and $braworntype = 'none': $statusIconBarTab += '<td><a href="exec: msg $stat_bra_msg"><img title="<<$stat_bra_msg>>" height = <<set_siconht>> src="images/system/icons/status/boobs_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'

	if $stat_panty_msg ! '' and $pantyworntype ! 'none' and pcs_traits['commando_lvl'] < 3:
		$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>'
	elseif $stat_panty_msg ! '' and $pantyworntype ! 'none' and pcs_traits['commando_lvl'] = 3:
		$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>'
	end

	if $stat_panty_msg ! '' and $pantyworntype = 'none' and PCloPanties ! 1: $statusIconBarTab += '<td><a href="exec: msg $stat_panty_msg"><img title="<<$stat_panty_msg>>" height = <<set_siconht>> src="images/system/icons/status/commando_'+iif(theme['is_dark'] = 1, 'white', 'black')+'.png"></a></td>'



	if analplugIN = 1 and vibratorin = 0:
		$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>'
	elseif analplugIN = 0 and vibratorin = 1:
		$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>'
	elseif analplugIN = 1 and vibratorin = 1:
		$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>'
	end

	$statusIconBarTab += '</tr><tr>'

	!!Row 5: Drugs and other short term stuff

	if mc_inventory['cigarettes'] > 0:
		$stat_smoker_msg = 'You have <<mc_inventory[''cigarettes'']>> cigarette' + iif(mc_inventory['cigarettes'] = 1, '', 's') + iif(drugVars['cigarettes_need'] > 0 and cheatVars['drugs_immune'] = 0, ' and you want to smoke.' , '.')
		$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>'
	end

	if drugVars['cigarettes_used'] >= 20 and cheatVars['drugs_immune'] = 0 and drugVars['cigarettes_need'] > 20 and mc_inventory['cigarettes'] > 0:
		$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>'
	elseif drugVars['cigarettes_used'] >= 20 and cheatVars['drugs_immune'] = 0 and drugVars['cigarettes_need'] > 20 and mc_inventory['cigarettes'] <= 0:
		$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>'
	elseif mc_inventory['cigarettes'] > 0:
		$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>'
	end

	if drugVars['cocaine_day'] ! daystart and drugVars['cocaine_addict'] = 1 and drugVars['heroin_need'] > 0:
		$stat_drug_msg += 'You need heroin and cocaine.'
	elseif drugVars['cocaine_day'] ! daystart and drugVars['cocaine_addict'] = 1 and drugVars['heroin_need'] <= 0:
		$stat_drug_msg += 'You need cocaine.'
	elseif drugVars['heroin_need'] > 0:
		$stat_drug_msg += 'You need heroin.'
	else
		$stat_drug_msg = ''
	end

	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>'

	if alko > 0:
		if alko = 1:
			$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>'
		elseif alko < 4:
			$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>'
		elseif alko < 6:
			$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>'
		elseif alko < 10:
			$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>'
		else
			$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>'
		end
	end

	if drugVars['mentats_dose'] >= 1: $statusIconBarTab += '<td><a href="exec: msg ''You feel sharp and focused.''"><img title="You feel sharp and focused." height = <<set_siconht>> src="images/system/icons/status/drugs.png"></a></td>'

	if drugVars['aphrodisiac_timer'] > 0: $statusIconBarTab +='<td><a href="exec: msg ''You are feeling hot, and every move causes your groin to tingle.''"><img title="You are feeling hot." height = <<set_siconht>> src="images/system/icons/status/aphro_gum.png"></a></td>'

	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>'

	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>'

	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>'

	if drugVars['breastcream_dose'] = 1: $statusIconBarTab += '<td><a href="exec: msg ''Your breasts feel hot and tingly.''"><img title="Your breasts feel hot and tingly." height = <<set_siconht>> src="images/system/icons/status/breast_cream.png"></a></td>'

	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>'

	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>'

	$statusIconBarTab += '</tr></table>'
	$stat_msg += func('cleanHTML',$statusIconBarTab)
	killvar '$statusIconBarTab'
end

!!-----------------Status Icons (End)------------------

!!----------------Stat Display, start--------------------------
$stat_tool_msg=''
$stat_extra_msg=''

if cheatStatusIcons = 1:
	$stat_tool_msg += '<a href="exec: cheatStatusIcons = 0 & gs ''$menu_obnovit''">▽Icons</a> '
else
	$stat_tool_msg += '<a href="exec: cheatStatusIcons = 1 & gs ''$menu_obnovit''">▲Icons</a> '
end

if enable_show_status = 0:
	$stat_tool_msg += '<a href="exec: enable_show_status = 1 & gs ''$menu_obnovit''">▲Status</a> '
else
	$stat_tool_msg += '<a href="exec: enable_show_status = 0 & gs ''$menu_obnovit''">▽Status</a> '
end

if enable_show_status = 0:
	if ETOmenu = 1:
		$stat_extra_msg += '<br><b><<$pcs_health>></b>'
		$stat_extra_msg += '<br><b><<$pcs_willpwr>></b>'
		if cheatVars['hunger'] = 0: $stat_extra_msg += '<br><b><<$pcs_energy>></b>'
		if cheatVars['thirst'] = 0: $stat_extra_msg += '<br><b><<$pcs_hydra>></b>'
		if cheatVars['sleep'] = 0: $stat_extra_msg += '<br><b><<$pcs_sleep>></b>'
	elseif Enable_scalepic = 0:
		! <font color="<<$fcolor>>">
		$stat_extra_msg += '<table cellpadding="1" cellspacing="0" width="200">'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 2, pcs_horny, pcs_horny)+'</td><td>&nbsp;Arousal</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 2, pain['total'], pain['total'], pain['damage'])+'</td><td>&nbsp;Pain</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_health * 100 / healthmax, pcs_health)+'</td><td>&nbsp;Health</td></tr>'
		if $start_type[1] ! 'nomagic': $stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_mana * 100 / manamax, pcs_mana)+'</td><td>&nbsp;Mana</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_willpwr * 100 / willpowermax, pcs_willpwr)+'</td><td>&nbsp;Willpower</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_stam * 100 / stammax, pcs_stam)+'</td><td>&nbsp;Stamina</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_mood, pcs_mood)+'</td><td>&nbsp;Mood</td></tr>'
		if cheatVars['hunger'] = 0: $stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_energy, pcs_energy)+'</td><td>&nbsp;Hunger</td></tr>'
		if cheatVars['thirst'] = 0: $stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_hydra, pcs_hydra)+'</td><td>&nbsp;Thirst</td></tr>'
		if cheatVars['sleep'] = 0: $stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_sleep, pcs_sleep)+'</td><td>&nbsp;Sleep</td></tr>'
		$stat_extra_msg += '</table>'
		! </font>
	else
		gs 'indik', '2', pcs_horny, pcs_horny
		$stat_extra_msg += '<br><<$ind>> Arousal'

		gs 'indik', '2', pain['total'], pain['total'], pain['damage']
		$stat_extra_msg += '<br><<$ind>> Pain'

		gs 'indik', '1', pcs_health * 100 / healthmax, pcs_health
		$stat_extra_msg += '<br><<$ind>> Health'

		if $start_type[1] ! 'nomagic':
			gs 'indik', '1', pcs_mana * 100 / manamax, pcs_mana
			$stat_extra_msg += '<br><<$ind>> Mana'
		end

		gs 'indik', '1', pcs_willpwr * 100 / willpowermax, pcs_willpwr
		$stat_extra_msg += '<br><<$ind>> Willpower'

		gs 'indik', '1', pcs_stam * 100 / stammax, pcs_stam
		$stat_extra_msg += '<br><<$ind>> Stamina'

		gs 'indik', '1', pcs_mood, pcs_mood
		$stat_extra_msg += '<br><<$ind>> Mood'

		if cheatVars['hunger'] = 0:
			gs 'indik', '1', pcs_energy, pcs_energy
			$stat_extra_msg += '<br><<$ind>> Hunger'
		end

		if cheatVars['thirst'] = 0:
			gs 'indik', '1', pcs_hydra, pcs_hydra
			$stat_extra_msg += '<br><<$ind>> Thirst'
		end

		if cheatVars['sleep'] = 0:
			gs 'indik', '1', pcs_sleep, pcs_sleep
			$stat_extra_msg += '<br><<$ind>> Sleep'
		end
	end
end

!!----------------Extra messages, start--------------------------

!!----------------▽Attributes--------------------------
if Enable_showattr = 0:
	$stat_tool_msg += '<a href="exec: Enable_showattr = 1 & gs ''$menu_obnovit''">▽Attributes</a>'
else
	$stat_tool_msg += '<a href="exec: Enable_showattr = 0 & gs ''$menu_obnovit''">▲Attributes</a>'
	!skip if this is first message
	if $stat_extra_msg ! '': $stat_extra_msg += '<br><a href="exec: Enable_showattr = 0 & gs ''$menu_obnovit''">▲Attributes:</a>'
	if Enable_scalepic = 0:
		! <font color="<<$fcolor>>">
		$stat_extra_msg += '<table cellpadding="1" cellspacing="0" width="200">'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, 100 - pcs_inhib, 100 - pcs_inhib)+'</td><td>&nbsp;Inhibition</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_stren, pcs_stren)+'</td><td>&nbsp;Strength</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_agil, pcs_agil)+'</td><td>&nbsp;Agility</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_vital, pcs_vital)+'</td><td>&nbsp;Endurance</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_intel, pcs_intel)+'</td><td>&nbsp;Intelligence</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_sprt, pcs_sprt)+'</td><td>&nbsp;Spirit</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_react, pcs_react)+'</td><td>&nbsp;Reaction</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_chrsm, pcs_chrsm)+'</td><td>&nbsp;Charisma</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_prcptn, pcs_prcptn)+'</td><td>&nbsp;Perception</td></tr>'
		if $start_type[1] ! 'nomagic': $stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_magik, pcs_magik)+'</td><td>&nbsp;Magic</td></tr>'
		if succubusflag = 1: $stat_extra_msg += '<tr><td>'+func('indiktab', 1, sucexcess, sucexcess)+'</td><td>&nbsp;Succubus Energy</td></tr>'
		$stat_extra_msg += '<tr><td>'+func('indiktab', 1, pcs_apprnc / 2, pcs_apprnc)+'</td><td>&nbsp;Attractiveness</td></tr>'
		$stat_extra_msg += '</table>'
		! </font>
	else
		gs 'indik', '1', 100 - pcs_inhib, 100 - pcs_inhib
		$stat_extra_msg += '<br><<$ind>> Inhibition'
		gs 'indik', '1', pcs_stren, pcs_stren
		$stat_extra_msg += '<br><<$ind>> Strength'
		gs 'indik', '1', pcs_agil, pcs_agil
		$stat_extra_msg += '<br><<$ind>> Agility'
		gs 'indik', '1', pcs_vital, pcs_vital
		$stat_extra_msg += '<br><<$ind>> Endurance'
		gs 'indik', '1', pcs_intel, pcs_intel
		$stat_extra_msg += '<br><<$ind>> Intelligence'
		gs 'indik', '1', pcs_sprt, pcs_sprt
		$stat_extra_msg += '<br><<$ind>> Spirit'
		gs 'indik', '1', pcs_react, pcs_react
		$stat_extra_msg += '<br><<$ind>> Reaction'
		gs 'indik', '1', pcs_chrsm, pcs_chrsm
		$stat_extra_msg += '<br><<$ind>> Charisma'
		gs 'indik', '1', pcs_prcptn, pcs_prcptn
		$stat_extra_msg += '<br><<$ind>> Perception'
		if $start_type[1] ! 'nomagic':
			gs 'indik', '1', pcs_magik, pcs_magik
			$stat_extra_msg += '<br><<$ind>> Magic'
			if succubusflag = 1:
				gs 'indik', '1', sucexcess, sucexcess
				$stat_extra_msg += '<br><<$ind>> Succubus energy'
			end
		end
		gs 'indik', '1', pcs_apprnc / 2, pcs_apprnc
		$stat_extra_msg += '<br><<$ind>> Attractiveness'

		$stat_extra_msg += '<br>'
	end
end

!!----------------▽Skills--------------------------

if Enable_showskill = 0:
	$stat_tool_msg += ' <a href="exec: Enable_showskill = 1 & gs ''$menu_obnovit''">▽Skills</a>'
else
	$stat_tool_msg += ' <a href="exec: Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills</a>'
	!!----------------------▲Skills display------------------------
	$stat_sktool_msg=''
	st_count=0
	$show_table=''
	!!----------------Mental skills--------------------------
	if Enable_show_mental_skill = 0:
		$stat_sktool_msg += ' <a href="exec: Enable_show_mental_skill = 1 & gs ''$menu_obnovit''">◇Mental</a>'
	else
		$stat_sktool_msg += ' <a href="exec: Enable_show_mental_skill = 0 & gs ''$menu_obnovit''">◆Mental</a>'
		if pcs_splcstng > 0 and $start_type[1] ! 'nomagic': gs 'show_table', '<<pcs_splcstng>> Spell Casting', '2'
		if pcs_humint > 0: gs 'show_table', '<<pcs_humint>> People skills', '2'
		if pcs_persuas > 0: gs 'show_table', '<<pcs_persuas>> Persuasion', '2'
		if pcs_observ > 0: gs 'show_table', '<<pcs_observ>> Observation', '2'
	end

	!!-----------------Sport skills--------------------------
	if Enable_show_sport_skill = 0:
		$stat_sktool_msg += ' <a href="exec: Enable_show_sport_skill = 1 & gs ''$menu_obnovit''">◇Sport</a>'
	else
		$stat_sktool_msg += ' <a href="exec: Enable_show_sport_skill = 0 & gs ''$menu_obnovit''">◆Sport</a>'
		if pcs_jab > 0: gs 'show_table', '<<pcs_jab>> Jabs', '2'
		if pcs_punch > 0: gs 'show_table', '<<pcs_punch>> Power Strikes', '2'
		if pcs_kick > 0: gs 'show_table', '<<pcs_kick>> Kicks', '2'
		if pcs_def > 0: gs 'show_table', '<<pcs_def>> Defence', '2'
		if pcs_run > 0: gs 'show_table', '<<pcs_run>> Running', '2'
		if pcs_vball > 0: gs 'show_table', '<<pcs_vball>> Volleyball', '2'
		if pcs_ftbll > 0: gs 'show_table', '<<pcs_ftbll>> Football', '2'
		if pcs_wrstlng > 0: gs 'show_table', '<<pcs_wrstlng>> Wrestling', '2'
		if pcs_shoot > 0: gs 'show_table', '<<pcs_shoot>> Marksmanship', '2'
		if pcs_bushcraft > 0: gs 'show_table', '<<pcs_bushcraft>> Bushcraft', '2'
		if pcs_chess > 0: gs 'show_table', '<<pcs_chess>> Chess', '2'
		if pcs_icesktng > 0: gs 'show_table', '<<pcs_icesktng>> Ice Skating', '2'
		if pcs_gaming > 0: gs 'show_table', '<<pcs_gaming>> Gaming', '2'
		if pcs_pool > 0: gs 'show_table', '<<pcs_pool>> Pool', '2'
	end

	!!-----------------Beauty/Modelling skills---------------
	if Enable_show_beauty_skill = 0:
		$stat_sktool_msg += ' <a href="exec: Enable_show_beauty_skill = 1 & gs ''$menu_obnovit''">◇Beauty</a>'
	else
		$stat_sktool_msg += ' <a href="exec: Enable_show_beauty_skill = 0 & gs ''$menu_obnovit''">◆Beauty</a>'
		if pcs_makupskl > 0: gs 'show_table', '<<pcs_makupskl>> Makeup Skill', '2'
		if pcs_danc > 0: gs 'show_table', '<<pcs_danc>> Modern Dancing', '2'
		if pcs_dancero > 0: gs 'show_table', '<<pcs_dancero>> Erotic Dancing', '2'
		if pcs_dancpol > 0: gs 'show_table', '<<pcs_dancpol>> Pole Dancing', '2'
		if pcs_cheer > 0: gs 'show_table', '<<pcs_cheer>> Cheerleading', '2'
		if pcs_mdlng > 0: gs 'show_table', '<<pcs_mdlng>> Modelling', '2'
		if pcs_heels > 0: gs 'show_table', '<<pcs_heels>> Heels', '2'
	end
	if SMTV_commercial = daystart + 1: $stat_msg += '<br><b><i>Aurora Talent Agency</i> commercial shoot scheduled tomorrow at 10:00!</b>'
	if hour <= 11 and SMTV_commercial = daystart: $stat_msg += '<br><b><i>Aurora Talent Agency</i> commercial shoot in the city center at 10:00!</b>'

	!!---------------------Artistic skills-------------------
	if Enable_show_art_skill = 0:
		$stat_sktool_msg += ' <a href="exec: Enable_show_art_skill = 1 & gs ''$menu_obnovit''">◇Artistic</a>'
	else
		$stat_sktool_msg += ' <a href="exec: Enable_show_art_skill = 0 & gs ''$menu_obnovit''">◆Artistic</a>'
		if pcs_vokal > 0: gs 'show_table', '<<pcs_vokal>> Singing', '2'
		if pcs_instrmusic > 0: gs 'show_table', '<<pcs_instrmusic>> Instrumental Music', '2'
		if pcs_photoskl > 0: gs 'show_table', '<<pcs_photoskl>> Photography', '2'
		if pcs_artskls > 0: gs 'show_table', '<<pcs_artskls>> Artistic Skills', '2'
		if pcs_perform > 0: gs 'show_table', '<<pcs_perform>> Performance', '2'
		if pcs_musicprod > 0: gs 'show_table', '<<pcs_musicprod>> Music Production', '2'
	end

	!!----------------------Job skills------------------------
	if Enable_show_job_skill = 0:
		$stat_sktool_msg += ' <a href="exec: Enable_show_job_skill = 1 & gs ''$menu_obnovit''">◇Job</a>'
	else
		$stat_sktool_msg += ' <a href="exec: Enable_show_job_skill = 0 & gs ''$menu_obnovit''">◆Job</a>'
		if pcs_cleaning > 0: gs 'show_table', '<<pcs_cleaning>> Cleaning Skill', '2'
		if pcs_compskl > 0: gs 'show_table', '<<pcs_compskl>> Computer Skill', '2'
		if pcs_comphckng > 0: gs 'show_table', '<<pcs_comphckng>> Hacking', '2'
		if pcs_hndiwrk > 0: gs 'show_table', '<<pcs_hndiwrk>> Handy-work', '2'
		if pcs_sewng > 0: gs 'show_table', '<<pcs_sewng>> Tailoring', '2'
		if pcs_servng > 0: gs 'show_table', '<<pcs_servng>> Serving', '2'
		if pcs_medcn > 0: gs 'show_table', '<<pcs_medcn>> Medicine', '2'
		if workPTU > 1: gs 'show_table','<<teachlevel>> Teacher credibility','2'
	end
	!skip if this is first message
	if $stat_extra_msg ! '':
		$stat_extra_msg += '<br><a href="exec: Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills:</a> <<$stat_sktool_msg>>'
	else
		$stat_extra_msg += '<br><<$stat_sktool_msg>>'
	end
	if st_count > 0 :
		$stat_extra_msg += '<br><table BORDER=1><<$show_table>></tr></table>'
	end
end

killvar 'stat_sktool_msg'
killvar 'stat_skextra_msg'

!!----------------▽relations--------------------------
if Enable_showrelation = 0:
	$stat_tool_msg += ' <a href="exec: Enable_showrelation = 1 & gs ''$menu_obnovit''">▽Relations</a>'
else
	$stat_tool_msg += ' <a href="exec: Enable_showrelation = 0 & gs ''$menu_obnovit''">▲Relations</a>'
	st_count=0
	$show_table=''
	if npc_QW['A192'] > 0:gs 'show_table', 'Nastja: <<npc_QW[''A192'']>>','2'
	if npc_rel['A218'] > 0:gs 'show_table', 'Tanya: <<npc_rel[''A218'']>>','2'
	if npc_rel['A219'] > 0:gs 'show_table', 'Kat: <<npc_rel[''A219'']>>','2'
	if npc_rel['A220'] > 0:gs 'show_table', 'Vika: <<npc_rel[''A220'']>>','2'
	if npc_rel['A93'] > 0:gs 'show_table', 'Ira: <<npc_rel[''A93'']>>','2'
	if npc_rel['A43'] > 0:gs 'show_table', 'Tamara: <<npc_rel[''A43'']>>','2'
	if alla > 0:gs 'show_table', 'Alla: <<alla>>','2'
	if masha > 0:gs 'show_table', 'Masha: <<masha>>','2'
	if npc_rel['A41'] > 0:gs 'show_table', 'Givi Karapetovich: <<npc_rel[''A41'']>>','2'
	if npc_rel['A42'] > 0:gs 'show_table', 'Ashot: <<npc_rel[''A42'']>>','2'
	if npc_rel['A57'] > 0:gs 'show_table', 'Rex: <<npc_rel[''A57'']>>','2'
	if npc_rel['A217'] > 0:gs 'show_table', 'Pavlin: <<npc_rel[''A217''] >>','2'
	if npc_rel['A69'] > 0:gs 'show_table', 'Mikhail Nikolaevich: <<npc_rel[''A69'']>>','2'
	if npc_rel['A89'] > 0:gs 'show_table', 'Eugene: <<npc_rel[''A89'']>>','2'
	if npc_rel['A112'] > 0:gs 'show_table', 'Sergei Shulgin: <<npc_rel[''A112'']>>','2'
	if npc_rel['A11'] > 0:gs 'show_table', 'Vasily Shulgin: <<npc_rel[''A11'']>>','2'
	if huntersAndreiQw > 0:gs 'show_table', 'Hunter Andrei: <<huntersAndreiQw>>','2'
	if huntersSergeiQw > 0:gs 'show_table', 'Hunter Sergei: <<huntersSergeiQw>>','2'
	if huntersIgorQw > 0:gs 'show_table', 'Hunter Igor: <<huntersIgorQw>>','2'
	if pcs_lovers[0] = 1:gs'show_table', 'BF <<$loverdesc[0]>>: <<loverrelation[0]>>','2'
	if pcs_lovers[1] = 1:gs'show_table', 'BF <<$loverdesc[1]>>: <<loverrelation[1]>>','2'
	if pcs_lovers[2] = 1:gs'show_table', 'BF <<$loverdesc[2]>>: <<loverrelation[2]>>','2'
	if mid($start_type,1,2) = 'sg':
		if npc_rel['A29'] > 0:gs 'show_table', 'Mother: <<npc_rel[''A29'']>>','2'
		if npc_rel['A28'] > 0:gs 'show_table', 'Father: <<npc_rel[''A28'']>>','2'
		if npc_rel['A33'] > 0:gs 'show_table', 'Sister: <<npc_rel[''A33'']>>','2'
		if npc_rel['A34'] > 0:gs 'show_table', 'Brother: <<npc_rel[''A34'']>>','2'
	end
	if st_count > 0 :
		!skip if this is first message
		if $stat_extra_msg ! '': $stat_extra_msg += '<br><a href="exec: Enable_showrelation = 0 & gs ''$menu_obnovit''">▲Relations:</a>'
		$stat_extra_msg += '<br><table BORDER=1> <<$show_table>></tr></table>'
	end
end

!!----------------▽image, default to toolbar, can move to top or bottom from setting--------------------------
if Enable_statimg_loc = 0:
	if Enable_showstatimg = 0:
		$stat_tool_msg += ' <a href="exec: Enable_showstatimg = 1 & gs ''$menu_obnovit''">▽Image</a>'
	else
		$stat_tool_msg += ' <a href="exec: Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image</a>'
		!skip if this is first message
		if $stat_extra_msg ! '':
			$stat_extra_msg += '<br><a href="exec: Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image:</a> <<$stat_imgtool_msg>>'
		else
			$stat_extra_msg += '<br><<$stat_imgtool_msg>>'
		end
		$stat_extra_msg += '<br><<$stat_imgextra_msg>>'
	end
end

if enable_extra_msg = 0:
	$stat_tool_msg += ' <a href="exec: enable_extra_msg = 1 & gs ''stat'' ">▽Texts</a>'
else
	$stat_tool_msg += ' <a href="exec: enable_extra_msg = 0 & gs ''stat''">▲Texts</a>'
end

!all end, push back and clean up
$stat_msg += '<br>'
$stat_msg += func('cleanHTML',$stat_tool_msg)
if $stat_extra_msg ! '' : $stat_msg += func('cleanHTML',$stat_extra_msg)
$stat_msg += '<br>'
killvar 'stat_tool_msg'
killvar 'stat_extra_msg'

!!----------------Extra messages, End--------------------------

if enable_extra_msg = 1:
	if opPRE = 0: $stat_msg += '<br><<$pc_descFull[''makeup'']>> and your hair is <<$pcs_hairbsh>>.' & !$stat_msg += '<br>'

	if thinkpreg = 0 and knowpreg = 0 and cycle ! 6 and pillcon2 <= 30000 and succubusflag ! 1 and cheatVars['no_periods'] = 0 and mesec = 0:
		if abortionbirthdate = 0 and daystart - daylastperiod > 28:
			if (daystart - daylastperiod > 28) and (daystart - daylastperiod <= 35):
				$stat_msg += '<br><font color = #AB052A><b>Your period is late by <<daystart - daylastperiod - 28>> days.</b></font>'
			elseif (daystart - daylastperiod > 35) and (daystart - daylastperiod <= 42):
				$stat_msg += '<br><font color = #AB052A><b>Your period is late by more than a week!</b></font>'
			elseif (daystart - daylastperiod > 42) and (daystart - daylastperiod <= 56):
				$stat_msg += '<br><font color = #AB052A><b>Your period is late by more than two weeks! Maybe you should see a doctor?</b></font>'
			elseif (daystart - daylastperiod > 56) and (daystart - daylastperiod <= 84):
				$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>'
			elseif daystart - daylastperiod > 84:
				$stat_msg += '<br><font color = #AB052A><b>You should consider the possibility of a pregnancy, since apparently you no longer have periods.</b></font>'
			end
		!!Recovery period after an abortion is ~14-21 days
		elseif abortionbirthdate ! 0 and daystart - abortionbirthdate <= 13:
			$stat_msg += '<br><font color = #705243><b>You are still in your recovery period. Nothing to worry about.</b></font>'
		elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 13 and daystart - abortionbirthdate <= 16:
			$stat_msg += '<br><font color = #705243><b>You are maybe still in your recovery period, but there could be a risk.</b></font>'
		elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 16 and daystart - abortionbirthdate <= 21:
			$stat_msg += '<br><font color = #820000><b>You should have recovered from you abortion by know... Right?</b></font>'
		elseif abortionbirthdate ! 0 and daystart - abortionbirthdate > 21:
			$stat_msg += '<br><font color = #820000><b>You should have definitely recovered from your abortion by now.</b></font>'
		!!Recovery period after giving birth is ~42-70 days
		elseif pregbirthdate ! 0 and daystart - pregbirthdate <= 41:
			$stat_msg += '<br><font color = #705243><b>You are still in your recovery period. Nothing to worry about.</b></font>'
		elseif pregbirthdate ! 0 and daystart - pregbirthdate > 41 and daystart - pregbirthdate <= 48:
			$stat_msg += '<br><font color = #705243><b>You are probably still in your recovery period.</b></font>'
		elseif pregbirthdate ! 0 and daystart - pregbirthdate > 48 and daystart - pregbirthdate <= 55:
			$stat_msg += '<br><font color = #705243><b>You are maybe still in your recovery period, but there could be a risk.</b></font>'
		elseif pregbirthdate ! 0 and daystart - pregbirthdate > 55 and daystart - pregbirthdate <= 70:
			$stat_msg += '<br><font color = #820000><b>You should have recovered by know... Right?</b></font>'
		elseif pregbirthdate ! 0 and daystart - pregbirthdate > 70:
			$stat_msg += '<br><font color = #820000><b>You should have definitely recovered from giving birth by now.</b></font>'
		end
	end

!!TMI			if implant_day > 0 and ((daystart - implant_day) * 24 + hour - implant_hour) < 5:
!!pregnancy spoiler		$stat_msg += '<br><font color=#AB052A>You feel a slight twinge in your abdomen.</font>'
!!			end

	if mesec > 0:
		$stat_msg += '<br><font color="red">You are currently having your period. '
		if isprok = 0 and isprokp = 0:
			$stat_msg += 'You need to use your feminine hygiene products.'
		elseif isprokp = 1 and $pantyworntype = 'none':
			isprokp = 0
			$stat_msg += 'You need to wear panties to use a sanitary pad.'
		end
		$stat_msg += '</font>'
	elseif placebopart > 0 and LutH > 0 and knowpreg = 0:
		$stat_msg += '<br><font color="red">Your period is due to start soon.</font>'
	end

	if $cycreport_txt ! '' and menu_off = 0 and cheatVars['no_periods'] = 0:
		$stat_msg += '<br><a href="exec: dynamic $d_cycreport_choice"><<$cycreport_txt>></a><br>'
	elseif $cycreport_txt ! '' and menu_off = 1 and cheatVars['no_periods'] = 0:
		$stat_msg += '<br><a href="exec: gs ''obj_din'', ''menu_disabled''"><<$cycreport_txt>></a><br>'
	end

	!!if shame > 0:$stat_msg += '<br><<$shame>>' & $stat_msg += '<br>'

	if $pcs_mood ! '': $stat_msg += '<br><font color="green"><b><<$pcs_mood>></b></font>'
	if drugVars['mentats_dose'] >= 1: $stat_msg += '<br><font color = green>You feel sharp and focused.</font>'
	if drugVars['breastcream_dose'] = 1: $stat_msg += '<br><font color = #DB7093>Your breasts are feeling hot and tingly.</font>'
	if drugVars['aphrodisiac_timer'] > 0: $stat_msg += '<br><font color = #DB7093>You are feeling hot, and every move causes your groin to tingle.</font>'

	if cheatVars['hunger'] = 0 and $stat_hunger_msg ! '' and pcs_energy < 30:
		if pcs_energy < 5:
			$stat_msg += '<br><font color="red"><b><<$stat_hunger_msg>></b></font>'
		elseif pcs_energy < 10:
			$stat_msg += '<br><font color="red"><<$stat_hunger_msg>></font>'
		else
			$stat_msg += '<br><<$stat_hunger_msg>>'
		end
	end

	if cheatVars['thirst'] = 0 and $stat_thirst_msg ! '' and pcs_hydra < 30:
		if pcs_hydra < 5:
			$stat_msg += '<br><font color="red"><b><<$stat_thirst_msg>></b></font>'
		elseif pcs_hydra < 10:
			$stat_msg += '<br><font color="red"><<$stat_thirst_msg>></font>'
		else
			$stat_msg += '<br><<$stat_thirst_msg>>'
		end
	end

	if cheatVars['sleep'] = 0 and $stat_sleep_msg ! '' and pcs_sleep < 30:
		if pcs_sleep < 5:
			$stat_msg += '<br><font color="red"><b><<$stat_sleep_msg>></b></font>'
		elseif pcs_sleep < 10:
			$stat_msg += '<br><font color="red"><<$stat_sleep_msg>></font>'
		else
			$stat_msg += '<br><<$stat_sleep_msg>>'
		end
	end

	if pcs_horny >= 50:
		if pcs_horny < 90 and $pantyworntype ! 'none':
			$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>'
		elseif pcs_horny < 90 and $pantyworntype = 'none':
			$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>'
		elseif $pantyworntype ! 'none':
			$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>'
		else
			$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>'
		end
	end

	if drugVars['cigarettes_used'] >= 20 and cheatVars['drugs_immune'] = 0:
		if drugVars['cigarettes_need'] > 0:
			if mc_inventory['cigarettes'] > 0:
				$stat_msg += '<br><a href="exec: gs ''drugs'',''smoke''"><font color="red"><b>You want to smoke. You have <<mc_inventory[''cigarettes'']>> cigarettes left.</b></font></a><br>'
			else
				$stat_msg += '<br><font color="red"><b>You want to smoke, but you have no cigarettes left.</b></font><br>'
			end
		else
			if mc_inventory['cigarettes'] > 0:
				$stat_msg += '<br><a href="exec: gs ''drugs'',''smoke''"><font color=#0064FF><b>You have <<mc_inventory[''cigarettes'']>> cigarettes left.</b></font></a><br>'
			else
				$stat_msg += '<br><font color=#0064FF><b>You feel like you should get some cigarettes.</b></font><br>'
			end
		end
	elseif mc_inventory['cigarettes'] > 0:
		$stat_msg += '<br><a href="exec: gs ''drugs'',''smoke''"><font color=#0064FF><b>You have <<mc_inventory[''cigarettes'']>> cigarettes.</b></font></a><br>'
	end

	if drugVars['cigarettes_day'] = daystart and drugVars['cigarettes_hour'] = hour and drugVars['cigarettes_minute'] >= minut: $stat_msg += '<br><font color="green">You are smoking a cigarette.</font><br>'
	if drugVars['weed_day'] = daystart and drugVars['weed_hour'] = hour and drugVars['weed_minute'] >= minut: $stat_msg += '<br><font color="green">You are smoking a joint.</font><br>'

	if cheatVars['no_sweat'] = 0:
		if pcs_sweat > 59:
			$stat_msg += '<br><b><font color="red"><<$stat_sweat_msg>></font></b><br>'
		elseif pcs_sweat > 49:
			$stat_msg += '<br><b><font color="red"><<$stat_sweat_msg>></font></b>'
		elseif pcs_sweat > 39:
			$stat_msg += '<br><font color="red"><<$stat_sweat_msg>></font>'
		elseif pcs_sweat > 29:
			$stat_msg += '<br><font color="red"><<$stat_sweat_msg>></font>'
		elseif pcs_sweat > 19:
			$stat_msg += '<br><font color="brown"><<$stat_sweat_msg>></font>'
		elseif pcs_sweat > 9 and deodorant_on = 1:
			$stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font>'
		elseif arrsize('sparrvol') = 0:
			$stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font></b>'
		elseif deodorant_on = 1:
			$stat_msg += '<br><b><font color="green"><<$stat_sweat_msg>></font></b>'
		end
	end

	!!	breast status
	gs 'lact_lib', 'breast_stat_disp'

	if $stat_writing_msg ! '': $stat_msg += '<br><b><font color = red><<$stat_writing_msg>></font></b>'

	if recuperation = 1: $stat_msg += '<b><font color="red">You are still recovering from major surgery.</font></b>'

	$stat_msg += $stat_cum_text

	!!stds
	if Gerpes >= 10 and GenHerpes = 1:
		$stat_msg += '<br><b><font color="red">Sores have appeared on your vagina. You have genital herpes.</font></b>'
	elseif Gerpes >= 5 and GenHerpes =1:
		$stat_msg += '<br><b><font color="red">Your vagina is red and very itchy. You have genital herpes.</font></b>'
	elseif Gerpes >= 3 and Orerpes = 1:
		$stat_msg += '<br><b><font color="red">You have cold sores on your lips. You have oral herpes.</font></b>'
	end
	if Gerpes >= 20 and GenHerpes =1: $stat_msg += '<br> <b><font color="red">The herpes sores also cover your ass.</font></b>'
	if Sifilis >= 50:
		$stat_msg += '<br><b><font color="red">Syphilitic rashes cover your whole body.</font></b>'
	elseif Sifilis >= 21:
		$stat_msg += '<br><b><font color="red">You have a single large, hard sore on the lip. You have syphilis.</font></b>'
	end

	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>'
	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>'

	!!drug withdrawal
	if drugVars['heroin_need'] > 0: $stat_msg += '<br><b><font color="red">You are very weak and hurt to the bone. You are suffering from heroin withdrawal.</font></b>'
	if drugVars['cocaine_day'] ! daystart and drugVars['cocaine_addict'] = 1: $stat_msg += '<br><b><font color="red">You are very weak and hurt to the bone. You urgently need some cocaine.</font></b>'

	! WD: Bimbo look
	if bimbolevel > 0: $stat_msg += '<br><<$bimbostatus>>'
	if gothlevel  > 0: $stat_msg += '<br><<$gothstatus>>'
	if punklevel  > 0: $stat_msg += '<br><<$punkstatus>>'

	if analplugIN = 1: $stat_msg += '<br><font color = #FF1493>You have a butt plug inserted in your ass.</font>'
	if vibratorin = 1: $stat_msg += '<br><font color = #FF1493>You have a vibrator inserted in your vagina.</font>'

	if alko >= 10:
		$stat_msg += '<br><b><font color="red">You''re wasted.</font></b>'
	elseif alko >= 6:
		$stat_msg += '<br><b><font color="red">You''re very drunk.</font></b>'
	elseif alko >= 4:
		$stat_msg += '<br><b><font color="orange">You''re drunk.</font></b>'
	elseif alko >= 2:
		$stat_msg += '<br><b><font color="orange">You''re feeling a bit tipsy.</font></b>'
	elseif alko = 1:
		$stat_msg += '<br><b><font color="green">You feel a little buzz from drinking.</font></b>'
	end

	if $stat_frost_msg ! '': $stat_msg += '<br><b><font color="red"><<$stat_frost_msg>></font></b>'
	if $stat_sick_msg  ! '': $stat_msg += '<br><b><font color="red"><<$stat_sick_msg>></font></b>'

	$stat_msg += $stat_bra_text
	$stat_msg += $stat_panty_text
	$stat_msg += $stat_clothes_text

	if SchoolBlock = 0 and $start_type['loc'] = 'sg' and $stat_school_msg ! '' and SchoolAtestat = 0:
		if hour < 9 and (kanikuli = 0 and week < 6 or week = 6 and detention_set = 1):
			$stat_msg += '<br><b><<$stat_school_msg>></b>'
		end
	end
end

!!------------------ Things without an icon (Start) -------------------

if fingal > 0: $stat_msg += '<br><b><font color="red">You have a black eye.</font></b>'

if mosol >= 50:
	$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>'
elseif mosol >= 30:
	$stat_msg += '<br><b><font color="red">Your pussy feels a little itchy. It seems to be from rubbing against your clothing.</font></b>'
end

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>'

if $mudnerd ! '': $stat_msg += '<br><<$mudnerd>>'

if $home['current'] = 'city_apartment':
	$streetev_home = 'your apartment'
elseif $home['location'] = 'pav_complex':
	$streetev_home = 'your apartment block'
elseif $home['current'] = 'village_cottage':
	$streetev_home = 'your cottage'
elseif $home['current'] = 'old_town_apartment':
	$streetev_home = 'your apartment building at Okhlopkov Square'
elseif $home['current'] = 'matryona_mansion':
	$streetev_home = 'the entrance to your mansion'
elseif $home['current'] = 'pavlovsk_hotel':
	$streetev_home = 'the hotel at Pavlovsk market.'
elseif $home['current'] = 'maid_bedroom':
	$streetev_home = 'Tanya''s apartment'
elseif $home['current'] = 'niko_apartment':
	$streetev_home = 'Niko''s apartment block'
elseif $home['current'] = 'lyceum_dorm':
	$streetev_home = 'High Street in the Pavlovsk Comercial District'
elseif $home['current'] = 'university_dorm':
	$streetev_home = 'your dorm'
elseif $home['town'] = 'gadukino':
	$streetev_home = 'the street in Gadukino'
elseif $home['current'] = 'city_house':
	$streetev_home = 'your house'
elseif $home['current'] = 'meynold_household':
	$streetev_home = 'the Meynold Residence'
else
	$streetev_home = 'the city center'
end

if drugVars['heroin_high'] > 20 or drugVars['weed_high'] > 0: $stat_msg += '<br><b><font color="red">You are stoned.</font></b>'
if drugVars['amphetamine_high'] > 0: $stat_msg += '<br><b><font color="red">You feel a little wired.</font></b>'

!!--------------- $start_type['loc'] = 'sg' Events (Start) ------------------------

if $start_type['loc'] = 'sg':
	if daystart = sisboyday + 1 and hour < 18:
		if (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><br>You promised your sister not to go into your room at 16:00.'
		if sisboytrioQW = 1: $stat_msg += '<br>' & $stat_msg += '<br>You promised your sister to meet her in your room at 16:00.'
	end

	if day = nyp_day and month = 12 and SchoolAtestat = 0 and hour >= 5 and hour <= 14:
		$stat_msg += '<br>At 14:00, your school''s New Year''s party will start.'
	elseif InvitationToDimkaNYparty = 1 and month = 12 and day = 31:
		$stat_msg += '<br><b>Go to the residential area between 15:00 and 18:00 to go to Dimka''s New Year party.</b>'
	end
	if 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>'
	if 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>'
end

!!--------------- $start_type['loc'] = 'sg' Events (End) ------------------------

if accessible_property['city_house'] = 1 and accessible_property['old_town_apartment'] > 0:
	$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>>.'
elseif accessible_property['city_house'] = 1:
	$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>>.'
elseif accessible_property['old_town_apartment'] > 0:
	$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>>.'
end

if $nichStatMsg ! '': $stat_msg += '<br><b><<$nichStatMsg>></b>'

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.'

!!------------------ Things without an icon (End) -------------------

!!------------------ Gadukino chores and such -------------------
if $region = 'gad':
	if boletus + boletus_cooked + bilberry > 0:
		$stat_msg += '<br> '
		if boletus + boletus_cooked + bilberry >= 5:
			$stat_msg +='<br><font color = Olive>Your basket is full, and you cannot carry more. </font> '
		else
			$stat_msg +='<br><font color = Olive>Your basket is partially full. </font>'
		end
		$stat_msg += '<br><font color = Olive>(Click numbers to throw away one a time) </font>'
		if boletus > 0: $stat_msg +='<br><font color = Olive>Mushrooms: <a href="exec: boletus -= 1 & gs ''stat''"><b><<boletus>></b></a> kg. </font>'
		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>'
		if bilberry > 0: $stat_msg +='<br><font color = Olive>Berries: <a href="exec: bilberry -= 1 & gs ''stat''"><b><<bilberry>></b></a> kg. </font>'
	end
end

!! Grandma chores
if grandmaQW['chore_clean_floor'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would clean the floors in her house today.</b>'
elseif grandmaQW['chore_clean_floor'] = 2:
	$stat_msg += '<br><b>You cleaned the floors for Grandma - you should let her know that it is done.</b>'
elseif grandmaQW['chore_wash_clothes'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would wash clothes for her today.</b>'
elseif grandmaQW['chore_wash_clothes'] = 2:
	$stat_msg += '<br><b>You washed clothes for Grandma - you should let her know that it is done.</b>'
elseif grandmaQW['chore_milk_cow'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would milk the cow in the barn for her today.</b>'
elseif grandmaQW['chore_milk_cow'] = 2:
	$stat_msg += '<br><b>You milked the cow for Grandma - you should let her know that it is done.</b>'
elseif grandmaQW['chore_groceries'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would go get groceries for her today.</b>'
elseif grandmaQW['chore_groceries'] = 2:
	$stat_msg += '<br><b>You got the groceries for Grandma - you should go give them to her.</b>'
elseif grandmaQW['chore_can_mushrooms'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would help her can mushrooms today.</b>'
elseif grandmaQW['chore_can_berries'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would help her can berries today.</b>'
elseif grandmaQW['can_veggies'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would help her can vegetables today.</b>'
elseif grandmaQW['chore_feed_chickens'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would feed the chickens for her today.</b>'
elseif grandmaQW['chore_feed_chickens'] = 2:
	$stat_msg += '<br><b>You fed the chickens for Grandma - you should let her know that it is done.</b>'
elseif grandmaQW['chore_work_in_garden'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would work in the garden today.</b>'
elseif grandmaQW['chore_work_in_garden'] = 2:
	$stat_msg += '<br><b>You worked in the garden for Grandma - you should let her know that it is done.</b>'
elseif grandmaQW['chore_water_garden'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would water the plants in the garden today.</b>'
elseif grandmaQW['chore_water_garden'] = 2:
	$stat_msg += '<br><b>You watered the plants in the garden for Grandma - you should let her know that it is done.</b>'
elseif grandmaQW['chore_collect_strawberries'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would pick strawberries from the garden for her today.</b>'
elseif grandmaQW['chore_collect_strawberries'] = 2:
	$stat_msg += '<br><b>You picked strawberries for Grandma - you should give them to her.</b>'
elseif grandmaQW['chore_collect_fruit'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would collect fruit from the garden for her today.</b>'
elseif grandmaQW['chore_collect_fruit'] = 2:
	$stat_msg += '<br><b>You collected fruit for Grandma - you should give them to her.</b>'
elseif grandmaQW['chore_harvest_garden'] = 1:
	$stat_msg += '<br><b>You promised Grandma you would harvest vegetables from the garden for her today.</b>'
elseif grandmaQW['chore_harvest_garden'] = 2:
	$stat_msg += '<br><b>You harvested vegetables for Grandma - you should give them to her.</b>'
elseif grandmaQW['chore_gather_mushrooms'] > 0 and grandmaQW['chore_gather_mushrooms'] < 3:
	if boletus < grandmaQW['chore_mushroom_quantity']:
		grandmaQW['chore_gather_mushrooms'] = 1
		$stat_msg += '<br><b>You promised Grandma you would pick <<grandmaQW[''chore_mushroom_quantity'']>> kg of mushrooms for her today.</b>'
	else
		grandmaQW['chore_gather_mushrooms'] = 2
		$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>'
	end
elseif grandmaQW['chore_gather_berries'] > 0 and grandmaQW['chore_gather_berries'] < 3:
	if bilberry < grandmaQW['chore_berry_quantity']:
		grandmaQW['chore_gather_berries'] = 1
		$stat_msg += '<br><b>You promised Grandma you would pick <<grandmaQW[''chore_berry_quantity'']>> kg of berries for her today.</b>'
	else
		grandmaQW['chore_gather_berries'] = 2
		$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>'
	end
elseif grandmaQW['chore_gather_both'] > 0 and grandmaQW['chore_gather_both'] < 3:
	if bilberry < grandmaQW['chore_berry_quantity'] or boletus < grandmaQW['chore_mushroom_quantity']:
		grandmaQW['chore_gather_both'] = 1
		$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>'
	else
		grandmaQW['chore_gather_both'] = 2
		$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>'
	end
end

!! Grandpa chores
if grandpaQW['chore_fetch_firewood'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would fetch firewood for him today.</b>'
elseif grandpaQW['chore_fetch_firewood'] = 2:
	$stat_msg += '<br><b>You fetched some firewood for Grandpa - you should give it to him.</b>'
elseif grandpaQW['chore_feed_horse'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would feed the horse in the barn for him today.</b>'
elseif grandpaQW['chore_feed_horse'] = 2:
	$stat_msg += '<br><b>You fed the horse for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_feed_cow'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would feed the cow in the barn for him today.</b>'
elseif grandpaQW['chore_feed_cow'] = 2:
	$stat_msg += '<br><b>You fed the cow for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_clean_yard'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would clean the yard for him today.</b>'
elseif grandpaQW['chore_clean_yard'] = 2:
	$stat_msg += '<br><b>You cleaned the yard for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_brush_horse'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would groom the horse for him today.</b>'
elseif grandpaQW['chore_brush_horse'] = 2:
	$stat_msg += '<br><b>You groomed the horse for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_feed_boar'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would feed the pig in the barn for him today.</b>'
elseif grandpaQW['chore_feed_boar'] = 2:
	$stat_msg += '<br><b>You fed the pig for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_lead_horse_to_field'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would take the horse from the barn to the field for him today.</b>'
elseif grandpaQW['chore_lead_horse_to_field'] = 2:
	$stat_msg += '<br><b>You took the horse to the field for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_lead_cow_to_field'] = 1:
	$stat_msg += '<br><b>You promised Grandpa you would take the cow from the barn to the field for him today.</b>'
elseif grandpaQW['chore_lead_cow_to_field'] = 2:
	$stat_msg += '<br><b>You took the cow to the field for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_bathe_horse'] = 1:
	$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>'
	if grandpaQW['chore_bathe_horse_prog'] = 1:
		$stat_msg += '<br><b>You have taken the horse to the river, but haven''t bathed him yet.</b>'
	elseif grandpaQW['chore_bathe_horse'] = 2:
		$stat_msg += '<br><b>You have bathed the horse in the river, but haven''t led him back home yet.</b>'
	end
elseif grandpaQW['chore_bathe_horse'] = 2:
	$stat_msg += '<br><b>You bathed the horse for Grandpa - you should let him know that it is done.</b>'
elseif grandpaQW['chore_gather_mushrooms'] > 0 and grandpaQW['chore_gather_mushrooms'] < 3:
	if boletus < grandpaQW['chore_mushroom_quantity']:
		grandpaQW['chore_gather_mushrooms'] = 1
		$stat_msg += '<br><b>You promised Grandpa you would pick <<grandpaQW[''chore_mushroom_quantity'']>> kg of mushrooms for him today.</b>'
	else
		grandpaQW['chore_gather_mushrooms'] = 2
		$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>'
	end
elseif grandpaQW['chore_gather_berries'] > 0 and grandpaQW['chore_gather_berries'] < 3:
	if bilberry < grandpaQW['chore_berry_quantity']:
		grandpaQW['chore_gather_berries'] = 1
		$stat_msg += '<br><b>You promised Grandpa you would pick <<grandpaQW[''chore_berry_quantity'']>> kg of berries for him today.</b>'
	else
		grandpaQW['chore_gather_berries'] = 2
		$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>'
	end
elseif grandpaQW['chore_gather_both'] > 0 and grandpaQW['chore_gather_both'] < 3:
	if bilberry < grandpaQW['chore_berry_quantity'] or boletus < grandpaQW['chore_mushroom_quantity']:
		grandpaQW['chore_gather_both'] = 1
		$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>'
	else
		grandpaQW['chore_gather_both'] = 2
		$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>'
	end
end

!! in case both grandparents gave you forest gathering chores
if (boletus >= grandpaQW['chore_mushroom_quantity'] or boletus >= grandmaQW['chore_mushroom_quantity']) and (boletus < (grandpaQW['chore_mushroom_quantity'] + grandmaQW['chore_mushroom_quantity'])):
	temp_boletus = (grandpaQW['chore_mushroom_quantity'] + grandmaQW['chore_mushroom_quantity']) - boletus
	$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>'
end
if (bilberry >= grandpaQW['chore_berry_quantity'] or bilberry >= grandmaQW['chore_berry_quantity']) and (bilberry < (grandpaQW['chore_berry_quantity'] + grandmaQW['chore_berry_quantity'])):
	temp_bilberry = (grandpaQW['chore_berry_quantity'] + grandmaQW['chore_berry_quantity']) - bilberry
	$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>'
end


!!------------------ Gadukino chores and such (End) -------------------

if enable_extra_msg = 1:
	if hour < meethour[0] and svidanie[0] = 1:
		$stat_msg += '<br><<$stat_bfgf_msg_0>>'
	elseif hour = meethour[0] and svidanie[0] = 1:
		$stat_msg += '<br><b><font color="red"><<$stat_bfgf_msg_0>></font></b>'
	end

	if hour < meethour[1] and svidanie[1] = 1:
		$stat_msg += '<br><<$stat_bfgf_msg_1>>'
	elseif hour = meethour[1] and svidanie[1] = 1:
		$stat_msg += '<br><b><font color="red"><<$stat_bfgf_msg_1>></font></b>'
	end

	if hour < meethour[2] and svidanie[2] = 1:
		$stat_msg += '<br><<$stat_bfgf_msg_2>>'
	elseif hour = meethour[2] and svidanie[2] = 1:
		$stat_msg += '<br><b><font color="red"><<$stat_bfgf_msg_2>></font></b>'
	end

	if $stat_court_msg ! '': $stat_msg += '<br><b><font color="red"><<$stat_court_msg>></font></b>'

	if young_shop_work = 1 and hour = 16 and minut <= 5 and week < 6 and inWorkYoungShop = 0:
		$stat_msg += 'You are late for work at Pussy-Cats.'
	elseif young_shop_work = 1 and hour = 16 and week < 6 and inWorkYoungShop = 0:
		if kats_absent_check ! daystart:
			kats_absent_check = daystart
			young_shop_miss += 1
		end
		$stat_msg += '<br><b><font color="red">You missed work.</font></b>'
	elseif young_shop_work = 1 and (hour = 14 or hour = 15) and week < 6:
		$stat_msg += '<br><b><font color="red">You start work at Pussy-Cats today at 16:00.</font></b>'
	end

	if young_shop_work1 = 1 and hour = 9 and minut <= 5 and week >= 6 and inWorkYoungShop = 0:
		$stat_msg += 'You are late for work at Pussy-Cats.'
	elseif young_shop_work1 = 1 and hour = 9 and week >= 6 and inWorkYoungShop = 0:
		if kats_absent_check ! daystart:
			kats_absent_check = daystart
			young_shop_miss += 1
		end
		$stat_msg += '<br><b><font color="red">You missed work.</font></b>'
	elseif young_shop_work1 = 1 and (hour = 7 or hour = 8) and week >= 6:
		$stat_msg += '<br><b><font color="red">By 9:00, you have to be at Pussy-Cats to start work.</font></b>'
	end

	if young_shop_work2 = 1 and hour = 9 and minut <= 5 and week < 6 and inWorkYoungShop = 0:
		$stat_msg += 'You are late for work at Pussy-Cats.'
	elseif young_shop_work2 = 1 and hour = 9 and week < 6 and inWorkYoungShop = 0:
		if kats_absent_check ! daystart:
			kats_absent_check = daystart
			young_shop_miss += 1
		end
		$stat_msg += '<br><b><font color="red">You missed work.</font></b>'
	elseif young_shop_work2 = 1 and (hour = 7 or hour = 8) and week < 6:
		$stat_msg += '<br><b><font color="red">By 9:00, you have to be at Pussy-Cats to start work.</font></b>'
	end

	if workrin = 1 and (week = 2 or week = 4 or week = 6) and hour > 5 and hour < 8:
		$stat_msg += '<br><b><font color="red">At 8 o''clock, you start work in the market.</font></b>'
	elseif workrin = 1 and (week = 2 or week = 4 or week = 6) and hour = 8:
		$stat_msg += '<br><b><font color="red">You need to work in the market now.</font></b>'
	end


	if model['status'] > 0:
		if model_job_week >= 2:
			$stat_msg += '<br><b>You have no more modeling jobs available this week.</b>'
		elseif model_job_week = 1:
			$stat_msg += '<br><b>You can get paid for 1 more modeling job this week.</b>'
		elseif model_job_week < 1:
			$stat_msg += '<br><b>You can get paid for 2 modeling jobs this week.</b>'
		end
	end

	if pornstack > 0:
		if pfilmday[0] = 0:
			if pfilmday[1] = 0:
				$stat_msg += '<br><b>You will star in another porno in <<porndays>> days.</b>'
			else
				$stat_msg += '<br><b>You have a porno shoot scheduled tomorrow.</b>'
			end
		else
			if pornnow = 1:
				$stat_msg += '<br><b>You are at a porn shooting.</b>'
			else
				if hour < 11:
					$stat_msg += '<br><b>You are expected in the porno studio at 10:00.</b>'
				elseif hour >= 11 and hour < 13:
					$stat_msg += '<br><b>You should be at the porno studio, shooting!</b>'
				elseif hour >= 13:
					$stat_msg += '<br><b>You missed a scheduled porno shoot!</b>'
				end
			end
		end
	end
	if pornmiss = 1: $stat_msg += '<br><b>You missed a scheduled porno shoot!</b>'
	if prodcosttrue > 0: $stat_msg += '<br><b>You owe money to the porn studio <<prodcost>>?</b>'
	if firstkasting > 0 and pfilmNO < 1:
		if pornstack >= 10:
			$stat_msg += '<br>You are currently unable to book any more porn shoots at the Porn Studio.'
		elseif pornstack = 11:
			$stat_msg += '<br>You can contract <<10-pornstack>> porn shoot at the Porn Studio.'
		else
			$stat_msg += '<br>You can contract up to <<10-pornstack>> porn shoots at the Porn Studio.'
		end
	end

	if masseuse['jobtype'] > 0:
		if masseuse['<<week>>_shift_1'] = 1 and hour < 9:
			$stat_msg +='<br><b><font color="blue">You have a shift at the salon today at 9:00.</font></b>'
		elseif masseuse['<<week>>_shift_1'] = 1 and hour = 9:
			$stat_msg +='<br><b><font color="red">You''re late for your 9:00 shift at the salon!</font></b>'
		elseif masseuse['<<week>>_shift_2'] = 1 and hour < 13:
			$stat_msg +='<br><b><font color="blue">You have a shift at the salon today at 13:00.</font></b>'
		elseif masseuse['<<week>>_shift_2'] = 1 and hour = 13:
			$stat_msg +='<br><b><font color="red">You''re late for your 13:00 shift at the salon!</font></b>'
		elseif masseuse['<<week>>_shift_3'] = 1 and hour < 17:
			$stat_msg +='<br><b><font color="blue">You have a shift at the salon today at 17:00.</font></b>'
		elseif masseuse['<<week>>_shift_3'] = 1 and hour = 17:
			$stat_msg +='<br><b><font color="red">You''re late for your 17:00 shift at the salon!</font></b>'
		end
	end


!! Work at city cafe, workKafe['job'] is having the job and at_work is set when she is at work
	if hour < 22 and week >= 2 and week <= 4 and workKafe['job'] = 1 and workKafe['at_work'] = 0:
		if hour >= 12: $stat_msg += '<br><b><font color="red">You missed your shift at The Roadhouse cafe today.</font></b>'
		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>'
	end
	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>'
	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>'
	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>'
	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>'
	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>'
	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>'
	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>'

	if hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 1 and missCum >= timeTresh:
		$stat_msg += '<br><b><font color="red"><<$stat_hypno_msg>></font></b>'
	elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 1 and missCum < timeTresh:
		$stat_msg += '<br><b><font color="red"><<$stat_hypno_msg>></font></b>'
	elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 2 and missCum >= timeTresh:
		$stat_msg += '<br><b><font color="red"><<$stat_hypno_msg>></font></b>'
	elseif hypnoAddict > 0 and $stat_hypno_msg ! '' and hypnoWithdrawal = 2 and missCum < timeTresh:
		$stat_msg += '<br><b><font color="red"><<$stat_hypno_msg>></font></b>'
	elseif hypnoAddict > 0 and $stat_hypno_msg ! '':
		$stat_msg += '<br><b><font color="magenta"><<$stat_hypno_msg>></font></b>'
	end
end

gs 'brother', 'brotherSexCount'

!! List Current Active Spells
if arrsize('spellComplete') > 0:
	$tempSpellText="<br><b><font color='#FF99FF'>Active Spells</font></b>"
	sd_i = 0
	:ActiveSpellLoop
	if sd_i < arrsize('spellComplete'):
		$tempSpellText += "<br><font color='#FF99FF'><<$spellName[$spellTimeName[sd_i]]>></font>"
		sd_i += 1
		jump 'ActiveSpellLoop'
	end
	$stat_msg += func('cleanHTML',$tempSpellText)
	killvar '$tempSpellText'
	killvar 'sd_i'
end

!!Guitar icon goes here
if ml_guitar['carried'] = 2 or $ml_guitar['location'] = 'testlab':
	$stat_msg +='<br><br><a href="exec: gt ''music_actions'', ''start'', $curloc"><img src="images/system/icons/icon_guitar.png"></a>'
end
!!

!!zero checks marriage
proverka1 = 0
proverka2 = 0
proverka3 = 0
proverka4 = 0
proverka5 = 0

$stat_msg += '<br><br>'
if disable_LoadSave = 0:
	$stat_msg += '<a href="exec: savegame ''quicksave.sav'' && pl''Quicksave Done''"><img src="images/system/icons/stat_qsave.png" height="<<set_miconht>>"></a>  '
	$stat_msg += '<a href="exec: savegame"><img src="images/system/icons/stat_save.png" height="<<set_miconht>>"></a>  '
	$stat_msg += '<a href="exec: opengame"><img src="images/system/icons/stat_load.png" height="<<set_miconht>>"></a>  '
	$stat_msg += '<a href="exec: if input(''Input Anything to confirm Quick Load'') ! '''': opengame ''quicksave.sav''"><img src="images/system/icons/stat_qload.png" height="<<set_miconht>>"></a>'
elseif disable_LoadSave = 2:
	$stat_msg += '<a href="exec: savegame ''quicksave.sav'' && pl''Quicksave Done''">Quick Save</a>  '
	$stat_msg += '<a href="exec: savegame">Save</a>  '
	$stat_msg += '<a href="exec: opengame">Load</a>  '
	$stat_msg += '<a href="exec: if input(''Input Anything to confirm Quick Load'') ! '''': opengame ''quicksave.sav''">Quick Load</a>'
end

if PillToggle = 1 and mc_inventory['contraceptive_pill'] > 0:
	Stabletki += mc_inventory['contraceptive_pill']
	mc_inventory['contraceptive_pill'] = 0
elseif PillToggle = 0 and Stabletki > 0:
	mc_inventory['contraceptive_pill'] += Stabletki
	Stabletki = 0
end

if CondomToggle = 1 and mc_inventory['equipped_condoms'] > 0:
	Sprezik += mc_inventory['equipped_condoms']
	mc_inventory['equipped_condoms'] = 0
elseif CondomToggle = 0 and Sprezik > 0:
	mc_inventory['equipped_condoms'] += Sprezik
	Sprezik = 0
end

$stat_android +=  ' <a href="exec: savegame ''quicksave.sav'' && pl''Quicksave Done''">Q.S</a>  <a href="exec: if input(''Input Anything to confirm Quick Load'') ! '''': opengame ''quicksave.sav''">Q.L</a>'

if Enable_statimg_loc = 2: $stat_msg += '<br><<$stat_imgtool_msg>><br><<$stat_imgextra_msg>>'

killvar 'stat_imgtool_msg'
killvar 'stat_imgextra_msg'

if Enable_statfsize > 0: $stat_msg += '</font>' & !disable this, all texts comes from pl will have the same font size, like[time]
if Enable_faceturn = 1:	view func('$face_image')
if $git_hash ! '': $stat_msg = '<center><<$git_hash>></center><<$stat_msg>>'
if Enable_Android = 0:
	pl '<<$stat_msg>>'
else
	'<<$stat_android>>'
	$stat_msg = 'Android mode, <a href="exec: gs ''$menu_obnovit''">Refresh</a><<$stat_msg>>'
end
!!end of bimbo withdrawal

if bimbowithdrawal > 14:
	bimbowithdrawal = 0
	bimbo = 0
	bimbolevel = 0
	msg 'You suddenly feel as if your head is clear, instead of filled with pink thoughts.'
end


--- stat_display ---------------------------------