glife/locations/pushkin_ballet_secrets.qsrc

# pushkin_ballet_secrets
!! Author: Hooded Silence
!! Date Created: Nov, 2023
!! Version: .01
!! Version: .02 - added ballet lessons, and tweaked training stats growth.
!! Author: Hooded Silence
!! A dance shop which includes ballet, gymnastics and physio-therapy sources. Alternative path to ballet or dance career in second year and first.
!! TODO: - NPCs to be created

$default_img_path = 'locations/pushkin/ballet_secrets/'

if $ARGS[0] = 'init':
	*clr & cla
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets'
	$setloc['StageImage'] =	'<<$default_img_path>>ballet-shop-window.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'
	minut += 5
	gs 'stat'
	if week < 7 and hour >= 9 and hour <= 17:
		'You enter the shop getting greeted by a riot of displays showcasing ballet and other dance equipment. A woman is sewing something in the corner and glances at you before continuing.'
		if balletqw['ballet_secrets'] = 1:
			act 'Approach the woman': gt $loc, 'first_visit'
		else
			act 'Leave the shop': gt 'pushkin_sq'
			act 'Enter the fitness studio': gt $loc, 'reception'
			!! act 'Talk to assistant':
			!! act'Look at equipment'
			!! act 'look at dance wear'
		end
	else
		'You look at the shop window and realize it''s closed, there is a security door to the left of you that allows you access the studio areas if you are a member.'
		act 'Return to Okhlopkov Square' : gt 'pushkin_sq'
		if balletqw['membership'] >= daystart:
			act 'Swipe membership card': gt $loc, 'reception'
		end
	end
end

!! Intro

if $ARGS[0] = 'first_visit':
	balletqw['ballet_secrets_visit'] = 1
	balletqw['shoe_order'] = daystart + 14
	$setloc['StageImage'] =	'<<$default_img_path>>ballet_secrets_fitting_1.jpg'
	minut += 60
	gs 'core_library', 'stage_title'
	gs 'stat'

	'You are greeted by a middle aged woman. "Hello, how may I help you?" She askes politely.'
	'"Hello, I am <<$pcs_firstname>> <<$pcs_lastname>>. I am part of the ballet school intake." you give her a smile and hand over the school''s letter as proof.'
	'The woman smiles warmly, "Ah you are the new students for this year?" she claps her hands and then takes yours, "Come, come we must measure your feet and order your shoes"'
	'Before you say anything she''s dragging you through the shop towards the back we are greeted by a wall of shoes and there are pictures on the wall signed by dancers with shoes next to them. You look at the woman.'
	'"Yes, they are all dancers who are or have been clients of our establishment", she noticed your gaze and explained with pride."We will only provide the best for the school."'
	!! TODO:  Set up gate for sponsored or not, not implemented system needs to be added to the end of year assessment.
	'"But where are my manners I am Darya Pushkina, I am the owner of this shop and facilies" she exclaims, "now to your fitting grabbing a tape measure and fitting tools for your feet"'
	'For the next hour, Madam Pushkina bombards you with questions of whether you want leather or cotton fabric, how many satin shoes and a myriad other questions before she finally relents.'
	'"Of course, as you are aware the school is sponsoring these costs, but only for the first year she says and you will need to manage your own equipment after this.", Madame Pushkina advises.'
	'"Is there anything else you need? No? Good, I will see you again in two weeks for your final shoe fitting. I would like to extend my congratulations and wish you a successful career Ms. <<$pcs_lastname>>."'
	act 'Leave': gt 'pushkin_sq'
	act 'Return to shop': gt $loc, 'init'
end
!! Services

!! Sports Area - Req Membership card

if $ARGS[0] = 'reception':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets - Reception'
	$setloc['StageImage'] =	'<<$default_img_path>>reception.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'
	minut += 5
	gs 'stat'
	'As you enter you are greeted warmly by the gym staff. The gym has an industrial feel reflecting the building being converted from an old factory.'

	'There is a <a href="exec: gt ''food'', ''watercooler''">drinking fountain</a> near the doors to the gym hall to refill your water bottle.'

	act 'Leave the studio': gt 'pushkin_sq'
	act 'Return to shop': gt $loc, 'init'
	act 'Changing rooms': gt $loc, 'changing_room'

	!! if membership not active:
	if balletqw['membership'] = 0 or balletqw['membership'] < daystart:
		act 'Discuss membership': gt $loc, 'enrol'
	elseif hour <= 15 and PCloSport = 1:
		if pcs_energy < 20:
			*nl
			'You are to exhausted to participate in a class.'
		elseif pcs_stam < stammax / 5:
			*nl
			'You feel to hungry to participate in a class.'
		else
			!! link to services:
			!! if membership active
			!! act 'Attend Physio': gt $loc, 'physio'
			!! act 'Attend a gymnastics class.': gt $loc, 'gymnastics_courses'
			act 'Attend a ballet class (2 hr)': gt $loc, 'ballet_courses'
			act 'Attend a yoga class (1 hr)': gt $loc, 'yoga_courses'
			!! act 'Look at jobs board': gt $loc, 'jobs'
		end
	elseif hour >= 16:
		*nl
		'All the evening classes have started today, you need to be here before 16:00 to ensure you can attend.'
	end
end

if $ARGS[0]= 'enrol':
	$epayments['method'] = ''
	$epayments['item_variable'] = ''
	$epayments['description'] = 'gym facilities access'
	$epayments['loc'] = 'pushkin_ballet_secrets'
	$epayments['loc_arg'] = 'reception'
	$epayments['banner']= '<<$default_img_path>>reception.jpg'
	gs 'core_library', 'stage_title'
	minut += 30
	gs 'stat'

	if balletqw['membership'] = 0:
		'You approach the reception to discuss membership to the gym.'
	elseif balletqw['membership'] ! 0:
		'You approach the reception to renew your membership.'
	end
	act 'Return to the studio entrance': gt $loc, 'reception'

	'The gym offers a weekly or monthly subscription for 1,500<b> ₽</b>	or 5,000<b> ₽</b> to use the facilities with some courses included. Physio appointments and personal trainers are charged separately.'
	'The subscriptions include classes in gymnastics, yoga and introductory ballet. For advanced classes, there is an additional instructor charge. A personal trainer is on hand to assist at all times if you so need one.'
	'We also have a small café which attracts a members discount and your membership card can purchase items directly from the vending machine which will be billed to your account.'
	*nl
	if money >= 5000 or (karta >= 5000):
		'<td> <a href="exec: epayments[''value''] = 5000 & balletqw[''membership''] = daystart + 30	& gs ''shortgs'',''payments'' ">Purchase a monthly subscription for 5,000<b> ₽</b> and get one week free!</a></td>'
	end
	if money >= 1500 or (karta >= 1500):
		'<td> <a href="exec: epayments[''value''] = 1500 & balletqw[''membership''] = daystart + 7	& gs ''shortgs'',''payments'' ">Purchase a weekly subscription for 1,500<b> ₽</b></a></td>'
	end
end

if $ARGS[0] = 'changing_room':
	menu_off = 0
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public'
	$locclass = 'changingroom'
	gs 'themes', 'indoors'
	minut += 5
	gs 'stat'
	'<center><h2>Changing Room</h2></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/locker.jpg"></center>'

	act 'Return to the studio reception': gt $loc, 'reception'
	act 'Use mirror':
		cla
		gt 'mirror', 'start'
	end

	act 'Change outfit':
		cla
		gt 'wardrobe', 'start'
	end

	gs 'wardrobe', 'default_clothing_options'

	if mc_inventory['deodorant'] > 0 and deodorant_on = 0:
		'Your deodorant will last you for <b><<mc_inventory[''deodorant'']>></b> more '+iif(mc_inventory['deodorant'] =	1, 'application.', 'applications.')
		act 'Apply deodorant (0:01)':
			*clr & cla
			menu_off = 1
			minut += 1
			mc_inventory['deodorant'] -=	1
			gs 'sweat', 'deo'
			iif(func('body_din','pregnancyVisibility') = 1, '<center><img <<$set_imgh>> src="images/shared/home/bathroom/deodorant_preg.jpg"></center>', '<center><img <<$set_imgh>> src="images/shared/home/bathroom/deodorant.jpg"></center>')
			'You apply deodorant to your armpits. It will keep you feeling fresh and clean for longer.'
			act 'Continue': menu_off = 0 & gt $loc, 'changing_room'
		end
	end
	gs 'core_library', 'bathroom'
end

!! Physiotherapy
if $ARGS[0] = 'physio':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets - Physio'
	$setloc['StageImage'] =	'<<$default_img_path>>physio.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'

	!! TODO: write attendance spiel
	act 'Leave': gt 'pushkin_sq'
end

!! Gymnastics

if $ARGS[0] = 'gymnastics_courses':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets - Gymnastics Class'
	$setloc['StageImage'] =	'<<$default_img_path>>gymnastics.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'

	!! TODO: write attendance spiel and some random reactions for post-exercise such that was a great workout, you didn''t feel you did well today
	act 'Leave': gt 'pushkin_sq'
end

!! Ballet Courses Easy, Intermediate and advanced

if $ARGS[0] = 'ballet_courses':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets - Courses'
	if pcs_danc <= 49:
		$setloc['StageImage'] =	'<<$default_img_path>>basic_class.jpg'
	elseif pcs_danc <=74:
		$setloc['StageImage'] =	'<<$default_img_path>>intermediate_class.jpg'
	else
		$setloc['StageImage'] =	'<<$default_img_path>>advanced_class.jpg'
	end

	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'
	if balletqw['ballet_session'] ! daystart:
		balletqw['ballet_session'] = daystart
		if pcs_danc <= 49:
			gs 'pain', 2, 'legL', 'stretch'
			gs 'pain', 2, 'legR', 'stretch'
			gs 'pain', 2, 'shoulders', 'stretch'
			gs 'pain', 2, 'armL', 'stretch'
			gs 'pain', 2, 'armR', 'stretch'
			gs 'pain', 2, 'back', 'stretch'
			gs 'pain', 2, 'chest', 'stretch'
			gs 'exercise', 'tier3', 120, 'agil', 'stren', 'danc'
			'You enter the classroom and the practice barres are already set up for the class.. You start to perform your stretch exercises and warm ups before your introductory ballet lesson starts along your fellow students.'

		elseif pcs_danc >= 50 or dance_skill <= 74:
			gs 'pain', 4, 'legL', 'stretch'
			gs 'pain', 4, 'legR', 'stretch'
			gs 'pain', 3, 'shoulders', 'stretch'
			gs 'pain', 3, 'armL', 'stretch'
			gs 'pain', 3, 'armR', 'stretch'
			gs 'pain', 4, 'back', 'stretch'
			gs 'pain', 3, 'chest', 'stretch'
			gs 'exercise', 'tier3', 120, 'agil', 'stren', 'danc'

			'You enter the classroom and the practice barres are already set up for the class. You start to perform your stretch exercises and warm ups before your intermediate lesson starts along your fellow students.'
		else
			gs 'pain', 4, 'legL', 'stretch'
			gs 'pain', 4, 'legR', 'stretch'
			gs 'pain', 3, 'shoulders', 'stretch'
			gs 'pain', 3, 'armL', 'stretch'
			gs 'pain', 3, 'armR', 'stretch'
			gs 'pain', 4, 'back', 'stretch'
			gs 'pain', 3, 'chest', 'stretch'
			gs 'exercise', 'tier4', 120, 'agil', 'stren', 'danc'
			'You enter the classroom and the practice barres are already set up for the class. You start to perform your stretch exercises and warm ups before your advanced lesson starts along your fellow students.'
		end
		gs 'stat'
		act 'Return to the studio reception': gt $loc, 'reception'
	else
		'There is another fitness class in progress and no more ballet sessions today.'
	end
	act 'Return to the studio reception': gt $loc, 'reception'
end

!! Yoga class

if $ARGS[0] = 'yoga_courses':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets - Yoga Class'
	$setloc['StageImage'] =	'<<$default_img_path>>yoga_class.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'
	minut += 5
	gs 'stat'
	if balletqw['yoga_session'] ! daystart:
		act 'Attend Yoga Class':
			cla
			balletqw['yoga_session'] = daystart
			lesson_tier = rand(1,3)
			if lesson_tier = 1:
				gs 'exercise', 'tier2', 60, 'sprt', 'agil'
			'You spend sixty minutes in an easy going class today, leaving you feeling refreshed and ready to face the world again.'
			elseif lesson_tier = 2:
				'You spend sixty minutes with your instructor today correcting your poses and providing advice on how you can improve, leaving you feeling tired and some muscle aches from the exercises.'
				gs 'exercise', 'tier3', 60, 'sprt', 'agil'
			else
				gs 'exercise', 'tier4', 60, 'sprt', 'agil', 'stren'
				'Today''s sixty minutes was challenging with the instructor taking the class through some of the more demanding positions. Leaving many of your yoga buddies look more than a little bit ragged after todays session.'
			end
			pcs_willpwr += rand(1,lesson_tier)
			!! Set minor pain to reflect exercising

			gs 'pain', 2, 'legL', 'stretch'
			gs 'pain', 2, 'legR', 'stretch'
			gs 'pain', 2, 'shoulders', 'stretch'
			gs 'pain', 2, 'armL', 'stretch'
			gs 'pain', 2, 'armR', 'stretch'
			gs 'pain', 2, 'back', 'stretch'
			gs 'pain', 2, 'chest', 'stretch'

			killvar 'lesson_tier'
			act 'Return to the studio reception': gt $loc, 'reception'
		end
	else
		'There is another fitness class in progress and no more yoga sessions today.'
	end
	act 'Return to the studio reception': gt $loc, 'reception'
end

if $ARGS[0] = 'jobs':
	!! TODO: Add ad hoc dance or promo events.
end

!! Shopping
if $ARGS[0] = 'clothing':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets - Dancewear'
	$setloc['StageImage'] =	'<<$default_img_path>>sports_shop.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'
	act 'Leave': gt 'pushkin_sq'
end

!! TODO: Custom Tutus for quests/shows, ballet shoe fitting, clothing, physio items, portable ballet equipment (barre) etc.
if $ARGS[0] = 'quest':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Ballet Secrets'
	$setloc['StageImage'] =	'<<$default_img_path>>quest.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'
	act 'Leave': gt 'pushkin_sq'
end

if $ARGS[0] = 'food':
	gs 'shortgs', 'setloc', 'pushkin_ballet_secrets', $ARGS[0]
	$location_type = 'public_indoors'
	$setloc['StageTitle'] = 'Food Court'
	$setloc['StageImage'] =	'<<$default_img_path>>food_court.jpg'
	$location_type = 'public_indoors'
	gs 'themes', 'indoors'
	gs 'core_library', 'stage_title'

	'There is a small area set aside for vending machines to provide drinks and food to help you relax and gain some energy back after your sessions. It also has knick knacks in case you forgot to bring items for your class. '
	act 'Leave': gt 'pushkin_sq'
end
--- ballet_secrets ---------------------------------