glife/locations/annafrends

# annafrends
$location_type = 'event_oudoors'

if $ARGS[0] = 'scene1':
	cls
	gs 'stat'
	gs 'reks'

	'Your sister Anja and her friends Lena, Ira, Rex, and Roman are sitting outside the community center drinking beer.'
	temprand = rand(0, 4)

	if temprand = 0:
		!!Anja
		'Impatiently, Anja picks up a bottle of beer and shouts, "Come on guys! Will you pour me some beer today or not?"'

		if rand(0, 1) = 0:
			'Rex takes the bottle out of Anja''s hands.'
			temprand = rand(0, 4)

			if temprand = 0:
				'"Stop shouting, I''m pouring!"'
				temprand = rand(0, 2)

				if temprand = 0:
					'Between fits of giggles, Anja says "I haven''t even started to yell. If I do, you''ll know!"'
				elseif temprand = 1:
					'With a resounding slap on Rex'' shoulder, Lena says "Hurry up, you piece of dog shit!"'
				else
					'With a smile, Ira says "Don''t get angry, Rex."'

					if rand(0, 10) = 0:'Anja quickly interjects, "We might need to chain him to a post until he calms down."'
				end
			elseif temprand = 1:
				'"Well, you always like to be late for the fun. Relax your ass, I''m sorting it all out."'
				temprand = rand(0, 2)

				if temprand = 0:
					'Between fits of giggles, Anja says "I haven''t even started to yell. If I do, you''ll know!"'
				elseif temprand = 1:
					'With a resounding slap on Rex'' shoulder, Lena says "Hurry, you piece of dog shit!"'
				else
					'Roma giggles and says "It already stinks here, and if she relaxes her ass more, we run the risk of suffocation!"'
					temprand = rand(0, 2)

					if temprand = 0:
						'Anja quips, "You''ll forever remain a virgin, Roma."'
						if rand(0, 10) = 0:
							'Roma grins "Is that an offer?"'
							temprand = rand(0, 2)

							if temprand = 0:
								'Anja laughs "Dream on, punk."'
							elseif temprand = 1:
								'Anja laughs "Only in your dreams, punk."'
							else
								'Anja laughs "Yeah, right. Can you hear that? It''s a whore coming to help you."'
							end
						end
					elseif temprand = 1:
						'Anja quips "And you''re just sad because you can''t get any girls Roma."'

						if rand(0, 10) = 0:'Rex grins "Yeah, our eternal virgin Roma is truly able to enliven the conversation with the topic of anal gases."'
					else
						'Anja quips "The smell comes from you."'

						if rand(0, 10) = 0:'Roma grins "Yes, no, it sobachatiny bears."'
					end
				end
			elseif temprand = 2:
				'"Come on, just open it already. Don''t you have hands?"'
				temprand = rand(0, 2)

				if temprand = 0:
					'Anja giggles "Yeah, what else do you need them for?"'

					if rand(0, 10) = 0:'With mock indignation, Rex answers "Really just one other thing."'
				elseif temprand = 1:
					'With a resounding slap on Rex''s shoulder, Lena says "Is that how you speak to a lady?"'

					if rand(0, 10) = 0:'With mock indignation, Rex answers "Yes. I speak russian to her."'
				else
					'Ira smiles, saying "Don''t get so upset, Rex."'

					if rand(0, 10) = 0:'Anja quickly interjects, "We might need to chain him up to a tree to keep him calm."'
				end
			elseif temprand = 3:
				'"Allow me, madame."'
				temprand = rand(0, 2)

				if temprand = 0:
					'Anja giggles "Of course, monsieur."'
				elseif temprand = 1:
					'With mock indignation, Anja says "Don''t you Madame me!"'

					if rand(0, 10) = 0:'Rex bowes gallantly and answers "I''m truly sorry, mademoiselle."'
				else
					'Impatiently, Anja says "Pour it already, you clown."'
				end
			else
				'"Shit! Where''re the cups? Did we not buy any?"'
				temprand = rand(0, 2)

				if temprand = 0:
					'Anja picks up the cups, "Here they are, you blind monster."'
				elseif temprand = 1:
					'Roma says "Rex, you''re the one who bought them, is your memory really that bad?"'
				else
					'Lena holds up the cups and says "Rex, calm down."'
				end
			end
		else
			'Roma takes the bottle from Anja and opens it. "Somebody hold the cups."'
			temprand = rand(0, 2)

			if temprand = 0:
				'Rex holds the cups while Roma pours the beer.'
			elseif temprand = 1:
				'Rex takes the cups and mutters "That worthless ass. Can''t he use both of his hands at once?"'
			else
				'Ira takes the cups and says "Pour it already, you big doofus."'
			end

			if rand(0, 3) = 0:
				'As Roma pours beer in the cups, they suddenly tip over and spill all the beer on the ground.'
				temprand = rand(0, 2)

				if temprand = 0:
					'Outraged, Rex screams "You puny, armless ass! No one can trust you! Didn''t your mother ever tell you, ''Always pour with two hands!''"'
				elseif temprand = 1:
					'Outraged, Rex says "How the fuck could you spill that?"'
				else
					'Indignantly, Anja says "Always the same; never let somebody else pour if you can do it yourself instead."'
				end
			end
		end
	elseif temprand = 1:
		!!Lena
		'Indignantly, Lena says "Did we come here to drink beer or to look at it?"'
	elseif temprand = 2:
		!!Ira
		'With a flirty look, Ira bats her eyelashes and says "Boys, are we going to drink beer today or not?"'
	elseif temprand = 3:
		!!Rex
		if rand(0, 1) = 0:
			'Rex picks up a bottle of beer and pops it open.'
			if rand(0, 2) = 0:
				'"Shit! Where''re the cups? Did we not buy any?"'

				temprand = rand(0, 2)

				if temprand = 0:
					'Anja picks up the cups, "Here they are, you blind monster."'
				elseif temprand = 1:
					'Roma says "Rex, you''re the one who bought them, is your memory really that bad?"'
				else
					'Lena holds up the cups and says "Rex, calm down."'
				end
			else
				'"Roma, hold the cups while I pour."'
			end
		else
			'Rex picks up a bottle of beer and hands it to Roma. "You pour this time."'
			'Roma takes the beer bottle from Rex, opens it and says "Somebody hold the cups."'
			temprand = rand(0, 2)

			if temprand = 0:
				'Rex holds the cups while Roma pours the beer.'
			elseif temprand = 1:
				'Rex takes the cups and mutters "That worthless ass. Can''t he use both of his hands at once?"'
			else
				'Ira takes the cups and says "Pour it already, you big doofus."'
			end

			if rand(0, 3) = 0:
				'As Roma pours beer in the cups, they suddenly tip over and spill all the beer on the ground.'
				temprand3 = rand(0, 2)

				if temprand3 = 0:
					'Outraged, Rex screams "You puny, armless ass! No one can trust you! Didn''t your mother ever tell you, ''Always pour with two hands!''"'
				elseif temprand3 = 1:
					'Outraged, Rex says "How the fuck could you spill that?"'
				elseif temprand3 = 2:
					'Indignantly, Anja says "Always the same; never let somebody else pour if you can do it yourself instead."'
				end
			end
		end
	else
		!!Roma Meynold
		'Roma picks up the bottle of beer, opens it and says "Somebody hold the cups."'
		temprand = rand(0, 2)

		if temprand = 0:
			'Rex holds the cups while Roma pours the beer.'
		elseif temprand = 1:
			'Rex takes the cups and mutters "That worthless ass. Can''t he use both of his hands at once?"'
		else
			'Ira takes the cups and says "Pour it already, you big doofus."'
		end

		if rand(0, 3) = 0:
			'As Roma pours beer in the cups, they suddenly tip over and spill all the beer on the ground.'
			temprand = rand(0, 2)

			if temprand = 0:
				'Outraged, Rex screams "You puny, armless ass! No one can trust you! Didn''t your mother ever tell you, ''Always pour with two hands!''"'
			elseif temprand = 1:
				'Outraged, Rex says "How the fuck could you spill that?"'
			else
				'Indignantly, Anja says "Always the same; never let somebody else pour if you can do it yourself instead."'
			end
		end
	end

	if npc_QW['A33'] = 1:
		act 'Meet your sister''s boyfriend':
			cls
			minut += 5
			npc_QW['A33'] = 2
			gs 'stat'

			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/community/sisboyqw_02.jpg"></center>'
			*nl
			'"<<$pcs_nickname>>, you wanted to meet my boyfriend? This is my boyfriend Roma, and this is my sister <<$pcs_nickname>>."'
			'"To friendship!!!" Rex shouts drunkenly, raising his cup. You pick up a cup full of beer and start drinking, glancing at your sister''s boyfriend.'
			'Roma, red-haired and skinny, is actually pretty cute. You think to yourself, "Sister, how very lucky you are."'

			act 'Continue to drink beer':gt 'annafrends', 'scene2'
		end
	end

	act 'Continue to drink beer':gt 'annafrends', 'scene2'

	'Finally, everybody''s plastic cup is filled with cold beer. You all merrily drink together.'
	if reksLike = 1 and toiletRexSex = 0 and sisboypartyQW > 1:
		temp = rand(1,100)
		if temp >= 70:
			'You notice Rex briefly glancing at your feet.'
			if pcs_horny > 85:
				act 'Show off your legs':
					cla
					minut += 5
					pcs_horny += 5
					rex += 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/event/community/rexpod<<rand(1,3)>>.jpg"></center>'
					'You cross your foot over your leg, doing your best to appear seductive without being obvious.'
					act 'Continue to drink beer':gt 'annafrends', 'scene2'
					exit
				end
			end
		elseif alko > 2 and temp <= 20 and rex <= 60:
			cls
			minut += 5
			rex += 1
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/rex.jpg"></center>'
			*nl
			'Already pretty tipsy, Rex approaches you - "<<$pcs_nickname>>, let me refill your glass" - but he, seemingly accidentally, spills some on your foot. - "Oh, <<$pcs_nickname>>, forgive me! Here, I''ll clean that up."'
			'Rex begins wiping off your legs with his shirt sleeve.'
			if pcs_dom > 5:
				act 'Step back':
					cls
					minut += 5
					pcs_dom += 1
					rex -= 1
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/event/community/rexnet.jpg"></center>'
					*nl
					'"No problem, I can manage that."'
					act 'Continue to drink beer':gt 'annafrends', 'scene2'
				end
			end
			act 'Wait':
				cls
				minut += 5
				pcs_horny += 5
				rex += 1
				gs 'stat'
				'<center><video autoplay loop src="images/characters/pavlovsk/resident/reks/event/community/rexda.mp4"></video></center>'
				*nl
				'Laughing, you wait until Rex finishes wiping your foot.  While you are giggling, Rex becomes more bold, gradually replacing his sleeve with his palm and working up your thigh towards your panties. Just as Rex''s finger is about to touch your panties, you realize what is going on and hurriedly remove his hand, saying: "Hey..."'
				act 'Continue to drink beer':gt 'annafrends', 'scene2'
			end
		elseif rexPark = 1 and rexParkDay < daystart and rexSisTalk = 2:
			cla
			minut += 5
			rex = 50
			rexPark = 0
			gs 'reks'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/rex.jpg"></center>'
			*nl
			gs 'reks', 'rexRep'
			'Rex comes up to you. "<<$pcs_nickname>>, I looked like a real chump waiting for you alone in the park yesterday! That wasn''t very nice..."'
			act 'Continue to drink beer':gt 'annafrends', 'scene2'
		elseif rexCar = 1 and rexCarDay < daystart and rexSisTalk = 3:
			cla
			minut += 5
			rex = 50
			rexCar = 0
			gs 'reks'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/rex.jpg"></center>'
			*nl
			gs 'reks', 'rexRep'
			'Rex comes up to you. "<<$pcs_nickname>>, I was waiting at your door for almost two hours last night! It wasn''t very nice to ditch me like that..."'
			act 'Continue to drink beer':gt 'annafrends', 'scene2'
		elseif rexCar = 1 and rexCarDay < daystart and rexSisTalk = 4:
			cla
			minut += 5
			rex = 50
			rexCar = 0
			gs 'reks'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/rex.jpg"></center>'
			*nl
			gs 'reks', 'rexRep'
			'Rex comes up to you. "<<$pcs_nickname>>, you could have at least told me you didn''t want to go out... last night was a disaster! Next time, please just tell me if you can''t make it."'
			act 'Continue to drink beer':gt 'annafrends', 'scene2'
		elseif temp > 50 and rex >= 30:
			cla
			minut += 5
			gs 'reks'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/reks/rex.jpg"></center>'
			*nl
			gs 'reks', 'rexRep'
			'Rex is drinking a glass of beer.'
			act 'Chat':
				cla
				rex += 1
				minut += 5
				gt 'reks', 'rexGdkTalk'
			end
			act 'Continue to drink beer':gt 'annafrends', 'scene2'

!sisboyparty
!-1 - don''t go to the party
!0 - don''t know about Vecherinka
!1 - knows about the parties
!2 - agreed to go to the party

		elseif sisboypartyQW >= 2 and sisboyparty = 1:
			'Roma looks up at you, suddenly remembering something.'
			if sisboyparty_day = daystart:
				'"<<$pcs_nickname>>, Rex''s apartment is available tomorrow and he''s having a party, do you want to go?"'
			elseif week + sisboyparty_day - daystart = 4:
				'"<<$pcs_nickname>>, Rex''s apartment is available on Friday and he''s having a party, do you want to go?"'
			elseif week + sisboyparty_day - daystart = 5:
				'"<<$pcs_nickname>>, Rex''s apartment is available on Saturday and he''s having a party, do you want to go?"'
			elseif week + sisboyparty_day - daystart = 6:
				'"<<$pcs_nickname>>, Rex''s apartment is available on Sunday and he''s having a party, do you want to go?"'
			else
				'"<<$pcs_nickname>>, you should come to Rex''s party next week, we find out when they are held on Tuesday morning so ask me during the week so you don''t miss it."'
				sisboyparty = -1
			exit	
			
			end
	
			act 'Yes':
				cls
				minut += 5
				sisboyparty = 2
				gs'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_2.jpg"></center>'
				*nl
				'You agree to go to the party.'
				'"Awesome <<$pcs_nickname>>, it''ll be fun. We will meet here, don''t forget to be there before 18:00, otherwise we will leave without you."'
				'Anya gives Roma a dirty look, but he just shrugs it off.'
				act 'Finish':SiSgdk = 0 & gt'sister'
			end

			act 'No (study)':
				cls
				minut += 5
				sisboyparty = -1
				gs'stat'
				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_3.jpg"></center>'
				*nl
				'You turn down the invitation.'
				'"Sorry Roma, I would love to, but I can''t get behind at school. I have homework and books to read, you know what it''s like."'
				act 'Finish':SiSgdk = 0 & gt'sister'
			end

			if bronzebeg > 0 or silverbeg > 0 or goldbeg > 0:
				act 'No (training)':
					cls
					minut += 5
					sisboyparty = -1
					gs'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_4.jpg"></center>'
					*nl
					'You turn down the invitation.'
					'"I would love to, but I have a competition to prepare for. I have to train."'
					act 'Finish':SiSgdk = 0 & gt'sister'
				end
			end

			if volleysostav > 0:
				act 'No (volleyball)':
					cls
					minut += 5
					sisboyparty = -1
					gs'stat'
					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_5.jpg"></center>'
					*nl
					'You turn down the invitation.'
					'"I can''t, the coach does not allow my to stay out late, and drinking is also prohibited."'
					act 'Finish':SiSgdk = 0 & gt'sister'
				end
			end
		end
	end
end

if $ARGS[0] = 'scene2':
	cls
	gs 'stat'

	'The bottle of beer was quickly drained and the guys go to fetch a new bottle.'

	if rand(0, 1) = 0:
		gennpc = rand(0, 2)

		if gennpc = 0:
			'Anja walks up to you and asks "<<$pcs_nickname>>, let''s go to the toilet."'
		elseif gennpc = 1:
			'Lena walks up to you and asks "<<$pcs_nickname>>, do you want to go to the toilet?"'
		elseif gennpc = 2:
			'Ira walks up to you and asks "<<$pcs_nickname>>, do you want to go somewhere?"'
		end

		act 'Go together':gt 'annafrends', 'scene3'
	else
		'The boys went around the corner of the club to empty their bladder, leaving the girls alone.'
	end

	act 'Leave':SiSonWork = 0 & SiSgdk = 0 & gt'gdk'
end

if $ARGS[0] = 'scene3':
	cls
	minut += 5
	gs 'stat'


	if gennpc = 0:$annafrendname = 'Anja' & $annafrendname2 = 'Anja'
	if gennpc = 1:$annafrendname = 'Lena' & $annafrendname2 = 'Lena'
	if gennpc = 2:$annafrendname = 'Ira' & $annafrendname2 = 'Ira'

	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/community/piss.jpg"></center>'
	*nl
	'You follow <<$annafrendname>> to the bushes behind the club. <<$annafrendname2>> looks around, lifts her skirt, pulls down her panties, squats and begins to pee.'

	act 'Leave':SiSonWork = 0 & SiSgdk = 0 & gt'gdk'

end
--- annafrends ---------------------------------