glife/locations/bedrPar.qsrc

# bedrPar

*clr & cla
fromoutside = iif($loc = 'bedrPar',0,1)
menu_off = 0
minut += 1
!!day check so mom doesn''t think you have been out all night if you get up very early
motherworry[1] = daystart
gs 'shortgs', 'setloc', 'bedrPar', $ARGS[0]
$location_type = 'private'
$locclass = 'bedr'
gs 'themes', 'indoors'
gs 'stat'
gs 'family_schedule'
!! ballet career
gs 'core_library', 'init'
gs 'music_actions', 'clear_restrictions'

!! This is runs only once, just to make sure that Sveta can sing from the start, does not have to wait a whole day for `cikl` to run.
if ml_performance['max_perform_minutes'] = 0: ml_performance['max_perform_minutes'] = pcs_instrmusic + pcs_vokal

if $ARGS[0] = '' or $ARGS[0] = 'start':
	if locat['Mother'] = 26 and fromoutside and func('homes_properties', 'can_live_here'):
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost1.jpg"></center>'
		if mc_inventory['equipped_condoms'] > 0 and rand(1,3) = 1 and mom['condoms'] = 0:
			gt 'mother', 'condom_find'
		elseif mc_inventory['dildo_small'] + mc_inventory['dildo_normal'] + mc_inventory['dildo_big'] + mc_inventory['dildo_large'] + mc_inventory['dildo_huge'] + mc_inventory['dildo_enormous'] + mc_inventory['dildo_gigantic'] > 0 and motherQW['seen_dildos'] ! 1 and rand(1,3) = 1:
			gt 'mother', 'dildo_find'
		elseif mc_inventory['buttplug'] = 1 and analplugin = 0 and motherQW['seen_plug'] ! 1 and rand(1,3) = 1:
			gt 'mother', 'plug_find'
		else
			'You walk into your bedroom and find your mother sweeping and dusting the room, folding clothes and putting them away and making the beds.'
			act 'Access wardrobe':
				$loc = 'korrPar'
				$loc_arg = ''
				gt 'wardrobe', 'start'
			end
			act 'Leave': gt 'korrPar'
		end
	elseif ParrotQW['Level'] = 2 and func('homes_properties', 'is_current_home'):
		*clr & cla
		menu_off = 1
		'As soon as you enter the room, you rush over to <<$ParrotQW[''Name'']>>''s cage and pour the contents of the vial into his water bowl. You hope this will work and keep him from spilling you and your sister''s bedroom secrets.'
		ParrotQW['Level'] = 3
		ParrotQW['Day'] = 3

		act 'Continue':gt $loc, $loc_arg
	elseif ParrotQW['SisterReleaseParrotDay'] + 3 < daystart and ParrotQW['Level'] = 1 and func('homes_properties', 'is_current_home'):
		*clr & cla
		menu_off = 1
		'When you enter the room, you notice <<$ParrotQW[''Name'']>>''s cage is open and he''s gone.'
		'Anya must have released him since you weren''t able to find a solution in time.'
		ParrotQW['Owned2'] = 0
		ParrotQW['Level'] = 0
		ParrotQW['Day'] = 2
		ParrotQW['Failed'] = 0
		gs 'stat'

		act 'Continue':gt $loc, $loc_arg
	elseif pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0 and locat['Anya_inroom'] = 0 and func('homes_properties', 'can_live_here'):
		gt 'tobiQW', 'start'

	elseif locat['Anya'] = 11 and func('homes_properties', 'can_live_here'):
		gt 'sisterQW', 'sisboyQW_expel'

	elseif locat['Anya_inroom'] = 1 and ParrotQW['Owned2'] = 1 and ParrotQW['SisKeepParrot'] = 0 and func('homes_properties', 'is_current_home'):
		*clr & cla
		menu_off = 1
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
		'"What is that?" Anya asks while pointing at <<$ParrotQW[''Name2'']>> in his cage.'
		'"I went to the mall and bought this bird. Isn''t he the cutest?"'
		if npc_rel['A33'] > 50:
			'"Not really, but I can see this is something you really want. As long as he doesn''t make too much noise, I don''t really care."'
			ParrotQW['SisKeepParrot'] = 1
		end
		if npc_rel['A33']  <= 50:
			'"No he isn''t cute, and I suggest you get it out of here. I''m not sharing my room with a bird!"'
			'You''re somewhat upset, but you understand. You should have asked her before buying it.'
			'You go to the window, open it and release the bird.'
			ParrotQW['Owned2'] = 0
		end
		gs 'stat'

		act 'Leave': gt 'korrPar'
	else
		if func('homes_properties', 'can_live_here'):
			'<center><h1><font color="maroon">Your bedroom</font></h1></center>'
		else
			'<center><h1><font color="maroon">Your old bedroom</font></h1></center>'
		end
		! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/bedrpar.jpg"></center>'
		*nl
		if func('homes_properties', 'is_current_home'):
			'This is the small bedroom you share with your sister, Anya. On one side of the room is a <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> where you can choose outfits and organise your clothing.'
			*nl
			'Your <a href="exec:gt ''bed'', ''start''">bed</a> stands opposite the wardrobe, and your <a href="exec:gt ''stol'' ,''start''">desk</a> is next to it'+iif(mc_inventory['strapon'] = 1, '. You keep your strapon inside it.', '.')+' Your sister''s bed is in the other corner.'
		else
			'This small bedroom you used to share with your sister, Anya. The furniture is old and basic.'
		end
		*nl
		if $ml_guitar['location'] = $loc: 'Your guitar rests on its stand next to your bed.'

		if ParrotQW['Owned2'] = 1 and func('homes_properties', 'is_current_home'):
			'<a href="exec:gt ''popu'',''start2''"><<$ParrotQW[''Name2'']>></a> is sitting in his cage'
			if daystart - ParrotQW['BuyDate'] <= 10:
				'<<$ParrotQW[''Name2'']>> starts squawking at you when you enter the room.'
			elseif daystart - ParrotQW['BuyDate'] <= 20:
				'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. It sounds almost like he is saying "<b>Hello <<$pcs_nickname>>!</b>"'
			elseif daystart - ParrotQW['BuyDate'] <= 30:
				'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is clearly saying "<b>Hello <<$pcs_nickname>>!</b>"'
			elseif daystart - ParrotQW['BuyDate'] <= 35:
				'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b><<$pcs_nickname>> very pretty!</b>"'
			elseif daystart - ParrotQW['BuyDate'] <= 40:
				'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Great body, <<$pcs_nickname>>!</b>"'
			elseif daystart - ParrotQW['BuyDate'] <= 50:
				'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>You''re the best, Anya!</b>"'
			elseif daystart - ParrotQW['BuyDate'] <= 55:
				'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Yeah, that''s it Anya! Swallow it all!</b>"'
			else
				if ParrotQW['Level'] < 3:
					'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Your pussy tastes great, Anya!</b>"'
				else
					parfixrand = rand(0,9)
					if parfixrand = 0:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>What did you say to me?</b>"'
					if parfixrand = 1:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>3.1415926535897932384...</b>"'
					if parfixrand = 2:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Come closer, my friend.</b>"'
					if parfixrand = 3:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Here kitty, kitty!</b>"'
					if parfixrand = 4:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>I just met you, and this is crazy!</b>"'
					if parfixrand = 5:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Bow before me!</b>"'
					if parfixrand = 6:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>He''s just a friend, honest!</b>"'
					if parfixrand = 7:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>What did you do to my socks?</b>"'
					if parfixrand = 8:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>That''s what she said!</b>"'
					if parfixrand = 9:'When <<$ParrotQW[''Name2'']>> sees you, he starts ''speaking''. He is saying "<b>Help! They''ve turned me into a parrot!</b>"'
					killvar 'parfixrand'
				end
			end
			*nl
		end

		if func('homes_properties', 'can_live_here'):
			'<table><tr><td valign="top">'
			func('alarmclock', 'base_alarmclock_text')

			if mc_inventory['contraceptive_pill'] > 0 and mc_inventory['equipped_condoms'] + mc_inventory['normal_condoms'] + mc_inventory['sabotaged_condoms'] > 0:
				'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers, as are your <a href="exec:gt ''stol'', ''bc''">condoms</a>.'
			elseif mc_inventory['contraceptive_pill'] > 0:
				'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers.'
			elseif mc_inventory['equipped_condoms'] + mc_inventory['normal_condoms'] + mc_inventory['sabotaged_condoms'] > 0:
				'Your <a href="exec:gt ''stol'', ''bc''">condoms</a> are hidden in one of your desk drawers.'
			end

			if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour > 4 and hour < 9 and detention_set = 1 and detention_warning ! daystart:
				detention_warning = daystart
				msg 'You have detention this morning and must be at school before 09:00.'
			end

			if mc_inventory['tech_computer'] = 1: 'Your <a href="exec: gt ''Komp'',''start''">computer</a> is on your desk.'

			if npc_QW['A33'] > 10:npc_QW['A33'] = 10
		end

		if locat['Anya_Gad'] = 0:
			if sisboyparty_day + 1 = daystart and sisboyparty = -1 and hour = 22:
				*clr & cla
				menu_off = 1
				minut += 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_6_<<rand(1,7)>>.jpg"></center>'
				'Anya bursts into the room, drunk and disheveled. You notice that her hair and clothes are covered in cum, but she doesn''t seem to care as she falls onto her bed and instantly falls asleep.'
				sisboyparty = 1
				act 'Move away': gt $loc
			else
				sisterdialog = 1

				if locat['Anya'] = 26 or (locat['Anya'] = 1 and locat['Anya_party_day'] >= daystart - 1):
					if sisboypartyQW = 1: sisboypartyQW = 2
					if sisboyparty = -1: sisboyparty = 1
					'A drunken <a href="exec:gt ''sistersleep'', ''drunk_after_party''">Anya</a> is sound asleep in her bed.'
				elseif locat['Anya'] = 1:
					'<a href="exec:gt ''sistersleep'', ''sister_sleep''">Anya</a> is asleep in her bed.'
				elseif locat['Anya'] = 4:
					sisterdialog = 3
					'<a href="exec:gt ''sister_chat'', ''talking''">Anya</a> is getting ready to go out.'
				elseif locat['Anya'] = 15:
					if anyaQW['bathroom_dildos'] > 0:
						gt 'sister_chat', 'bathroom_dildo_talk1'
					elseif sisterQW['sex_room'] > 0:
						gt 'sister_chat', 'sex_room_talk1'
					end
					'<a href="exec:gt ''sister_chat'', ''talking''">Anya</a> is sitting on her bed, reading a book.'
				end
			end
		end

		act 'Exit the room':
			if (locat['Anya'] = 4 or locat['Anya'] = 15) and daystart - ParrotQW['BuyDate'] > 55 and ParrotQW['Owned2'] = 1 and ParrotQW['SisterReleaseParrotDay'] = 0 : gt 'sister_chat', 'pargone'
			gt 'korrPar'
		end

		!!allows quick change to and from default school and sports clothing
		gs 'wardrobe', 'default_clothing_options'

		if func('homes_properties', 'can_live_here'):
			act 'Relax on your bed': gt 'bed', 'start'
			act 'Open wardrobe': gt 'wardrobe', 'start'
			gs 'prostitution_functions', 'prostitute_outfit_at_home'

			if mc_inventory['mag_porn'] > 0:'You have hidden your porn magazines under the mattress of your bed.'
			!!Masturbation, allowed after sister threesome (when sis_watch is used for a message) or sister not here.
			sis_watch = 0

			if locat['Anya_inroom'] = 0 or sisboytrio > 0:
				gs 'library_functions', 'set_read_porn_act'
				if rexCarCount >= 9 and hour < 3 and rexSmsDay ! daystart and smsForRex < 13:
					act 'Send Rex a text message': gt 'rex_events','sms'
				end
				if pcs_horny >= 50:
					act 'Masturbate':gt 'selfplay', 'start'
				end

				if mc_inventory['vintage_card'] > 0: act 'View your vintage porn cards':card_deck = 0 & gt 'card'
				 if mc_inventory['card'] > 0: act 'View your new porn cards':card_deck = 1 & gt 'card'
			end

			gs 'library_functions', 'set_home_read_acts'

			if mc_inventory['trinkets_home'] > 0:'You currently have <<mc_inventory[''trinkets_home'']>> trinkets to sell at the station. The maximum you can carry is 30.'

			if locat['Anya_inroom'] = 0: dynamic $palelady

			gs 'wardrobe', 'default_sport_options'

			gs 'exercise', 'start'

			if mc_inventory['sewing_kit'] = 1:
				'Your <a href="exec:gt ''sewing'',''start''">sewing kit</a> is stored neatly under your bed.'
				*nl
				if mc_inventory['sewing_fabric'] <= 0:'You do not have any fabric.'
				if pcs_sewng >= 80:
					if newgobelen = 0 and mc_inventory['sewing_fabric'] > 0:
						act 'Start a new tapestry': gt 'sewing', 'tapestry'
					elseif newgobelen >= 1:
						'Your tapestry is <<newgobelen/10>> percent finished.'
						act 'Work on the tapestry':gt 'sewing', 'tapestry'
					end
				end
				if mc_inventory['tapestry'] > 0: 'You have <<mc_inventory[''tapestry'']>> completed tapestries.'
			end

			!! Computer, music and internet use.
			gs 'internet_mobile', 'get_access'
			if locat['Anya_inroom'] = 1:
				gs 'music_actions', 'not_alone'

				if sisboytrio = 0: access['noporn'] = 1
				access['nocamshow'] = 1
				$access['noporn'] = 'You shouldn''t watch porn with your sister in the room. She would notice for sure!'
				$access['nocamshow'] = 'You can''t do any webcam activities with your sister in the room!'
			end

			if locat['Anya_inroom'] = 0 and mc_inventory['breast_pump'] = 1 and bp_unbox <= 0:
				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
			elseif kid >= 1 and mc_inventory['breast_pump'] = 1 and bp_unbox <= 0:
				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
			elseif locat['Anya_inroom'] = 0 and mc_inventory['breast_pump'] = 1 and bp_unbox = 1 and pcs_inhib > 40:
				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
			elseif kid >= 1 and mc_inventory['breast_pump'] = 1 and bp_unbox = 1 and pcs_inhib > 30:
				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
			end
			gs 'lact_bp', 'massage'
		end

		'</td><td width = "100" valign="top"></td><td>'
		if func('homes_properties', 'is_current_home'): gs 'subkid'
		'</td></tr></table>'

		!! NOTE: This has to go here, otherwise gs 'subkid' removes the icon.
		gs 'music_actions', 'start'
	end
end

--- bedrPar ---------------------------------