glife/locations/vasilyhome.qsrc

# vasilyhome

if $ARGS[0] = 'home':
	$menu_loc = 'vasilyhome'
	$menu_arg = 'home'
	menu_off = 0
	$track_loop = ''
	CLOSE ALL
	if sound = 0:PLAY 'sound/korr.mp3',30
	$locM_arg = 'home'
	$locM = 'vasilyhome'
	$loc_arg = 'home'
	$loc = 'vasilyhome'
	$location_type = 'private'
	clr
	popolaini = 0
	saunaYouRoom = 0
	boycherdaksex = 0
	minut += 1
	bonusZ = 0
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptdoor.jpg"></center>'
	'You''re at the door to the Shulgin apartment.'
	act 'Knock on door':
		*clr & cla
		if sound = 0:PLAY 'sound/door1.mp3',30
!!did I do this sound right so there is a knocking sound?
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptdoor.jpg"></center>'
		if week < 6 and hour >= 10 and hour < 16:
			'When you knock on the door, no one comes to answer the door. Apparently, both Vasily and Sergey are not at home.'
			if npc_rel['A112'] >=70: 'You could still enter with the key that Sergey gave you.' & act 'Unlock the door and enter':gt 'vasilyhome', 'hallway'
		elseif hour >= 16 and hour <= 19:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/serge/serge2.jpg"></center>'
			'When you knock on the door,<<$serg_obr>> Sergey comes to answer the door.'
			'"Oh, hello <<$pcs_nickname>>," he shrugs. "If you''re looking for Vasily, he''s not here, and I don''t know when he''ll be back."'
			if npc_rel['A112'] >= 50: 'He offers, "You can come in anyway, if you want and wait for him."' & act 'Enter':gt 'vasilyhome', 'hallway'
		elseif (week = 5 or week = 6) and hour >= 20:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/serge/serge2.jpg"></center>'
			'When you knock on the door,<<$serg_obr>> Sergey comes to answer the door.'
			'"Oh, hello <<$pcs_nickname>>," he shrugs. "If you''re looking for Vasily, he''s not here. He''s probably at the disco with everyone else."'
			if npc_rel['A112'] >= 50: 'He offers, "You can come in anyway, if you want and wait for him."' & act 'Enter':gt 'vasilyhome', 'hallway'
		elseif hour >= 2 and hour < 5:
			'You move your hand to knock on the door, but stop yourself. It''s too late to go visit them. You''d wake everyone up!'
			if npc_rel['A112'] >=70: 'You could use the key that Sergey gave you to enter the apartment quietly.' & act 'Unlock the door and enter':gt 'vasilyhome', 'hallway'
		elseif hour >= 5 and hour < 10:
			'You move your hand to knock on the door, but stop yourself. It''s too early. They won''t be out of bed yet.'
			if npc_rel['A112'] >=70: 'You could use the key that Sergey gave you to enter the apartment quietly.' & act 'Unlock the door and enter':gt 'vasilyhome', 'hallway'
		else
			'The door is opened by Vasily, he looks at you a moment, then stands aside so you wan walk in, after you do he closes the door.' 
			act 'Enter':gt 'vasilyhome', 'hallway'
		end
		act 'Leave':minut += 1 & gt'pod_ezd','etaj_3'
	end
	act 'Leave':minut += 1 & gt'pod_ezd','etaj_3'
end

if $ARGS[0] = 'hallway':
	$menu_loc = 'vasilyhome'
	$menu_arg = 'hallway'
	menu_off = 0
	killvar '$locclass'
	CLOSE ALL
	if sound = 0:PLAY 'sound/korr.mp3',30
	$location_type = 'indoors'
	$locM_arg = 'hallway'
	$locM = 'vasilyhome'
	$loc_arg = 'hallway'
	$loc = 'vasilyhome'
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><b><font color = maroon>Hallway</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/korr.jpg"></center>'
	'The hallway of Uncle Sergey''s one bedroom apartment is similar to every other apartment in the complex. There are several doors leading to the various rooms. The first bedroom is Uncle Sergey''s, while the second one is Vasily''s. There''s also the kitchen, bathroom, and finally the livingroom.'
	if home_owned[2] = 0:
		'There are several <a href="exec:gt ''wardrobe'', ''start''">closets</a> in the hall, which Sergey said you can use to store your clothes while you''re staying here</a>, and a large tall <a href="exec:gt ''mirror'', ''start''">mirror</a> on one of the doors.'
		if curr_home = 9 and prostitute['active']: gs 'prostitution_functions', 'prostitute_outfit_at_home'
	else
		'There are several closets in the hall</a> and a large tall <a href="exec:gt ''mirror'', ''start''">mirror</a> on one of the doors.'
	end
	if momslut >= 1 and sexev_momgg_day ! daystart:
		if locat['Fam_inGad'] = 0 and hour < 23 and ((week < 6 and hour >= 15) or (week >= 6 and hour >= 10)):
			if rand(1,5) = 1:
				temprand = rand(1,5)
				if temprand <= 2:
					'You hear some strange sounds coming from uncle Sergey''s room. You could go <a href="exec: gt ''vasily_home_sex'',''vasily_home_momgg1''">see</a> what''s causing them.'
				elseif temprand <= 4:
					'You hear some strange sounds coming from uncle Sergey''s room, leaving no doubt as to what''s happening there. You could go <a href="exec: gt ''vasily_home_sex'',''vasily_home_momgg2''">see</a> who''s with him.'
				else
					'You hear some strange sounds coming from uncle Sergey''s room, leaving no doubt as to what''s happening there. It doesn''t sound like he''s the only person in there though! You could go <a href="exec: gt ''vasily_home_sex'',''vasily_home_momggbang''">see</a> who else is in there.'
				end
			end
			sexev_momgg_day = daystart
		end
	end
	act '<b>Leave the apartment</b>': minut += 1 & killvar '$boy' & gt 'pod_ezd','etaj_3'
	act 'Go to the living room': gt 'vasilyhome', 'livingroom'
	act 'Go to the bathroom': gt 'vasilyhome', 'bathroom'
	act 'Go to the kitchen': gt 'vasilyhome', 'vasilykitchen'
	act 'Go to Sergey''s room': gt 'vasilyhome', 'sergey_room'
	act 'Go to Vasily''s room': gt 'vasilyhome', 'vasily_room'
end

if $ARGS[0] = 'livingroom':
	CLOSE ALL
	$menu_loc = 'vasilyhome'
	$menu_arg = 'livingroom'
	$loc_arg = 'livingroom'
	$loc = 'vasilyhome'
	$locM_arg = 'livingroom'
	$locM = 'vasilyhome'	
	!Daily discussions:
	!Vasily
	if bazar_day ! daystart: bazar_count = 10
	!Dan
	if bazar_day_den ! daystart: bazar_count_den = 5
	!Vitek
	if bazar_day_vitek ! daystart: bazar_count_vitek = 5
	!card games:
	if playcardgame_day ! daystart: playcardgame_count = 2
	!Come dressed as a prostitute:
	if sh_hooker_day ! daystart: sh_hooker_count = 1
	!limit 1 sex after class
	if shulga_lern_day ! daystart: shulga_lern_count = 1
	*clr & cla
	minut += 1
	gs 'stat'
	internetS = internet
	'<center><b><font color = maroon>Living Room</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom.jpg"></center>'
	if hour >= 14 and hour <= 18 and shulga_whore ! 0 and shulga_whore ! daystart + 7:
		if shulga_whore < daystart:
			shulga_whore = daystart + 7
			gs 'fame', 'pav', 'sex', 20
			'As you walk in, the boys are already laughing. "Too late <<$pcs_nickname>>, the whole school now knows what a whore you are. But since you''re here you might as well fuck us like the good little whore you are."'
			gs 'willpower', 'misc', 'self', 'hard'
			if will_cost <= pcs_willpwr:
				act 'Put an end to this (<<will_cost>> Willpower)':
					cla
					gs 'willpower', 'misc', 'self', 'hard'
					gs 'willpower', 'pay', 'self'
					shulga_whore = 0
					'You laugh back at them. "Like I care what anyone in this crap hole thinks."'
					act 'Leave': gt 'vasilyhome', 'hallway'
				end
			else
				act 'Put an end to this (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			gs 'willpower', 'misc', 'self', 'easy'
			if will_cost <= pcs_willpwr:
				act 'Run out of the room crying (<<will_cost>> Willpower)': gs 'willpower', 'misc', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'vasilyhome', 'hallway'
			else
				act 'Run out of the room crying (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Get naked': gt 'vasily_home_sex', 'gang_sex_room_ev1_1'
			exit
		else
			shulga_whore = daystart + 7
			*clr & cla
			minut += 5
			pcs_horny += 5
			gs 'stat'
			'You walk into the room and the boys smile at you. "Well look who it is. <<$pcs_nickname>>, our own personal fuck slut. Isn''t that right slut?"'
			'You nod your head yes, knowing you have no choice but to obey. "Yes I''m your fuck slut."'
			'Laughing, they look to each other. "Damn if we don''t have the bitch well trained." Then they look back to you. "So... take off your clothes then and come on over here, like the good little slut we know you are."'
			'You walk over to them taking off your clothes.'
			act 'Serve them': gt 'vasily_home_sex', 'gang_sex_room_ev1_2'
			exit
		end
	end
	if PCloStyle = 4 and sh_hooker_count > 0 and week < 5 and hour >= 20: gt 'vasilyhome', 'sh_hooker'

	roomsex_sonia = rand(0,100)
	if roomsex_sonia <= 5 and soniaPS >=1 and sexev_sonya_count > 0 and ((week >= 6 and hour >= 10 and hour < 17) or (week = 7 and hour >= 20)):
		gt 'vasilyhome', 'vasily_sex_sonya'
	end
	if roomsex_sonia >= 97 and soniaPS >=3 and sexev_sonya_count > 0 and week < 5 and hour >= 20:
		gt 'vasily_home_sex', 'gang_sex_sonya'
	end
	gs 'internet_mobile', 'get_access', 'free', 'nocamshow'
	'There are two sofas next to a <a href="exec: gt ''vasilyhome'', ''shultv''">TV</a>, and a <a href="exec: gt ''Komp'',''start''">laptop</a> sitting on a table covered in empty beer bottles.'
	shulga_room_rnd = rand(0,2)
	if shulga_room_rnd = 0: $shulga_room_rnd = 'The boys are sitting on the couch talking and drinking beer.'
	if shulga_room_rnd = 1: $shulga_room_rnd = 'The boys are drinking beer and playing cards.'
	if shulga_room_rnd = 2: $shulga_room_rnd = 'The boys are drinking beer while watching TV.'

	if week < 5 and hour >= 20: '<<$shulga_room_rnd>> <a href="exec: gt ''vasilyhome'', ''vasily_bazar_night''">Vasily</a>, <a href="exec: gt ''vasilyhome'', ''dan_bazar''">Dan</a> and <a href="exec: gt ''vasilyhome'', ''vitek_bazar''">Vitek</a>, invites you to <a href="exec: gt ''vasilyhome'', ''vasily_beer''">have a drink with them</a>.'
	if (week >= 6 and hour >= 10 and hour < 17) or (week = 7 and hour >= 20): '<a href="exec: gt ''vasilyhome'', ''vasily_bazar_day''">Vasily</a> is sitting on the big sofa.'

	act 'Return to hallway': gt 'vasilyhome', 'hallway'
	if week < 5 and hour >= 20:
		act 'Drink beer with the guys': gt 'vasilyhome', 'vasily_beer'
		act 'Play cards': gt 'cardgame_durak', 'start'
	end
	act 'Sit on the small sofa':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/sdivan.jpg"></center>'
		'<center>A small sofa just big enough for you to curl up and take nap on</center>'
		act 'Look around the room': gt 'vasilyhome', 'livingroom'
		act 'Take an hour long nap':
			cla
			if pcs_sleep < 90:
				if pcs_sleep >= 80:
					pcs_sleep = 100
				else
					pcs_sleep += 10
				end
				pcs_health += 5
				minut += 60
				gs 'stat'
				'You sleep about an hour.'
				act 'Get up': gt 'vasilyhome', 'livingroom'
			else
				minut += 5
				gs 'stat'
				'You are not tired enough to sleep, even for a short nap.'
				act 'Stand up': gt 'vasilyhome', 'livingroom'
			end
		end
		act 'Sleep for a few hours':
			cla
			if pcs_sleep < 90:
				if pcs_sleep >= 60:
					pcs_sleep = 100
				else
					pcs_sleep += 40
				end
				pcs_health += 5
				minut += 240
				gs 'stat'
				'You sleep about four hours.'
				act 'Get up': gt 'vasilyhome', 'livingroom'
			else
				minut += 5
				gs 'stat'
				'You are not tired enough to sleep, even for a short nap.'
				act 'Stand up': gt 'vasilyhome', 'livingroom'
			end
		end
	end
	act 'Watch TV': gt 'vasilyhome', 'shultv'
	if shulga_lern_count > 0 and lernHome > 0 and kanikuli = 0 and SchoolAtestat = 0 and ((week >= 6 and hour >= 10 and hour < 17) or (week = 7 and hour >= 20)):
		act 'Do homework with Vasily': gt 'vasilyhome', 'vasily_lern'
	end

	if (week >= 6 and hour >= 10 and hour < 17 and npc_rel['A11'] >=70) or (week = 7 and hour >= 20 and npc_rel['A11'] >= 70) or (week < 5 and hour >= 20 and fame['pav_slut'] >= 150 and alko >= 1):
		if week < 5 and hour >= 20:
			gs 'willpower', 'sex', 'self'
			if will_cost <= pcs_willpwr:
				act 'Seduce the guys (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self' & gs 'willpower', 'pay', 'self' & gt 'gopsex', 'gopsex_select'
			else
				act 'Seduce the guys (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		elseif (week >= 6 and hour >= 10 and hour < 17) or (week = 7 and hour >= 20):
			gs 'willpower', 'sex', 'self', 'easy'
			if will_cost <= pcs_willpwr:
				act 'Seduce Vasily (<<will_cost>> Willpower)': gs 'willpower', 'sex', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'gopsex', 'gopsex_select'
			else
				act 'Seduce Vasily (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
	end
end

if $ARGS[0] = 'sh_hooker':
	menu_off = 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/gopsex/body/h'+rand(1,10)+'.jpg"></center>'
	gs 'willpower', 'misc', 'self', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Leave feigning resentment (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'vasilyhome', 'hallway'
	else
		act 'Leave feigning resentment (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	if week < 5 and hour >= 20:
		'"<<$pcs_nickname>>, why on earth are dressed like a whore? You know damn well we aren''t going to pay you for it", Vasily jokes.'
		'Dan and Vitek snicker and start throwing catcalls your way.'
		'"Oh, I came over dressed like this for you boys and this is how you greet me. I guess I''ll just be on my way then", you say as you turn toward the door.'
		'"Wait <<$pcs_nickname>>, it was just a joke. We didn''t mean to offend you. Why don''t you come over and let us make it up to you", Vasily says with a grin.'
		act 'Sigh dramatically and open your arms':
			shgopsex_gr_day = daystart
			shgopsex_gr_count -= 1
			sh_hooker_day = daystart
			sh_hooker_count -= 1
			gs 'gopsex', 'settings'
			gs 'gopsex', 'shgopsex_group'
		end
	elseif (week >= 6 and hour >= 10 and hour < 17) or (week = 7 and hour >= 20):
		'"Hey <<$pcs_nickname>>, why are you dressed like a whore, did you leave work in such a hurry that you forgot to change your uniform?", Vasily asks you sarcastically.'
		'"Listen you jerk, I came here dressed like this for you. If you want I can turn around and head right back out that door", you say putting on your best pouty expression.'
		'"Come on <<$pcs_nickname>>, I''m sorry it was just a bad joke. Let''s just kiss and make up", Vasily smiles as he unzips his pants.'
		act 'Accept his apology':
			$gopsex_n_npc = 1
			shgopsex_vasya_day = daystart
			shgopsex_vasya_count -= 1
			sh_hooker_day = daystart
			sh_hooker_count -= 1
			gs 'boyStat', 'A11'
			gs 'gopsex', 'settings'
			gs 'gopsex', 'shgopsex'
		end
	end
end

if $ARGS[0] = 'vasily_beer':
	menu_off = 1
	if alko < 6:
		minut += 5
		*clr & cla
		gs 'drugs', 'alcohol', 'beer'
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/beer'+rand(1,8)+'.jpg"></center>'
		func('gopsex','hide','gop_text_beer2')

		gs 'willpower', 'drink', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'You''ve had enough (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'vasilyhome', 'livingroom'
		else
			act 'You''ve had enough (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		act 'Have another drink': gt 'vasilyhome', 'vasily_beer'
	else
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/pjanaja'+rand(1,8)+'.jpg"></center>'
		'You are almost too drunk to stand'
		'The boys notice and start to harass you'
		'"We let you drink for free all night <<$pcs_nickname>>. Show us a little skin as a thank you", says Vasily'
		
		if fame['pav_slut'] < 200 or kotovLoveQW > 0:
			if kotovLoveQW <= 0: gs 'willpower', 'sex', 'resist'
			if will_cost <= pcs_willpwr and kotovLoveQW <= 0:
				act 'Tell them to knock it off (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'vasilyhome', 'drunken_sex_no'
			elseif kotovLoveQW > 0:
				act 'Tell them to knock it off': gt 'vasilyhome', 'drunken_sex_no'
			else
				act 'Tell them to knock it off (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			if kotovLoveQW <= 0: act 'Get this party started': gt 'vasilyhome', 'drunken_sex_yes'
		else
			act 'Get this party started': gt 'vasilyhome', 'drunken_sex_yes'
		end
	end
end

if $ARGS[0] = 'drunken_sex_yes':
	menu_off = 1
	minut += 5
	pcs_horny += 10
	vasily['drunk_sex'] += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/yes'+rand(1,6)+'.jpg"></center>'
	'It''s time to show these boys that you know how to have a good time'
	'The guys urge you on calling out various lewd suggestions'
	act 'Present your ass for inspection': gt 'vasily_home_sex', 'drunken_body_popa'
	act 'Show them your pussy': gt 'vasily_home_sex', 'drunken_body_piz'
	act 'Shake your tits': gt 'vasily_home_sex', 'drunken_body_sisi'
	act 'Finger yourself': gt 'vasily_home_sex', 'drunken_body_mast'
end

if $ARGS[0] = 'drunken_sex_no':
	menu_off = 1
	minut += 5
	pcs_health -= healthmax/10
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/sleep'+rand(1,17)+'.jpg"></center>'
	'"You are all fixing to get a swift kick in the balls if you guys don''t cut it out, or I can wake this whole building up with a scream", you drunkenly slur.'
	'Dan sneers at you: "Settle down bitch, nobody is going to hurt you. Why don''t you go lie down on the couch and sleep it off."'
	'The guys lose interest in you and go back to pounding beers. You crawl away in the direction of the sofa.'
	act 'Pass out': gt 'vasilyhome', 'drunken_sleep'
end

if $ARGS[0] = 'drunken_sleep':
	menu_off = 1
	minut += 180
	if pcs_sleep < 75:
		pcs_sleep += 25
	else
		pcs_sleep = 100
	end
	pcs_health -= healthmax/10
	pcs_mood -= 25
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/pohmel'+rand(1,4)+'.jpg"></center>'
	'You passed out for about three hours.'
	'You wake up with a splitting headache and only vague memories of your night with the guys. Remembering that somebody deserved a kick in the balls you look around the room. Vasily is the only one left, and he is passed out in a heap on the sofa. "It was probably Dan that deserved a kick", you mutter to yourself as you try to get your bearings.'
	act 'Clear your head': gt 'vasilyhome', 'livingroom'
end

if $ARGS[0] = 'vasily_sex_sonya':
	menu_off = 1
	shulv_sexev_sonya = rand(0,100)
	if shulv_sexev_sonya <= 40:
		gt 'vasily_home_sex', 'vasily_sexev1_sonya'
	else
		gt 'vasily_home_sex', 'vasily_sexev2_sonya'
	end
end

if $ARGS[0] = 'shultv':
	menu_off = 1
	rndtvs = rand(1,100)
	*clr & cla
	if rndtvs > 10: minut += 30
	if rndtvs > 10: pcs_mood += 10
	if rndtvs <= 10: minut += 5
	gs 'stat'

	shulga_tv_rnd = rand(0,3)
	if shulga_tv_rnd = 0: $shulga_tv_rnd = 'You watch'
	if shulga_tv_rnd = 1: $shulga_tv_rnd = 'You watch'
	if shulga_tv_rnd = 2: $shulga_tv_rnd = 'You find'
	if shulga_tv_rnd = 3: $shulga_tv_rnd = 'It''s'

	shulga_tv_rand = rand(0,11)
	if shulga_tv_rand = 0: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvdance.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a teenage music video, with a half-naked girl shaking her charms.'
	if shulga_tv_rand = 1: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvgeo1.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a David Attenborough documentary about animals.'
	if shulga_tv_rand = 2: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvgeo2.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a documentary about the world, with Morgan Freeman narrating.'
	if shulga_tv_rand = 3: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvgeo3.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a David Attenborough documentary about nature.'
	if shulga_tv_rand = 4: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvgeo4.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a documentary film about the ocean called Blue Planet.'
	if shulga_tv_rand = 5: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvkino1.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> that much-loved Soviet comedy.'
	if shulga_tv_rand = 6: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvkino2.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> Import blockbuster.'
	if shulga_tv_rand = 7: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvkino3.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> an old Western. You hope Clint Eastwood shows up, and shoots someone'
	if shulga_tv_rand = 8: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvmult1.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> some cartoons It looks like a cheap imitation of Pixar.'
	if shulga_tv_rand = 9: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvmult2.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a classic Disney cartoon.'
	if shulga_tv_rand = 10: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvsport1.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> an MMA fight. You wonder if Vitek is as good as these guys.'
	if shulga_tv_rand = 11: $shulga_tv_rand = '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvsport2.mp4" width="748" height="540"></video></center><<$shulga_tv_rnd>> a football match.'

	if rndtvs > 10: '<<$shulga_tv_rand>> <br> You veg out in front of the TV for 30 minutes.'
	if rndtvs <= 10: '<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvrekl'+rand(1,4)+'.mp4" width="748" height="540"></video></center> You find some advertising.'

	act 'Look around the room': gt 'vasilyhome', 'livingroom'
	act 'Change the channel': gt 'vasilyhome', 'shultv'

	porno_tv_rand = rand(0,100)
	if porno_tv_rand < 50 or porno_tv_rand >= 50 and week < 6 and hour >= 3 and hour <= 23 or porno_tv_rand >= 50 and week >= 6 and hour > 2 and hour < 10 or porno_tv_rand >= 50 and week >= 6 and hour > 16 and hour <= 23: gs 'vasilyhome', 'view_pornotv'
	if porno_tv_rand >= 50:
		if week >= 6 and hour >= 10 and hour <= 16: gs 'vasily_home_sex', 'view_pornotv_vasily'
		if week >= 6 and hour >= 0 and hour <= 2: gs 'vasily_home_sex', 'view_pornotv_vasily'
		if week < 6 and hour >= 0 and hour <= 2: gs 'vasily_home_sex', 'view_pornotv_evgr'
	end
end

if $ARGS[0] = 'view_pornotv':
	menu_off = 1
	act 'Flip to the porn channel':
		*clr & cla
		gs 'arousal','porn',20
		gs 'stat'
		'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/tv/tvporn'+rand(1,5)+'.mp4" width="748" height="540"></video></center> You switched to the porn channel.'
		'You watch porn for about 20 minutes.'
		'It''s very exciting'
		act 'Turn it off': gt 'vasilyhome', 'livingroom'
	end
end

if $ARGS[0] = 'vasily_bazar_night':
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/vasya.jpg"></center>'
	'Vasily is always with Dan and Vitek, who are his best friends. He''s physically the weakest one of the three, but is a bit of a prankster and always makes the others laugh. He was raised by just his father, after his mother left when he was still an infant.'
	act 'Stop talking': gt 'vasilyhome', 'livingroom'
	act 'Talk':
		*clr & cla
		minut += 10
		bazar_day = daystart
		bazar_count -= 1
		if bazar_count > 0: npc_rel['A11'] +=1
		gs 'stat'
		!Bazaar night conversations with Vasily fame['pav_slut'] < 200:
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/talk/talk'+rand(1,5)+'.jpg"></center>'
		if fame['pav_slut'] < 200:
			vasyan_textb = rand(0,8)
			if vasyan_textb = 0: $vasyan_textb = '  "Life is like a Matryoshka doll", Vasily says mysteriously.<br> "What the hell is that supposed to mean?", you ask.<br> "Think about it", is all he says.<br> You roll you eyes and give him a sarcastic: "Oh I will."'
			if vasyan_textb = 1: $vasyan_textb = ' "I love <<$pcs_haircol>> hair, and it looks so good on you <<$pcs_nickname>>."<br> "Thanks Vasily, that''s very sweet", you say blushing.<br> "Does the carpet match the drapes?", he asks with a smirk.<br> "Typical", is all you answer with an exasperated sigh.'
			if vasyan_textb = 2 and SchoolAtestat = 0: $vasyan_textb = ' He gives you some advice: "If you have a phone it will make school go by much faster, just be careful not to let the teacher catch you playing with it."<br> "Nobody is getting my phone without a fight", you declare with a smile.'
			if vasyan_textb = 2 and SchoolAtestat = 1: $vasyan_textb = ' You tell Vasily a story from gym class: "This one time after gym class I was all sweaty and Katja tried to drag me into the shower. It was really weird."<br> Vasily adds: "She told me to take a shower a few weeks ago too."<br> "Well, that''s just cause you stink", you say sticking you tongue out at him.'
			if vasyan_textb = 3: $vasyan_textb = ' He tells you a story about a fight: "I got into a scrap with Dimka behind the community center once. I totally whipped his ass, but be careful around him he''s a nasty piece of work."'
			if vasyan_textb = 4: $vasyan_textb = ' He tells you a story about his trip to the city: "I lost my wallet in the city and had no way to get home. The only way I could earn money for the train was by washing dishes at the barbecue. It turned out great though. The cute barmaid was flirting with me all night, and I even got to make out with her before I left. The next time I make it up there I''m going to rock her world."<br> "You go get her tiger", you encourage him.'
			if vasyan_textb = 5: $vasyan_textb = ' Vasily complains: "The economy is broken, and none of these idiots is doing anything about it."<br> "What should be done to fix it", you ask curiously.<br> "Oh, I don''t care. I can use my laptop to hack the banks, and get money whenever I need it", he says.<br> "Then why the hell are you complaining", you say frustrated'
			if vasyan_textb = 6: $vasyan_textb = ' He talks about his trip to the city: "I got lost in the old section of the city. I nearly starved to death, before I found my way out. If you ever end up there be careful. That place is like a Byzantine labyrinth."<br> "Did you find anything interesting?", you ask.<br> Not really, there was lot''s of grass and abandoned buildings. I did see a leather clad woman get out of a cab, but she disappeared like a puff of smoke.'
			if vasyan_textb = 7: $vasyan_textb = ' "Hey <<$pcs_nickname>>, the guys and I were trying to figure something out. How big are your tits? I said they look like <<$titsize>>s, but I figured I''d ask you to be sure."<br> You cross your arms over your chest, and glare at him in response.<br> "So, bigger then?", he quirks an eyebrow.<br> You give him a little slug in the arm for an answer.'
			if vasyan_textb = 8 and npc_rel['A11'] < 30: $vasyan_textb = ' He tells you a story about magic fairies, who live in the countryside. He swears it''s true, but you just roll you eyes.'
			if vasyan_textb = 8 and npc_rel['A11'] >= 30 and webcamera = 1: $vasyan_textb = ' Don''t you sometimes do homework at Julia Milova''s place after school?, he asks.<br> "Maybe", you say suspiciously.<br> "Well, if you ever do please put in a good word for me. I think she''s cute", he finishes.'
			if vasyan_textb = 8 and npc_rel['A11'] >= 30 and npc_rel['A11'] < 50 and webcamera = 0: $vasyan_textb = ' Vasily says: "Have you heard about all the webcam sites that are popping up? Apparently girls can make a lot of money on them. If you have a computer, webcam, and are willing to show a little skin I bet you could do very well <<$pcs_nickname>>."<br> "I''m not sure I would be comfortable doing something like that", you say.<br> "You should think about it. It''s not like you would be selling it on the street. All you have to do is lie around on a bed and talk to a bunch of lonely guys. Then you show them a little skin and the money starts rolling in. It would be so easy", he finishes.'
			if vasyan_textb = 8 and npc_rel['A11'] >= 50 and npc_rel['A11'] < 70: $vasyan_textb = ' Vasily asks: "Do you remember when I told you about the webcam sites, where you can earn big money for showing some skin?"<br> "Yea, I remember", you answer.<br> "Well, not to long ago I bought a webcam, so that I could video chat on Skype. If you want to use it I wouldn''t mind."<br> "Umm thanks, I will think about it", you say.'
			if vasyan_textb = 8 and npc_rel['A11'] >= 100: $vasyan_textb = ' "Hey <<$pcs_nickname>>, have you checked out the webcam I bought?", Vasily asks.<br> "Yea, I may have checked it out a little", you say.<br> "Well, if you ever want to get on there during the weekend let me know. We could do a show together, and rake in some big bucks", he says with a wink and a smile.<br> "That''s not a bad idea. I''ll have to think about it", you blush.'
		else
			vasyan_textb_gorslut = rand(0,12)
			if vasyan_textb_gorslut = 0 and soniaPS = 1: $vasyan_textb_gorslut = ' He tells you about fucking Sonia: "The boys and I were all taking turns with that slut, until she couldn''t even stand. She eventually just collapsed in a heap. Then the fist thing she did when she got up was try to get my cock in her mouth. It''s crazy, that girl is fucking addicted to cock."'
			if vasyan_textb_gorslut = 0 and soniaPS <= 0: $vasyan_textb_gorslut = ' Vasily tells you: "I saw you poke your head in the door the other day when we were screwing Sonia. You seemed to enjoy it, because you watched for a long time. Were you trying to learn something, or just wishing it was you getting fucked by us"'
			if vasyan_textb_gorslut = 1: $vasyan_textb_gorslut = ' You really seemed to enjoy getting fucked like a drunken slut the other day <<$pcs_nickname>>", Vasily snickers<br> "Well I... yeah, I kind of got into it", you stammer meekly.<br> "Then you should come drinking with us in the park more often. We will gladly fuck you six ways to Sunday if you show up there", Vasily say with a sly grin.<br> Don''t be surprised if I take you up on that offer", you say with a wink and a blush.'
			if vasyan_textb_gorslut = 2 and soniaPS = 1: $vasyan_textb_gorslut = ' "We have to figure out how to get you and Sonia in the same room", Vasily says hungrily.<br> "I certainly wouldn''t kick her out of bed", you say giving him a wink.<br> "Just thinking about it is getting me going. Actually seeing you two together would be hot enough to start a fire."<br> You rest your hand on his groin, and give it a squeeze. "Oh, I can tell", you whisper seductively.'
			if vasyan_textb_gorslut = 2 and soniaPS <= 0: $vasyan_textb_gorslut = ' Vasily says: "Sonia was talking about you the other day."<br> "Oh really, what did she say?", you ask.<br> "She said and I quote: That <<$pcs_nickname>> is crazy hot. Every time I see her I just want to eat her like a bowl of ice cream.", he says laughing.<br> "Well next time you see her tell her it tastes like cherry", you tell him laughing.'
			if vasyan_textb_gorslut = 3 and SchoolAtestat = 0: $vasyan_textb_gorslut = ' Vasily says dreamily: "Oh, what I would give to see under that little skirt our English teacher wears. Her ass just looks unbelievable in that thing. I swear she must wear it just to drive the kids crazy."<br> "I totally agree, knows whats she is doing. If she keeps it up I might get under that skirt myself. If I ever do manage to get in there I''ll report back to you with the details commander", you say giving him a mock salute.'
			if vasyan_textb_gorslut = 3 and SchoolAtestat = 1: $vasyan_textb_gorslut = ' He says dreamily: "God, I would love to get in Julia''s pants. The quiet ones like her always turn into freaks in the bedroom."<br> "I think she has a crush on me. Maybe I''ll get her drunk, and find out for myself. I could have that little wallflower licking between my legs in no time. Should we make a bet?", you ask with a wink.<br> "No, but just the thought of it is getting a rise out of me. Luckily I already have a little freak in the bedroom handy", he says looking at you with lust.'
			if vasyan_textb_gorslut = 4: $vasyan_textb_gorslut = ' Vasily says: "Hey <<$pcs_nickname>>, did you know that your <<$npc_nickname[''A29'']>> is still a slut. We saw her in the cafe after closing with her boss. She was sucking his dick like it was the fountain of youth. I see where you got your skills, she must have been a really good teacher."<br> "Ha, dream on asshole", you tell with a laugh.'
			if vasyan_textb_gorslut = 5 and SchoolAtestat = 0 and soniaPS = 1: $vasyan_textb_gorslut = ' Vasily tells you: "Sonia spends almost the whole day in the boys bathroom at school now. That girl sucks and fucks like quantity is the only things that matters."<br> "I think most of her diet is cum these days", you say.<br> "Yea, I do my part to feed her almost every day", he says laughing.'
			if vasyan_textb_gorslut = 5 and SchoolAtestat = 1 and soniaPS = 1: $vasyan_textb_gorslut = ' He says: "Sonia was fucking one of the teachers the other day. It was so damn loud I bet half the school heard it."<br> "Oh, who was she fucking?", you ask with interest.<br> " I couldn''t tell, but that''s not the point. That slut is completely out of control. I almost feel bad for her. There is no way this will end well", he laments.'
			if vasyan_textb_gorslut = 5 and soniaPS <= 0: $vasyan_textb_gorslut = '"Come over here babe. Idle hands are the devil''s plaything", Vasily says motioning you to sit.<br>  He put an arm around, and fondles your breast. You giggle and give him a peck on the cheek.'
			if vasyan_textb_gorslut = 6: $vasyan_textb_gorslut = 'The guys have all gathered around you. Vasily says, "How about we get this party started?" All the boys are looking on with anticipation.<br> "Well one of you guys is going to have to get me a drink first" you smile.<br> "Why do you always need a drink? Let''s just get to it.<br> It''s the only way I can make you guys look good enough to fuck", you say laughing. "Now fetch me a drink."'
			if vasyan_textb_gorslut = 7: $vasyan_textb_gorslut = ' "Do you like anal now <<$pcs_nickname>>? Does it hurt, or does it give you pleasure?", Vasily asks.<br> "My <<$npc_nickname[''A29'']>> has a dildo in here closet. I could get it if you want to find out for yourself", you say laughing.<br> "Yeah, I''ll pass", he says dryly.<br> "Party pooper", you say sticking out you tongue at him.'
			if vasyan_textb_gorslut = 8: $vasyan_textb_gorslut = ' Vasily asks: "What your favorite position?"<br> "Comfortable", answer you laughing.<br> All the boys join in laughing.'
			if vasyan_textb_gorslut = 9: $vasyan_textb_gorslut = ' "Hey <<$pcs_nickname>>, you want to play some cards?", Vasily asks.<br> "I don''t know, will I get to keep my clothes on?", you ask.<br> "Sure, we can to play for money", he says.<br> "Too bad, I guess I''l pass", you say disappointedly. You flash him you tits, and have a good laugh.'
			if vasyan_textb_gorslut = 10: $vasyan_textb_gorslut = ' Vasily says: "Do you remember that barmaid in the city I was telling you about? I finally made it back to the barbecue to see her again. She gave me the best blowjob I''ve had in my life!"<br> "Umm Vasily, there''s something I..."<br> "I didn''t mean it babe. She was good is all. Nobody is better than you", he says apologetically.<br> You decide not to push the topic of the barmaid.'
			if vasyan_textb_gorslut = 11: $vasyan_textb_gorslut = '"Hey <<$pcs_nickname>>, are you into water sports?", he ask innocently.<br> "Oh, I don''t know. I''m better at volleyball and running than I am at swimming. If it''s warm out I do like to cool off in the water though"<br> Vasily announces to the room: "I think that means she''s up for it guys."<br> "What are you guys talking about? Up for what?", you say suspiciously.'
			if vasyan_textb_gorslut = 12 and npc_rel['A11'] < 30: $vasyan_textb_gorslut = ' "I love <<$pcs_haircol>> hair, and it looks so good on you <<$pcs_nickname>>."<br> "Thanks Vasily, that''s very sweet", you say blushing.<br> "Does the carpet match the drapes?", he asks with a smirk.<br> "Typical", is all you answer with an exasperated sigh.'
			if vasyan_textb_gorslut = 12 and npc_rel['A11'] >= 30 and webcamera = 1: $vasyan_textb_gorslut = ' "<<$pcs_nickname>> would you grab me a beer?", Vasily asks.<br> "Sure thing", you say.<br> "Grab one for yourself too", he adds.<br> "Vasily Shulgin, are you trying to get me drunk?", you answer in a shocked tone. Laughing you head for the kitchen.'
			if vasyan_textb_gorslut = 12 and npc_rel['A11'] >= 30 and npc_rel['A11'] < 50 and webcamera = 0: $vasyan_textb_gorslut = ' Vasily says: "Have you heard about all the webcam sites that are popping up? Apparently girls can make a lot of money on them. If you have a computer, webcam, and are willing to show a little skin I bet you could do very well <<$pcs_nickname>>."<br> "I''m not sure I would be comfortable doing something like that", you say.<br> "You should think about it. It''s not like you would be selling it on the street. All you have to do is lie around on a bed and talk to a bunch of lonely guys. Then you show them a little skin and the money starts rolling in. It would be so easy", he finishes.'
			if vasyan_textb = 12 and npc_rel['A11'] >= 50 and npc_rel['A11'] < 70: $vasyan_textb_gorslut = ' Vasily asks: "Do you remember when I told you about the webcam sites, where you can earn big money for showing some skin?"<br> "Yea, I remember", you answer.<br> "Well, not to long ago I bought a Webcam, so that I could video chat on Skype. If you want to use it I wouldn''t mind."<br> "Umm thanks, I will think about it", you say.'
			if vasyan_textb = 12 and npc_rel['A11'] >= 100: $vasyan_textb_gorslut = ' "Hey <<$pcs_nickname>>, have you checked out the webcam I bought?", Vasily asks.<br> "Yea, I may have checked it out a little", you say.<br> "Well, if you ever want to get on there during the weekend let me know. We could do a show together, and rake in some big bucks", he says with a wink and a smile.<br> "That''s not a bad idea. I''ll have to think about it", you blush.'
			if bazar_count <= 0: '"Give it a rest <<$pcs_nickname>>. How about a drink instead?", Vasily offers.'
			if fame['pav_slut'] < 150 and bazar_count > 0: '<<$vasyan_textb>>'
			if fame['pav_slut'] >= 150 and bazar_count > 0: '<<$vasyan_textb_gorslut>>'
		end
		act 'Further': gt 'vasilyhome', 'vasily_bazar_night'
	end
	act 'Drink beer': gt 'vasilyhome', 'vasily_beer'
	if npc_rel['A11'] >= 70 and alko >= 1 or npc_rel['A11'] >= 70 and pcs_horny > 50 or fame['pav_slut'] >= 200 and alko >= 1:
		gs 'willpower', 'sex', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Ask him for sex (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'self'
				if shgopsex_vasya_count = 0:
					cla
					'Vasily says: "Keep your pants on, woman. I''m not a machine."'
					act 'Humph': gt 'vasilyhome','livingroom'
				elseif shgopsex_vasya_count > 0:
					$gopsex_n_npc = 1
					shgopsex_vasya_day = daystart
					shgopsex_vasya_count -= 1
					gs 'boyStat', 'A11'
					gs 'gopsex', 'settings'
					gs 'gopsex', 'shgopsex'
				end
			end
		else
			act 'Ask him for sex (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end
!--------------------------------------------!
!Bazaar night with Dan. Monday - Thurstday hours: 20:00 - 24:00!
!============================================!
if $ARGS[0] = 'dan_bazar':
	menu_off = 1
	minut += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dan/dan.jpg"></center>'
	'Dan (Denis) Ryzhov is a tall and skinny guy, who usually communicates to others with disdain and contempt. He''s a very stubborn guy who will never let an argument go. He''s best friends with Vitek and Vasily, and can be considered the smartest one of the three.'
	act 'Move away': gt 'vasilyhome', 'livingroom'
	act 'Talk':
		*clr & cla
		minut += 5
		bazar_day_den = daystart
		bazar_count_den -= 1
		if bazar_count_den > 0: npc_rel['A10'] +=1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/talk/talk'+rand(1,5)+'.jpg"></center>'

		den_textb = rand(0,6)
		if den_textb = 0: $den_textb = '  Dan tells you about a girl they saw giving a guy a blowjob in the park today. "She had such lovely <<$pcs_eyecol>> eyes, and beautiful <<$pcs_haircol>> hair", he says smiling at you. "Oh <<$pcs_nickname>>, you should come join us in the park after school. We are almost always there having drinks", he adds as an afterthought.'
		if den_textb = 1 and SchoolAtestat = 0: $den_textb = '  "Hey <<$pcs_nickname>>, how is school going?", Dan says. Before you can answer he continues, "I don''t think smart people even belong in school. I have to cut class and hang out in the bathroom just so I don''t lose my mind"'
		if den_textb = 1 and SchoolAtestat = 1: $den_textb = '  Dan tells you his plans after graduation: "I can''t wait to get to get out of this one horse town. I want to move to the city. That place has all the best food, women, drugs, and everything else you could think of."'
		if den_textb = 2: $den_textb = '  "<<$pcs_nickname>>, get over here and make yourself useful. I need a back massage, and you look like just the right girl for the job.", Dan hollers. <br>  "How would you like a swift kick instead? If you had bothered to ask me nicely I still would''t have done it, but it never hurts to be polite", you smile back at him sweetly'
		if den_textb = 3: $den_textb = '  Dan asks you to grab him a beer. When you return from the kitchen with his beer, he politely asks you to open it for him. Rolling your eyes, you crack it open and hand it over to him. <br>  "Thanks <<$pcs_nickname>>, you are going to make a fine little wife", Dan laughs.<br>  You give him a little kick in the shin before turning to leave. He just laughs, and sends you on your way with a smack on the ass'
		if den_textb = 4: $den_textb = '  "<<$pcs_nickname>>, if you are looking for work I hear the hotel is hiring. They have a job opening for a <<$pc_desc[''lips'']>> set of lips", Dan says.<br>  You flick your hand between his legs, and he lets out a sharp cry of pain. "Thanks for the tip asshole", you smile back at him.'
		if den_textb = 5: $den_textb = '  Dan gives you his opinion on religion: "A church is no fit place for a woman on her knees. That should be reserved for places like alleys, bathrooms, and living rooms. Speaking of which, <<$pcs_nickname>> would you be a dear."<br>  You walk away shaking you head before he can finish'
		if den_textb = 6: $den_textb = '  Unprompted Dan turns to and says, "You got a real pretty mouth girl", in his best creepy accent.<br>  You swiftly raise your knee like you are going for his crotch, but stop short and just walk past him. Seeing him instinctively double over in fear puts a little spring in your step.'

		den_textb_gorslut = rand(0,7)
		if den_textb_gorslut = 0: $den_textb_gorslut =  '  Dan looks at you appraisingly: "<<$pcs_nickname>> Do you have any money? If you need some I am sure I could find some work putting your body to good use."<br>  "Dream on, the only work I am thinking of using this body for involves a swift kick between your balls", you snarl.<br>  With one hand protecting his nuts Dan says: "Settle down slut, I was not suggesting you become a whore. Honestly, I was just thinking out loud. I mean if you are already giving it away for free why not." You leave in a huff before he can finish.'
		if den_textb_gorslut = 1 and soniaPS = 1: $den_textb_gorslut = '  Dan mockingly issues you a challenge<br>  "<<$pcs_nickname>> I can''t decide if I prefer your cute set of <<$pc_desc[''lips'']>> lipss or Sonia''s. We need to all get together to find out who has the best skills. I have a warm wet surprise for the winner."<br>  "Dream on", you say shaking your head. Secretly you do wonder you would win. Sonia looks so good at giving a BJ, but you think you might be able to best her.'
		if den_textb_gorslut = 1 and soniaPS <=0: $den_textb_gorslut = '  Dan is idly going on about what a good girl Sonia is when he turns to you and says, "Hey <<$pcs_nickname>>, you are friends with Sonia right?"<br>  "Not this again Dan", you say with a weary sigh.<br>  "Oh come on, you girls both like to have a good time. It could be a lot of fun", Dan says.<br>  You stop him right there: "Listen Dan I like Sonia, but she has a look in her eyes lately that makes me nervous. Besides any girl willing to sleep with you has to be half-mad, getting two of us in the same room might be more than you could handle." You give Dan a little sway of your hips as you walk away. At least he did''t ask you to go out on the and kidnap a virgin for him'
		if den_textb_gorslut = 2 and soniaPS = 1: $den_textb_gorslut = '  Dan says: "Yesterday Sonia was servicing every boy in the mens bathroom in any fashion they desired. Not to long ago she was such a stuck up goody-two-shoes, now she is free and does''t have a care in the world. You could probably learn a thing or two from her <<$pcs_nickname>>."<br>  You just stare back at him with your arms crossed. He slowly moves a hand in front of his crotch for protection.'
		if den_textb_gorslut = 2 and soniaPS <=0: $den_textb_gorslut = '  Dan says, "Be a dear and fetch me another beer <<$pcs_lastname>>."<br>  It was sweet of him to ask you think as you head to the kitchen. You take a little sip and give him a smile when you hand him his beer. Dan gives you rough slap on the ass, as he sends you away giggling.'
		if den_textb_gorslut = 3: $den_textb_gorslut = '  Dan looks like he is up to something: "<<$pcs_nickname>> who is your best girlfriend at school?"<br>  "Why", you say giving him a stern look.<br>	"Well, I was just thinking maybe you would like to bring a friend on one of your visits here.", Dan says trying his best sound diplomatic.<br>  Your anger boils over as you say "Don''t you think for one second that I am going to drag some innocent girl back here and throw her to you jackals. If you are so desperate to have a three-way I would be happy to let you help me suck Vitek''s cock right now." <br>  You hear Dan mutter, "Moody bitch, what the hell crawled up your ass tonight", as you turn to go.'
		if den_textb_gorslut = 4: $den_textb_gorslut = '  "Hey babe, how about you stop by the park the next time we are hanging out there, and have some beers with us. You are so much fun when you get a few beers in you" Dan says roughly giving your ass a squeeze.<br>  You give him a playful slap on the thigh and a giggle. Your boys can get a little rough, but you wouldn''t have it any other way.'
		if den_textb_gorslut = 5: $den_textb_gorslut = '  "<<$pcs_nickname>>, hand me the TV remote", Dan says.<br>  He is way closer to it than you, but he looks comfortable. You happily fetch it for him.<br>  "Good girl", he praises you for a job well done.'
		if den_textb_gorslut = 6: $den_textb_gorslut = '  Dan asks:" <<$pcs_nickname>>, does your sister still work at the local supermarket?"<br>  "Yea, but she does not enjoy it much, so I try not to bother her when she is working", you inform him.<br>  "You should bring her over here sometime. I bet we could find a way to cheer her up", he says suggestively.<br>  "God, is sex the only thing you ever think about, and what on earth makes you think I would do that sort of thing with my sister?", you say a little sheepishly while giving him a sideways glance.'
		if den_textb_gorslut = 7: $den_textb_gorslut = '  Dan tells you about his visit to the strip club: "You need an ID to get in, but once you do it''s great. They have some of the best looking woman I''ve ever seen in there, and I think on some nights the even have male strippers for ladies"'
		if bazar_count_den <= 0: '  "Be quiet <<$pcs_nickname>>. That''s enough talk out of you tonight. Leave me in peace, unless you want to put those <<$pc_desc[''lips'']>> lipss to a better use", Dan says'
		if fame['pav_slut'] < 200 and bazar_count_den > 0: '<<$den_textb>>'
		if fame['pav_slut'] >= 200 and bazar_count_den > 0: '<<$den_textb_gorslut>>'

		act 'Further': gt 'vasilyhome', 'dan_bazar'
	end
	act 'Drink beer': gt 'vasilyhome', 'vasily_beer'
	if fame['pav_slut'] >= 200 and alko >= 1:
		gs 'willpower', 'sex', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Have sex with Dan (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'self'
				if shgopsex_den_count = 0:
					cla
					'Dan says: "Damn slut, I''m only one man. Suck your supper out of someones else''s cock"'
					act 'Leave': gt 'vasilyhome', 'livingroom'
				elseif shgopsex_den_count > 0:
					$gopsex_n_npc = 0
					shgopsex_den_day = daystart
					shgopsex_den_count -= 1
					gs 'boyStat', 'A10'
					gs 'gopsex', 'settings'
					gs 'gopsex', 'shgopsex'
				end
			end
		else
			act 'Have sex with Dan (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end
!---------------------------------------------!
!Bazaar with Vitek(Kotov) Monday - Thurstday hours: 20:00 - 24:00!
!=============================================!
if $ARGS[0] = 'vitek_bazar':
	menu_off = 1
	minut += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vitek/vitek.jpg"></center>'
	'Vitek (Viktor) Kotov is an aggressive and strong guy, who considers himself a gangsta. But his personality is pretty much see-through. Lena is his twin-sister.'
	act 'Move away': gt 'vasilyhome','livingroom'
	act 'Talk':
		*clr & cla
		minut += 5
		bazar_day_vitek = daystart
		bazar_count_vitek -= 1
		if bazar_count_vitek > 0: npc_rel['A9'] +=1
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/talk/talk'+rand(1,5)+'.jpg"></center>'
		vitek_textb = rand(0,7)
		if vitek_textb = 0: $vitek_textb = '  "Any chance I could get you to come over, and do some cleaning? My apartment is such a wreck that it''s virtually uninhabitable. It could really use a woman''s touch."<br>  "I''ll think about it", you answer shyly.<br>  The thought of cleaning Vitek''s place in a skimpy little outfit bubbles up in your mind, and you turn away blushing'
		if vitek_textb = 1 and SchoolAtestat = 0: $vitek_textb = '  Vitek flexes his bicep, and tells you to feel it. Somewhat hesitantly you give his muscle a little squeeze. It''s hard as a rock, and a little exciting too.<br> "I can bench 300", he boasts.<br>  You have no idea what that means but say: "Wow, that''s really good. I''m impressed."'
		if vitek_textb = 1 and SchoolAtestat = 1: $vitek_textb = '  Vitek compliments you: "<<$pcs_nickname>>, your hair looks beautiful. I''ve always had a thing for girls with <<$pcs_haircol>> hair"<br>  "Thank you", you say blushing.'
		if vitek_textb = 2: $vitek_textb = '  Vitek invites you to the community center at night to drink and dance with him. The thought of dancing with him sends a little flutter though your chest.<br>  "I might just take you up on that offer you tell", you tell him trying your best to sound sexy.'
		if vitek_textb = 3: $vitek_textb = '  Vitek talks to you about his boxing training at that community center. He thinks he is getting pretty good. "Stop by if you want to see me in action. There is plenty of other stuff to do there too", he finishes.'
		if vitek_textb = 4: $vitek_textb = '  Vitek asks: "Do you ever go down to the lake to swim?"<br>  "Sometimes, but it''s been a while", you answer.<br>  "It''s a shame I''ve never seen you in a bathing suit", he says almost shyly.'
		if vitek_textb = 5: $vitek_textb = '  Vitek advises you: "I had to kick the shit out of that Igor kid after the dance a few weeks ago. You should steer clear of that guy <<$pcs_nickname>>. I don''t like the way he treats women."'
		if vitek_textb = 6: $vitek_textb = '  Vitek must have been boxing today. His shoulders look tense. Trying to be helpful you walk up behind him, and start giving them a good rub.<br>  "Oh <<$pcs_nickname>>, your hands feel great", he sighs in appreciation.'
		if vitek_textb = 7: $vitek_textb = '  You notice Vitek''s beer is almost empty. Thinking this looks like a job you can handle you go to the kitchen. You return just as he is ready for another one, and hand him a beer smiling.<br>  "Thanks <<$pcs_nickname>>, You read my mind", he says. His hand grazes your hip when he takes his beer, sending butterflies flying around in your tummy.'

		vitek_textb_gorslut = rand(0,7)
		if vitek_textb_gorslut = 0: $vitek_textb_gorslut = '  Your lying on the couch when Vitek sits down, and puts your feet in his lap. Without saying anything, he gently starts to massage them. You let him know how good it feels with a series of soft moans. Vitek can be so good to you when he wants to be. You think you should probably reward him.'
		if vitek_textb_gorslut = 1: $vitek_textb_gorslut = '  Vitek imparts some wisdom: "You can determine how close your relationship is with someone by how much you can mock them, before receiving a beating."<br>  "What if I said you have a tiny cock?", you say.<br>  "Then I would attack you", he says. He takes both hands and furiously tickles you around your sides and stomach.<br>  You sequel with delight laughing until you are out of breath.'
		if vitek_textb_gorslut = 2: $vitek_textb_gorslut = '  Vitek is full of fun facts: "<<$pcs_nickname>>, did you know that it''s empirically proven that 95% of girls can no longer pronounce the name of the city Naberezhnye Cheln if they go a month without sex?"<br>  Deadpan you respond: "I speak seven languages."'
		if vitek_textb_gorslut = 3 and SchoolAtestat = 0 and soniaPS = 1: $vitek_textb_gorslut = '  Vitek says: "Sonia pulled me into the school toilet yesterday, climbed on top of me, and used me for sex. She basically raped me. I may have to go see the therapist at the clinic to get over it."<br>  He says it with a smile, but you can tell he is worried about Sonia.'
		if vitek_textb_gorslut = 3 and SchoolAtestat = 1 and soniaPS = 1: $vitek_textb_gorslut = '  Vitek says: "Sonia was pestering me in the park yesterday. When I told her no, and walked away she just followed me. I decided I''d had enough, and started to jog away. She chased me! She actually chased me though the park trying to have sex with me..." He just shakes his head dumbfounded by this turn of events.'
		if vitek_textb_gorslut = 3 and soniaPS <= 0: $vitek_textb_gorslut = '  Vitek advises you: "If you ever lend money to Natasha Belova don''t expect to get it back. Well, not with cash anyway, her methods of repayment are very interesting though."<br>  You give him a playful slug on the shoulder, and start thinking about Natasha''s legs.'
		if vitek_textb_gorslut = 4: $vitek_textb_gorslut = '  Vitek starts talking like he is telling a ghost story: " There is a woman who walks our quite streets at night wearing leather and brandishing a whip. They say if she catches you wind up in her dungeon never to be seen again." He finishes by laughing and making spooky sounds.<br>  You are to distracted by thoughts of mysterious leather clad women to laugh with him.'
		if vitek_textb_gorslut = 5: $vitek_textb_gorslut = '  Vitek asks: "<<$pcs_nickname>>, what is your favorite thing about a penis?"<br>  "They always stand up when a fine lady like myself enters the room", you answer back.<br>  Vitek bursts out laughing, and starts to tickle your sides.'
		if vitek_textb_gorslut = 6: $vitek_textb_gorslut = 'Vitek speaks: "Drunk girls might as well call their pussy mistress. They can think of nothing, but obeying its wishes".<br>  You parry: "Yea, and guys should call their cocks sir. They follow every order like it''s a life and death mission issued by their commanding officer."<br>  You both burst out laughing, when Vitek gives his crotch a salute.'
		if vitek_textb_gorslut = 7: $vitek_textb_gorslut = '  Vitek tells a joke:<br> A man walks into a pharmacy and loudly declares: "I''ll have a pack of condoms, please!"<br>  The cute young clerk blushed and whispered: "Sir, this sort of thing should be asked for in the ear, not..."<br>  "What about ears? I don''t need them for me ears! I need them for my dick!!!"'
		if bazar_count_vitek <= 0: 'Vitek said: "That''s enough talk for now <<$pcs_nickname>>."'
		if fame['pav_slut'] < 150 and bazar_count_vitek > 0: '<<$vitek_textb>>'
		if fame['pav_slut'] >= 200 and bazar_count_vitek > 0: '<<$vitek_textb_gorslut>>'

		act 'Further': gt 'vasilyhome', 'vitek_bazar'
	end
	act 'Drink beer': gt 'vasilyhome', 'vasily_beer'
	if fame['pav_slut'] >= 200 and alko >= 1:
		gs 'willpower', 'sex', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Get laid (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'self'
				if shgopsex_vitya_count = 0:
					cla
					'Vitek says: "Sorry kitten, you''ve worn me out for the day."'
					act 'Humph': gt 'vasilyhome', 'livingroom'
				elseif shgopsex_vitya_count > 0:
					$gopsex_n_npc = 2
					shgopsex_vitya_day = daystart
					shgopsex_vitya_count -= 1
					gs 'boyStat', 'A9'
					gs 'gopsex', 'settings'
					gs 'gopsex', 'shgopsex'
					gs 'stat'
				end
			end
		else
			act 'Get laid (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'vasily_bazar_day':
	minut += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/vasya.jpg"></center>'
	'Vasily is always with Dan and Vitek, who are his best friends. He''s physically the weakest one of the three, but is a bit of a prankster and always makes the others laugh. He was raised by just his father, after his mother left when he was still an infant.'
	act 'Move away': gt 'vasilyhome', 'livingroom'
	act 'Talk':
		*clr & cla
		minut += 10
		bazar_day = daystart
		bazar_count -= 1
		if bazar_count > 0: npc_rel['A11'] +=1
		gs 'vasilyhome', 'vasily_rep'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/talk/talk'+rand(1,5)+'.jpg"></center>'
		vasyan_textb_day = rand(0,8)
		if vasyan_textb_day = 0: $vasyan_textb_day = ' "Life is like a Matryoshka doll", Vasily says mysteriously.<br> "What the hell is that supposed to mean?", you ask.<br> "Think about it", is all he says.<br> You roll you eyes and give him a sarcastic: "Oh, I will."'
		if vasyan_textb_day = 1: $vasyan_textb_day = ' He tells you a story about his trip to the city: "I lost my wallet in the city and had no way to get home. The only way I could earn money for the train was by washing dishes at the barbecue. It turned out great though. The cute barmaid was flirting with me all night, and I even got to make out with her before I left. The next time I make it up there I''m going to rock her world."<br> "You go get her tiger", you encourage him.'
		if vasyan_textb_day = 2 and SchoolAtestat = 0: $vasyan_textb_day = ' He gives you some advice: "If you have a phone it will make school go by much faster, just be careful not to let the teacher catch you playing with it."<br> "Nobody is getting my phone without a fight", you declare with a smile.'
		if vasyan_textb_day = 2 and SchoolAtestat = 1: $vasyan_textb_day = ' You tell Vasily a story from gym class: "This one time after gym class I was all sweaty and Katja tried to drag me into the shower. It was really weird."<br> Vasily adds: "She told me to take a shower a few weeks ago too."<br> "Well, that''s just cause you stink", you say sticking you tongue out at him.'
		if vasyan_textb_day = 3: $vasyan_textb_day = ' He tells you a story about a fight: "I got into a scrap with Dimka behind the community center once. I totally whipped his ass, but be careful around him he''s a nasty piece of work."'
		if vasyan_textb_day = 4: $vasyan_textb_day = ' He tells you a story about magic fairies, who live in the countryside. He swears it''s true, but you just roll you eyes.'
		if vasyan_textb_day = 5: $vasyan_textb_day = ' Vasily complains: "The economy is broken, and none of these idiots is doing anything about it."<br> "What should be done to fix it?", you ask curiously.<br> "Oh, I don''t care. I can use my laptop to hack the banks, and get money whenever I need it", he says.<br> "Then why the hell are you complaining", you say frustrated'
		if vasyan_textb_day = 6: $vasyan_textb_day = ' He talks about his trip to the city: "I got lost in the old section of the city. I nearly starved to death, before I found my way out. If you ever end up there be careful. That place is like a Byzantine labyrinth."<br> "Did you find anything interesting?", you ask.<br> Not really, there was lot''s of grass and abandoned buildings. I did see a leather clad woman get out of a cab, but she disappeared like a puff of smoke.'
		if vasyan_textb_day = 7: $vasyan_textb_day = ' "Hey <<$pcs_nickname>>, the guys and I were trying to figure something out. How big are your tits? I said they look like <<$titsize>>s, but I figured I''d ask you to be sure."<br> You cross your arms over your chest, and glare at him in response.<br> "So, bigger then?", he quirks an eyebrow.<br> You give him a little slug in the arm for an answer.'
		if vasyan_textb_day = 8 and npc_rel['A11'] < 30: $vasyan_textb_day = ' "I love <<$pcs_haircol>> hair, and it looks so good on you <<$pcs_nickname>>."<br> "Thanks Vasily, that''s very sweet", you say blushing.<br> "Does the carpet match the drapes?", he asks with a smirk.<br> "Typical", is all you answer with an exasperated sigh.'
		if vasyan_textb_day = 8 and npc_rel['A11'] >=30 and webcamera = 1: $vasyan_textb_day = ' Don''t you sometimes do homework at Julia Milova''s place after school?, he asks.<br> "Maybe", you say suspiciously.<br> "Well, if you ever do please put in a good word for me. I think she''s cute", he finishes.'
		if vasyan_textb_day = 8 and npc_rel['A11'] >=30 and npc_rel['A11'] <50 and webcamera = 0: $vasyan_textb_day = ' Vasily says: "Have you heard about all the webcam sites that are popping up? Apparently girls can make a lot of money on them. If you have a computer, webcam, and are willing to show a little skin I bet you could do very well <<$pcs_nickname>>."<br> "I''m not sure I would be comfortable doing something like that", you say.<br> "You should think about it. It''s not like you would be selling it on the street. All you have to do is lie around on a bed and talk to a bunch of lonely guys. Then you show them a little skin and the money starts rolling in. It would be so easy", he finishes.'
		if vasyan_textb_day = 8 and npc_rel['A11'] >=50 and npc_rel['A11'] < 70: $vasyan_textb_day = ' Vasily asks: "Do you remember when I told you about the webcam sites, where you can earn big money for showing some skin?"<br> "Yea, I remember", you answer.<br> "Well, not to long ago I bought a webcam, so that I could video chat on Skype. If you want to use it I wouldn''t mind."<br> "Umm thanks, I will think about it", you say.'
		if vasyan_textb_day = 8 and npc_rel['A11'] >=100: $vasyan_textb_day = ' "Hey <<$pcs_nickname>>, have you checked out the webcam I bought?", Vasily asks.<br> "Yea, I may have checked it out a little", you say.<br> "Well, If you ever want to get on there during the weekend let me know. We could do a show together, and rake in some big bucks", he says with a wink and a smile.<br> "That''s not a bad idea. I''ll have to think about it", you blush.'
		if bazar_count <= 0: 'Vasily says: "<<$pcs_nickname>>, I''m tired of your talk. Leave me alone."'
		if bazar_count > 0: '<<$vasyan_textb_day>>'
		act 'Further': gt 'vasilyhome', 'vasily_bazar_day'
		gs 'stat'
	end
	
	if $ARGS[0] = 'vasily_rep':
    if npc_rel['A11'] < 50:
        'You have known Vasily since childhood'
    elseif npc_rel['A11'] >= 50 and npc_rel['A11'] < 100:
        'You are good friends with Vasily'
    else
        'Vasily is your very close friend'
    end
end

	if shulga_lern_count > 0 and SchoolAtestat = 0:
		act 'Do homework': gt 'vasilyhome', 'vasily_lern'
	end
	act 'Ask for some alcohol': 
		'Vasily gets up and comes back with a bottle of cold vodka from the refrigerator. He takes a big swig of it and then passes it to you.'
		act 'Take the bottle': gt 'vasilyhome', 'vasily_vodka'
	end
	if npc_rel['A11'] >= 70 and stat['think_virgin'] = 0 and (alko >= 1 or pcs_horny >= 30):
		gs 'willpower', 'sex', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Suggest sex (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'self'
				if shgopsex_vasya_count = 0:
					cla
					'Vasily says, "Maybe next time <<$pcs_nickname>>. I''ve had enough for today."'
					act 'Sigh': gt 'vasilyhome', 'livingroom'
				else
					$gopsex_n_npc = 1
					shgopsex_vasya_day = daystart
					shgopsex_vasya_count -= 1
					gs 'boyStat', 'A11'
					gs 'gopsex', 'settings'
					gs 'gopsex', 'shgopsex'
					gs 'stat'
				end
			end
		else
			act 'Suggest sex (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'vasily_vodka':
	menu_off = 1
!!I think I got these if and elses so they will work in order
	if vasily['day_drunk'] >= 8 and vasily['drunk_sex'] > 0:
		*clr & cla
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka4.jpg"></center>'
		'Vasily is now really drunk, so drunk he is barely aware of what is going on. This could be your chance to pay him back for taking advantage of you got drunk with him. You have your strapon in your purse after all.'
		act 'Decide not to get revenge':
			*clr & cla
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka5.jpg"></center>'
			'You think about it, but you just can''t do that to Vasily, even if he might deserve it. So instead you just get up and leave his drunk ass on the couch, while you go home.'
			act 'Leave the apartment': gt 'pod_ezd','etaj_3'
		end
		gs 'willpower', 'action', 'resist', 'medium'
		if will_cost <= pcs_willpwr:
			act 'Decided to get revenge (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'resist'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka5.jpg"></center>'
				'You think about it and decided the asshole deserves it, thinking he can take advantage of a girl when she gets to drunk to say no. Well lets see how he feels when he is on the receiving end for a change. You need to leave the room and go put the strapon harness on, it would be best if he keeps drinking before you spring it on him. "I need to use the bathroom, I''ll be right back. You just keep drinking." You tell him and he grins at you, giving you a thumbs up, before he takes another huge swig of the vodka.'
				act 'Go put on the strapon':
					*clr & cla
					gs 'stat'
					'<center><video autoplay loop src="images/pc/activities/misc/puton_strapon1.mp4"></video></center>'
					'Getting up from the couch you grab your purse and walk out into the hallway and then into the bathroom. You latch the door and pull your strapon harness out of your purse, you slide your legs through the loops and pull it up over your hips. Once it is in place you start pulling the straps tight, once they are all tight you smooth your skirt back down over the strapon, hiding it from view.'
					act 'Return to Vasily':
						*clr & cla
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka6.jpg"></center>'
						'You make your way back to the living room and find Vasily still drinking the vodka, walking over you stop in front of him and pull up your skirt exposing the dildo attached to your strapon harness. He stops and tries to focus on what he is seeing as you say. "Suck my dick, bitch!"'
						'He stares puzzled for a moment, just when you think he is about to do it, he shakes his head. "No, I''m not sucking that." His words are slurred. He starts to take another swig of the vodka, but you reach over take it out of his hand.'
						act 'Bargain the vodka':
							*clr & cla
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka7.jpg"></center>'
							'He tries to reach for the vodka and almost slams his face against your dildo in the process, he keeps trying to reach for the vodka bottle but you just keep pulling it away from him. "I will give you the bottle back if you suck my dick."'
							'He gives you a annoyed look and then looks at the dildo. "You don''t have a real dick."'
							'You smile down at him. "True, so it''s wouldn''t even be gay in the slightest, come on just suck it a little and you can have the vodka back." You say to him in your most sweet and charming voice.'
							act 'Bargain struck':
								*clr & cla
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka8.jpg"></center>'
								'He seems to ponder your words for a moment then sighs. "Fine give me the bottle and then I will suck your what ever." He slurs his words so much you have a little trouble understanding him. Yet you understand him well enough, as you grin and hand him back the bottle of vodka, he takes it from you eagerly and takes a big swig of it, as he eyes you, stroking your dildo like it was a cock.'
								act 'Get your dick sucked': gt 'vasily_home_sex', 'vodka_revenge'
							end
						end
					end
				end
			end
		else
			act 'Decided to get revenge (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	elseif alko >= 6 and fame['pav_slut'] > 100:
		*clr & cla
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/drunk_ev/pjanaja'+rand(1,8)+'.jpg"></center>'
		'You are so drunk the room is spinning around and you can barely focus on anything. You see Vasily smile and get up, he walks over to you and pulls his dick out of his pants and rubs the tip against your lips. "Open your mouth slut."'
		act 'Open your mouth': gt 'vasily_home_sex', 'vasily_vodka_bj'
	elseif alko >= 4 and fame['pav_slut'] <= 100:
		*clr & cla
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/vasya.jpg"></center>'
		'When you ask for another beer he shakes his head no. "Nope I''m cutting you off, good girls don''t get drunk with bad boys like me, you should go home." He refuses to give you another beer and starts to just ignore you.'
		act 'Get up': gt 'vasilyhome', 'livingroom'
	else
		*clr & cla
		minut += 3
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka1.jpg"></center>'
		'After Vasily takes a big swig, you take the bottle from Vasily as the two of you chat about random stuff.'
		act 'Take a swig':
			*clr & cla
			gs 'drugs', 'alcohol', 'beer'
			gs 'stat'
			func('gopsex','hide','gop_text_beer2')
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka2.jpg"></center>'
			'You and Vasily talk about a variety of things, as you take a swig of vodka.'
			gs 'willpower', 'drink', 'self', 'easy'
			if will_cost <= pcs_willpwr:
				act 'You''ve had enough (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'vasilyhome', 'livingroom'
			else
				act 'You''ve had enough (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Have another drink': gt 'vasilyhome', 'vasily_vodka'
		end
		if strapon = 1 and strapnumber > 0 and vasily['drunk_sex'] > 0 and PCLoSkirt > 0:
			act 'Pretend to take a swig':
				*clr & cla
				vasily['day_drunk'] += 1
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/revenge/vodka3.jpg"></center>'
				'You and Vasily talk about a variety of things, you pretend to take a swig of vodka but swallow very little of it before you pass it back to him. As he quickly takes the bottle and takes another swig, you remember last time how the bastard made you give him a blowjob when you got drunk with him. Maybe you should pay him back after he gets drunk.'
				act 'Stop pretending to drink beer': gt 'vasilyhome', 'livingroom'
				act 'Ask another drink': gt 'vasilyhome', 'vasily_vodka'
			end
		end
	end
end

if $ARGS[0] = 'vasily_lern':
	menu_off = 1
	!choice of set pictures
	lern_imgset = rand(1,7)
	if lernHome > 0:
		minut += 60
		lern += rand(1,6)
		gs 'exp_gain', 'intel', rand(1,2) + (mentats_dose - rand(0,mentats_dose))
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/lern/ev<<lern_imgset>>.jpg"></center>'
		'You sit down with Vasily for an hour, and do your homework.'
		if lernHome > 1:
			gs 'grades', 'homework', 'school', 'yes', 2, 1, 'A2'
		else
			gs 'grades', 'homework', 'school', 'yes', 1, 1, 'A2'
		end
		act 'Keeps studying':
			gt 'vasilyhome', 'vasily_lern'
		end
		act 'Take a break':
			gt 'vasilyhome', 'vasily_bazar_day'
		end
	else
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/lern/ev<<lern_imgset>>_1.jpg"></center>'
		if fame['pav_slut'] >= 200:
			'"<<$pcs_nickname>>, there is no way I can concentrate with you in that outfit. Let''s get you out of it, so we can continue", he suggests.'
			'From the way he is pawing at you, it looks like more school work is out of the question'
			'The only questions that remains is: What are you going to do about that bulge in Vasily''s pants?'
			gs 'willpower', 'sex', 'resist'
			if will_cost <= pcs_willpwr:
				act 'You''re not in the mood (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'vasilyhome', 'vasily_lern_sex_no'
			else
				act 'You''re not in the mood (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act iif(pcs_horny >= 50, 'You''re already wet', 'Oh, I suppose'): gt 'vasily_home_sex', 'vasily_lern_sex_yes'
		elseif fame['pav_slut'] < 150:
			'"<<$pcs_nickname>>, if you would like to keep learning, I''ve been told that I''m an excellent teacher", Vasily says as he gently starts to paw at you.'
			'You have a sneaking suspicion that he isn''t talking about the biology assignment.'
			'You stammer: "I... don''t know... would you please..."'
			if stat['think_virgin'] = 0:
				gs 'willpower', 'sex', 'resist', 'easy'
				if will_cost <= pcs_willpwr:
					act 'Stop it (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'resist' & gt 'vasilyhome', 'vasily_lern_sex_no'
				else
					act 'Stop it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end
				act 'Teach me': gt 'vasily_home_sex', 'vasily_lern_sex_yes'
			else
				act 'Stop it': gt 'vasilyhome', 'vasily_lern_sex_no'
			end
		end
	end
end

if $ARGS[0] = 'vasily_lern_sex_no':
	menu_off = 1
	minut += 2
	shulga_lern_day = daystart
	shulga_lern_count -= 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/lern/no.jpg"></center>'
	'"That''s enough, I''m not in the mood. It should be enough that I let you touch me, but if you really want to fuck here you go", you say as you flip your middle finger.'
	'He bursts out laughing, and playfully tries to bite your finger'
	'"Hey, watch those teeth! You are such a good teacher that you might give me ideas", you finish by playfully snapping your teeth at him'
	'He just laughs even harder'
	act 'Stand': gt 'vasilyhome', 'livingroom'
end

if $ARGS[0] = 'bathroom':
	CLOSE ALL
	$menu_loc = 'vasilyhome'
	$menu_arg = 'bathroom'
	$loc_arg = 'bathroom'
	$loc = 'vasilyhome'
	$locM_arg = 'bathroom'
	$locM = 'vasilyhome'
	menu_off = 0

	if soniaPS >= 2:
		temprand = rand(1,10)
		if temprand = 1 and sh_sonya_sexev > 2 and sonya_bazar_count > 0 and ev_sonya_count > 0 and hour <= 23 and ((week < 6 and hour >= 14) or (week >= 6 and hour >= 10)):
			gt 'vasilyhome', 'sonia_ev'
			exit
		elseif temprand = 2 and npc_rel['A112'] >= 20 and sexev_sonya_count > 0 and hour <= 23 and ((week < 6 and hour >= 14) or (week >= 6 and hour >= 10)):
			gt 'vasilyhome', 'sonia_sex'
			exit
		end
	end
	'<center><b><font color = maroon>Bathroom</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/vanna.jpg"></center>'
	*nl
	'Uncle Sergey''s bathroom is small and very unpretentious. Nevertheless, it has everything a bathroom needs. There is a <a href="exec: gt ''mirror'',''start''">mirror</a> above the sink, where you can ' + iif(pcs_hairbsh = 0,'<a href="exec: gt ''mirror'',''brush''">brush</a>','brush') + ' your hair, a shower and a bathtub.'
	if pirsA + pirsB + pirsC + pirsD + pirsE + pirsF + pirsN + pirsG > 0:'<a href="exec:dynamic $pirManage">Manage Piercings</a>'
	act 'Take a shower':
		*clr & cla
		menu_off = 1
		minut += 10
		dynamic $showerdin
		gs 'stat'
		'<center><h4><font color="maroon">Bathroom</font></h4></center>'
		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
		'You take a quick shower.'
		act 'Take a selfie':
			gs 'telefon', 'Phone_selfie_image_bathing', 'shower'
		end
		act 'Get out of the shower': gt 'vasilyhome','bathroom'
	end
	dynamic $bath
	dynamic $bteeth
	dynamic $tampon
	dynamic $basin
	gs 'din_van', 'prvt_pee'
	act 'Leave the bathroom': gt 'vasilyhome', 'hallway'
end

if $ARGS[0] = 'sonia_sex':
	menu_off = 1
	if rand(0,1) = 0:
		gt 'vasily_home_sex', 'sonia_bathroom_sex1'
	else
		gt 'vasily_home_sex', 'sonia_bathroom_sex2'
	end
end

if $ARGS[0] = 'sonia_ev':
	menu_off = 1
	*clr & cla
	minut += 2
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/m.jpg"></center>'
	'When you go to the bathroom, you find Sonia already in there. "Hi!" she says cheerfully, before returning to touching up her make-up.'
	act 'Chat with Sonia': gt 'vasilyhome', 'sonia_chat'
	if sh_sonya_bazar > 5 and mesec <= 0:
		gs 'willpower', 'cuni', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Suggest you take a bath together (<<will_cost>> Willpower)': gs 'willpower', 'cuni', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'vasily_home_sex', 'sonia_les_bathroom'
		else
			act 'Suggest you take a bath together (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
	if sh_sonya_bazar >= 25 and npc_rel['A112'] >= 50 and stat['think_virgin'] = 0:
		gs 'willpower', 'group', 'self'
		if will_cost <= pcs_willpwr:
			act 'Suggest you and Sonia fuck Vasily together (<<will_cost>> Willpower)': gs 'willpower', 'group', 'self' & gs 'willpower', 'pay', 'self' & gt 'vasily_home_sex', 'vasily_3some_sex'
		else
			act 'Suggest you and Sonia fuck Vasily together (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
	act 'Leave the bathroom': gt 'vasilyhome', 'hallway'
end

if $ARGS[0] = 'sonia_chat':
	menu_off = 1
	*clr & cla
	ev_sonya_day = daystart
	ev_sonya_count -= 1
	sonya_bazar_day = daystart
	sonya_bazar_count -= 1
	sh_sonya_bazar += 1
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/b.jpg"></center>'
	sonya_textb_vanna = rand(1,5)
	if sonya_textb_vanna = 1:$sonya_textb_vanna = 'You spend some time chatting about everyday things with Sonia.'
	if sonya_textb_vanna = 2:$sonya_textb_vanna = 'You and Sonia chat for a few minutes about the news and current events.'
	if sonya_textb_vanna = 3:$sonya_textb_vanna = 'Sonia tells you about some interesting encounters she had in the Pavlovsk hotel the other day.'
	if sonya_textb_vanna = 4:$sonya_textb_vanna = 'Sonia tells an interesting story.'
	if sonya_textb_vanna = 5:$sonya_textb_vanna = 'You spend some time chatting with Sonia, mostly sharing what the two of you have done today.'
	'Sorry <<$pcs_nickname>>, I have time to go. Maybe I''ll see you here again so we can chat some more!'
	act 'Return to the hallway': gt 'vasilyhome', 'hallway'
end


if $ARGS[0] = 'vasilykitchen':
	$menu_loc = 'vasilyhome'
	$menu_arg = 'vasilykitchen'
	menu_off = 0
	minut += 1
	gs 'stat'
	gs 'kit_din'
	'<center><b><font color = maroon>Kitchen</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh.jpg"></center>'
	'An uninspiring kitchen, with the basic amenities for life.'
	if hour >= 18 and hour < 21 and ARGS[0] = 0:
		if rand(1,100) < 10:
			'When you enter the kitchen,<<$serg_obr>> <a href="exec:gt ''Serge_kuh'',''kuh_buh''">Sergey</a> gives you a friendly nod. He''s sitting at the kitchen table, drinking vodka.'
		else
			'When you enter the kitchen,<<$serg_obr>> <a href="exec:gt ''Serge_kuh''">Sergey</a> is standing at the kitchen counter preparing a meal.'
		end
	end
	act 'Return to the hallway': gt 'vasilyhome', 'hallway'
	act 'Look in the fridge': gt 'vasilyhome', 'fridge'
	dynamic $dritea
	dynamic $fill_bottle
	dynamic $edasnack
	dynamic $driwater

	!Launch Event with gopotoy kitchen
	if RAND(0,100) <= 5 and fame['pav_slut'] >= 300 and gangsexroom_count > 0 and week < 6 and hour >= 0 and hour < 3 and kotovLoveQW < 1 and gangsexroom_day ! daystart: gt 'vasily_home_sex', 'gang_sex_ev1'
	!===========!
	!FRIDGE!
	!-----------!
	!filling the refrigerator:
	!count-bottles of beer in a day
	if beer_day ! daystart: beer_count = 2
	!count-of glasses in a bottle of vodka
	if vodka_day ! daystart: vodka_count = 5
	!count-in soup plates in kostryule
	if sup_day ! daystart: sup_count = 2
end

if $ARGS[0] = 'fridge':
	menu_off = 1
	*clr & cla
	minut += 1
	gs 'stat'
	if beer_count = 2:
		$r_beer = ' 2 beers,'
	elseif beer_count = 1:
		$r_beer = ' 1 beer,'
	else
		$r_beer = ''
	end
	if vodka_count = 5:
		$r_vodka = ' a full bottle of vodka,'
	elseif vodka_count = 3:
		$r_vodka = ' a half-empty bottle of vodka,'
	elseif vodka_count = 1:
		$r_vodka = ' a nearly empty bottle of vodka,'
	else
		$r_vodka = ''
	end

	if sup_count >= 1:
		$r_sup = ' a large pot of soup'
	else
		$r_sup = ''
	end
	if beer_count = 0 and vodka_count = 0 and sup_count = 0:$r_pusto = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/holodpusto.jpg"></center><br><font color = red>empty shelves.</font>'
	if beer_count > 0 and vodka_count > 0 and sup_count > 0:$r_pusto = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/holod'+rand(1,3)+'.jpg"></center>'
	*nl
	'You open the fridge and see:<<$r_vodka>><<$r_beer>><<$r_sup>><<$r_pusto>>'
	act 'Close the refrigerator': gt 'vasilyhome', 'vasilykitchen'

	!drink beer
	if beer_count > 0:
		act 'Drink a beer':
			*clr & cla
			minut += 5
			gs 'drugs', 'alcohol', 'beer', 1
			beer_day = daystart
			beer_count -= 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/beer'+rand(1,3)+'.jpg"></center>'
			*nl
			'You take a bottle of beer from the fridge and drink it, quenching your thirst.'
			act 'Keep looking around': gt 'vasilyhome', 'fridge'
			act 'Close the refriderator': gt 'vasilyhome', 'vasilykitchen'
		end
	end
	!drink vodka
	if vodka_count > 0:
		act 'Drink some vodka':
			*clr & cla
			minut += 1
			gs 'drugs', 'alcohol', 'vodka', 1
			vodka_day = daystart
			vodka_count -= 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/vodka'+rand(1,2)+'.jpg"></center>'
			'You pour some vodka in a glass and drink it. You shiver as you feel the warm, burning sensation slowly slide down your gullet.'
			*nl
			act 'Put the bottle back in the fridge': gt 'vasilyhome', 'fridge'
			act 'Drink more vodka':
				if vodka_count = 0: '<font color = red>There''s no vodka left, you drank it all!</font><center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/vodka0.jpg"></center>'
				if vodka_count > 0:
					minut += 1
					gs 'drugs', 'alcohol', 'vodka', 1
					vodka_day = daystart
					vodka_count -= 1
					gs 'stat'
					'You pour yourself another glass and drain it in one gulp. Wow, that stuff is strong!'
					act 'Put the bottle back in the fridge': gt 'vasilyhome', 'fridge'
				end
			end
		end
	end
	!Chava soup
	if sup_count > 0:
		act 'Eat a bowl of soup':
			*clr & cla
			minut += 5
			sup_day = daystart
			sup_count -= 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/kuh/sup.jpg"></center>'
			*nl
			pcs_health += 10
			pcs_mood += 20
			fat += 2
			pcs_energy += 50
			if pcs_hydra >= 100:
				pcs_hydra += 20
			else
				pcs_hydra += 40
			end
			cumspclnt = 2
			gs 'cum_cleanup'
			pcs_breath = 0
			'You happily eat a bowl of soup. It''s good soup,<<$serg_obr>> Sergey sure knows how to cook!'
			act 'Keep looking around': gt 'vasilyhome', 'fridge'
			act 'Close the refriderator': gt 'vasilyhome', 'vasilykitchen'
		end
	end
end

if $ARGS[0] = 'sergey_room':
	$menu_loc = 'vasilyhome'
	$menu_arg = 'sergey_room'
	$locM_arg = 'sergey_room'
	$locM = 'vasilyhome'
	$loc_arg = 'sergey_room'
	$loc = 'vasilyhome'
	menu_off = 0
	$locclass = 'bedr'
	CLOSE ALL
	$track_loop = ''
	music_loop = 1
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><b><font color = maroon>Uncle Sergey''s bedroom</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom.jpg"></center>'
	'Sergey''s bedroom looks just like any other bedroom. There''s a large bed, a television with a VCR connected to it, and a large cabinet to store clothes in. A random amount of junk is deposited on one of the nightstands.'
	if hour < 7 or hour >= 23:
		'When you come in, you see that<<$serg_obr>> <a href="exec: gt ''Serge_Shulgin'',''sleep''">Sergey</a> is currently on his bed, sound asleep.'
	elseif hour < 18 or hour >= 21:
		if week < 6 and hour < 16:
			gs 'vasilyhome', 'sleep'
		else
			'When you come in, you see that<<$serg_obr>> <a href="exec: gt ''Serge_Shulgin'',''tv''">Sergey</a> is relaxing on his bed, watching TV.'
		end
	end
	act 'Return to the hallway': gt 'vasilyhome', 'hallway'
end

!sleep when the bed is empty
if $ARGS[0] = 'sleep':
	menu_off = 1
	act 'Lie down and take a nap (2:00)':
		cla
		pcs_sleep += 20
		pcs_health += 5
		minut += 120
		gs 'stat'
		'Since Sergey isn''t using his bed, you''re sure he won''t mind if you take a nap here. You lie down under the covers and snooze for a few hours, feeling a less tired when you wake up again.'
		act 'Get out of bed': gt 'vasilyhome', 'sergey_room'
	end
end

if $ARGS[0] = 'vasily_room':
	$menu_loc = 'vasilyhome'
	$menu_arg = 'vasily_room'
	$locM_arg = 'vasily_room'
	$locM = 'vasilyhome'
	$loc_arg = 'vasily_room'
	$loc = 'vasilyhome'
	menu_off = 0
	$locclass = 'bedr'
	CLOSE ALL
	$track_loop = ''
	music_loop = 1
	*clr & cla
	minut += 1
	gs 'stat'
	'<center><h4><font color="maroon">Vasily''s Room</font></h4></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/vasily_room.jpg"></center>'
	'There is a dresser and small desk on one side of the room. There is posters of bands and have naked women along the walls. It is a messy room, you can barely see the floor under all the clothes laying around. You can''t really tell if they are dirty or clean, not to mention the room smells of stale sweat, weed, stale beer and maybe a hint of urine.'
	if hour >= 0 and hour < 7: 
		'<a href="exec: gt ''vasilyhome'', ''vasily_asleep''">Vasily</a> is sleeping on his narrow bed'
	else
		'A narrow <a href="exec:gt ''vasilyhome'',''vasily_bed''">bed</a> is against the other wall.'
	end
	act 'Return to the hallway': gt 'vasilyhome', 'hallway'
end

if $ARGS[0] = 'vasily_bed':
	$menu_loc = 'vasilyhome'
	$menu_arg = 'vasily_bed'
	menu_off = 0
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/vasily_room.jpg"></center>'
	'You lie down on her bed and roll over. You take a deep breath to find the pillow smells just like her. There is not much to do on the bed without Anushka and you start feeling a bit bored, wishing Anushka was here.'
	act 'Get out of the bed': gt 'vasilyhome', 'vasily_room'
	act 'Take a nap': gt 'vasilyhome', 'sleep_vasily_bed'
end

if $ARGS[0] = 'sleep_vasily_bed':
	menu_off = 1
	cla
	npc_rel['A11'] += 1
	if pcs_sleep >= 60:
		pcs_sleep = 100
	else
		pcs_sleep += 40
	end
	minut += 240
	'You lay down and sleep for a few hours.'
	act 'Get up': gt 'vasilyhome', 'vasily_room'
	gs 'stat'
end
	
if $ARGS[0] = 'vasily_asleep':
	menu_off = 1
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/vasya/vasya_sleep.jpg"></center>'
	'Vasily fast asleep'
	act 'Leave': gt 'vasilyhome', 'hallway'
	act 'Wake up':
		if npc_rel['A11'] < 50: gt 'vasilyhome', 'vasily_asleep1'
		if npc_rel['A11'] >= 50: gt 'vasilyhome', 'vasily_asleep2'
	end
	gs 'stat'
end

if $ARGS[0] = 'vasily_asleep1':
	menu_off = 1
	cla
	minut += 2
	npc_rel['A11'] -=1
	'What do you want <<$pcs_nickname>>, can''t you see I''m sleeping?!'
	'"Vasily may I lay next to you while I sleep?", you asked'
	'"Go get some sleep on a small couch or just go home you big baby," Vasily answered.'
	act 'Leave': gt 'vasilyhome', 'hallway'
	gs 'stat'
end

if $ARGS[0] = 'vasily_asleep2':
	menu_off = 1
	cla
	minut += 2
	gs 'stat'
	'Vasily rubbed his eyes and asks: "What do you want <<$pcs_nickname>>?"'
	'You plead: "Vasily can I sleep next to you? I can''t get comfortable on the little sofa"'
	'He couldn''t refuse you, and he scooched over to let you into the bed.'
	act 'Take a nap': gt 'vasilyhome', 'sleep_vasily_bed'
	if npc_rel['A11'] >= 70:
		gs 'willpower', 'sex', 'self', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Suggest fuck (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'self'
				if shgopsex_vasya_count = 0:
					cla
					'Vasily says: "<<$pcs_nickname>>, I''m beat let''s just call it a day. Go away and let me sleep."'
					act 'Sigh': gt 'vasilyhome', 'hallway'
				elseif shgopsex_vasya_count > 0:
					$gopsex_n_npc = 1
					shgopsex_vasya_day = daystart
					shgopsex_vasya_count -= 1
					gs 'boyStat', 'A11'
					gs 'gopsex', 'settings'
					gs 'gopsex', 'shgopsex'
				end
			end
		else
			act 'Suggest fuck (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

--- vasilyhome ---------------------------------