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 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 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 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 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><img src="images/characters/pavlovsk/resident/reks/event/community/rexda.gif"></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 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 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 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 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 Rek''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 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 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 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 volleyboll >= 100:
				act 'No (volleyball)':
					cls
					minut += 5
					sisboyparty = -1
					gs'stat'
					'<center><img 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 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 ---------------------------------