# yarik
Close ALL
if $ARGS[0] = 'start':
cls
minut += 5
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'
Apartment businessman Yaroslav'
''
act 'Ring the doorbell':
if hour >= 16 and hour <= 17 and yaq = 1:
cla
*clr
''
'Yaroslav opens the door.'
'"<<$name>>! Hi! Come on in."'
act 'Enter the apartment':gt 'yarik', 'yaqw'
else
'You rang the doorbell but no one answers.'
end
end
act 'Leave':
cla
minut += 5
gt 'down'
end
end
if $ARGS[0] = 'yaqw':
cla
*clr
''
'I need you to tidy up, dust, and wash some clothes.'
act 'Agree':
cla
clr
minut += 120
manna += 50
sweat += 1
gs 'stat'
'You clean Yaroslav''s apartment, as he sits sorting through some papers and reading them.'
if rand (0,2) ! 0:
cla
'Suddenly he turns to you. "<<$name>>, can you also clean the floor in the bathroom?"'
act 'Decline':
cla
money += 1500
uborkayar += 1
'"Its OK I don''t want to make you late. Here is 1500 ₽ for a job well done. Come again at the same time any evening if you want the work."'
act 'Leave':gt 'down'
end
if yarikwork > 0:
act 'Agree':gt 'yarik', '3'
elseif uborkayar > 0:
act 'Agree':gt 'yarik', '1'
end
else
money += 1500
uborkayar += 1
'After you have finished, he pays you 1500 ₽ and tells you to come back at the same time any evening for more work.'
act 'Leave':gt 'down'
end
end
act 'Leave':gt 'down'
end
if $ARGS[0] = '1':
cls
gs 'stat'
minut += 10
''
'As you gat started with the floor, you sit down and start to think about the things you have sunk to doing, your clothes wet, armpits starting to smell. Well at least you will earn some money for your efforts.'
act 'Scrub the floor':
cla
*clr
minut += 5
''
'Apparently deciding to check how I am coping, Yaroslav stands in the doorway of the bathroom, watching you. As you clean you start to imagine the situation becoming more sexual and fantisize about seducing Yaroslav.'
act 'Carry on cleaning':
cla
*clr
minut += 15
money += 2000
''
'You finish the floor and polish the shower screen. Yaroslav seems happy with your work and pays you 2000 ₽.'
act 'Leave':gt 'down'
end
if uborkayar > 2:
act 'Seduce him':gt 'yarik', '2'
end
end
end
if $ARGS[0] = '2':
cla
*clr
''
'"Hey!" You spin around "Are you looking at my ass?" You cried indignantly, but instead of trying to prevent him, you make sure he gets a good look at it.'
act 'Stand':
cla
*clr
''
'Yaroslav starts to make excuses, as you stand up. Locking eyes with him you slowly wash the shower screen. "Listen, I want to earn a little more money and you''re a good looking guy." You say, propositioning Yaroslav.'
act 'Continue':
cla
*clr
minut += 15
''
'Yaroslav says nothing, so you decide to give him a bit of a show so that he can see exactly what you are suggesting.'
'"I can''t say the thought didn''t cross my mind <<$name>>. I''ll tell you what, if I''m feeeling horny I will ask you to clean the bthroom. If you want to mess around I''ll give you a nice bonus."'
act 'Agree':
cla
yarikwork = 1
money += 3000
'You accept his terms. He tells you he can''t right now as he has a project to complete for the morning, but pays you 3000 ₽ and encourages you to come back at the same time any evening.'
act 'Leave':gt 'down'
end
act 'Decline':
cla
yaq = 0
'You tell him that you have cahnged your mind and do not want to do this.'
'"You fucking cock-teasing bitch! Leading me on like that, then changing your mind! Get the fuck out and don''t come back."'
'He is clearly furious and has no intention of paying you now. You release your only option is to leave before he gets violent.'
act 'Leave':gt 'down'
end
end
end
end
if $ARGS[0] = '3':
cla
*clr
$boy = 'Yaroslav'
sexpartkno = 1
minut += 5
''
'You give the floor a quick wash as you wait for Yaroslav to appear in the doorway.'
'"Are you looking at my ass?" You ask, giving him a good look at it.'
'He smiles and says, "Very much so, now let''s talk business."'
act 'Stand up and remove top':
cla
*clr
''
'You stand by the shower and slowly remove your top and bra. Looking at the wad of cash in his hand you say, "It depends how much you would like to spend."'
'"I''ll give you 250 for a show"'
act 'Put on a show':gt 'yarik', '4'
if yarikwork > 2:
'"I''ll give you 500 for a blowjob."'
act 'Blow him':gt 'yarik', '5'
end
if yarikwork > 4:
'"I''ll give you 1000 for sex."'
act 'Have sex':gt 'yarik', '6'
end
if yarikwork > 8:
'"I''ll give you 1500 for anal sex."'
act 'Have anal':gt 'yarik', '7'
end
end
end
if $ARGS[0] = '4':
cla
*clr
minut += 5
horny += 10
''
'You squeeze out your sponge over your breasts and start to rub them seductively, "Oh dear, I''m so wet ..."'
act 'Show him':
cla
*clr
minut += 5
horny += 10
''
'"Let me show you." You strip off the rest of your clothes and sit on a unit, lifting you legs to show Yaroslav everything.'
act 'Finger yourself':
cls
horny += 10
minut += 5
gs 'stat'
''
'You stick 2 fingers into your vagina, and thrust them back and forth. You feel your excitment grow.'
if horny > 90:
orgasm += 1
horny = 0
'You are caught off guard by your arousal and have a surprising, but pleasing orgasm.'
end
act 'Shower':
minut += 15
dynamic $showerdin
money += 2250
gt 'yarik', 'end'
end
end
end
end
end
if $ARGS[0] = '5':
cls
minut += 5
horny += 10
gs 'stat'
''
'Looking down, you see that his cock is, wow, that''s a really delicious looking cock. You lick your lips in anticipation.'
act 'Approach':
cla
*clr
minut += 5
''
'You let your shorts drop to the floor and walk upto Yaroslav. You surprise him with a long, lingering kiss as you grip his cock in your hand. As you pull back his breath is heavy and his eyeshave glazed over.'
act 'Kneel down':
cla
*clr
minut += 5
''
'You slowly drop to your knees and began to lick the head of his cock sensually. Yaroslav clearly enjoys the attention and you keep your eyes locked on his.'
act 'Suck it':
cla
*clr
minut += 10
horny += 10
bj += 1
throat += 1
''
'He starts to move his hips, trying to get more, you hold him back for a few seconds, then wrap your <<$liptalk>> around the pulsating member shift your focus to maximising his pleasure.'
act 'Continue':
cls
minut += 5
facial += 1
spafinloc = 12
gs 'cum_manage'
$boy = 'Yaroslav'
sexpartkno = 1
spafinloc = 7
gs 'cum_manage'
gs 'stat'
''
'As he is about to come, Yaroslav moaning and holding the base of his own cock, pulls back and sparys his spunk all over your face. You sit there catchong your breath as sperm drips down onto you breasts.'
if horny > 90:
orgasm += 1
VAF += 1
horny = 0
'You don''t realise how aroused you have gotten until you moan in orgasm.'
end
act 'Shower':
minut += 15
dynamic $showerdin
money += 2500
gt 'yarik', 'end'
end
end
end
end
end
end
end
if $ARGS[0] = '6':
cla
*clr
minut += 5
horny += 10
''
'"Let''s fuck then." You strip off the rest of your clothes and sit on a unit, lifting you legs to show Yaroslav everything.'
act 'Wait':
cls
minut += 5
horny += 10
gs 'stat'
''
'Yaroslav strips off his clothes, his cock is already fully erect. He walks up to you and rubs the head of it around your pussy.'
act 'Fuck':
cla
*clr
minut += 5
horny += 10
cumprecheck = 1
gs 'cum_manage'
''
'You nod to show him you are ready and he slowly pushes his member past your lips and fills your pussy, you let out a small moan of pleasure.'
act 'Continue':
cls
minut += 5
horny += 10
gs 'stat'
''
'He lifts your legs and holds them straight up, he can''t reach as deeply, but the change of sensation is more than making up for that.'
act 'Change position':
cla
*clr
minut += 10
horny += 10
''
'Yaroslav withdraws and helps you down from the unit. You climb on top of him and ride him. You move your hips, occasionally lifting until it was almost free, then thrusting down on the full length.'
act 'Change back':
cls
minut += 5
horny += 10
gs 'stat'
''
'You get off of Yaroslav and help him to his feet. He lifts you ack onto the unit and quickly starts to pond you once more.'
act 'Continue':
cla
*clr
minut += 5
horny += 10
''
'Breathing heavily and getting slick with sweat, Yaroslav lifts your right leg up and places it on top of your left one. This gives you another new feeling of stimulation and gret respect for his endurance.'
act 'Finish':
cls
minut += 5
vagina += 1
sex += 1
facial += 1
spafinloc = 12
gs 'cum_manage'
$boy = 'Yaroslav'
sexpartkno = 1
spafinloc = 7
gs 'cum_manage'
gs 'stat'
''
'Briskly, Yaroslav pulls you from the unit and puts you on your knees. Your face has barely reached his penis, when it sprays you with sperm, covering your face and chest.'
if horny > 90:
orgasm += 1
horny = 0
'You enjoy a fulfilling orgasm.'
end
act 'Shower':
minut += 15
dynamic $showerdin
money += 3000
gt 'yarik', 'end'
end
end
end
end
end
end
end
end
end
if $ARGS[0] = '7':
cls
minut += 5
horny += 10
gs 'stat'
''
'"Let''s do this then." You strip off the rest of your clothes and sit on a unit, you twist to the side and lift your butt check to expose your ass.'
act 'Wait':
cla
*clr
minut += 5
horny += 10
cumprecheck = 1
gs 'cum_manage'
''
'Yaroslav approaches you, he just goes for it without any pause or warning. You are about to shout expecting pain, but just bit your lip in pleasure as you realise he has entered your pussy.'
act 'Continue':
cls
minut += 5
horny += 10
gs 'stat'
''
'You start to get in the mood and enjoy the sex, when he removes his penis and starts to work it against your anus. Slowly you feel him enter and the head of his penis starts to fill your butt.'
act'Continue':
cla
*clr
minut += 5
horny += 10
''
'He turns you to your side and starts to drive his full length home. He supports your head with his hand and you suck on his thumb the initial pain giving way to bliss.'
act'Change position':
cls
minut += 5
horny += 10
gs 'stat'
''
'You push Yaroslav back and getting the hint he withdraws and helps you down. Lying on his back he guides your anus back on to his cock and you set your own rhythm trying to bring yourself to orgasm.'
act 'Continue':
cla
*clr
minut += 5
spafinloc = 12
gs 'cum_manage'
$boy = 'Yaroslav'
sexpartkno = 1
spafinloc = 7
gs 'cum_manage'
''
'As he is about to come, Yaroslav moaning and holding the base of his own cock, pulls back and sparys his spunk all over your face. You sit there catchong your breath as sperm drips down onto you breasts.'
if horny > 90:
orgasm += 1
horny = 0
'You have a powerful orgasm.'
end
act 'Shower':
minut += 15
dynamic $showerdin
money += 3500
gt 'yarik', 'end'
end
end
end
end
end
end
end
if $ARGS[0] = 'end':
cls
sweat = 0
hapri = 0
dynamic $showerdin
gs 'stat'
''
'Yaroslav leaves you to shower and gives you your wage and the bonus as per your agreement. He tells you he wiill be around every evening at the same time.'
act 'Get dressed and leave':
yarikwork += 1
gt 'down'
end
end
--- yarik ---------------------------------