glife/locations/soniadisco.qsrc

# soniadisco
!2021/22/12
!!I changed Sonia fall to this so their is a total of 7 events so Sonia slowly falls. moved the automatic fall code here from cikl.

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 soniaQW['slut'] = 0 and month > 9 and daystart >= soniaQW['fallday'] + 6:
		if soniaQW['soniafall'] < 7:
			soniaQW['fallday'] = daystart -1
			soniaQW['soniafall'] += 1
		else
			soniaQW['slut'] = 1
			soniaQW['slutdays'] = 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 soniaQW['soniafall']
if $ARGS[0] = 'start':
	if daystart >= soniaQW['fallday'] + 6:
		soniaQW['fallday'] = daystart
		if soniaQW['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 soniaQW['soniafall'] = 0: soniaQW['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 soniaQW['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
	soniaQW['soniafall'] += 1
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/0.jpg"></center>'
	if soniaQW['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 soniaQW['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 soniaQW['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 soniaQW['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 soniaQW['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 soniaQW['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 soniaQW['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 soniaQW['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':
			soniaQW['help'] += 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 soniaQW['soniafall'] <= 6:act 'Encourage her': gt 'soniadisco', 'soniadrinkmore'
	end
end

if $ARGS[0] = 'soniadrinkmore':
	*clr & cla
	soniaQW['soniafall'] += 1
	soniaQW['encourage'] += 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 soniaQW['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 soniaQW['soniafall'] = 3:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/panties1.jpg"></center>'
	elseif soniaQW['soniafall'] = 4:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/boobs.jpg"></center>'
	elseif soniaQW['soniafall'] = 5:
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/disco/pussy.jpg"></center>'
	elseif soniaQW['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 soniaQW['help'] > 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 soniaQW['soniafall'] <= 2:
		gs 'soniadisco', 'notpressured'
	elseif soniaQW['soniafall'] = 3:
		gs 'soniadisco', 'pressuredforpanties'
	elseif soniaQW['soniafall'] = 4:
		gs 'soniadisco', 'pressuredfortits'
	elseif soniaQW['soniafall'] = 5:
		gs 'soniadisco', 'pressuredforpussy'
	elseif soniaQW['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':
	'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 pcs_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 soniaQW['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 soniaQW['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 pcs_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 soniaQW['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 pcs_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 soniaQW['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 who 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':
				soniaQW['vitek_bj_watched'] = 1
				*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 pcs_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':
								*clr & cla
								'<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 pcs_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 'soniaev1', '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
	soniaQW['slut'] = 1
	soniaQW['fallenangel'] = 1
	soniaQW['slutdays'] = 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 disco 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
		soniaQW['help'] += 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 soniaQW['help'] > soniaQW['encourage']:
			'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 soniaQW['encourage'] > 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 soniaQW['encourage'] > 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 soniaQW['help'] > soniaQW['encourage'] or soniaQW['encourage'] = 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 soniaQW['help'] > 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 soniaQW['help'] > soniaQW['encourage']:
				'"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 soniaQW['encourage'] > 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 soniaQW['encourage'] > 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


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