# family if daystart ! m_day: m_day = daystart father_go = rand(0, 1) mother_go = rand(0, 1) end indorf = 0 !brother or father are in the livign room ocpd_room = 0 if indorf_month ! month and week ! 7 and week ! 1: !!monthly indorf_month = month dostupindorf = 1 end if week = 1 and dostupindorf = 1:dostupindorf = 0 if dostupindorf = 1 and ((week = 6 and hour >= 12) or (week = 7 and hour < 20)): !!go to the village indorf = 1 father_go = 0 mother_go = 0 end if indorf = 1 and sister_opr_indorf = 0: sister_opr_indorf = 1 sister_indorf = rand(0, 1) end if indorf = 0: sister_opr_indorf = 0 sister_indorf = 0 end if sisboyparty_day + 1 = daystart:sister_indorf = 0 if sister_indorf = 1:sisterHere = 0 '' if StoryLine = 1: if sisboyparty_day + 1 = daystart and hour > 18 and sisboypartyQW = 1: if sisboyparty = 1:sisboyparty = -1 if sisboyparty = 2: cls minut += 5 sisboyparty = -1 gs 'stat' '
> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_7.jpg">
' 'You forgot to go to Rexs'' birthday party.' 'You brush it off thinking, Oh well, hopefully he won''t be offended.' act 'Move away':gt $loc, $metka exit end end if sister_indorf = 0: if $loc = 'bedrPar': sisterHere = 0 sisterdialog = 1 if hour < 7: sisterHere = 1 'Your sister Anya is asleep in her bed.' end if week >= 6: if hour >= 7 and hour < 10: sisterHere = 1 'Your sister Anya is asleep in her bed.' end if hour = 10: sisterHere = 2 sisterdialog = 3 'Your sister Anya is getting ready to go for a walk.' end end if hour >= 18 and sisboyparty_day + 1 ! daystart: sisterHere = 2 'Your sister Anya is sitting on her bed, reading a book.' elseif sisboyparty_day + 1 = daystart and sisboyparty = -1 and hour = 22: cls minut += 5 gs 'stat' '
> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_6_<>.jpg">
' 'Drunk and disheveled, Anya bursts into the room.' 'You notice that her hair, and all her clothes are smeared in sticky sperm.' 'In this state, she falls on the bed and instantly falls asleep.' sisboyparty = 1 act 'Move away':gt $loc exit elseif sisboyparty_day + 1 = daystart and hour >= 22: sisterHere = 1 if sisboypartyQW = 1:sisboypartyQW = 2 if sisboyparty = -1:sisboyparty = 1 'Your drunken sister Anya is sound asleep in her bed.' end end if $loc = 'gdk': if week < 6: if hour >= 16 and hour < 18: 'Your sister Anya is sitting with a group of boys and girls, drinking beer.' end elseif week >= 6: if hour >= 11 and hour < 18: 'Your sister Anya is sitting with a group of boys and girls, drinking beer.' end end end end if indorf = 0: if $loc = 'bedrPar2': if hour < 6 or hour >= 21: 'Your mom and stepfather are sleeping on the bed.' if hour = 21:parsexrand = rand(0, 5) end end if $loc = 'sitrPar' or ($loc = 'family' and $metka = 'sofa'): if hour < 7 and brothermorningsex = daystart: ocpd_room = 1 'Your younger brother Kolka is getting ready for school.' elseif hour < 7 and brothermorningsex ! daystart: ocpd_room = 1 'Your younger brother Kolka is sleeping on the sofa.' elseif hour >= 23: ocpd_room = 1 'Your younger brother Kolka is sleeping on the sofa.' end if week < 6: if father_go = 0: if hour >= 16 and hour < 21: ocpd_room = 1 'Your stepfather is sitting on the sofa, watching TV.' end end if hour >= 18 and hour < 20: if kanikuli > 0: ocpd_room = 1 'Your younger brother Kolka is sitting on the sofa, playing video games.' else ocpd_room = 1 'Your little brother Kolka is sitting by the table and doing his homework.' end end if hour >= 20 and hour < 23: ocpd_room = 1 'Your younger brother Kolka is sitting on the sofa, playing video games.' end end if week >= 6: if father_go = 0: if hour >= 7 and hour < 21: ocpd_room = 1 'Your stepfather is sitting on the sofa, watching TV.' end else if hour >= 7 and hour < 16: ocpd_room = 1 'Your stepfather is sitting on the sofa, watching TV.' end end if hour >= 20 and hour < 23: ocpd_room = 1 'Your younger brother Kolka is sitting on the sofa, watching TV.' end end end if $loc = 'kuhrPar': gs 'dinmother' if mother_go = 0: if (week < 6 and hour >= 16 and hour < 21) or (week >= 6 and hour >= 7 and hour < 21): *pl dyneval($d_mother[rand(4,8)]) end else if (week < 6 and hour >= 17 and hour < 21) or (week >= 6 and hour >= 7 and hour < 21 and hour ! 16): *pl dyneval($d_mother[rand(4,8)]) end end end if $loc = 'korrPar': !! for future code I guess end if $loc = 'vokzalG': !! for future code I guess end if $loc = 'gschool_grounds': if (week < 6 and hour >= 14 and hour <= 17) or ((week >= 6 or kanikuli > 0) and hour >= 7 and hour <= 17): 'You see your brother play football by the field near the school.' end end end end if $loc = 'sitrPar': act 'Sit on the sofa':gt 'family', 'sofa' end if $loc = 'sitrPar' and ocpd_room = 0: 'No one else is here right now, so I''m free to use the room how I like.' gs 'exercise','start' end if $ARGS[0]='sofa': $metka = 'sofa' $loc = 'family' *clr & cla gs 'stat' '
> src="images/locations/pavlovsk/resident/apartment/home/sofa.jpg">
' '' '
A small sofa bed, when not folded out into a bed, is just big enough for you to curl up on and take a nap.
' '' act 'Watch TV':gt 'TV','pav' if ocpd_room = 0 and pornMagazine > 0: '
There is a porn magazine under the sofa cushions' gs 'events', 'read_porn' if pcs_horny >= 50: act 'Masturbate':gt 'selfplay', 'start' end end gs 'events', 'read' gs 'family' if ocpd_room = 0: act 'Take a nap (1:00)': if pcs_sleep < 90: pcs_sleep += 10 pcs_health += 5 minut += 60 gs 'stat' 'You sleep about an hour.' else minut += 5 gs 'stat' 'You are not tired enough to sleep, even for a short nap.' end end end act 'Get up':gt 'sitrPar' end --- family ---------------------------------