glife/locations/dk.qsrc

# dk
$location_type = 'public_indoors'
if $ARGS[0] = 'start':
	$loc = 'dk'
	$loc_arg = 'start'
	$menu_loc = 'dk'
	$menu_arg = 'start'
	menu_off = 0
	'<center><b>The Vladimir Lenin community centre</b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk4.jpg"></center>'
	'Open: 9 through 17 on workdays, closed on Saturday and Sunday.'
	gs 'stat'
	act 'Leave': minut += 5 & gt 'city_industrial'
	if hour >= 9 and hour <= 17 and week < 6:
		act 'Enter': minut += 1 & gt 'dk', 'holl'

		if avtoskul >= 1 and avtoskul < 11 and skulday ! daystart and age >= 18:
			act 'Driving lesson (2:00)':
				*clr & cla
				skulday = daystart
				avtoskul += 1
				minut += 120
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk2.jpg"></center>'
				'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.'
				gs 'stat'

				act 'Leave':gt 'dk', 'holl'
			end
		end
	end
end

if $ARGS[0] = 'holl':
	$loc = 'dk'
	$loc_arg = 'holl'
	$menu_loc = 'dk'
	$menu_arg = 'holl'
	menu_off = 0
	gs 'stat'
	'<center><b>The Vladimir Lenin community centre</b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk1.jpg"></center>'
	*nl
	'<B><center>Available services</center></B>'
	*nl
	'<center><table border=0 align="center"><TR>'
	'<TR><TD>Driving lessons - 30,000 <b>₽</b>.</TD><TD>10 classes</TD><TD>Instructors available by entrance</TD></TR>'
	'<TR><TD>Secretarial diploma - 15,000 <b>₽</b>.</TD><TD>10 classes</TD><TD>Classes in room 204</TD></TR>'
	'<TR><TD>Singing lessons - 500 <b>₽</b>.</TD><TD>Per class</TD><TD>Classes in room 213</TD></TR>'
	'<TR><TD>Massage lessons - 1,000 <b>₽</b>.</TD><TD>Per session</TD><TD>Classes in room 203 (certificate issued after 10 lessons)</TD></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>'

	!!act 'Go to a medium':
	!!	cla
	!!	*clr
	!!	minut += 30
	!!	killobj
	!!	addobj 'Back'
	!!	'You did not understand, if anything happened, and mixed feelings came from the charlatan.'

	!!	act 'Leave':gt 'dk', 'holl'
	!!end

	act 'Go outside': minut += 1 & gt 'dk', 'start'
	if hour >= 9 and hour <= 17 and week < 6:
		!!if money >= 1000:
		!!	act 'Personal development class - 1,000 <b>₽</b> (1:00)':
		!!		cla
		!!		menu_off = 1
		!!		money -= 1000
		!!		minut += 60
		!!		gs 'stat'
		!!		'You head inside the open room and for the next hour, you and your fellow visitors roleplay different everyday situations and scenarios and learn how to act confident in all of them. After the course, you feel a little more... dominant.'
		!!		act 'Leave':gt 'dk', 'holl'
		!!	end
		!!end

		if vokalday ! daystart and alexeySex > 0 and alexeyVopros = 2:
			act 'Singing lesson (1:00)':
				cla
				menu_off = 1
				alexeyQW += 1
				minut += 60
				gs 'exp_gain', 'vokal', rand(5,10)
				vokalday = daystart
				pcs_horny += 30
				gs 'stat'
				'You and your teacher Alexei engage in vocal training for an hour. He''s undressing you with his eyes throughout but it is only towards the end of the lesson that he reaches out to caress your thigh, lets his hand wander to your ass and finally up to stroke your chest.'
				deystrand = rand(0, 10)

				if deystrand >= 8:
					'When the hour is up, Alexei turns to you and says: "I''m afraid I have a lot of work to do today, <<$pcs_nickname>>, but I think I have a minute if you want to show me your grattitude for this fantastic lesson..."'

					act 'Get on your knees and give him a blowjob':
						*clr & cla
						alexeySex += 1
						picrand = rand(29, 41)
						'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj<<picrand>>.jpg"></center>'
						'You kneel before him, unzipping his pants as you go down and as soon as his flaccid cock springs free from his underwear, you wrap your <<$pc_desc[''lips'']>> lips around it and begin to suck and bob your head, getting him hard in no time. Alexei audibly enjoys what you''re doing and moves his hips so violently he''s basically fucking your mouth.' 
						'Finally he groans: "Here it comes, my little slut. Swallow it all or I will make you lick it up from the floor!"'
						
						gs 'arousal', 'bj', 10, 'sub'
						gs 'stat'
						
						act 'Let him cum in your mouth':
							*clr & cla
							swallow += 1
							spafinloc = 12
							gs 'cum_manage'
							picrand = rand(34, 47)
							'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum<<picrand>>.jpg"></center>'
							'Jets of sperm hit the roof of your mouth and the back of your throat, so much of it that you cannot swallow it in one go and some of it runs down your <<$pc_desc[''lips'']>> lips when your vocal coach pulls his cock out.' 
							'Once you''ve finally stemmed the flood and swallowed the salty liquid, you diligently lick Alexei''s dick clean before he puts it back into his pants.'
							'He watches as you collect the remains of his semen that ran down your chin. When the last bit is gulped down, you lick your lips as you rise to your feet and give him a mischievous smile as you turn to leave.'

							gs 'arousal', 'bj', 10, 'sub'
							gs 'arousal', 'end'
							gs 'stat'
						
							act 'Leave':gt 'dk', 'holl'
						end
					end
				else
					'When the lesson is over, Alexei matter-of-factly tells you that you''re coming home with him, takes you by the hand and leads you out of the community center, to his nearby apartment.'

					if sashaClubQW = 0:act 'Go with Alexei':gt 'alex'

					if sashaClubQW > 0:
						ivrand = rand(0, 10)

						if ivrand < 8:act 'Go with Alexei':gt 'alex'
						if ivrand >= 8:act 'Go with Alexei':gt 'alexgang'
					end
				end
			end
		elseif money >= 500 and vokalday ! daystart and alexeySex > 0 and alexeyVopros = 1:
			act 'Singing lesson - 500 <b>₽</b> (1:00)':
				*clr & cla
				menu_off = 1
				money -= 500
				minut += 60
				alexeyQW += 1
				gs 'exp_gain', 'vokal', rand(5,10)
				vokalday = daystart
				gs 'stat'
				'You and your teacher Alexei engage in vocal training for an hour. Nothing he does, not even the way he looks at you would suggest that he had filled all of your holes after your last session.'

				act 'Leave':gt 'dk', 'holl'
			end
		elseif money >= 500 and vokalday ! daystart and alexeySex > 0 and alexeyVopros = 0:
			act 'Singing lesson - 500 <b>₽</b> (1:00)':
				*clr & cla
				menu_off = 1
				alexeyQW += 1
				gs 'exp_gain', 'vokal', rand(5,10)
				vokalday = daystart
				gs 'stat'
				'You enter Alexei''s office. He looks at you with guilt in his eyes. "I''m sorry, <<$pcs_nickname>>, I''m a musician and an artist first and foremost... but sometimes, I''m no better than a drunk redneck."'
				'You cannot help smiling at the memory of how you rolled your teacher''s limp body off of you and on his back where you left him, snoring peacefully.'
				'Your smile seems to negate the worst of Alexei''s fears and he returns it sheepishly as he comes up to you.' 
				'"<<$pcs_nickname>>, we can now proceed in two ways: We can both forget what happened between us and continue our lessons like before; or we can keep going out after lessons. If we do, as a true gentleman, I will not charge you fees for your vocal coaching, of course, but I will probably ask you over to my place every chance I get."' 
				'"The choice is yours."'

				act 'Let''s forget what happened... whatever it was.':
					cla
					money -= 500
					minut += 60
					alexeyVopros = 1
					'Although you didn''t regret all of it, it doesn''t feel right to you to you to sleep with your teacher, so you tell Alexei that you''d rather forget it ever happened and give him 500 <b>₽</b> for the lesson. He nods sadly and takes out the books for the lesson.'

					act 'Leave':gt 'dk', 'holl'
				end

				act 'If you don''t get as drunk next time, then we could try again.':
					cla
					minut += 60
					alexeyVopros = 2
					'You playfully smile and tell him that you do not mind meeting him, if he doesn''t drink too much. Alexei smiles with relief. "I can do that... and I''m looking forward to it. But for now, let''s focus on your voice." You dedicate the remaining time to your training.'

					act 'Leave':gt 'dk', 'holl'
				end
			end
		elseif money >= 500 and vokalday ! daystart and alexeySex = 0:
			act 'Singing lesson - 500 <b>₽</b> (1:00)':
				*clr & cla
				menu_off = 1
				minut += 60
				money -= 500
				alexeyQW += 1
				gs 'exp_gain', 'vokal', rand(5,10)
				vokalday = daystart
				gs 'stat'
				!!'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk2.jpg"></center>'

				if alexeyQW = 1:
					'When you enter the office, you see a 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>.' 
					'He pockets it and introduces himself: "I''m Alexei. What is your name?" You respond that your name is <<$pcs_nickname>>. Acknowledging 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.'
				elseif alexeyQW = 2:
					'Alexei greets you and, as soon as you handed him the money, began the lesson. Whenever you make a mistake, he touches your hand as he explains how you could improve. You don''t know why but you a feel a little more excited when the lesson is over. You barely even notice his "goodbye"''s anymore.'
					
					gs 'arousal', 'foreplay', 60
					gs 'stat'
				elseif alexeyQW < 7:
					'Alexei greets you with a smile and, as soon as you handed him the money, began the lesson. Whenever you make a mistake, he touches your hand as he explains how you could improve. You don''t know why but you a feel a little more excited when the lesson is over. You chat a little as you put away the books and feel somewhat friendly towards him.'
					gs 'arousal', 'foreplay', 60
					gs 'stat'
				elseif alexeyQW < 10:
					'"Hello <<$pcs_nickname>>", Alexei greets you as soon as you enter; you give him the money for the lesson and chat for a minute while you prepare for the lesson. You feel more confident about your voice now than you did before and not only don''t you mind when Alexei touches your hand or cheek, but you kind of wish he''d do it more often and feel a little excited every time he does. Alexei looks at you as if he can tell what you''re thinking and sometimes, you respond with a smile.'
					gs 'arousal', 'foreplay', 60
					gs 'stat'
				elseif alexeyQW >= 10 and alexeyVQW = 0:
					'Even during the lesson, you caught the smell alcohol coming from your teacher - not to mention how he boldly put his hand on your thigh at one point. After the lesson, Alexei comes up to you and offers to go somewhere together.'

					act 'Go with Alexei':
						*clr & cla
						'Alexei takes your hand and leads you somewhere - out of the community center and towards nearby apartment houses. Along the way, your singing teacher tells you a little about himself: Alexei says that he is a professional musician. "I teach music at the community center because it pays the bills but whenever I can, I moonlight as a DJ in a club at the city center", he explains excitedly.' 
						'When you came to him for your first lesson, he immediately recognized your talent, even though your unique voice hadn''t reached its full potential, but he claims that you have been improving massively under his guidance and he is blown away by how good you''ve already become. You cannot help but smile at his compliments - how often do you get praise by a real musician, after all?' 
						'Thanks to the conversation, you barely even notice where your feet and Alexei are taking you until you find yourself at an apartment door. Alexei charmingly smiles at you and invites you into his home.'

						act 'Leave': alexeyQW -= rand(2,3) & minut += 6 & gt 'city_industrial'

						act 'Enter Alexei''s home':
							*clr & cla
							alexeyVQW += 1
							gs 'boystat', 'A81'
							npc_sex[$boy] += 1
							alexeySex = 1
							minut += 20
							gs 'stat'
							'Alexei lives in a studio apartment. The decoration leaves no doubt in your mind that he lives alone - it would seem that Alexei is a bachelor, a musician and... and sometimes a drunk: Lying on the floor are bottles of beer and wine, huge speakers - as big as those you''d find on a concert - take up two entire corners of the living room and most of the floor near them is cluttered up by musical equipment that looks really expensive.' 
							'He has you sit down on the sofa and brings a bottle of spirit and a snack, then sits down in an armchair opposite you and you two start drinking and talking. Alexei turns out to be a helpful, simple, cheerful guy with a rich biography and an interesting outlook on life and he somehow manages to make you thoughtful at one moment only to make you break out in laughter the next.' 
							'Time passes and even though you drink quite a bit, you are handling the alcohol quite well; Alex, however, quickly goes from tipsy to drunk.'
							'After a relatively long silence, he speaks up again. His speech is slurred but his look is sharp and there''s a glint in his eyes: "Well, <<$pcs_nickname>>, we''ve been having fun so far... but you didn''t just agree to come with me for a little chat, did you? I think it''s time we go to the main event. Come here."'
							'You are completely taken aback by his arrogance for a moment and part of you is angry and wants to walk out. A much stronger, hornier part makes you rise to your feet and wobbly walk to Alexei''s chair.'
							'He brazenly takes his dick out of his pants as you approach and winks at you, "Don''t be shy now, <<$pcs_nickname>>, you''ve got him all to yourself."'

							act 'Get on your knees and take him into your mouth':
								*clr & cla
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/characters/city/alexey/sex/bj.jpg"></center>'
								'You kneel in front of him and stare at his cock. He is really big, about 20 centimeters, but rather than scaring you, it only excites you more in your drunken haze. You reach out with one of your hand and caress his dick, jerking him a few time to see if it gets even bigger; the heat emanating from it is incredible and you simply cannot resist. You bring your face closer and closer to Alexei''s cock, give it a few tentative licks and finally wrap your <<$pc_desc[''lips'']>> lips around it. While you swirl your tongue around his head and move your head up and down, taking more and more of him into your mouth and throat, Alexei takes his beer mug and takes a loud sip. Before you even know how you feel about this, he pulls his dick out of your mouth and grip, lifts you back on your feet and drags you into his bedroom.'
								gs 'arousal', 'bj', 10, 'sub'
								gs 'stat'

								act 'Undress':
									*clr & cla
									pose = 1
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/characters/city/alexey/sex/sex.jpg"></center>'
									'You undress as quickly as you can, feeling aroused beyond reason. You barely even have time to pull down your underwear before Alexei pushes you onto the bed and sets you and your hand and feet in front of him.'
									gs 'dinsex', 'boy_puts_his_condom'
									'Alexei slapped your bare ass with his hand and says, "I can see right through people; I knew from the beginning that you are a real slut and your place is in doggystyle or on your knees with a dick in your mouth. And you love it, don''t you?"'
									gs 'dinsex','vaginal_sex',10,'sub'
									if analplugin = 1:
										'<<$boy>> pulls the plug out of your narrow and tight ass.'
										analplugout = 1
									end
									'At some point, you feel a sticky, lubed-up finger probing your ass, adding to the sensations from your pussy. With every thrust of your and Alexei''s hips, he pushes his finger deeper into your ass and moves it around in there.' 
									'Then, without warning, he removes his finger, pulls his dick out of your pussy and sticks pushes it into your prepared anus.'
									gs 'arousal', 'anal_finger', 10, 'sub'
									anal_slip += 4
									gs 'arousal', 'anal', 10, 'sub'
									minut -= 10
									gs 'stat'

									act 'Moan':
										*clr & cla
										pose = 1
										'<center><img <<$set_imgh>> src="images/characters/city/alexey/sex/anal.jpg"></center>'
										gs 'dinsex','analsex'
										gs 'BDsex', 'ancum'
										gs 'arousal', 'anal', 10, 'sub'
										gs 'arousal', 'end'
										gs 'dinsex', 'after_anal','no_plug'
										'Once he is finished, Alexei falls onto your back and kisses you on the cheek. His weight pushes you down into the mattress and you can barely move, not knowing what to do about it. To make things worse, you soon hear Alexei snoring into your ear, his softening dick still at the entrance of your ass.' 
										'You try to push him off but your position doesn''t make it any easier. After a few attempts, you manage to free yourself and crawl out from under his sleeping body, pushing him on his back in the process. Alexei''s snoring fills the room and your actions don''t seem to have stirred him. You indignantly dress yourself and decide to leave the apartment.'
										gs 'stat'

										act 'Leave': minut += 6 & gt 'city_industrial'
									end
								end
							end
						end
					end
				else
					alexeyQW = 10
				end

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if avtoskul = 0 and money >= 30000 and prava = 0 and age >= 18:
			act 'Book a driving training course (30,000 <b>₽</b>)':
				cla
				menu_off = 1
				money -= 30000
				avtoskul = 1
				!!'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk2.jpg"></center>'
				'You file the necessary papers with the woman at the reception and pay the money in cash. You can now take 2-hour driving lessons on each workday.'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if secrDiplom = 0 and sekrObu > 0:sekrObuA = sekrObu - 1 & 'Secretarial training - <<sekrObuA>> of 10 sessions completed.'

		if secrDiplom = 0 and sekrObu = 0 and money >= 15000:
			act 'Book a secretarial course (15,000 <b>₽</b>)':
				cla
				menu_off = 1
				money -= 15000
				sekrObu = 1
				!!'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk2.jpg"></center>'
				'You pay the money for the course in cash, 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.'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if sekrObu > 0 and sekrObu < 11 and secrday ! daystart:
			act 'Secretarial class (2:00)':
				*clr & cla
				menu_off = 1
				secrday = daystart
				sekrObu += 1
				minut += 120
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/kurs.jpg"></center>'
				'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.'

				if (cumloc[6] = 1 or cumloc[7] = 1):pcs_horny += 10 & 'You nervously shift around on your chair, trying to hide the semen stains on your clothes, but anything you do to remove or cover them only seems to make them more obvious. By the end of the class, you''ve earned pitying or disgusted looks from just about everybody in the room, including the teacher.'

				act 'Leave':gt 'dk', 'holl'
			end
		elseif sekrObu >= 11 and secrday ! daystart:
			act 'Secretarial diploma':
				*clr & cla
				menu_off = 1
				secrday = daystart
				sekrObu = 0
				minut += 15
				secrDiplom = 1
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/kurs.jpg"></center>'
				'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.'
				'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.'
				'"Congratulations, <<$pcs_nickname>>. It seems that you have earned your diploma."'
				'She pulls a document out of her briefcase, fills in your name, signs it and sends you to reception with it.'
				'With the receptionists'' signature and the community center''s seal, you are now officially qualified for secretary work!'

				act 'Leave':gt 'dk', 'holl'
			end
		end

		if avtoskul = 11 and skulday ! daystart and age >= 18:
			act 'Driving theory (2:00)':
				*clr & cla
				menu_off = 1
				skulday = daystart
				avtoskul = 12
				minut += 120
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk2.jpg"></center>'
				'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.'

				!!if nikpravaQW = 1:end

				act 'Leave':gt 'dk', 'holl'
			end
		elseif avtoskul = 12 and skulday ! daystart and age >= 18:
			act 'Driving test (2:00)':
				*clr & cla
				menu_off = 1
				minut += 120
				avtoskul = 0
				prava = 1
				minut += 120
				'<center><img <<$set_imgh>> src="images/locations/city/industrial/community/dk3.jpg"></center>'
				'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.'
				'"So, congratulations, you''ve passed! Here is your license", he smiles and hands you your brandnew driver''s license. Now, all you need is a car...'

				act 'Leave':gt 'dk', 'holl'
			end
		end
		
		if masseuse['certification'] > 0 and masseuse['certification'] < 10:'You have completed <<masseuse[''certification'']>> out of 10 massage therapist certification lessons.'

		if money >= 1000 and masseuse['certification'] < 10 and masseuse_lesson ! daystart:
			act 'Get certified as a massage therapist (1,000 <b>₽</b> per session)':
				cla
				menu_off = 1
				masseuse_lesson = daystart
				money -= 1000
				masseuse['certification'] += 1
				minut += 120
				gs 'stat'
				'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.'
				*nl
				if masseuse['certification'] = 10:'That was your final lesson! Your course complete, you are issued a certificate that shows you are a certified masseuse.'

				act 'Leave':gt 'dk', 'holl'
			end
		end
	end
end

--- dk ---------------------------------