glife/sugarcube/src/autogenerated/Katja Meynold/katja_party.tw

:: katja_party
<<set $here = 'katja_party'>>
<<set $ARGS = $location_var[$here]>>
<!-- !2022/04/07-->
<!-- !!This files governs Katja''s interactions in her dorm room when you are preparing to go out to a party. For the variable controlling her content see the documentation in katja_procedural-->
<<if $location_var[$here][0] == 'going_out_talk'>>
	<<set $menu_off = 1>>
	<<set $time.minutes += 5>>
	<<if $time.hour < 19>>
		<!-- !! Katja goes out eating Saturday. (The dinner out event is not written yet, when it is the 2 below should be changed to a 1)-->
		<<setinit $katjaQW['party_location'] = 2>>
	<<else>>
		<<setinit $katjaQW['party_location'] = 2>>
	<</if>>
	<<set '"OK, enough just sitting around here at home. I want to go out ' + iif(katjaQW['party_location'] = 1, 'for dinner', 'partying') + ' tonight!" Katja says.'>>
	She starts to change before you even have a chance to say anything, rummaging around in her wardrobe.
	<<if getvar("$katjaQW['party_location']") > 1>>
		<p>"Where do you want to go partying?" you inquire.</p>
		<<set  + iif(katjaQW['party_location'] = 2, 'The nightclub, downtown. It is a great place to dance,', '"Just to a party at one of the dorms,') + ' but it's not just me, it's us. You have to come with me," she says.'>>
	<<else>>
		<p>"Where do you want to have dinner?" you inquire.</p>
		<p>"There's this small restaurant I have heard a lot about, but never tried before. Wanna try it with me?" she asks.</p>
	<</if>>
	<<actCLA 'Agree to go with Katja'>>
		$time.minutes + 5
		<<if getvar("$katjaQW['party_location']") == 1>>
			<<setinit $locat['katja'] = 36>>
		<<elseif getvar("$katjaQW['party_location']") == 2>>
			<<setinit $locat['katja'] = 53>>
		<</if>>
		<<setinit $locat['katja_rand2'] = $time.daystart>>
		<<setinit $locat['katja_save2'] = $locat['katja']>>
		<<relationship 'A14' 'like'>>
		"Sounds very fun. Of course, I'm coming with you," you say.
		"Yeah, we're going to have so much fun," Katja says and gives you a quick hug before she returns to getting dressed.
		She finishes getting her dress on in no time and turns to you.
		<<act 'Prepare for the night out'>>
			<<gt 'katja_party' 'party_preparations'>>
		<</act>>
	<</actCLA>>
	<<actCLA 'Tell her to have fun tonight and leave her room'>>
		<<set $time.minutes += 2>>
		<<if getvar("$katjaQW['party_location']") == 1>>
			<<setinit $locat['katja'] = 36>>
		<<elseif getvar("$katjaQW['party_location']") == 2>>
			<<setinit $locat['katja'] = 53>>
		<</if>>
		<<setinit $locat['katja_rand2'] = $time.daystart>>
		<<setinit $locat['katja_save2'] = $locat['katja']>>
		<<relationship 'A14' 'dislike'>>
		<<gt 'uni_dorm' 'second_floor'>>
	<</actCLA>>
	<<if getvar("$katjaQW['party_location']") > 1>>
		<<actCLA 'Tell her you would rather stay here and watch a movie'>>
			<p>"Why don't we stay here and watch a movie instead?" you ask.</p>
			"I don't know. I really want to go out and party tonight," Katja answers.
			<<if $npc('A14').sex >= 1>>
				<<gs 'willpower' 'misc' 'force' 'easy'>>
			<<elseif getvar("$katjaQW['slut']") < 50>>
				<<gs 'willpower' 'misc' 'force' 'hard'>>
			<<else>>
				<<gs 'willpower' 'misc' 'force'>>
			<</if>>
			<<if $will_cost <= $pc.willpower>>
				<<actCLA 'Convince Katja to stay and watch a movie (will_cost Willpower)'>>
					<<set $menu_off = 1>>
					<<gs 'willpower' 'pay' 'force'>>
					<<setinit $locat['katja'] = 52>>
					<<setinit $locat['katja_rand2'] = $time.daystart>>
					<<setinit $locat['katja_save2'] = $locat['katja']>>
					<<setinit $katjaQw['dom'] -= rand(1,2)>>
					<<set $time.minutes += 10>>
					<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised2.jpg">>
					"But I want to have fun, just the two of us, instead of hanging out with a bunch of strangers. You can always party another night," you say.
					"But the party tonight should be so fun. It's not like there are good parties like this every night," Katja answers.
					<p>"How do you know it's going to be fun? I'm sure it will be boring. Please, stay with me?" you plead, trying to make puppy eyes at Katja, who has a hard time not laughing.</p>
					"OK, I'll stay tonight," she finally relents. "Go make some popcorn while I set up my laptop."
					You go to the kitchen and prepare the popcorn before you both settle down on her bed and watch the film Katja has selected.
					<<act 'Watch the movie'>>
						<<gt 'katja_dorm' 'watch_movie'>>
					<</act>>
				<</actCLA>>
			<<else>>
				<<actCLA `'Convince Katja to stay and watch a movie ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
			<</if>>
			<<actCLA 'Relent and go with Katja'>>
				<<if getvar("$katjaQW['party_location']") == 2>>
					<<setinit $locat['katja'] = 53>>
				<</if>>
				<<setinit $locat['katja_rand2'] = $time.daystart>>
				<<setinit $locat['katja_save2'] = $locat['katja']>>
				<<setinit $katjaQW['dom'] += rand(2,3)>>
				<<relationship 'A14' 'like'>>
				"OK, you win. I'll go partying with you," you say.
				"Yeah, we're going to have so much fun," Katja says and gives you a quick hug.
				She finishes getting her dress on in no time and turns to you.
				<<act 'Prepare for the night out'>>
					<<gt 'katja_party' 'party_preparations'>>
				<</act>>
			<</actCLA>>
			<<actCLA 'Tell her to have fun tonight and leave her room'>>
				<<set $time.minutes += 2>>
				<<if getvar("$katjaQW['party_location']") == 2>>
					<<setinit $locat['katja'] = 53>>
				<</if>>
				<<setinit $katjaQW['dom'] += rand(0,1)>>
				<<setinit $locat['katja_rand2'] = $time.daystart>>
				<<setinit $locat['katja_save2'] = $locat['katja']>>
				<<relationship 'A14' 'dislike'>>
				<<gt 'uni_dorm' 'second_floor'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'going_out'>>
	<<set $menu_off = 1>>
	<<set $time.minutes += 5>>
	<<if $time.hour < 19>>
		<!-- !! Katja goes out eating Saturday. (The dinner out event is not written yet, when it is the 2 below should be changed to a 1)-->
		<<setinit $katjaQW['party_location'] = 2>>
	<<else>>
		<<setinit $katjaQW['party_location'] = 2>>
	<</if>>
	<<if $npc('A14').sex > 0 and (getvar("$katjaQW['slut']") > 75 or getvar("$katjaQW['pantiesQWstage']") >= 5)>>
		<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised1.jpg">>
		<p>Katja has her back to you, half-dressed, seemingly in the process of putting on a dress. "Hey, Katja. What are doing?" you ask.</p>
		<<set 'She turns around with her dress just hanging around her waist of her otherwise naked body. "I'm getting dressed to go ' + iif(katjaQW['party_location'] = 1, 'out to have dinner', ' to a party') + '," Katja says, seemingly not bothered by being topless.'>>
	<<else>>
		<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised2.jpg">>
		<p>Katja has her back to you, half-dressed, seemingly in the process of putting on a dress. "Hey, Katja. What are doing?" you ask.</p>
		<<set 'She makes a small jump and pulls up her dress before turning around. "I'm getting dressed to go ' + iif(katjaQW['party_location'] = 1, 'out to have dinner', ' to a party') + '," Katja says, smiling.'>>
	<</if>>
	<<if getvar("$katjaQW['party_location']") > 1>>
		<p>"Where's the party?" you inquire.</p>
		<<set  + iif(katjaQW['party_location'] = 2, '"At the nightclub, downtown. It's a great place to dance.', 'At one of the dorms.') + ' Wanna join me?" she says.'>>
	<<else>>
		<p>"Where are you going to have dinner?" you inquire.</p>
		<p>"There's this small restaurant I have heard a lot about, but never tried before. Wanna try it with me?" she asks.</p>
	<</if>>
	<<actCLA 'Agree to go with Katja'>>
		<<if getvar("$katjaQW['party_location']") == 1>>
			<<setinit $locat['katja'] = 36>>
		<<elseif getvar("$katjaQW['party_location']") == 2>>
			<<setinit $locat['katja'] = 53>>
		<</if>>
		<<setinit $locat['katja_rand2'] = $time.daystart>>
		<<setinit $locat['katja_save2'] = $locat['katja']>>
		<<relationship 'A14' 'like'>>
		"Sounds very fun. Of course, I'll come," you say.
		<!-- FAILED TO CONVERT
			'"Yeah, we''re going to have so much fun," Katja says and gives you a '+iif(npc_sex['A14'] > 0 and (katjaQW['slut'] > 75 or katjaQW['pantiesQWstage'] >= 5),'huge hug, pressing her naked breasts into your chest.' , 'quick hug.')
		-----
			<<set '"Yeah, we're going to have so much fun," Katja says and gives you a ' + ERROR: FAILED TO CONVERT LITERAL: """iif(npc_sex['A14'] > 0 and (katjaQW['slut'] > 75 or katjaQW['pantiesQWstage'] >""" = 5),'huge hug, pressing her naked breasts into your chest.' , 'quick hug.')>>

		-->
		<<warn "CONVERSION ERROR e51202108fec49cea452998437ab7cd4">>
		<<act 'Prepare for a night out'>>
			<<gt 'katja_party' 'party_preparations'>>
		<</act>>
	<</actCLA>>
	<<actCLA 'Tell her to have fun tonight and leave her room'>>
		<<set $time.minutes += 2>>
		<<if getvar("$katjaQW['party_location']") == 1>>
			<<setinit $locat['katja'] = 36>>
		<<elseif getvar("$katjaQW['party_location']") == 2>>
			<<setinit $locat['katja'] = 53>>
		<</if>>
		<<setinit $locat['katja_rand2'] = $time.daystart>>
		<<setinit $locat['katja_save2'] = $locat['katja']>>
		<<relationship 'A14' 'dislike'>>
		<<gt 'uni_dorm' 'second_floor'>>
	<</actCLA>>
	<<if getvar("$katjaQW['party_location']") > 1>>
		<<actCLA 'Tell her you would rather stay here and watch a movie'>>
			<p>"Why don't we stay in and watch a movie instead?" you ask.</p>
			"I don't know. I really want to go out and party tonight," Katja answers.
			<<if $npc('A14').sex >= 1>>
				<<gs 'willpower' 'misc' 'force' 'easy'>>
			<<elseif getvar("$katjaQW['slut']") < 50>>
				<<gs 'willpower' 'misc' 'force' 'hard'>>
			<<else>>
				<<gs 'willpower' 'misc' 'force'>>
			<</if>>
			<<if $will_cost <= $pc.willpower>>
				<<actCLA 'Convince Katja to stay and watch a movie (will_cost Willpower)'>>
					<<set $menu_off = 1>>
					<<gs 'willpower' 'pay' 'force'>>
					<<setinit $locat['katja'] = 52>>
					<<setinit $locat['katja_rand2'] = $time.daystart>>
					<<setinit $locat['katja_save2'] = $locat['katja']>>
					<<setinit $katjaQw['dom'] -= rand(1,2)>>
					<<set $time.minutes += 10>>
					<<if $npc('A14').sex > 0 and (getvar("$katjaQW['slut']") > 75 or getvar("$katjaQW['pantiesQWstage']") >= 5)>>
						<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised1.jpg">>
					<<else>>
						<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised2.jpg">>
					<</if>>
					"But I want to have fun, just the two of us, instead of hanging out with a bunch of strangers. You can always party another night," you say.
					"But the party tonight should be so fun. It's not like there are good parties like this every night," Katja answers.
					<p>"How do you know it's going to be fun? I'm sure it will be boring. Please, stay with me?" you plead, trying to make puppy eyes at Katja, who has a hard time not laughing.</p>
					"Okay, I'll stay tonight," she finally relents. "Go prepare some popcorn while I set up my laptop."
					You go to the kitchen and make the popcorn before you both settle down on her bed and watch the film Katja has selected.
					<<act 'Watch the movie'>>
						<<gt 'katja_dorm' 'watch_movie'>>
					<</act>>
				<</actCLA>>
			<<else>>
				<<actCLA `'Convince Katja to stay and watch a movie ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
			<</if>>
			<<actCLA 'Relent and go with Katja'>>
				<<if getvar("$katjaQW['party_location']") == 2>>
					<<setinit $locat['katja'] = 53>>
				<</if>>
				<<setinit $locat['katja_rand2'] = $time.daystart>>
				<<setinit $locat['katja_save2'] = $locat['katja']>>
				<<setinit $katjaQW['dom'] += rand(2,3)>>
				<<relationship 'A14' 'like'>>
				"OK, you win. I'll go partying with you" you say.
				<!-- FAILED TO CONVERT
					'"Yeah, we''re going to have so much fun," Katja says and gives you a '+iif(npc_sex['A14'] > 0 and (katjaQW['slut'] > 75 or katjaQW['pantiesQWstage'] >= 5),'huge hug, pressing her naked breasts into your chest.' , 'quick hug.')
				-----
					<<set '"Yeah, we're going to have so much fun," Katja says and gives you a ' + ERROR: FAILED TO CONVERT LITERAL: """iif(npc_sex['A14'] > 0 and (katjaQW['slut'] > 75 or katjaQW['pantiesQWstage'] >""" = 5),'huge hug, pressing her naked breasts into your chest.' , 'quick hug.')>>

				-->
				<<warn "CONVERSION ERROR e51202108fec49cea452998437ab7cd4">>
				<<act 'Prepare for the night out'>>
					<<gt 'katja_party' 'party_preparations'>>
				<</act>>
			<</actCLA>>
			<<actCLA 'Tell her to have fun tonight and leave her room'>>
				<<set $time.minutes += 2>>
				<<if getvar("$katjaQW['party_location']") == 2>>
					<<setinit $locat['katja'] = 53>>
				<</if>>
				<<setinit $katjaQW['dom'] += rand(0,1)>>
				<<setinit $locat['katja_rand2'] = $time.daystart>>
				<<setinit $locat['katja_save2'] = $locat['katja']>>
				<<relationship 'A14' 'dislike'>>
				<<gt 'uni_dorm' 'second_floor'>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'party_preparations'>>
	<<set $menu_off = 1>>
	<<set $time.minutes += 5>>
	<<if getvar("$katjaQW['party_location']") == 2>>
		<<setinit $locat['katja'] = 53>>
	<</if>>
	<<setinit $locat['katja_rand2'] = $time.daystart>>
	<<setinit $locat['katja_save2'] = $locat['katja']>>
	<center><<image `'images/characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised'+iif(npc_sex['A14'] > 0 and (katjaQW['slut'] > 75 or katjaQW['pantiesQWstage'] >= 5), '1', '2')+'.jpg'`>></center>
	"I need to finish prepping. I still need to do my makeup," Katja says as she starts moving around.
	"Let me see how you look," Katja says, stopping and turning around to look at you.
	<<gs 'katja_party' 'part_dress_check'>>
<</if>>
<<if $location_var[$here][0] == 'party_look_approval'>>
	<<set $menu_off = 1>>
	<<set $time.minutes += 5>>
	<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised2.jpg">>
	You show yourself to Katja again. "OK. Let''s see how you look now," she says and takes a good look at you.
	<<gs 'katja_party' 'part_dress_check'>>
<</if>>
<<if $location_var[$here][0] == 'part_dress_check'>>
	<<set $loc = 'katja_party'>>
	<<set $loc_arg = 'party_look_approval'>>
	<<if getvar("$katjaQW['party_location']") == 2>>
		<<if $pc.pcs_sweat >= 50>>
			<p>Katja just whiffs her nose. "You need to shower first," she says. "You can use the shower on our floor. Here is a towel and some supplies," Katja adds, handing you a towel and a not-so-small bag of shower utilities.</p>
			<<actCLA 'Go take a shower'>>
				$noShampoo
				<<gs 'cleanBody'>>
				<<set $time.minutes += 10>>
				<<video "shared/home/bathroom/dush.mp4">>
				You go out of Katja''s room and find the shower. There are plenty available, and you make sure to clean yourself thoroughly since Katja seems to have an excellent nose for sweat.
				<<if $inventory.get("deo") > 0>>
					<<actCLA 'Add deodorant and go back to Katja'>>
						<<run $inventory.dec('deo',1)>>
						<<gs 'sweat' 'deo'>>
						<<gt 'katja_party' 'party_look_approval'>>
					<</actCLA>>
				<</if>>
				<<act 'Go back to Katja'>>
					<<gt 'katja_party' 'party_look_approval'>>
				<</act>>
			<</actCLA>>
		<<elseif $wardrobe.PCloSkirt <= 2 and $wardrobe.PCloPants <= 4 and $wardrobe.PCloPanties != 1 and ($wardrobe.clothingworntype != 'salacious_dress' and $wardrobe.clothingworntype != 'salacious_outfits') and $katjaQW['changed_for_katja'] < $time.daystart>>
			<<setinit $katjaQW['changed_for_katja'] = $time.daystart>>
			"I'm sorry, but they have a dress code at the night club. So you need to wear a skirt or dress. Maybe some very short shorts or other extremely provocative outfit will also get you in,"  Katja says.
			<<actCLA 'Get changed'>>
				<<set $time.minutes += 10>>
				<<gt 'wardrobe' 'start'>>
			<</actCLA>>
		<<elseif $wardrobe.PCloSkirt <= 2 and $wardrobe.PCloPants <= 4 and $wardrobe.PCloPanties != 1 and ($wardrobe.clothingworntype != 'salacious_dress' and $wardrobe.clothingworntype != 'salacious_outfits')>>
			<p>"Still not good enough! Find something else, or we won't be allowed in!" Katja says, seemingly a little disappointed in your inability to pick a proper dress.</p>
			<<actCLA 'Get changed again'>>
				<<set $time.minutes += 10>>
				<<gt 'wardrobe' 'start'>>
			<</actCLA>>
			<<actCLA 'Tell her that you don't own anything up to the club's standards'>>
				<<set $time.minutes += 10>>
				<<if getvar("$katjaQW['dress_borrowed']") == 1>>
					<p>"Don't you still have the dress I loaned you last time?" Katja asks.</p>
					<p>"That's right! I'll go get that," you answer and run out of the room to get Katja's dress.</p>
				<<else>>
					<<setinit $katjaQW['dress_borrowed'] = 1>>
					"Just a moment," Katja says and runs to her wardrobe and starts rummaging through it. A short while later, she pulls out a dress. "Here, this should fit you. You can borrow it for tonight," she says as she hands you a pretty nice dress.
				<</if>>
				<<actCLA 'Wear Katja`s dress'>>
					<<run $wardrobe.wear_clothes_legacy('clothes','fashionista',196)>>
					<<gt 'katja_party' 'party_look_approval'>>
				<</actCLA>>
			<</actCLA>>
		<<elseif ($wardrobe.PCloQuality < 5 or $wardrobe.PCloBimbo == 1) and $katjaQW['recjected_katja_demand_for_better_clothes'] < $time.daystart>>
			<p>"OK. They'll let you in the club, but don't you have something that is a little nicer?" Katja says, trying to be as polite as possible.</p>
			<<actCLA 'Get changed again'>>
				<<setinit $katjaQW['dom'] += rand(1,3)>>
				<<set $time.minutes += 10>>
				<<gt 'wardrobe' 'start'>>
			<</actCLA>>
			<<actCLA 'Tell her that you think this looks good'>>
				<<setinit $katjaQW['recjected_katja_demand_for_better_clothes'] = $time.daystart>>
				<<setinit $katjaQW['dom'] -= rand(2,4)>>
				"Well. I like this dress very much," you tell Katja, who becomes very red in her face.
				<p>"Y-yes, of course. It's very nice. I don't know what I was thinking. Something must be in my eye so I did not get a proper look," she says quickly, clearly embarrassed and afraid she offended you.</p>
				<<act 'Continue'>>
					<<gt 'katja_party' 'party_look_approval'>>
				<</act>>
			<</actCLA>>
		<<elseif $pc.pcs_makeup < 2>>
			<p>"Lastly, we need to fix your makeup. Let me do it," Katja says before taking out her makeup kit, clearly not allowing you to deny her the fun of dolling you up. "How would you like you make up?" she asks.</p>
			<<set $pc.pcs_hairbsh = 1>>
			<<set $time.minutes += 10>>
			<<actCLA 'Light touch-up'>>
				<<set $pc.pcs_makeup = 2>>
				Katja subtly applies some neutral tones, with a light application of makeup to bring out your natural beauty.
				<<if getvar("$katjaQW['QWstage']") > 2>>
					<<setinit $katjaQW['horny'] += 5 * (1 + $npc('A14').sex)>> 

				<</if>>
				<<act 'Thank Katja for the makeup'>>
					<<gt 'katja_party' 'party_look_approval'>>
				<</act>>
			<</actCLA>>
			<<actCLA 'Normal make-up'>>
				<<set $pc.pcs_makeup = 3>>
				Katja applies some mildly vibrate tones and colors of makeup to cover your minor imperfections and enhance your best features.
				<<if getvar("$katjaQW['QWstage']") > 2>>
					<<setinit $katjaQW['horny'] += 5 * (1 + $npc('A14').sex)>> 

				<</if>>
				<<act 'Thank Katja for the makeup'>>
					<<gt 'katja_party' 'party_look_approval'>>
				<</act>>
			<</actCLA>>
			<<actCLA 'Heavy make-up'>>
				<<set $pc.pcs_makeup = 4>>
				Katja applies some deeper, richer shades of makeup that are thick enough to cover most imperfections while drawing attention to your eyes and lips.
				<<if getvar("$katjaQW['QWstage']") > 2>>
					<<setinit $katjaQW['horny'] += 5 * (1 + $npc('A14').sex)>> 

				<</if>>
				<<act 'Thank Katja for the makeup'>>
					<<gt 'katja_party' 'party_look_approval'>>
				<</act>>
			<</actCLA>>
		<<else>>
			<p>"You look '+iif(PCLoQuality > 4, 'perfect', 'good')+'," Katja says.</p>
			"OK, enough about me. Show me how you look," you ask Katja.
			<<act 'Katja shows off her look'>>
				<<gt 'katja_party' 'party_preparations_final'>>
			<</act>>
		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'party_preparations_final'>>
	<<set $loc_arg = 'start'>>
	<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_show_of_front_descent.jpg">>
	Katja stands straight up, showing off her elegant blue dress, with a rather short hemline and an ample amount of cleavage, showing a lot of skin.
	<p>"What do you think, $pc.name_nick?" she asks.</p>
	"I don't know. Show me some more," you say with a wink.
	<<actCLA 'Continue the show'>>
		<<if $npc('A14').sex > 0 and rand(0,1) == 0 and (getvar("$katjaQW['slut']") > 99 or getvar("$katjaQW['pantiesQWstage']") > 4)>>
			<<setinit $katjaQW['horny'] += rand(5,10)>>
			<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_show_of_front_lewd.jpg">>
			<p>Katja lifts her left leg and puts her foot on the chair, letting her dress crawl up so it would give a nice view of her panties - if she were wearing any. Instead, you get a view of her smoothly shaved pussy lips.</p>
			<p>"What about this?" Katja asks.</p>
			<<set '"Nice, very nice. So you aren't wearing panties to the ' + iif(locat['katja'] = 53, 'club', 'party') + ' tonight?" you ask.'>>
			"I'm not wearing panties right now. Whether I will wear some later is for you to find out," she answers.
			"But enough of this. I need to use the bathroom before we leave. Wait for me here," she says and takes her purse before heading out.
			<<act 'Wait for Katja'>>
				<<gt 'katja_party' 'party_heading_out'>>
			<</act>>
		<<else>>
			<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_show_of_side_descent.jpg">>
			Katja lifts her right leg and puts her foot on the chair, turning her side towards you. Her dress crawls up and barely leaves anything to the imagination.
			<p>"What about this?" Katja asks.</p>
			"Very nice. You will definitely be turning heads tonight."
			<<actCLA 'Ask her to show some more'>>
				<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_show_of_side_lewd..jpg">>
				<p>"You naughty girl," Katja says, but lifts up her skirt and reveals her smoothly shaven pussy. "Is this good enough for you?" she asks.</p>
				<<set '"Perfect. So you're not wearing panties to the ' + iif(locat['katja'] = 53, 'club', 'party') + ' tonight?" you ask.'>>
				<<if getvar("$katjaQW['pantiesQWstage']") >= 5 or (katjaQW['slut'] >= 100 and rand(0,1) == 0)>>
					"I'm not wearing panties right now. Whether I will wear some later is for you to find out," she answers.
				<<else>>
					"No, of course I will wear panties. In fact I'll put them on right now," Katja says, grabbing a thong and putting it on.
				<</if>>
				"But enough of this. I need to use the bathroom before we leave. Wait for me here," she says and takes her purse before heading out.
				<<act 'Wait for Katja'>>
					<<gt 'katja_party' 'party_heading_out'>>
				<</act>>
			<</actCLA>>
			<<actCLA 'Get ready to head out'>>
				<<set '"We're going to be the stars of the ' + iif(locat['katja'] = 53, 'club', 'party') + ' tonight," Katja says.'>>
				"Yes, we are," you reply.
				"But enough of this. I need to use the bathroom before we leave. Wait for me here," she says and takes her purse before heading out.
				<<act 'Wait for Katja'>>
					<<gt 'katja_party' 'party_heading_out'>>
				<</act>>
			<</actCLA>>
		<</if>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'party_heading_out'>>
	<<set $menu_off = 1>>
	<<set $time.minutes += 5>>
	<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised2.jpg">>
	After a few minutes, Katja comes back from the bathroom.
	<<if $katjaQW['coke_stage'] >= rand(5,7) and $katjaQW['coke_day'] != $time.daystart>>
		<p>Katja goes to a drawer and pulls out a small bag with white powder. "Look what I have here. Why don't we start the party with a little coke first?" she asks.</p>
		<<actCLA 'Say no to the drugs' undefined `{willpower:['drugs','resist']}`>>
				<<set $time.minutes += 2>>
				
				"I don't think it's a good idea. I think it's better to have a clear head tonight," you say.
				"You're boring," Katja says "Maybe we'll meet somebody tonight that is more fun. Let''s go."
				<<actCLA 'Go to the metro'>>
					<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
				<</actCLA>>
			<</actCLA>>
		
		<<actCLA 'Do some lines with Katja'>>
			<<set $time.minutes += 8>>
			<<set $dur += 1>>
			<<gs 'drugs' 'cocaine'>>
			<<gs 'katja_procedural' 'take_cocaine'>>
			<<image "characters/pavlovsk/school/girl/katja/uni/dorm/joint_cocaine.jpg">>
			"OK, Katja. Let''s do it together," you say.
			"Yes. That''s the spirit," she replies. She then prepares some lines for the two of you and finds some tubes to use to snort the cocaine.
			You both put your tubes to your nostrils and lower your heads to the table and snort your lines.
			After a moment, it hits you both. You feel wonderful while Katja just sits there with wide open eyes. She starts giggling, which turns into a laugh that lasts for some time.
			After a few minutes more, you're ready to leave.
			<<actCLA 'Go to the metro'>>
				<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
			<</actCLA>>
		<</actCLA>>
	<<elseif $katjaQW['coke_stage'] >= rand(4,7) and $katjaQW['coke_day'] != $time.daystart>>
		<<set '"You know, $pc.name_nick. We sometimes take some cocaine when we are partying. If you have any, then maybe we could take some now?" Katja asks, looking at you ' + iif(katjaQW['coke_stage'] = 4, 'nervously.', 'with pleading eyes.')>>
		<<if getvar("$dur") >= 2>>
			<<gs 'willpower' 'drugs' 'resist'>>
			<<if $will_cost <= $pc.willpower>>
				<<actCLA 'Tell Katja that you don`t want to take drugs right now (will_cost Willpower)'>>
					<<set $time.minutes += 2>>
					<<gs 'willpower' 'pay' 'resist'>>
					"I don't think it's a good idea. I think it's better to have a clear head tonight," you say.
					"You're boring," Katja says. "Maybe we'll meet somebody tonight that''s more fun. Let''s go."
					<<actCLA 'Go to the metro'>>
						<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
					<</actCLA>>
				<</actCLA>>
			<<else>>
				<<actCLA `'Tell Katja that you don""t want to take drugs right now ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
			<</if>>
			<<actCLA 'Do some lines with Katja'>>
				<<set $time.minutes += 8>>
				<<set $dur -= 1>>
				<<gs 'drugs' 'cocaine'>>
				<<gs 'katja_procedural' 'take_cocaine'>>
				<<image "characters/pavlovsk/school/girl/katja/uni/dorm/joint_cocaine.jpg">>
				"I do have enough for the two of us. So let''s have some fun before we leave," you say.
				"Yes. That''s the spirit," she replies. You then prepare some lines for the two of you and find some tubes to use to snort the cocaine.
				You both put your tubes to your nostrils and lower your heads to the table and snort your lines.
				After a moment, it hits you both. You feel wonderful while Katja just sits there with wide open eyes. She starts giggling, which turns into a laugh that lasts for some time.
				After a few minutes more, you're ready to leave.
				<<actCLA 'Go to the metro'>>
					<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
				<</actCLA>>
			<</actCLA>>
		<<else>>
			<<set '"I don't have ' + iif(dur = 1, 'enough for both of us', 'any') + '," you say.'>>
			"No problem. Maybe we'll meet somebody that does," Katja says. "Let''s go."
			<<actCLA 'Go to the metro'>>
				<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
			<</actCLA>>
		<</if>>
	<<else>>
		<<if getvar("$dur") >= 2 and getvar("$katjaQW['coke_stage']") >= 0>>
			<<actCLA 'Suggest you do a couple of lines of cocaine before you go'>>
				<<if getvar("$katjaQW['coke_stage']") == 0>>
					<<if getvar("$cocaine_count") == 0>>
						<p>"You know, Katja. I've got some cocaine, and I wanted to try it. Why don't we try it together?" you ask.</p>
						<p>"You want us to do drugs?!" Katja exclaims, clearly shocked at your proposal "What has gotten into you. We can't do that!" she continues.</p>
						<<if setup.func('katja_procedural', 'willing_to_be_naughty') < 100>>
							<<gs 'willpower' 'drugs' 'force' 'hard'>>
						<<else>>
							<<gs 'willpower' 'drugs' 'force'>>
						<</if>>
						<<if $will_cost <= $pc.willpower>>
							<<actCLA 'Convince Katja to try cocaine (will_cost Willpower)'>>
								<<set $time.minutes += 4>>
								<<gs 'willpower' 'pay' 'force'>>
								<<image "characters/pavlovsk/school/girl/katja/uni/dorm/dressing_up_surprised2.jpg">>
								"Come on, Katja. Don't be so uptight. Everybody does it," you say.
								"But it's dangerous. We have no idea what we're doing," Katja counters.
								"I know what I'm doing. Trust me, you won''t be in danger. Let''s just try it, it'll be fine," you say.
								<p>"But look at all the people that get in trouble because of drugs!" Katja continues.</p>
								<p>"Come on, Katja. You don't become an addict by just trying it once. I thought you were smart. Let's just try it once; if we feel bad, we'll never do it again," you say.</p>
								"I don't know. I'm still not sure it's something we should do," Katja says.
								<p>"Come on! Just once. Please?" you plead as you try to make your best puppy eyes.</p>
								"OK... Just once," Katja fianlly relents.
								<p>"I knew I could count on you!" you say.</p>
								<<actCLA 'Take the drugs'>>
									<<set $time.minutes += 8>>
									<<gs 'katja_procedural' 'take_cocaine'>>
									<<set $dur -= 1>>
									<<gs 'drugs' 'cocaine'>>
									<<image "characters/pavlovsk/school/girl/katja/uni/dorm/joint_coke.jpg">>
									You clear the table and make some lines of cocaine like you were instructed to. You find some tubes for you and Katja to use and explain to her how to do it.
									With a shaking hand, Katja takes the tube and places it at her nostril. As you bend down to the line of cocaine that you prepared, she slowly follows.
									<p>You both slowly start snorting it. Katja jerks her head back when the powder starts to irritate her nose, which also makes you stop. "Do it, faster. All at once!" you tell her, and she gets down again, still shaking and gets ready.</p>
									<p>This times she follows you and you snort it all in one go, and raise your head from the table. The powder irritates your nostrils and it's obvious that Katja feels the same, as she looks like she is about to sneeze. "Don't sneeze! Keep it in!" you tell her, and Katja moves her hand to her nose to prevent it from coming out.</p>
									<p>After a moment, her discomfort resides and she starts to talk. "I don't feel anything, except itching in my nose. I do-" Then it hits her, she stops mid-sentence and her eyes become wide open. "Wow!" is all she can say.</p>
									That''s also when it hits you, and everything suddenly feels great. Katja sits there with a dreamy stare, then she starts giggling, which turns into a laugh that lasts for some time.
									<p>After some minutes, you both come down. "So how was was it?" you ask.</p>
									"Well, it wasn''t so bad," she replies.
									<p>"Come on, Katja. It was great!" you say.</p>
									"Well, I'll admit it was an interesting experience. But let''s get going," Katja answers, making it clear you won''t get her to admit to more.
									<<actCLA 'Go to the metro'>>
										<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
									<</actCLA>>
								<</actCLA>>
							<</actCLA>>
						<<else>>
							<<actCLA `'Convince Katja to try cocaine ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
						<</if>>
						<<actCLA 'Drop the idea'>>
							"Yeah. It was a stupid idea. Let''s head out," you say.
							"OK, let''s go," Katja replies.
							<<actCLA 'Go to the metro'>>
								<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
							<</actCLA>>
						<</actCLA>>
					<<else>>
						"So I have this," you say, pulling out your small bag of cocaine. "I think we should try some before head out."
						<p>"What's that?" Katja asks, looking confused.</p>
						"It's coke," you tell her.
						<p>"What?! You do drugs?!" Katja exclaims, shocked.</p>
						<p>"'+iif(cocaine_count < 5, 'I've tried it a couple of times.', 'Sure I do.')+' It's fun," you reply.</p>
						"I didn''t know that about you," Katja says, still surprised.
						<p>"Well, do you want try?" you ask.</p>
						"No way," Katja says.
						"Come on. I'll do some lines first so you can see how it's done, and then it'll be your turn," you tell her.
						"Suit yourself, but I'm not doing that," she says, defiantly.
						<<actCLA 'Do some lines'>>
							<<set $time.minutes += 5>>
							<<gs 'drugs' 'cocaine'>>
							<<image "characters/shared/drugs/cocaine.jpg">>
							You open your bag and make some lines on the table before taking a tube and snorting the first line, then the second. Katja looks at you with wide open eyes.
							<p>After a short moment, it hits you and you feel the full effect of the drug. "Damn, that was good!" you exclaim, as you come down a little.</p>
							You try to hand Katja the tube, "Your turn."
							She's still looking at you, like she doesn''t believe what just happened.
							"I don't do drugs. I've never done it before," she says, suddenly snapping out her daze.
							<<if setup.func('katja_procedural', 'willing_to_be_naughty') < 100>>
								<<gs 'willpower' 'drugs' 'force' 'hard'>>
							<<else>>
								<<gs 'willpower' 'drugs' 'force'>>
							<</if>>
							<<if $will_cost <= $pc.willpower>>
								<<actCLA 'Convince Katja to try cocaine (will_cost Willpower)'>>
									<<set $time.minutes += 8>>
									<<gs 'willpower' 'pay' 'force'>>
									<<set $dur = -1>>
									<<gs 'katja_procedural' 'take_cocaine'>>
									<<image "characters/pavlovsk/school/girl/katja/uni/nightclub/katja_cocaine2.jpg">>
									"Come on, Katja. Just try it. It won''t harm you," you say, but Katja still looks skeptical.
									<p>"I don't know, $pc.name_nick. I'm not sure it's a good idea. I don't think it's for me," she replies.</p>
									"You won''t know unless you try it. See, we are both fine," you continue.
									<p>"I'm still not sure. Why should I do it?" she asks.</p>
									"Because it feels great. You can't say it's not for you until you actually know how it feels," you say.
									"OK," Katja finally relents. With a shaky hand, she takes the tube. She then places it at her nostril and slowly bends down so the other end is at the line of cocaine that you prepared for her.
									<p>She slowly starts snorting it but jerks her head back when the powder starts to irritate her nose. "Do it, faster. All at once!" you tell her, and she gets down again, still shaking and gets ready.</p>
									<p>This time, she snorts it all in one go, and raises her head from the table. It's obvious that the powder irritates her nostrils and she looks like she is about to sneeze. "Don't sneeze! Keep it in!" you tell her, and Katja moves her hand to her nose to prevent it from coming out.</p>
									<p>After a moment, her discomfort resides and she starts to talk. "I don't feel anything, except itching in my nose. I do-" Then it hits her, she stops mid-sentence and her eyes become wide open. "Wow!" is all she can say.</p>
									<p>"See? I told you it would feel great!" you say.</p>
									Katja just replies with a dreamy stare, then she starts giggling, which turns into a laugh that lasts for some time.
									<p>After some minutes, you both come down. "So how was was it?" you ask.</p>
									"Well, it wasn''t so bad," she replies.
									<p>"Come on, Katja. It was great!" you say.</p>
									"Well, I'll admit it was an interesting experience. But let''s get going," Katja answers, making it clear you won''t get her to admit to more.
									<<actCLA 'Go to the metro'>>
										<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
									<</actCLA>>
								<</actCLA>>
							<<else>>
								<<actCLA `'Convince Katja to try cocaine ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
							<</if>>
							<<actCLA 'Don`t push Katja'>>
								<<set $time.minutes += 2>>
								"It's fine if you don't want to," you say. She seems relieved. You clean up the drugs and you head out.
								<<actCLA 'Go to the metro'>>
									<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
								<</actCLA>>
							<</actCLA>>
						<</actCLA>>
						<<actCLA 'Drop the idea' undefined `{willpower:['drugs','resist']}`>>
								<<set $time.minutes += 2>>
								
								"Well if you really don't want to, then let''s just head out," you say.
								"OK, let''s go," Katja replies.
								<<actCLA 'Go to the metro'>>
									<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
								<</actCLA>>
							<</actCLA>>
						
					<</if>>
				<<elseif getvar("$katjaQW['coke_stage']") < 3>>
					<p>"So, I have some coke - enough for both of us. Want to do some before leaving?" you ask Katja and pull out a small bag of cocaine.</p>
					<<set '"No. I don't wanna," Katja says, looking like she' + iif(katjaQW['coke_stage'] = 2, '''s almost ready', ' needs some convincing') + ' to say yes.'>>
					<<if getvar("$katjaQW['coke_stage']") == 2>>
						<<gs 'willpower' 'drugs' 'force' 'easy'>>
					<<else>>
						<<gs 'willpower' 'drugs' 'force'>>
					<</if>>
					<<if $will_cost <= $pc.willpower>>
						<<actCLA 'Convince Katja to do some lines with you (will_cost Willpower)'>>
							<<set $time.minutes += 8>>
							<<if getvar("$katjaQW['coke_stage']") == 2>>
								<<gs 'willpower' 'drugs' 'force' 'easy'>>
							<<else>>
								<<gs 'willpower' 'drugs' 'force'>>
							<</if>>
							<<gs 'willpower' 'pay' 'force'>>
							<<gs 'drugs' 'cocaine'>>
							<<set $dur -= 1>>
							<<gs 'katja_procedural' 'take_cocaine'>>
							<<image "characters/pavlovsk/school/girl/katja/uni/dorm/joint_coke.jpg">>
							"Come on, Katja. Let''s do it together," you say and start cleaning the table.
							<p>She still looks skeptical. "I don't know, $pc.name_nick. I'm not sure it's a good idea," she replies.</p>
							<p>"You liked it last time! it will be fine this time, too," you continue.</p>
							<<set '"I'm not sure. ' + iif(katjaQW['coke_stage'] = 2, 'I don't want it to become a habit', 'I think the last time was enough for me') + '," she says.'>>
							"Don't be such a bore. You know you will love it," you say.
							Katja finally relents. "OK. Let''s do it, together," she says.
							You prepare some lines and produce some tubes to snort it with and hand one of them to Katja, who takes it with unsteady hands. You both lower your heads to the table.
							<<set 'Then at the same time, you snort your lines. Katja ' + iif(katjaQW['coke_stage'] = 2, 'has gotten used to it and it doesn''t irritate her nostrils anymore.', 'is still getting itching nostrils and has to concentrate on not sneezing.')>>
							After a moment, it hits you both. You feel wonderful while Katja just sits there with wide open eyes. Then she starts giggling, which turns into a laugh that lasts for some time.
							After some minutes, you both come down and get ready to go partying.
							<<actCLA 'Go to the metro'>>
								<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
							<</actCLA>>
						<</actCLA>>
					<<else>>
						<<actCLA `'Convince Katja to do some lines with you ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
					<</if>>
					<<actCLA 'Drop the idea'>>
						<<set $time.minutes += 2>>
						<<gs 'willpower' 'pay' 'force'>>
						"Well, if you really don't want to, then let''s just head out," you say.
						<<set '"OK, let's go," Katja replies, looking ' + iif(katjaQW['coke_stage'] = 2, 'a little disappointed.', 'relieved.')>>
						<<actCLA 'Go to the metro'>>
							<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
						<</actCLA>>
					<</actCLA>>
				<<elseif getvar("$katjaQW['coke_stage']") < 5>>
					<p>"So, I have some coke, enough for both of us. Want to do some before leaving?" you ask Katja and pull out a small bag of cocaine.</p>
					<<set '"Yeah. OK," Katja says, ' + iif(katjaQW['coke_stage'] = 3, 'looking a little hesitant.', 'somewhat eager.')>>
					<<actCLA 'Do some lines with Katja'>>
						<<set $time.minutes += 8>>
						<<gs 'drugs' 'cocaine'>>
						<<set $dur -= 1>>
						<<gs 'katja_procedural' 'take_cocaine'>>
						<<image "characters/pavlovsk/school/girl/katja/uni/dorm/joint_cocaine.jpg">>
						You prepare some lines for yourself and Katja and produce some tubes to use, handing one to her.
						You put your tubes to your nostrils and lower your heads to the table and snort your lines. Katja does it with great enthusiasm.
						After a moment, it hits you both. You feel wonderful while Katja just sits there with wide open eyes. She starts giggling, which turns into a laugh that lasts for some time.
						After some minutes, you both come down and get ready to go partying.
						<<actCLA 'Go to the metro'>>
							<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
						<</actCLA>>
					<</actCLA>>
				<<else>>
					<p>"So, I have some coke, enough for both of us. Want to do some before leaving?" you ask Katja and pull out a small bag of cocaine.</p>
					<p>"Of course, I want to! Let's do it, together," Katja says, looking very into it.</p>
					<<actCLA 'Do some lines with Katja'>>
						<<set $time.minutes += 8>>
						<<gs 'drugs' 'cocaine'>>
						<<set $dur -= 1>>
						<<gs 'katja_procedural' 'take_cocaine'>>
						<<image "characters/pavlovsk/school/girl/katja/uni/dorm/joint_cocaine.jpg">>
						You prepare some lines for yourself and Katja and produce some tubes to use, handing one to her.
						You both put your tubes to you nostrils and lower your heads to the table and snort your lines. Katja does it like it's something she does all the time.
						After a moment, it hits you both. You feel wonderful while Katja just sits there with wide open eyes. She starts giggling, which turns into a laugh that lasts for some time.
						After some minutes, you both come down and get ready to go partying.
						<<actCLA 'Go to the metro'>>
							<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
						<</actCLA>>
					<</actCLA>>
				<</if>>
			<</actCLA>>
		<</if>>
		<<actCLA 'Go to the metro'>>
			<<set $time.minutes += 10>> <<gt 'katja_city' 'metro'>>
		<</actCLA>>
	<</if>>
<</if>>