# clener
if $ARGS[0] = 'start':
cla
*clr
minut += 5
clr
gs 'stat'
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
'
office building'
''
'On the walls there are different ads, one of which says:"Cleaner Wanted".'
'Above one of the doors a sign says, Jacob Solomonovich Schneersohn, tailor, 7:00--15:00'
if svQW >= 1:
if hour >= 8 and hour <= 16 and week < 6:
'The door to theTrade Mission is open.'
else
'The door of the trade mission is closed and the schedule is visible:Sat and Sun 8:00--16:00'
end
end
if jouryQwNo = 1 and hour = 17:
'Yuri goes through the corridor (the same office worker who offered you walk, but you refused). He look at you and starts walking closer.'
act 'Talk to Yuri':
cla
minut += 15
gs 'stat'
'Yuri walks up to you and says, "<<$name>>, want to grab a cup of coffee?"'
act 'No':jouryQwNo = 1 & gt 'clener', 'start'
act 'Drink coffee':
cls
minut += 30
gs 'stat'
'You go to the café, where Yuri orders coffee. You sit down at the table and begin to drink. Yuri is painfully quiet. He has no sense of humor and is very stiff. Obviously he likes you, but he does not know what to do. When you are done with the coffee Yuri suggests (going with him?).'
act 'No':jouryQwNo = 1 & gt 'clener', 'start'
dynamic $youriqwest
end
end
end
if borodachQW > 0 and borodachSex = 0 and hour >= 19:'The security guard, Sasha, nods at you.'
if borodachQW > 0 and borodachSex > 0 and hour >= 19:'The security guard, Sasha, smiles and says:"Hi <<$name>>!"'
if borodachQW > 0 and hour >= 19:
act 'Approach Sasha':
cls
minut += 5
gs 'stat'
if borodachSexDay = daystart:'You approach the security guard and say hello. You chat with him a bit, then Sasha was going to crawl and you''re away without becoming disturb him.'
if borodachSexDay ! daystart:
'You approach the security guard and say hello. He winks at you, I stashed the bubble here, as you look at the cult of mass leisure?'
act 'Come':
cla
minut += 5
gs 'stat'
'Sasha takes you into his cubbyhole and pulls out a bottle of vodka from under the table. He then reaches into a drawer and pulls out a piece of liver sausage and some cheese. He pours some of the vodka out into two glasses.'
act 'Have a drink':
cla
'You drink the shitty vodka and it burns your throat. Breath you perlo of shit and you quickly grabbed cheese zanyuhivat friendship. Sasha casually downs the glass and doesn''t even blink. "Ah, good one."'
'While you are leaning over to eat the sausage, you feel a light touch as the guard pats you on the ass.'
act 'Smile':
cla
minut += 15
horny += 10
gs 'stat'
'You smile and Sasha pours more vodka, not stopping from caressing your buttocks.'
if horny < 50:dynamic $borodachNo2
dynamic $borodachDrink
end
act 'Put your hand on his pants':
cls
minut += 15
horny += 10
borodachTimes += 1
gs 'stat'
picrand = rand(0, 2)
if picrand = 0:''
if picrand = 1:''
if picrand = 2:''
'You put your hand on his crotch and feel his erection harden. Your thin fingers slide over his hardon and find the zipper. You unzip him and get his cock out of his pants. Sasha relaxes on the couch waiting for you to continue what you started.'
dynamic $ohrhj
dynamic $ohrbj
end
end
end
end
act 'Leave':gt 'clener', 'start'
end
end
if clenerT >= 3 and borodachQW = 0 and hour >= 19:
'On a chair in front of the guard sits with crosswords and painfully remembers something. He asks to see you. "Bad ending the case, and the second letter."'
act 'Reply guard':
cls
borodachQW = 1
'(You) - Fiasco'
'(Guard) - Exactly what I think PIZDETS can not be the answer.'
act 'Leave':gt 'clener', 'start'
act 'Zasmeyatsya':
cla
borodachQW = 2
'You laughed at the security guard, he smiled and put aside crosswords. "I love you there is no longer seen. Cleaning lady work?"'
'You nodded, "yes, moonlighting, then pay that kind of money that would not call it work."'
'(Guard) - by the way I''m Sasha, and you?'
'(You) - My World.'
'(Sasha) - Very nice. I''ve got a bottle and have zakus, sostavish business?'
act 'Sorry, I have to go':gt 'clener', 'start'
act 'Why not?':
cla
minut += 5
gs 'stat'
'Sasha took you into his cubbyhole and took out a bottle of vodka under the table, reached into a drawer and pulled out a piece of liver sausage and cheese friendship. Took out a couple of glasses of vodka and poured there.'
act 'Have a drink':
cla
'You drank vodka give zhzhonoy rubber and booze. Breath you perlo of shit and you quickly grabbed cheese zanyuhivat friendship. Sasha habitually slammed the glass and not even pomorschalsya. "Ah, well gone."'
'While you are leaning to the table and nibbled zanyuhivali, you feel like a hand guard as if by chance, you stroking light touch on the ass.'
act 'Hey! What are you doing?':
cla
minut += 15
horny += 10
gs 'stat'
'(You) - Hey! What are you doing?'
'"C''mon, I accidentally." Sasha began to mutter pouring more vodka. "Let''s have a drink."'
if horny < 50:dynamic $borodachNo
dynamic $borodachDrink
end
act 'To pretend not to notice':
cla
minut += 15
horny += 15 + SUB
gs 'stat'
'You ate, trying not to pay attention to, as it were casual touch. Sasha poured more vodka and say "Between the first and second pereryvchik not great" knocked over a glass.'
if horny < 50:dynamic $borodachNo
dynamic $borodachDrink
end
end
end
end
end
end
if hour >= 7 and hour <= 15:
act 'Go to the tailor':
cla
*clr
'Elderly Jew makes a pattern at the table, he''s a bit down glasses and looking at you on top of the points.'
if portnoyQW > 0:
'Aah <<$name>>, come, come again cut down?'
if money >= 500:
act 'Take in the clothes you are wearing for 500 rubles':
cla
*clr
minut += 15
if $clothingworntype = 'vatnik' or $clothingworntype = 'sforma' or $clothingworntype = 'yoga' or $clothingworntype = 'sarafan':
'What are you wasting my time for? This type of clothing does not need to be resized.'
else
money -= 500
dynamic '<<$clothingworntype>>B[<>] = bedra'
'You undressed and filed for shirmochka clothes Jacob Solomonovich it fifteen minutes ushil your clothes and returned to you.'
end
act 'Leave':gt 'clener', 'start'
end
act 'Take in different clothes':gt 'clothing', 'view_clothing_list', 'resize'
act 'Take in all the clothes':gt 'portnoi2'
end
else
'Hello young lady. I am Solomonovich Jacob, for you simply Yasha. And what is your name?'
act 'Tell him your name':
cla
portnoyQW = 1
'(You) - <<$name>>'
'(Yasha) - What pgekgasnoe name. <<$name>>, come, sit here on this chair. Any way than I can be useful to you?'
act 'Can you tailor my clothes?':
cla
*clr
minut += 15
gs 'stat'
'(You) - Can you tailor my clothes to fit me better?'
'(Yasha) - Of course I can! Otherwise, what kind of tailor would I be? Here, let me see that you''re wearing.'
'Jacob Solomonovich you jumped smartly and flexible by removing the meter from the neck began obmeryat your chest, waist and hips.'
'Well, I can take in whatever clothing you bring to me for 500 rubles.'
act 'Leave':gt 'clener', 'start'
end
end
end
act 'Leave':gt 'clener', 'start'
end
end
if clener >= 10 and clenerT = 0:
act 'Ask whether there is more work':
cla
'You ask Boris Ivanovich whether he has more work for you. He says that he needs a cleaner for cleaning the toilets. You can work almost every day. Cleaning toilets for an hour gets you 100 rubles immediately on hand.'
act 'Refuse and leave':gt 'street'
act 'Agree to work':
cla
clenerT = 1
'You agreed to work.'
act 'Leave':gt 'clener', 'start'
end
end
end
if clener = 1:
act 'Talk about available jobs':
cla
'You go into the office that advertised the job. You meet a large man in a jacket. He tells you you can work almost every day. Office cleaning 100 rubles per hour, cash.'
act 'Refuse and leave':gt 'street'
act 'Agree to work':
cla
clener = 2
'You agreed to work.'
act 'Leave':gt 'clener', 'start'
end
end
end
if clener > 1 and clenday ! daystart:
act 'Mop the floor in the office (1:00)':
cla
*clr
clenday = daystart
minut += 60
clener += 1
manna -= 15
money += 100
sweat += 2
''
if clener < 5:
if hour >= 9 and hour <= 16:'You fill a bucket of water and go to the office with a mop. The office staff keeps out of the way while you clean the floor.'
elseif clener >= 5 and clener < 10:
if hour >= 9 and hour <= 16:
jouryQw += 1
'You fill a bucket of water and go to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you feel his burning gaze.'
end
elseif clener >= 10:
if hour >= 9 and hour <= 16 and jouryQw < 7:
jouryQw += 1
'You fill a bucket of water and go to the office with a mop. The office staff keeps out of the way while you clean the floor. One of the office workers, a man with blond hair and a red face looks at you and tries to hide it, but you feel his burning gaze.'
elseif jouryQw = 7 and hour >= 9 and hour <= 16:
cls
gs 'stat'
jouryQw += 1
''
'You scored in a bucket of water and went to the office with a rag mop capturing. All the staff went out of the office, except for a red-blond. He walked up to you and told you visibly nervous quiet "Hi. My name Jura. You loved me. Can converge to something after work?"'
act 'No':
cla
jouryQwNo = 1
'After the work performed you come to the commandant of the building Boris Ivanovich. He gave you 100 rubles for the work.'
act 'Leave':gt 'clener', 'start'
end
act 'Yes':
cla
minut += 15
gs 'stat'
'Yuri said that he now exits and greet you at the entrance to the building.'
'After the work performed you come to the commandant of the building Boris Ivanovich. He gave you 100 rubles for the work.'
'Code you are out of the commandant at the entrance to the building was already waiting for you, Yuri. He''s pretty strong emotions and it seems as if he swallowed scrap. Not knowing what to say, he blurted out, "Maybe we''ll go to me, the movie''s look, drink champagne, we''ll talk."'
act 'No':jouryQwNo = 1 & gt 'clener', 'start'
dynamic $youriqwest
end
exit
end
if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex = 0:'You scored in a bucket of water and went to the office with a rag mop capturing. Sotrudnikiki office parted and gave you clean the floor. Yuri looked at you groping look at your figure.'
if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0:'You scored in a bucket of water and went to the office with a rag mop capturing. Sotrudnikiki office parted and gave you clean the floor. Yuri pretending not to notice you left the office.'
end
if hour < 9 or hour > 16:'In the office is unoccupied, you quietly washed the floor and wiped the floor in the office.'
'After the work performed you come to the commandant of the building Boris Ivanovich. He gave you 100 rubles for the work.'
act 'Leave':gt 'clener', 'start'
end
end
if clenerT >= 1 and clendayT ! daystart:
act 'Clean toilets (1:00)':
cla
*clr
clendayT = daystart
minut += 60
clenerT += 1
manna -= 25
money += 100
sweat += 3
''
if jouryQw > 7 and hour >= 9 and hour <= 16 and jourySex > 0 and jouryResult = 0:
'You entered the booth and began to scrub the toilet bowl. In tulet slammed the door and somebody came in, you looked out of the booth and saw George. He, too, saw you and came to you. "<<$name>>, do not come to me in the office, well, you know, the team does not understand what I''m meeting with the cleaner."'
act 'You make me ashamed?':
cla
'You come off the toilet and looked into the eyes of Yuri asked, "You stesnyaeshsya me?" Yuri stammered, "Well, not that that would be embarrassed, but you must understand, I am a manager, you lady. We must not be seen together. But I want you to continue on. You know where I live, came to see me after 4 pm."'
act 'Fuck you.':
cla
dom += 1
jouryResult = 1
'Such behavior has offended you and Yuri you without hesitation sent him. He turned and walked out of the closet.'
'You washed the floor in the toilet and kicked all the toilets and urinals to shine. After that you were given 100 rubles for his work.'
act 'Leave':gt 'clener', 'start'
end
act 'Okay.':
cla
sub += 1
jouryResult = 10
'Jury sees you only hole drya its members. But you put up with it and agreed to go to his home. Yuri nodded in satisfaction and walked out of the toilet.'
'You washed the floor in the toilet and kicked all the toilets and urinals to shine. After that you were given 100 rubles for his work.'
act 'Leave':gt 'clener', 'start'
end
end
exit
end
if StasikValera > 0 and SVqw = 0:
'You nadraivali toilet to shine in this moment heard the toilet as someone walked in, turned around you saw a man. Suddenly you''ve learned it, it Stasik, with him and his friend Valera you met at the beach. Stasik also apparently recognize you and come up to you, "Hi <<$name>> thou is a cleaner work?"'
act 'I earn the money needed.':
cls
gs 'stat'
''
'You shrugged. "I earn. I need the money." Stasik smiled "Well, for an attractive girl I can find a decent part-time job. I just need merchandisers."'
act 'Can be more?':
cls
SVqw = 1
gs 'stat'
''
'You asked about the details of Stas. Stasik you said "It''s very simple. In northern, central and residential areas are supermarkets. Thou shalt come to our office to take a job to work, then go to all these stores and arrange our products there charges according assignment. At the checkout take receipt confirming that that you were at work. Thereafter yavlyaeshsya you to our office and we will pay you compensation. 500 rubles. works you will have a few hours. Labour I''m not asking. So what? "'
act 'Not interested':gt 'clener', 'start'
act 'I agree.':
cls
SVqw = 2
gs 'stat'
''
'You agreed and Stas fairly nodded, then walked out of the toilet.'
act 'Leave':gt 'clener', 'start'
end
end
end
exit
end
'You washed the floor in the toilet and kicked all the toilets and urinals to shine. After that you were given 100 rubles for his work.'
act 'Leave':gt 'clener', 'start'
end
end
act 'Leave':gt 'street'
end
--- clener ---------------------------------