kuhr.qsrc 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313
  1. # kuhr
  2. CLOSE ALL
  3. $loc = 'kuhr'
  4. $loc_arg = ''
  5. $menu_loc = 'kuhr'
  6. $menu_arg = ''
  7. menu_off = 0
  8. $locclass = 'kitr'
  9. clr
  10. minut += 1
  11. elektro += 1
  12. gs 'stat'
  13. gs 'kit_din'
  14. gs 'themes', 'indoors'
  15. '<center><b><font color="maroon">Kitchen</font></b></center>'
  16. act 'Return to the corridor':
  17. killvar 'fullmorrout'
  18. gt'korr'
  19. end
  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 and remkuhr = 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. dynamic $fill_bottle
  60. dynamic $edaD
  61. dynamic $pranik
  62. dynamic $fatdel
  63. dynamic $driwater
  64. if husband > 0 and husbanday > 0 and huseatday ! daystart and eda >= 2:
  65. act 'Cook a meal for your husband and yourself, 2 servings (1:00)':
  66. cla
  67. *clr
  68. husband += 5
  69. eda -= 2
  70. minut += 60
  71. huseatday = daystart
  72. pcs_mood -= 25
  73. '<center><img <<$set_imgh>> src="images/shared/home/kitchen/cook.jpg"></center>'
  74. 'You prepare a meal for your husband and yourself.'
  75. act 'Leave the meal':gt 'kuhr'
  76. end
  77. end
  78. dynamic $lekarstvo
  79. dynamic $vitamin
  80. if musor > 3:
  81. act 'Take out the trash':
  82. if $clothingworntype = 'nude':
  83. 'I can not go to the trash cans naked!'
  84. else
  85. killvar 'fullmorrout' & minut += 3 & gt 'city_trashplace', 'start'
  86. end
  87. end
  88. end
  89. if dildo > 0 and pcs_horny >= 50:
  90. act 'Masturbate':
  91. cla
  92. *clr
  93. if pcs_inhib < 30:inhib_exp += rand(1,3)
  94. pcs_mood += 15
  95. pcs_vag += 1
  96. if husband > 0 and husbandrink ! 10:
  97. if week > 5 or week < 6 and hour > 16:
  98. cla
  99. *clr
  100. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m1.jpg"></center>'
  101. 'You climb up on the table and penetrate your pussy with your dildo.'
  102. if hour = 7 or hour = 17:'<<$husName>> looks at you, obviously a little dumbfounded.'
  103. if hour ! 7 or hour ! 17:'Just as you get going <<$husName>> walks into the room.'
  104. gs 'arousal', 'masturbate', 15
  105. gs 'stat'
  106. if harakHusb = 0:
  107. '"What are you doing?", <<$husName>> asks.'
  108. '"I''m sorry dear, but I really need it and you''re always busy, " you reply, without stopping to masturbate.'
  109. '"And how often do you that", he asks.'
  110. '"Every now and then, sometimes I put it in the ass too, would you like to watch me?" you ask him'
  111. if izvratH = 0:
  112. husband -= 1
  113. '"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.'
  114. $orgasm_or = 'yes'
  115. gs 'arousal', 'end'
  116. gs 'stat'
  117. act 'Finish':gt 'kuhr'
  118. elseif izvratH = 1:
  119. '"Well, I''m...I''m not sure", he stutters.'
  120. '"So, what do you want?", you ask'
  121. act 'Put on a show':
  122. cla
  123. *clr
  124. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m12.jpg"></center>'
  125. '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.'
  126. '"Dear, is there anything else you want?", you ask, smiling at him.'
  127. '"Can I join?", he asks you a little embarrassed.'
  128. gs 'arousal', 'anal_dildo', 15
  129. gs 'stat'
  130. act 'Solve':
  131. cla
  132. *clr
  133. analorgasm += 1
  134. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m13.jpg"></center>'
  135. '<<$husName>> takes out his dick and starts to masturbate right in-front 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.'
  136. '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 after-bliss of both of your orgasms you kiss each other passionately.'
  137. $orgasm_or = 'yes'
  138. gs 'arousal', 'end'
  139. gs 'stat'
  140. act 'Finish':gt 'kuhr'
  141. end
  142. end
  143. end
  144. elseif harakHusb = 1:
  145. '"I guess sex with me isn''t enough?", he asks.'
  146. '"I''m sorry dear, but I really need it and you''re always busy", you reply, without stopping to masturbate.'
  147. '"Well then, why don''t you show me everything then? I''d love to watch", he says.'
  148. '"Do you want to see me putting in my ass too?" you ask'
  149. if izvratH = 0:
  150. husband += 1
  151. husbizvradd += 1
  152. '"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.'
  153. '"Anytime for such a lovely audience, but I need a quick break", you laugh and take the dildo out of your pussy.'
  154. $orgasm_or = 'yes'
  155. gs 'stat'
  156. act 'Finish':gt 'kuhr'
  157. elseif izvratH = 1:
  158. husband += 1
  159. '"And what are you going to show me now?", he asks.'
  160. '"Whatever you would like to see", you answer.'
  161. act 'Put on a show':
  162. cla
  163. *clr
  164. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m12.jpg"></center>'
  165. '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.'
  166. 'It''s hard for you not to look at it, therefore you ask him, if he would like to participate somehow.'
  167. '"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.'
  168. gs 'arousal', 'anal_dildo', 5
  169. gs 'stat'
  170. act 'Blowjob':
  171. cla
  172. *clr
  173. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m14.jpg"></center>'
  174. '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."'
  175. gs 'arousal', 'bj', 5, 'sub'
  176. gs 'stat'
  177. act 'Anal Sex':
  178. picrand = 88
  179. gt 'sex', 'anal'
  180. gs 'arousal', 'end'
  181. gs 'stat'
  182. end
  183. end
  184. end
  185. end
  186. elseif harakHusb = 2:
  187. '"Is your hole itching?" he asks.'
  188. '"I''m sorry dear, but I really need it and you''re always busy", you reply, without stopping to masturbate.'
  189. if izvratH = 0:
  190. husband += 1
  191. husbizvradd += 1
  192. '"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."'
  193. gs 'arousal', 'masturbate', 5
  194. gs 'arousal', 'bj', 5, 'rough'
  195. minut -= 5
  196. gs 'stat'
  197. act 'Spread your legs':
  198. picrand = 87
  199. gt 'sex', 'vag'
  200. gs 'arousal', 'end'
  201. gs 'stat'
  202. end
  203. elseif izvratH = 1:
  204. husband += 1
  205. '<<$husName>> orders you to put your toy into your ass and you submissively oblige to do so. "Now open you mouth and suck me off", he tells you.'
  206. act 'Blowjob':
  207. cla
  208. *clr
  209. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m14.jpg"></center>'
  210. '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."'
  211. gs 'arousal', 'bj', 5, 'sub'
  212. gs 'stat'
  213. act 'Anal Sex':
  214. picrand = 87
  215. gt 'sex', 'anal'
  216. gs 'arousal', 'end'
  217. gs 'stat'
  218. end
  219. end
  220. end
  221. end
  222. else
  223. '<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
  224. 'Unable to control yourself anymore you immediately reach for your dildo so you can finally take care of your lustful desires. You waste no time to attach the suction base of the dildo onto the floor before lowering yourself slowly to it''s tip.'
  225. 'Shivers run down your spine as you feel that thick head spreading your pussy-lips and soon the whole length begin to slide deep inside your hole. A throaty moan overwhelms the room when that delicious cock finally bottoms out in your cunt, sending you to the heavens and back.'
  226. 'After shifting your legs and getting more comfortable you start to rock your hips and bounce on it, moaning louder and louder as you keep increasing the power and pace of your thrusts- soon hammering your ass against the cold floor time and time again. It takes you just a few minutes to reach that so wanted orgasm, your toes curling tightly as that wonderful feeling run through your entire body...'
  227. 'Soon you''re twitching onto that dildo and juices drip down its length, soaking the floor beneath you. You take a few deep breaths and a smile grows along your face after cumming so hard there. That was just what you needed!'
  228. $orgasm_or = 'yes'
  229. gs 'arousal', 'vaginal_dildo', 10
  230. gs 'arousal', 'end'
  231. act 'Breathe':gt 'kuhr'
  232. end
  233. else
  234. '<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
  235. 'Unable to control yourself anymore you immediately reach for your dildo so you can finally take care of your lustful desires. You waste no time to attach the suction base of the dildo onto the floor before lowering yourself slowly to it''s tip.'
  236. 'Shivers run down your spine as you feel that thick head spreading your pussy-lips and soon the whole length begin to slide deep inside your hole. A throaty moan overwhelms the room when that delicious cock finally bottoms out in your cunt, sending you to the heavens and back.'
  237. 'After shifting your legs and getting more comfortable you start to rock your hips and bounce on it, moaning louder and louder as you keep increasing the power and pace of your thrusts- soon hammering your ass against the cold floor time and time again. It takes you just a few minutes to reach that so wanted orgasm, your toes curling tightly as that wonderful feeling run through your entire body...'
  238. 'Soon you''re twitching onto that dildo and juices drip down its length, soaking the floor beneath you. You take a few deep breaths and a smile grows along your face after cumming so hard there. That was just what you needed!'
  239. $orgasm_or = 'yes'
  240. gs 'arousal', 'vaginal_dildo', 10
  241. gs 'arousal', 'end'
  242. act 'Breathe':gt 'kuhr'
  243. end
  244. end
  245. end
  246. if fullmorrout = 1:
  247. minut += 2
  248. act '<font color = maroon><b>Leave the apartment and go outside</b></font>':
  249. minut +=1
  250. killvar 'fullmorrout'
  251. gs 'korr'
  252. xgt 'city_residential', 'start'
  253. end
  254. end
  255. --- kuhr ---------------------------------