1
0

kuhr.qsrc 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544
  1. # kuhr
  2. CLOSE ALL
  3. $metka = ''
  4. $loc = 'kuhr'
  5. clr
  6. minut += 1
  7. elektro += 1
  8. gs 'stat'
  9. gs 'kit_din'
  10. if night_mode = 1:
  11. fcolor = rgb(255, 255, 255)
  12. bcolor = rgb(0, 0, 0)
  13. lcolor = rgb(106, 90, 205)
  14. else
  15. fcolor = rgb(0, 0, 0)
  16. bcolor = rgb(255, 255, 255)
  17. lcolor = rgb(106, 90, 205)
  18. end
  19. '<center><b><font color="maroon">Kitchen</font></b></center>'
  20. if remkuhr = 0:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/kuhr.jpg"></center>'
  21. if remkuhr = 1:'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/kuhr2.jpg"></center>'
  22. if kransloman = 1:
  23. cla
  24. 'You notice a leak, your sink is out of order and it is necessary to call a plumber'
  25. if Grisha = 0:act 'Call':dynamic $santehnik
  26. if Grisha > 0:act 'Call Grisha, the plumber':dynamic $santehnikgr
  27. act 'Leave': killvar 'fullmorrout' & gt 'korr'
  28. exit
  29. end
  30. if rand(1, 100) = 100 and santehnikDolg = 0:
  31. kransloman = 1
  32. gt 'kuhr'
  33. end
  34. if posudomashina > 0:
  35. dynamic $posudomashina
  36. end
  37. if cltarelka > 0:
  38. '<b><<cltarelka>></b> clean plates are stored in the cupboard.'
  39. else
  40. '<b><font color="red">You have no clean dishes left.</font></b>'
  41. end
  42. if dirttarelka > 0:'<b><<dirttarelka>></b> dirty dishes are lying in the sink. <a href="exec:dynamic $dirtarm">Wash the dishes</a>.'
  43. if fairy > 0:
  44. 'Next to the sink is dishwashing liquid, enough for <b><<fairy>></b> uses.'
  45. else
  46. '<b><font color="red">You have nothing to wash dishes with, you need to buy dishwashing liquid.</font></b>'
  47. end
  48. if eda > 0:
  49. if cltarelka = 0 or edahot > 0:$edagot = ''
  50. if cltarelka > 0 and edahot = 0:$edagot = '<a href="exec:dynamic $edagotd">Cook meal (0:30)</a>'
  51. 'In the refrigerator there''s food, enough for <b><<eda>></b> servings. <<$edagot>>'
  52. end
  53. if edaD = 0 and eda = 0:'<b><font color="red">The refrigerator is empty, you have nothing to eat.</font></b>'
  54. if posudomashina > 0:'The kitchen has a dishwasher.'
  55. if edahot > 0:'<a href="exec:dynamic $edahotd">A cooked meal is on the table (0:30).</a>'
  56. if husband > 0 and husbandrink ! 10:
  57. if hour = 7 or hour = 17:'<a href="exec:gt ''husb'', ''start''">Your husband is eating at the table.</a>'
  58. end
  59. if pranik > 0:
  60. if pranik = 1:
  61. 'You only have one more portion of tea biscuits.'
  62. else
  63. 'You have enough tea biscuits for <b><<pranik>></b> more snacks.'
  64. end
  65. dynamic $pranik
  66. end
  67. dynamic $edaD
  68. dynamic $fatdel
  69. dynamic $driwater
  70. if husband > 0 and husbanday > 0 and huseatday ! daystart and eda >= 2:
  71. act 'Cook a meal for your husband and yourself, 2 servings (1:00)':
  72. cla
  73. *clr
  74. husband += 5
  75. eda -= 2
  76. minut += 60
  77. huseatday = daystart
  78. pcs_mood -= 25
  79. '<center><img <<$set_imgh>> src="images/shared/home/kitchen/cook.jpg"></center>'
  80. 'You prepare a meal for your husband and yourself.'
  81. act 'Leave the meal':gt 'kuhr'
  82. end
  83. end
  84. dynamic $lekarstvo
  85. dynamic $vitamin
  86. if zoo >= 6 and sobaka ! 0:
  87. if husband > 0 and husbandrink ! 10:
  88. if hour = 7 and hour = 17:
  89. act 'Call <<$namesob>>':
  90. cla
  91. *clr
  92. '<center><img <<$set_imgh>> src="images/beast/zoo/z1.jpg"></center>'
  93. 'You call your dog and he runs to you pushing his wet nose between your legs and starts to lick.'
  94. gs 'arousal', 'cuni', 10, 'beast'
  95. gs 'stat'
  96. if harakHusb = 0:
  97. husband -= 1
  98. '"OH MY GOD, what is he doing?", your husband yells.'
  99. '"Help me!", you scream, "He won''t let go!"'
  100. '<<$husName>> tries to shoo the dog away, but <<$namesob>> growls and snarls at your husband. "He won''t stop it. What should I do?" he asks.'
  101. '"Think of something." you tell him, already moaning slightly with pleasure. <<$husName>> tries to intimidate the dog, continuously yelling at him, but to no avail. Suddenly your dog jumps on top you.'
  102. '"Fuck, what he is going to do now?" <<$husName>> screams..'
  103. '"Isn''t it obvious? He wants to fuck me." you say.'
  104. '"Please, try to free yourself", your husband pleads.'
  105. act 'Try':
  106. cla
  107. *clr
  108. gs 'cum_call', '', $namesob, 1, 0, -1, 60
  109. '<center><img <<$set_imgh>> src="images/beast/zoo/z2.jpg"></center>'
  110. 'You try to push your dog away ang get way from his clutches, but it seems to do just the opposite of what you''ve intended. <<$namesob>> now leans on you and you can feel his knot on your thigh, trying to find its way to your pussy.'
  111. if izvratH = 0:
  112. '"Oh my God, I can''t look at this", your husband screams, then storms out of the room, slamming the door behind him. Meanwhile, your dogs knot found its way to your pussy and enters it. You moan and it doesn''t take long for you to cum and not long after <<$namesob>> cums inside you as well. Once he is done pumping his seed into you, he runs back into the corridor. Your husband comes back and you''re still lying on your back, with your dogs spern flowing out of your pussy.'
  113. '"I''ll take him now to the vet and have him put to sleep", <<$husName>> tells you.'
  114. $orgasm_or = 'yes'
  115. gs 'arousal', 'vaginal', 20, 'beast'
  116. gs 'arousal', 'end'
  117. gs 'stat'
  118. elseif izvratH = 1:
  119. '"Get off her" shouts <<$husName>> at the dog, but your dog doesn''t leave you alone. Meanwhile, your dogs knot found its way to your pussy and enters it. You moan, but your husband interprets your movement as an attempt of trying to free yourself. "That''s it <<$pcs_nickname>>, you almost freed yourself."'
  120. 'It doesn''t take long for you to cum and not long after <<$namesob>> cums inside you as well. Once he is done pumping his seed into you, he runs back into the corridor. <<$husName>> looks at you in shook, as your dogs cum flows out of your pussy..'
  121. '"I''ll take him now to the vet and have him put to sleep", <<$husName>> tells you.'
  122. $orgasm_or = 'yes'
  123. gs 'arousal', 'vaginal', 20, 'beast'
  124. gs 'arousal', 'end'
  125. gs 'stat'
  126. end
  127. act 'Let him put your dog to sleep':
  128. sobaka = 0
  129. zoo = 0
  130. gt 'kuhr'
  131. end
  132. act 'It''s just his instincts':
  133. cla
  134. '"No dear, it''s not his fault, it''s his instincts, just let him do what he''s supposed to do, he''ll eventually stop", you say.'
  135. '"Well, whatever you say."'
  136. act 'Finish':gt 'kuhr'
  137. end
  138. end
  139. elseif harakHusb = 1:
  140. '"Your dog is absolutely crazy, couldn''t you go out on the streets and find him some bitch to hump?", <<$husName>> asks.'
  141. '"Help me, he won''t stop", you reply.'
  142. if izvratH = 0:
  143. '<<$husName>> tries to pull the dog away from you, but he just growls. Your husband then leaves the room to grab an old bed sheet. He comes back and pulls it over <<$namesob>> head, he then takes a small rope and ties the the ends together. Your dog whimpers while inside the improvised bag.'
  144. '"I''ll take him now to the vet and have him put to sleep", <<$husName>> tells you.'
  145. act 'Let him put your dog to sleep':
  146. sobaka = 0
  147. zoo = 0
  148. gt 'kuhr'
  149. end
  150. act 'It''s just his instincts':
  151. cla
  152. '"No dear, it''s not his fault, it''s his instincts, just let him do what he''s supposed to do, he''ll eventually stop", you say.'
  153. '"Well, whatever you say."'
  154. act 'Finish':gt 'kuhr'
  155. end
  156. elseif izvratH = 1:
  157. swallow += 1
  158. '"I''m not going to", <<$husName>> chuckles. He leans back into the chair with a sly grin on his face.'
  159. '"He''s not going to stop" you reply and push your legs apart. <<$husName>> looks at, enjoying your soft moans, then he suddenly gets up, pulls out his dick and tells you to suck it.'
  160. act 'Blowjob':
  161. cla
  162. *clr
  163. gs 'cum_call', 'mouth', $husName
  164. '<center><img <<$set_imgh>> src="images/beast/zoo/z3.jpg"></center>'
  165. 'You grab his cock and take it into your mouth. You suck on his cock for good two to three minutes, until <<$husName>> ends up cumming in your mouth. You swallow his sperm and clean up his cock. As your husband moves away, your dog stops licking your cunt and positions his knot above your face.'
  166. '"Wooh, hold on, this goes too far", <<$husName>> says and ties to shoo your dog away, but <<$namesob>> growls at your husband. Your husband then leaves the room to grab an old bed sheet. He comes back and pulls it over <<$namesob>> head, he then takes a small rope and ties the the ends together. Your dog whimpers while inside the improvised bag.'
  167. '"I''ll take him now to the vet and have him put to sleep", <<$husName>> tells you.'
  168. gs 'boyStat', $husID
  169. gs 'arousal', 'bj', 3, 'sub'
  170. gs 'arousal', 'vaginal', 3, 'beast'
  171. minut -= 3
  172. gs 'arousal', 'end'
  173. gs 'stat'
  174. act 'Put your dog to sleep':
  175. sobaka = 0
  176. zoo = 0
  177. gt 'kuhr'
  178. end
  179. act 'It''s just his instincts!':
  180. cla
  181. '"No dear, it''s not his fault, it''s his instincts, just let him do what he''s supposed to do, he''ll eventually stop", you say.'
  182. '"Well, whatever you say."'
  183. act 'Jerk your dog off':
  184. cla
  185. *clr
  186. husband -= 1
  187. gs 'cum_call', 'hands', $namesob, 1, 0, -1, 60
  188. '<center><img <<$set_imgh>> src="images/beast/zoo/z6.jpg"></center>'
  189. 'You take the dogs knot in your hand and begin to stroke it, after a few minutes your dog cums on your hands.'
  190. act 'Finish':gt 'kuhr'
  191. end
  192. act 'Suck dog':
  193. cla
  194. *clr
  195. swallow += 1
  196. husband -= 40
  197. gs 'cum_call', 'mouth', $namesob, 1, 0, -1, 60
  198. '<center><img <<$set_imgh>> src="images/beast/zoo/z7.jpg"></center>'
  199. 'You order your <<$namesob>> to rollover on his back, so you can easily put his cock in your mouth. Your husband looks at you with disgust, as you suck off <<$namesob>>. After a few minutes you feel your dogs cock throbbing, as he cums in your mouth.'
  200. '"My god, what kind of pervert are you", <<$husName>> asks, with obvious disgust.'
  201. gs 'arousal', 'bj', 5, 'beast'
  202. gs 'arousal', 'end'
  203. gs 'stat'
  204. act 'Finish':gt 'kuhr'
  205. end
  206. act 'Finish':gt 'kuhr'
  207. end
  208. end
  209. end
  210. elseif harakHusb = 2:
  211. '"Your dog is absolutely crazy, couldn''t you go out on the streets and find him some bitch to hump?", <<$husName>> asks.'
  212. '"Help me, he doesn''t stop", you reply.'
  213. if izvratH = 0:
  214. pcs_mood -= 15
  215. pcs_willpwr -= 15
  216. '<<$husName>> tries to shoo your dog away, but to no avail, instead <<$namesob>> growls angry. Then <<$husName>> kicks your dog into the ribs, he whimpers and your husband continues to kick him over and over again.'
  217. '"I better never see you doing something like this ever again.", <<$husName>> says. As you open your eyes you see your dog lying dead on the floor in his own pool of blood.'
  218. '"I''m going to take this little shit outside and throw it away", your husband says as he wraps the dog into an old sheet. "Now clean these blood stains up, I don''t want to buy a new carpet.", <<$husName>> orders you, as he makes his way out to the garbage cans.'
  219. act 'Finish':
  220. sobaka = 0
  221. zoo = 0
  222. gt 'kuhr'
  223. end
  224. elseif izvratH = 1:
  225. swallow += 1
  226. spafinloc = 12
  227. gs 'cum_manage'
  228. '"What do you mean, you can''t stop him? Do you like the way he licks you?", <<$husName>> shouts.'
  229. '"No, of course not!", you try to explain.'
  230. '"And yet I see you bitch here with your legs spread apart and your juices gushing out of your cunt, while your shitty dog licks your pussy." he says. "Well, you know what, why don''t you show me how much of a bitch you are. Go on, suck his cock."'
  231. act 'Suck <<$namesob>> knot':
  232. cla
  233. *clr
  234. '<center><img <<$set_imgh>> src="images/beast/zoo/z4.jpg"></center>'
  235. '<<$husName>> grabs your dog by the collar and pulls him up to the couch, so that <<$namesob>> cock is just above your face. You take his knot into your mouth and begin to suck on it. Your husband watches and tells you that the dog loves your bitches mouth.'
  236. 'It seems like just being part of the audience doesn''t quite satisfy him, so he orders you spread your legs.'
  237. gs 'arousal', 'bj', 5, 'beast', 'sub'
  238. gs 'stat'
  239. act 'Spread your legs':
  240. cla
  241. *clr
  242. suprdolg += 1
  243. gs 'cum_call', '', $HusID
  244. '<center><img <<$set_imgh>> src="images/beast/zoo/z5.jpg"></center>'
  245. 'You obediently spreads your legs apart and your husband pushes his cock into your pussy. The first few times he moves slowly, but soon starts to get very rough. He doesn''t need long to cum inside your pussy'
  246. 'He looks at the dog, "Seems like that shit isn''t done yet. Let''s try something else, turn around bitch.", he orders. "Let''s see if he like your asshole more than your mouth."'
  247. gs 'boyStat', $HusID
  248. gs 'arousal', 'vaginal', 5, 'sub', 'rough'
  249. gs 'arousal', 'anal', 5, 'beast'
  250. minut -= 5
  251. gs 'stat'
  252. act 'Anal Sex':
  253. cla
  254. *clr
  255. analorgasm += 1
  256. gs 'cum_call', 'anus', $namesob, 1, 0, -1, 60
  257. '<center><img <<$set_imgh>> src="images/beast/zoo/z8.jpg"></center>'
  258. 'You turn around and position yourself on all fours. <<$namesob>> immediately jumps on you, you spread your buttocks apart with one hand. He start to fuck you, thinking you are just another bitch in heat. "That''s a good bitch", your husband comments and leaves the room. Your dog increases in speed, pumping his knot in and out of your ass and you have to admit, it starts to feel really good. For several minutes <<$namesob>> humps your ass, until you eventually climax. Your ass tightens, causing your dog to cum too.'
  259. $orgasm_or = 'yes'
  260. gs 'arousal', 'end'
  261. gs 'stat'
  262. act 'Finish':gt 'kuhr'
  263. end
  264. end
  265. end
  266. end
  267. end
  268. end
  269. else
  270. act 'Call <<$namesob>>':killvar 'fullmorrout' & gt 'soba', 'zoof27'
  271. end
  272. elseif husband = 0 or husbandrink = 10:
  273. act 'Call <<$namesob>>':killvar 'fullmorrout' & gt 'soba', 'zoof27'
  274. end
  275. end
  276. if musor > 3:
  277. act 'Take out the trash':
  278. if $clothingworntype = 'nude':
  279. 'I can not go to the trash cans naked!'
  280. else
  281. killvar 'fullmorrout' & minut += 3 & gt 'trashplace', 'start'
  282. end
  283. end
  284. end
  285. if dildo > 0 and pcs_horny >= 50:
  286. act 'Masturbate':
  287. cla
  288. *clr
  289. if pcs_inhib < 30:inhib_exp += rand(1,3)
  290. pcs_mood += 15
  291. pcs_willpwr += 15
  292. pcs_vag += 1
  293. if husband > 0 and husbandrink ! 10:
  294. if week > 5 or week < 6 and hour > 16:
  295. cla
  296. *clr
  297. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m1.jpg"></center>'
  298. 'You climb up on the table and penetrate your pussy with your dildo.'
  299. if hour = 7 or hour = 17:'<<$husName>> looks at you, obviously a little dumbfounded.'
  300. if hour ! 7 or hour ! 17:'Just as you get going <<$husName>> walks into the room.'
  301. gs 'arousal', 'masturbate', 15
  302. gs 'stat'
  303. if harakHusb = 0:
  304. '"What are you doing?", <<$husName>> asks.'
  305. '"I''m sorry dear, but I really need it and you''re always busy, " you reply, without stopping to masturbate.'
  306. '"And how often do you that", he asks.'
  307. '"Every now and then, sometimes I put it in the ass too, would you like to watch me?" you ask him'
  308. if izvratH = 0:
  309. husband -= 1
  310. '"I think I''ll step outside until you are done", he says and leaves the apartment. You continue to satisfy yourself, but are a bit sad, he didn''t ''help'' you.'
  311. $orgasm_or = 'yes'
  312. gs 'arousal', 'end'
  313. gs 'stat'
  314. act 'Finish':gt 'kuhr'
  315. elseif izvratH = 1:
  316. '"Well, I''m...I''m not sure", he stutters.'
  317. '"So, what do you want?", you ask'
  318. act 'Put on a show':
  319. cla
  320. *clr
  321. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m12.jpg"></center>'
  322. 'You pull out the dildo from your pussy and wink at your husband, then you push the dildo into your ass. <<$husName>> watches closely as the dildo moves in and out. You notice the obvious bulge in trousers.'
  323. '"Dear, is there anything else you want?", you ask, smiling at him.'
  324. '"Can I join?", he asks you a little embarrased.'
  325. gs 'arousal', 'anal_dildo', 15
  326. gs 'stat'
  327. act 'Solve':
  328. cla
  329. *clr
  330. analorgasm += 1
  331. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m13.jpg"></center>'
  332. '<<$husName>> takes out his dick and starts to masturbate right infront of you, you''re surprised, because you expected he''d to fuck you or something like that a long the line. You sigh silently and continue to fuck your ass with the dildo. <<$husName>> now masturbates furiously, as you moaning becomes louder. Both of you realize, it won''t be long until either of you cums.'
  333. 'With a final thrust, it''s you, who experiences the first orgasm and it''s so strong, that you fall off the couch onto the floor. You talk your dildo out of your ass and lick it clean, while locking eyes with your husband. He finds this incredibly erotic and it takes him merely a few more seconds to cum, spraying his salty fluids over the couch and carpet. In the afterbliss of both of your orgasms you kiss each other passionately.'
  334. $orgasm_or = 'yes'
  335. gs 'arousal', 'end'
  336. gs 'stat'
  337. act 'Finish':gt 'kuhr'
  338. end
  339. end
  340. end
  341. elseif harakHusb = 1:
  342. '"I guess sex with me isn''t enough?", he asks.'
  343. '"I''m sorry dear, but I really need it and you''re always busy", you reply, without stopping to masturbate.'
  344. '"Well then, why don''t you show me everything then? I''d love to watch", he says.'
  345. '"Do you want to see me putting in my ass too?" you ask'
  346. if izvratH = 0:
  347. husband += 1
  348. husbizvradd += 1
  349. '"No, not yet, and that''s enough for now", he says and sits down on a chair. You continue to satisfy yourself rapidly and soon orgasm in front of your husband. <<$husName>> applauds you. "Bravo! Care to do it again?", he says chuckling.'
  350. '"Anytime for such a lovely audience, but I need a quick break", you laugh and take the dildo out of your pussy.'
  351. $orgasm_or = 'yes'
  352. gs 'stat'
  353. act 'Finish':gt 'kuhr'
  354. elseif izvratH = 1:
  355. husband += 1
  356. '"And what are you going to show me now?", he asks.'
  357. '"Whatever you would like to see", you answer.'
  358. act 'Put on a show':
  359. cla
  360. *clr
  361. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m12.jpg"></center>'
  362. 'You move your dildo slowly into your ass. <<$husName>> watches closely as the dildo moves in and out of your ass. You notice the bulge in his pants.'
  363. 'It''s hard for you not to look at it, therefore you ask him, if he would like to participate somehow.'
  364. '"Now that you ask", he says, "you could blow me, while pump that toy into your ass." So he unbuttons his pants and takes his cock out.'
  365. gs 'arousal', 'anal_dildo', 5
  366. gs 'stat'
  367. act 'Blowjob':
  368. cla
  369. *clr
  370. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m14.jpg"></center>'
  371. 'You start to suck on his flaccid penis, while you continue to pleasure yourself, by pumping that dildo in and out of your ass. After a short while, <<$husName>>s dick became rock hard, when it finally is, he says "Time for me to fuck that hole."'
  372. gs 'arousal', 'bj', 5, 'sub'
  373. gs 'stat'
  374. act 'Anal Sex':
  375. picrand = 88
  376. gt 'sex', 'anal'
  377. gs 'arousal', 'end'
  378. gs 'stat'
  379. end
  380. end
  381. end
  382. end
  383. elseif harakHusb = 2:
  384. '"Is your hole itching?" he asks.'
  385. '"I''m sorry dear, but I really need it and you''re always busy", you reply, without stopping to masturbate.'
  386. if izvratH = 0:
  387. husband += 1
  388. husbizvradd += 1
  389. '"Well then, open your mouth", he orders you, pulls out his cock and pushes it into your mouth by force. He holds you by the hair and fucks your mouth, while telling you not to stop masturbating. Soon after he becomes tired of your mouth, "Now take out that damn toy, time for me to scratch your itch."'
  390. gs 'arousal', 'masturbate', 5
  391. gs 'arousal', 'bj', 5, 'rough'
  392. minut -= 5
  393. gs 'stat'
  394. act 'Spread your legs':
  395. picrand = 87
  396. gt 'sex', 'vag'
  397. gs 'arousal', 'end'
  398. gs 'stat'
  399. end
  400. elseif izvratH = 1:
  401. husband += 1
  402. '<<$husName>> orders you to put your toy into your ass and you submissivly oblige to do so. "Now open you mouth and suck me off", he tells you.'
  403. act 'Blowjob':
  404. cla
  405. *clr
  406. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m14.jpg"></center>'
  407. 'You start to suck on his flaccid penis, while you continue to pleasure yourself, by pumping that dildo in and out of your ass. After a short while, <<$husName>>s dick became rock hard, when it finally is, he says "Time for me to fuck your ass-pussy."'
  408. gs 'arousal', 'bj', 5, 'sub'
  409. gs 'stat'
  410. act 'Anal Sex':
  411. picrand = 87
  412. gt 'sex', 'anal'
  413. gs 'arousal', 'end'
  414. gs 'stat'
  415. end
  416. end
  417. end
  418. end
  419. else
  420. '<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
  421. 'You put your dildo on the floor and start to ride it. It moves in and out and you feel the pleasure running through your entire body with each thrust. You begin to moan and a few minutes later you climax and a wave of pleasure runs through your entire body.'
  422. $orgasm_or = 'yes'
  423. gs 'arousal', 'end'
  424. gs 'stat'
  425. act 'Breathe':gt 'kuhr'
  426. end
  427. else
  428. pcs_horny = 0
  429. orgasm += 1
  430. '<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
  431. 'You put your dildo on the floor and start to ride it. It moves in and out and you feel the pleasure running through your entire body with each thrust. You begin to moan and a few minutes later you climax and a wave of pleasure runs through your entire body.'
  432. $orgasm_or = 'yes'
  433. gs 'arousal', 'end'
  434. gs 'stat'
  435. act 'Breathe':gt 'kuhr'
  436. end
  437. end
  438. end
  439. if fullmorrout = 1:
  440. minut += 2
  441. act '<font color = maroon><b>Leave the apartment and go outside</b></font>':
  442. minut +=1
  443. killvar 'fullmorrout'
  444. gs 'korr'
  445. xgt 'street', 'start'
  446. end
  447. end
  448. act 'Return to the corridor':
  449. killvar 'fullmorrout'
  450. gt'korr'
  451. end
  452. --- kuhr ---------------------------------