glife/locations/beg1.qsrc

# beg1

if $ARGS[0] = 'start':
	*clr & cla
	menu_off = 1
	gs 'stat'
	minut += 30
	kolsorev += 1
	razdtumbler = 0
	begmon = month
	begminus = 0

	if razradbeg = 0:
		'You''re registered for an amateur''s race. The results will determine if you join the club''s junior squad and entry in the semi-professional runner circuit.'

		act 'Go to the track field.':gt 'beg1', 'br'
	elseif razradbeg = 1:
		'As a member of your club''s junior squad, you''re registered for a semi-professional''s race. The results will determine if you join the veteran squad.'

		act 'Go to the track field.':gt 'beg1', 'kms'
	elseif razradbeg = 2:
		'As a member of your club''s veteran squad, you''re registered for a semi-professional''s race. The results will determine your entry in the professional runner circuit.'

		act 'Go to the track field.':gt 'beg1', 'ross'
	elseif razradbeg >= 3 and razradbeg < 14:
		'As one of your club''s best athletes, you can take part in a series of qualifying races in the professional circuit. Winning 9 out of 11 would qualify you for the St. Petersburg Track Championship, that is celebrated seasonally.'
		nl
		'Qualifying Races Attended: <<razradbeg - 3>>'
		'Top 3 finishes in Qualifying Races: <<razradbegK>>'

		act 'Go to the stadium':gt 'beg1', 'kval'
	elseif razradbeg = 14 and razradbegK < 9:
		cla
		razradbegK = 0
		razradbeg = 3
		'You were unable to qualify for the St. Petersburg Championship.'

		! WD: Argument is 'dressing room'
		act 'Go back to the dressing room':gt 'fit', 'dressing room'
	elseif razradbeg = 14 and razradbegK >= 9:
		cla
		razradbegK = 0
		razradbeg = 3
		'You qualified for the <<year>> St. Petersburg Track Championship, taking place this season in the Petrovsky Stadium.'

		act 'Go to the stadium':gt 'beg1', 'evro'
	end
end

if $ARGS[0] = 'br':
	cla
	gs 'exercise', 'tier2', 30, 'run'

	begminus = 0
	if pcs_bmi > 25:
		begminus = ((pcs_bmi - 25)*4)
	elseif pcs_bmi < 20:
		begminus = ((20 - pcs_bmi)*(20-pcs_bmi))
	end
	begresult = pcs_run - begminus

	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/ready.jpg"></center>'
	'Your discipline: The Women''s 400 Meter Dash.'
	'After changing into your running gear, you spend some time warming up near the track before the race starts. Beyond some casual bystanders and encouraging familiars, no spectators are attending this competition.'
	'When you and the other runners are called, you walk to your starting position, tense but ready.'
	wait 725
	'You get in position. Then, you hear the starting shot: The race begins!'
	wait 725
	'On your marks...'
	wait 725
	'Get set...'
	wait 725
	'Go! - You''re away!'
	wait 725

	if begresult < 5:
		grupvalue[2] -= 3
		'Sadly, you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
	elseif begresult < 10:
		grupvalue[2] -= 2
		'You performed well for an amateur but still only came in last (8th place).'
	elseif begresult < 15:
		grupvalue[2] -= 1
		'You fought hard, but managed to only take the penultimate place (7th place).'
	elseif begresult < 20:
		'You fought hard, but only managed to take 6th place.'
	elseif begresult < 35:
		grupvalue[2] += 1
		'You fought hard, but only managed to take 5th place.'
	elseif begresult < 40:
		grupvalue[2] += 2
		'You fought hard, but only managed to take 4th place.'
	elseif begresult < 45:
		grupvalue[2] += 3
		gs 'fame', 'city', 'running', 14
		bronzebeg += 1 & money += 150 & 'You fought hard and managed to take 3rd place, earning a prize: You receive a bronze badge and a prize of 150 <b>₽</b>'
	elseif begresult < 50:
		grupvalue[2] += 4
		gs 'fame', 'city', 'running', rand(14,15)
		silverbeg += 1 & money += 300 & 'You fought hard and managed to take 2nd place, earning a prize: You receive a silver badge and a prize of 300 <b>₽</b>'
	else
		grupvalue[2] += 5
		gs 'fame', 'city', 'running', rand(14,16)
		razradbeg = 1 & goldbeg += 1 & money += 600 & 'You fought hard and managed to take 1st place! You receive a gold badge, a prize of 600 <b>₽</b> and are now part of your club''s junior squad, performing at the semi-professional level.'
	end

	act 'Leave':gt 'fit', 'dressing room'
end

if $ARGS[0] = 'kms':
	cla
	gs 'exercise', 'tier2', 30, 'run'

	begminus = 0
	if pcs_bmi > 25:
		begminus = ((pcs_bmi - 25)*4)
	elseif pcs_bmi < 20:
		begminus = ((20 - pcs_bmi)*(20-pcs_bmi))
	end
	begresult = pcs_run - begminus

	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/ready.jpg"></center>'
	'Your discipline: The Women''s 400 Meter Dash.'
	'After changing into your running gear, you spend some time warming up near the track before the race starts. Beyond the encouraging familiars, now, you appreciate some genuinely interested spectators, some with cameras, but, even with that, no more than a hundred spectators are attending this competition. The track field is far from full.'
	'When you and the other runners are called, you walk to your starting position, tense but ready.'
	wait 725
	'You get in position. Then, you hear the starting shot: The race begins!'
	wait 725
	'On your marks...'
	wait 725
	'Get set...'
	wait 725
	'Go! - You''re away!'
	wait 725

	if begresult < 20:
		grupvalue[2] -= 2
		razradbeg = 0 & 'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right? Your performance is so atrocious that the coach decides to return you to the amateur rank.'
	elseif begresult < 25:
		grupvalue[2] -= 1
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You didn''t manage to reach any classification.'
	elseif begresult < 30:
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
	elseif begresult < 35:
		'You fought hard, but managed to only take the penultimate place (7th place).'
	elseif begresult < 40:
		grupvalue[2] += 1
		'You fought hard, but only managed to take 6th place.'
	elseif begresult < 45:
		grupvalue[2] += 2
		'You fought hard, but only managed to take 5th place.'
	elseif begresult < 50:
		grupvalue[2] += 3
		gs 'fame', 'city', 'running', 14
		'You fought hard, but only managed to take 4th place.'
	elseif begresult < 55:
		grupvalue[2] += 4
		gs 'fame', 'city', 'running', rand(14,15)
		bronzebeg += 1 & money += 300 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 300 <b>₽</b>'
	elseif begresult < 60:
		grupvalue[2] += 5
		gs 'fame', 'city', 'running', rand(14,16)
		silverbeg += 1 & money += 600 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 600 <b>₽</b>'
	else
		grupvalue[2] += 6
		gs 'fame', 'city', 'running', rand(14,17)
		razradbeg = 3 & goldbeg += 1 & money += 1000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 1,000 <b>₽</b> and are now part of your club''s veteran squad, performing at the semi-professional level.'
	end
	act 'Leave':gt 'fit', 'dressing room'
end

if $ARGS[0] = 'ross':
	cla
	gs 'exercise', 'tier2', 30, 'run'

	begminus = 0
	if pcs_bmi > 25:
		begminus = ((pcs_bmi - 25)*4)
	elseif pcs_bmi < 20:
		begminus = ((20 - pcs_bmi)*(20-pcs_bmi))
	end
	begresult = pcs_run - begminus

	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/ready.jpg"></center>'
	'Your discipline: The Women''s 400 Meter Dash.'
	'After changing into your running gear, you spend some time warming up near the track before the race starts. Familiars, the club''s fans, track''s lovers and students on a school trip, fill the place. You even see some photo journalists. All of them showing genuine interest in this competition. A gross appraisal put the spectators'' numbers in several hundred attending this competition. The track field is in full occupation.'
	'When you and the other runners are called, you walk to your starting position, tense but ready.'
	wait 725
	'You get in position. Then, you hear the starting shot: The race begins!'
	wait 725
	'On your marks...'
	wait 725
	'Get set...'
	wait 725
	'Go! - You''re away!'
	wait 725

	if begresult < 30:
		razradbeg = 1 & 'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right? Your performance is so atrocious that the coach decides to return you to the junior rank.'
	elseif begresult < 35:
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You didn''t manage to reach any classification.'
	elseif begresult < 40:
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
	elseif begresult < 45:
		grupvalue[2] += 1
		'You fought hard, but managed to only take the penultimate place (7th place).'
	elseif begresult < 50:
		grupvalue[2] += 2
		'You fought hard, but only managed to take 6th place.'
	elseif begresult < 55:
		grupvalue[2] += 3
		gs 'fame', 'city', 'running', 14
		'You fought hard, but only managed to take 5th place.'
	elseif begresult < 60:
		grupvalue[2] += 4
		gs 'fame', 'city', 'running', rand(14,15)
		'You fought hard, but only managed to take 4th place.'
	elseif begresult < 65:
		grupvalue[2] += 5
		gs 'fame', 'city', 'running', rand(14,16)
		bronzebeg += 1 & money += 600 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 600 <b>₽</b>'
	elseif begresult < 70:
		grupvalue[2] += 6
		gs 'fame', 'city', 'running', rand(14,17)
		silverbeg += 1 & money += 1000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 1,000 <b>₽</b>'
	else
		grupvalue[2] += 7
		gs 'fame', 'city', 'running', rand(14,18)
		razradbeg = 3 & goldbeg += 1 & money += 1500 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 1,500 <b>₽</b> and gain entry to the professional circuit.'
	end
	act 'Leave':gt 'fit', 'dressing room'
end

if $ARGS[0] = 'kval':
	cla
	gs 'exercise', 'tier2', 30, 'run'
	razradbeg += 1
	minut += 60

	begminus = 0
	if pcs_bmi > 25:
		begminus = ((pcs_bmi - 25)*4)
	elseif pcs_bmi < 20:
		begminus = ((20 - pcs_bmi)*(20-pcs_bmi))
	end
	begresult = pcs_run - begminus

	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/ready.jpg"></center>'
	'Your discipline: The Women''s 400 Meter Dash.'
	'At the professional level, your club takes you, to the Petrovsky Stadium. After changing into your running gear, you spend some time warming up before the race starts and observe the current attendance. Now, this is what you call a spectacle. Thousands of people, come to see the race, including photo journalists, TV crews and all class of sports enthusiasts. Even with that, the stadium is far from full, with maybe a quarter capacity, that is around 5000 spectators.'
!! Took the Krestovsky Stadium for reference. !!THX note. the  Krestovsky Stadium is football-only. Better use the Petrovsky Stadium(20000), have track fields.
	'When you and the other runners are called, you walk to your starting position, tense but ready.'
	wait 725
	'You get in position. Then, you hear the starting shot: The race begins!'
	wait 725
	'On your marks...'
	wait 725
	'Get set...'
	wait 725
	'Go! - You''re away!'
	wait 725

	if begresult < 40:
		grupvalue[2] -= 1
		razradbeg = 2 & razradbegK = 0 & 'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right? Your performance is so atrocious that the coach decides to return you to the semi-professional rank.'
	elseif begresult < 45:
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You didn''t manage to reach any classification.'
	elseif begresult < 50:
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
	elseif begresult < 55:
		grupvalue[2] += 2
		'You fought hard, but managed to only take the penultimate place (7th place).'
	elseif begresult < 60:
		grupvalue[2] += 3
		gs 'fame', 'city', 'running', 14
		'You fought hard, but only managed to take 6th place.'
	elseif begresult < 65:
		grupvalue[2] += 4
		gs 'fame', 'city', 'running', rand(14,15)
		'You fought hard, but only managed to take 5th place.'
	elseif begresult < 70:
		grupvalue[2] += 5
		gs 'fame', 'city', 'running', rand(14,16)
		'You fought hard, but only managed to take 4th place.'
	elseif begresult < 75:
		grupvalue[2] += 6
		gs 'fame', 'city', 'running', rand(14,17)
		razradbegK += 1 & bronzebeg += 1 & money += 1000 & 'You fought hard and managed to take 3rd place, earning a prize. You get a bronze badge and a prize of 1,000 <b>₽</b>, but sadly, only the 1st place adds to your qualification for the European championship.'
	elseif begresult < 80:
		grupvalue[2] += 7
		gs 'fame', 'city', 'running', rand(14,18)
		razradbegK += 1 & silverbeg += 1 & money += 1500 & 'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 1,500 <b>₽</b>, but sadly, only the 1st place adds to your qualification for the European championship.'
	else
		grupvalue[2] += 8
		gs 'fame', 'city', 'running', rand(14,19)
		razradbegK += 1 & goldbeg += 1 & money += 2000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 2,000 <b>₽</b> and are one step closer to qualifying for the St. Petersburg Championship.'
	end
	act 'Leave':gt 'fit', 'dressing room'
end

if $ARGS[0] = 'evro':
	cla
	gs 'exercise', 'tier2', 30, 'run'
	minut += 120

	begminus = 0
	if pcs_bmi > 25:
		begminus = ((pcs_bmi - 25)*4)
	elseif pcs_bmi < 20:
		begminus = ((20 - pcs_bmi)*(20-pcs_bmi))
	end
	begresult = pcs_run - begminus

	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/ready.jpg"></center>'
	'Your discipline: The Women''s 400 Meter Dash.'
	'This is the highest competition in the St. Petersburg area. From here, the professional runners, jump to the regional, national and eventually international scene. You will eventually reach those levels, with the possibility to reach the country Olympic Team, but for the moment, it is better if you concentrate on reaching the St. Petersburg Championship.'
	'After changing into your running gear, you spend some time warming up before the race starts and observe the current attendance. The Petrovsky Stadium''s personnel is in full gear to manage the wave of spectators, journalist, and others that run around. Even with the fact, that track & field don''t attract the same attention level that football, it is evident that this is a great event, with maybe around 10000 spectators.'
	'When you and the other runners are called, you walk to your starting position, tense but ready.'
	wait 725
	'You get in position. Then, you hear the starting shot: The race begins!'
	wait 725
	'On your marks...'
	wait 725
	'Get set...'
	wait 725
	'Go! - You''re away!'
	wait 725

	if begresult < 50:
		grupvalue[2] -= 1
		razradbeg = 2 & razradbegK = 0 & 'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right? Your performance is so atrocious that the coach decide to return you to the semi-proffessional rank.'
		gs 'fame', 'city', 'running', rand(14,19)
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 55:
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You didn''t manage to reach any classification.'
		gs 'fame', 'city', 'running', rand(15,21)
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 60:
		gs 'fame', 'city', 'running', rand(16,23)
		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 65:
		grupvalue[2] += 1
		gs 'fame', 'city', 'running', rand(18,25)
		'You fought hard, but managed to only take the penultimate place (7th place).'
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 70:
		grupvalue[2] += 2
		gs 'fame', 'city', 'running', rand(20,25)
		'You fought hard, but only managed to take 6th place.'
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 75:
		grupvalue[2] += 3
		gs 'fame', 'city', 'running', rand(25,50)
		'You fought hard, but only managed to take 5th place.'
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 80:
		grupvalue[2] += 4
		gs 'fame', 'city', 'running', rand(50,100)
		'You fought hard, but only managed to take 4th place.'
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 85:
		grupvalue[2] += 6
		gs 'fame', 'city', 'running', 'BronzeMedal'
		razradbegEB += 1
		money += 10000
		'You fought hard and managed to take 3rd place, earning a prize. You get a bronze medal and a prize of 10,000 <b>₽</b>'
		act 'Leave':gt 'fit', 'dressing room'
	elseif begresult < 90:
		grupvalue[2] += 8
		gs 'fame', 'city', 'running', 'SilverMedal'
		razradbegES += 1
		money += 15000
		'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 15,000 <b>₽</b>'
		act 'Leave':gt 'fit', 'dressing room'
	else
		grupvalue[2] += 10
		gs 'fame', 'city', 'running', 'GoldMedal'
		razradbegEG += 1
		money += 20000
		'You fought hard and managed to take 1st place. You get a gold medal, a prize of 20,000 <b>₽</b> and are now the "St. Petersburg Track Champion"!'
		act 'Continue': gt 'beg1', 'Family extension'
	end
end

if $ARGS[0] = 'Family extension':
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/St_Petersburg_run_win.jpg"></center>'
	if curr_home = 2:
		if npc_rel['A34'] > 50:
			minut += 10
			gs 'stat'
			'As you receive congratulations from your coach and fellow competitors you have look towards the crowd to acknowledge their support. You are surprised to see your Mum frantically waving at you and trying to make her way down to the track-side.'
			'Breaking out into a huge grin you jog over to the barrier and reach over and you hug each other.'
			'"Well done Sveta, that was some race! Oh my! My little girl... The Saint Petersburg Track champion! Where to next, National races? Anyway, I just had to come when I saw your name on the start list for the race in the local paper; I know you''ve been training hard but I never expected that you''d be at this level. Wow! I''m so proud of you! Now give me another hug."'
			'You lean over and hug you mum. "Thanks for coming Mum I didn''t mention it as I wasn''t sure how well I''d do and I didn''t want to put any pressure on you to attend given we aren''t exactly flush with money."'
			'Mum hugs you close while continuing, "Oh Sveta really?! Of course I''d come. Whatever differences we''ve had you''re my daughter and I love you and want the best for you."'
			if npc_rel['A33'] > 50:
				'At this point you feel a soft punch on your arm and look up to see your sister, Anya standing behind your mum grinning at you and you. You both open your arms and include her in the hug.'
				'"At last! I got stuck behind some folks following mum down. Anyway, well done Sveta, that was fast, not far off Olympic times!"'
				'With a big grin you take half a step back and looking at them you say "Right well this calls for a family celebration ladies. Let me get showered and changed and I''ll meet you outside. I''ve got an idea..."'
			else
				'After the hug mum looks around as if searching for someone.'
				'"You OK mum? Have you lost someone?"'
				'"Yes, well Anya is with me. I asked her to come to see you and do a bit of shopping after but I can''t see her. She must have got stuck on the way down. Well never mind, at least I got to hug my little girl. OK well you get showered and changed and I''ll wait for you and Anya in reception."'
				'"OK mum sounds like a plan. Anyway I''ve got an idea as I think this calls for something special."'
			end
			act 'Go for a shower':
				*clr & cla
				dynamic $showerdin
				if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
				pcs_hairbsh = 1
				'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
				'You have a shower and get dressed.'
				minut += 10
				gs 'stat'	
				act 'Go meet your family':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/desk>"</center>'
					'Meeting your mum and sister in the reception of the Havana fitness centre and with a big grin you propose "Right ladies, how about a special treat if I can arrange it? How about the three of us head over to Babel and try to get in for a meal?"'
					'Both your mum and Anya look at you as if you''ve gone mad and your mum answers, "Sveta, first off we aren''t dressed for that place, it''s too posh and even if we were there''s no way we could afford it."'
					'Still grinning you answer "Well that''s why I said ''if I can arrange it''. Let''s try and if it doesn''t work we can always head over to the diner."'
					'They both look at each other then back at you but don''t say anything. "Right, well I''ll take that as a yes then."'
					'You all leave and head towards Babel.'	
					minut += 5
					gs 'stat'
					act 'Go to the restaurant':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/expensiverest/restoran>"</center>'
						'You approach the maître d''.'
						'As expected he initially refuses your party entry to the restaurant.'
						'You briefly explain that you''ve just become the Saint Petersburg track champion for the 100 meter sprint and show him your gold medal by way of proof.'
						'He remains doubtful but he asks you "OK young lady can you please tell me your name?"'
						'"Sveta Lebedev" you reply.'
						'"OK Sveta, one second please." He turns around and approaches a table in the lobby with some national, international and local papers displayed and checks the local paper then returns to you.'
						minut += 5
						gs 'stat'
						act 'Convince him':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/expensiverest/maitredseat>"</center>'
							'After a brief conversation with him he disappears for a couple of minutes and returns and beckons your mum and Anya to join you. Once they are with you he smiles and tells you "Well normally we wouldn''t allow entry as we have a strict dress code, however, given the circumstances I''m pleased to tell you that you are all most welcome to eat here as it''s such a special occasion. After all it''s not every day that we have the Saint Petersburg 100 meter sprint champion eating in our fine establishment".'
							'He continues "The manager has also asked me to let you know that you''ll all eat free tonight with a complimentary bottle of champagne. There is 1 condition though..."'
							*nl
							'You look at him a little warily, "OK, thanks. Umm and the condition?"'
							'He breaks into a big grin "Well now... That''s very simple... We take a photo of you displaying your gold medal to include in our advertising to say that you ate here with your lovely sisters after winning the race."'
							'At this point your mum blushes and goes bright red as you answer him "No problem, it''ll be our pleasure... That is once my mum stops blushing and my sister stops giggling!"'
							'"Your mum?" He enquires.'
							'"Yep", although as you can tell by how red she''s gone she clearly likes your compliment.'
							'He continues "Also one photo of you and I which I''ll ask you to sign so I can show my kids."'
							'"Of course, let''s get that done while my mum recovers her poise."'
							minut += 5
							gs 'stat'
							act 'Have dinner':
								*clr & cla
								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/expensiverest/seated>"</center>'
								'After the photo is taken the maître d'' leads you to your table where you all sit down.'
								'About 90 minutes later you are full, having enjoyed a lovely meal and have a light buzz from the champagne.'
								'You all head out and you pause to thank the maître d'' for his kindness in allowing you all to enter and you also ask him to pass on your thanks to the manager for offering the meal for free.'
								'Outside you all have another hug and you thank them both for coming before you part ways.'
								'Your sister winks at you and as she waves good bye she says "Well Sveta, thanks for that; I never thought I''d get to eat there. Guess you''ve already started getting used to having some fame!"'
								'Your mum adds her agreement. "Me neither, that was a special treat. Now don''t let this go to your head too much I still want you to work hard as a good education is important too."'
								'Smiling you answer. "Yes mum I know. See you both later."'
								'You are in the city centre. What shall I do now you think to yourself.'
								frost = 0
								pcs_health += 30
								pcs_mood += 40
								fat += 6
								pcs_energy += 50
								if pcs_hydra >= 100:
									pcs_hydra -= 5
								else
									pcs_hydra -= 10
								end
								cumspclnt = 2
								gs 'cum_cleanup'
								pcs_breath = 0
								minut += 90
								gs 'drugs', 'alcohol', 'champagne', 2
								gs 'food', 'golub'
								act 'Go to the city center': gt 'city_center', 'start'
							end
						end
					end
				end
			end
		end
	end
else
	if npc_rel['A33'] > 50:
		'As you receive congratulations from your coach and fellow competitors you have look towards the crowd to acknowledge their support. You are surprised to see your sister frantically waving at you and trying to make her way down to the track-side.'
		'Breaking out into a huge grin you jog over to the barrier and reach over give each other a hug.'
		'"Hey Sveta, go girl, that was some race. I knew you were into your running but never thought you were at this level, well done!" After another big hug she continues. "This calls for a celebration. Lets go for a few beers... You can always burn it off later hehe. I know a cool bar just a short metro ride from here."'
		'"Thanks for coming sis, it means a lot."'
		'"What else sis? Anyway how come you never told me? It was lucky as I only found out because the coach mentioned it to me last week while I was hanging out with Roma and the crew outside the community center. I wasn''t going to miss the opportunity together a possible little celebration with my little sis was I?"'
		'"OK cool, yeah I''m up for that let me go and shower and change first."'
		'"OK just don''t be too long or I may have to leave without you hehe."'
		act 'Go for a shower':
			*clr & cla
			dynamic $showerdin
			if deodorant_on = 1: gs 'sweat', 'remove_deo' & 'Your deodorant gets washed away in the shower.'
			pcs_hairbsh = 1
			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
			'You have a shower and get dressed.'
			*nl
			'After your shower you meet Anya in the reception and head off to the metro.'
			minut += 10
			gs 'stat'	
			act 'Go to the bar':
				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metro"></center>'
				*clr & cla
				'You take the metro to the industrial area and head towards the Rabotnik bar.'
				minut += 20
				gs 'stat'	
				act 'Hava a drink':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar"></center>'
					'Both you and Anya make your way to the bar and order a couple of beers and drink them at the bar.'
					'When you''ve both finished your beer you order another and head towards the pool table.'
					gs 'drugs', 'alcohol', 'beer', 1
					minut += 15
					gs 'stat'	
					act 'Play pool':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/locations/city/industrial/sex/poolw"></center>'
						'You both enjoy a game of pool and after the game Anya heads off to the bar to get another couple of beers.'
						'In the meantime you set the table up for another game.'
						gs 'drugs', 'alcohol', 'beer', 1
						minut += 15
						gs 'stat'	
						act 'Another game':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/locations/city/industrial/sex/pooll"></center>'
							'A further 15 minutes pass before you take your final shot and win the game.'
							'"OK Sveta that''s one game each. Let''s have one more beer then I''ve got to be going."'
							'"Sounds good sis". After a final beer you both leave the bar and Anya gives you a final big hug and hurries off. "See you later sis and well done again."'
							'You are in the industrial area of Saint Petersburg. What shall I do now you think to yourself.'
							gs 'drugs', 'alcohol', 'beer', 2
							minut += 15
							gs 'stat'
							act 'Leave the bar': gt 'city_industrial', 'start'
						end
					end
				end
			end
		end
	else
		gt 'fit', 'dressing room'
	end
end

--- beg1 ---------------------------------