# parkivent
if $ARGS[0] = 'empty':
manna += 10
willpower += 10
gs 'stat'
'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'
act 'Complete walk':gt 'park', 'start'
exit
end
if $ARGS[0] = '1':
gs 'stat'
if hour > 7 and hour < 21:
cls
'In the shadow of a tree you can see a man stand, he watches you and when you look back at him he simple shouts "Whore!" at you.'
act 'Silently leave':sub += 1 & gt 'park', 'start'
act 'Tell him to shut up':
cla
pcs_dom += 1
'"Shut your trap, jackass." You''re surprised when you see him quickly running away.'
act 'Leave':gt 'park', 'start'
end
exit
elseif suchunt = 1:
cla
'From the shadow of a tree, a guy walked out...'
'He comes up to you, grabs you, and, through gritted teeth says, "Com''ear Bitch", dragging you into the bushes.'
'He never notices your little smile as you anticipate the meal to come.'
suchunt = 0
scfwon = 1
suchuntday = daystart
act 'Continue': gt 'succubus', 'RapistFight'
else
'From the shade of a tree guy came out, he came up to you and through gritted teeth, "Babe", you dragged into the bushes.'
gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
gs 'boyStat', $npclastgenerated
act 'Fight him':
cls
cla
!!stats
strenV = 100
speedV = 50
agilV = 40
reactV = 40
vitalV = 50
intelV = 10
willV = 10
!!skills
magikV = 100
boxingV = 50
shootV = 100
!!parameters
healthV = vitalV * 10 + strenV * 5
mannaV = intelV * 10 + magikV * 10
willpowerV = willV * 10
BonusAtakV = 0
BonusDefV = 0
!!Programme of Action
program = 0
RapistFight = 1
if spellavtoklon = 1:klon = 3
if spellbefshild = 1:defence = 500
gt 'fight', 'start'
end
act 'Try to run away':
if beg < 10:peshimraperand = rand(0, 11)
if beg >= 10 and beg < 30:peshimraperand = rand(0, 20)
if beg >= 30 and beg < 50:peshimraperand = rand(0, 30)
if beg >= 50 and beg < 70:peshimraperand = rand(0, 40)
if beg >= 70 and beg < 90:peshimraperand = rand(0, 50)
if beg >= 90 and beg < 110:peshimraperand = rand(0, 60)
if beg >= 110 and beg < 130:peshimraperand = rand(0, 70)
if beg >= 130 and beg < 150:peshimraperand = rand(0, 80)
if beg >= 150 and beg < 170:peshimraperand = rand(0, 90)
if beg >= 170:peshimraperand = 11
if peshimraperand <= 10:
cla
'You try to run away, but you''re not quick enough and he catches you. He drags you back into the bushes.'
!!Going to set something as an option later for a Succubus who is Sub to just go with it.
if succubusQW >= 4:
act 'Continue': gt 'succubus', 'RapistFight'
else
act 'Continue':gt 'park', 'rape1'
end
else
cla
minut += 60
'You rush through the park, not caring where you''re going. You''re just trying to get the hell away from him. After almost an hour of running, you finally catch your breath and the rapist is norwhere to be seen.'
act 'Further':
cls
locbegrand = rand(0, 4)
if locbegrand = 0:gt 'park', 'start'
if locbegrand = 1:gt 'street'
if locbegrand = 2:gt 'down'
if locbegrand = 3:gt 'nord'
if locbegrand = 4:gt 'lake', 'start'
end
end
end
if succubusQW = 5:
!!Used if this was a random encounter instead of active hunting
Act 'Lure him in and feed (this can take a lot of time)':
cla
'You wait until he has dragged you almost to the bushes before turning on him.'
act 'Continue': gt 'succubus', 'RapistFight'
end
end
exit
end
end
if $ARGS[0] = '2':
gs 'stat'
gs 'dinsexFX'
if vnesh >= 120 and parkday = daystart:
cls
'You see a man sitting under a tree drinking beer. It''s the guy who fucked you here in the park today. He looks at you and his sudden grin tells you that he remembers who you are.'
act 'Leave':gt 'park', 'start'
exit
elseif vnesh >= 120 and parkday ! daystart and parkslut > 0:
cls
'From the bench under one of the trees came a guy up to you. It''s the guy who fucked you here in the park a while back. He smiles and asks you "Hello again beautiful girl, do you mind if we do it once again?"'
act 'Walk away':gt 'park', 'start'
act '"I don''t mind it all"':
cla
'The guy laughed "Unfortunately, I don''t it''ll be as much fun as the first time, but why don''t you already bend over?".'
act '"Not this time, I''m afraid"':gt 'park', 'start'
act 'Bend over the bench':
cla
*clr
money += 500
gs 'boyStat', 121
pose = 1
parkday = daystart
picrand = rand(1, 6)
'
'
dynamic $vagstart
'The man pushes you over the backrest of the bench and pushes his cock into your pussy. He slowly begins to thrusts in and out of it.'
dynamic $vagend
act 'Leave':gt 'park', 'start'
end
end
exit
elseif vnesh >= 120 and parkday ! daystart and parkslut = 0:
cls
'From the trees comes a man to you. "Good evening beautiful lady, would you like to earn 2.000 ₽?" he asks you.'
act 'Ask him how to do it':
cla
'"What do I have to do?", you ask him. He smiles, "Let us go over there." and points over to the bench in a somewhat secluded part of the park.'
act 'Fuck off, asshole':gt 'park', 'start'
act 'Follow him':
cla
*clr
money += 2000
gs 'boyStat', 121
pose = 1
parkday = daystart
if parkslut = 0:parkslut = 1 & guy += 1
picrand = rand(1, 6)
''
dynamic $vagstart
'The man pushes you over the backrest of the bench and pushes his cock into your pussy. He slowly begins to thrusts in and out of it.'
dynamic $vagend
act 'Leave':gt 'park', 'start'
end
end
act 'Leave':gt 'park', 'start'
exit
else
gt 'parkivent', 'empty'
end
end
if $ARGS[0] = '3':
cls
gs 'stat'
'As you walk through the park, you hear moans and groans coming out of bush close to one of the paths.'
act 'Continue walking':gt 'park', 'start'
act 'Peek':
cla
*clr
pcs_horny += 10
gs 'stat'
''
'You take a peek through the bushes and see three guys fucking one woman. It seems like she''s really enjoying it.'
act 'Leave':gt 'park', 'start'
if pcs_horny >= 50:
act 'Pry':
cla
pcs_horny += 10
gs 'stat'
'You hide behind a tree to get a better look at the group action.'
if pcs_horny >= 75:
'This sight really excites you and you can feel your pussy moisten.'
else
'While this is quite the sight to enjoy, you think it''s better not to get caught, so you silently move away.'
end
act 'Leave':gt 'park', 'start'
end
end
if minifoto = 1 or zenit = 1:
act 'Take a photo':
cla
if minifoto = 1:fotoparkrand = rand(0, 10)
if minifoto = 0:fotoparkrand = rand(0, 1)
if fotoparkrand > 0:
minut += 30
shantfoto += 1
'As you hide behind a tree, you start to take photos of them and watch them until they''re done. Once they are you silently move away and decide to find out who she was. Blackmailing her would be a nice source of income, you think to yourself.'
act 'Back to the park':gt 'park', 'start'
end
if fotoparkrand = 0:
'You hide behind the tree and start taking pictures. Somehow you get carried away and one of the perpetrators noticed you. He slowly walks up behind you, grabs you and takes you to the others.'
'"Look what I''ve found. We''ve got ourselves a stalker" says the guy while holding you tightly.'
dynamic $clrboy
gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
gs 'boyStat', $npclastgenerated
$boy[0] = $boy
gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
$boy[1] = $npclastgenerated
gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
$boy[2] = $npclastgenerated
act 'Try to talk your way out':
cla
rape += 1
guy += 3
'You try to talk your way out, but they just laugh at you, pitying you for even trying. Then one of the guys force you onto your knees and they prepare you to fuck your doggy-style.'
if minifoto = 1:
minifoto = 0
else
zenit = 0
end
act 'Further':gt 'paysex', 'start'
end
act 'Try to run away':
if beg < 10:peshimraperand = rand(0, 11)
if beg >= 10 and beg < 30:peshimraperand = rand(0, 20)
if beg >= 30 and beg < 50:peshimraperand = rand(0, 30)
if beg >= 50 and beg < 70:peshimraperand = rand(0, 40)
if beg >= 70 and beg < 90:peshimraperand = rand(0, 50)
if beg >= 90 and beg < 110:peshimraperand = rand(0, 60)
if beg >= 110 and beg < 130:peshimraperand = rand(0, 70)
if beg >= 130 and beg < 150:peshimraperand = rand(0, 80)
if beg >= 150 and beg < 170:peshimraperand = rand(0, 90)
if beg >= 170:peshimraperand = rand(0, 100)
if peshimraperand < 11:
rape += 1
guy += 3
'You try to run away, but you''re not fast enough and one of them eventually catches up with you. He smashes your camera and drags you back into the bushes. There he forces you onto your knees, preparing you to get fucked doggy-style.'
if minifoto = 1:
minifoto = 0
else
zenit = 0
end
act 'Further':gt 'paysex', 'start'
elseif peshimraperand > 10:
'You rush through the park, not caring where you''re going. You''re just trying to get the hell away from him. After almost an hour of running, you finally catch your breath and the rapist is norwhere to be seen.'
locbegrand = rand(0, 4)
if locbegrand = 0:
act 'Take a look around to see where you are':gt 'park', 'start'
elseif locbegrand = 1:
act 'Take a look around to see where you are':gt 'street'
elseif locbegrand = 2:
act 'Take a look around to see where you are':gt 'down'
elseif locbegrand = 3:
act 'Take a look around to see where you are':gt 'nord'
elseif locbegrand = 4:
act 'Take a look around to see where you are':gt 'lake', 'start'
end
end
end
end
end
act 'Back to the park':gt 'park', 'start'
end
exit
end
end
if $ARGS[0] = '4':
gs 'stat'
if parkblackmail = 0:
cls
'On one of the open grass areas, you see a group of young people having a barbecue. As you walk past them, a guy who is with them, walks up to you and asks you, if you would like to join them.'
act 'Decline and continue your walk':gt 'park', 'start'
act 'Agree and join them':
cla
'You had fun drinking with the guys and girls. One of the guys comes up behind you while you''re at the table an put his arms around your waist, then presses himself against your ass. ...God, he''s HUGE. It feels like a big sausage against your lower back... damn, it''s so hot. You suddenly wonder if you''ve been drinking too fast.'
'Shortly after, one of the guy gropes your titties and pushes you against the closest tree. You softly moan as he massages your breasts. You can feel his stiff cock poking your belly. Then he asks you in a rather harsh tone, "You like this slut, don''t you?"'
'Another guy roughly grabs your breasts, pushes you back against the closest tree, and presses his hips against you. His stiff cock rests against your belly, and you moan softly from the feeling. He roughly asks, "Like it, slut?"'
act 'Tell him to get away':
cla
'You sharply tell him to let you go. Surprised, he takes a step back, and you move away from the tree.'
act 'Leave':
cla
*clr
'You turn to leave, but the guy quickly catches up to you. He grabs your ass, spins you around to face him, and orders "On your knees, quickly, bitch!"'
act 'Kick him in the his nuts and walk away':gt 'park', 'start'
act 'Do as he tells you':
cla
hour += 2
rape += 1
gang += 1
minut += 120
gs 'stat'
''
'Too drunk to resist further, you quickly do as he says. He drops his pants to his knees and abruptly thrusts his big dick into your mouth. You quickly forget about everything else and start hungrily sucking on him - his big, juicy, fragrant cock is driving you mad. He gathers your hair behind your head to make sure it doesn''t get in the way. After a little while he pulls his delicious cock out of your mouth - but it''s immediately replaced by a guy you didn''t even notice approach.'
'His cock is so big, you can barely breath and are on the verge of fainting. More men gather around you and take out their cocks for you to suck on. They call you many names, but ''Slut'' burns itself into your memory, so often it''s used. You suck them off one by one, giving two other cocks a handjob. You try to swallow as much cum as possible, maybe it''s due to you being drunk, but the taste is just overwhelming to you. One of them removes your top, so everyone can enjoy the sight of your beautiful titties.'
'His cock even bigger than the last guy''s, and the excitement it gives you is almost overpowering. The other guys gather around and hurl insults at you, mocking you for sucking strangers. You suck each them off too, one by one, while stroking others, a dick in each hand. Every guy you blow cums in your mouth, and you swallow every time. Someone pulls down your top, letting your boobs spill out. You feel a cock slap against your chest as someone takes the opportunity to give himself a titfuck.'
'"Fuck, slut, suck faster!" orders one of the guys.'
act '"Guys, be quieter... someone might hear"':
cla
'"Guys, be quieter... someone might hear," you try to warn them while coughing.'
'One the guys bitchslaps you, "Shut up slut. You''re not here to talk."'
'"Stop talking and work your mouth, bitch. You''re here to suck, not to lecture us."'
act 'Okay, boy.':
cla
*clr
minut += 120
gs 'stat'
if parkblackmail = 0:guy += 2 & parkblackmail = 1 & parkday = daystart
stat['bj'] += 8
swallow += 6
facial += 2
pcs_horny = 0
cumface += 2
'"Okay, boys," you say around the cock in your mouth.'
'You drunkenly wonder why they insist on talking so loud. But when you open your eyes, you see two of the girls from the group with a camera.'
'With a growl, the guy fucking your chest finally comes - and comes a lot. Your breasts are completely coated with semen. You start to feel an overpowering need to make the guy currently in your mouth cum as well. You put your hands on his ass and pull him toward you, forcing his cock down your own throat, forgetting about the cameras and onlookers. You feel like an insatiable whore as you deepthroat him, swallowing his large head as far as you can manage.'
'The second guy took your hair as the last whore and calling huesoska, roughly finished your face. He grabs your hair, calling you "whore" and "cocksucker" as you move your head, and at the last second roughly jerks your head backwards to cum all over your face. He bathes you with an incredible amount of sperm.'
'That you were ashamed goes without saying - you just swallowed six strangers'' cum and took two others'' loads all over you.'
act 'Go home':gt 'park', 'start'
end
end
end
end
end
end
exit
else
gt 'parkivent', 'empty'
end
end
if $ARGS[0] = '5':
gs 'stat'
!!'You take a relaxing and refreshing walk through the park, trying to figure out the meaning of life.'
act 'Complete walk':gt 'park', 'start'
if yaq = 0 and student > 0:
cls
cla
*clr
'As you walk past a bunch of trees, a man walked up to you. He introduced himself as Yaroslav and asks you, if you would like to earn some money.'
act '"No, thanks"':gt 'park', 'start'
act '"I''m listening"':
cla
'"My house is a bit dirty and I''m look for someone who would like to keep it clean for me.", he says. "All you had to do is to dust and clean everything. My house isn''t too large."'
act 'Turn him down':gt 'park', 'start'
act 'Agree':
cla
'"Alright, but what''s in for me?" you ask him. "I''d pay you 2.000 ₽.", he answers. "By the way, I haven''t asked you for your name yet."'
'"I''m <<$pcs_nickname>>.", you tell him. He nods and smiles and tells you it''s a cute name. Then he gives you his card and judging by the address, it''s somewhere in the city center.'
act 'Ask him, when to come by':
cla
yaq += 1
'"When would you like me to come by?" you ask Yaroslav.'
'"No hurry, just come by when you''ve got some free time, but I''m usually home in the evening, so therer''s just that.", he answers.'
'"Alright, thank you and see you I guess.", you say and walk away.'
act 'Finish your walk':gt 'park', 'start'
end
end
end
exit
else
gt 'parkivent', 'empty'
end
end
if $ARGS[0] = '6':
gs 'stat'
if ublyudokparkivent = 0:
cls
'You were walking through the, somewhen you realized, you ended up in a somewhat shady area of it. Between two trees you can see a man waving at you.'
act 'Walk away':gt 'park', 'start'
act 'Walk up to him':
cla
*clr
ublyudokparkivent = 1
'You walk up to him, asking what he wants. He says, he would like to show you something, but suddenly you are being hit and everything fades to black.'
act 'Wake up':
cla
*clr
gs 'npcgeneratec', 0, 'Rapist', rand(18,40)
gs 'boyStat', $npclastgenerated
''
'"Ouch...", you say groggily as you wake up. "I thought you would never wake up.", a deep voice says. He grabs your hair and pulls you up, then takes his huge knife and holds it to your face. "Look pretty, if you don''t resist, this might be a pleasurable experience for you.", he tells you, "Now take off your clothes, you won''t need them for now."'
act 'Take off your clothing':gt 'parkivent', '6a'
end
end
exit
else
gt 'parkivent', 'empty'
end
end
if $ARGS[0] = '6a':
cls
gs 'stat'
''
'He''s huge and intimidating, you decide it''s better to do as he tells you, so can get out of here alive, hence you take off you clothes and a cold breeze makes your nipples rock hard immediately.'
act '...':
cla
*clr
''
'"Good girl", he says and orders you to bend over. You oblige him and present your rear assets to him. He then ''inspects'' them, by spreading your ass cheeks apart. You yelp when you feel his finger is entering your cunt.'
act '...':
cla
*clr
''
'"The two of us are going to have a lot of fun together, so prepare yourself and make you tight little twat moist for me", he tells you and you begin to rub your clit. He unbuttoned his pants, took out his cock and started to stroke it, while listening to your soft moans.'
act 'Go on...':
cla
*clr
''
'"Come over here and suck me", he orders you, with his rock hard cock in his hand- Come over heNa gut*re darling, my dickhead wants you it sucked. The man grabbed me by the hair and threw it on the ground before him. My knees immediately became ragged and pinching ... - Open your mouth slut! - As soon as I open my mouth, he grabbed my head and began to thrust into my throat his fat cock.'
act 'Suck':gt 'parkivent', '6b'
end
end
end
end
if $ARGS[0] = '6b':
cls
gs 'stat'
''
'His dick smelled dirt and sweat and was slightly salty. I could not afford to admit that I like the taste, but it was so hard and thick that out of my vagina involuntarily flowed lubrication.'
act '...':
cla
*clr
''
'Men do not have to make me a few minutes I became very deep swallow and lick his head from the trunk of the most balls.'
act '...':
cla
*clr
''
'- Well, ka get up darling, suction is certainly good, but your hot hole is definitely better. He put me and planted in my womb just three fingers. It was very painful, my pussy has not stretched and I screamed.'
act 'Masturbate':
cla
*clr
''
'Then the bastard grabbed me by the throat and forced to masturbate herself. I tried to gently stretch his hole, and he meanwhile nadrachival its eldu, then took a rope and tied me.'
act '...':
cla
*clr
''
'When his fat cock, I slowly began to go I started to twitch and kick, but more for the mind. Despite the frantic fear, I was very nervous and even wanted him to fuck me.'
act '...':
cla
*clr
''
'Fat cock sharply into me, pulling up to the uterus. It hurt ... or not, it was nice, I do not know, I can not tell from what I screamed so loud when he pulled me into the damn woods. It is faster and sharper, his cock swelled and I could not remember anything from the mad buzz. He abruptly shoved his cock pressed me to her pubis and hot jet of sperm hit in my uterus, vagina filling warm, slippery fluid.'
act 'Savoury':gt 'parkivent', '6c'
end
end
end
end
end
end
if $ARGS[0] = '6c':
cls
gs 'stat'
''
'- Wow ... - just said bastard, but I did not care for it, now I did not care at all and I hung blissfully kayfovat trying to squeeze numb feet. I did not even feel like it stuck in my pussy his fingers.'
act 'Licking fingers':
cla
*clr
manna -= 15
gs 'cum_manage'
''
'But I could taste his semen when those fingers were in my mouth, but then I realized that for the horror just happened that he came to me.'
act 'Iti':
cla
*clr
''
'- Come on baby ka - pulling her pants and wearing a hat, said the peasant. - You''re a little at me to stay. In my mouth turned out to gag and he untied me and pulled on the rope. I fell a few times, and he put me up in spurts and again we were on the rocks and sharp branches, it is good that he allowed me to wear shoes.'
act '...':
cla
*clr
''
'- That''s my nest - said with a smile bastard, pointing to a strong two-storey house with a high fence, surrounded by barbed wire.'
act 'Lick':gt 'parkivent', '6d'
end
end
end
end
if $ARGS[0] = '6d':
cls
gs 'stat'
''
'This pig did not even took me into the house, and just have cast their clothes and climbed on me. He again began to tear up my swollen pussy, but soon threw my mouth his five fingers. - Let ka, lick them well, believe you handy.'
act '...':
cla
*clr
''
'I began to lick his fingers until saliva ran down his wrist, and then he pulled out his penis and to my horror, began to shove his paws in my ass. When his fingers pushed my anus and penetrated into the rectum, I began kicking and twitching.'
act 'Cry':
cla
*clr
''
'That bastard, grabbed a knife and began to threaten me. Tears streamed from my eyes, but I promised that I will not twitch.'
act 'Relax':
cla
*clr
''
'When his cock was sticked to my compressed sfinker, I tried to relax, that was not so painful. Thick head barely poked my asshole, causing me to shout in pain, but later it became easier ... was even nice. Apparently member abuts the outer wall of the vagina had other feelings, but they were good, very good.'
act 'Shout':
cla
*clr
''
'My cries ceased to be a cry of pain, without even noticing, I began to cry from the buzz and excitement, I again wanted his cock naciloval my pink crack.'
act 'Sit on top':gt 'parkivent', '6e'
end
end
end
end
end
if $ARGS[0] = '6e':
cls
gs 'stat'
''
'When the bastard put me on, I myself began to move her hips to meet his powerful dick, wishing only that he did not stop.'
act 'Jump on a limb':
cla
*clr
''
'I began to jump on his penis, squealing with pleasure, forgetting about everything, except a sense of solid, hot-term in its bosom.'
act 'Correct':
cla
*clr
''
'Jumping off his clubs I tried to sit up again, but the guy cleverly directed his eldu in my ass and she easily slipped into my anus.'
act '...':
cla
orgasm += 1
*clr
''
'I jumped on him, until he finally realized that I roll without feeling, and my body trembles in orgasm. Tears poured from her eyes, as if relieved that that accumulated for all this time inside and I felt incredibly good.'
act 'Suck':
cla
*clr
''
'I am happy to become a member of the men suck, feeling the salty taste of his head, mixed with a taste of my vagina and rectum.'
act 'Substitute priest':
cla
*clr
''
'Then I like a dog licking his feet and turned to him her ass, wanting him to fuck me again.'
act '...':
cla
*clr
spafinloc = 14
gs 'cum_manage'
spafinloc = 4
gs 'cum_manage'
spafinloc = 12
gs 'cum_manage'
spafinloc = 11
gs 'cum_manage'
''
'But the man began to masturbate and very soon I began to feel his hot cum, but this time outside. I really do not want him to let me go, do not want me to lost its perfect dick and so I eagerly began to lick the cum from his cock, not yet had time to drop, wanting to pick it up again.'
'But then again, I felt the blow to the head and fell unconscious again.'
act 'Wake':
cla
*clr
'I woke up somewhere near the lake. I was naked and smeared the entire semen, but my clothes lay near me. I silently thanked for this sex abuser, got dressed and went.'
act 'Leave':gt 'lake', 'start'
end
end
end
end
end
end
end
end
if $ARGS[0] = '7':
gs 'stat'
if pusher = 0:
'Young boy wearing a hooded jacket comes to you and tells you a conspiratorial voice, "Girl. Dose I got pale lady is, you want to try? Completely free. Lovely thing, instantly cleans the brain, the mood is that just ATAS, body sensations such as if you have never been healthier. "'
act 'Leave':gt 'park', 'start'
act 'Yes':
cla
pusher = 1
health = pcs_vital * 10 + pcs_stren * 5
willpower = pcs_intel * 5 + will * 5
manna = (pcs_intel * magik) + magik * 100 + pcs_vital * 10 + rikudo
pcs_horny = 100
nark += 10
narkday = daystart
'You stayed with interest, never tried dope, but because at one time there will be nothing? The guy came up to you and backfilled with a little white powder, you sucked his nose and the world blossomed unexpected colors.'
'The guy looked at you and said, "If you like it, come again, a dose of only 2,000 ₽."'
act 'Leave':gt 'park', 'start'
exit
end
else
gt 'parkivent', 'empty'
end
end
if $ARGS[0] = '8':
!!'You leisurely stroll through the park. Breathing fresh air, thinking about the vicissitudes of life.'
!!act 'Complete walk':gt 'park', 'start'
gs 'stat'
vnerand = rand(0, 1200)
if bfa < 1 and vnerand <= vnesh:
cla
*clr
gs 'boy'
'To you came <<$boybody>> <<$boybod>> <<$boyface>>. One <<$boyClo>>'
'The guy introduced as <<$boydesc>> and asked your number.'
act 'Tell him to phone':
cla
gs 'boyfrend', 'start'
stopboy = 0
'<<$boydescA>> recorded your phone and left.'
act 'Complete walk':gt 'park', 'start'
end
act 'Leave':gt 'park', 'start'
exit
else
gt 'parkivent', 'empty'
end
end
if $ARGS[0] = '9':
gs 'stat'
if bfa >= 1:
cls
'You walk through the park and you notice how the meeting goes your man <<$boydescA>>'
act 'Leave':bfa -= 1 & gt 'park', 'start'
if boyonceA = 0 or SUB = 0 and pcs_dom = 0:
act 'Nice to talk':
cla
bfa += 2
minut += 15
'<<$boydescA>> bradovalsya your chance meeting and hugged you. You nice talk and kiss goodbye to split each according to his deeds.'
act 'Complete walk':gt 'park', 'start'
end
elseif boyonceA = 1 and SUB > 0:
'<<$boydescA>> glad you and taking you by the hand led to a deeper into the park.'
act 'Go with the guy.':gt 'event', 'park'
elseif boyonceA = 1 and pcs_dom > 0:
'<<$boydescA>> glad you and taking you by the hand led to a deeper into the park.'
act 'Offer to sit on the bench. (You decide to have sex with a guy.)':gt 'event', 'park'
act 'Nice to talk':
cla
bfa += 5
minut += 15
'<<$boydescA>> bradovalsya your chance meeting and hugged you. You nice talk and kiss goodbye to split each according to his deeds.'
act 'Complete walk':gt 'park', 'start'
end
end
exit
else
gt 'parkivent', 'empty'
end
end
--- parkivent ---------------------------------