:: dk
<<set $here = 'dk'>>
<<set $ARGS = $location_var[$here]>>
<!-- ! Refactored 24 Aug 22-->
<!-- ! Amended by Hooded Silence-->
<!-- ! Author Validation:-->
<!-- ! Industrial Community center - used for gaining life skills-->
<!-- ! Events - Driving Lessons, Singing classes, Secretarial Training & Masseuse.-->
<!-- ! V .01 - Refactored to break down into event sections and expand on content, and to create hot links for city_industrial navigation.-->
<!-- ! v .02 - Added variable index documentation and minor text tweaks.-->
<!-- !-->
<!-- ! - Introduction to Alexei as singing teacher and music agent-->
<!-- !-->
<!-- ! - Quest/Logic variables--->
<!-- !-->
<!-- ! --- Game Variables ----->
<!-- ! daystart = daily game clock counter, used to track interactions and calendar functions.-->
<!-- ! week - week day-->
<!-- ! minut = track game clock time-->
<!-- ! money = used to pay for lessons-->
<!-- ! karta = used to pay for lessons-->
<!-- ! $loc, $loc_arg = navigation to various locations/acts.-->
<!-- ! age - character age-->
<!-- ! linked location(s): city_industrial.-->
<!-- !-->
<!-- ! --- Driving ----->
<!-- ! skulday = Course lock to prevent repeat same day visits.-->
<!-- ! prava = driving licence-->
<!-- ! avtoskul = Driving lessons tracker.-->
<!-- !-->
<!-- ! --- Secretary ----->
<!-- ! masseuse_lesson = Course lock to prevent repeat same day visits.-->
<!-- ! secrDiplom = Secretarial diploma, used for the following locations (s): burger, office-->
<!-- ! sekrObu = Secretarial lessons tracker.-->
<!-- !-->
<!-- ! --- Masseuse ----->
<!-- ! masseuse_lesson = Course lock to prevent repeat same day visits.-->
<!-- ! masseuse[''certification''] = tracker for the masseuse course. Used for the following location(s): salon-->
<!-- ! Notes -  There is no diploma for this course. Possible future change if the masseuse role is extended.-->
<!-- !-->
<!-- ! --- Singing----->
<!-- ! vokalday = Course lock to prevent repeat same day visits.-->
<!-- ! alexeyQW = Alexei quest - Work in progress for character developments.-->
<!-- ! vokal_exp = increase singing trait experience global stat.-->
<!-- !-->
<!-- ! ---  End ----->
<<if $location_var[$here][0] == 'start'>>
	<<set $loc = 'dk'>>
	<<set $loc_arg = 'start'>>
	<<set $menu_loc = 'dk'>>
	<<set $menu_arg = 'start'>>
	<<set $location_type = 'public_indoors'>>
	<<set $menu_off = 0>>
	<<gs 'dk' 'lessons'>>
	<<actCLA 'Leave the center'>>
		<<set $time.minutes += 5>> <<gt 'city_industrial'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'lessons'>>
	<center><b>The Vladimir Lenin community center</b></center>
	<<image "locations/city/industrial/community/dk1.jpg">>
	'Vladimir Lenin is open from 9am through to 5pm on weekdays , and closed on weekends.
	It's available to teach essential life skills such as driving , life coaching or finding new job skills this is the place to learn. '
	<B><center>Currently available courses:</center></B>
	<center>
	<table border=0 align="center">
	<TR>
	<<if getvar("$prava") == 0 and getvar("$avtoskul") == 0>>
		<TR><TD>Driving lessons - 30,000 <b>₽</b>.</TD><TD>10 classes</TD><TD><<link "Book a driving course.">><<gt 'dk' 'drivingschool'>><</link>></TD></TR>
	<<elseif getvar("$avtoskul") < 11 and getvar("$prava") == 0 and $skulday != $time.daystart>>
		<TR><TD>Driving lessons -</TD><TD></TD><TD><<link "Attend your driving lesson.">><<gt 'dk' 'drivingschool'>><</link>></TD></TR>
	<<elseif getvar("$avtoskul") < 12 and getvar("$prava") == 0 and $skulday != $time.daystart>>
		<TR><TD>Driving lessons -</TD><TD></TD><TD><<link "Attend driving theory lesson.">><<gt 'dk' 'drivingschool'>><</link>></TD></TR>
	<<elseif getvar("$avtoskul") <= 12 and getvar("$prava") == 0 and $skulday != $time.daystart>>
		<TR><TD>Driving lessons -</TD><TD></TD><TD><<link "Attend your driving test.">><<gt 'dk' 'drivingschool'>><</link>></TD></TR>
	<<elseif getvar("$prava") == 0 and $skulday == $time.daystart>>
		<TR><TD>Driving lessons - You have already attended your driving lesson for today.</TD></TR>
	<</if>>
	<TR><TD>Secretarial diploma - 15,000 <b>₽</b>.</TD><TD>10 classes</TD><TD><<link "Classes in room 204.">><<gt 'dk' 'secretarialschool'>><</link>></TD></TR>
	<TR><TD>Massage lessons - 10,000 <b>₽</b>.</TD><TD>10 classes</TD><TD><<link "Classes in room 203. ">><<gt 'dk' 'masseuse'>><</link>></TD></TR>
	<TR><TD>Singing lessons - 500 <b>₽</b>.</TD><TD>Per class</TD><TD><a href="exec:gt ''dk'', ''singingtutor''">Classes in room 213. </TD></a></TR>
	<!-- !!'<TR><TD>Personal development - 1,000 <b>₽</b>.</TD><TD>Per class</TD><TD>Classes in room 201 (Learn to assert yourself)</TD></TR>'-->
	<!-- !!'Medium for new opportunities - only here only freebie.'-->
	</TR>
	</table>
	</center>
	<center><B>Lessons Completed:</B>
	<<if getvar("$masseuse['certification']") == -1>>
		You've enrolled into the masseuse class but still have to attend your first lesson.
	<</if>>
	<<if getvar("$masseuse['certification']") > 0 and getvar("$masseuse['certification']") < 10>>
		<p>You have completed masseuse['certification'] out of 10 massage therapist lessons.</p>
	<</if>>
	<<if getvar("$secrDiplom") == 0 and getvar("$sekrObu") > 1 and getvar("$sekrObu") < 11>>
		<<set $sekrObuA = $sekrObu - 1>> 
	<<elseif getvar("$secrDiplom") == 0 and getvar("$sekrObu") == 1>>
		You need to attend your first Secretarial Class
	<<elseif getvar("$secrDiplom") == 0 and getvar("$sekrObu") > 10>>
		You've completed the course, it's time to collect your diploma.
	<</if>>
	<<if getvar("$prava") == 0 and getvar("$avtoskul") == 1>>
		You've registered with the driving school and still have to take your first lesson.
	<<elseif getvar("$prava") == 0 and getvar("$avtoskul") > 1 and getvar("$avtoskul") < 11>>
		<p>You have taken avtoskul-1 driving lesson(s).</p>
	<<elseif getvar("$prava") == 0 and getvar("$avtoskul") == 11>>
		Time to take your driving theory exam.
	<<elseif getvar("$prava") == 0 and getvar("$avtoskul") == 12>>
		Time to take your driving exam.
	<</if>>
	</center>
<</if>>
<!-- !! Payment processor pass three variables: Lesson Type, Payment Type and amount.-->
<<if $location_var[$here][0] == 'payments'>>
	<<if $location_var[$here][2] == 'money'>>
		<<set $finances.cash -= $location_var[$here][3]>>

	<</if>>
	<<if $location_var[$here][2] == 'karta'>>
		<<set $finances.bank -= $location_var[$here][3]>>

	<</if>>
	<center>You pay for your <<$ARGS[1]>> course and are now booked in for your first lesson. Please refer to the noticeboard for class times and rooms.</center>
	<<actCLA 'Return'>>
		<<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'drivingschool'>>
	<<image "locations/city/industrial/community/dk2.jpg">>
	You enter the community center with excitement with your thoughts full about getting your driving licence and the freedom to achieve your dreams.
	<<if $skulday == $time.daystart>>
		You've taken your driving lesson for today.
	<</if>>
	<<if getvar("$avtoskul") == 0 and $finances.cash >= 30000 and getvar("$prava") == 0 and getvar("$pc.age") >= 18>>
		<<actCLA 'Book a driving training course (30,000 <b>₽</b>)'>>
			<<set $menu_off = 1>>
			<<if $finances.cash > 30000>>
				<<actCLA 'pay with for lessons with cash'>>
	<<gt 'dk' 'payments' 'driving lessons ' 'money' '30000'>>
<</actCLA>>

			<</if>>
			<<if $finances.bank > 30000>>
				<<actCLA ' pay with your card'>>
	<<gt 'dk' 'payments' 'driving lessons' 'karta' '30000'>>
<</actCLA>>

			<</if>>
			<<set $avtoskul = 1>>
			<p>You briefly look around for information about driving lessons, and approach the receptionist who gives you the necessary papers to fill in and she warns you that they will be checked by the agency to prevent fraud. You pay her the money and she gives you a small information pack about the driving lessons and you quickly skim through them to see you can now take a 2-hour driving lessons on each workday.</p>
			<<actCLA 'Return'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<if $time.hour >= 9 and $time.hour <= 17 and $time.weekday < 6>>
		<<if getvar("$avtoskul") >= 1 and getvar("$avtoskul") < 11 and $skulday != $time.daystart and getvar("$pc.age") >= 18>>
			<<actCLA 'Driving lesson'>>
				<<set $skulday = $time.daystart>>
				<<set $avtoskul += 1>>
				<<set $time.minutes += 120>>
				<<image "locations/city/industrial/community/dk2.jpg">>
				You spend two hours following your driving instructor''s orders and listening to suggestions on how to handle a car.
				By the end of the lesson, you feel like you are a little more competent at driving.
				<<actCLA 'Return'>>
					<<gt $location>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
		<<if getvar("$avtoskul") == 11 and $skulday != $time.daystart and getvar("$pc.age") >= 18>>
			<<actCLA 'Driving theory'>>
				<<set $menu_off = 1>>
				<<set $skulday = $time.daystart>>
				<<set $avtoskul = 12>>
				<<set $time.minutes += 120>>
				<<image "locations/city/industrial/community/dk2.jpg">>
				You dedicate two hours to a boring but necessary lecture on traffic signs, regulations, scenarios and some information on how to keep a car in working order.
				<<actCLA 'Return'>>
					<<gt $location>>
				<</actCLA>>
				<!-- !!if nikpravaQW = 1:end-->
			<</actCLA>>
		<<elseif getvar("$avtoskul") == 12 and $skulday != $time.daystart and getvar("$pc.age") >= 18>>
			<<actCLA 'Driving test'>>
				<<set $menu_off = 1>>
				<<set $time.minutes += 120>>
				<<set $avtoskul = 0>>
				<<set $prava = 1>>
				<<set $time.minutes += 120>>
				<<image "locations/city/industrial/community/dk3.jpg">>
				You feel nervous as you enter this car for, hopefully, the last time. The traffic officer is a man who can look jovial at one moment and stern the next.
				For 2 hours, you follow his directions around the city, park the car where he tells you to and feel your heart stop at every tiny mistake you make, wondering if you messed it up. But he lets you continue without comment and at the end, he seems satisfied and claims that you will get better with experience.
				<p>"So, congratulations, you've passed! Here is your license", he smiles and hands you your brand new driver's license. Now, all you need is a car...</p>
				<<actCLA 'Return'>>
					<<gt $location>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
	<</if>>
	<!-- !! corrupt instructor idea, chance of instructor deliberately failing the test based on player stats, or is a bimbo and is open to bribes.-->
	<<actCLA 'Return'>>
		<<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'secretarialschool'>>
	<<image "locations/city/industrial/community/kurs.jpg">>
	<center><b>Secretarial Training</b></center>
	The center offers a wide range of business related skills including computer training, secretarial work, PA, management and accounting
	<<if getvar("$secrDiplom") == 0 and getvar("$sekrObu") == 0 and $finances.cash >= 15000>>
		<<actCLA 'Book a secretarial course (15,000 <b>₽</b>)'>>
			<<set $menu_off = 1>>
			<<set $sekrObu = 1>>
			You pay the money for the course, once you've filled in the blanks on an application paper, and can now attend secretary training each day for 2 hours. You need to attend 10 training lessons to earn a diploma.
			<<if $finances.cash > 15000>>
				<<actCLA 'Pay with for lessons with cash'>>
	<<gt 'dk' 'payments' 'secretarial class' 'money' '15000'>>
<</actCLA>>

			<</if>>
			<<if $finances.bank > 15000>>
				<<actCLA ' Pay with your card'>>
	<<gt 'dk' 'payments' 'secretarial class' 'karta' '15000'>>
<</actCLA>>

			<</if>>
			<<actCLA 'Return'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<<elseif $secrday == $time.daystart>>
		You've had your lesson for today, come back another day.
		<<actCLA 'Return'>>
			<<gt $location>>
		<</actCLA>>
	<<elseif getvar("$secrDiplom") == 0 and getvar("$sekrObu") == 0 and $finances.cash < 15000>>
		You could take lessons here if you had sufficient funds with you. 
		<<actCLA 'Return'>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
	<<if getvar("$sekrObu") > 0 and getvar("$sekrObu") < 11 and $secrday != $time.daystart>>
		<<actCLA 'Secretarial class'>>
			<<set $menu_off = 1>>
			<<set $secrday = $time.daystart>>
			<<set $sekrObu += 1>>
			<<set $time.minutes += 120>>
			<<image "locations/city/industrial/community/kurs.jpg">>
			<p>You go into a classroom with many computers. Unsurprisingly, most students in this course are women. The teacher - a woman in a sharp office dress - enters the class and starts lecturing you on the intricacies of secretarial work and the basics of computer programs used in offices today.</p>
			<<if ($pc.cumAtLocation(6) == 1 or $pc.cumAtLocation(7) == 1)>>
				<<setn $pc.horny += 10>> 

			<</if>>
			<<actCLA 'Return'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<<elseif getvar("$sekrObu") >= 11 and $secrday != $time.daystart>>
		<<actCLA 'Secretarial diploma'>>
			<<set $menu_off = 1>>
			<<set $secrday = $time.daystart>>
			<<set $sekrObu = 0>>
			<<set $time.minutes += 15>>
			<<set $secrDiplom = 1>>
			<<image "locations/city/industrial/community/kurs.jpg">>
			<p>You go into a classroom with many computers. Unsurprisingly, most students in this course are women. The teacher - a woman in a sharp office dress - enters the class and starts lecturing you on the intricacies of secretarial work and the basics of computer programs used in offices today.</p>
			At the end of it, as the teacher goes through her attendance list as usual, she looks at you and gives you an approving, professional look.
			<p>"Congratulations, $pc.name_nick. It seems that you have earned your diploma."</p>
			She pulls a document out of her briefcase, fills in your name, signs it and sends you to reception with it.
			<p>With the receptionists' signature and the community center's seal, you are now officially qualified for secretary work!</p>
			<<actCLA 'Return'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
	<<actCLA 'Return'>>
		<<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'masseuse'>>
	<<image "locations/city/industrial/community/masseuse_training.jpg">>
	<<if getvar("$masseuse['certification']") == 0>>
		<p>You enter a room and are greeted with by a young lady, she looks are you with a welcoming smile and asks "Are you here for the lessons?" You reply and she quickly gives you the course details of the course and a pamphlet to read.</p>
		<p>The basic course is 10 lessons, and the  class costs 10,000 <b>₽</b></p>
		<<if $finances.cash > 10000>>
			<<actCLA 'Pay with for lessons with cash'>>
	<<gt 'dk' 'payments' 'masseuse class' 'money' '10000'>>
<</actCLA>>

		<</if>>
		<<if $finances.bank > 10000>>
			<<actCLA 'Pay with your card'>>
	<<gt 'dk' 'payments' 'masseuse class' 'karta' '10000'>>
<</actCLA>>

		<</if>>
		<<setinit $masseuse['certification'] = -1>>
	<<else>>
		<<if $masseuse_lesson == $time.daystart>>
			You look around the empty room and realised you've had your lesson today and the class instructor has left.
		<<else>>
			<<if getvar("$masseuse['certification']") != 0 and getvar("$masseuse['certification']") < 10 and $masseuse_lesson != $time.daystart>>
				<<set $masseuse_lesson = $time.daystart>>
				<<if getvar("$masseuse['certification']") == -1>>
					<<setinit $masseuse['certification'] = 1>>
				<<else>>
					<<setinit $masseuse['certification'] += 1>>
				<</if>>
				<<set $time.minutes += 120>>
				You enter the room and see the tables laid out for your lesson. The instructor welcomes you and takes down your name. You notice some people coming in for a free massage from your course.
				The next two hours are dedicated to reading detailed guides to how to relieve pain or tension in certain muscles and to putting these guides into practice with partners attending the course and some local students looking for a freebie.
				<<if getvar("$masseuse['certification']") > 10>>
					<p>Congratulations that was your final lesson! You've completed the basic course, you are issued a certificate that shows you are a certified masseuse.This is your first step in providing a wonderful service to your clients.</p>
				<</if>>
			<</if>>
		<</if>>
	<</if>>
	<<if getvar("$masseuse['certification']") >= 10 and $masseuse_lesson != $time.daystart>>
		Sorry we don't have any new classes to offer yet. You could speak to Xian at the Galleria''s Beauty Bar if you're looking for work as she usually has openings for new staff.
	<</if>>
	<<actCLA 'Return'>>
		<<gt $location>>
	<</actCLA>>
	<!-- !! Advanced Wellness or Massage expansion either through the city sauna or the beauty bar for poor performance or to get better money.-->
<</if>>
<<if $location_var[$here][0] == 'singingtutor'>>
	<<if $finances.cash >= 500 and $vokalday != $time.daystart>>
		The center offers singing lessons with Alexei, an established local singer and musician who works with up and coming talent. Unlike the centers other classes he only ever accepts cash for his lessons.
		<<actCLA 'Singing lessons'>>
			<center>
			<<set $menu_off = 1>>
			<<set $time.minutes += 60>>
			<<set $alexeyQW += 1>>
			<<set $vokal_exp += rand(5,10)>>
			<<set $vokalday = $time.daystart>>
			<<if getvar("$alexeyQW") == 1>>
				<<set $finances.cash -= 500>>
				<<actCLA 'First lesson'>>
					<p>When you enter the office, you see a middle aged man with long hair that's been pulled back in a ponytail. He gives you a confident look and says, with a particularly well-modulated voice: "Are you here to learn how to sing, Miss?" You nod and hand him 500 <b>₽</b>.</p>
					<p>He pockets it and introduces himself: "I'm Alexei. What is your name?" You respond that your name is $pc.name_nick. Acknowledging  your answer with little more than a nod, the man immediately moves on to the lesson. Before you even notice, an hour has passed. You head out and the man politely wishes you goodbye.</p>
					<<actCLA 'Return'>>
						<<gt $location>>
					<</actCLA>>
				<</actCLA>>
			<<elseif getvar("$alexeyQW") == 2>>
				<<actCLA 'Second lesson'>>
					<<set $finances.cash -= 500>>
					You enter the small classroom eager to your lesson, Alexei is sitting at a piano and indicates you should sit on a chair to it. He asks you practice the scales as he plays each note on the piano. You quickly gain confidence and he touches your knee whenever you do well. 
					After an hour you feel drained but feel that you have learned more about singing. You have a good voice Alexei says, but you still need to practice breathing and control, touching your breasts and throat as he says each word.
					<<arouse 'foreplay' 15 >>
					<<actCLA 'Return'>>
						<<gt $location>>
					<</actCLA>>
				<</actCLA>>
			<<elseif getvar("$alexeyQW") > 2>>
				<<actCLA 'Continue lessons'>>
					<<set $finances.cash -= 500>>
					You enter the small classroom eager to start your next lesson, Alexei is sitting at his normal place by the piano and waves hand to your chair. He asks you practice the warm up scales as he plays the notes on the piano. You are fairly accomplished now and quickly finish the warm up.
					Halfway through the lesson Alexei gives you another music sheet to sing from and starts playing the piano indicating you should start, after the lesson you feel exhausted from the class but keen to attend your next lesson.
					<<actCLA 'Return'>>
						<<gt $location>>
					<</actCLA>>
				<</actCLA>>
			<<elseif $finances.cash <= 500 and $vokalday != $time.daystart>>
				You see Alexei in the classroom, but you don't have enough cash to take a lesson.
				<<actCLA 'Return'>>
					<<gt $location>>
				<</actCLA>>
			<</if>>
		<</actCLA>>
	<<else>>
		The classroom is empty, you play on the piano for a few minutes before heading back to the hall. Maybe come back another time to see if there''s more classes.
		<<actCLA 'Return'>>
			<<gt $location>>
		<</actCLA>>
	<</if>>
<</if>>
