# korr2x
CLOSE ALL
if sound = 0:PLAY 'sound/korr.mp3',30
act 'In the bedroom':
gt'bedr2x'
end
act 'In the bathroom':
gt'vanr2x'
end
act 'In the kitchen':
gt'kuhr2x'
end
act 'The Hall':
gt'sitr2x'
end
act 'OUTSIDE':
cls
if sick <= 72 and $clothingworntype ! 'nude':
xgt'liamel'
elseif $clothingworntype ! 'nude':
'YOU TOO MUCH THAT sick to walk down the street.'
xgt $curloc
else
'You need to get dressed.'
xgt $curloc
end
end
$metkaM = $ARGS[0]
$locM = $CURLOC
$metka = $ARGS[0]
$loc = $CURLOC
clr
popolaini = 0
saunaYouRoom = 0
boycherdaksex = 0
bonusZ = 0
music_on = 0
minut = minut + 1
housrA = 1
housrMir = 0
elektro = elektro + 1
gs'stat'
FColor = RGB(0,0,0)
BColor = RGB(255,255,255)
LColor = RGB(106,90,205)
'
Corridor'
''
'Near the entrance is your coat hook.'
if suhbelo > 0:'Dried on the clothesline <> pieces of linen.'
if umbrella > 0:'On a hook hanging umbrella'
if sobaka = 1:'Near the entrance to the bedroom is your <<$namesob>>'
if krolik = 1:'On the floor, resting <<$namekrol>>'
if popugai = 1:'In the cell, sitting <<$namepopu>>'
if parkday ! day and parkblackmail = 1:
parkblackmail = 2
parkday = day
'You come in the mail manila envelope, opening it you see the photos. Hell, This pictures as you do blowjob to two guys in a park.'
'Small note states:'
'If you do not want to have these pictures were posted on your porch and sent to your job, Come at (The address contains the Photo Studio)'
'PS, if you do not come today, tomorrow pictures will hang you in the stairwell.'
elseif parkday ! day and parkblackmail = 2:
parkblackmail = 0
fotoyousuck = 1
'Hell, your pictures with a face smeared in sperm and two huyami mouth plastered around porch.'
end
if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
'The doorbell rings'
act 'Come to the door':
cls
gs'stat'
'You came to the door and looked through the peephole. On the site you see the dark figure of a man. Apparently the man heard you and told you through the door. "It`s me. Plumber Grisha. You have my money."'
act 'Open the door':
cls
money -= santehnikDolg
santehnikDolg = 0
gs'stat'
'You opened the door and plumbing Grisha smiled. "I thought you were hiding from me now will. Well? There is nothing to pay?" You nodded and climbed for purse. Counting fifteen hundred you gave the money to Grisha and he put them in his pocket. Then I say goodbye and left.'
act 'Close the door':gt $curloc
end
end
end
if IvanPodstavaQW = 3 and hour >= 9 and hour <= 20:
cls
IvanPodstavaQW = 4
if DolgRS <= moneySUM:
money = moneySUM-650000
karta = 0
stolmoney = 0
minut += 120
'For you came up the police and took you to court. You are able to pay your debt and you released to reconcile the parties.'
act 'Get out of the courthouse':gt'down'
elseif DolgRS > moneySUM:
DolgRS = 650000-moneySUM-60000
money = 0
karta = 0
stolmoney = 0
age += 5
vidage += 7
year += 5
money = 2000
'For you came up the police and took you to court. At trial, you are given five years of general regime, is obliged to pay the debt <>.'
act 'Sitting in jail':
cls
srok_kolvo = 1
srok_otsidki += 5
salo = 10
fat = 10
curly = 0
mop = 1
skin = 0
tan = 0
leghair = 6
lobok = 3
bfa = 0
narkoman = 0
nark = 0
SLomka = 0
work = 0
workKafe = 0
workhosp = 0
worksalon = 0
tanwork = 0
workSec = 0
stipuha = 0
preg = 0
young_shop_work = 0
student = 0
kurs = 0
semestr = 0
abiturient = 0
stipuha = 0
lektor = 0
gs'stat'
'Time dragged on for a long time. Your life and work was tedious and monotonous. You five years sewed quilted jackets, We had dinner in the dining room and went to sleep in barracks surrounded by other women inmates. With your salary 2000 ₽ a month listed 1000 debt repayment. But time does not stand still and still came to an end your torment. You let go and gave 2000 ₽. You got on the train and came back to the city.'
act 'Exit the train':gt'vokzal'
end
end
exit
end
if IvanPodstavaDay ! day and IvanPodstavaQW = 1 and hour >= 8 and hour <= 20:
'The doorbell rings'
act 'Come to the door':
cls
gs'stat'
'You came to the door and looked through the peephole. On the site you will see a few men. In the dark you looked at them cap. One of the men said to you through the door. <<$name>> <<$surname>> open, militia.'
act 'Open the door':
cls
minut += 60
IvanPodstavaQW = 2
gs'stat'
'You opened the door to police puzzled, what they want from you. The room took a few men in uniform and with them some people in civilian clothes. Thin and skinny guy with stubble week and a gun in a holster attached to the belt arm said. "Witnesses, take your seats. Who is going to happen searched the apartment of the citizen, who is accused of stealing." The investigator turned to you. "That order, this for your arrest, This search warrant. Can be found." The police searched in all your apartment. Soon, one of them came out and said,. Here are found the keys, Judging by the description of it is just the keys of the office and safe, where they are stolen money. Witnesses signed the protocol that gave them the investigator. He scowled at you and nodded policeman, he has got your hands behind your back and your wrist snap cuffs.'
act 'Go to the police':
cls
minut += 60
gs'stat'
'You brought home in handcuffs and put into a police UAZ. After, steel door slams and UAZ car started shaking and growling at each bump. Finally you come somewhere and you took out UAZ was conducted in the office of the already familiar to the investigator. He took off the handcuffs and asked you to sit down. You sat on the hard and uncomfortable chair, and the investigator, meanwhile, turned on the TV and set up a video cassette. On the screen was a picture of a surveillance camera in Bystroeshke. They could see the corridor. Soon appeared in the hallway you. You came to the door and opened it entered the office. After a while, the door opened and you are out of the office with a thick envelope in his hands. The investigator turned off the VCR and took the tape, then he put another tape. The next drawer cabinet was Chubais. The front door opened, and in it you came, holding keys in his hand. You went to the safe and opened it with the key. We got an envelope. <<$burgerIvanText>>.'
'The inspector turned off the TV and took a plastic bag from the table with the keys. He threw them on the table and finally spoke. "The examination found, it`s really the keys to the room and the safe owner Bystroezhki. During the search they were found in your apartment. On the recording surveillance cameras can clearly see how you got into the office and stole 650 thousands." He took the protocol and taking the pen in his hand began to write. Scribbled floor sheet he raised his gloomy eyes on you and said. "Confession helps you in court. All the same, it is the first time, and provided, that you return the money, you may be given a conditional sentence, if you admit your guilt."'
act 'To sign a confession':
cls
minut += 60
gs'stat'
'You signed a confession and the investigator shouted "Duty." The police officer entered the room. The investigator nodded showing him you, Take her.'
act 'Go':gt'kameraKPZ'
end
act 'Tell how it was':
cls
minut += 60
gs'stat'
'You were telling the investigator how it was. As a manager you Ivan Framed. But the investigator listened to you on the floor of the ear. Finally, he slammed his fist on the table and yelled at you "I was not born yesterday, To me such nonsense feed! If you do not cooperate, I`ll rot!" The police officer entered the room. The investigator nodded showing him you, Take her.'
act 'Go':gt'kameraKPZ'
end
end
end
end
exit
end
if gopstop > 30:gt'police','1'
if sick > 0 and doktorday ! day:
act 'Call a doctor':doktorday = day & dynamic $polidin
end
$ninel0 = {
cla
*clr
''
'You open the door. On the threshold stands a pretty young girl with a medical bag in his hand.'
'(You) - Hello, doctor'
'(Doctor) - Hello. My name Ninel Pavlovna - I replaces your local therapist. Where the patient?'
'(You) - It`s me... kha-kha-kha.'
'(Doctor) - Clear. Then come - You need to go to bed.'
act 'Conduct doctor to the bedroom and lay down':
cla
*clr
ninelmet = 1
''
'The doctor sat down on the edge of your bed and said,:'
'(Doctor)- At that complain, <<$name>>? Can I call you?'
'(You) - Of course... Kha, kha, kha... Oh, doctor, surely, I have the flu - cough is killing and very sore throat. And the temperature is high.'
'(Doctor) - Runny nose there? Headache? Aching bones?'
'(You) - Yes-yes. A-Sneezy-and!'
'(Doctor) - Now I will examine you. Undress.'
act 'Undress':
cla
*clr
minut = minut + 5
horny = horny + 10
clr
gs'stat'
''
'You undressed for a long time and the doctor listened to your lungs. Her hands were cool and gentle touch and a stethoscope like a weasel...'
'(Doctor) - Yes, crepitation... Now open your mouth. Like this - "and-and-and"...'
act 'A-a-a':
cla
*clr
''
'You have opened my mouth and the doctor examined your sore throat'
'(Doctor) - Hmmm... Throat very red and inflamed... Now it is necessary to measure the temperature.'
act 'Stick a thermometer in her mouth':
cla
*clr
''
'(Doctor) No, not so. The temperature should be measured rectally.'
'(You) - E-e-e...'
'(Doctor) - Do not be afraid, <<$name>>, it does not hurt.'
'(You) - Well, if you are sure...'
'(Doctor) - I`m sure. Come on - lie down on his stomach and spread your arms buttocks.'
act 'Substitute the ass':
cla
*clr
minut = minut + 10
horny = horny + 10
clr
gs'stat'
''
'You obediently flips and substitute the ass. Dr. lubricate your anus lubricant and deftly introduces a thermometer. You flinch, but no pain, and pleasure. The doctor does not leave the thermometer just stick in your ass, and slowly moves it there-here and it`s very nice. Do you feel the growing excitement.'
if horny >= 50:
act 'Moaning with pleasure':
cla
*clr
''
'The doctor takes out a thermometer from your priests and checks'
'(Doctor) 39,2... Very bad. Turn, please, on the back - you need to palpate the lymph nodes.'
act 'Roll over on his back':
cla
*clr
minut = minut + 15
horny = horny + 10
clr
gs'stat'
''
'The doctor began to stroke and knead your stomach and thighs. You are not sure, it is a medical procedure - too long and tenderly she delalet, but you are very nice and you did not object.'
'Excitation, meanwhile, all increases, you feel, as your pussy moistened and begins to whine sweet...'
act 'Blushing with embarrassment':
cla
*clr
clr
horny = horny + 15
!time = time + 15
gs'stat'
''
'You blush with embarrassment, but then fall below the hands of the doctor and she starts caressing your pussy'
'(You) - Doctor, what are you doing?! - at the same time embarrassed, indignant and frightened screams you.'
'(Doctor) - I treat you, foolish. I feel the magic in you, so you`re one of us, and I can use its power safely.'
'(You) - So you, too, the magician?!'
'(Doctor) - Yes, Only my magic special - Tantric. I heard about this?'
'(You) - No, I do not remember...'
'(Doctor) - It`s magic, based on sensuality and sex. Roughly speaking, I can cast, Only when I am having sex.'
'(You) - I.e..?'
'(Doctor) - I.e, if you and I`s have sex - I`ll heal. You agree?'
'(You) - And in return?'
'(Doctor) - Nothing - I do this only for their own satisfaction. I, see, whether, I am experiencing orgasm, unless conjure.'
'(You) - Then of course - I agree.'
act 'Surrender to the gentle hands Ninel':gt'housecall','ninel2'
end
end
end
end
act 'Rebelled':
cla
*clr
''
'(You) - Doctor, what are you doing?'
'The doctor takes out a thermometer from your priests and calmly answers:'
'(Doctor) - You measure the temperature. 39,2 - very bad.'
act 'Doctor, that with me?':
cla
'(You, fright) - Doctor, that with me?'
'(Doctor) Do you really have the flu. Now I`ll give you an injection of an antibiotic and antipyretic, and you will feel better.'
act 'Lie on your stomach and bare ass':
cla
*clr
minut = minut + 10
sick = sick - 2
lekar = lekar + 3
clr
gs'stat'
''
'The doctor made you a shot in the ass - you cried'
'(Doctor) - Already all, has all. You prescribe bed rest, hot drink, antibiotics, nose drops and a balanced diet. When the temperature drops - the clinic appointment.'
'(You) - Thanks you, doctor - necessarily.'
'The doctor said goodbye and left.'
act 'Back to bed':gt'bedr2x'
end
end
end
act 'Doctor, that with me?':
cla
'(You, fright) - Doctor, that with me?'
'(Doctor) - I`m afraid, that you have a sore throat, <<$name>>. I would advise you to inpatient treatment'
'(You) - This is what - to the hospital, that-whether?'
'(Doctor) - Well yes'
act 'Takeout':
cla
*clr
'(You, sobbing) - Oh, doctor, I do not want the hospital...'
'(Doctor, reflectively) - Well-at... Probably all-still possible. Then I`ll give you a couple of jabs - to start...'
'(You) - Oh, thank you, doctor!'
act 'Lie on your stomach and bare ass':
cla
minut = minut + 15
horny = 100
clr
gs'stat'
''
'The doctor made you a few shots in the ass, and you suddenly swept incredible sexual arousal. Between the thighs as if you broke out the fire, sweet pussy ache and flowed, breasts grew heavy, nipples stiffened and hardened...'
'(You) - Doctor, what`s happening? - You cried out in fright and embarrassment, but your voice treacherously broken on voluptuous groan'
'(Doctor) - Aha! I knew it - I feel the magic in you, so you`re one of us, and I can use its power safely.'
'(You) - So you, too, the magician?!.'
'(Doctor) - Yes, Only my magic special - Tantric. I heard about this?'
'(You) - No, I do not remember...'
'(Doctor) - It`s magic, based on sensuality and sex. Roughly speaking, I can cast, Only when I am having sex.'
'(You) - I.e..?'
'(Doctor) - I.e, if you and I`s have sex - I`ll heal. You agree?'
'(You) - And in return?'
'(Doctor) - Nothing - I do this only for their own satisfaction. I, see, whether, I am experiencing orgasm, unless conjure.'
'(You) - Then of course - I agree.'
act 'Surrender to the gentle hands Ninel':gt'housecall','ninel2'
end
end
end
end
end
end
end
end
}
$drPP = {
cla
*clr
'You open the door. On the threshold is older balding man with a medical bag in his hand.'
'(You) - Kha-kha... Hello, doctor'
'(Doctor) - Hello, sick - I Peter, your local therapist. Go back to bed - do not stand in the draft.'
act 'Carry a doctor in the bedroom':
cla
*clr
''
'You are returned to the bedroom, along with Dr.. He sat on the edge of the bed and felt your forehead'
'(Doctor) - Well-with, sick, what complain?'
'(You) - Kha, kha, kha... Oh, doctor, surely, I have a sore throat - very sore throat and high temperature.'
'(Doctor) - And cough, I see. AND, Judging by your voice, nose you, sick, laid.'
'(You) - Yes-yes. A-Sneezy-and!'
'(Doctor) - Well-with, sick, let you listen. Undress.'
act 'Undress':
cla
*clr
minut = minut + 5
clr
gs'stat'
''
'You undressed and the doctor for a long time listening to your lungs'
'(Doctor) - So-with. Now let`s look at the neck. Open your mouth wide and say "A-and-and"'
act 'A-a-a':
cla
*clr
''
'You have opened my mouth and the doctor looked at your red sore throat'
'(Doctor) - Ouch-yay-yay... How are you so? Tempered necessary, sick - harden. Well-with, let you measure the temperature.'
act 'Put a thermometer armpit':
cla
*clr
''
'The doctor looked at the thermometer and shook his head'
act 'Doctor, that with me?':
cla
'(Doctor) You have the flu, sick. Nothing wrong - I`ll give you an injection and you feel better soon. Soak a couple of days in bed, drinks of drugs, and as it will become easier - to me at the reception'
act 'Substitute the ass':
cla
*clr
minut = minut + 10
sick = sick - 2
lekarstvo += 3
gs'stat'
''
'The doctor made you a shot in the ass - you cried'
'(Doctor) - Well-well, sick, nothing wrong. And remember - bed rest, regular meals and medication. And do not forget to come to the reception.'
'(You) - Thanks you, doctor - necessarily.'
'The doctor said goodbye and left, and you`re back in bed.'
act 'Back to bed':gt'bedr2x'
end
end
end
end
end
end
}
$polidin = {
cla
*clr
minut = minut + 15
callrand = RAND(0,2)
if callrand = 0:''
if callrand = 1:''
if callrand = 2:''
'You dial the number several times polyclinics - there all the time busy.'
act 'Call again and again':
cla
'Finally, you call us. Tired nurse`s voice answered in a tube:'
'(Nurse) - Hello - registry...'
act 'Hello...':
cla
'(You) - Hello. Kha-kha... Can I call the doctor at home?'
'(Nurse) - Your name and address?'
act 'New features':
cla
'(You) - E... Kha-kha! Sorry... <<$name>> <<$surname>>. Street Park House 4 apartment 69... A-and-pchhi-and!!!'
'(Nurse) - Nothing wrong. Wait a minute.'
act 'Wait':
cla
minut = minut + 5
clr
gs'stat'
'For five minutes you waiting, occasionally coughing into a tube, and finally hear:'
'(Nurse) - So - <<$surname>> <<$name>>. here`s your card... What ails you?'
'(You) - Kha-kha-kha... Sorry... I have a fever and sore throat are very. And a cough and runny nose.'
'(Nurse) - The temperature is high?'
'(You) - Yes, very - 39,2... A-and-pchhi!'
'(Nurse) - Clear. Wait - the doctor will come to you.'
'(You) - And soon?'
'(Nurse) - Once the can. Your challenge - not only.'
'(You) - Save... Kha-kha!...thank you...'
if ninelsex = 1:
act 'Is it possible to call Ninel Pavlovna?':
cla
'(You) - Is it possible to call Ninel Pavlovna? It regularly inspects me.'
'(Nurse) - I learn, Is it free.'
'(You) - Once again, thank you very much.'
act '...':gt'housecall','ninel3'
end
end
act 'Back to bed':
cla
*clr
picrand = RAND(0,6)
if picrand = 0:''
if picrand = 1:''
if picrand = 2:''
if picrand = 3:''
if picrand = 4:''
if picrand = 5:''
if picrand = 6:''
timerand = RAND(0,5)
if timerand = 0:minut = minut + 30
if timerand = 1:minut = minut + 60
if timerand = 2:minut = minut + 90
if timerand = 3:minut = minut + 120
if timerand = 4:minut = minut + 150
if timerand = 5:minut = minut + 180
'You lie in bed, shivering in the chill and wrapped in a blanket. Time drags painfully slow - you can not say, how much time passed, before the doorbell rang.'
act 'Open the door':
if ninel > 0 and sick <= 50:
gt'housecall','ninel1'
elseif ninel = 0 or sick > 50:
doctrnd = RAND(0,1)
if doctrnd = 0:dynamic $drPP
if doctrnd = 1:gt'housecall','ninel0'
end
end
end
end
end
end
end
}
--- korr2x ---------------------------------