1
0

152_korr 26 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677
  1. # korr
  2. act 'The bedroom':gt 'bedr'
  3. act 'The bathroom':gt 'vanr'
  4. act 'The kitchen':gt 'kuhr'
  5. act 'The living room':gt 'sitr'
  6. act '<font color="maroon">Apartment hallway</font>':
  7. cls
  8. if sick <= 72 and nude = 0:
  9. xgt 'etoexhib', 'pos51'
  10. elseif nude = 0:
  11. '<b><font color="red">You''re too sick to walk around in the streets.</font></b>'
  12. xgt $curloc
  13. else
  14. '<b><font color="red">You need to get dressed before going out.</font></b>'
  15. xgt $curloc
  16. end
  17. end
  18. act '<b><font color="maroon">Go outside</font></b>':
  19. cls
  20. if sick <= 72 and nude = 0:
  21. xgt 'street'
  22. elseif nude = 0:
  23. '<b><font color="red">You''re too sick to walk around in the streets.</font></b>'
  24. xgt $curloc
  25. else
  26. '<b><font color="red">You need to get dressed before going out.</font></b>'
  27. xgt $curloc
  28. end
  29. end
  30. $metkaM = $ARGS[0]
  31. $locM = $CURLOC
  32. $metka = $ARGS[0]
  33. $loc = $CURLOC
  34. set popolaini = 0
  35. set saunaYouRoom = 0
  36. set boycherdaksex = 0
  37. '<center><b><font color="maroon">Corridor</font></b></center>'
  38. if remkorr = 0:'<center><img src="images/etogame/korr.jpg"></center>'
  39. if remkorr = 1:'<center><img src="images/etogame/korr2.jpg"></center>'
  40. clr
  41. gs 'stat'
  42. bonusZ = 0
  43. fcolor="rgb"(0, 0, 0)
  44. bcolor="rgb"(255, 255, 255)
  45. lcolor="rgb"(106, 90, 205)
  46. set minut += 1
  47. set housrA = 1
  48. set housrMir = 0
  49. set elektro += 1
  50. if ring = 1:'<b><font color="red">The phone is ringing</font></b>'
  51. if remkorr = 0:'In the hallway wallpaper which where moved away from the walls, and has long faded. A coat rack and a shelf for shoes are near the entrance. A wall-mounted <a href="exec:GT ''mirror'', ''start''">mirror</a> and a <a href="exec:GT ''telefon'', ''start''">phone</a> hang on the wall.'
  52. if remkorr = 1:'Modern hall with stylish furniture, a wall-mounted <a href="exec:GT ''mirror'', ''start''">mirror</a>, and a <a href="exec:GT ''telefon'', ''start''">phone</a>'
  53. if suhbelo > 0:'Drying on the clothesline are <<suhbelo>> laundry items.'
  54. if umbrella > 0:'An umbrella hangs on a hook.'
  55. if palto > 0:'Hanging on the hook <<$palto>>.'
  56. if sobaka = 1:'<br>Your dog, <a href="exec:GT ''soba'', ''start''"><<$namesob>></a>, is lying on the floor near the entrance.'
  57. if krolik = 1:'Resting on the floor your rabbit <a href="exec:GT ''krol'', ''start''"><<$namekrol>></a>.'
  58. if popugai = 1:'In the cage sits your parrot <a href="exec:GT ''popu'', ''start''"><<$namepopu>></a>.'
  59. if parkday ! day and parkblackmail = 1:
  60. 'A heavy envelope has arrived in the mail. When you open it you can see pictures in it. Damn, it''s pictures of you where you are giving blowjobs to two guys in the park.'
  61. 'Small note says:'
  62. 'If you do not want to have these pictures posted on your porch and sent to your work, come to this address (address listed is a Studio)'
  63. 'PS, if you do not come today, these pictures will be hanging in your entryway tomorrow.'
  64. set parkblackmail = 2
  65. set parkday = day
  66. end
  67. if parkday ! day and parkblackmail = 2:
  68. 'Damn, your photos with sperm on your face and two dicks in your mouth are plastered around porch.'
  69. set parkblackmail = 0
  70. fotoyousuck = 1
  71. end
  72. if bfA < 0:
  73. '<b><font color="red">Your boyfried does not call you, he probably dumped you.</font></b>'
  74. set bfA = 0
  75. end
  76. if bfA > 1 and boydayA ! day and hour >= 5 and hour < 20 and vnesh >= vneshBoyA:
  77. set ring = 1
  78. set ringA = 1
  79. '<b><font color="red">The phone is ringing</font></b>'
  80. end
  81. if bfB > 1 and boydayB ! day and hour >= 5 and hour < 20 and vnesh >= vneshBoyB:
  82. set ring = 1
  83. set ringB = 1
  84. '<b><font color="red">The phone is ringing</font></b>'
  85. end
  86. if bfC > 1 and boydayC ! day and hour >= 5 and hour < 20 and vnesh >= vneshBoyC:
  87. set ring = 1
  88. set ringC = 1
  89. '<b><font color="red">The phone is ringing</font></b>'
  90. end
  91. if bfA > 1 and boydayA ! day and hour >= 5 and hour < 20 and vnesh < vneshBoyA:
  92. '<b><font color="red">Your boyfried does not call you, he probably dumped you.</font></b>'
  93. set bfA = 0
  94. end
  95. if bfB > 1 and boydayB ! day and hour >= 5 and hour < 20 and vnesh < vneshBoyB:
  96. '<b><font color="red">Your boyfried does not call you, he probably dumped you.</font></b>'
  97. set bfB = 0
  98. end
  99. if bfC > 1 and boydayC ! day and hour >= 5 and hour < 20 and vnesh < vneshBoyC:
  100. '<b><font color="red">Your boyfried does not call you, he probably dumped you.</font></b>'
  101. set bfC = 0
  102. end
  103. if vladimirday ! day and vladimirQW = 20 and hour >= 15 and hour <= 17:'<a href="exec:GT ''qwloc2''"><font color="red"><b>The phone is ringing</b></font></a>.'
  104. if vladimirday ! day and vladimirQW = 25 and hour >= 15 and hour <= 17 and week = 6:'<a href="exec:GT ''qwloc3''"><font color="red"><b>The phone is ringing</b></font></a>.'
  105. if vladimirday ! day and vladimirQW = 35 and hour >= 15 and hour <= 17 and week = 6:'<a href="exec:GT ''qwloc4''"><font color="red"><b>The phone is ringing</b></font></a>.'
  106. if QWdogreiqTimer = 0 and QWdogReiq = 2 and week = 7 and qwdogiventday ! day and hour >= 12:'<a href="exec:GT ''qwlocdog''"><font color="red"><b>The phone is ringing</b></font></a>.'
  107. if bfA = 1 or bfB = 1 or bfC = 1:
  108. if bfA = 1 and boydayA ! day and hour > 5 and hour < 20 and ringA = 0:
  109. if bfb = 1:set bfb = 0
  110. if bfc = 1:set bfc = 0
  111. if vnesh < vneshBoyA:
  112. 'Your boyfriend has not called you.'
  113. set bfA = 0
  114. end
  115. if vnesh >= vneshBoyA:
  116. set ring = 1
  117. set ringA = 1
  118. '<b><font color="red">The phone is ringing</font></b>'
  119. end
  120. end
  121. if bfB = 1 and boydayB ! day and hour > 5 and hour < 20 and ringB = 0:
  122. if bfa = 1:set bfa = 0
  123. if bfc = 1:set bfc = 0
  124. if vnesh < vneshBoyB:
  125. '<<$boyB>> did not call back.'
  126. set bfB = 0
  127. end
  128. if vnesh >= vneshBoyB:
  129. set ring = 1
  130. set ringB = 1
  131. '<b><font color="red">The phone is ringing</font></b>'
  132. end
  133. end
  134. if bfC = 1 and boydayC ! day and hour > 5 and hour < 20 and ringC = 0:
  135. if bfa = 1:set bfa = 0
  136. if bfb = 1:set bfb = 0
  137. if vnesh < vneshBoyC:
  138. 'Your boyfriend has not called you.'
  139. set bfC = 0
  140. end
  141. if vnesh >= vneshBoyC:
  142. set ring = 1
  143. set ringC = 1
  144. '<b><font color="red">The phone is ringing</font></b>'
  145. end
  146. end
  147. end
  148. if hour >= 9 and hour <= 20 and santehnikDolg > 0 and money >= santehnikDolg:
  149. '<b><font color="red">, the doorbell rings</font></b>'
  150. act 'Go to the door':
  151. cls
  152. gs 'stat'
  153. 'You went to the door and looked through the peephole. You see a dark male figure. Apparently the man heard you and said through the door. "It''s me. Plumber Grisha. You''ll need money."'
  154. act 'Answer the door':
  155. cls
  156. money -= santehnikDolg
  157. santehnikDolg = 0
  158. gs 'stat'
  159. 'You opened the door and plumbing Gregory smiled. "I thought you were hiding from me now will. Well? There is nothing to pay?" You nodded and climbed for his wallet. Counting half thousand you gave the money he Dwarf and put them in his pocket. Then you said goodbye and left.'
  160. act 'Close the door':gt $curloc
  161. end
  162. end
  163. end
  164. if IvanPodstavaQW = 3 and hour >= 9 and hour <= 20:
  165. cls
  166. IvanPodstavaQW = 4
  167. if DolgRS <= moneySUM:
  168. money = moneySUM - 650000
  169. karta = 0
  170. stolmoney = 0
  171. minut += 120
  172. 'For you police patrol arrived and took you to court. You have managed to pay off its debt and you were released to reconcile the parties.'
  173. act 'Get out of the courthouse':gt 'down'
  174. end
  175. if DolgRS > moneySUM:
  176. DolgRS = 650000 - moneySUM - 60000
  177. money = 0
  178. karta = 0
  179. stolmoney = 0
  180. age += 5
  181. vidage += 7
  182. year += 5
  183. money = 2000
  184. 'For you police patrol arrived and took you to court. At trial, you were given five years of general regime, is obliged to pay debt <<DolgRS>>.'
  185. act 'Sit on the area':
  186. cls
  187. srok_kolvo = 1
  188. srok_otsidki += 5
  189. salo = 10
  190. fat = 10
  191. curly = 0
  192. mop = 1
  193. skin = 0
  194. tan = 0
  195. leghair = 6
  196. lobok = 3
  197. bfa = 0
  198. narkoman = 0
  199. nark = 0
  200. SLomka = 0
  201. work = 0
  202. workKafe = 0
  203. workhosp =0
  204. worksalon =0
  205. tanwork =0
  206. workSec =0
  207. stipuha =0
  208. preg = 0
  209. young_shop_work = 0
  210. set student = 0
  211. set kurs = 0
  212. set semestr = 0
  213. set abiturient = 0
  214. set stipuha = 0
  215. set lektor = 0
  216. gs 'stat'
  217. 'Time dragged on too long. Your life and work was tedious and monotonous. You sewed quilted five years, had dinner in the dining room and went to sleep in the barracks surrounded by other women inmates. With your salary of 2, 000 rubles per month in 1000 listed on the debt repayment. But time does not stand still and still came an end to your suffering. You let go and gave 2,000 rubles. You took the train and came back to the city.'
  218. act 'Get off the train':gt 'vokzal'
  219. end
  220. end
  221. exit
  222. end
  223. if IvanPodstavaDay ! day and IvanPodstavaQW = 1 and hour >= 8 and hour <= 20:
  224. '<b><font color="red">, the doorbell rang</font></b>'
  225. act 'Come to the door':
  226. cls
  227. gs 'stat'
  228. 'You came to the door and looked through the peephole. On the site you saw a few men. In the darkness you have seen them on their caps. One of the men said to you through the door. <<$name>> <<$surname>> open, police.'
  229. act 'Answer the door':
  230. cls
  231. minut += 60
  232. IvanPodstavaQW = 2
  233. gs 'stat'
  234. 'You opened the door to police wondering what they need from you. In the room were several men in uniform and with them several men in civilian clothes. Lean and skinny guy with stubble week and a pistol in a holster on a belt tied armpit said. "Understood, take your seats. Who will search in the apartment of the citizen who is accused of stealing." The investigator turned to you. "That´s a warrant for your arrest, this, this search warrant. Could you read it." Policemen full searched your apartment. Soon, one of them came out and said. Here are found the keys, according to the description it is just the keys to the office and the safe where the money was stolen. Witnesses signed the protocol that gave them the investigator. He frowned at you and nodded policeman, who started your hands behind your back and your wrists snap handcuffs.'
  235. act 'Go with the police':
  236. cls
  237. minut += 60
  238. gs 'stat'
  239. 'Brought you out of the house in handcuffs and put in a police UAZ. After, steel doors slam and UAZ car started shaking and growling at each bump. Finally you have arrived somewhere and you taking from UAZ performed in the office to have a friend you investigator. He took off the handcuffs and offered you a seat. You took a hard and uncomfortable chair, and an investigator in the meantime turned on the TV and put a video cassette. On the screen was a picture of a security camera in bystroeshke. There was visible corridor. Soon appeared in the corridor 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. Investigator turned a VCR tape and pulled, after which he put another tape. On the next cabinet drawer was Anatoly Chubais. The front door opened and it included you, holding keys in hand. You went to the safe and opened it with the key. Got envelope. <<$burgerIvanText>>. Investigator turned the TV off and pulled out a plastic bag with table keys. He threw them on the table, and finally spoke. "Tests showed it really the keys to the office and the safe owner bystroezhki. During the search they were found in your apartment. Surveillance cameras on the record clearly shows how you entered the office and stole 650 thousand." He took out the protocol and taking pen in hand began to write. Filled a slate floor, he raised his dark eyes on you and said. "Confession will help you in court. All the same, it is the first time and provided that you return the money, you may be given a suspended sentence, if you admit your guilt."'
  240. act 'Sign recognition':
  241. cls
  242. minut += 60
  243. gs 'stat'
  244. 'You sign a confession and an investigator barked "duty." Policeman entered the room. The investigator nodded showing him you get her.'
  245. act 'Go':gt 'kameraKPZ'
  246. end
  247. act 'Tell how it was':
  248. cls
  249. minut += 60
  250. gs 'stat'
  251. 'You were telling the investigator how everything was. As a manager Ivan Framed you. But the investigator listened to you in half an ear. Finally, he slammed his fist on the table and yelled at you, "I was not born yesterday, that would feed me such nonsense:If you will not cooperate, I´ll rot!" Policeman entered the room. The investigator nodded showing him you get her.'
  252. act 'Go':gt 'kameraKPZ'
  253. end
  254. end
  255. end
  256. end
  257. exit
  258. end
  259. if gopstop > 30:gt 'police', '1'
  260. if sick > 0 and doktorday ! day:
  261. !'act 'Call a doctor':
  262. cla
  263. *clr
  264. set minut += 15
  265. doktorday = day
  266. sick -= 5
  267. if sick < 1:sick = 1
  268. if sickstage = 1:sicktimer += 5
  269. 'Has come to you from the clinic and the doctor examined you. After examination, the doctor made a shot and you will become easier.'
  270. act 'Move away':gt 'korr'
  271. end'
  272. act 'Call a doctor':doktorday = day & dynamic $polidin
  273. end
  274. $ninel0 = {
  275. cla
  276. *clr
  277. '<center><img src="images/inBed/ninel00.jpg"></center>'
  278. 'You open the door. Stands on the threshold of a pretty young girl with meitsinskim suitcase in hand.'
  279. '(You) - Hello, doctor'
  280. '(Doctor) - Hello. My name is Ninel P. - I replaces your local therapist. Where the patient?'
  281. '(You) - This is me ... kha-kha-kha.'
  282. '(Doctor) - Clear. Then come - you need to go back to bed.'
  283. act 'Pursue a doctorate in the bedroom and lay down':
  284. cla
  285. *clr
  286. set ninelmet = 1
  287. '<center><img src="images/inBed/nadom0.jpg"></center>'
  288. 'The doctor sat on the edge of your bed and sprsil:'
  289. '(Doctor) - On that complain of <<$name>>? Can I call you that?'
  290. '(You) - Of course ... Ahem, ahem, ahem ... Oh, Doctor, perhaps I have the flu - cough just kills and very sore throat. And the temperature is high.'
  291. '(Doctor) - Runny nose is? Headaches? Aching bones?'
  292. '(You) - Yes. A Aptchee and!'
  293. '(Doctor) - Now I will examine you. Undress.'
  294. act 'Undress':
  295. cla
  296. *clr
  297. set minut += 5
  298. set horny += 10
  299. clr
  300. gs 'stat'
  301. '<center><img src="images/inBed/nadom1.jpg"></center>'
  302. 'You undressed and the doctor listened to your lungs for a long time. Her hands are cool and gentle touch and caress like a stethoscope ...'
  303. '(Doctor) - Yes, wheezing ... Now open your mouth. That´s because - "ah-ah-ah" ...'
  304. act 'A-a-a':
  305. cla
  306. *clr
  307. '<center><img src="images/inBed/ninel03.jpg"></center>'
  308. 'You opened your mouth and the doctor examined your sore throat'
  309. '(Doctor) - Hmmm ... throat strongly reddened and inflamed ... Now we need to measure the temperature.'
  310. act 'Stick a thermometer in her mouth':
  311. cla
  312. *clr
  313. '<center><img src="images/inBed/ninel04.jpg"></center>'
  314. '(Dr.) No, not so. Temperature should be measured rectally.'
  315. '(You) - Uh-uh ...'
  316. '(Doctor) - Do not be afraid, <<$name>>, is not painful.'
  317. '(You) - Well if you´re sure ...'
  318. '(Doctor) - I´m sure. Come on - lie down on his stomach and spread your hands buttocks.'
  319. act 'Substitute ass':
  320. cla
  321. *clr
  322. set minut += 10
  323. set horny += 10
  324. clr
  325. gs 'stat'
  326. '<center><img src="images/inBed/nadom2.jpg"></center>'
  327. 'You obediently roll over and substitute ass. Dr. lubricates your anus lubricated and deftly introduces a thermometer. You flinch, but not from pain and pleasure. Doctor leaves just stick a thermometer in your ass and slowly moves it back and forth and it´s very nice. You feel the growing excitement.'
  328. if horny >= 50:
  329. act 'Moan with pleasure':
  330. cla
  331. *clr
  332. '<center><img src="images/inBed/nadom3.jpg"></center>'
  333. 'Doctor takes the thermometer out of your buttocks and checks'
  334. '(Dr.) 39.2 ... Very bad. Please turn on your back - you need to palpate the lymph nodes.'
  335. act 'Roll over on his back':
  336. cla
  337. *clr
  338. set minut += 15
  339. set horny += 10
  340. clr
  341. gs 'stat'
  342. '<center><img src="images/inBed/nadom5.jpg"></center>'
  343. 'The doctor began to stroke and knead your stomach and thighs. You are not sure that this is a medical procedure - too long and tenderly she delalet, but you are very nice and you did not object.'
  344. 'Excitement, meanwhile, is growing all, you feel like your pussy moistened and begins to whine sweet ...'
  345. act 'A blush of embarrassment':
  346. cla
  347. *clr
  348. set horny += 15
  349. !set time += 15
  350. clr
  351. gs 'stat'
  352. '<center><img src="images/inBed/nadom6.jpg"></center>'
  353. 'You blush with embarrassment, but then fall below the hands of the doctor and she begins to caress your pussy'
  354. '(You) - Doctor, what are you doing! - At the same time embarrassed, outraged and frightened screams you.'
  355. '(Doctor) - Flying you, silly. I feel the magic in you, which means you´re one of us, and I can use his power quietly.'
  356. '(You) - So you´re a magician, too?'
  357. '(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
  358. '(You) - No, I do not remember ...'
  359. '(Doctor) - It´s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
  360. '(You) - So ..?'
  361. '(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
  362. '(You) - And what in return?'
  363. '(Doctor) - Nothing - I´m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
  364. '(You) - Then of course - I agree.'
  365. act 'Surrender to the gentle hands Ninel':gt 'housecall', 'ninel2'
  366. end
  367. end
  368. end
  369. end
  370. act 'Indignant':
  371. cla
  372. *clr
  373. '<center><img src="images/inBed/nadom3.jpg"></center>'
  374. '(You) - Doctor, what are you doing?'
  375. 'Doctor takes the thermometer out of your buttocks and calmly replied:'
  376. '(Doctor) - measures your temperature. 39.2 - very bad.'
  377. act 'Doctor, what with me?':
  378. cla
  379. '(You scared) - Doctor, what with me?'
  380. '(Dr.) Do you really flu. Now I´ll give you an injection of antibiotic and antipyretic, and you will feel better.'
  381. act 'Lie on your stomach and bare ass':
  382. cla
  383. *clr
  384. set minut += 10
  385. set sick -= 2
  386. set lekar += 3
  387. clr
  388. gs 'stat'
  389. '<center><img src="images/inBed/nadom4.jpg"></center>'
  390. 'The doctor did give you a shot in the ass - you cried'
  391. '(Doctor) - Just about everything, everything is. You prescribe bed rest, hot drinks, antibiotics, nose drops and a balanced diet. When the temperature drops - the clinic appointment.'
  392. '(You) - Thank you, Doctor - is necessary.'
  393. 'Doctor said goodbye and left.'
  394. act 'Back to bed':gt 'bedr'
  395. end
  396. end
  397. end
  398. act 'Doctor, what with me?':
  399. cla
  400. '(You scared) - Doctor, what with me?'
  401. '(Doctor) - I´m afraid that you have angina, <<$name>>. I would advise you to inpatient treatment'
  402. '(You) - What´s that - in the hospital, or what?'
  403. '(Doctor) - Yes'
  404. act 'Refuse':
  405. cla
  406. *clr
  407. '(You sobbing) - Oh, Doctor, I do not want to the hospital ...'
  408. '(Doctor, thoughtfully) - Well ... I guess it is still possible. Then I´ll give you a couple of shots - to start ...'
  409. '(You) - Oh, thank you, doctor!'
  410. act 'Lie on your stomach and bare ass':
  411. cla
  412. set minut += 15
  413. set horny = 100
  414. clr
  415. gs 'stat'
  416. '<center><img src="images/inBed/nadom9.jpg"></center>'
  417. 'The doctor made a few jabs you in the ass, and you suddenly enveloped incredible sexual arousal. Between her thighs you like the fire started, sweet pussy ached and flowed, grew heavy chest, nipples harden and solidify ...'
  418. '(You) - Doctor, what´s happening? - Screams frightened and embarrassed you, but your voice treacherously breaks on voluptuous moan'
  419. '(Doctor) - Yeah! I knew it - I can feel the magic in you, which means you´re one of us, and I can use his power quietly.'
  420. '(You) - So you´re a magician too!.'
  421. '(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
  422. '(You) - No, I do not remember ...'
  423. '(Doctor) - It´s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
  424. '(You) - So ..?'
  425. '(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
  426. '(You) - And what in return?'
  427. '(Doctor) - Nothing - I´m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
  428. '(You) - Then of course - I agree.'
  429. act 'Surrender to the gentle hands Ninel':gt 'housecall', 'ninel2'
  430. end
  431. end
  432. end
  433. end
  434. end
  435. end
  436. end
  437. end
  438. }
  439. $drPP = {
  440. cla
  441. *clr
  442. 'You open the door. Standing in the doorway of an elderly bald man with a suitcase in hand meitsinskim.'
  443. '(You) - Kha-kha ... Hello, Doctor'
  444. '(Doctor) - Hello, sick - I´m Peter, your local therapist. Go back to bed - do not stand in the draft.'
  445. act 'Hold a doctorate in the bedroom.':
  446. cla
  447. *clr
  448. '<center><img src="images/inBed/drPP1.jpg"></center>'
  449. 'You have returned to the bedroom with a doctor. He sat on the edge of the bed and felt your forehead'
  450. '(Doctor) - Well, the patient, to complain that?'
  451. '(You) - Ahem, ahem, ahem ... Oh, Doctor, perhaps, I have a sore throat - very sore throat and high temperature.'
  452. '(Doctor) - And cough, as I see it. And judging by your voice, you have a nose, sick, laid.'
  453. '(You) - Yes. A Aptchee and!'
  454. '(Doctor) - Well, the sick, you hear Dwight. Undress.'
  455. act 'Undress':
  456. cla
  457. *clr
  458. set minut += 5
  459. clr
  460. gs 'stat'
  461. '<center><img src="images/inBed/drPP2.jpg"></center>'
  462. 'You undressed and Dr. vysnushival long your lungs '
  463. '(Doctor) - So, sir. Now let´s look at the neck. Open your mouth wide and say "Ah-ah"'
  464. act 'A-a-a':
  465. cla
  466. *clr
  467. '<center><img src="images/inBed/drPP3.jpg"></center>'
  468. 'You opened your mouth and your doctor looked red sore throat'
  469. '(Doctor) - Ay-ay-ay ... How is it you do that? Should be tempered, ill - tempered. Well, let´s measure your temperature.'
  470. act 'Put the thermometer armpit':
  471. cla
  472. *clr
  473. '<center><img src="images/inBed/drPP4.jpg"></center>'
  474. 'The doctor looked at the thermometer and shook his head'
  475. act 'Doctor, what with me?':
  476. cla
  477. '(Dr.) Do you have the flu, sick. Do not worry - I´ll give you a shot and you´ll feel better soon. Soak a couple of days in bed, drinketh drugs, and it becomes easier - to see me'
  478. act 'Substitute ass':
  479. cla
  480. *clr
  481. set minut += 10
  482. set sick -= 2
  483. lekarstvo += 3
  484. gs 'stat'
  485. '<center><img src="images/inBed/drPP5.jpg"></center>'
  486. 'The doctor did give you a shot in the ass - you cried'
  487. '(Doctor) - Well, well, sick, do not worry. And remember - bed rest, regular meals and medication. And do not forget to come to the reception.'
  488. '(You) - Thank you, Doctor - is necessary.'
  489. 'Doctor said goodbye and left, and you venules in bed.'
  490. act 'Back to bed':gt 'bedr'
  491. end
  492. end
  493. end
  494. end
  495. end
  496. end
  497. }
  498. $polidin = {
  499. cla
  500. *clr
  501. set minut += 15
  502. set callrand = rand(0, 2)
  503. if callrand = 0:'<center><img src="images/inBed/housecall.jpg"></center>'
  504. if callrand = 1:'<center><img src="images/inBed/housecall1.jpg"></center>'
  505. if callrand = 2:'<center><img src="images/inBed/housecall2.jpg"></center>'
  506. 'You dial the number several times clinics - there all the time busy.'
  507. act 'Call again and again':
  508. cla
  509. 'Finally, you´ve reached. Tired voice tube nurse replied:'
  510. '(Nurse) - Hello - reception ...'
  511. act 'Hello ...':
  512. cla
  513. '(You) - Hello. Cough-cough ... Can I call a doctor to the house?'
  514. '(Nurse) - Your name and address?'
  515. act 'Introduce':
  516. cla
  517. '(You) - Mi ... Kha-kha! Sorry ... <<$name>> <<$surname>>. Park Street apartment house 4 69 ... Aa-and-pchhi!'
  518. '(Nurse) - It´s okay. Wait a minute.'
  519. act 'Wait':
  520. cla
  521. set minut += 5
  522. clr
  523. gs 'stat'
  524. 'You wait five minutes, occasionally coughing into the phone and finally hear:'
  525. '(Nurse) - So - <<$name>> <<$surname>>. here is your card ... What are you worried?'
  526. '(You) - Kha-kha-kha ... I´m sorry ... I have a fever and sore throat very. And cough and runny nose.'
  527. '(Nurse) - high temperature?'
  528. '(You) - Yes, very - 39.2 ... Aa-pchhi!'
  529. '(Nurse) - Right. Wait - the doctor will come to you.'
  530. '(You) - A soon?'
  531. '(Nurse) - As soon as he can. Your challenge - not unique.'
  532. '(You) - Save ... Kha-kha! Thank you ... ...'
  533. if ninelsex = 1:
  534. act 'Is it possible to cause Ninel Pavlovna?':
  535. cla
  536. '(You) - Is it possible to cause Ninel Pavlovna? She regularly osmatrivat me.'
  537. '(Nurse) - I´ll see if she is free.'
  538. '(You) - Once again, thank you.'
  539. act '...':gt 'housecall', 'ninel3'
  540. end
  541. end
  542. act 'Back to bed':
  543. cla
  544. *clr
  545. set picrand = rand(0, 6)
  546. if picrand = 0:'<center><img src="images/inBed/sick27.jpg"></center>'
  547. if picrand = 1:'<center><img src="images/inBed/sick21.jpg"></center>'
  548. if picrand = 2:'<center><img src="images/inBed/sick22.jpg"></center>'
  549. if picrand = 3:'<center><img src="images/inBed/sick23.jpg"></center>'
  550. if picrand = 4:'<center><img src="images/inBed/sick24.jpg"></center>'
  551. if picrand = 5:'<center><img src="images/inBed/sick25.jpg"></center>'
  552. if picrand = 6:'<center><img src="images/inBed/sick26.jpg"></center>'
  553. set timerand = rand(0, 5)
  554. if timerand = 0:set minut += 30
  555. if timerand = 1:set minut += 60
  556. if timerand = 2:set minut += 90
  557. if timerand = 3:set minut += 120
  558. if timerand = 4:set minut += 150
  559. if timerand = 5:set minut += 180
  560. 'You are lying in bed, shivering in the chill and wrapped in a blanket. Time passes excruciatingly slow - you can not tell how much time passed before the doorbell rang.'
  561. act 'Answer the door':
  562. if ninel > 0 and sick <= 50:gt 'housecall', 'ninel1'
  563. if ninel = 0 or sick > 50:
  564. set doctrnd = rand(0, 1)
  565. if doctrnd = 0:dynamic $drPP
  566. if doctrnd = 1:gt 'housecall', 'ninel0'
  567. end
  568. end
  569. end
  570. end
  571. end
  572. end
  573. end
  574. }
  575. --- korr ---------------------------------