AddedFlavour/locations/mod_addedflavour_SFLA_Bedr4.qsrc

# mod_addedflavour_SFLA_Bedr4
	if $ARGS[0] = 'start' or $ARGS[0] = '':
		CLOSE ALL
		$locM = 'mod_addedflavour_SFLA_Bedr4'
		$locM_arg = 'start'
		$loc = 'mod_addedflavour_SFLA_Bedr4'
		$loc_arg = 'start'
		$locclass = 'bedr'
		$menu_loc = 'mod_addedflavour_SFLA_Bedr4'
		$menu_arg = 'start'
		menu_off = 0
		$location_type = 'private'
		gs 'themes', 'indoors'
		gs 'mod_addedflavour_charsche' , 'chkschedule'
		gs 'mod_addedflavour_SFLA_Functions' , 'whoelse' , 'SFLA' , 'Any'
		if arrsize('modArr_AF_SFLA_SharedActPeopleArray') = 2 : gs 'mod_addedflavour_SFLA_Functions' , 'SFLA-InterNPC-Sex'
		gs 'stat'
		*clr & cla
		if sound = 0 : gs 'mod_addedflavour_SFLA_Functions' , 'soundgen'
		if pcs_sleep >= 50 and modVar_AF_EventOpen['A34-AptSleepEv'] = (daystart - 1):
			if modVar_AF_SFLA_AptState['SpareRoomOccupied'] = 2 and modVar_AF_SFLA_AptState['GuestID'] = 34:
				gs 'mod_addedflavour_SFLA_SexFunctions' , 'chksextriggers' , 34
			else
				modVar_AF_EventOpen['A34-AptSleepEv'] = 0
			end
		end
		if pcs_sleep < 50:
			modVar_AF_EventOpen['A34-AptSleepEv'] = daystart
		else
			modVar_AF_EventOpen['A34-AptSleepEv'] = 0
		end
		if modVar_AF_SFLA_AptRProg['Bedr4'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
			$modVar_AF_TempStr = 'Lv2'
		else
			$modVar_AF_TempStr = 'Lv1'
		end
		'<center><b><font color="maroon"><<$pcs_nickname>>''s Room</font></b></center>'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/city/citycenter/SharedFLApartment/Bedr4<<$modVar_AF_TempStr>>.jpg"></center>'
		gs 'mod_addedflavour_SFLA_Functions' , 'SFLA-UpgradeRoom-Check' , 'Bedr4'
		if modVar_AF_SFLA_AptRProg['Bedr4'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
			'You are standing in your Bedroom which is open and welcoming with smooth colours and comfotable furniture.'
		else
			'You are standing in your Bedroom which is simple but functional with second-hand furniture.'
		end
		gs 'mod_addedflavour_SFLA_Functions' , 'SFLA-PeoplePresent-Display' , 'mod_addedflavour_SFLA_Bedr4'
		*nl
		'<b>Furniture:</b>'
		'A <a href="exec: gt ''bed'', ''start'' ">Bed</a> for doing Bed Things.'
		act 'Go to Bed' : gt 'bed', 'start'
		'An <a href="exec: gt ''budilnik'', ''start''">Alarm Clock</a> which is currently turned ' + iif(budilnikOn = 0,'<font color="red">OFF</font>','<font color="green">ON</font>')
		'A <a href="exec: gt ''wardrobe'', ''start''">wardrobe</a> where you can choose outfits and organise your clothing.'
		act 'Open Wardrobe' : gt 'wardrobe', 'start'
		if modVar_AF_SFLA_AptRProg['Bedr4'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
			'A Table with a few Chairs you can use to use ' + iif(student > 0 and komp = 1,'your <a href="exec: gt ''Komp'' , ''start'' ">Laptop</a>','a Laptop') + ' on'
		else
			'A Chair you could use ' + iif(student > 0 and komp = 1,'your <a href="exec: gt ''Komp'' , ''start'' ">Laptop</a>','a Laptop') + ' on.'
		end
		if modVar_AF_SFLA_AptRProg['Bedr4'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
			'A Full-Length <a href="exec: gt ''mirror'',''start'' ">Mirror</a> for Personal use'
		end
		if pornMagazine > 0:
			'A Secret hidey hole under your bed containing <i>"Special Interest Literature"</i>.'
			gs 'events' , 'read_porn'
		end
		if modVar_AF_SFLA_AptRProg['Bedr4'] >= modVar_AF_SFLA_AptRProg['Lv2Req']:
			'A space set aside for ' + iif(sewing_kit = 1,'<a href="exec: gt ''sewing'' , ''start'' ">Sewing</a>','Sewing')
			'A desk with enough room to setup a ' + iif(komp = 1,'<a href="exec: gt ''Komp'' , ''start'' ">Laptop</a>','Laptop')
			'A Bookcase for storing your <a href="exec: gt ''mod_addedflavour_SFLA_Events'' , ''read'' ">Books</a>'
			if sewing_kit = 1:
				act 'Start Sewing' : gt 'sewing','start'
			end
			act 'Read Something' : gt 'mod_addedflavour_SFLA_Events' , 'read'
		end
		act 'Relax (0:30)' : gt 'mod_addedflavour_SFLA_Events' , 'relax' , 30
		act '<b>Go To Living Room</b>' : minut += 1 & gt 'mod_addedflavour_SFLA_Sitr' , 'start'
	end

--- mod_addedflavour_SFLA_Bedr4 ---------------------------------