AddedFlavour/locations/mod_addedflavour_A33_Events.qsrc

# mod_addedflavour_A33_Events
	if $ARGS[0] = 'A33-SibSexEv-X1':
		*clr & cla
		modVar_AF_EventOpen['A33-BroSexTalk-1'] = 2
		modVar_AF_EventProgress['A33-SibSexEv'] = 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="images/characters/pavlovsk/resident/anya/sister.jpg"></center>'
		*nl
		'"You know who is absolutely amazing in bed?  Kolka!"'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"Bloody hell ' + iif(rand(1,2) = 1,'<<$pcs_nickname>>','<<$pcs_firstname>>') + ', where did that come from!  And wait... you mean... our brother, Kolka?  You''re talking about having sex with our br#...!"</font>, you cut her off before she can finish.'
		*nl
		'"Yes, Yes, enough of all that.  You and me are having enough sex to know you aren''t actually that bothered by that sort of thing!  Besides, the sex is fucking amazing especially compared to everyone else."'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"Well I guess I had noticed him being a lot more confident lately but even so I hadn''t thought of him in that way.  Maybe I should be though..."</font>'
		*nl
		'"Yes, yes you should be.  Trust me, you''re pussy will be thanking me... well, more than it already is."'
		*nl
		'With that you decide to let the thought of having extremely passionate sex with Kolka linger with her, and just maybe she will try and pursue it...'
		act 'Keep talking': gt 'sister_chat', 'sister_chat'
		act 'Move away': gt $loc, $loc_arg
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-X1':
		*clr & cla
		modVar_AF_EventOpen['A33-BroSexTalk-2'] = 2
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="images/characters/pavlovsk/resident/anya/sister.jpg"></center>'
		*nl
		'"So, my dear sister; my dear, dear sister..."'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"...what?"</Font>'
		*nl
		'"How''s it been fucking our brother?!"'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"WHAT!  You know?!  I mean, I don''t know what you are talking about.  I mean...  You know?!"</font>'
		*nl
		'"Oh yes, I''ve been watching you''re little affair bloom, or should I say; hot, passionate lovemaking... bloom!"'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"I guess we haven''t been particularly discreet about it.  But you were so right, he is amazing.  I don''t know if it is the taboo nature of it or he is just that good but he fucks me so good!"</font>'
		*nl
		'"Maybe you would like me to join in?"'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"That could be fun; having sex with both of you.  The taboo nature of it...  wait, no.  We''ve already done too much.  Get it out of your head!"</font>'
		*nl
		'<i>I''ll see about that...</i>'
		act 'Keep talking': gt 'sister_chat', 'sister_chat'
		act 'Move away': gt $loc, $loc_arg
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-X2':
		*clr & cla
		modVar_AF_EventProgress['A33-SibThreesomeEv-SisInv'] = daystart + (7 - week)
		minut += 1
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="images/characters/pavlovsk/resident/anya/sister.jpg"></center>'
		*nl
		'"Anya, do you fancy having a picnic out at the park this Sunday?  It could be nice to spend some time in the seclusion of nature!"'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"I suppose that could be nice... yeah, in fact I would be delighted to!"</font>'
		*nl
		'"Fantastic, I''ll meet you outside the apartment building at 11am so we can head off into town first to get supplies."'
		*nl
		'<i>and if Kolka should be there as well, then who knows where it would lead...</i>'
		if modVar_AF_EventProgress['A33-SibThreesomeEv-BroInv'] = 0:
			*nl
			'<i>I musn''t forget to speak to Kolka as well to have him be there</i>'
		end
		act 'Keep talking': gt 'sister_chat', 'sister_chat'
		act 'Move away': gt $loc, $loc_arg
	end
	
	if $ARGS[0] = 'A33-SibSexEv-C1':
		*clr & cla
		minut += rand(2,10)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-1']
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolc1.jpg"></center>'
		*nl
		'You were going to walk into your bedroom until you started hearing voices you recognise from inside.  As you peer through the door you notice that it is your Sister and Brother sitting on the bed having a conversation.  It sounds pleasant enough and you are pleased to see them getting on so well but think it is best just to leave them alone.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-C2':
		*clr & cla
		minut += rand(2,10)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-1']
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolc2.jpg"></center>'
		*nl
		'As you were enterring the room you see that your Sister is helping Kolka with some of his studies.  It''s nice to see them working together especially as you haven''t seen it happening as much as you would expect.'
		if npc_QW['A34'] >= 2:
			*nl
			'Then you remember what your Brother''s agenda was with you, when trying to get your help with his studies!  That sly dog must already be trying to get into Anya''s panties...'
		end
		*nl
		'In any case, you feel it is best to leave them un-interrupted.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-C3':
		*clr & cla
		minut += rand(2,10)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-1']
		gs 'stat'
		'<center><img style="<<$modVar_AF_ImageRestrictions>>" src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolc3.jpg"></center>'
		*nl
		'You were about to walk in when you hear Anya react to something.  Unfortunately you missed the cause but you can see she is giving Kolka the business.'
		if npc_QW['A34'] >= 2:
			*nl
			'You think to yourself: ''I bet that horny little git tried to get a bit touchy, feely with her!''.'
		end
		*nl
		'It is nothing to worry about though as your Sister appears to be taking it in jest with your Brother playing the "oblivious" act to perfection.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-T1':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-2']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolt1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You walk in to find Kolka and Anya getting quite cosy on the bed.  Your Sister doesn''t appear to be reacting but she is presenting far too much of herself to be denying it.  You do manage to get a pang of envy though; both for the feel of Kolka''s hands all over your body and in being able to stroke your Sister''s firm arse cheeks...'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-T2':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-2']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolt2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Walking into your bedroom you find your Sister and Brother together on the bed.  You can''t quite make out what they are whispering but it does appear that Kolka is starting to get more brazen, and Anya is almost encouraging it!'
		act 'Leave them be' : gt 'korrPar'
	end
	if $ARGS[0] = 'A33-SibSexEv-T3':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(1,2)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-2']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolt3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Just as you reach the door of your bedroom you catch a flash of what is already going inside which stops you from enterring.  It appears as though your Sister is naked and allowing Kolka to finger her pussy!'
		*nl
		'There is no mistaking just how much she is enjoying it though so you feel it is best to leave them to it, although closing the door a bit more as you leave.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-K1':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-3']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolk1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You were half-expecting something to be going on before you enterred the room and sure enough, as you peer through the crack of the door, you find that something.'
		*nl
		'What greets you is the sight of your Sister and Brother kissing on the bed, with Anya''s enjoyment rising further as Kolka''s touch excites her breasts and vagina.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-K2':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-3']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolk2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Walking into your bedroom generates a surprise in you as you are met with the sight of your Sister and Brother in a full on make out session!  She is completely naked and so taken in by the moment that you could be standing right next to them and they would be none the wiser.  Probably for the best then to leave them to it.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-O1':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(1,2)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-4']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolo1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You were about to walk into your room but before you do you notice that Kolka and Anya are already in there.  While this would have been unremarkable, the situation they are in says otherwise; as you can see she is giving him a blowjob.'
		*nl
		'She is focusing significantly on the tip of his cock, using her tongue to excite the head of his penis, his eyes closed in a total bliss.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-O2':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(1,2)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-4']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolo2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Before you can walk into your room you hear the unmistakable sounds of a carnal act.  Peering in you find your Sister sucking hard on your Brother''s cock, her mouth encasing the head of it while she pumps on his shaft.  He won''t last long like this so you think it is best to not be here when he does blow his load.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-O3':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(1,2)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-4']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolo3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You were about to walk in when you notice the unmistakable sound of lovermaking eminating from within.  Being as subtle as possible you look in, only to be greeted with the sight of your Sister forcing your Brothers face into her vagina.  There is no mistaking who is in control here!'
		*nl
		'Probably best to leave her to it!'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-O4':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(1,2)
		modVar_AF_Temp = 5 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-4']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskolo4' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You walk into your room and find your Sister and Brother already present.  They are none the wiser as she is focused hard on sucking all over his rock hard cock while he is enraptured with the blowjob he is receiving.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S1':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You find your Sister and Brother are already in your room.  Anya is layed out on the bed while Kolka is fucking her, edging further forward with every thrust.  As much as you would like to join in you think it is best to leave them at it.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S2':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You are suddenly greeted with the sight of carnal lust made manifest.  Your Brother has your Sister underneath him with her legs in the air, all while thrusting into her!  Part of you wants to join them but for now you should leave them be.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S3':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Before you have the chance to enter your room you notice that your Siblings are already quite busy in here!  Your Sister is standing over your Brother while he rams his cock into her clearly presented vagina.  You would like to join in the pleasure with both of them but you know you shouldn''t'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S4':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols4' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You are surprised you are the only one to pick up on the sounds eminating from your room before you enter because what greets you is the sight of your Sister riding your Brother, who has his hands gripped hard onto her plient arse cheeks.  Oh how you would like to be involved but for now you pull the door closed.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S5':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols5' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You were about to walk into your room thinking you had some time to kill but you instead find that your Brother is in here fucking your Sister!  She is not hiding her own enjoyment from it as Kolka ram his cock in deep.  You would like to be a third member of this fuck session but it is best to leave them at it.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S6':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols6' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'When you walked into your room you find that there are people already making use of it!  Your Brother has your Sister''s leg pulled over his shoulder so he can thrust hard into her causing her to be lost in the pleasure of it.  Your envy almost gets the better of you but you need to leave them be for now.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibSexEv-S7':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		minut += rand(8,12)
		modVar_AF_Temp = 7 - difficulty
		gs 'mod_addedflavour_A33_Functions' , 'AddProgress' , 'A33-SibSexEv' , modVar_AF_Temp , modVar_AF_EventGates['A33-SibSexEv-5']
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/characters/pavlovsk/resident/anya/siskols7' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Before you even walk through the door you can hear a slapping noise and when you do you are greeted with the sight of your Brother ramming his cock into your Sister!  She is obviously in a state of bliss at the rough treatment and you are sure Kolka will be blowing his load soon, so best not to be here when he does.'
		act 'Leave them be' : gt 'korrPar'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-1':
		*clr & cla
		minut += rand(4,8)
		CLOSE ALL
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya1' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You meet up with your Sister who happily greets you.  After a quick catch-up you start walking towards the shops to buy stuff for your picnic.'
		*nl
		'It doesn''t take too long and soon you have everything you need so start heading towards the park'
		act 'Wait... whose that?' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-2'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-2':
		*clr & cla
		minut += rand(4,8)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya2' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'"Oh look, if it isn''t our dear brother, perhaps he would like to join us!"'
		*nl
		'Kolka is looking a bit braindead as he mind catches up with events but you throw him a gaze to let him know exactly what the plan is.'
		*nl
		'<font color="<<$npc_fontcolor[''A33'']>>">"mmm...  what a coincidence, well yes, I suppose he can join us."</font>'
		*nl
		'You suspect that she is more aware then she is letting on but no matter, if she was at all against it she would have walked away.  Nevertheless the three of you walk off to your secluded spot of the park.'
		act 'Walk to picnic spot' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-3'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-3':
		*clr & cla
		minut += rand(4,8)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya3' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'The three of you get everything ready and in place, with you taking every opportunity to flash some skin to whoever might be looking.'
		*nl
		'Once everyone is laying down and taking in the sun, you all start drinking and generally enjoying yourselves.'
		act 'Take it all in' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-4'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-4':
		*clr & cla
		minut += rand(4,8)
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya4' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Just sitting back and enjoying the moment is fulfilling in of itself but you have a greater plan in motion.  You have taken every chance to guage how Anya is getting on board with events here and you are now sure she is ready.'
		*nl
		'"Hey Kolka, it''s getting quite hot here, why don''t you make it hotter!"'
		act 'Get Kolka naked' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-5'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-5':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya5' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Kolka stands up and, after some initial reluctance on the part of shyness, starts removing his clothes.'
		*nl
		'You and Anya encourage him to go further, all the while making our own clothes a little more accessible.'
		act 'Get the fun started' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-6'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-6':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya6' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Anya immediately stands up and in a show of confidence orders Kolka to come over and lick her out.  He quickly obliges and in mere moments is kneeled down with his toungue deep in your Sisters pussy!'
		*nl
		'You are watching the scene with glee and start removing your own clothes for what is to come.'
		act 'Suck him off' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-7'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-7':
		*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/locations/pavlovsk/park/sibling/KolAnya7' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You tell Kolka to lay down and once he is in place you whip out his already hard dick to begin sucking on it.  You suck hard on it while rubbing on the shaft to get to peak readiness; your Sister rubbing your naked body as her own desire ramps up.'
		act 'Two mouths, one cock' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-8'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-8':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya8' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'Anya then comes down to join you at his penis.  She starts sucking hard on his cock with an unstoppable lust with you joining in at every chance; also rubbing her body and his.'
		*nl
		'Kolka is almost completely blown away with the sensory overload of having both his sisters blow him!  You are more than willing to take him over the edge but there is more to come.'
		act 'Start some pussy action' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-9'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-9':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya9' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'With his cock as hard as rock you get on all fours and present your perfect pussy.  The invitation is clear which prompts him to get up and ram his cock deep into you.'
		*nl
		'Kolka is not holding back and takes you right to hilt before pulling out only to thrust it straight back in.  The sex is mind-blowing but you still manage to see someone looking in with a tinge of envy...'
		act 'Give Anya her turn' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-10'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-10':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya10' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You pull away from your Brothers cock and kiss him hard.  Once he is completely in your control you turn his head to the sight of your supine Sister.  You then whisper into his ear:  "Fuck her."'
		*nl
		'Kolka goes straight to her and thrusts his cock into her.  There was no holding back or worrying about the ramifications; it was just lust, sweat and hard cock in wet pussy!'
		act 'Slow him down' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-11'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-11':
		*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/locations/pavlovsk/park/sibling/KolAnya11' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You don''t want him to blow his load just yet so tell him to get up.  You don''t let his cock get fresh air for too long though as you immediately plant your lips upon it.  Lust still controls him and in his haze he starts licking at Anya''s vagina.'
		*nl
		'You feel he is sufficiently calmed down but still rock hard to push on so get him ready to put it straight back in your Sister.'
		act 'More pussy action' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-12'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-12':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Voyeur'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya12' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'It takes mere moments for your Brother''s penis to be ramming back into your Sister''s sex.  She is peaking with her own orgasm which you help along by kissing her and rubbing her ample breasts.'
		act 'Your turn again' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-13'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-13':
		*clr & cla
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya13' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You lay down and present your vagina which you know he has so much demand for.  He crawls over and immediately starts thrusting his cock deep into you.  He is fucking you hard and you feel that he could be ready to blow at any moment.'
		*nl
		'<font color="<<$npc_fontcolor[''A34'']>>"> ' + iif(rand(1,2) = 1,'<<$pcs_nickname>>','<<$pcs_firstname>>') + '!  I''m nearly there!  I''m going to blow!"</font>'
		act 'Get him up' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-14'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-14':
		*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/locations/pavlovsk/park/sibling/KolAnya14' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'You order him to stand up but go straight to sucking him off.  You eagerly share his cock with your Sister who shows equaly desire to take his load!'
		act 'Take his cum' : gt 'mod_addedflavour_A33_Events' , 'A33-SibThreesomeEv-15'
	end
	
	if $ARGS[0] = 'A33-SibThreesomeEv-15':
		*clr & cla
		npc_sex['A33'] += 1
		npc_sex['A34'] += 1
		gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_Kiss'
		pcs_mood += 30
		sexpartkno = 1
		gs 'boyStat', 'A34'
		spafinloc = 11
		gs 'Cum_Manage'
		gs 'stat'
		'<center><video style="<<$modVar_AF_VideoRestrictions>>" autoplay loop src="mod/addedflavour/images/locations/pavlovsk/park/sibling/KolAnya15' + iif(modVar_AF_QSPVer = 1,'.mp4','.webm') + '"></video></center>'
		*nl
		'It looks like it''s Anya who wins this little contest as, with a lust fuelled roar, your Brother starts filling her mouth with cum!  Ropes of cum flow over the boundaries of her lips causing her to smile at her reward before sharing it with you in a kiss.'
		*nl
		'Once everyone is calmed down and returned to the real world, both you and Anya, now clothed, give him a kiss and leave him to tidy up.  When walking back you and your Sister talk about what happened and gleefully discuss how glad we are that it happened.  A job well done!'
		act 'Leave him and go back home' : gt $loc, $loc_arg
	end

--- mod_addedflavour_A33_Events ---------------------------------