086_poli 35 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989
  1. # poli
  2. if $ARGS[0] = 'start':
  3. cla
  4. *clr
  5. $sexloc = $CURLOC
  6. set hosprand = rand(0, 10)
  7. set minut += 5
  8. '<center><b><font color="maroon">Clinic</font></b></center>'
  9. '<center><img src="images/etogame/poli.jpg"></center>'
  10. clr
  11. gs 'stat'
  12. fcolor = rgb(0, 0, 0)
  13. bcolor = rgb(255, 255, 255)
  14. lcolor = rgb(106, 90, 205)
  15. 'Doctors appointments costs 1,000.'
  16. 'VD testing cost 1,000.'
  17. *nl
  18. 'Abortion at the woman´s request can be made up to 84 days of pregnancy. The cost of abortion is 8,000.'
  19. *nl
  20. 'Be warned, abortions are dangerous to health. There is always a risk of complications and the possibility of sterility.'
  21. if workhosp = 1 and hour >= 8 and hour <= 9 and week < 6:act 'Exit to replace':gt 'poli', 'beginwork'
  22. *nl
  23. act 'Leave Clinic':gt 'street'
  24. if health < (vital * 10 + stren * 5) and money >= 1000:
  25. act 'Treat health 1,000 rubles':
  26. cla
  27. set money -= 1000
  28. set minut += 60
  29. set health = vital * 10 + stren * 5 + 1000
  30. if hosprand = 0:gt 'poli', '0'
  31. if hosprand = 1:gt 'poli', '1'
  32. if hosprand = 2:gt 'poli', '2'
  33. 'The doctor did give you a shot and you immediately felt much better'
  34. act 'Leave':gt 'poli', 'start'
  35. end
  36. end
  37. if willpower < intel * 5 + will * 5 and money >= 1000:
  38. act 'See a therapist 1,000 rubles':
  39. cla
  40. set money -= 1000
  41. set minut += 60
  42. set willpower = intel * 5 + will * 5 + 1000
  43. set manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
  44. if hosprand = 0:gt 'poli', '0'
  45. if hosprand = 1:gt 'poli', '1'
  46. if hosprand = 2:gt 'poli', '2'
  47. 'You lie down on a couch at the therapist and told him about his troubles, and you immediately become much happier.'
  48. act 'Leave':gt 'poli', 'start'
  49. end
  50. end
  51. if money >= 1000:
  52. act 'Get a VD test (1,000 rubles)':
  53. cls
  54. set money -= 1000
  55. set minut += 60
  56. gs 'stat'
  57. 'You took the tests and after a short wait the doctor called you into his office.'
  58. if venera > 0:'The doctor pulled a sad mine and said that you are not going smoothly with analyzes.'
  59. if GerpesOnce = 1:
  60. 'You have found genital herpes. This disease is not curable and it can only jam at a time.'
  61. if Gerpes >= 3:
  62. if GerpesNapr = 0:GerpesNapr = 3 & 'Here you have the direction of the shots herpes. Needs a course out of 3 injections, each injection will cost 1,000 rubles each.'
  63. if GerpesNapr > 0:'Go for shots herpes direction I gave you.'
  64. else
  65. 'Herpes you in an inactive stage, take vitamins and he does not show himself.'
  66. end
  67. end
  68. if SifacOnce = 1:
  69. 'You found to have syphilis. It is not curable, the deadly disease which nowadays have learned to restrain, but not much more.'
  70. if Sifilis < 15:
  71. 'Now you have syphilis in the inactive stage. Therefore, no special meaning in therapy.'
  72. elseif Sifilis >= 15:
  73. if SifNapr = 0:SifNapr = 10 & 'Here you have the direction of the shots from syphilis. Needs a course out of 10 injections, each injection will cost 5,000 rubles.'
  74. if SifNapr > 0:'Go for injections of syphilis. Long course, 10 days. But it is necessary, severe.'
  75. end
  76. end
  77. if TriperOnce = 1:
  78. 'You found gonorrhea. In principle, this disease is curable.'
  79. if TriperNapr = 0:TriperNapr = 5 & 'Here you have the direction of the shots gonorrhea. Needs a course out of 5 injections, each injection will cost 1,500 rubles'
  80. end
  81. if KandidozOnce = 1:
  82. 'You found candidiasis. Or as it is popularly called thrush. Thing is not curable, but not very dangerous, besides easily suppressed.'
  83. if KandidNapr = 0:KandidNapr = 1 & 'The pharmacy can buy pills.'
  84. if Kandidoz < 30:'Now you candidiasis in an inactive stage, take vitamins, and he does not show himself.'
  85. end
  86. if venera <= 0:'Doctor is pleased that you do not have a sexually transmitted disease.'
  87. act 'Leave':gt 'poli', 'start'
  88. end
  89. end
  90. if GerpesNapr > 0 and money >= 1000 and GerpesUkolDay ! day:
  91. act 'Go for shots of herpes (1,000 rubles). Remaining <<GerpesNapr>> in the direction of injection':
  92. cls
  93. set money -= 1000
  94. set minut += 60
  95. GerpesUkolDay = day
  96. gs 'stat'
  97. GerpesNapr -= 1
  98. 'You made a very painful injection in the ass.'
  99. if GerpesNapr = 0:Gerpes = -10 & 'It was the last injection'
  100. act 'Leave':gt 'poli', 'start'
  101. end
  102. end
  103. if SifNapr > 0 and money >= 5000 and SifUkolDay ! day:
  104. act 'Go to injections of syphilis (5,000 rubles). Remaining <<SifNapr>> in the direction of injection':
  105. cls
  106. set money -= 5000
  107. set minut += 60
  108. SifUkolDay = day
  109. gs 'stat'
  110. SifNapr -= 1
  111. 'You made a very painful injection in the ass.'
  112. if SifNapr = 0:Sifilis = 0 & 'It was the last injection'
  113. act 'Leave':gt 'poli', 'start'
  114. end
  115. end
  116. if TriperNapr > 0 and money >= 1500 and TriperUkolDay ! day:
  117. act 'Go for shots of gonorrhea (1,500 rubles). Remaining <<TriperNapr>> in the direction of injection':
  118. cls
  119. set money -= 1500
  120. set minut += 60
  121. TriperUkolDay = day
  122. gs 'stat'
  123. TriperNapr -= 1
  124. 'You made a very painful injection in the ass.'
  125. if TriperNapr = 0:Triper = 0 & Venera -= 1 & TriperOnce = 0 & 'It was the last injection'
  126. act 'Leave':gt 'poli', 'start'
  127. end
  128. end
  129. 'In the waiting room is an advertisement.'
  130. *nl
  131. ' Private Sexually Transmitted Infection Clinic provides the following treatment.'
  132. ' Complete cure for herpes 150,000 rubles.'
  133. ' Complete cure of syphilis 350,000 rubles.'
  134. ' Complete cure for yeast infection 50,000 rubles.'
  135. ' Treatment requires hospitalization on first Monday of each month'
  136. if GerpesOnce = 1 and money >= 150000 and week = 1 and day <= 10:
  137. act 'Go to private clinic for the complete cure of the herpes. (150,000 rubles)':
  138. cla
  139. set money -= 150000
  140. set day += 3
  141. week += 3
  142. GerpesOnce = 0
  143. Gerpes = 0
  144. Venera -= 1
  145. gs 'stat'
  146. 'You have lain three days in private clinics and were completely cured of herpes.'
  147. act 'Leave':gt 'poli', 'start'
  148. end
  149. end
  150. if SifacOnce = 1 and money >= 350000 and week = 1 and day <= 10:
  151. act 'Go to private clinics for the complete cure of syphilis. (350,000 rubles)':
  152. cla
  153. set money -= 350000
  154. set day += 3
  155. week += 3
  156. SifacOnce = 0
  157. Sifilis = 0
  158. Venera -= 1
  159. gs 'stat'
  160. 'You have lain three days in private clinics and were completely cured of syphilis.'
  161. act 'Leave':gt 'poli', 'start'
  162. end
  163. end
  164. if KandidozOnce = 1 and money >= 50000 and week = 1 and day <= 10:
  165. act 'Go to private clinics for the complete cure of the thrush. (50,000 rubles)':
  166. cla
  167. set money -= 50000
  168. set day += 3
  169. week += 3
  170. KandidozOnce = 0
  171. Kandidoz = 0
  172. gs 'stat'
  173. 'You have lain three days in private clinics and were completely cured of thrush.'
  174. act 'Leave':gt 'poli', 'start'
  175. end
  176. end
  177. !'Abortion on a woman´s request can be made up to 84 days of pregnancy. The cost of abortion 8,000 rubles'
  178. !'Warn abortions are dangerous to health. There is always a risk of complications and the possibility of not getting pregnant in the future.'
  179. if money >= 8000 and preg = 1 and pregtime < 84:
  180. act 'Abortion 8,000 rubles':
  181. cla
  182. set vidage += 1
  183. set abort += 1
  184. set money -= 8000
  185. set abortrand = rand(0, 10)
  186. if age > 18:
  187. if abortrand < 10:set preg = 0
  188. if abortrand = 10:set preg = 2
  189. else
  190. if abortrand < 4:set preg = 0
  191. if abortrand >=5:set preg = 2
  192. end
  193. set pregtime = 0
  194. pregtalk = 0
  195. '<center><img src="images/etogame/abort.jpg"></center>'
  196. 'You spread out on a gynecological chair, the doctor entered your vagina tool and parts ripped out of you fruit.'
  197. act 'Leave':gt 'poli', 'start'
  198. end
  199. end
  200. if preg = 1 and pregtime = 280:
  201. act 'Have':
  202. cla
  203. set vidage += 1
  204. set preg = 0
  205. set pregtime = 0
  206. set pregtalk = 0
  207. set numkid += 1
  208. set daykid[numkid] = day
  209. set monthkid[numkid] = month
  210. set yearkid[numkid] = year
  211. set $father[numkid] = $father
  212. set haprikid[numkid] = rand(0, 3)
  213. set glacol[numkid] = rand(0, 3)
  214. !'<center><img src="images/etogame/abort.jpg"></center>'
  215. 'You put on the bed and lit up. Began a terrible pain in the abdomen, you yelled with all the dope and finally gave birth.'
  216. set polkid[numkid] = rand(0, 1)
  217. if polkid[numkid] = 0:$polreb[numkid] = 'girl' & 'The doctor said that you had a girl.'
  218. if polkid[numkid] = 1:$polreb[numkid] = 'boy' & 'The doctor said that you have a baby boy.'
  219. kid += 1
  220. act 'Give the name of the child':
  221. $kidname[numkid] = input ("What do you call a baby?")
  222. if $kidname[numkid] <= 0:
  223. if polkid[numkid] = 0:$kidname = 'Masha'
  224. if polkid[numkid] = 1:$kidname = 'Misha'
  225. end
  226. act 'Leave':gt 'poli', 'start'
  227. end
  228. end
  229. end
  230. if sick > 0 and ninelsex = 0 and polisickday ! day:
  231. act 'See a Doctor':
  232. cla
  233. *clr
  234. polisickday = day
  235. set terrnd = rand(0, 1)
  236. if terrnd = 0:gt 'poli', 'drPP'
  237. if terrnd = 1:gt 'poli', 'ninel'
  238. end
  239. end
  240. if sick > 0 and ninelsex > 0 and polisickday ! day:
  241. act 'See Dr Ninel':
  242. cla
  243. *clr
  244. polisickday = day
  245. gt 'poli', 'ninel2'
  246. end
  247. end
  248. if horny >= 90 and ninelsex >= 1 and ninelday ! day and sick <= 0:
  249. act 'Search for Dr Ninel':
  250. cla
  251. *clr
  252. set ninelday = day
  253. set ninelrand = rand(0, 2)
  254. if ninelrand = 0:
  255. 'At the reception you skzali that Ninel in his office'
  256. act 'Go to Ninel':gt 'poli', 'ninel3'
  257. end
  258. if ninelrand = 1:
  259. 'At the reception you were told that today do not accept Ninel'
  260. act 'Leave the clinic':gt 'street'
  261. end
  262. if ninelrand = 2:
  263. 'At the reception you were told that Ninel today calls'
  264. act 'Leave the clinic':gt 'street'
  265. end
  266. end
  267. end
  268. if katjob > 0:act 'Visit the chief doctor':gt 'poli', 'glavdoc'
  269. if zub > 0:
  270. act 'Go to the dentist':
  271. cls
  272. zubpay = zub * 30000
  273. gs 'stat'
  274. 'The dentist looked at you and said, prosthetics that will cost <<zubpay>> rubles'
  275. act 'Leave the clinic':gt 'street'
  276. if money>=zubpay:
  277. act 'pay for prosthetics':
  278. cls
  279. money -= zubpay
  280. minut += 60
  281. zub = 0
  282. gs 'stat'
  283. 'You paid prosthetics and dentist within an hour completely put in order your teeth.'
  284. act 'Get away from the clinic':gt 'street'
  285. end
  286. end
  287. end
  288. end
  289. if anus > 5:
  290. act 'Go to the proctologist':
  291. cls
  292. minut += 15
  293. if analplugIN ! 0:analplugIN = 0
  294. gs 'stat'
  295. '<center><img src="images/body/<<anpic>>.jpg"></center>'
  296. 'You`ve come to the office to the proctologist. He immediately asked you to undress from the waist down and tilt.'
  297. if anus <= 15:'The doctor examined your anus and said "Well , slightly distended anus, but no abnormalities."'
  298. if anus > 15 and anus <= 25:'The doctor examined your anus and said "You stretched anus and sphincter. I would rekkomendoval procedures, 1,000 rubles per session, This will help decrease the anus to normal size."'
  299. if anus > 25 and anus<=35:'The doctor examined your anus and said "You have greatly distended anus, most likely your sphincter is not able to keep the intestinal gas. I would rekkomendoval procedures, 1,000 rubles per session, This will help decrease the anus to normal size."'
  300. if anus > 35:'The doctor examined your anus and said "oh my God! You need to be careful with his booty obraschatsya, you have the same here now fall intestine. I would rekkomendoval procedures, 1,000 rubles per session, This will help decrease the anus to normal size."'
  301. end
  302. if money >= 1000 and anus > 15 and proktologday ! day:
  303. act 'Checkout procedure':
  304. cls
  305. money -= 1000
  306. minut += 60
  307. proktologday = day
  308. anus -= 5
  309. gs 'stat'
  310. '<center><img src="images/body/<<anpic>>.jpg"></center>'
  311. 'You paid for the procedure and the doctor an hour tinkering in your ass causing her to order.'
  312. act 'Get away from the clinic':gt 'street'
  313. end
  314. end
  315. act 'Leave the clinic':gt 'street'
  316. end
  317. end
  318. if glass > 0:
  319. act 'Go to the optometrist':
  320. cls
  321. gs 'stat'
  322. 'Optometrist examined you and said that you can do laser vision correction 100 thousand. But from reading books eyesight can deteriorate again.'
  323. if glass = 1:'Doctor looking at you add ,Of course you can buy glasses that will be better to look at you. 8 thousand.'
  324. act 'Leave the clinic':gt 'street'
  325. if money >= 100000 and glass ! 0:
  326. act'Pay for laser correction':
  327. cls
  328. money -= 100000
  329. minut += 60
  330. blizoruk = 0
  331. glass = 0
  332. gs 'stat'
  333. 'You paid for laser correction.'
  334. act 'Leave the clinic':gt 'street'
  335. end
  336. end
  337. if glass = 1:
  338. if money >= 8000:
  339. act 'Buy Points':
  340. cls
  341. money -= 8000
  342. minut += 60
  343. glass = 2
  344. gs 'stat'
  345. 'You bought a new, more stylish glasses.'
  346. act 'Leave the clinic':gt 'street'
  347. end
  348. end
  349. end
  350. end
  351. end
  352. end
  353. if $ARGS[0] = 'drPP':
  354. cla
  355. *clr
  356. set minut += rand(3, 10)
  357. clr
  358. gs 'stat'
  359. 'You sit in the corridor of coughing and ohayuschih old women waiting for their turn.'
  360. 'Finally, the turn came'
  361. act 'Login to Account':
  362. cla
  363. *clr
  364. '<center><img src="images/add-on/drPP.jpg"></center>'
  365. if drPP = 0:'At the table sits an elderly bald man felicitous appearance. "Hello, sick. My name is Peter, I am your local therapist - he says, looking at you through his glasses."'
  366. if drPP = 1:'Sit at the table Peter. He smiles at you and says, "Hello, sick.'
  367. drPP = 1
  368. '(You) - Hello, doctor.'
  369. '(Doctor) - What complain sick?'
  370. act 'Complain':
  371. cla
  372. *clr
  373. set minut += 5
  374. '(You) - Oh, Doctor, I like a cold - laid nose, throat aches ... and cough.'
  375. '(Doctor) - So-Low has a ...?'
  376. '(You) - Yes, a little.'
  377. '(Doctor) - Well, let´s hear you'
  378. act 'Follow the instructions of the physician':
  379. cla
  380. set minut += 20
  381. '<center><img src="images/inBed/ninel03"></center>'
  382. 'The doctor listened attentively your lungs, looked into his throat, gave a thermometer - to measure the temperature and finally concluded:'
  383. '(Doctor) - Do not worry - common cold - SARS. Buy in a drugstore here these drugs, lie in bed a couple of days and everything will be alright. The main thing - do not supercool.'
  384. '(You) - Thank you, Doctor. Goodbye.'
  385. act 'Go home':gt 'street'
  386. end
  387. end
  388. end
  389. end
  390. if $ARGS[0] = 'ninel':
  391. cla
  392. *clr
  393. set minut += rand(3, 15)
  394. clr
  395. gs 'stat'
  396. 'You sit in the corridor of coughing and ohayuschih old women waiting for their turn.'
  397. 'Finally, the turn came'
  398. act 'Login to Account':
  399. cla
  400. *clr
  401. if ninelmet = 0:'At the table sits a pretty young girl in a light robe. Robe unbuttoned so that does not hide her small but beautiful gud. "Hello My name is Ninel Pavlovna, I replaces your local therapist - she said, scrutinizing you."'
  402. if ninelmet = 1:'Ninel sitting at the table. She smiles at you and says, "Hello, World.'
  403. if horny < 30:
  404. act 'Hello, Doctor.':
  405. cla
  406. *clr
  407. set ninelmet = 1
  408. set minut += 5
  409. '<center><img src="images/add-on/exam00.jpg"></center>'
  410. '(Dr.) Good afternoon. At that complain?'
  411. '(You) - Oh, Doctor, I like a cold - laid nose, throat aches ... and cough.'
  412. '(Doctor) - Temperature is?'
  413. '(You) - Yes, a little.'
  414. '(Doctor) - Clear. Undress.'
  415. act 'Follow the instructions of the physician':
  416. cla
  417. *clr
  418. set minut += 20
  419. '<center><img src="images/add-on/exam01.jpg"></center>'
  420. 'The doctor carefully proslushala your lungs zaglyanula the throat, dala thermometer - to measure the temperature and finally zaklyuchila:'
  421. '(Doctor) - SARS - nothing serious. Observe bed rest and take these medications here. A couple of days will be healthy. And avoid hypothermia.'
  422. '(You) - Thank you, Doctor. Goodbye.'
  423. act 'Go home':gt 'street'
  424. end
  425. end
  426. end
  427. if horny >= 30:
  428. act 'Hello, Doctor.':
  429. cla
  430. *clr
  431. '<center><img src="images/add-on/exam10.jpg"></center>'
  432. '(Dr.) Good afternoon. At that complain?'
  433. '(You) - Oh, Doctor, I like a cold - laid nose, throat aches ... and cough.'
  434. '(Doctor) - Temperature is?'
  435. '(You) - Yes, a little.'
  436. '(Doctor) - Clear. Undress. Fully'
  437. act 'Undress':
  438. cla
  439. *clr
  440. set horny += 10
  441. '<center><img src="images/add-on/exam12.jpg"></center>'
  442. 'You stand perd doctor completely naked and confused pytaetel hide behind hands.'
  443. 'The doctor comes to you and gently hugs the shoulders:'
  444. '(Doctor) - What are you, my dear - do not be shy. I´m a doctor. What´s your name?'
  445. '(You timidly) - <<$name>> ...'
  446. '(Doctor) - Do not worry, <<$name>> - I heal you. Come on - breathe deeply.'
  447. act 'Breathe':
  448. cla
  449. *clr
  450. set horny += 10
  451. clr
  452. gs 'stat'
  453. '<center><img src="images/add-on/exam13.jpg"></center>'
  454. 'Dr. vylushivaet your lungs. Her hands were light and gentle touching stethoscope frankly laskiayut your chest.'
  455. 'You feel the growing excitement'
  456. '(Doctor) - Here we go. Taper open your mouth - ah-ah-ah-ah ...'
  457. act 'A-ah':
  458. cla
  459. *clr
  460. '<center><img src="images/add-on/exam14.jpg"></center>'
  461. 'You open your mouth and the doctor examines your throat reddened'
  462. '(Doctor) - Well. Now let´s took my temperature. Sit on the couch and spread your legs.'
  463. '(You) - Why?'
  464. '(Doctor) - We measured rectally - so reliable.'
  465. '(You) - Uh-uh ...'
  466. '(Doctor) - Do not worry - it does not hurt.'
  467. act 'Substitute ass':
  468. cla
  469. *clr
  470. set horny += 10
  471. clr
  472. gs 'stat'
  473. '<center><img src="images/add-on/exam15.jpg"></center>'
  474. 'The doctor arranged for you on the couch in this position that you were red, smeared lubricant between your legs and gently introduced a thermometer into the anus. It really does not hurt, you understand - even pleasant.'
  475. 'The doctor began to slowly move the thermometer back and forth in your ass and the fingers of the other hand - to stroke your pussy. Thanks lbrikantu her fingers sklzyat very easily and gently.'
  476. 'You feel that you are excited stronger. Your nipples harden, pussy doctor flowed at hand ...'
  477. act 'Doctor, what´s happening?':
  478. cla
  479. *clr
  480. set minut += 10
  481. set horny += 10
  482. clr
  483. gs 'stat'
  484. '<center><img src="images/add-on/exam16.jpg"></center>'
  485. 'The doctor takes a thermometer and begins openly caress your pussy moisten with desire.'
  486. 'Are you confused and horrified by her behavior, but she was so gentle, and you are so excited that you simply can not resist. The only thing that you manage - is choking sprsit:'
  487. '(You) - Doctor, what are you doing? What´s going on?'
  488. '(Doctor) - A - felt! I knew immediately that you were one of us, and therefore I can use his power quietly.'
  489. '(You) - So you´re a magician, too?'
  490. '(Doctor) - Yes, only my special magic - Tantric. Heard of it?'
  491. '(You) - No, I do not remember ...'
  492. '(Doctor) - It´s magic, based on sensuality and sex. Roughly speaking, I can cast only when having sex.'
  493. '(You) - So ..?'
  494. '(Doctor) - That is, if we have sex with you - I heal you. Do you agree?'
  495. '(You) - And what in return?'
  496. '(Doctor) - Nothing - I´m doing it solely for my own satisfaction. I see you, have orgasms only if conjure.'
  497. '(You) - Then of course - I agree.'
  498. '(Doctor) - Then get on your knees on the couch.'
  499. act 'To kneel':
  500. cla
  501. *clr
  502. '<center><img src="images/add-on/exam17.jpg"></center>'
  503. 'You knelt down and turned back to Ninel. She took off her robe, meanwhile, remained in her stocking feet and you gasped when he saw her strapon.'
  504. 'Dr. lubed dildo and your pussy lubricated and grinned:'
  505. '(Doctor) - Well, baby, let´s curable!'
  506. act 'Ah-ah-ah!':
  507. cla
  508. *clr
  509. set minut += 10
  510. set horny = 100
  511. clr
  512. gs 'stat'
  513. '<center><img src="images/add-on/exam18.jpg"></center>'
  514. 'With these words she has driven a powerful push in you dildo.'
  515. 'You gasped in surprise, then again, and again, and yet - already with pleasure.'
  516. 'Doctor fucked you familiar confident movements, moaning with every jolt - it seems she is not afforded less fun than you - you were just ecstatic. Unusual decor, shame and skill Ninel quickly led you to the peak'
  517. act 'I´m going to come!':
  518. cla
  519. *clr
  520. '<center><img src="images/add-on/exam19.jpg"></center>'
  521. '(You) - I´m going to come! - You shout - Please, please, please!'
  522. 'Ninel topples onto the couch, pulling you along, you find yourself at the top and start frantically jumping on an artificial penis, screaming and vzvizkivaya acute, almost unbearable pleasure.'
  523. 'A few more movements, and you start to cum, screaming and twitching in a paroxysm of incredibly long orgasm.'
  524. '(Doctor) - Now it´s my turn. Come on, girl - try.'
  525. act 'Ninel humor':
  526. cla
  527. *clr
  528. set horny = 0
  529. set orgasm += 1
  530. set lesbian += 1
  531. set ninelsex += 1
  532. if ninelsex = 1:set girl += 1
  533. set SUB += 1
  534. set vagina += 1
  535. set sick = 0
  536. set health = vital * 10 + stren * 5 + 1000
  537. set willpower = intel * 5 + will * 5 + 1000
  538. set manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
  539. clr
  540. gs 'stat'
  541. '<center><img src="images/add-on/exam19a.jpg"></center>'
  542. 'Ninel strap breaks and presses his face to you raspalennye flowing pussy juices. You begin to wield her tongue in a few seconds and comes in Ninel orgzazme. She screams and beats his chest and squeezing out of her vagina in your face squirting thick whitish fluid'
  543. act 'Dress':
  544. cla
  545. *clr
  546. '<center><img src="images/add-on/exam11.jpg"></center>'
  547. 'With trembling hands, you start natyagivavt panties. Ninel already slipped the robe only her flushed face recalls rough sex, which she just worked with you.'
  548. '(Ninel) - Well, how do you feel?'
  549. '(You) - Ooh ... Just perfect - you answer and only then realize how much you are right - the disease has disappeared, you are full health and in good spirits. A sweet bouquet exhaustion makes this even more pleasant sensations'
  550. '(Ninel) - Well, you see. It´s magic, baby. Mm-m ... You´re just a miracle - a long time I did not get so much pleasure from their magic. If you get sick again - just come to me or calling home. Well, if you just want to spend your time - look for me in the clinic.'
  551. 'You promised to be sure to find her, cleaned up and left'
  552. act 'Get out of the clinic':gt 'street'
  553. end
  554. end
  555. end
  556. end
  557. end
  558. end
  559. end
  560. end
  561. end
  562. end
  563. end
  564. end
  565. end
  566. end
  567. if $ARGS[0] = 'ninel2':
  568. cla
  569. *clr
  570. 'You come to the office and Ninel contemptuously throwing old ladies sitting in the hallway:"No line" - come into the office.'
  571. act 'Login to Account':
  572. cla
  573. *clr
  574. '<center><img src="images/add-on/exam00.jpg"></center>'
  575. 'Ninel looks up from some medical scribbling, to know you and smiles:'
  576. '(Ninel) - Hi, Svetsik. Again ill?'
  577. '(You coughed into his fist) - Yeah. I´ll fly?'
  578. '(Ninel) - Sure, baby. Undress - I´ll listen.'
  579. '(You) - Why? You´re a magician ...'
  580. '(Ninel laughs) - Silly. How could you not know much about magic. I´m must to know what will be treated, otherwise it will happen as the old song - make like a thunderstorm, and got a goat. Magic - the exact thing'
  581. '(You) - Here´s how ... Well then, of course.'
  582. act 'Undress':
  583. cla
  584. *clr
  585. set horny += 10
  586. '<center><img src="images/add-on/exam02.jpg"></center>'
  587. 'You undress and Ninel hears your lungs. As usual, her arms are light and tender and touching her stethoscope on your chest swell sultry heat'
  588. '(Ninel) - Yes ... You again wheezing. Lets say "ah-ah-ah"'
  589. act 'A-a-a':
  590. cla
  591. *clr
  592. '<center><img src="images/add-on/exam03.jpg"></center>'
  593. 'You open your mouth and carefully inspect your Ninel Sore throat'
  594. '(Ninel) - Painting familiar. What are you? Absolutely not kept. Temperature there?'
  595. '(You with a smile) - Pit.'
  596. '(Ninel sly) - Like it? And just afraid ... The first major Down on the flank and knees to her chest tighten.'
  597. act 'Lie on the couch':
  598. cla
  599. *clr
  600. set horny += 10
  601. set minut += 10
  602. clr
  603. gs 'stat'
  604. '<center><img src="images/add-on/exam04.jpg"></center>'
  605. 'You take the desired position and Ninel starts fucking your ass thermometer. You get excited, your pussy lips are opened, one begins to ooze grease. You moan softly'
  606. '(Ninel) - What, baby, like it? Come on let´s see - how.'
  607. act 'Substitute pussy':
  608. cla
  609. *clr
  610. set horny += 10
  611. set minut += 5
  612. clr
  613. gs 'stat'
  614. '<center><img src="images/add-on/exam06.jpg"></center>'
  615. 'You roll over onto his back and pushes the legs. Ninel gets vvobit Speculum and flushed it in your vagina. You quietly ohaete from udovolstvaiya and Ninel echoes you passionate heavy sigh. It looks like your kind of wide-open vulva her great-ons'
  616. act 'Oh-h ..!':
  617. cla
  618. *clr
  619. set horny = 100
  620. set minut += 15
  621. clr
  622. gs 'stat'
  623. '<center><img src="images/add-on/exam05.jpg"></center>'
  624. 'Overcome with passion, Ninel quickly takes off her robe, showing sticking out between his legs and pulled the strap to your lips'
  625. 'You eagerly kissing, while skilled fingers Ninel play with your excited clitoris, causing warm waves of pleasure through your body to disperse'
  626. '(You) - Fuck me! Hurry! - You ask. Ninel grins, continuing to tease your clitoris hand'
  627. '(Ninel) - Ask me'
  628. '(You) - Fuck me - please! Rather, I ask!'
  629. '(Ninel) - Ask better. I see the way you want it'
  630. act 'Beg and pray':
  631. cla
  632. *clr
  633. set minut += 20
  634. '<center><img src="images/add-on/exam07.jpg"></center>'
  635. '(You) - Please, please, please! Fuck me! Do with me what you want - I´m all yours! Rather only - please, soon!'
  636. 'Ninel puts on a strap and snarling drives it in your bosom lust blazing. You cried out Put your feet up, trying to make rubber penis entered you as deeply as possible.'
  637. 'Ninel fucks you faster, moaning and groaning with every jolt, and you moan and podmahivat struggled.'
  638. '(Ninel) - On your knees ..! Turn around! - Choking doctor ordered'
  639. act 'Substitute ass':
  640. cla
  641. *clr
  642. set horny = 0
  643. set minut += 10
  644. set orgasm += 1
  645. set lesbian += 1
  646. set SUB += 1
  647. set vagina += 1
  648. set sick = 0
  649. set health = vital * 10 + stren * 5 + 1000
  650. set willpower = intel * 5 + will * 5 + 1000
  651. set manna = (intel * magik) + magik * 100 + vital * 10 + rikudo
  652. clr
  653. gs 'stat'
  654. '<center><img src="images/add-on/exam08.jpg"></center>'
  655. 'Moaning with excitement you get on your knees and bulging ass to Ninel it easier to get in, but it is in no hurry'
  656. '(You) - Come on - faster! - Ask you - I almost ..! - But Ninel panting orders:'
  657. '(Ninel) - Ask! Beg, plead me little mokroschelka!'
  658. '(You) - Please, please, please-ah-ah-ah! - You shout - Fuck me, fuck! I want to come! Yes - I´m a whore, I mokroschelka, but please, please, please, let me finish! Fuck-me-a-ah!!'
  659. 'Strap on your sticks into the inflamed vagina and nachenaet peck like a jackhammer. Blink and you pierces wild orgasm. You scream in agony and beats, your rules knees weakened and you fall on kusheku shuddering in the throes of sensual and Ninel all stops and orgasm does not end ...'
  660. 'Finally you end immediately and Ninel commands:'
  661. '(Ninel) - A well appease me now, little slut. Come on - how do you know how!'
  662. act '...':
  663. cla
  664. *clr
  665. '<center><img src="images/add-on/exam09.jpg"></center>'
  666. 'You´s turnover on the back and Ninel sits on your face. You diligently oruduete tongue and lips obihazhivaya its wide-open jaws and swollen erect clit, and she was screaming and sobbing crotch crawl across your face until he finally comes in a scream and starts to cum. She cums long, yelling, shaking like a fever and abundantly filling your face thick and sticky liquid'
  667. act '...':
  668. cla
  669. *clr
  670. set horny += 20
  671. '<center><img src="images/add-on/exam09a.jpg"></center>'
  672. 'When he finished, Ninel rises and slowly dressed, showing you their perkrasnoe body. It´s unbelievable, but you again rises excitement.'
  673. 'Ninel somehow sees this and smiles'
  674. '(Ninel) - Oh, no - enough is enough. But you come in something else - fun.'
  675. 'And you will realize that once again will be a little too. You are healthy, satisfied - and thanks for that.'
  676. act 'Thank Ninel and go':gt 'street'
  677. end
  678. end
  679. end
  680. end
  681. end
  682. end
  683. end
  684. end
  685. end
  686. end
  687. end
  688. if $ARGS[0] = 'ninel3':
  689. cla
  690. *clr
  691. 'You come to the office and Ninel contemptuously throwing old ladies sitting in the hallway:"No line" - come into the office.'
  692. act 'Login to Account':
  693. cla
  694. *clr
  695. '<center><img src="images/add-on/exam10.jpg"></center>'
  696. 'Ninel looks up from some medical scribbling, to know you and smiles:'
  697. '(Ninel) - Hi, Svetsik. Again ill?'
  698. '(You with feigned suffering grimace on his face) - Oh, Doctor - my pussy is burning, and all flows. Perhaps she is seriously ill.'
  699. '(Ninel smiling) - my poor child. Now we are going to fly it.'
  700. act 'Tear off his clothes':
  701. cla
  702. *clr
  703. '<center><img src="images/add-on/polsex01.jpg"></center>'
  704. 'Groaning with impatience you tear off her clothes. Ninel also took off the robe and the front of your face rocked strap.'
  705. '(Ninel) - Suck it, baby. Make it hot and wet, as you yourself'
  706. 'You bites his lips in a dildo and start sucking, squishing and abundantly irrigating his saliva. You can see how excited looking at this Ninel.'
  707. act 'Fuck me!':
  708. cla
  709. *clr
  710. set minut += 10
  711. '<center><img src="images/add-on/polsex02.jpg"></center>'
  712. 'Remembering that this Ninel loves you begin to beg her to fuck you soon. You do not even need to pretend to be this - the desire to literally burn you.'
  713. 'Ninel finally heed the request. She rudely puts you on your knees and begins to drive the strap and measured in your inflamed vagina. You ahaete screams and each push. Your feet are weakening.'
  714. act 'Fall on the couch':
  715. cla
  716. *clr
  717. set minut += 20
  718. '<center><img src="images/add-on/polsex03.jpg"></center>'
  719. 'You fall on the couch. Ninel knocks you on your side and play continues. You drawl and voluptuously moan from her breasts too pulled out a deep groan and bestial growl'
  720. 'My God, as you well.'
  721. '(Ninel panting) - I can not - let itself ..!'
  722. act 'Ninel saddle':
  723. cla
  724. *clr
  725. set horny = 0
  726. set minut += 10
  727. set orgasm += 1
  728. set lesbian += 1
  729. set SUB += 1
  730. set manna += 15
  731. set willpower += 15
  732. set vagina += 1
  733. clr
  734. gs 'stat'
  735. '<center><img src="images/add-on/polsex04.jpg"></center>'
  736. 'You obediently mnyaete pose. Ninel leans back on the couch, and you sit down on top of her and strung on a dildo.'
  737. 'You jump on the strap, and squealing nadrachivaya fingers clit when Ninel beneath you starts to twitch and moan. You understand that it ends, and it works as a trigger - you go in orgasm.'
  738. 'Few seconds, you are fighting with Ninel and scream in paroxysms of passion, and then fall exhausted on the couch'
  739. '(You) - Thank you, dear. It was great ...'
  740. '(Ninel) - Oh yeah, Svetsik. Come again.'
  741. act 'Freshen up and go':gt 'street'
  742. end
  743. end
  744. end
  745. end
  746. end
  747. end
  748. if $ARGS[0] = 'glavdoc':
  749. set minut += 5
  750. 'You logged in and asked whether you take on the job.'
  751. 'Chief doctor looked at you. "Oh yeah, that girl you was talking about Catherine. Okay, listen working conditions"'
  752. '"Work will be on weekdays, come with 8 to 9 hours, and come out on the shift will work up to 16 hours. Do not come to you this day will not be counted in the salary. Salary paid on 25th, the spent per shift - 1000 rubles. "'
  753. '"Labor should hand over to the personnel department. You understand, will work?"'
  754. if work = 0:
  755. act 'Find a job':
  756. cla
  757. set workhosp = 1
  758. set work = 1
  759. 'You classify working in the personnel department. "'
  760. act 'Exit':gt 'poli', 'start'
  761. end
  762. end
  763. if workhosp = 1:act 'Resign':gt 'poli', 'discharge'
  764. act 'Exit':gt 'poli', 'start'
  765. end
  766. if $ARGS[0] = 'beginwork':
  767. cla
  768. *clr
  769. '<center><b><font color="maroon">Clinic</font></b></center>'
  770. '<center><img src="images/img/spaln/hospital.jpg"></center>'
  771. 'You have replaced the clinic.'
  772. act 'Start work':
  773. set smena += 1
  774. gt 'WorkHosp', 'start'
  775. end
  776. act 'Resign':gt 'poli', 'discharge'
  777. end
  778. if $ARGS[0] = 'discharge':
  779. cla
  780. set minut += 10
  781. set workhosp = 0
  782. set work = 0
  783. set pay = smena * 1000
  784. set money += pay
  785. set smena = 0
  786. 'Chief doctor looked at you:"Here is your payment <<pay>> rubles and employment history. Goodbye."'
  787. act 'Leave':gt 'street'
  788. end
  789. if $ARGS[0] = '0':
  790. cla
  791. *clr
  792. '<center><img src="images/img/spaln/hospsex1.jpg"></center>'
  793. 'During the examination, the doctor starts to stick to you, clearly alluding to the intimate relationship'
  794. act 'Send it':gt 'poli', 'start'
  795. act 'Fun':
  796. set picrand = 11
  797. set guy += 1
  798. xgt 'sex', 'var'
  799. end
  800. end
  801. if $ARGS[0] = '1':
  802. cla
  803. *clr
  804. '<center><img src="images/img/spaln/hospsex2.jpg"></center>'
  805. 'You examine the two doctors, they touch you everywhere clearly go beyond what is permitted'
  806. act 'Send them':gt 'poli', 'start'
  807. act 'Fun':
  808. set picrand = 11
  809. set guy += 2
  810. xgt 'sexdvoe', 'var'
  811. end
  812. end
  813. if $ARGS[0] = '2':
  814. cla
  815. *clr
  816. '<center><img src="images/img/spaln/hospsex3.jpg"></center>'
  817. 'Going to the office you caught nurse africana stoyuschee kneeling before the doctor with smacking sucking his cock.'
  818. act 'Leave':gt 'poli', 'start'
  819. act 'Login to Account':
  820. cla
  821. *clr
  822. '<center><img src="images/img/spaln/hospsex4.jpg"></center>'
  823. 'When you walked in, jumped out of the doctor´s office, and unmet ostavshayusya nurse glared at you, but after a moment in her eyes flashed light robe and dropping it came to you and vskhvativ one-handed for a second back pressed to his chest drew you to your'
  824. act 'Leave':gt 'poli', 'start'
  825. act 'Let her':
  826. cla
  827. *clr
  828. set guy += 1
  829. set girl += 1
  830. set lesbian += 1
  831. '<center><img src="images/img/spaln/hospsex5.jpg"></center>'
  832. 'She prispustila with you pants and bent his couch over, began to process your pussy with his tongue'
  833. act 'Lick her':
  834. cla
  835. *clr
  836. '<center><img src="images/img/spaln/hospsex6.jpg"></center>'
  837. 'You oprakinuli her on the couch and dug his lips in her black pussy, she exuded an smell that just drives you crazy, you could not put it down and licked her pussy to put their tongue inside pussy and anus, in this state you found and returned the doctor.'
  838. act 'Proceed three':set picrand = 11 & gt 'podrsex', 'var'
  839. end
  840. end
  841. end
  842. end
  843. --- poli ---------------------------------