AddedFlavour/locations/mod_addedflavour_A130_Events.qsrc

# mod_addedflavour_A130_Events
	if $ARGS[0] = 'A130-RegistrationEv-1':
		*clr & cla
		minut += (rand(1,(45-minut)) + rand(5,10))
		modVar_AF_EventLock['A130-RegistrationEv'] = daystart
		if npc_rel['A130'] < 50 : npc_rel['A130'] += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/RegistrationClass<<rand(1,3)>>.jpg"></center>'
		*nl
		'You walk into your Homeroom class and find a free seat to sit down at.  A scattering of other students in your year are already present and as per usual, the Nerds are in full attendence while the Gopniks are barely here at all (Either literally or mentally...).  Before long Ilya is either satisfied with or accepted of the number students that have turned up and goes to start calling the register.'
		*nl
		'He then starts reading out the names of everyone who should be here before finally reaching yours...'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>> <<$pcs_lastname>>"</font>'
		*nl
		'He awaits your response.'
		if $modVar_AF_EventOption['A130-Status'] = 'Dominated' or $modVar_AF_EventOption['A130-Status'] = 'None':
			act '<font color="Red">Repugnant Response</font>' : gt 'mod_addedflavour_A130_Events' , 'A130-RegistrationEv-2'
		end
		if $modVar_AF_EventOption['A130-Status'] = 'Coercion' or $modVar_AF_EventOption['A130-Status'] = 'None':
			act '<font color="Pink">Coquettish Response</font>' : gt 'mod_addedflavour_A130_Events' , 'A130-RegistrationEv-3'
		end
		if $modVar_AF_EventOption['A130-Status'] = 'Submissive' or $modVar_AF_EventOption['A130-Status'] = 'None':
			act '<font color="Blue">Co-operative Response</font>' : gt 'mod_addedflavour_A130_Events' , 'A130-RegistrationEv-4'
		end
	end
	
	if $ARGS[0] = 'A130-RegistrationEv-2':
		*clr & cla
		minut += rand(1,3)
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Dominated' , 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Dom<<rand(1,6)>>.jpg"></center>'
		*nl
		'Instead of replying you simply carrying on staring at him, maintaining a look of calm rebellion on your face.  Within moments he has scanned the room and soon enough his eyes have met yours; still you maintain your stance but this time in flagrant disregard of his expectations.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>!  I know you can hear me over there; you need to respond when I call out your name!"</font>'
		*nl
		'Still you maintain your ground, only allowing a wry smile to curl from your lips to confirm your act as intentional.  You can see this trigger something within himself that almost breaks through the fascade which is his so-called cool Teacher demeanour but he manages to reel it in before moving on to the next student.'
		*nl
		'It isn''t much longer before the Homeroom class is finished and you leave with the rest of your classmates to move on to the next lesson.'
		act '<b>Go to class</b>' : gt 'gschool_grounds', 'bulding'
	end
	
	if $ARGS[0] = 'A130-RegistrationEv-3':
		*clr & cla
		minut += rand(1,3)
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Coercion' , 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Coe<<rand(1,6)>>.jpg"></center>'
		*nl
		'You hold back your response; but not in an act of rebellion but rather as part of a greater act.  Hidden behind a cloak of obliviousness you pretend that you didn''t hear him call your name to the greater purpose of getting him to look over to you.  Sure enough he scans the room for you and only when he is looking straight at you do you put on your best acting to react and respond to him.'
		*nl
		'"...Here, Mr. Yenotin..."'
		*nl
		'While announcing your response you present yourself in a subtly seductive manner.  Not blatantly, just subtly; so as to both not draw attention from others but also to not allow him to be certain as to your intentions.  Looking back at him you can see that you are having the effect that you want him to have as he is somewhere between confused and aroused.'
		*nl
		'Quickly after realising he had stalled and other people might notice this he moves on to the rest of the register and shortly thereafter he has finished and you are onto your next lesson.'
		act '<b>Go to class</b>' : gt 'gschool_grounds', 'bulding'
	end
	
	if $ARGS[0] = 'A130-RegistrationEv-4':
		*clr & cla
		minut += rand(1,3)
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Submissive' , 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Sub<<rand(1,6)>>.jpg"></center>'
		*nl
		'Without hesistation you respond to your teacher''s call, the prompts of which causing him to look over to you.'
		*nl
		'"I am here Mr. Yenotin"'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Thank you, <<$pcs_firstname>>."</font>'
		*nl
		'He lets a light smile out with the success of this interraction; a telling look that he is happy with how his style is playing out.  It is not long after this exchange that the register is completed and you all file out to go to your next lesson.'
		act '<b>Go to class</b>' : gt 'gschool_grounds', 'bulding'
	end
	
	if $ARGS[0] = 'A130-RegistrationEv-5':
		*clr & cla
		minut += rand(2,4)
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Coercion' , 4
		gs 'stat'
		modVar_AF_Rand = rand(1,3)
		if modVar_AF_Rand = 1:
			'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/RegEF1' + iif(modVar_AF_QSPVer = 1,'.gif','.webp') + '"></center>'
		else
			'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/RegEF<<modVar_AF_Rand>>.jpg"></center>'
		end
		*nl
		'Before enterring the class you see that no-one else has turned up yet to Homeroom.  The room is not empty however as you can see Mr Yenotin standing at the other side preparing the Register.  Realising this is a moment to take advantage of you stand idly near the entrance.'
		*nl
		'Adopting an air of obliviousness you wait until he has recognised that you have enterred the room before pretending that something has distracted you.  Using this damn fine acting demonstration you manage to reveal a significant amount of your body but appearing unaware that you have.'
		*nl
		'You stop your act as you notice more people starting to enter the room but you see that your target was successfully enraptured with your body!  You smile to yourself as you go to carry on as normal.'
		act 'Find a seat' : gt 'mod_addedflavour_A130_Events' , 'A130-RegistrationEv-1'
	end
	
	if $ARGS[0] = 'A130-LessonEv-1':
		*clr & cla
		minut += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="' + iif(version_minor >= 8 and version_revision >= 2 and version_patch >= 2,'images/characters/shared/photos/','images/pc/npc_headshots/') + '/big130.jpg"></center>'
		*nl
		'It isn''t long before Mr Yenotin''s attempts to be engaging fall short and he has no-one showing any interest in his pathetic little idea.'
		*nl
		'You think to yourself how best to take advantage of the moment...'
		act '<font color="Red">Take the Piss</font>':
			*clr & cla
			gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Dominated' , 2
			gs 'stat'
			'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Dom<<rand(1,6)>>.jpg"></center>'
			*nl
			'"Mr Yenotin; to be honest that sounds like a shit idea.  Can''t you just do your job and teach the lesson"'
			*nl
			'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>!  There is a time when your opinion is just your opinion, and this is one of those times."</font>'
			*nl
			'He may have rebuffed you pretty quickly but the fact that he returns to the normal lesson plan shows that your dominant act has won the battle; and with it you get on with the lesson.'
			act 'Wait for the end of the lesson': gs 'gschool_lessonsev1', 'russian'
		end
		if $modVar_AF_EventOption['A130-Status'] ! 'Dominated':
			act 'Feel sorry for him':
				*clr & cla
				gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Remove' , 'Dominated' , 1
				gs 'stat'
				'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Sub<<rand(1,6)>>.jpg"></center>'
				*nl
				'You feel sorry for the lack of interest and how it is affecting Mr Yenotin, so you decide to remedy the situation.'
				*nl
				'"Mr Yenotin; our last lesson was particularly stressful and we''re all finding a bit hard to engage today so I hope you understand that we are trying our best while we recover"'
				*nl
				'You can see that he is doubting the legitmacy of what you just said but is welcome for the opportunity to save face.  He then simply acknowledges what you said and moves back to the normal lesson plan.'
				act 'Wait for the end of the lesson': gs 'gschool_lessonsev1', 'russian'
			end
		end
	end
	
	if $ARGS[0] = 'A130-LessonEv-2':
		*clr & cla
		minut += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="' + iif(version_minor >= 8 and version_revision >= 2 and version_patch >= 2,'images/characters/shared/photos/','images/pc/npc_headshots/') + '/big130.jpg"></center>'
		*nl
		'You can see your Teacher has a few students on board with his idea but is in need of a few more to get it going.  He starts scanning the room to see if he can get some others involved, slowing making his way over to you.'
		*nl
		'He doesn''t know that you have seen this all unfold yet so you could take advantage of the moment.'
		act '<font color="Pink">Subtly exhibit yourself</font>':
			*clr & cla
			gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Coercion' , 2
			gs 'stat'
			'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Coe<<rand(1,6)>>.jpg"></center>'
			*nl
			'You look away from him and make it look like you are oblivious to what is going on; but at the same time you move some clothing to subtly reveal a part of your body to his view.'
			*nl
			'Mere seconds pass before he finally looks over to you but the sight he gets immediately stops his train of thought.  You do your best not to react but you can see out of the corner of your eye that he is sidetracked by the reveal.'
			*nl
			'After an indeterminate amount of time he realises he has stalled and recoveres from the siren''s call your body has made and tries his best to get the lesson back under control.'
			act 'Wait for the end of the lesson': gs 'gschool_lessonsev1', 'russian'
		end
		if $modVar_AF_EventOption['A130-Status'] ! 'Coercion':
			act 'Rebuff his attempts':
				*clr & cla
				gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Remove' , 'Coercion' , 1
				gs 'stat'
				'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Dom<<rand(1,6)>>.jpg"></center>'
				*nl
				'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>; how would you like to join this special task?"</font>'
				*nl
				'"Sorry Mr Yenotin but I''d much rather just focus on the normal lesson."'
				*nl
				'You can see the slight dissappointment in your rejection but soon gets on with the rest of the lesson.'
				act 'Wait for the end of the lesson': gs 'gschool_lessonsev1', 'russian'
			end
		end
	end
	
	if $ARGS[0] = 'A130-LessonEv-3':
		*clr & cla
		minut += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="' + iif(version_minor >= 8 and version_revision >= 2 and version_patch >= 2,'images/characters/shared/photos/','images/pc/npc_headshots/') + '/big130.jpg"></center>'
		*nl
		'He very quickly centre''s on you and getting you involved in the group project.'
		*nl
		'You get on board and join in with the rest of the students already getting on with the extra tasks, yourself doing some research into the book you are focussing on.'
		act '<font color="Blue">Put effort in</font>':
			*clr & cla
			gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Submissive' , 2
			pcs_grades += rand(0,1)
			gs 'stat'
			'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Sub<<rand(1,6)>>.jpg"></center>'
			*nl
			'Without hesistation you are studying the book and getting involved with the discussion your fellow students are having.  Overall you are having an active and positive contribution to the task at hand.'
			*nl
			'My Yenotin occasionally gets involved himself and is very happy to see how well his idea has been taken up; particularly with how well you have taken to it.'
			*nl
			'You all make good headway through it to Mr Yenotin''s satisfaction and so get on with the lesson.'
			act 'Wait for the end of the lesson': gs 'gschool_lessonsev1', 'russian'
		end
		if $modVar_AF_EventOption['A130-Status'] ! 'Submissive':
			act 'Sit back and let everyone else work':
				*clr & cla
				gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Remove' , 'Submissive' , 1
				gs 'stat'
				'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Coe<<rand(1,6)>>.jpg"></center>'
				*nl
				'You try to focus on the task but honestly it is just too much to care about; so for most of the time you just sit back and let your classmates do most of the work.'
				*nl
				'Mr Yenotin looks over to see how you all are getting on and is greeted with the sight of your lack of interest.  He would move to get you back involved but for some reason your lack of focus has distracted him...'
				*nl
				'Ultimately though you just wait for the lesson to finish.'
				act 'Wait for the end of the lesson': gs 'gschool_lessonsev1', 'russian'
			end
		end
	end
	
	if $ARGS[0] = 'A130-ClubEv-1':
		*clr & cla
		minut += (45 - minut)
		pcs_mood += rand(10,20)
		modVar_AF_EventLock['A130-ClubEv'] = daystart
		pcs_grades += rand(0,1)
		if npc_rel['A130'] < 100 : npc_rel['A130'] += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Club<<rand(1,3)>>.jpg"></center>'
		*nl
		'You walk into the school library and sit down at a free chair.  The Literature Club is quite freeform and is mainly just a place to read in peace but is open for discussion and research into certain passages.'
		*nl
		'You pick a random book of the shelf to focus on; just something to dive into for the best part of an hour.'
		if $modVar_AF_EventOption['A130-Status'] = 'Submissive' or $modVar_AF_EventOption['A130-Status'] = 'None':
			act '<font color="Blue">Discuss book with Mr Yenotin</font>' : gt 'mod_addedflavour_A130_Events' , 'A130-ClubEv-2'
		end
		if $modVar_AF_EventOption['A130-Status'] = 'Coercion' or $modVar_AF_EventOption['A130-Status'] = 'None':
			act '<font color="Pink">Show some skin</font>' : gt 'mod_addedflavour_A130_Events' , 'A130-ClubEv-3'
		end
		act 'Just focus on reading' : gt 'mod_addedflavour_A130_Events' , 'A130-ClubEv-4'
	end
	
	if $ARGS[0] = 'A130-ClubEv-2':
		*clr & cla
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Submissive' , 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Sub<<rand(1,6)>>.jpg"></center>'
		*nl
		'"Mr Yenotin, I would be interested to get your take on the meaning of this passage here"'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Of course <<$pcs_firstname>>!  I would be glad to contribute."</font>'
		*nl
		'He walks over and sits himself next to you and after quickly reading the passage you were referring to he happily goes through his opinion of it while also listening to the opinions you have.  Overall it is a pleasant and enlightening discussion.'
		*nl
		if modVar_AF_EventProgress['A130-SubmissiveRating'] >= modVar_AF_EventGates['A130-TeacherSexEv-1'] and ($modVar_AF_EventOption['A130-Status'] = 'Submissive' or $modVar_AF_EventOption['A130-Status'] = 'None'):
			'After your talk you have the idea of grabbing another book relevant to the one you were talking about.  You quickly see it convinently at the other end of the table so reach over to grab it.  The other students that were attending the club are already leaving so you want to get talking about this book fast before Mr Yenotin also goes to leave!'
			act 'Quickly focus on the book' : gt 'mod_addedflavour_A130_Events' , 'A130-ClubEv-5'
		else
			'Soon though the club is finishing up so you head back outside'
			act 'Go back outside' : gt 'gschool_grounds', 'main'
		end
	end
	
	if $ARGS[0] = 'A130-ClubEv-3':
		*clr & cla
		minut += rand(1,3)
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Coercion' , 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Coe<<rand(1,6)>>.jpg"></center>'
		*nl
		'You decide to focus intently on your book; getting swept away by its prose and lost in its nuances.  And while your mind is swept up in it your body is relaxed and unrestrained, allowing willing watchers a subtle glimpse of your hidden assets.'
		*nl
		'You are genuinely oblivious to it but your Teacher who is monitoring the club is experiencing his own distraction, albeit for him it is the hidden enjoyment your body presents!'
		*nl
		'Perhaps too soon you are broken out of your literary entrapment and leave the building to rejoin the real world.'
		act 'Go back outside' : gt 'gschool_grounds', 'main'
	end
	
	if $ARGS[0] = 'A130-ClubEv-4':
		*clr & cla
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/Club<<rand(1,3)>>.jpg"></center>'
		*nl
		'You sit back and enjoy the book you have chosen; occasionally allowing Mr Yenotin to discuss anything he wishes about it.'
		*nl
		'Before long the club is over and you are back outside the school.'
		act 'Go back outside' : gt 'gschool_grounds', 'main'
	end
	
	if $ARGS[0] = 'A130-ClubEv-5':
		*clr & cla
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Submissive' , 4
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/ClubSB<<rand(1,2)>>' + iif(modVar_AF_QSPVer = 1,'.gif','.webp') + '"></center>'
		*nl
		'You grab the book but in your haste you manage to sit back down on Mr Yenotin''s lap!  Not wanting to draw attention to your blunder or lose the chance to discuss the book, you carry on regardless to the faux pas.'
		*nl
		'Your nervousness however is making you fidget but fortunately Mr Yenotin is doing his best to stop you from slipping off.  Still, the more this goes on the more something seems to be making it harder to stay o-'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>!  I am glad you are relishing the chance to discuss this book but... would you look at the time; it is time we are heading home!"</font>'
		*nl
		'"Of course, Mr Yenotin."'
		*nl
		'You pack up your things and move to leave the school, hoping you didn''t embarrass yourself too much...'
		if modVar_AF_EventOpen['A130-SubmissiveSexEv'] = 0 and $modVar_AF_EventOption['A130-Status'] = 'Submissive':
			act 'Go back outside' : gt 'mod_addedflavour_A130_Events', 'A130-ClubEv-6'
		else
			act 'Go back outside' : gt 'gschool_grounds', 'main'
		end
	end
	
	if $ARGS[0] = 'A130-ClubEv-6':
		*clr & cla
		minut += 1
		modVar_AF_EventOpen['A130-SubmissiveSexEv'] = 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Happy.jpg"></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Hang on a second <<$pcs_firstname>>, there is something I wanted to talk to you about."</font>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"As I am sure you realise, you have been a very good student for me; a shining light among the students of this school.  And I would like to see you achieve so much more."</font>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"To that end I would like to invite you to have some one-to-one tutor sessions, so we can really prepare you for University and later success.  It is completely optional and there is no pressure on you to do so, but if you are interested then visit me at my Home between 5pm and 6pm on weekdays; I will be available then and we won''t be interupted."</font>'
		*nl
		'He hands you a note with his address which you take and put into your pocket.  Soon after you say your goodbyes and leave the school.'
		act 'Go back outside' : gt 'gschool_grounds', 'main'
	end
	
	if $ARGS[0] = 'A130-HallPunishEv-1':
		*clr & cla
		minut += 1
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Dominated' , 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="' + iif(version_minor >= 8 and version_revision >= 2 and version_patch >= 2,'images/characters/shared/photos/','images/pc/npc_headshots/') + '/big130.jpg"></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Miss <<$pcs_firstname>> <<$pcs_lastname>>!  I would like a word with you.  You do know that it is a requirement that you turn up for Homeroom and I expect you to be there."</font>'
		*nl
		'"Yes, Mr Yenotin."'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Good to hear it <<$pcs_firstname>>"</font>'
		act 'Keep walking' : gt 'gschool_lessons', 'short_break'
	end
	
	if $ARGS[0] = 'A130-HallPunishEv-2':
		*clr & cla
		minut += 1
		gs 'mod_addedflavour_A130_Functions' , 'changestatus' , 'Add' , 'Dominated' , 4
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="' + iif(version_minor >= 8 and version_revision >= 2 and version_patch >= 2,'images/characters/shared/photos/','images/pc/npc_headshots/') + '/big130.jpg"></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Miss <<$pcs_firstname>> <<$pcs_lastname>>!  As you have already been told; you are expected to attend Homeroom and I have not see you there for at least two days!"</font>'
		*nl
		'"Mr Yenotin, I-"'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"I don''t want to hear your excuses; instead I will punish you to help you understand that you are expected to attend!"</font>'
		*nl
		'He takes you by the arm and escorts to a nearby vacated room.'
		act 'Be punished' : gt 'mod_addedflavour_A130_Events' , 'A130-HallPunishEv-3'
	end
	
	if $ARGS[0] = 'A130-HallPunishEv-3':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/HallPE<<rand(1,2)>>' + iif(modVar_AF_QSPVer = 1,'.gif','.webp') + '"></center>'
		*nl
		'Mr Yenotin takes you into the vacant room and bends you over a free desk.  After a moments hesistation he finally commits and spanks you across the arse!  It isn''t overly hard though, perhaps betraying his own reluctance; and in fact you find yourself partially enjoying it.'
		*nl
		'Before long the act is completed, leaving you in a state of confusion and mild arousal.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"I hope you realise that you have driven me to do this.  Now get along before you miss anyone elses lesson..."</font>'
		act 'Keep walking' : gt 'gschool_lessons', 'short_break'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-1':
		*clr & cla
		modVar_AF_EventTriggered['A130-DomSexEv'] += 1
		modVar_AF_EventLock['A130-DominatedSexEv'] = daystart + (7 - week)
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Angry.jpg"></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>; get the hell back in here!"</font>'
		*nl
		'"What is it, Mr Yenotin..."'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Just get back in here."</font>'
		act 'Go back in the Classroom' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-2'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-2':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Get undressed!"</font>'
		*nl
		iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'"What; are you going to spank me again?  I''ll still do whatever I want."','"You want me again, do you Mr Yenotin?.."')
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Just get them off"</font>'
		*nl
		'You do what you are told but keep an air of rebelliousness about you.'
		act 'Remove your clothes' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-3'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-3':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'"Well, let''s get this over with, I have got better things to be getting on with."','"Well then Mr Yenotin, what are you waiting for?"')
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">' + iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'"No you haven''t <<$pcs_firstname>>, not this time."','"You, <<$pcs_firstname>>.  I am waiting for you"') + '</font>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">' + iif(modVar_AF_EventProgress['A130-CoercionRating'] > modVar_AF_EventProgress['A130-SubmissiveRating'],'"I see you, flashing your body, making yourself available to whoever.  It needs to change."','"You have it in you to be well behaved.  Courteous.  You need to be reminded that it is the right path."') + '</font>'
		*nl
		iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'He appears to be behaving a bit differently making you wonder if he has something different in mind','You know what he wants to do.')
		act 'Wait and see' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-4'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-4':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"It is a shame I have to resort to the only thing that works in this school; but with you it has to be done."</font>'
		*nl
		'He then touches you on your exposed shoulder while riling himself up for what is to come.'
		*nl
		iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'"What do you think you are doing!"','"Just get on with it!"')
		*nl
		'He doesn''t respond but rather starts moving towards uncaging himself.  ' + iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'You weren''t quite ready for this but maybe you should have been.','You know you will be face to face with it soon.')
		act 'See the beast' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-5'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-5':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv4' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'He drops his pants and reveals his hard erection to you.  He doesn''t say anything; rather he just waits for you to know what to do, once you have got over the initial shock...'
		*nl
		iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'"Are you serious?!  What are you expecting me to do with that!"','You touch it; not committing to anything, just hinting at what you will do.')
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"You know what you have to do <<$pcs_firstname>>.  And you will be expected to do it every time you disobey me."</font>'
		*nl
		'He is obviously waiting for you to act but you are considering your next action.'
		act 'Think about what you will do' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-6'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-6':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv5' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'He decides not to wait for you to act and grabs the back of your head, forcing it onto his hard phallus.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">' + iif(modVar_AF_EventProgress['A130-CoercionRating'] > modVar_AF_EventProgress['A130-SubmissiveRating'],'"You can''t pretend you weren''t expecting this; I see you flashing your body to whoever you can get away with.  This punishment is just what you need..."','"You could be such a good girl; you need to understand that I am trying to help you learn that disobedience will result in punishment..."') + '</font>'
		*nl
		'You carry on such his cock.  Whether he is legitimately trying to punish you or it was just a way of forcing you to do so, you don''t know because he is clearly focused now on using your body.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"You are doing a fantastic job there <<$pcs_firstname>>, but now it is time to move to the actual punishment."</font>'
		*nl
		iif(modVar_AF_EventTriggered['A130-DomSexEv'] = 1,'<i>Wait... What... I thought this was the punishment</i>','<i>Just how long is he going to pretend that this is actually about punishing me...</i>')
		act 'Let him move you' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-7'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-7':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagPlay_Recv'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv6' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'He guides you up as he takes your place on the chair; not wasting any time before grabbing you by the waist and pulling you down onto his waiting cock.'
		*nl
		'Any fight you might have had is gone as he has you under his control.'
		act 'Get Fucked' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-8'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-8':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv7' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'All the while keeping his hands grasped to your sides he bounces you on his hard shaft.  Whatever your thinking is about how you got here, the pleasure of it might actually be taking over.  Your thinking doesn''t matter though; as he is in control and he is only thinking about what you do to him.'
		*nl
		'Eventually you feel that he is peaking, with his thrusts getting harder and his hold of you getting stronger.'
		act 'Bring on the cum' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-9'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-9':
		*clr & cla
		minut += rand(2,3)
		gs 'boyStat', 'A130'
		sexpartkno = 1
		spafinloc = 1
		gs 'Cum_Manage'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv8' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Without saying a word he picks you up and lays you down on the desk.  Before you have a chance to react he is raining his cum down onto your labia.'
		*nl
		'You lay there in anticipation of what he will do next.  Technically your punishment is over but still has you under his control.'
		act 'Wait for him' : gt 'mod_addedflavour_A130_Events' , 'A130-LessonStayBackEv-10'
	end
	
	if $ARGS[0] = 'A130-LessonStayBackEv-10':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/DomEv9' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Get your clothes back on <<$pcs_firstname>>; and I hope you now appreciate that you are expected to attend homeroom.  You forced me to do this, you alone."</font>'
		*nl
		'Before you even have a chance to respond he leaves the room, leaving your vulnerable body in full view to anyone lucky enough to see it.  Sheepishly you put your clothes back on and try to get your head together in order to get on with the day.'
		act 'Leave the classroom' : gt 'gschool_lessons', 'short_break'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-1':
		*clr & cla
		minut += rand(1,2)
		modVar_AF_EventTriggered['A130-CoeSexEv'] += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Happy.jpg"></center>'
		*nl
		'You see your Language and Homeroom Teacher standing in the hallway as you are walking down it.  This gives you an idea; you know he is about to notice you, maybe it would be a good idea to put on a show...'
		act 'Exhibit yourself' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-2'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-2':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/locations/pavlovsk/school/HallFE<<rand(1,2)>>' + iif(modVar_AF_QSPVer = 1,'.gif','.webp') + '"></center>'
		*nl
		'Making sure to heavy your step as you pass him so he unequivocally looks at you, you begin your planned routine.  Feeling his eyes wash over your body you push out your posterior, allowing it to peak out under your clothes.  It''s sculpted vision holding all in it''s gaze.'
		*nl
		'You can almost feel the hallway fall silent; drawn to the show you are providing...'
		if modVar_AF_EventTriggered['A130-CoeSexEv'] >= 5:
			*nl
			'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>, come join me in the classroom.  I need a word with you."</font>'
			*nl
			'"Of course, Mr Yenotin"'
			act 'Join him in the classroom' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-3'
		elseif rand(modVar_AF_EventTriggered['A130-CoeSexEv'],5) = 5:
			*nl
			'<font color="<<$npc_fontcolor[''A130'']>>">...<<$pcs_firstname>> I..."</font>'
			*nl
			'"Did you say something, Mr Yenotin.  I would be happy to talk in the classroom if you wanted to talk in private."'
			act 'Join him in the classroom' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-3'
		end
		act 'Continue onto your next lesson' : gt 'gschool_lessons', 'short_break'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-3':
		*clr & cla
		minut += rand(1,2)
		modVar_AF_EventLock['A130-CoercionSexEv'] = daystart + (7 - week)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'"So Mr. Yenotin; what did you want with me..."'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">...I want you <<$pcs_firstname>>."</font>'
		*nl
		'"Whatever do you mean, Mr Yenotin"'
		*nl
		'You put in every effort to appear as alluring as possible; pushing out your cleavage, running your fingers through your hair, twisting your legs around the apex of your vagina.  And it is working, you can see in his eyes just how much he is trying to restrain himself.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Oh <<$pcs_firstname>>, you know exactly what I mean"</font>'
		act 'Give yourself to him' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-4'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-4':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Kiss'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'With his hesistation spent he steps towards you, unleashing his lips upon yours without restraint.  Whatever was holding him back is gone and all he has in his mind is your body and the pleasure it will bring him.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">' + iif(modVar_AF_EventTriggered['A130-CoeSexEv'] > 5,'"No matter how many times you drive me to want you, I will never stop wanting you."','"I want you so bad I just can''t control myself anymore.') + '</font>'
		*nl
		'"I am yours to take, Mr Yenotin.  Take me."'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">' + iif(modVar_AF_EventProgress['A130-DominatedRating'] > modVar_AF_EventProgress['A130-SubmissiveRating'],'"You are obstinant and difficult to teach but still I find myself thinking about you constantly.  A Siren''s call from a rocky shore."','"You are often the perfect student and don''t put a step wrong, but I still find myself thinking about your body leaving me in a daze."') + '</font>'
		*nl
		'"Don''t hold back, there is so much more you can have."'
		act 'Lose some clothes' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-5'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-5':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Kiss'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'With you yielding more of yourself to him he lays you down upon the desk; breaking open more of your clothing while spending as much time with your lips as he can.'
		*nl
		iif(modVar_AF_EventProgress['A130-DominatedRating'] > modVar_AF_EventProgress['A130-SubmissiveRating'],'"I''ve been a bad girl, Mr Yenotin.  It is only fair that you get to punish me."','"I have been a very good girl for you, Mr Yenotin.  Don''t I deserve a reward for being so good to you?"')
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"I have just the thing and it is fully up for the task"</font>'
		act 'Pleasure him' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-6'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-6':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv4' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'In record time he is completely naked and presenting his rock hard cock for your attention.  There is no mistaking what you are to do next so you lower your head to his phallus and take it into your mouth.'
		*nl
		'You suck hard on it and do the best you can to get your lips around his impressive size.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"That feels absolutely amazing <<$pcs_firstname>>, but now it is time for the main event."</font>'
		act 'Bend over' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-7'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-7':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv5' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You release his cock from your oral assault and bend over on the desk to reveal your waiting nethers.  With him already being excited to the extreme, he rams his cock directly into you surging you with the pleasure you have been craving since this all began.'
		*nl
		'His restraint being all but spent; he continues to thrust hard to satisfy his bestial need, your body being the prey to his own desire.  Still a sign of humanity breaks through in realising he wants to have as much of you as he can before he blows, and so he pulls out and tells you to mount him on the desk.'
		act 'Mount his cock' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-8'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-8':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv6' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You are on him in an instant; your lust being just as animal as his own.  He is soon thrusting up into you with just as much ferocity as he did before.'
		*nl
		'You are both oblivious to the goings on in the world; entirely lost the pleasure of the moment.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>!  I''m nearly ready to blow.  Get up so I can go between your tits!"</font>'
		act 'Take his cock into your bosom' : gt 'mod_addedflavour_A130_Events' , 'A130-HallFlirtEvent-9'
	end
	
	if $ARGS[0] = 'A130-HallFlirtEvent-9':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_TitPlay_Recv'
		gs 'boyStat', 'A130'
		sexpartkno = 1
		spafinloc = 15
		gs 'Cum_Manage'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/CoeEv7' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You dismount and slide you body down until his cock meets your ample breasts.  His cock is ready to burst with seed and only needs to be mildly teased to trigger it, something the soft feeling of your breasts will gratefully provide.'
		*nl
		'After mere moments of having your tits wash across his shaft it blows, launching ropes of cum deep into your cleavage.  You do your best to keep it on you so not stain the next unsuspecting students lesson which your provider is oblivious to.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"My god <<$pcs_firstname>>, that was amazing!  We best get out of here though before the next lesson starts."</font>'
		*nl
		'With that you do your best to get your clothes back as they were with the pair of you leaving in different directions.'
		act 'Leave the classroom' : gt 'gschool_lessons', 'short_break'
	end
	
	if $ARGS[0] = 'A130-TutorEv-1':
		*clr & cla
		minut += rand(1,2)
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Home.jpg"></center>'
		*nl
		'You walk up to your Teachers'' Home, considering the Tutor Session that he offered.  ' + iif(modVar_AF_EventTriggered['A130-SubSexEv'] >= 1,'You have been enjoying the personal time with My Yenotin so it would be worth continuing','You are looking forward to the chance to have some personal tutoring but now that you are standing here you feel anxious to get out of your comfort zone.')
		act 'Knock on the door' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-2'
		act 'Go Back' : gt 'pav_residential'
	end
	
	if $ARGS[0] = 'A130-TutorEv-2':
		*clr & cla
		minut += rand(1,2)
		modVar_AF_EventTriggered['A130-SubSexEv'] += 1
		modVar_AF_EventLock['A130-SubmissiveSexEv'] = daystart
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Happy.jpg"></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>!  ' + iif(modVar_AF_EventTriggered['A130-SubSexEv'] > 1,'Nice to see you again for our Tutor Sessions.  Come on in and we''ll get started.','How nice it is to see you take up my offer!  Come on in and we will head to the study.') + '"</font>'
		*nl
		'You walk into his home and let him guide you to his study whereupon you both get prepared for your tutor session.'
		act 'Start learning' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-3'
	end
	
	if $ARGS[0] = 'A130-TutorEv-3':
		*clr & cla
		minut += rand(15,25)
		pcs_grades += rand(0,3)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You and Mr Yenotin spend some time researching Russian Literature and everything required to ace the subject.  You feel that your grades will be getting better just from one session but know that more will be needed.'
		*nl
		if modVar_AF_EventTriggered['A130-SubSexEv'] > difficulty:
			modVar_AF_Rand = rand (difficulty,(8 + (difficulty * 2)))
			if modVar_AF_Rand <= modVar_AF_EventTriggered['A130-SubSexEv']:
				'<font color="<<$npc_fontcolor[''A130'']>>">"Take a look at this passage <<$pcs_firstname>>, I think you will find it interesting..."</font>'
				*nl
				'Mr Yenotin edges closer to you to present the book, getting right alongside you in the process.'
				act 'Read the passage' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-4'
			else
				'Perhaps sooner than you would have liked, the tutor session is over.  Once everything is packed up Mr Yenotin ushers you out of the house after reminding you to visit again for another tutor session.'
				act 'Leave' : gt 'pav_residential'
			end
		else
			'Perhaps sooner than you would have liked, the tutor session is over.  Once everything is packed up Mr Yenotin ushers you out of the house after reminding you to visit again for another tutor session.'
			act 'Leave' : gt 'pav_residential'
		end
	end
	
	if $ARGS[0] = 'A130-TutorEv-4':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Touch_Recv'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You and Mr Yenotin are quite close now, focused entirely on the passage and its teachings.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>, your learning has been a revelation.  It is so good to teach someone so eager to learn.  ' + iif(modVar_AF_EventProgress['A130-DominatedRating'] > modVar_AF_EventProgress['A130-CoercionRating'],'I know sometimes you can rile me up but then I get to see this encouraging side of you and it is all forgiven.','I know sometimes you be a bit airheaded but then I get this see this side of you and I know you will turn out well.') + '"</font>'
		*nl
		'You start feeling that after his compliment he has started touching your leg.  It might be nothing but at the same time, you aren''t opposed to it...'
		*nl
		if modVar_AF_EventTriggered['A130-SubSexEv'] > (difficulty * 2):
			modVar_AF_Rand = rand((difficulty * 2),(10 + (difficulty * 3)))
			if modVar_AF_Rand <= modVar_AF_EventTriggered['A130-SubSexEv']:
				'<font color="<<$npc_fontcolor[''A130'']>>">"You trust me, right, <<$pcs_firstname>>?"</font>'
				*nl
				'"Of course, Mr Yenotin...'
				*nl
				'<font color="<<$npc_fontcolor[''A130'']>>">"It''s just... I have never had a student so good as you or shown so much promise; I find myself thinking about you all of the time."</font>'
				*nl
				'"Wow, Mr Yenotin.  I don''t know what to say."'
				*nl
				'<font color="<<$npc_fontcolor[''A130'']>>">"You don''t need to say anything..."</font>'
				*nl
				'He is now leaning towards you, his eyes fixated on yours!  You think he is going to kiss you!"'
				act 'Kiss him' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-5'
			else
				'<font color="<<$npc_fontcolor[''A130'']>>">"You are such a fantastic student <<$pcs_firstname>>; I am already looking forward to our next tutor session!"</font>'
				*nl
				'Soon enough, you and Mr Yenotin start packing up to get ready to leave.  Minutes later you are back outside the house, left thinking about what happened...'
				act 'Leave' : gt 'pav_residential'
			end
		else
			'<font color="<<$npc_fontcolor[''A130'']>>">"Sorry <<$pcs_firstname>>, I don''t know what came over me...  Anyway, let''s finish up as it won''t be long before my wife gets home."</font>'
			*nl
			'And with that you pack everything away and let Mr Yenotin guide you out of the house.'
			act 'Leave' : gt 'pav_residential'
		end
	end
	
	if $ARGS[0] = 'A130-TutorEv-5':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Kiss'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Mr Yenotin is kissing you; and while the kiss is caring and gentle, his hands are far more forthright, searching for your private places.'
		*nl
		'You already feel lost to him, maybe even in love with him.  He does care for you deeply after all and this feels like an honest expressions of that feeling, maybe...'
		*nl
		if modVar_AF_EventTriggered['A130-SubSexEv'] > (difficulty * 3):
			modVar_AF_Rand = rand((difficulty * 3),(12 + (difficulty * 4)))
			if modVar_AF_Rand <= modVar_AF_EventTriggered['A130-SubSexEv']:
				'"Mr Yenotin... do you really love me this much?  Am I that special to you?"'
				*nl
				'<font color="<<$npc_fontcolor[''A130'']>>">"You are, <<$pcs_firstname>>.  I have never had a student like you before; not just in your class but in any class, no-one has been as special as you are.  Your mind, your body, your soul; no-one else even compares to you."</font>'
				*nl
				'"Oh, Mr Yenotin..."'
				*nl
				'You lean in; yourself being fully swept up by the emotion of the moment.  You could let him do anything with you if only if it would let you feel as special as you do now.'
				act 'Let him take control' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-6'
			else
				'All of a sudden you hear what sounds like someone pulling into the driveway.'
				*nl
				'<font color="<<$npc_fontcolor[''A130'']>>">"Whoa, it sounds like my wife is back earlier than usual.  We better get packed up before she comes in.  Still, I hope to see you again soon."</font>'
				*nl
				'You quickly get ready and leave via the back door; your flustered state allowing you to do so without question.'
				act 'Leave' : gt 'pav_residential'
			end
		else
			'He stops kissing you abruptly however, leaving you slightly confused in the moment.'
			*nl
			'<font color="<<$npc_fontcolor[''A130'']>>">"I''m so sorry <<$pcs_firstname>>.  Just seeing you triggers something in me.  You are perfection and I... never mind.  It''s probably best we finish up."</font>'
			*nl
			'Your confusion makes you slightly malleable and before you are fully able to comprehend the situation you are back outside...'
			act 'Get your senses back' : gt 'pav_residential'
		end
	end
	
	if $ARGS[0] = 'A130-TutorEv-6':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_TitPlay_Recv'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv4' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You stand there completely taken in by your paramour; almost putty in his hands, and sure enough his hands are exploring all of you.'
		*nl
		'In what could be minutes, seconds or hours in your mind; he has your shirt opened and your perky breasts displayed.  There is only so long a man can last before unleashing himself on them, and almost as quickly as they are revealed he is giving them their due attention.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Are you ready do more?  To show more of your perfection."</font>'
		*nl
		'"Yes, Mr Yenotin.  I am ready to do anything you want with me..."'
		*nl
		'You see a grin glide from his lips; not malign but rather loving, coming from a place of joy that his idol is acquiescing to his advances...'
		if modVar_AF_EventTriggered['A130-SubSexEv'] >= (12 + (difficulty * 4)):
			act 'Drop down to your knees' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-8'
			act 'Just have him lick you out' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-7'
		else
			if rand(1,2) = 1:
				act 'Give yourself to him' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-7'
			else
				act 'Give yourself to him' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-8'
			end
		end
	end
	
	if $ARGS[0] = 'A130-TutorEv-7':
		*clr & cla
		if pcs_horny >= 100:
			$orgasm_or = 'yes'
			gs 'arousal' , 'vaginal' , rand(3,6)
			gs 'arousal', 'end'
			modVar_AF_Temp = 1
		else
			gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Oral_Recv'
			modVar_AF_Temp = 0
		end
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv5' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'He lays you back down onto the nearby sofa revealing your nether regions to your eager accomplice.  Without hesistation he launches his tongue onto your quivering lips; his powerful touch dictating your rising pleasure...'
		*nl
		if modVar_AF_Temp = 1:
			'His oral assault is enough to surge a substantial orgasm in you.  You do your best to withhold your lust-driven scream, your success reducing it to a low moan.'
		else
			'He is slathering your vagina with complete abandon to all else around him.  You too are lost to the intensity of the moment but one of you has to break and after what feels like too short a time he realises that the real world might be catching up with the two of you any time soon, and so stops.'
		end
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"We better finish up quickly, my wife should be back soon and I don''t want her to interupt our special moment together..."</font>'
		*nl
		'The two of you do your best to get your senses back before you quickly leave the house, yourself already mentally preparing for the next tutor session.'
		act 'Leave' : gt 'pav_residential'
	end
	
	if $ARGS[0] = 'A130-TutorEv-8':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv6' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You drop to your knees and lower yourself towards his hardening phallus.  You think a bit about how you got to the point but convince yourself that this is a worthwhile expression of the feelings you have for each other.  You do like how much he cares for you and you can tell how much he will like this so it is a good way of reciprocating it...'
		*nl
		'His cock is at full mast now, only waiting for your soft lips to caress down its length.  You happily provide, allowing the hardened shaft to glide passed your oral barrier until its full length is nestled within you warm embrace.'
		*nl
		if modVar_AF_EventTriggered['A130-SubSexEv'] > (difficulty * 4):
			modVar_AF_Rand = rand((difficulty * 4),(15 + (difficulty * 5)))
			if modVar_AF_Rand <= modVar_AF_EventTriggered['A130-SubSexEv']:
				act 'Continue Sucking his Cock' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-10'
			else
				act 'Continue Sucking his Cock' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-9'
			end
		else
			'As you are gorging yourself on his love stick he very suddenly pulls it free and stands up in a panic.  It seems that in your eagerness to please you completely missed the sound of a car outside!'
			*nl
			'<font color="<<$npc_fontcolor[''A130'']>>">"Shit, I am so sorry <<$pcs_firstname>>, but I don''t want her to ruin what we have for each other.  We need to quickly get everything packed up and I hope you don''t mind if you leave through the back door again..."</font>'
			*nl
			'Whatever thoughts you might have on the situation are suppressed but the feelings you have for him that you don''t quite fully understand, so you comply and quickly get your clothes back on and hurry out the rear entrance.'
			act 'Leave' : gt 'pav_residential'
		end
	end
	
	if $ARGS[0] = 'A130-TutorEv-9':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give'
		gs 'boyStat', 'A130'
		sexpartkno = 1
		spafinloc = 12
		gs 'Cum_Manage'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv7' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You can already feel how hard you are making him; every silken glide of your lips is tempering a harder rod.'
		*nl
		'Soon enough you feel the surging within his member and your mouth feeling with hot sperm.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"Oh <<$pcs_firstname>>... I don''t know if I will ever have someone so perfect..."</font>'
		*nl
		'You lean back in satisfaction of your achievement and the praise he gives back in return.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"... It''s probably best we get finish up now; I wouldn''t want to have our special time ruined after all..."</font>'
		*nl
		'You and Mr Yenotin start packing up all the tutoring materials before you head out back into the real world.'
		act 'Leave' : gt 'pav_residential'
	end
	
	if $ARGS[0] = 'A130-TutorEv-10':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv7' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"<<$pcs_firstname>>.  This feels fantastic but I have very strong feelings for you, and I want to give you the ultimate expression of those feelings.  I promise that your interests are my every priority so... would you want this?"</font>'
		*nl
		'Whatever naivety you might have is not enough to delude you as to what he is referring to.  <i>Do I want to let him have me completely</i>.'
		act 'Give yourself to him' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-11'
		act 'Just finish him off with your mouth' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-9'
	end
	
	if $ARGS[0] = 'A130-TutorEv-11':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv8' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You smile gently at him and tell him that you want everything from him prompting an idolising look to grow in his eyes.  Soon after he guides you to the sofa and bends you over it.  All the while massaging your smooth skin to prepare you for the surge of feeling that is about to come he guides his rock-hard phallus into your virile pussy.'
		*nl
		'His thrusts are eager but not forceful; this man see''s you as perfection after all and in no way wants you to feel any apprehension.  Your senses are already peaking and do nothing in hiding how lost to him that you have become.'
		act 'Let him change position' : gt 'mod_addedflavour_A130_Events' , 'A130-TutorEv-12'
	end
	
	if $ARGS[0] = 'A130-TutorEv-12':
		*clr & cla
		if pcs_horny >= 100:
			$orgasm_or = 'yes'
			gs 'arousal' , 'vaginal' , rand(3,6)
			gs 'arousal', 'end'
			modVar_AF_Temp = 1
		else
			gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
			modVar_AF_Temp = 0
		end
		gs 'boyStat', 'A130'
		sexpartkno = 1
		spafinloc = 0
		gs 'Cum_Manage'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/school/teacher/ilya/Sex/SubEv9' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'In a seemingly effortless maneuver he has you laid on top of him while he powers his shaft into you.  ' + iif(modVar_AF_Temp = 1,'It is enough to surge you into a powerful orgasm, the vibrations of which causes a strong reaction in him','The power of his cock feels like ecstasy in you and you don''t know how long you can last before cumming yourself.')
		*nl
		'Soon enough he reaches his endgame and blasts great loads of cum deep into your vagina; the feeling of pleasure matching the feeling of adoration you receive.'
		*nl
		'<font color="<<$npc_fontcolor[''A130'']>>">"My god, <<$pcs_firstname>>.  I don''t think I have felt anything like this before.  You grace my every waking thought and now you bolster my every need.  I very much look forward to our next tutor session..."</font>'
		*nl
		'You both do your best to recover from your surging emotional states and tidy everything up as best you can.  When it looks good Mr Yenotin kisses you on the cheek before letting you out the front door.'
		act 'Leave' : gt 'pav_residential'
	end

--- mod_addedflavour_A130_Events ---------------------------------