# sister !!model Megan Vale Valentina Azarov sisterAge = year - ((Astat_dob[33] - (Astat_dob[33] mod 10000)) / 10000) $sisterLocationTitle = '

Anya

' gs 'stat' *pl $sisterLocationTitle '
' *nl 'Your sister Anja is bit older than you. She is <> years old. She graduated from high school, but didn''t go to university and now works at the supermarket.' gs 'dinsister' dynamic $sischecks if $ARGS[0] = 'gdk': !Near the club with friends if Astat_rel[33] < 40: '"What do you want? Fuck off!" Anya and her friends laugh and point at you, until you leave them alone.' elseif sisboypartyQW < 2 and sisboyparty = 2 and sisboyparty_day + 1 = daystart: cla 'Anya and some of her friends are dressed up organizing themselves before going to a party. Anya sees you and waves you to her.' act 'Go to the party':gt 'sisterQW','sisboyQW_party' elseif sisboypartyQW >= 2 and sisboyparty = 2 and sisboyparty_day + 1 = daystart: cla 'A merry group of friends have gathered for another boozy party at Rex''s.' act 'Go to the party':dynamic $party_pre_conditions else cla 'Anya sits with some girls and boys, drinking beer. "Hey <<$pcs_nickname>>!" Anya smiles, "Want some beer?"' act 'Drink beer': cls minut += 60 Astat_rel[33] += 5 alko += 3 cumspclnt = 2 gs 'cum_cleanup' fbreath = 0 gs'stat' if AniaFrends >= 1: gt'annafrends', 'scene1' elseif AniaFrends = 0: AniaFrends = 1 'You meet Anya''s friends. They are all her former classmates. There''s small and nimble Lena, Ira who is constantly confused, a tall athletic guy, whom everyone calls Rex, and a red-haired lanky guy named Roma. After the introductions you sit down with them, drinking beer and chatting with Anya and her friends.' end act 'Move away':SiSgdk = 0 & gt $loc, $metka end if sisboyparty = 2 and sisboyparty_day + 1 = daystart and hour = 17 and minut >= 30:act 'Go to the party':gt'sisterQW','sisboyQW_party' end act 'Move away':SiSgdk = 0 & gt $loc, $metka exit end !Terms of the campaign to the party $party_pre_conditions ={ cla *clr minut += 5 gs'stat' if rex <= 80: '
' $sisPartyInvite = '"Hi <<$pcs_nickname>>, we''re going to a party at Rex''s today. Want to come with us?"' if mesec > 0: *pl $sisPartyInvite '"Sorry Anya, I''m not in the mood today, you go without me."' '"What, are you on the rag today? You should have told me! Alright, go home and get some rest."' act 'Move away':SiSgdk = 0 & gt $loc, $metka elseif mood < 50: *pl $sisPartyInvite '"Sorry Anya, I''m not in the mood today, you go without me."' '"You do look a little pale sis, go home and get some rest."' act 'Move away':SiSgdk = 0 & gt $loc, $metka elseif alko >= 3: '"<<$pcs_nickname>>, how the hell did you get so drunk already? I was going to invite you to a party, but you look like you have already been to one. Go home and sleep it off."' act 'Move away':SiSgdk = 0 & gt $loc, $metka elseif spdirtyv > 0 or spdirtyc > 0: '"My God, you''ll get yourself a reputation! Go home and wash that off, quickly."' 'You feel a little ashamed that your sister has seen you looking like this in public.' act 'Move away':SiSgdk = 0 & gt $loc, $metka else *pl $sisPartyInvite act 'Yes':gt 'sbReksHome','party' act 'Decline': cla *clr minut += 5 sisboyparty = -1 gs'stat' '
' *nl '"I''d love to, but I have a lot of homework to do. I''m sorry."' '"Don''t worry, maybe next time you can come."' act 'Move away':SiSgdk = 0 & gt $loc, $metka end end end if rex > 80: '
' *nl if GorSlut >= 2: '"Shit, <<$pcs_nickname>> everywhere people say you are a fucking whore. What is this garbage, <<$pcs_nickname>>? I thought we were an item, and things were getting serious, and you''re fucking around?"' '"I do not know what came over me, I was not myself, please forgive me, if you can."' '"Listen, everything''s OK, but let''s just be friends and forget all that we had. Okay?"' '"Okay..."' act 'Move away':SiSgdk = 0 & gt $loc, $metka elseif mesec > 0 or manna < ((pcs_intel*magik) + magik*100 + pcs_vital*10 + rikudo)*50/100: '"Sorry Rex, sweetie, I''m not feeling too good today, you go without me."' '"Sweetie, I do not want to leave you alone, but I need to go with the guys, take care, and do not be sad."' 'Rex gives you a gentle kiss on your cheek and leaves.' act 'Move away':SiSgdk = 0 & gt $loc, $metka elseif alko >= 3: '"<<$pcs_nickname>>, are you drunk? I wanted to invite you to the party, but you look like you just left a party. Go home and sleep it off."' act 'Move away':SiSgdk = 0 & gt $loc, $metka elseif spdirtyv > 0 or spdirtyc > 0: '"Shit, <<$pcs_nickname>> you are covered in semen. What is this garbage, <<$pcs_nickname>>? I thought we were an item, and things were getting serious, and you''re fucking around?"' '"I do not know what came over me, I was not myself, please forgive me, if you can."' '"Listen, everything''s OK, but let''s just be friends and forget all that we had. Okay?"' '"Okay..."' act 'Move away':SiSgdk = 0 & gt $loc, $metka else '"Baby, let''s go to my place, once again I am hosting a great get together."' act 'Accept':gt 'sbReksHome','party' act 'Decline': cla minut += 5 sisboyparty = -1 gs'stat' '"Sorry Rex, I have a lot of homework. I''d love to but I don''t want to fail my exams."' '"Well, go on then, but next time you definitely come, okay?"' act 'Move away':SiSgdk = 0 & gt $loc, $metka end end end } act 'Move away':gt $loc, $metka if hour >= 7 and hour < 24: if Astat_rel[33] > 65 and mesec > 0 and preg = 0 and tampon = 0 and narkossister = 0: act 'Ask for a tampon': 'You tell your sister that you are menstruating and have no tampons. She looks at you knowingly, brings some of hers and recommends that next time you take care of this in advance.' tampon=3 Astat_rel[33] -= 15 minut += 3 cla act 'Move away':gt $loc, $metka exit end end act 'Chat': cls minut+=rand(10,15) Astat_rel[33] += 1 gs'stat' *pl $sisterLocationTitle '
' if Astat_rel[33] < 20:'Your relationship with your sister is scandalous.' if Astat_rel[33] >= 20 and Astat_rel[33] < 40:'Your relationship with your sister is tense.' if Astat_rel[33] >= 40 and Astat_rel[33] < 60:'You and your sister have a normal relationship.' if Astat_rel[33] >= 60 and Astat_rel[33] < 80:'You and your sister have a good relationship.' if Astat_rel[33] >= 80:'You have a great relationship with your sister.' '' !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 if sisboypartyQW >= 2 and sisboyparty = 1: if sisboyparty_day = daystart: '"Listen, <<$nickname>>, Rex''s apartment is available tomorrow and he''s having a party, do you want to go?"' elseif week + sisboyparty_day - daystart = 4: '"Listen, <<$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: '"Listen, <<$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: '"Listen, <<$nickname>>, Rex''s apartment is available on Sunday and he''s having a party, do you want to go?"' else '"Its too late for this weeks party, I find out when they are held on Tuesday morning so you can ask me earlier in the week about the next one."' sisboyparty = -1 end act 'Yes': cls minut += 5 sisboyparty = 2 gs'stat' '
' *nl 'You agree to go to the party.' '"Awesome <<$pcs_nickname>>, it''ll be fun. We will meet at the community center, don''t forget to be there before 18:00, otherwise we will leave without you."' 'With these words, your sister hugs you and kisses you on the cheek.' act 'Finish':SiSgdk = 0 & gt'sister' end act 'No (study)': cls minut += 5 sisboyparty = -1 gs'stat' '
' *nl 'You turn down the invitation.' '"Sorry Anya, 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' '
' *nl 'You turn down the invitation.' '"I would love to, but I have a competition to prepare for. I have to train. One day I could be a great athlete, not like you lazy bones."' act 'Finish':SiSgdk = 0 & gt'sister' end end if pcs_vball >= 100: act 'No (volleyball)': cls minut += 5 sisboyparty = -1 gs'stat' '
' *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 exit end act 'Further':SiSgdk = 0 & gt'sister' if Astat_rel[33] <20: dynamic $d_sister[1] exit elseif Astat_rel[33] >= 20 and Astat_rel[33] < 40: dynamic $d_sister[2] exit elseif Astat_rel[33] >=40: dynamic $d_sister[3] end end if sisterLesb = 2: cls minut += 5 gs'stat' '
' *nl 'You''re both embarrassed after what happened that night, and can not look into each other''s eyes, finally Anya speaks with you.' '"<<$pcs_nickname>>," with a smile she tells you, "Well, you''re a fool, I thought you liked guys, and I always found it much more pleasant to handle men."' 'You look at Anya blushing, "Forgive me, I was so worked up, I just could not control myself, I do not know what came over me."' '"Well, I do not mind, if you sometimes lose control of yourself." She smiles slyly, You smile at her...' sisterLesb = 3 act 'Finish':SiSgdk = 0 & gt'sister' exit end if Astat_Qstlvl[33] = 0 and Astat_rel[33] >= 40: act 'Ask about her boyfriend': cls minut += 5 Astat_rel[33] += 2 Astat_Qstlvl[33] = 1 gs'stat' *pl $sisterLocationTitle '
' 'You ask Anya about her boyfriend. She smiles.' '"Well, I have a boyfriend. Although nothing serious. He is more of a friend who I have sex with."' '"Awesome, now when I think out about it, you simply must introduce me to him!"' '"Good sister, we hang out in the evenings at the community center. Meet me there and I''ll introduce you to him."' act 'Finish':SiSgdk = 0 & gt'sister' end elseif Astat_Qstlvl[33] >= 2 and Astat_rel[33] >= 40 and sisboytrioQW > -1 and sisboytrioDayOtkaz <= daystart and sisboypartyQW < 2: act 'Talk about Roma': cls minut += 5 sisboyrand = RAND(1,10) gs'stat' !sisboyparty !-1 - don''t go to the party !0 - ''t know about Vecherinka !1 - knows about the parties !2 - agreed to go to the party if sisboytrio >= 5 and sisboyparty = 0 and sisboyparty_day ! daystart: cls minut += 5 sisboyparty = 1 sisboyparty_day = daystart gs'stat' '
' *nl '"<<$pcs_nickname>>, one of my friends birthday is tomorrow and he''s having a party. He asked me to invite you."' '"Oh, Anya I don''t know, they are your friends and I haven''t got to know the boys, I basically just talked to the girls."' '"Come on, he really wants you to go, I think he might like you. So will you come?"' act 'Yes': cls minut += 5 sisboypartyQW = 1 sisboyparty = 2 gs'stat' '
' *nl 'You agree to go to the birthday party.' '"Awesome <<$pcs_nickname>>, it''ll be fun! We will meet at the community center, don''t forget to be there before 18:00, otherwise we will leave without you."' 'With these words, your sister hugs you and kisses you on the cheek.' act 'Finish':SiSgdk = 0 & gt'sister' end act 'No (study)': cls minut += 5 sisboyparty = -1 gs'stat' '
' *nl 'You refuse to go to the birthday party.' '"Sorry Anya, 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' '
' *nl 'You refuse to go to the birthday party.' '"I would love to, but I have a competition to prepare for. I have to train. One day I could be a great athlete, not like you lazy bones."' act 'Finish':SiSgdk = 0 & gt'sister' end end if pcs_vball >= 100: act 'No (volleyball)': cls minut += 5 sisboyparty = -1 gs'stat' '
' *nl 'You refuse to go to the birthday party.' '"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 exit end if sisboyrand >= 8 and Astat_Qstlvl[33] = 2 and sisboyday ! daystart: *pl $sisterLocationTitle '
' *nl 'Anya takes a long and hesitant look at you, and eventually decides to ask you.' '"<<$pcs_nickname>> could you spend an hour tomorrow after 18:00 going for a walk or something? Roma wants to visit me here and... well, you know what I mean.' 'Your sister is blushing a little and looks at you with pleading eyes.' act 'Of course': cls minut += 5 Astat_rel[33] += 10 sisThank = 1 Astat_Qstlvl[33] = 3 sisboyday = daystart gs'stat' *pl $sisterLocationTitle '
' *nl '"Certainly sister, I understand, I will go for a walk late at night. Only do not be too loud, if Kolka hears you it will blow his tiny little mind."' 'You and Anya laugh and she joyfully hugs you saying, "You''re the best!"' act 'Finish':SiSgdk = 0 & gt'sister' end act 'No': cls Astat_rel[33] -= 10 minut += 5 sisboyday = daystart gs'stat' *pl $sisterLocationTitle '
' *nl '"Sorry Anya, I need to study in the evening."' '"Fine!" Anya turns away angrily and buries her head in her book.' act 'Finish':SiSgdk = 0 & gt'sister' end elseif sisboyrand >= 8 and (Astat_Qstlvl[33] = 4 or Astat_Qstlvl[33] = 6 or Astat_Qstlvl[33] = 8) and sisboyday ! daystart and sisboyparty = 0: *pl $sisterLocationTitle '
' *nl '"The last time Roma was here was so good, thank you very much."' '"You''re welcome, I''m always very happy to help my beloved sister and to see her happy."' '"He would like to come here again tomorrow, do you mind taking another walk for about an hour?"' act 'Of course': cls minut += 5 Astat_rel[33] += 10 sisThank = 1 if Astat_Qstlvl[33] = 4 or Astat_Qstlvl[33] = 6 or Astat_Qstlvl[33] = 8:Astat_Qstlvl[33] += 1 sisboyday = daystart gs'stat' *pl $sisterLocationTitle '
' *nl '"Certainly sister, I understand, I will go for a walk late at night. Only do not be too loud, if Kolka hears you it will blow his tiny little mind."' 'You and Anya laugh and she joyfully hugs you saying, "You''re the best!"' act 'Finish':SiSgdk = 0 & gt'sister' end act 'No': cls Astat_rel[33] -= 10 minut += 5 sisboyday = daystart gs'stat' *pl $sisterLocationTitle '
' *nl '"Sorry Anya, I need to study in the evening."' '"Fine!" Anya turns away angrily, and buries her head in her book.' act 'Finish':SiSgdk = 0 & gt'sister' end elseif sisboyrand >= 8 and Astat_Qstlvl[33] = 9 and sisterLesb >= 4 and sisboytrioQW = 0 and sisboytrio < 5 and sistrioday <= daystart: *pl $sisterLocationTitle '
' *nl if hour > 16: sisboyday = daystart $siboyday_text = 'tomorrow' else sisboyday = daystart - 1 $siboyday_text = 'this' end if sisboytrio = 0: '"Sister, Roma and I have thought about it a lot and... I do not know how to say this..."' '"Well, don''t just leave me hanging. What is it that you want to say to me?"' '"Well, hmmm... We want, you to err... join us <<$siboyday_text>> evening."' else '"Hello <<$pcs_nickname>>! Well, did you like it last time? We had a very good time with Roma."' 'You do not say anything and just smile slyly watching your sister''s eyes.' '"We want to repeat our games <<$siboyday_text>> evening, if you would like to.' end act 'Agree': cls sisboytrioQW = 1 minut += 5 Astat_rel[33] += 10 gs'stat' *pl $sisterLocationTitle '
' *nl 'You agree to Anya''s indecent proposal.' '"Well, aren''t you all liberated? Of course I agree, it will be very interesting."' 'You hug and kiss with your beloved sister.' act 'Finish':SiSgdk = 0 & gt'sister' end act 'Sounds interesting, but can we postpone it?': cls minut += 5 sistrioday = daystart + rand(7,14) gs'stat' *pl $sisterLocationTitle '
' *nl '"Oh, sis! I would be glad to join you, but <<$siboyday_text>> evening is really not good! Could we do it some other day?"' 'She looks kind of dejected, so you continue to talk to her.' '"Really Anya, I am glad to be asked! And I do want to have sex with you two at the same time! But it is really not a good time, and I am the most bummed about it."' 'Finally she realize that you didn''t reject her idea, and simply the timing is off a little. She smiles at you and then kisses your lips.' '"Then later it is, little sis.", she says.' act 'Finish':SiSgdk = 0 & gt'sister' end act 'Decline': cls sisboytrioQW = -1 sisboytrioDayOtkaz = daystart + 3 minut += 5 Astat_rel[33] = 0 Astat_Qstlvl[33] = 2 sisThank = 0 gs'stat' '
' *nl 'You decline your sisters indecent proposal.' '"You fucking perverts! No way, you disgusting bitch!' 'You quarrel with your sister and when you have both shouted yourselves out and tears roll down your cheeks, she turns away from you and does not want to talk any more.' act 'Finish':SiSgdk = 0 & gt'sister' end else minut += 10 Astat_rel[33] += 2 talkrand = RAND(0,10) gs'stat' *pl $sisterLocationTitle '
' *nl if talkrand = 0:'You ask your sister about Roma, she is happy talking about him and says how he is good, responsive and courageous.' if talkrand = 1:'Anya says, before she met Roma he was with a mean girl, and after ignoring her for a long time he called her, making Anya jealous and she scolded him.' if talkrand = 2:'One day she and Roma were in a movie, and noticed on the back row a girl sucking a guy, and that Roma asked her if she would do the same.' if talkrand = 3:'Anya complains that Roma drinks too much beer, does not buy her gifts, and doesn''t pay her enough attention.' if talkrand = 4:'Anya says, Roma offered her a threesome with another girl, which she was most offended by and didn''t speak to him for a week afterwards.' if talkrand = 5:'Anya blushes as she tells you that Roma sometimes comes to her work and drags her into the back room.' if talkrand = 6:'Anya in detail and with enthusiasm tells you about Roma''s magnificent virility, and how if not for this, they would have long since parted.' if talkrand = 7:'Anya shares with you a secret, that her favorite position is "cowgirl", even though Roma prefers to do her doggy-style.' if talkrand = 8:'You speak with your sister very frankly about sexual things, and she says shyly, she does not like to swallow sperm, but with Roma it''s different, and she is willing to swallow for him.' if talkrand = 9: if reksLike = 0: reksLike = 1 rex = 50 rexSisTalk = 0 rexPark = 0 rexCar = 0 'Anya talks for a long time about her and Roma''s friends, and asks you if you want to get to know any of them.' '"Well, Rex sounds quite nice... I guess."' 'Anya smiles, "Hmm... He is a nice guy, but sometimes behaves a bit strange, Rex is obsessed with women''s legs.' 'There was a case when Rex was driving without a license in his father''s car and gazing at a girl walking on the sidewalk, in stockings and a short skirt. Imagine, he was so carried away, he had not noticed a van ahead sitting at the traffic lights.' 'He drove straight into it and totalled the car! That''s why we call him Rex, because he stares at legs with his mouth open, teeth on show, wanting to devour them." As she says this, Anya is holding her hands like claws and impersonating a T-Rex growling at your legs.' else 'You ask your sister about Roma, she is happy talking about him and says how he is good, responsive and courageous.' end end if talkrand = 10:'Anya says that Roma likes you and asks if you like him, too.' act 'Finish':SiSgdk = 0 & gt'sister' end end end if ((sisboyday + 1 = daystart and hour > 18) or sisboyday + 1 < daystart) and sisThank = 1: cls if Astat_Qstlvl[33] = 9 or Astat_Qstlvl[33] = 7 or Astat_Qstlvl[33] = 5 or Astat_Qstlvl[33] = 3:Astat_Qstlvl[33] = Astat_Qstlvl[33] - 1 sisboyday = 0 sisThank = 0 gs'stat' *pl $sisterLocationTitle '
' *nl 'Merrily Anya runs up to you and wraps her arms around your neck.' if sisboytrioQW ! 1: '"Sister, I adore you! I spent a lovely evening with Roma."' '"Yes, I''m glad for you. Enough already, you''ll strangle me."' 'Anya is happy to let you go, and kisses you on the cheek.' else '"<<$pcs_nickname>>, I adore you! I really enjoyed our evening with Roma."' '"Yes, me too. But pease, not so tight, you''re strangling me."' 'Anya is bouncing with joy and loosens her grip just enough to kiss you on the cheek.' sisboytrioQW = 0 end act 'Finish':SiSgdk = 0 & gt'sister' elseif sisboytrioQW = 1 and ((sisboyday + 1 = daystart and hour > 18) or (sisboyday + 1 < daystart)): cls minut += 1 Astat_rel[33] -= 10 sisboytrioQW = 0 sisboyday = 0 gs'stat' *pl $sisterLocationTitle '
' *nl 'Anya doesn''t look happy with you.' '"You promised to join me and Roma, what happened? Well maybe next time..."' act 'Continue':SiSgdk = 0 & gt'sister' end if SisterKnowMastr > 0 and sisterQW = 0: cls sisterQW = 1 gs'stat' *pl $sisterLocationTitle '
' 'Anya looks at you and laughs "Well, <<$pcs_nickname>>, I know what you were up to! I went into the room, and you were playing with yourself!"' act 'Move away':SiSgdk = 0 & gt $loc, $metka end if sisterdialog = 2: cls cla gs'stat' *pl $sisterLocationTitle '
' 'Your sister is busy getting ready for work.' 'Anya, without even turning around, says, "<<$pcs_nickname>>, no time to talk, I''m already late!"' act 'Move away':gt $loc, $metka end !going for a walk if sisterdialog = 3: cls cla gs'stat' *pl $sisterLocationTitle '
' 'Your sister is getting herself ready to go out. She admires herself in a mirror and wiggles her ass, trying different poses.' 'Anya, without even turning to look at you, says: "<<$pcs_nickname>>, If you decide to take a walk, I will be near the club with my friends."' act 'Move away':gt $loc, $metka end if Astat_rel[33] >= 80 and sisterknowslut > 0 and sisterdialog < 2: act 'Talk about sex': cla cls gs'stat' minut+=rand(10,15) pcs_horny += RAND(5,10) Astat_rel[33] += 1 dynamic $d_sistersexstories[1] act 'Move away':gt 'sister' end end else 'OK <<$pcs_nickname>>, it''s time for bed.' end --- sister ---------------------------------