# soniadisco
!2021/22/12
!!I changed Sonia fall to this so their is a total of 7 events so Sonia slowly falls. moved the automatically fall code here from cikl.
!!We should update Sonia code to work like the rest. I already did it with the new code soniaQW[soniafall_block], but the rest like soniaPS or soniafall should be updated to soniaQW[soniaPS] and soniaQW[soniafall] I didn''t do it because last time I tried I messed some stuff up so I will leave it to one of you coders to update it.

if $ARGS[0] = 'cikl':
!!Making Sonia''s fall progress if the player do not see the scenes at the disco, by making it such that if at a Sunday her fall have not advanced this weekend it will automatically advance.
	if mid($start_type,1,2) = 'sg' and week = 7 and soniaPS = 0 and month > 9 and daystart >= soniafallDay + 6:
		if soniafall < 7:
			soniafallDay = daystart -1
			soniafall += 1
		else	
			soniaPS = 1
			soniaPSdays = daystart
			npc_grupTipe['A25'] = 5
			$npc_notes['A25'] = 'Ever since Sonia got way too drunk and gave Vitek and his friends blowjobs outside the disco, her reputation in Pavlovsk has been in shambles. The girls in her class all give her the silent treatment, while the guys treat her like a cheap whore and regularly ask (or sometimes demand) sex from her, knowing she doesn''t have the strength to say no.'
			$npcGoSchool['A25'] = '<a href="exec:gt ''gschool_outcast_chats'', ''' + $lcase($npc_usedname['A25']) + '''"><<$npc_usedname["A25"]>></a>'
		end
	end
end

!!Which arg it goes to depends on level of soniafall
if $ARGS[0] = 'start':
	if daystart >= soniafallDay + 6:
		soniafallDay = daystart
		if soniafall <= 0:
			gt 'soniadisco', 'disco0'
		else
			gt 'soniadisco', 'disco'
		end
	else
		gt 'soniadisco', 'disco0'
	end
end

if $ARGS[0] = 'disco0':
	menu_off = 0
	*clr & cla
	if soniafall = 0: soniafall = 1
	minut += 15
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/0.jpg"></center>'
	'You notice Sonia out on the dance floor really working her body. She seems to be dancing like there is no tomorrow. As you watch, she stops from time to time to go grab some drinks from the gopniks, who seem happy to supply her with alcohol.'
	act 'Keep watching':
		*clr & cla
		minut += 15
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/soniadance.jpg"></center>'
		'You''ve heard the rumors that Sonia had begun hanging around the gopniks lately; drinking, partying and generally cutting loose. But watching her now, you can see that she is getting totally wasted and is starting to really grind on any and everyone that comes up to dance with her. After a while, she seems to barely be able to stand up on her own and is hanging onto the guys she''s grinding into to keep her balance.'
		if soniafall < 3:
			gs 'soniadisco', 'watchorhelp'
		else
			gs 'soniadisco', 'soniashowsboobs'
		end
	end
end

if $ARGS[0] = 'watchorhelp':
	if hour > 19: discobloc['A25'] = daystart
	act 'Just watch':
		*clr & cla
		minut += 20
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/soniadance.jpg"></center>'
		'The boys are getting quite frisky with Sonia, who is hardly putting up any resistance. Their hands roam all over her while she just stumbles around, too drunk to care what''s happening.'
		'Several minutes later, Katja walks up to Sonia and tries to get her to leave the dance floor, but the girl jerks away and says something that leaves Katja just shaking her head before walking away.'
		'Eventually, Sonia stumbles over to the girls'' restroom, looking a bit sick, and you notice Katja follow her. After a while, the two walk out and leave the disco, presumably Katja is taking Sonia home.'
		act 'Continue': gt 'pav_disco'
	end
	act 'Help Sonia':
		*clr & cla
		minut += 2
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/soniadance.jpg"></center>'
		'The boys are getting quite frisky with Sonia, who is hardly putting up any resistance. Their hands roam all over her while she just stumbles around, too drunk to care what''s happening.'
		'You shake your head in disbelief; Sonia is too drunk to realize what''s happening! If she isn''t careful, some guy is going to drag her away and take advantage of her.'
		'You walk over to the girl, "Slow down, Sonia! You''re pretty wasted and giving the guys the wrong idea."'
		'She turns and gives you a sour look, "What are you, my mother? God, I''m tired of having to always be the good girl; I just want to cut loose and party for once!" With that, she starts grinding her butt on some guy''s crotch, who looks more than happy to oblige.'
		act 'Walk away':
			*clr & cla
			minut += 20
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/soniadance.jpg"></center>'
			'You just shake your head and leave Sonia, who continues dancing around and grinding on boys. And there are no shortage of boys trying to dance with her. She looks like she''s having fun, but you can see others watching and whispering about her acting like a slut.'
			'Several minutes later, Katja walks up to Sonia and tries to get her to leave the dance floor, but the girl jerks away and says something that leaves Katja just shaking her head before walking away.'
			'Eventually, Sonia stumbles over to the girls'' restroom, looking a bit sick, and you notice Katja follow her. After a while, the two walk out and leave the disco, presumably Katja is taking Sonia home.'
			act 'Continue': gt 'pav_disco'
		end
		act 'Convince her':
			*clr & cla
			minut += 20
			grupvalue[4] -= 2
			grupvalue[1] += 2
			gs 'npc_relationship', 'modify', 'A25', 'like'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
			'You stand in front of her and grab hold of her arms to keep her still. "Sonia! Look around, you''re totally wasted and grinding on these guys like you plan to fuck them all."'
			'She resists for a moment, but then your words seem to sink in and she drunkenly blinks a few times before looking around. She blushes a bit and seems to sober up some, the realization of just how wasted she was hitting her. She gives you a grateful nod and awkwardly tries to leave the dance floor, but the guys try to keep her around. You have to intervene on her behalf and make them let go of her. The two of you finally make it to the door and leave the dance hall.'
			*nl
			'She smiles at you a bit. "Thanks, <<$pcs_nickname>>. I guess I got a little carried away."'
			'"Maybe you should go home, you''re pretty drunk," you reply.'
			'She nods. "Thanks, yeah." She starts to head out, and you notice she can barely walk, but when you start to help her, she pulls away. "I can handle it myself."'
			'You sigh a bit. "Just be careful."'
			'She rolls her eyes. "It was just a little harmless fun, no one cares." Then she walks away.'
			act 'Continue': gt 'pav_disco'
		end
	end
end

if $ARGS[0] = 'soniashowsboobs':
	act 'Boobs':
		*clr & cla
		if hour > 19: discobloc['A25'] = daystart
		minut += 10
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/titflash.jpg"></center>'
		'The boys are getting quite frisky with Sonia, who looks to be reveling in the attention. She keeps dancing, not seeming to care about them feeling her up.'
		'Then, she grabs the top of her dress and exposes her bare breasts for everyone to see. The guys, and even a few of the girls, start to cheer and whistle, but you notice others shaking their heads and whispering. You know Sonia is starting to earn a bad reputation at school.'
		act 'Just watch':
			*clr & cla
			minut += 10
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/titflash.jpg"></center>'
			'Sonia continues to dance, perhaps more energetically than before; her boobs bouncing around freely. '
			'Several minutes later, Katja walks up to Sonia and tries to get her to leave the dance floor, but the girl jerks away and says something that leaves Katja just shaking her head before walking away.'
			'Eventually, Sonia stumbles over to the girls'' restroom, looking a bit sick, and you notice Katja follow her. After a while, the two walk out and leave the disco, presumably Katja is taking Sonia home.'
			act 'Continue': gt 'pav_disco'
		end
		act 'Help Sonia':
			*clr & cla
			minut += 2
			gs 'npc_relationship', 'modify', 'A25', 'dislike'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/titflash.jpg"></center>'
			'Sonia continues to dance, perhaps more energetically than before; her boobs bouncing around freely. '
			'You shake your head in disbelief; Sonia is too drunk to realize what''s happening! You decide you need to do something before she completely ruins her reputation.'
			'You walk over to the girl, "Sonia, what are you doing? Everyone can see your tits!"'
			'She turns and gives you a sour look, "What are you, my mother? God, I''m tired of having to always be the good girl; I just want to cut loose and party for once!" With that, she starts grinding her butt on some guy''s crotch, who looks more than happy to oblige.'
			act 'Walk away':
				*clr & cla
				minut += 20
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/titflash.jpg"></center>'
				'You just shake your head and leave Sonia, who continues dancing around and grinding on boys with her tits out. And there are no shortage of boys trying to dance with her. She looks like she''s having fun, but you can see others watching and whispering about her acting like a slut.'
				'Several minutes later, Katja walks up to Sonia and tries to get her to leave the dance floor, but the girl jerks away and says something that leaves Katja just shaking her head before walking away.'
				'Eventually, Sonia stumbles over to the girls'' restroom, looking a bit sick, and you notice Katja follow her. After a while, the two walk out and leave the disco, presumably Katja is taking Sonia home.'
				act 'Continue': gt 'pav_disco'
			end
			act 'Convince her':
				*clr & cla
				minut += 20
				grupvalue[4] -= 2
				grupvalue[1] += 2
				gs 'npc_relationship', 'modify', 'A25', 'like'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
				'You stand in front of her and grab hold of her arms to keep her still. "Sonia! Look around, you''re totally wasted and flashing your tits to everybody! People are going to talk about this!"'
				'She resists for a moment, but then your words seem to sink in and she drunkenly blinks a few times before looking around. She blushes a bit and seems to sober up some, the realization of just how wasted she was hitting her. She gives you a grateful nod and starts to pull her dress back up; the guys start giving you dirty looks.'
				'When you try to the leave the dance floor, the guys try to stop her. You have to intervene on her behalf and make them let go of her. The two of you finally make it to the door and leave the dance hall.'
				*nl
				'She smiles at you a bit. "Thanks, <<$pcs_nickname>>. I guess I got a little carried away."'
				'"Maybe you should go home, you''re pretty drunk," you reply.'
				'She nods. "Yeah, I guess I should. Thanks again, <<$pcs_nickname>>." She starts to head out.'
				act 'Let her go': gt 'pav_disco'
				act 'Offer to walk her home':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
					'You catch up to her. "Here, let me walk you home," you tell her.'
					'It looks like she is about to protest and tell you to mind your own business, but then she just nods and smiles at you. "You don''t have to, I can make it myself."'
					'You nod. "I know, but us girls have to look out for each other, you know?"'
					'"Yeah, I guess you''re right. OK, let''s go," she says with a friendly smile.'
					act 'Walk her home': gt 'soniadisco', 'walkhome'
				end
			end
		end
	end
end
	
if $ARGS[0] = 'disco':
	menu_off = 0
	*clr & cla
	soniafall += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/0.jpg"></center>'
	if soniafall = 0:
		'Sonia is hanging out with the gopniks. Before you have a chance to walk over and see what''s going on, Vitek takes Sonia by the hand and leads her out of the disco, with Dan, Pauline and Vasily following right behind them. Vasily''s carrying a paper bag with the neck of a bottle sticking out top of it.'
	elseif soniafall <= 3:
		'You see Vitek and some of the other gopniks hanging out, watching Sonia get drunk and dancing wildly. You notice them talking among themselves, before Vitek says something that shuts them all up and he walks over to Sonia. Instead of dancing with her though, he whispers something to her. She looks at him, smiles and nods her head. Vitek leads Sonia off the dance floor and out of the disco. Several of the other gopniks scramble to catch up to the two of them after he waves them over. Vasily''s carrying a paper bag with the neck of a bottle sticking out top of it.'
	else
		'Sonia is hanging out by Vitek and some of his friends. Vasily''s carrying a paper bag with the neck of a bottle sticking out top of it. Before too long, they all leave together, heading out of the disco.'
	end
	if kotovLoveQW > 0:
		'Vitek notices you watching them, he pauses a moment as if he is unsure what to do. Then he smiles and walks over to you, giving you a kiss. "Hey babe, me and the boys are going to go hang out, you should stay here and dance a little or something, I''ll be back shortly."'
		'You notice Pauline and Sonia is with them. "What? What about Pauline and Sonia? They are going, so why can''t I?" You ask him. You notice the rest have already left, heading outside.'
		'His face darkens a bit as you question him and he grabs your arms around your biceps with his big hands and he squeezes enough it hurts. "I said no and that''s final, so stay here. Understand?"'
		'You nod quickly yes that you understand and then he relaxes his grip. "I understand."'
		'Then he lets go of your arms. "Good girl, now go have fun." He gives your ass a slap, before he turns to follow the where the rest went.'
		act 'Watch them leave':
			if soniafall <= 6:
				gt 'soniadisco', 'dance'
			else
				gt 'soniadisco', 'dance1'
			end
		end
	elseif grupTipe = 4:
		'Vitek notices you watching them and grins, waving you over. "Hey, <<$pcs_nickname>>. We''re going out for a drink and to have some fun... come join us." Just the way he says it, tells you they are up to something.'
		gs 'willpower', 'drink', 'resist'
		if will_cost <= pcs_willpwr:
			act 'Decline (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'resist'
				minut += 5
				grupvalue[4] -= 1
				gs 'npc_relationship', 'modify', 'A9', 'dislike'
				gs 'npc_relationship', 'modify', 'A10', 'dislike'
				gs 'npc_relationship', 'modify', 'A11', 'dislike'
				gs 'npc_relationship', 'modify', 'A24', 'dislike'
				if soniafall <= 6:
					gt 'soniadisco', 'dance', 'declineinvite'
				else
					gt 'soniadisco', 'dance1', 'declineinvite'
				end
			end
		else
			act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		act 'Go with them': gt 'soniadisco', 'join_them'
	elseif grupTipe = 3:
		'Vitek notices you watching them and frowns. "What the fuck are you looking at, nerd? Get lost!" Then they all head out. Vasily glances back at you and shakes his head, letting you know not to follow them.'
		act 'Watch them leave':
			if soniafall <= 6:
				gt 'soniadisco', 'dance'
			else
				gt 'soniadisco', 'dance1'
			end
		end
	elseif grupTipe = 5:
		'Vitek notices you watching them and frowns. "What the fuck are you looking at, loser? Get lost!" Then they all head out. Vasily glances back at you and shakes his head, letting you know not to follow them.'
		act 'Watch them leave':
			if soniafall <= 6:
				gt 'soniadisco', 'dance'
			else
				gt 'soniadisco', 'dance1'
			end
		end
	elseif soniaQW[soniafall_block] >= 4:
		'Vitek notices you watching them and frowns. "What the fuck are you looking at, bitch? You had your chance to hang out with us and you blew it, so scram!" Then they all head out. Vasily glances back at you and shakes his head, letting you know not to follow them.'
		act 'Watch them leave':
			if soniafall <= 6:
				gt 'soniadisco', 'dance'
			else
				gt 'soniadisco', 'dance1'
			end
		end
	else
		'Vitek notices you watching them and grins, waving you over. "Hey, <<$pcs_nickname>>. We''re going out for a drink... you should come join us."'
		gs 'willpower', 'drink', 'resist'
		if will_cost <= pcs_willpwr:
			act 'Decline (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'resist'
				minut += 5
				grupvalue[1] += 1
				grupvalue[2] += 1
				grupvalue[4] -= 1
				gs 'npc_relationship', 'modify', 'A9', 'dislike'
				gs 'npc_relationship', 'modify', 'A10', 'dislike'
				gs 'npc_relationship', 'modify', 'A11', 'dislike'
				gs 'npc_relationship', 'modify', 'A24', 'dislike'
				if soniafall <= 6:
					gt 'soniadisco', 'dance', 'declineinvite'
				else
					gt 'soniadisco', 'dance1', 'declineinvite'
				end
			end
		else
			act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		act 'Go with them': gt 'soniadisco', 'join_them'
	end
end

if $ARGS[0] = 'join_them':
	*clr & cla
	grupvalue[1] -= 1
	grupvalue[2] -= 1
	grupvalue[4] += 1
	gs 'npc_relationship', 'modify', 'A9', 'like'
	gs 'npc_relationship', 'modify', 'A10', 'like'
	gs 'npc_relationship', 'modify', 'A11', 'like'
	gs 'npc_relationship', 'modify', 'A24', 'like'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
	'You''re not sure whether he invited you along because he wants you to come, or just because he''s afraid you would rat them out. Either way, you follow the guys outside to a small table around the back of the community center. Vasily pours the booze, vodka, into some plastic cups and hands everybody one, including you. Vitek, Sonia, Dan, Vasily and Pauline are here along with you.'
	if soniarushout = 1:
		killvar 'soniarushout'
		'You join them outside at the small table they''ve been using behind the community center. Finding yourself next to Sonia, you turn to her and whisper, "I am surprised you came back to party with them after last time."'
		'She blushes a little. "I won''t get that drunk again."'
	end
	gs 'willpower', 'drink', 'resist'
	if will_cost <= pcs_willpwr:
		act 'Decline drink (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			minut += 10
			grupvalue[4] -= 1
			gs 'npc_relationship', 'modify', 'A9', 'dislike'
			gs 'npc_relationship', 'modify', 'A10', 'dislike'
			gs 'npc_relationship', 'modify', 'A11', 'dislike'
			gs 'npc_relationship', 'modify', 'A24', 'dislike'
			gs 'stat'
			$soniadisco_peerpressuretrigger = 'declinedrink'
			gs 'soniadisco', 'peerpressure'
		end
	else
		act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Have a drink with them':
		*clr & cla
		gs 'drugs', 'alcohol', 'vodka', 1
		minut += 15
		grupvalue[4] += 1
		gs 'npc_relationship', 'modify', 'A9', 'like'
		gs 'npc_relationship', 'modify', 'A10', 'like'
		gs 'npc_relationship', 'modify', 'A11', 'like'
		gs 'npc_relationship', 'modify', 'A24', 'like'
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
		'For the next 15 minutes, you enjoy their company, only slowly sipping the vodka and alternating it with lemonade. Sonia just slams down shot after shot. When the cups are empty, Vasily offers everyone a refill.'
		gs 'willpower', 'drink', 'resist'
		if will_cost <= pcs_willpwr:
			act 'Decline (<<will_cost>> Willpower)':
				gs 'willpower', 'pay', 'resist'
				minut += 10
				grupvalue[4] -= 1
				gs 'npc_relationship', 'modify', 'A9', 'dislike'
				gs 'npc_relationship', 'modify', 'A10', 'dislike'
				gs 'npc_relationship', 'modify', 'A11', 'dislike'
				gs 'npc_relationship', 'modify', 'A24', 'dislike'
				gs 'stat'
				$soniadisco_peerpressuretrigger = 'declinedrink'
				gs 'soniadisco', 'peerpressure'
			end
		else
			act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		act 'Take another drink':
			minut += 10
			gs 'drugs', 'alcohol', 'vodka', 1
			grupvalue[4] += 1
			gs 'stat'
			$soniadisco_peerpressuretrigger = 'takedrink'
			gs 'soniadisco', 'peerpressure'
		end
		act 'Caution Sonia':
			soniahelp += 1
			minut += 10
			grupvalue[4] -= 5
			gs 'npc_relationship', 'modify', 'A9', 'loathe'
			gs 'npc_relationship', 'modify', 'A10', 'loathe'
			gs 'npc_relationship', 'modify', 'A11', 'loathe'
			gs 'npc_relationship', 'modify', 'A24', 'loathe'
			gs 'npc_relationship', 'modify', 'A25', 'dislike'
			gs 'stat'
			$soniadisco_peerpressuretrigger = 'cautionsonia'
			gs 'soniadisco', 'peerpressure'
		end
		if soniafall <= 6:act 'Encourage her': gt 'soniadisco', 'soniadrinkmore'
	end
end

if $ARGS[0] = 'soniadrinkmore':
	*clr & cla
	soniafall += 1
	soniaencourage += 1
	gs 'npc_relationship', 'modify', 'A9', 'like'
	gs 'npc_relationship', 'modify', 'A10', 'like'
	gs 'npc_relationship', 'modify', 'A11', 'like'
	gs 'npc_relationship', 'modify', 'A24', 'like'
	gs 'drugs', 'alcohol', 'vodka', 1
	minut += 10
	grupvalue[4] += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/soniadrink.jpg"></center>'
	'You smile and take hold of her hand that''s holding the cup and encourage her to sit back down. "What''s the rush, Sonia? We''re having a good time here, right?" you ask her, extending her arm and cup towards Vasily, who happily refills it.'
	'Sonia grins at you. "You''re right!" Then she downs about half the cup in one gulp, coughing a bit. You all talk and drink some more. Sonia finishes the cup and, as the boys start passing out more, lets her cup be filled again.'
	act 'Take another drink':
		$soniadisco_peerpressuretrigger = 'soniadrinkmore'
		gs 'soniadisco', 'peerpressure'
	end
end

if $ARGS[0] = 'dance':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/1.jpg"></center>'
	if hour > 19: discobloc['A25'] = daystart
	if $ARGS[1] = 'declineinvite':
		'You don''t really want to drink alcohol right now, so you just shake your head. "Thanks for the invite, but I think I''d rather stay here right now. You guys have fun!"'
		*nl
		'About 30 minutes later, you see them coming back to the disco. Vitek occasionally steadies Sonia when she nearly falls over; you can tell she''s totally hammered.'
	elseif $ARGS[1] = 'staytoend':
		*p 'You go back to the disco with the rest of the group, where '
	else
		*p 'Not wanting to stick around, you return to the dance. A while later, the rest of the group returns, and '
	end
	'Sonia immediately runs to the dance floor. Her drunken stumbling doesn''t look too much like dancing, but she''s having fun. In her enthusiasm to pull off some experimental dance moves, she doesn''t notice that one of her shirt straps slides down. Because she''s not wearing a bra, one of her boobs is fully exposed, and it bounces up and down whenever Sonia jumps.'
	gs 'arousal', 'erotic_nudity', 5
	gs 'stat'
	act 'Just watch':
		*clr & cla
		minut += 20
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/1.jpg"></center>'
		'Sonia dances around, grinding on boys. And there are no shortage of boys trying to dance with her. She looks like she''s having fun, but you can see others watching and whispering about her acting like a slut.'
		'Several minutes later, Katja walks up to Sonia and tries to get her to leave the dance floor, but the girl jerks away and says something that leaves Katja just shaking her head before walking away.'
		'Eventually, Sonia stumbles over to the girls'' restroom, looking a bit sick, and you notice Katja follow her. After a while, the two walk out and leave the disco, presumably Katja is taking Sonia home.'
		act 'Continue': gt 'pav_disco'
	end
	act 'Approach Sonia':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/1.jpg"></center>'
		'Sonia dances around, grinding on boys. And there are no shortage of boys trying to dance with her. She looks like she''s having fun, but you can see others watching and whispering about her acting like a slut.'
		'You shake your head in disbelief; Sonia is too drunk to realize what''s happening! Maybe you should do something?'
		act 'Help her out':
			*clr & cla
			grupvalue[4] -= 5
			grupvalue[1] += 5
			gs 'npc_relationship', 'modify', 'A25', 'like'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/0.jpg"></center>'
			'You stand in front of her to block most of the stares. You can''t think of a way to tactfully say what you need to over the loud, thumping music. You sigh and yell in her ear, "Sonia! Your boob is hanging out, you should cover up!"'
			'Sonia smiles drunkenly at you, but after a few seconds she finally gets what you''re trying to tell her. She gives you a grateful nod and awkwardly tries to pull up her shirt in the middle of the dance floor.'
			'She manages to cover herself and looks around. Only now starting to realize what''s going on, she blushes a bit.'
			'"Maybe you should go home, you''re pretty wasted."'
			'She nods. "Thanks, yeah." She starts to head out, and you notice she can barely walk, so you help her outside. With the fresh air, she seems a little more stable. You could walk her home or go back to the disco.'
			gs 'arousal', 'end'
			gs 'stat'
			act 'Go back to dance': gt 'pav_disco'
			act 'Walk her home': gt 'soniadisco', 'walkhome'
		end
		act 'Pull the other strap down too':
			*clr & cla
			grupvalue[4] += 2
			grupvalue[1] -= 5
			grupvalue[2] -= 2
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/2.jpg"></center>'
			'You tell her, "You have a nice set of boobs, Sonia. I can see why you''d be so willing to show them off to the world."'
			'She looks at you with a slightly puzzled look on her face but never stops dancing. "Wha- what are you talking about?"'
			'With a grin, you put your hand on her other shoulder and slide that strap down too, fully exposing her breasts to everyone looking her way. She barely notices and doesn''t understand why you are staring at her so intently. Once you walk away, she dances with both her breasts bouncing freely for several minutes before some guy''s pawing at her exposed breasts finally make her notice. She blushes but also laughs about it, pulling her top back in place.' 
			gs 'arousal', 'erotic_nudity', 10
			gs 'arousal', 'end'
			gs 'stat'
			act 'Continue': gt 'pav_disco'
		end
	end
end

if $ARGS[0] = 'peerpressure':
	*clr & cla
	if soniafall <= 2:
		if $soniadisco_peerpressuretrigger = 'cautionsonia':
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/soniadrink.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
		end
	elseif soniafall = 3:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/panties1.jpg"></center>'
	elseif soniafall = 4:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/boobs.jpg"></center>'
	elseif soniafall = 5:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/pussy.jpg"></center>'
	elseif soniafall = 6:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/popsicle1.jpg"></center>'
	else
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/popsicle2.jpg"></center>'
	end

	if $soniadisco_peerpressuretrigger = 'declinedrink':
		'You shake your head and decline. You don''t want to get too drunk and instead settle for just watching.'
	elseif $soniadisco_peerpressuretrigger = 'takedrink':
		gs 'drugs', 'alcohol', 'vodka', 1
		'You smile and hold up your cup for a refill. Everyone is laughing and having a good time.'
	elseif $soniadisco_peerpressuretrigger = 'cautionsonia':
		gs 'npc_relationship', 'modify', 'A25', 'dislike'
		'You move over to sit next to Sonia, turning down the drink. "Slow down, Sonia! You don''t want to get wasted." She turns and gives you a sour look.'
		if soniahelp > 0:
			'"We''ve already been over this, <<$pcs_nickname>>! You aren''t my mother, so how about you chill out and enjoy it like the rest of us?" She grabs the bottle and chugs down a quarter of it. The gopniks all encourage her to keep going.'
		else
			'"What are you, my mother? God, I am tired of always being the good girl, I just want to cut loose and party, for once." The gopniks all cheer and encourage her.'
		end
	elseif $soniadisco_peerpressuretrigger = 'soniadrinkmore':
		if fame['pav_slut'] < 100:
			'You smile and hold up your cup for a refill. Everyone is laughing and having a good time. When it comes time for a third refill, Vasily refuses and whispers to you, "Good girls shouldn''t get drunk around bad boys."'
		else
			gs 'drugs', 'alcohol', 'vodka', 1
			'You smile and hold up your cup for a refill. Everyone is laughing and having a good time.'
		end
	end

	if soniafall <= 2:
		gs 'soniadisco', 'notpressured'
	elseif soniafall = 3:
		gs 'soniadisco', 'pressuredforpanties'
	elseif soniafall = 4:
		gs 'soniadisco', 'pressuredfortits'
	elseif soniafall = 5:
		gs 'soniadisco', 'pressuredforpussy'
	elseif soniafall = 6:
		gs 'soniadisco', 'pressuredforblowjob'
	else
		gs 'soniadisco', 'pressuredforgangbang'
	end
end

if $ARGS[0] = 'notpressured':
	'Sonia does have more, a lot more, and it doesn''t take long before she''s wasted. With a slight slur in her voice and a cheeky grin on her face, she says, "I want to go dancing! Let''s go back to the disco!"'
	if $soniadisco_peerpressuretrigger ! 'cautionsonia' and $soniadisco_peerpressuretrigger ! 'soniadrinkmore':
		act 'Encourage her': gt 'soniadisco', 'soniadrinkmore'
	end
	killvar '$soniadisco_peerpressuretrigger'
	act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
end

if $ARGS[0] = 'pressuredforpanties':
!!check I did this correct this only triggers if Sveta is a hotcat 6 or more and not a gopnik, otherwise get the else
	'Sonia''s really getting wasted now. Taking advantage of the situation, Dan asks her, "Hey, Sonia. What color are your panties?"'
	'She looks a little confused. "What?"'
	'"You were going to show us what color your panties are," he says.'
	'Sonia blinks. "I was?" she asks, and all the guys agree she was. She glances at you, and you nod.'
	'Pauline offers more helpful advice. "Go on, don''t be a tease."'
	'With the encouragement, Sonia stands up and turns around, pulling up her dress to show off the back of her panties. Pauline records the whole thing on her phone.'
	gs 'arousal', 'erotic', 5
	gs 'stat'
	if hotcat >= 6 and grupTipe ! 4:
		act 'Continue':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/panties2.jpg"></center>'
			'The boys cheer, and Vasily adds, "Now, show us the front."'
			'With a huge grin, Sonia turns to face everyone and pulls up her dress again.'
			'When Sonia''s done flashing everyone her panties, Dan looks at you. "Now show us your panties, <<$pcs_nickname>>!"'
			'You feel everyone''s eyes shift towards you. Even with everyone encouraging you, you don''t know what to do. Pauline continues to record Sonia with her phone.'
			gs 'arousal', 'erotic', 5
			gs 'arousal', 'end'
			gs 'stat'
			gs 'willpower', 'exhib', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Decline (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'resist'
					grupvalue[4] -= 1
					soniaQW[soniafall_block] += 1
					gs 'npc_relationship', 'modify', 'A9', 'dislike'
					gs 'npc_relationship', 'modify', 'A10', 'dislike'
					gs 'npc_relationship', 'modify', 'A11', 'dislike'
					gs 'npc_relationship', 'modify', 'A24', 'dislike'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
					'You shake your head. "No, I''m not going to do that."'
					'Vitek gets visibly angry. "Then why are you here? We give you free drinks and this is how you repay us? Fuck you then, get out!"'
					'Dan gets up and forces you to leave.'
					act 'Leave':
						if soniafall <= 6:
							gt 'soniadisco', 'dance'
						else
							gt 'soniadisco', 'dance1'
						end
					end
				end
			else
				act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			if $pantyworntype = 'none':
				act 'Not wearing panties':
					*clr & cla
					gs 'fame', 'pav', 'sex', 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
					'You blush a bit. "I''m not wearing any."'
					'"Then show us your pussy, slut."'
					gs 'willpower', 'exhib', 'resist'
					if will_cost <= pcs_willpwr:
						act 'Decline (<<will_cost>> Willpower)':
							*clr & cla
							gs 'willpower', 'pay', 'resist'
							grupvalue[4] -= 1
							soniaQW[soniafall_block] += 1
							gs 'npc_relationship', 'modify', 'A9', 'dislike'
							gs 'npc_relationship', 'modify', 'A10', 'dislike'
							gs 'npc_relationship', 'modify', 'A11', 'dislike'
							gs 'npc_relationship', 'modify', 'A24', 'dislike'
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
							'You shake your head. "No, I''m not going to do that."'
							'Vitek gets visibly angry. "Then why are you here? We give you free drinks and this is how you repay us? Fuck you then, get out and don''t come back!"'
							'Dan gets up and forces you to leave.'
							act 'Leave':
								if soniafall <= 6:
									gt 'soniadisco', 'dance'
								else
									gt 'soniadisco', 'dance1'
								end
							end
						end
					else
						act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
					end
					act 'Show your pussy':
						*clr & cla
						grupvalue[4] += 1
						gs 'fame', 'pav', 'sex', 20
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/pussy.jpg"></center>'
						'Pauline starts to record you while you pull your clothes aside and quickly flash your pussy.'
						'When you cover back up, Sonia yells out with a slight slur in her voice, "I want to go dancing! Let''s go back to the disco!"'
						gs 'arousal', 'flashlite', 5, 'inhibition'
						gs 'arousal', 'end'
						gs 'stat'
						killvar '$soniadisco_peerpressuretrigger'
						act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
					end
				end
			end
			act 'Show your panties':
				*clr & cla
				grupvalue[4] += 1
				gs 'fame', 'pav', 'sex', 5
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/panties.jpg"></center>'
				'Pauline starts to record you while you pull your clothes aside and quickly flash your panties.'
				'When you cover back up, Sonia yells out with a slight slur in her voice, "I want to go dancing! Let''s go back to the disco!"'
				gs 'arousal', 'flashlite', 5, 'inhibition'
				gs 'arousal', 'end'
				gs 'stat'
				killvar '$soniadisco_peerpressuretrigger'
				act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
			end
		end
	else
		act 'Continue':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/panties2.jpg"></center>'
			'The boys cheer, and Vasily adds, "Now, show us the front."'
			'With a huge grin, Sonia turns to face everyone and pulls up her dress again. She seems to realize that maybe she''s going too far and starts to blush, with a slight slur in her voice, she yells out, "I want to go dancing! Let''s go back to the disco!"'
			gs 'arousal', 'erotic', 5
			gs 'arousal', 'end'
			gs 'stat'
			if $soniadisco_peerpressuretrigger ! 'cautionsonia' and $soniadisco_peerpressuretrigger ! 'soniadrinkmore':
				act 'Encourage her': gt 'soniadisco', 'soniadrinkmore'
			end
			killvar '$soniadisco_peerpressuretrigger'
			act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
		end
	end
end

if $ARGS[0] = 'pressuredfortits':
	'Sonia''s really getting wasted now. Taking advantage of the situation, someone pours her another drink and Dan asks her, "Hey, Sonia. Are you going to show us your tits now?"'
	'She looks a little confused. "What?"'
	'"You said you were going to show us your tits earlier," he says.'
	'Sonia blinks. "I was?" she asks, and all the guys agree she was. She glances at you, and you nod.'
	'Pauline offers more helpful advice. "Yeah, you said you had really perky ones. So go on and prove it!"'
	'With the encouragement, Sonia pulls down her top to show off her breasts.'
	'"Now show us your ass!" Vasily adds.'
	gs 'arousal', 'erotic_nudity', 5
	gs 'stat'
	if hotcat >= 6 and grupTipe ! 4:
		act 'Continue':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/butt.jpg"></center>'
			'Sonia stands up, a little unsteady on her feet and pulls up the back of her dress and pulls down her panties, showing off her bare ass to everyone. She seems to realize that maybe she''s going too far and starts to blush.'
			'Just as Sonia''s dress falls back in place, Dan looks at you. "Now, show us your tits, <<$pcs_nickname>>!"'
			'You feel everyone''s eyes shift towards you. Even with everyone encouraging you, you don''t know what to do. Pauline continues to record Sonia with her phone.'
			gs 'arousal', 'erotic', 5
			gs 'arousal', 'end'
			gs 'stat'
			gs 'willpower', 'exhib', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Decline (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'resist'
					grupvalue[4] -= 1
					soniaQW[soniafall_block] += 1
					gs 'npc_relationship', 'modify', 'A9', 'dislike'
					gs 'npc_relationship', 'modify', 'A10', 'dislike'
					gs 'npc_relationship', 'modify', 'A11', 'dislike'
					gs 'npc_relationship', 'modify', 'A24', 'dislike'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
					'You shake your head. "No, I''m not going to do that."'
					'Vitek gets visibly angry. "Then why are you here? We give you free drinks and this is how you repay us? Fuck you then, get out!"'
					'Dan gets up and forces you to leave.'
					act 'Leave':
						if soniafall <= 6:
							gt 'soniadisco', 'dance'
						else
							gt 'soniadisco', 'dance1'
						end
					end
				end
			else
				act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Show your tits':
				*clr & cla
				grupvalue[4] += 1
				gs 'fame', 'pav', 'sex', 10
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/tits.jpg"></center>'
				'Pauline starts to record you while you pull your clothes aside and quickly flash your tits.'
				'When you cover back up, Sonia yells out with a slight slur in her voice, "I want to go dancing! Let''s go back to the disco!"'
				gs 'arousal', 'flashlite', 5, 'inhibition'
				gs 'arousal', 'end'
				gs 'stat'
				killvar '$soniadisco_peerpressuretrigger'
				act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
			end
		end
	else
		act 'Continue':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/butt.jpg"></center>'
			'With a huge grin, Sonia stands up and turns around. She pulls up the back of her dress and pulls down her panties, showing off her bare ass to everyone. She seems to realize that maybe she''s going too far and starts to blush, with a slight slur in her voice, she yells out, "I want to go dancing! Let''s go back to the disco!"'
			gs 'arousal', 'erotic_nudity', 5
			gs 'arousal', 'end'
			gs 'stat'
			if $soniadisco_peerpressuretrigger ! 'cautionsonia' and $soniadisco_peerpressuretrigger ! 'soniadrinkmore':
				act 'Encourage her': gt 'soniadisco', 'soniadrinkmore'
			end
			killvar '$soniadisco_peerpressuretrigger'
			act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
		end
	end
end

if $ARGS[0] = 'pressuredforpussy':
	'Sonia''s really getting wasted now. Taking advantage of the situation, Dan asks her, "Hey, Sonia. Are you going to show us your pussy now?"'
	'She looks a little confused. "What?"'
	'"You said you were going to show us your pussy earlier," he says.'
	'Sonia blinks. "I was?" she asks, and all the guys agree she was. She glances at you, and you nod.'
	'Pauline offers more helpful advice. ""Yeah, you said you had a pretty pussy. So go on and prove it."'
	'With the encouragement, Sonia pulls her dress up and pulls her panties aside, showing off her pussy. She has a huge grin on her face at all the attention she is getting.'
	'"Show us everything," Vasily says.'
	gs 'arousal', 'erotic_nudity', 5
	gs 'stat'
	if hotcat >= 6 and grupTipe ! 4:
		act 'Continue':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/fullfront.jpg"></center>'
			'Sonia pulls down her dress to expose her tits, putting everything on full display for all to see. Her grin starts to fade, seeming to realize that maybe she went too far, and starts to blush and cover herself back up.'
			'Just as Sonia''s dress falls back in place, Dan looks at you. "Now, show us your pussy, <<$pcs_nickname>>!"'
			'You feel everyone''s eyes shift towards you. Even with everyone encouraging you, you don''t know what to do. Pauline continues to record Sonia with her phone.'
			gs 'arousal', 'erotic', 5
			gs 'arousal', 'end'
			gs 'stat'
			gs 'willpower', 'exhib', 'resist'
			if will_cost <= pcs_willpwr:
				act 'Decline (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'resist'
					grupvalue[4] -= 1
					soniaQW[soniafall_block] += 1
					gs 'npc_relationship', 'modify', 'A9', 'dislike'
					gs 'npc_relationship', 'modify', 'A10', 'dislike'
					gs 'npc_relationship', 'modify', 'A11', 'dislike'
					gs 'npc_relationship', 'modify', 'A24', 'dislike'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopdrinking.jpg"></center>'
					'You shake your head. "No, I''m not going to do that."'
					'Vitek gets visibly angry. "Then why are you here? We give you free drinks and this is how you repay us? Fuck you then, get out!"'
					'Dan gets up and forces you to leave.'
					act 'Leave':
						if soniafall <= 6:
							gt 'soniadisco', 'dance'
						else
							gt 'soniadisco', 'dance1'
						end
					end
				end
			else
				act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Show your pussy':
				*clr & cla
				grupvalue[4] += 1
				gs 'fame', 'pav', 'sex', 20
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/pussy.jpg"></center>'
				'Pauline starts to record you while you pull your clothes aside and quickly flash your pussy.'
				'When you cover back up, Sonia yells out with a slight slur in her voice, "I want to go dancing! Let''s go back to the disco!"'
				gs 'arousal', 'flashlite', 5, 'inhibition'
				gs 'arousal', 'end'
				gs 'stat'
				killvar '$soniadisco_peerpressuretrigger'
				act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
			end
		end
	else
		act 'Continue':
			*clr & cla
			soniarushout = 1
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/fullfront.jpg"></center>'
			'Sonia pulls down her dress to expose her tits, putting everything on full display for all to see. Her grin starts to fade, seeming to realize that maybe she went too far, and starts to blush and cover herself back up. "I... I need to go!" she stammers before getting up and running off.'
			gs 'arousal', 'erotic_nudity', 5
			gs 'arousal', 'end'
			gs 'stat'
			act 'Go after her': gt 'soniadisco', 'chasesonia'
			act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
		end
	end
end

if $ARGS[0] = 'pressuredforblowjob':
	'Vitek gets up and walks over to Sonia. "Nice tits."'
	'Sonia grins at him and sounds rather slurred when she asks, "Really? Do you like them?" She teasingly runs a finger over her nipple, which is quite visible through the thin fabric of her top.'
	'He nods appreciatively. "Absolutely! Your lips are gorgeous, too. I bet you like to suck on things."'
	'She slaps his chest indignantly and shouts, "Vitek! Have you lost your mind!?"'
	'Vitek raises his hands, defensively, and smirks, "Whoa, calm down! I was talking about popsicles! What did you think I meant?"'
	'Sonia turns beet red and mutters, "Whatever. There''s no way you have a popsicle on you anyway."'
	'"Oh, really?" Vitek replies. "If I did, would you suck it?"'
	'Sonia smiles at him and confesses, "Of course! I love popsicles! Bu-"'
	'Vitek reaches into his pocket and actually pulls one out. She looks at him in awe for a moment, almost as if he were a magician that just made a bunny appear out of thin air. When she tries to reach for it, the boy pulls it away. "No, no hands. I''ll hold it, you only use your mouth."'
	gs 'arousal', 'erotic', 5
	gs 'stat'
	act 'Go back to the disco': gt 'soniadisco', 'dance'
	act 'Watch':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/popsicle2.jpg"></center>'
		'Sonia obediently pulls her hands away and opens her mouth, Vitek slowly puts the popsicle against her lips and tongue. She closes her lips around it and sucks on it, while looking at Vitek seductively.'
		'Vitek grins and lowers the popsicle, further and further, until it is at the same level as his groin. All this time, Sonia has never taken her mouth off it, and eventually, she gets down on her knees after bending over awkwardly and nearly falling over once or twice. The way she''s sucking and licking the popsicle has definitely made Vitek aroused, and you see his cock straining against the fabric of his pants. Meanwhile, Dan and Vasily are looking at the two of them with their mouths open, somewhat awkwardly hiding their erections.'
		'Once the popsicle is mostly gone, Dan clears his throat. "Open your mouth and shows us your tongue."'
		'She opens her mouth, showing off her red-stained tongue.'
		gs 'arousal', 'erotic', 5
		gs 'stat'
		act 'Go back to the disco': gt 'soniadisco', 'dance'
		act 'Keep watching':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj1.jpg"></center>'
			'While she shows off her colored tongue to everyone, Vitek pulls his cock out of his pants and shoves it into her mouth before she can react.'
			'"I gave you a treat, so now it''s your turn to give me one," he says with a lecherous smile. The rest of the group agrees with him and encourages her to do it. Pauline places her hand on the back of Sonia''s head, preventing her from pulling away.'
			'Sonia hesitates for a moment before she starts sucking on the cock in her mouth. Pauline steps back and starts filming the whole thing.'
			'You don''t know what to do, Sonia is making a huge mistake. If you leave, it won''t change anything. If you try to intervene, you know you''ll be going against the whole group, but maybe Sonia would realize what she''s gotten into.'
			gs 'arousal', 'voyeur_sex', 5
			gs 'stat'
			act 'Go back to the disco': gt 'soniadisco', 'dance'
			gs 'willpower', 'misc', 'self'
			if will_cost <= pcs_willpwr:
				act 'Physically intervene (<<will_cost>> Willpower)':
					*clr & cla
					gs 'willpower', 'pay', 'self'
					grupvalue[4] -= 20
					soniaQW[soniafall_block] += 5
					gs 'npc_relationship', 'modify', 'A9', 'loathe'
					gs 'npc_relationship', 'modify', 'A10', 'loathe'
					gs 'npc_relationship', 'modify', 'A11', 'loathe'
					gs 'npc_relationship', 'modify', 'A24', 'loathe'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj2.jpg"></center>'
					'"For fucks sake, Sonia! Think about this, stop before you cross a line and go too far!" you yell out before trying to push Pauline away from Sonia.'
					'Your actions don''t penetrate the girl''s alcohol-soaked brain. She looks unsure for a moment, but goes right back to sucking Vitek''s cock.'
					'Vitek has had enough of you trying to spoil their fun and shoves you away hard, sending you to the ground.'
					'Pauline glares at you once she catches her balance, before returning to filming again.'
					*nl
					'Dan roughly grabs you by the arm and jerks you up, but Vasily grabs your other arm. "I got her." Dan looks at him a moment then gives you a dirty look before letting go.'
					'Vasily walks you around the corner of the building. "What the fuck were you thinking, <<$pcs_nickname>>? You should be glad Vitek didn''t beat the shit out of you! Get out of here and don''t come back!" He shoves you towards the door, before going back to the others.'
					act 'Go back to the disco': gt 'soniadisco', 'dance'
				end
			else
				act 'Physically intervene (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			act 'Keep watching':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj2.jpg"></center>'
				'Sonia bobs her head up and down on Vitek''s cock, working her mouth down until she starts to gag. She has her lips tightly wrapped around the shaft, and just like the popsicle, she sucks on his dick with no hands.'
				'Pauline continues to record, while the guys cheer on the action. You get the feeling that the guys want to join in, but one look from Vitek shuts them down.'
				gs 'arousal', 'voyeur_sex', 5
				gs 'stat'
				act 'Go back to the disco': gt 'soniadisco', 'dance'
				act 'Keep watching':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj3.jpg"></center>'
					'Sonia is really starting to get into a rhythm. Vitek seems content to let her work at her own pace, though he gives her occasional encouragement. Pauline offers her a few pointers, which Sonia listens to and does her best to follow, making Vitek moan even louder.'
					gs 'arousal', 'voyeur_sex', 5
					gs 'stat'
					act 'Go back to the disco': gt 'soniadisco', 'dance'
					if hotcat >= 6 and grupTipe ! 4:
						act 'Watch them finish':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj4.jpg"></center>'
							'Suddenly, Vitek lets out a loud groan, and Sonia makes a slight gagging noise. For the first time, she takes hold of his dick and strokes the shaft, milking every drop of his cum into her mouth.'
							'Once he finishes, he looks down at her. "Show me."'
							'She knows what he wants and opens her mouth to show her cum-filled mouth. It''s so full, a little leaks out from the corner onto her cheek.'
							'He grins at her. "That''s a good girl, now swallow."'
							'She gulps down his load before standing up. Pauline motions towards the cum on her cheek, which Sonia wipes up and sucks off her fingers. She suddenly blushes, possibly realizing she might have gone too far.'
							gs 'arousal', 'voyeur_sex', 5
							gs 'stat'
							act 'Go back to the disco': gt 'soniadisco', 'dance'
							act 'See what happens next':
								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/dan_dick.jpg"></center>'
								'Dan stands up and walks over to you, his crotch at face level. "Now it''s your turn to suck my dick, <<$pcs_nickname>>!" He pulls out his dick in front of your face.'
								'You feel everyone''s eyes shift towards you. Even with everyone encouraging you, you don''t know what to do. Pauline starts to record you with her phone.'
								gs 'arousal', 'erotic', 1
								gs 'arousal', 'end'
								gs 'stat'
								gs 'willpower', 'exhib', 'resist'
								if will_cost <= pcs_willpwr:
									act 'Decline (<<will_cost>> Willpower)':
										*clr & cla
										gs 'willpower', 'pay', 'resist'
										grupvalue[4] -= 1
										soniaQW[soniafall_block] += 1
										gs 'npc_relationship', 'modify', 'A9', 'dislike'
										gs 'npc_relationship', 'modify', 'A10', 'loathe'
										gs 'npc_relationship', 'modify', 'A11', 'dislike'
										gs 'npc_relationship', 'modify', 'A24', 'dislike'
										gs 'stat'
										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/dan_dick.jpg"></center>'
										'You shake your head and pull away from him, so his dick is not directly in your face anymore. "No, I''m not sucking your dick, Dan!"'
										'Dan gets visibly angry. "Then why are you here? We show you a good time, you drink our beer and then tell us to fuck off!"'
										'Vasily grabs you by the arm and walks you back around the building. "You need to go, before things get ugly."'
										'Before he can turn back, Sonia comes drunkenly walking past the two of you, and the rest follow shortly. Dan shoots you a dirty look as he goes by.'
										act 'Go back to the disco': gt 'soniadisco', 'dance'
									end
								else
									act 'Decline (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
								end
								act 'Suck his dick':
									*clr & cla
									grupvalue[4] += 1
									gs 'npc_relationship', 'modify', 'A9', 'like'
									gs 'npc_relationship', 'modify', 'A10', 'adore'
									gs 'npc_relationship', 'modify', 'A11', 'like'
									gs 'npc_relationship', 'modify', 'A24', 'like'
									gs 'fame', 'pav', 'sex', 30
									gs 'stat'
									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/sex/dan_bj1.jpg"></center>'
									'You look at the others, then up at him, and open your mouth. Pauline records as he quickly sticks his dick in your mouth. The other guys cheer Dan on, while also calling you a slut and other derogatory names.'
									gs 'arousal', 'bj', 2, 'inhibition', 'humiliation'
									gs 'stat'
									act 'Keep sucking his dick':
										*clr & cla
										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/sex/dan_bj2.jpg"></center>'
										'Dan moans a bit. "Yeah, that''s it, you fucking slut. You suck dick like a pro."'
										'Pauline laughs while she keeps recording. "Yeah, I bet she''s sucked off most of the guys in school already. What a fucking slut."'
										'The rest of them just laugh while they watch, though Sonia looks a little uncomfortable listening to them. You feel Dan''s hands grab the back of your head.'
										gs 'arousal', 'bj', 2, 'inhibition', 'humiliation'
										gs 'stat'
										act 'Deepthroat':
											*clr & cla
											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/sex/dan_bj3.jpg"></center>'
											'With his hands firmly on the back of your head, he thrusts his dick completely into your mouth. You gag a bit when his cock goes down your throat and your nose is smashed against his stomach. He starts moaning louder as he deeply fucks your mouth, causing you to constantly gag on his dick.'
											gs 'arousal', 'bj', 2, 'inhibition', 'deepthroat', 'humiliation'
											gs 'stat'
											act 'Swallow his cum':
												*clr & cla
												'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/gopnik/sex/dan_bj_cum.jpg"></center>'
												'He suddenly pulls his dick out of your mouth. "Keep your fucking mouth open, slut."'
												'Before you have a moment to think about it, he starts cumming. Most of it ends up on your tongue, while some hits the back of your throat. Once he finishes cumming, he wipes the tip of his dick off on your lips, before tucking it away.'
												*nl
												'Pauline moves in closer with her phone. "Swallow it, slut!" she says.'
												'Glancing around, you do as you are told and swallow Dan''s cum. You quickly wipe the bit of cum off your lips.'
												'With a slight slur in her voice and a cheeky grin on her face, she says, "I want to go dancing! Let''s go back to the disco!"'
												gs 'cum_call', 'mouth', 'A10', 1
												gs 'arousal', 'end'
												gs 'stat'
												killvar '$soniadisco_peerpressuretrigger'
												act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
											end
										end
									end
								end
							end
						end
					else
						act 'Watch them finish':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj4.jpg"></center>'
							'Suddenly, Vitek lets out a loud moan and Sonia starts gagging. For the first time, she takes hold of his dick and strokes the shaft, milking every drop of cum into her mouth.'
							'Once he finishes, he looks down at her. "Show me."'
							'She knows what he wants and opens her mouth to show her cum-filled mouth. It''s so full, a little leaks out from the corner onto her cheek.'
							'He grins at her. "That''s a good girl, now swallow."'
							'She gulps down his load before standing up. Pauline motions towards the cum on her cheek, which Sonia wipes up and sucks off her fingers. She suddenly blushes, possibly realizing she might have gone too far.'
							'With a slight slur in her voice and a cheeky grin on her face, she says, "I want to go dancing! Let''s go back to the disco!"'
							gs 'arousal', 'voyeur_sex', 5
							gs 'arousal', 'end'
							gs 'stat'
							act 'Go back to the disco': gt 'soniadisco', 'dance', 'staytoend'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'pressuredforgangbang':
	'Vitek gets up and walks over to Sonia. "Nice tits."'
	'Sonia grins. "Really? Do you like them?" she asks, with a slurred voice.'
	'Teasingly, she runs a finger over her nipple, which is quite visible through the thin fabric of her top. He nods appreciatively. "Absolutely! Your lips are gorgeous, too. How about you suck me off again?"'
	'She slaps his chest indignantly, "Vitek! Have you lost your mind!?"'
	'Vitek raises his hands in defense and smirks, "Whoa, calm down! You liked doing it last time! Come on now, no one will know! We didn''t tell anyone last time."'
	'Sonia bites her lip, and you can tell she wants to. "OK. You guys won''t tell anyone, right?"'
	'"Of course not!" he says with a smile. Then he unbuttons his pants and pulls out his semi hard dick. "Now, open wide." She does so, sticking out her tongue in turn.'
	act 'Keep watching':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang1.jpg"></center>'
		'Vitek pushes his dick into her awaiting mouth while everyone cheers them on.'
		'Sonia starts to suck enthusiastically. Dan and Vasily look at each other before standing up, intent on joining in this time.'
		'You don''t know what to do, Sonia is making a huge mistake. If you leave, it won''t change anything. If you try to intervene, you know you''ll be going against the whole group, but maybe Sonia would realize what she''s gotten into.'
		gs 'arousal', 'voyeur_sex', 5
		gs 'stat'
		act 'Keep watching': gt 'soniadisco', 'soniabang'
		act 'Go back to the disco': gt 'soniadisco', 'dance1'
		gs 'willpower', 'misc', 'self'
		if will_cost <= pcs_willpwr:
			act 'Physically intervene (<<will_cost>> Willpower)':
				*clr & cla
				gs 'willpower', 'pay', 'self'
				grupvalue[4] -= 20
				soniaQW[soniafall_block] += 5
				gs 'npc_relationship', 'modify', 'A9', 'loathe'
				gs 'npc_relationship', 'modify', 'A10', 'loathe'
				gs 'npc_relationship', 'modify', 'A11', 'loathe'
				gs 'npc_relationship', 'modify', 'A24', 'loathe'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/bj2.jpg"></center>'
				'"For fucks sake, Sonia! Think about it, don''t you realize they''re going to tell everyone about this!" you yell out before trying to push Pauline away from Sonia.'
				'Sonia stops for a moment, but Vitek grabs her by the hair and starts skull fucking her. Dan rushes over towards you and shoves you back, causing you to fall.'
				'"Keep your mouth shut, unless you want to join her!" he yells.'
				'Vasily grabs you by the arm. "I got her," he tells Dan. Dan looks at him before giving you a dirty look before he walks over towards Sonia, pulling out his dick.'
				*nl
				'Vasily walks you around the corner of the building. "What the fuck were you thinking, <<$pcs_nickname>>? You should be glad Dan didn''t kick the shit out of you! Get lost and don''t think about coming back!" He shoves you towards the door, before going back to the others.'
				act 'Go back to the disco': gt 'soniadisco', 'dance1'
			end
		else
			act 'Physically intervene (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'walkhome':
	*clr & cla
	minut += 5
	gs 'npc_relationship', 'modify', 'A25', 'like'
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/walkhome1.jpg"></center>'
	'As you help her stumble home, she turns to you and smiles, mumbling, "Thanks, <<$pcs_nickname>>."'
	'The two of you continue the walk to her house mostly in silence. Finally, you come upon a fairly average looking house in the middle of the residential area. She stops and points. "This is me."'
	act 'Warn her':
		*clr & cla
		gs 'npc_relationship', 'modify', 'A25', 'hate'
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/walkhome2.jpg"></center>'
		'Once at her door, you warn her to take it easy next time. "Just be careful with drinking too much in the future, you really went overboard tonight."'
		'She rolls her eyes. "Stop trying to mother me, I get enough of that at home. It was just a little harmless fun, no one cares." Then she walks into her house, leaving you alone outside.'
		act 'Leave': gt 'pav_residential'
	end
	act 'Ask if she will be OK':
		*clr & cla
		minut += 3
		if hotcat >= 5 and npc_rel['A25'] >= 60:
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/walkhomekiss.jpg"></center>'
			'You walk her to the doorway. You decide to check on her before you head out. "You sure you''re OK? Don''t need me to walk you in?" you ask.'
			'She starts to say something then stops. The next thing you know, she''s kissing you!'
			gs 'arousal', 'foreplay', 2, 'lesbian'
			gs 'stat'
			act 'Pull away':
				*clr & cla
				gs 'npc_relationship', 'modify', 'A25', 'dislike'
				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
				'You pull away from her, breaking the kiss. She blushes when you do and sputters, "I''m sorry, I don''t know what came over me." Before you can even get a word in edgewise, she opens the door and hurries into her house, closing the door behind her. Not knowing what else to do, you leave.'
				gs 'arousal', 'end'
				gs 'stat'
				act 'Leave': gt 'pav_residential'
			end
			act 'Return the kiss':
				*clr & cla
				gs 'npc_relationship', 'modify', 'A25', 'like'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/walkhomekiss.jpg"></center>'
				'After a moment of surprise, you return the kiss just as passionately as she is giving it. Your hands go down to hold her hips while you kiss for several wonderful moments.'
				'She eventually breaks the kiss and bites her lower lip. "Would you like to come inside, <<$pcs_nickname>>?"'
				gs 'arousal', 'foreplay', 5, 'lesbian'
				gs 'stat'
				act 'No':
					*clr & cla
					gs 'npc_relationship', 'modify', 'A25', 'dislike'
					gs 'arousal', 'end'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
					'You shake your head. "No, not this time. Maybe next time. It''s getting late, and I should get going."'
					'She nods in understanding, but you also notice she frowns a bit. "Sure, no problem. Talk to you later." Then she opens her door and slips inside without another word and closing the door, leaving you alone outside her house.'
					act 'Leave': gt 'pav_residential'
				end
				act 'Yes': gt 'soniadisco', 'homesex'
			end
		else
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
			'You walk her to the doorway. You decide to check on her before you head out. "You sure you''re OK? Don''t need me to walk you in?" you ask.'
			'She shakes her head and smiles. "Thanks, I''m fine. Really, <<$pcs_nickname>>, I''m fine. I can make it the rest of the way, thank you for walking me home though." Then she unlocks the door and goes in, just before she closes the door she gives you a one last smile and friendly wave.'
			act 'Leave': gt 'pav_residential'
		end
	end
end
	
if $ARGS[0] = 'chasesonia':
	*clr & cla
	minut += 5
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
	'You run outside after Sonia and catch up with her just outside the community center. "Sonia, wait!" you call out to her.'
	'She stops and turns around to face you. "What, are you going to tell me how stupid I was being?" she says, slurring her words.'
	act 'Yes':
		*clr & cla
		gs 'npc_relationship', 'modify', 'A25', 'loathe'
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
		'You nod slightly. "What were you thinking? You know people will talk and what that could mean," you chastise her.'
		'She shakes her head. "Whatever, I know and they won''t talk, so stop trying to be my mother. I am old enough to make up my own mind, so stay out of my business," she says angrily and storms off. You consider following her, but you know it would only make things worse.'
		act 'Leave': gt 'pav_residential'
	end
	act 'No':
		*clr & cla
		gs 'npc_relationship', 'modify', 'A25', 'like'
		minut += 5
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
		'You shake your head. "No, I just wanted to make sure you were alright," you tell her.'
		'She sighs. "Sorry, I didn''t mean to snap. I just got carried away is all, I think I should go home."'
		act 'Walk home with her':
			*clr & cla
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
			'You smile at her. "I was going to head home myself, how about we walk together?" you ask her.'
			'She pauses a moment and then nods. "Yeah, OK."'
			act 'Walk her home': gt 'soniadisco', 'walkhome'
		end
		act 'Agree she should':
			*clr & cla
			minut += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
			'You nod in agreement. "Yeah, that''s likely for the best. Be careful walking home."'
			'She rolls her eyes slightly. "Yes, mom." She turns and starts to walk away, stumbling slightly along the way.'
			act 'Leave': gt 'pav_residential'
		end
	end
end

if $ARGS[0] = 'dance1':
	*clr & cla
	if hour > 19: discobloc['A25'] = daystart
	minut += 10
	soniaPS = 1
	soniaPSdays = daystart
	npc_grupTipe['A25'] = 5
	$npc_notes['A25'] = 'Ever since Sonia inadvertently got too drunk and gave Vitek and his fellow gopniks blowjobs near the disco, her reputation in Pavlovsk has been in shambles. The girls in her class give her the silent treatment, while the guys treat her like a cheap whore and regularly ask (and sometimes demand) sex from her, knowing she doesn''t have the strength to say no.'
	$npcGoSchool['A25'] = '<a href="exec:gt ''gschool_outcast_chats'', ''' + $lcase($npc_usedname['A25']) + '''"><<$npc_usedname["A25"]>></a>'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/cumwalk.jpg"></center>'
	if $ARGS[1] = 'staytoend':
		'Vitek is dragging a drunken Sonia around like she''s a trophy on display. She is all smiles and looks pretty happy and completely wasted. You follow them just inside the dance and stop near the door.'
	else
		if $ARGS[1] = 'declineinvite':
			'You don''t really want to drink alcohol right now, so you just shake your head. "Thanks for the invite, but I think I''d rather stay here right now. You guys have fun!"'
			*p 'About 30 minutes after they leave, you see the boys return, quite rowdy and pleased with themselves. '
		else
			*p 'Not wanting to stick around and see what happens to Sonia, you return to the dance. A while later, the boys return, quite rowdy and pleased with themselves. '
		end
		'Vitek is dragging a drunken Sonia around like she''s a trophy on display. She is all smiles and seems pretty happy and even more drunk than when you last saw her. When you look closer, you see her face is entirely covered in sperm! You don''t know if she''s too drunk to notice or simply doesn''t care. '
	end
	*nl
	'Vitek leads her around the disco, and several people take photos of Sonia''s cum-covered face. She seems to be catching on that something isn''t right, but has yet to figure it out. When they reach the entrance, one of the guys with her loudly proclaims, "Sonia just let all six of us fuck her in every hole she has at the same time, like some wanton whore."'
	*nl
	'Sonia looks shocked and stares at Vitek who laughs at her. She reaches up to touch her face and just now seems to realize it''s covered in cum. The boys at the disco all laugh and make lewd remarks towards her, while the girls look at her with contempt or just turn their backs on her. Even her friends want nothing to do with her now and ignore her completely.'
	'She immediately bursts into tears and runs out of the disco, trying to cover up her face. The atmosphere in the disco slowly returns to normal, but everyone keeps talking about Sonia and what she did tonight. A few people even whisper that they always knew she was a total slut.'
	gs 'arousal', 'voyeur_sex', 5
	gs 'arousal', 'end'
	gs 'stat'
	act 'Ignore Sonia': gt 'pav_disco'
	act 'Follow Sonia': gt 'soniadisco', 'followsonia'
end
	
if $ARGS[0] = 'soniabang':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang2.jpg"></center>'
	'Pauline steps back while the other guys get up and crowd around Sonia, pulling their dicks out. Surrounded by hard dicks, Sonia starts jerking off the other guys. Eventually, she switches which dick she is sucking and jerking off, trying to give them all attention.'
	'Pauline takes out her phone and starts recording it, making sure to get a good close up of Sonia''s face as she does. Pauline seems pretty amused by all this and offers, "Why are you all just standing around, she has more than one hole," then looks at Sonia. "Don''t you slut!" Sonia mutters something, but it''s too hard to tell what with a cock in her mouth. The guys not getting their cocks attended to start pulling off her clothes, quickly leaving her completely naked.'
	gs 'arousal', 'voyeur_sex', 5
	gs 'stat'
	act 'Try to stop her':
		*clr & cla
		soniahelp += 1
		grupvalue[4] -= 10
		gs 'npc_relationship', 'modify', 'A9', 'loathe'
		gs 'npc_relationship', 'modify', 'A10', 'loathe'
		gs 'npc_relationship', 'modify', 'A11', 'loathe'
		gs 'npc_relationship', 'modify', 'A24', 'loathe'
		gs 'npc_relationship', 'modify', 'A25', 'like'
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang2.jpg"></center>'
		'You can''t just watch her make a mistake like this. "Sonia, think about what you''re doing."'
		'All the guys turn to give you a dirty look when Sonia pauses a moment.'
		'Dan whirls around to face you and closes the distance in no time. You try to back up, but he is too fast. He shoves you slightly, just enough to almost cause you to fall. You can hear Vitek encouraging Sonia to keep going. Dan says, "Keep your mouth shut, unless you want to join her."'
		'Before you can respond, you see Vasily catch your eye and shake his head, silently warning you to not push Dan. Slightly afraid, you have no choice but to shut your mouth and just watch, hoping that Sonia will do the right thing.'
		act 'Her fate': gt 'soniadisco', 'soniafall'
		act 'Go back to the disco': gt 'soniadisco', 'dance1'
		end
	act 'Watch':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang2.jpg"></center>'
		'Sonia stares at the erection in front of her face, spellbound. Then she slowly extends her hand and pokes the cock with her finger. It twitches and some precum leaks from the head, making her giggle with glee. Fascinated by it, she hesitantly closes her slender fingers around the head and jerks it off carefully.'
		'Vitek groans, maybe not expecting his plan to actually get this far. He quickly tells her, "Now have a taste... I bet you will love it!"'
		'She pauses a moment, and you watch as she perhaps makes one of the biggest decisions of her life.'
		gs 'arousal', 'voyeur_sex', 5
		gs 'stat'
		act 'Her fate': gt 'soniadisco', 'soniafall'
		act 'Go back to the disco': gt 'soniadisco', 'dance1'
	end
	act 'Go back to the disco': gt 'soniadisco', 'dance1'
end

if $ARGS[0] = 'soniafall':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang3.jpg"></center>'
	'Vitek lies down on his back and pulls Sonia on top of him. He roughly slides his dick into her pussy and starts bucking, fucking her from underneath. Dan steps up behind Sonia, spits on the crack of her ass, and rubs the head of his dick around in his spit for a moment before he forces it into her asshole. She barely seems to notice since she is so drunk. Dan and Vitek fuck her roughly, while the other guys stand around waiting for their turn.'
	gs 'arousal', 'voyeur_sex', 5
	gs 'stat'
	act 'Air tight':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang4.jpg"></center>'
		'They trade positions, two of the others now fucking both of Sonia''s holes while Pauline records it all. Vitek stands near her head and shoves his dick back in her mouth. Now with every hole on her body filled, she seems to be getting into it. Maybe she is too drunk to realize what is going on, or maybe she was tired of being a good girl and needed a release.'
		gs 'arousal', 'voyeur_sex', 5
		gs 'stat'
		act 'Keep watching':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang5.jpg"></center>'
			'Each guy takes a turn with her. Sonia doesn''t seem to mind - in fact, she seems to be really loving it. Pauline keeps recording the whole thing. The guys are not remotely gentle, but it doesn''t seem to matter. Sonia moans and writhes in pleasure as the six guys take turns fucking her. The first guy finally pops his load right in her mouth. She swallows most of it, but some leaks out as she switches to a new cock. Several of the other guys seem to be getting close to blowing their loads as well.'
			gs 'arousal', 'voyeur_sex', 10
			gs 'stat'
			act 'Facial':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/disco/gangbang6.jpg"></center>'
				'When they stop to change positions, Vitek has Sonia get on her knees, and the guys surround her, jerking their dicks. Before long, they cum on her. Some of it ends up her tits, but the vast majority of it ends up coating her face and hair, leaving her a complete mess.'
				*nl
				'After the last one finishes, Vitek says, "Suck us clean." Sonia does as she''s told and when she is done, the guys help her up, then pull her dress over the top of her head and start leading her back to the dance.'
				'"Come on, Sonia. Let''s go dance," Dan says with a laugh. Sonia gets all excited, apparently too drunk to notice her hair and face covered in cum.'
				gs 'arousal', 'voyeur_sex', 5
				gs 'stat'
				act 'Follow them':gt 'soniadisco', 'dance1', 'staytoend'
			end
		end
		act 'Go back to the disco': gt 'soniadisco', 'dance1'
	end
	act 'Go back to the disco': gt 'soniadisco', 'dance1'
end

if $ARGS[0] = 'followsonia':
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/soniasad.jpg"></center>'
	'You look around and see that everyone is laughing at Sonia or looking at her in disgust. When you look back, she is gone. After a moment, you head outside to see if you can find her.'
	'You find Sonia drunkenly leaning against a tree sobbing, trying to keep her balance. The thick gobs of cum are slowly drying on her face, while you see tears streaking down her cheeks. It looks like reality has finally caught up with her, and she realizes what she just did. She softly whispers, between sobs, "What have I done... I''m such an idiot!"'
	act 'Approach her':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/soniasad.jpg"></center>'
		if soniahelp > soniaencourage:
			'You walk up to her. "Are you OK?"'
			'She gives you a look of disbelief. "No, I''m not OK! You saw what happened, everyone is going to think I''m a slut now. Hell, I am a slut," she says between sobs.'
			'You nod a bit. "I know, but I tried to help you and I wish I could have done more," you tell her.'
			'She nods in return. "I know. God, I was so stupid," she says before she starts sobbing harder.'
		elseif soniaencourage > 0 and npc_rel['A25'] >= 50:
			gs 'npc_relationship', 'modify', 'A25', '-10'
			'When you walk up, she turns to you. "I thought you were my friend, why would you do that to me?"'
		elseif soniaencourage > 0:
			gs 'npc_relationship', 'modify', 'A25', 'loathe'
			'When you walk up, she turns to you. "What do you want? Come to gloat and make fun of me too?"'
		else
			'You walk up to her. "Are you OK?"'
			'She gives you a look of disbelief. "No, I''m not OK! You saw what happened, everyone is going to think I''m a slut now. Hell, I am a slut," she says between sobs.'
		end
		if soniahelp > soniaencourage or soniaencourage = 0:
			act 'Comfort her':
				*clr & cla
				gs 'npc_relationship', 'modify', 'A25', 'adore'
				minut += 10
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/soniasad.jpg"></center>'
				if soniahelp > 0:
					'You put your arm around her shoulder and hug her. "I am so sorry this happened to you, I tried to help. I should have done more."'
					'She shakes her head. "No, you tried to warn me, this is my fault. God, I am so stupid. My life is over!" she cries and starts sobbing even harder. You try wiping the cum off her face and out of her hair as best you can while you hold her as she sobs against your shoulder.'
					'Once you have her face and hair mostly cleaned up and she seems to be slowing down on her sobs, she says, "I should go home."'
				else
					'You put your arm around her shoulder and hug her. "I am so sorry this happened to you, I wish I had said or done something to help you."'
					'She shakes her head. "No, you couldn''t have said anything to change my mind. This is my fault. God, I am so stupid. My life is over!" she cries and starts sobbing even harder. You try wiping the cum off her face and out of her hair as best you can while you hold her as she sobs into your shoulder.'
					'Once you have her face and hair mostly cleaned up and she seems to be slowing down on her sobs, she says, "I should go home."'
				end
				act 'Leave': gt 'pav_residential'
				act 'Help her home':
					*clr & cla
					minut += 10
					gs 'npc_relationship', 'modify', 'A25', 'love'
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/soniasad.jpg"></center>'
					'"At least let me walk you home, it''s the least I can do," you tell her. She merely nods and leans against you. The two of you walk home, the noise of the night interrupted by her sniffles and sobs. You walk her to near the middle of the residential area and up to the door of a fairly average looking house. Unlocking the door, she says, "This is me, thank you for walking me home." Then she starts sobbing again. Before you can think of something to say, she hurries inside the house and closes the door behind her. You can hear her sobs through the door. You know her life is going to be a living hell from now on, but maybe you can help her somehow.'
					act 'Leave': gt 'pav_residential'
				end
			end
		else
			act 'Apologize':
				*clr & cla
				gs 'npc_relationship', 'modify', 'A25', 'like'
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/soniasad.jpg"></center>'
				'"I''m sorry, I shouldn''t have encouraged you. I didn''t think it would go that far, and I didn''t know the guys would do that to you. It wasn''t right and I''m sorry."'
				'She nods slightly. "No matter what you said, it would have happened anyway. I wanted to party, to be the bad girl. Guess I got what I wanted. I am so stupid," she says before starting to sob again.'
				'"Is there anything I can do to help?" you ask her.'
				'She shakes her head no. "Just leave me alone, OK?"'
				'You nod and step away, honoring her wishes and walking away. As you do, you can hear her sobbing.'
				act 'Leave': gt 'pav_residential'
			end
		end
		act 'Tell her it''s her own fault':
			*clr & cla
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/soniasad.jpg"></center>'
			if soniahelp > soniaencourage:
				'"I tried to help you, but you wouldn''t listen. This is your own fault," you tell her.'
				'She cries even harder. "I know." Then she takes off running as best she can. Maybe you should have been nicer, even if it is her own fault.'
			elseif soniaencourage > 0 and npc_rel['A25'] => 50:
				gs 'npc_relationship', 'modify', 'A25', '-20'
				'You shake your head. She was all happy before and now crying about it. "What did you expect, you were acting like a slut. You wanted to have fun and walk on the wild side and you did. You have no one to blame but yourself."'
				'She cries even harder. "I thought you were my friend, you encouraged me! Why would you do that?" she asks you.'
				'"Come on, we both know nothing I was going to say would have gotten you to stop. You wanted to know what it was like to be a bad girl, so I helped you do what you wanted. That''s not my fault, it''s yours," you tell her.'
				'"Stay away from me." Then she takes off running as best she can. Maybe you should have been nicer, even if it is her own fault.'
			elseif soniaencourage > 0:
				gs 'npc_relationship', 'modify', 'A25', '-10'
				'You shake your head. She was all happy before and now she''s crying about it. "What did you expect, you were acting like a slut. You wanted to have fun and walk on the wild side and you did. You have no one to blame but yourself."'
				'She cries even harder. "I know." Then she takes off running as best as she can. Maybe you should have been nicer, even if it is her own fault.'
			else
				'"This is your own fault. You wanted to be a bad girl and you got just what you wanted," you tell her.'
				'She cries even harder. "I know." Then she takes off running as best she can. Maybe you should have been nicer, even if it is her own fault.'
			end
			act 'Leave': gt 'pav_residential'
		end
	end
	act 'Go back to the disco': gt 'pav_disco'
end

if $ARGS[0] = 'homesex':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex1.jpg"></center>'
	'Sonia unlocks the door, and the two of you go inside. As soon as you do, the two of you begin kissing again with renewed vigor. Fumbling behind her, Sonia manages to close the door, and the two of you stumble into the dining room, where you back into the table. Breaking your kiss, she takes hold of your hips with her hands and lifts slightly. You get she is trying to help you sit on the table.'
	$orgasm_or = 'no'
	gs 'arousal', 'foreplay', 5, 'lesbian'
	gs 'stat'
	act 'Sit':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex2.jpg"></center>'
		'She helps you sit on the table and then pushes her hips between your knees so she is between your legs. She gently squeezes and massages your breasts while she starts kissing you again. After a bit, she starts to tug at your top, pulling it up to expose your tits, and asks you to lie back.'
		gs 'arousal', 'foreplay', 5, 'lesbian'
		gs 'stat'
		act 'Lay back':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex3.jpg"></center>'
			'You lie back on the table. She leans forward and starts to kiss your chest. She slowly makes her way to one of your nipples where she suckles and nips at it. While she does this, her other hand massages your other breast.'
			gs 'arousal', 'foreplay', 5, 'lesbian'
			gs 'stat'
			act 'Enjoy':
				*clr & cla
				if $pantyworntype = 'none':
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex3.jpg"></center>'
					'She pulls your clothes aside and reaches for your panties. When she doesn''t find any, she smiles at you. "Dirty girl." She starts to kiss her way down your stomach.'
				else
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex4.jpg"></center>'
					'She pulls your clothes aside until she gets to your panties, which she gently starts pulling off. She tosses them aside and starts kissing your ankle, making her way back up your legs towards your inner thighs.'
				end
				gs 'arousal', 'foreplay', 5, 'lesbian'
				gs 'stat'
				act 'Let her eat you':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex5.jpg"></center>'
					'Her kisses slowly lead her to your crotch until you feel her soft lips kiss your clit. She starts to lick and suck on your clitoris, and you can feel your pussy getting wet. Soon, she slides her tongue down, slips it between your pussy lips and starts really eating you out in earnest.'
					gs 'arousal', 'cuni', 5, 'lesbian'
					gs 'stat'
					act 'Get up':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex6.jpg"></center>'
						'She expertly sucks at your clit and licks your pussy. You don''t know if she has done this a lot or is just a natural, and you really don''t care. As you start moaning a little louder, she stops and puts a finger to your lips. "Shh, don''t wake anyone. Come on, let''s go to my room."'
						gs 'arousal', 'cuni', 5, 'lesbian'
						gs 'stat'
						if strapon = 1 and soniasex = 1:
							act 'Show her your strap-on':
								*clr & cla
								gs 'boyStat', 'D<<strapnumber>>'
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon2.jpg"></center>'
								'While she leads you to her room, you grab her hand and pull her back. She looks at you with questioning eyes, wondering if maybe you have changed your mind. Then her eyes get huge when you pull your strap-on out of your purse and show it to her. "Oh my god," she utters with her hands over her mouth and sits down on couch.'
								'You sit next to her with a huge smile and hold the strap-on between you. She reaches over and touches it and gets a huge grin on her face. "What do you want to do with this?"'
								act 'Fuck me with it': gt 'soniadisco', 'strapon_fucked'
								act 'Going to fuck you with it': gt 'soniadisco', 'strapon_fucking'
							end
						end
						act 'Go to her room':
							*clr & cla
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex7.jpg"></center>'
							'You nod and slide off the table, and the two of you walk to her room, hand in hand. Once there, she pushes you down on your back on the bed and climbs on top of you. Reaching for your face, she stares into your eyes for a moment before she starts kissing you again. You can taste your own wetness on her lips and tongue.'
							gs 'arousal', 'foreplay', 5, 'lesbian'
							gs 'stat'
							act 'Take her dress off':
								*clr & cla
								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex8.jpg"></center>'
								'Stopping making out for a moment, you pull her dress off over the top of her head and toss it aside. The two of you go back to kissing and fondling each other, her stripped down to just her panties.'
								gs 'arousal', 'foreplay', 5, 'lesbian'
								gs 'stat'
								act 'Go down on her': gt 'soniadisco', 'eatsonia'
								act 'Get finger banged':
									*clr & cla
									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex9.jpg"></center>'
									'She has been leading the action so far, and you decide to just follow her lead. She pulls off most of the rest of your clothes, tossing them aside, and lies down next to you. Her hand slides between your legs and you spread them wider. You feel one finger slide into your wet pussy, soon followed by a second. She fingers you with her fingers until your pussy is soaking wet, then she adds a third finger inside of you.'
									gs 'arousal', 'vaginal_finger', 5, 'lesbian', 'sub'
									gs 'stat'
									act 'Get eaten out again':
										*clr & cla
										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex10.jpg"></center>'
										'As she finger bangs your pussy, she slides down and replaces her fingers with her mouth and tongue. She goes back to eating you out, her face getting covered in your wetness. After a few minutes, she stops and says, "My turn."'
										gs 'arousal', 'cuni', 5, 'lesbian', 'sub'
										gs 'stat'
										act 'Go down on her': gt 'soniadisco', 'eatsonia'
									end
								end
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'eatsonia':
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex11.jpg"></center>'
	'You lay her down on her back, then kiss her stomach and her pussy over her panties. She watches you, moaning softly while biting her lip. She obviously wants more, but you take your time. After you tease her for a bit, you take hold of her wet panties and slide them down her legs, slowly. Once they are free, you toss them aside.'
	gs 'arousal', 'foreplay', 5, 'lesbian'
	gs 'stat'
	act 'Lick her pussy':
		*clr & cla
		gs 'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex12.jpg"></center>'
		'You place your head between her legs and start to kiss and lick at her pussy, finding it already soaking wet. It doesn''t take long until she places her hand on your head to encourage you to be more aggressive. You oblige her and start lapping and tonguing her pussy.'
		gs 'arousal', 'cuni_give', 5, 'lesbian'
		gs 'stat'
		act 'Keep licking her pussy':
			*clr & cla
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex13.jpg"></center>'
			'You suck and lick her clit for a bit before you stick your tongue back inside of her pussy. You hear her moan and feel the hand on your head adding more pressure as she starts grinding her crotch against you, covering your whole face in her juices. Then she says, "I want to eat you at the same time."'
			gs 'arousal', 'cuni_give', 5, 'lesbian'
			gs 'stat'
			act '69':
				*clr & cla
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex14.jpg"></center>'
				'The two of you get into a 69 position. She gets on top and almost sits on your face. You start to lick at her pussy at the same time you can feel her licking at yours. You are both moaning. The combination of having your pussy eaten out while you are eating out another pussy is almost too much.'
				gs 'arousal', 'cuni', 5, 'lesbian'
				gs 'arousal', 'cuni_give', -5, 'lesbian'
				gs 'stat'
				act 'Paradise':
					*clr & cla
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex15.jpg"></center>'
					'Her moans start coming louder and longer and suddenly you are drenched in her wetness. You can feel her body shaking as she has a orgasm.'
					killvar '$orgasm_or'
					$orgasm_txt = 'Soon, you feel your body start to spasm as well as your own orgasm rocks your body. It feels like forever, but likely only a couple of minutes pass before your orgasm fades.'
					gs 'arousal', 'cuni', 5, 'lesbian'
					gs 'arousal', 'cuni_give', -5, 'lesbian'
					gs 'arousal', 'end'
					gs 'stat'
					act 'Afterglow':
						*clr & cla
						gs 'stat'
						soniasex = 1
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/walkhome/walksex16.jpg"></center>'
						if $home['current'] ! 'parents_home':
							'Once the orgasms have passed, she climbs off you and lies down next to you to cuddle. The two of you lie intertwined, basking together in the afterglow. As much as you would like to stay, you know you can''t. You know you need to get home. Reluctantly, you disentangle yourself from her. She gives you a small smile. "Sorry, I need to get going."'
						else
							'Once the orgasms have passed, she climbs off you and lies down next to you to cuddle. The two of you lie intertwined, basking together in the afterglow. As much as you would like to stay, you know you can''t. You know you need to get home. Reluctantly, you disentangle yourself from her. She gives you a small smile. "Sorry, I need to get going, or my mom will have a fit."'
						end
						'Sonia nods. "I understand, it was fun though."'
						'You smile at her and give her a lingering kiss, then you get dressed. "Yeah, it was."'
						'As you finish dressing, she throws on a nightshirt and walks you to the door. "See you at school later."'
						'"Bye," you tell her as you walk out. She closes the door behind you and locks it. Now you should probably get home.'
						act 'Leave': gt 'pav_residential'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'strapon_fucked':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon1.jpg"></center>'
	'You tell her, "I want you to put this on and fuck me with it."'
	'Her grin gets even bigger and she seems to really like the idea. "I would love to fuck you with this," she says as she takes the strap-on and strokes the shaft of the dildo attached. She lays it aside and leans in to kiss you. She caresses your neck as she gives you a long, slow, passionate kiss. She breaks the kiss and quickly gets undressed. You follow suit and undress as well. Once you are both naked, she gently pushes you back on the couch until you are lying on your back, and then she moves to straddle your face.'
	gs 'arousal', 'foreplay', 5, 'lesbian'
	gs 'stat'
	act 'Eat her':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon3.jpg"></center>'
		'Once she straddles your face and lowers herself down, you start licking her slit and clit eagerly. You can hear her moan while your tongue works her twat over, you can feel it getting wetter and wetter. Her hand slides down your stomach all the way to your crotch. Once her hand reaches your pussy, you feel two of her fingers slide into it and starts finger banging your twat.'
		killvar '$orgasm_or'
		gs 'arousal', 'cuni_give', 5, 'lesbian'
		gs 'arousal', 'vaginal_finger', -5, 'lesbian'
		gs 'stat'
		act '69':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon4.jpg"></center>'
			'Once your twat is good and soaking wet from her fingering, she stops and bends over to start licking your pussy while you continue to do the same to hers. The sensation of having your pussy licked while licking another is intoxicating. You both start moaning in pleasure more and louder as you both keep it up. After a few minutes of this, Sonia stands up and climbs off of you.'
			gs 'arousal', 'cuni_give', 5, 'lesbian'
			gs 'arousal', 'cuni', -5, 'lesbian'
			gs 'stat'
			act 'What''s next':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon5.jpg"></center>'
				'You watch as she picks up the harness and starts slipping it on, pulling it over her hips. Once in place, she starts tightening up the straps so the harness fits snugly. When she finishes, she strokes the dildo a few times like it was a dick, which only makes her grin at you. "I better make sure your pussy is nice and wet before I fuck it, huh," she says. Then she crawls forward on the couch, places her face between your legs and starts licking at your already wet twat.'
				gs 'arousal', 'cuni', 5, 'lesbian'
				gs 'stat'
				act 'Mount her':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon6.jpg"></center>'
					'A couple of minutes pass until she seems content you are wet enough. She turns and sits down on the couch and pulls you towards her. "Come on and mount my dick," she says with a giggle. You straddle her lap and, with her help, slowly lower yourself down. The <<dick>>cm <<$dick_girth>> dildo slides into your wet pussy, causing you to moan as it fills you up. You begin to slowly ride her, controlling the speed and depth of the dildo in your twat. Sonia begins to lick, kiss and suckle at your nipples as you ride her. The better it feels, the faster and deeper you ride the strap-on dildo.'
					gs 'arousal', 'vaginal_strap', 5, 'lesbian'
					gs 'arousal', 'foreplay', -5, 'lesbian'
					gs 'stat'
					act 'Turn around':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon7.jpg"></center>'
						'Your enjoyment is interrupted when Sonia slaps you on the butt. "Get up and turn around so I can fuck you properly." You get off her and then face away, getting down on your hands and knees, presenting yourself to her. She scoots up behind you on her knees. She quickly slides the wet dildo back into your pussy, causing you to moan. She grabs hold of your hips and starts fucking you, picking up speed and eventually working the dildo deep in your twat as you moan louder and louder.'
						*nl
						'Your pleasure is interrupted as you hear Sonia''s mom call out from the bedroom. "Sonia is that you? You know what time it is, you should be in bed! Is anything wrong?"'
						'Sonia jumps off the couch, pulling the dildo out of your twat as she does. "Everything is fine, mom! A friend stopped by for a few minutes to talk about schoolwork, she was just leaving and I am heading to bed." She quickly takes the harness off and throws her dress over her head as fast as she can. While she is doing that, you take the hint and quickly get dressed as well.'
						gs 'arousal', 'vaginal_strap', 5, 'lesbian'
						gs 'stat'
						act 'Aftermath':
							*clr & cla
							minut += 5
							soniasex = 1
							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/livingroom/strapon/strapon1.jpg"></center>'
							if $home['current'] ! 'parents_home':
								'Once you are both fully dressed and her mom stops talking, you both sit down on the couch and giggle a little at almost getting caught having sex with a strap-on. Sonia leans forward and gives you a long, slow kiss on the lips. Once she breaks the kiss, she says, "Thanks for walking me home, I had fun. But if I don''t go to bed soon."'
							else
								'Once you are both fully dressed and her mom stops talking, you both sit down on the couch and giggle a little at almost getting caught having sex with a strap-on. Sonia leans forward and gives you a long, slow kiss on the lips. Once she breaks the kiss, she says, "Thanks for walking me home, I had fun. But if I don''t go to bed soon, my mom is going to throw a fit."'
							end
							'You laugh a little and nod. "I know the feeling, my mom will likely give me hell for being out this late too." When she walks you to the door, she gives you a little wave, before closing and locking the door. You turn and head to the street.'
							gs 'arousal', 'foreplay', 5, 'lesbian'
							gs 'arousal', 'end'
							gs 'stat'
							act 'Leave': gt 'pav_residential'
						end
					end
				end
			end
		end
	end
end
	
if $ARGS[0] = 'strapon_fucking':
	*clr & cla
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/strapon.jpg"></center>'
	'"I am going to fuck you with my cock," you tell her.'
	'She bites her lower lip, obviously turned on at the idea, before taking you by the hand and leading you to her bedroom. You both start to get undressed, and then you pull the harness up over your hips and pull the straps tight until it fits snugly, giving the dildo a few tugs to ensure it will stay in place. Then you climb up on her bed on your knees and tell her, "Suck my dick."'
	act 'Suck my dick':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponbj.jpg"></center>'
		'Only halfway undressed when you say it, she grins and climbs on the bed, getting down on her hands and knees. She takes the dildo into her mouth and starts sucking it. It looks like she really knows what she is doing. You wonder briefly just how many dicks she might have sucked. After she has the dildo nice and wet with her slobber, you tell her, "Hope you are ready because I am going to fuck your..."'
		gs 'arousal', 'foreplay', 5, 'lesbian'
		gs 'stat'
		act 'Pussy': gt 'soniadisco', 'strapon_pussy'
		gs 'willpower', 'anal', 'force'
		if will_cost <= pcs_willpwr:
			act 'Ass (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'force' & gt 'soniadisco', 'strapon_anal'
		else
			act 'Ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'strapon_pussy':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponvag1.jpg"></center>'
	'She stops sucking the dildo and turns around, presenting herself to you while she pulls off the rest of her clothes. You scoot up behind her and rub the tip of the dildo against her slit, which appears to already be soaking wet. The <<dick>>cm <<$dick_girth>> dildo easily slides into her twat. She starts moaning almost at once. She looks back over her shoulder at you with a hungry, lust-filled look. You slide the dildo all the way inside of her until you feel the leather harness pressing up against her butt.'
	gs 'arousal', 'vaginal_strap_give', 5, 'lesbian'
	gs 'stat'
	act 'Fuck that pussy':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponvag2.jpg"></center>'
		'You start fucking her with deep strokes. The room is filled with the sounds of her moaning and the sound of the leather harness slapping against her butt cheeks as you fuck her with full, deep thrusts. You hold onto her hip with one hand as you thrust the full length of your dildo firmly and rapidly into her twat. A few minutes later, she starts loudly moaning and starts to tremble, having an orgasm from the fucking you''re giving her. Once it passes, you pull the dildo out of her and tell her, "Now, we are going to do something else."'
		gs 'arousal', 'vaginal_strap_give', 5, 'lesbian'
		gs 'stat'
		act 'Make her eat you': gt 'soniadisco', 'strapon_eaten'
		gs 'willpower', 'anal', 'force'
		if will_cost <= pcs_willpwr:
			act 'Fuck her ass (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'force' & gt 'soniadisco', 'strapon_anal'
		else
			act 'Fuck her ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'strapon_anal':
	*clr & cla
	strapanal = 1
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponanal1.jpg"></center>'
	'"I''m going to fuck your ass," you tell her.'
	'Her eyes get big, and she looks unsure. "Can''t you just fuck my pussy instead, <<$pcs_nickname>>?"'
	'You make sure the dildo and her ass are lubed up enough. Your answer to her question is to press the head of the dildo against her asshole and then push forward. You feel her start to pull away, but you quickly reach up and place a hand on her shoulder, pulling her back. With her now held in place and the pressure mounting, you look down and watch as the head of the dildo pops into her asshole. You hear her hiss in pain but also moan in pleasure. You give her butt a few short strokes, working the <<dick>>cm <<$dick_girth>> dildo deeper inside with each one until almost the full length is up her butt.'
	gs 'arousal', 'anal_strap_give', 5, 'lesbian'
	gs 'stat'
	act 'Pound her ass':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponanal2.jpg"></center>'
		'You finally work the full length up her ass until your hips and the leather of the harness are slapping against her butt cheeks. Then you start fucking her ass with firm strokes that bottom the dildo out in her butt. She bites her lower lip, and you can tell it hurts, but you also know at least part of her is enjoying this. As you start to really pound her little ass, she finally says, "Not so hard, <<$pcs_nickname>>."'
		gs 'arousal', 'anal_strap_give', 5, 'lesbian'
		gs 'stat'
		act 'Ease up': 
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponanal1.jpg"></center>'
			'You decide to take pity on her and ease up a bit. You no longer fuck her with the full length of the shaft and try to read her body language, adjusting your speed and depth to what makes her moan the most. After a few minutes of this, her body is wracked by another orgasm. With that, you finally pull the dildo out of her and start taking off the harness. "Now you''re going to eat my pussy," you tell her.'
			gs 'arousal', 'anal_strap_give', 5, 'lesbian'
			gs 'stat'
			act 'Make her eat you': gt 'soniadisco', 'strapon_eaten'
		end
		gs 'willpower', 'anal', 'force'
		if will_cost <= pcs_willpwr:
			act 'Tear her ass up (<<will_cost>> Willpower)':
				*clr & cla
				strapanal = 2
				gs 'willpower', 'pay', 'force'
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/straponrough.jpg"></center>'
				'"Shut up and take it, slut," you tell her as you start to really hammer her ass. She tries to pull away, but you grab hold of her hips and prevent her. She leans forward till her shoulders are on the bed, changing the angle. You merely adjust by getting up on your feet and pile driving the dildo down into her ass.'
				'You can tell she is not really enjoying this as she complains, "Ow, it hurts!"'
				'You reply to her as you keep hammering her ass, "Don''t worry, you''ll get used to it. Besides, didn''t you want to walk on the wild side?" That seems to have shut her up, but you decide you don''t want to be too mean and stop. Pulling the dildo out of her ass, you hear her sigh in relief. "Very well, you can eat me now, then."'
				gs 'arousal', 'anal_strap_give', 5, 'lesbian', 'dom', 'rough'
				gs 'stat'
				act 'Make her eat you': gt 'soniadisco', 'strapon_eaten'
			end
		else
			act 'Tear her ass up (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'strapon_eaten':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/eaten1.jpg"></center>'
	'You take the harness off and put it aside, then you lie down on the bed and spread you legs. Without being told, Sonia crawls over and starts to lick at your pussy and suck on your clit. Several minutes go by, and you can feel your arousal mounting.'
	gs 'arousal', 'cuni', 5, 'lesbian'
	gs 'stat'
	act 'Just like that':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/eaten2.jpg"></center>'
		'She slips a finger into your twat and starts fingering you as she licks, kisses and sucks at your clit. You grab her by the hair and start grinding your crotch against her face, smearing it with your wetness. You want to sit on her face, so you pull her face away from your crotch by her hair. "Lie on your back," you tell her.'
		gs 'arousal', 'cuni', 5, 'lesbian'
		gs 'arousal', 'vaginal_finger', -5, 'lesbian'
		gs 'stat'
		act 'Sit on her face':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/facesit.jpg"></center>'
			'She rolls over onto her back, while you get up. You move over and straddle her face, and then sit back until your pussy makes contact with it again. You can feel her licking your pussy while sliding her tongue inside of your wet twat. You rotate your hips and grind your twat against her face, coating it more and more with your juices.'
			gs 'arousal', 'cuni', 5, 'lesbian'
			gs 'stat'
			act '69':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/69.jpg"></center>'
				'You start to feel a little tired and roll off her. "I want to lick your pussy while you lick mine," you tell her. She climbs up and straddles your face now and bends forward to go back to licking your pussy. You lick hers in return. Several minutes of this goes by until her body shudders and she has a orgasm, coating your face in her juices.'
				killvar '$orgasm_or'
				$orgasm_txt = 'As she starts to orgasm, it is too much for you, and you feel your own body shake and rock as an orgasm courses through it.'
				gs 'arousal', 'cuni', 5, 'lesbian'
				gs 'arousal', 'cuni_give', -5, 'lesbian'
				gs 'stat'
				act 'Afterglow':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/afterglow.jpg"></center>'
					'She rolls off you, and the two of you lie side by side for several minutes, panting and recovering from the sex you just had. As you start to get up to get dressed, she pulls you over, and the two you share a long, slow, passionate kiss for several minutes before you break apart, sitting up together.'
					gs 'arousal', 'foreplay', 5, 'lesbian'
					gs 'arousal', 'end'
					gs 'stat'
					act 'Get dressed':
						*clr & cla
						minut += 5
						soniasex = 1
						gs 'stat'
						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/home/bedroom/strapon/selfie.jpg"></center>'
						'Once you are both sitting, Sonia grabs her phone and takes a selfie of the two of you, your faces still glistening with each other''s pussy juices. The two of you get dressed again. "Did you have fun?" you ask her.'
						*nl
						if strapanal = 1:
							'She grins. "I feel amazing! That was great, I loved it." Then she blushes a bit as she realizes how much she is gushing about how much she enjoyed it.'
							'You smile at her. "Even having your butt fucked?" you ask.'
							'She blushes deeply and nods. "Yeah, I even liked that. Even if my ass hurts a little, I still had fun."'
							'You give her a quick kiss. "I had fun too, but I should get going. It''s late."'
						elseif strapanal = 2:
							'She grins. "I feel amazing! That was great, I loved it." Then she blushes a bit as she realizes how much she is gushing about how much she enjoyed it.'
							'You smile to her. "Even having your butt fucked?" you ask.'
							'She blushes, and purses her lips like maybe it wasn''t amazing. "Yeah, even that at first. It hurt a little but then started to feel good, until you got rougher. My ass feels like it''s on fire now," she says a little sourly.'
							'You give her a quick kiss. "I''m sorry, I just got carried away. But as you get used to it, it won''t hurt anymore and just feel good," you assure her.'
							'She gives a slightly dubious look. She obviously isn''t convinced but isn''t willing to argue, so she just settles on a nod. You give her another kiss. "Trust me, but I need to get going. It''s late."'
						else
							'She grins. "I feel amazing! That was great, I loved it." Then she blushes a bit as she realizes how much she is gushing about how much she enjoyed it.'
							'You give her a quick kiss. "I had fun too, but I should get going. It''s late."'
						end
						*nl
						'Once you are both dressed and cleaned up, she walks you to her front door. "Night, <<$pcs_nickname>>."'
						'You tell her, "Night." Then you walk out. She closes the door behind you, and you hear it lock. You turn and walk to the street.'
						killvar 'strapanal'
						act 'Leave': gt 'pav_residential'
					end
				end
			end
		end
	end
end

--- soniadisco ---------------------------------