1
0

bedr 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273
  1. # bedr
  2. CLOSE ALL
  3. if housr ! 1:gt'street'
  4. $metkaM = ''
  5. $locM = 'bedr'
  6. $metka = ''
  7. $loc = 'bedr'
  8. $location_type = 'private'
  9. $locclass = 'bedr'
  10. act 'The corridor':
  11. gt 'korr'
  12. end
  13. clr
  14. minut += 1
  15. housrA = 1
  16. housrMir = 1
  17. elektro += 1
  18. gs 'stat'
  19. if night_mode = 1:
  20. fcolor = rgb(255, 255, 255)
  21. bcolor = rgb(0, 0, 0)
  22. lcolor = rgb(106, 90, 205)
  23. else
  24. fcolor = rgb(0, 0, 0)
  25. bcolor = rgb(255, 255, 255)
  26. lcolor = rgb(106, 90, 205)
  27. end
  28. if pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0:gt 'tobiQW', 'start'
  29. '<center><b><font color="maroon">Bedroom</font></b></center>'
  30. if rembedr = 0:
  31. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/bedr.jpg"></center>'
  32. 'A tight, little room with a <a href="exec:gt ''bed'', ''start''">double bed</a> and an <a href="exec:gt ''budilnik'', ''start''">alarm clock</a>.'
  33. 'An old wooden <a href="exec:GT ''wardrobe''">wardrobe</a> (where you can <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">organize your clothes</a>) stands near the door to the corridor, on top of it there''s a <a href="exec:gt ''clothing'', ''view_clothing_list'', ''store''">suitcase</a> you can store some clothes in. The windows are closed with faded, heavy curtains.'
  34. else
  35. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/bedr2.jpg"></center>'
  36. 'A bright and beautiful room, with a large, kingsized <a href="exec:gt ''bed'', ''start''">double bed</a>.'
  37. 'A modern <a href="exec:GT ''wardrobe''">wardrobe</a> (where you can <a href="exec:gt ''clothing'', ''view_clothing_list'', ''wardrobe''">organize your clothes</a>) stands near the door to the corridor. You have a <a href="exec:gt ''clothing'', ''view_clothing_list'', ''store''">chest</a> at the end of your bed where you can store some clothes. At a wall stand a make-up table with a <a href="exec:gt ''mirror'', ''start''">mirror</a> on it.'
  38. end
  39. if $clothingworntype = 'nude':
  40. $nude = 'Go into the corridor'
  41. else
  42. $nude = 'Get dressed'
  43. end
  44. if husbandrinkday = daystart:
  45. if husbanstrapon = 1:'Your drunken husband sleeps on the bed, with a butt plug up his ass.'
  46. if husbanstrapon = 2:'Your drunken husband sleeps on the bed, after you''ve put a dildo up his ass.'
  47. if husbanstrapon = 3:'Your drunken husband sleeps on the bed, after you''ve fucked him with a strapon.'
  48. end
  49. if husband > 0 and husbandrink ! 10 and husbandrinkday ! daystart:
  50. if hour > 22 or hour < 7:'<a href="exec:gt ''husb'', ''start''">Husband is sleeping on the bed.</a>'
  51. end
  52. if husbandrink = 11 and husbanstrapon > 0 and husbandrinkday ! daystart:
  53. cla
  54. 'Your husband approaches you and asks, "Honey, my ass hurts, like a lot, do you know why?"'
  55. act 'Lie':
  56. cla
  57. husbanstrapon = 0
  58. '"No dear, I do''nt know anything", you answer, trying to look as innocent as possible. He shruggs and walks away'
  59. act 'Finish':gt 'bedr'
  60. end
  61. act 'Confess':
  62. cla
  63. if husbanstrapon = 1:'"Honey, you were so drunk last night, that I decided to teach you a lesson and put a anal plug up your ass. I''ll never do it again, forgive me please", you say.'
  64. if husbanstrapon = 2:'"Dear, I wanted to make you happy, so I started to give you a blowjob, but you didn''t cum, so I inserted a finger into your asshole, but you still didn''t cum, then I took a small dildo and some lube and put in your ass, I''ve never seen you cum like that before. I even gave you a secong blowjob. Forgive me, but you seemed to enjoy it so much, that I could''t stop. I just wanted to make you happy.", you lie to him.'
  65. if husbanstrapon = 3:'"Dear, I wanted to make you a happy, so I started to give you a blowjob, but you didn''t cum, so I inserted a finger into your asshole, but you still didn''t cum. When I put in a second finger you began to move your ass towards my fingers moaning heavily, I thought that you like it, so I put on a strapon. You enjoyed it so much that you finished over and over again, and I continued until I was tired. I then licked all the cum off your body and went to sleep. I just wanted to make you happy and you were enjoying it. Forgive me please", you lie him.'
  66. if harakHusb = 2:
  67. husbizvradd = 0
  68. husbharmin = 0
  69. husbandMark = 0
  70. husband = 0
  71. divorced += 1
  72. fingal += 1
  73. minut += 120
  74. 'The next thing you feel is a powerful punch in the face. When you come back to your senses, you realize that your husband and his things are gone. He left a note, telling you he is going to file for divorce.'
  75. elseif harakHusb = 1:
  76. if husbanstrapon = 1:
  77. '"Look, do not do it again!", he says and storms off angry.'
  78. elseif husbanstrapon = 2:
  79. husbizvradd += 1
  80. '"Do not do it again, I''m still a man and I''m not supposed to get fucked in my ass!", he says and storms off angry.'
  81. elseif husbanstrapon = 3:
  82. if pcs_intel > 40 or izvratH = 1:
  83. husbharmin += 1
  84. '"Are you serious, I''m not some kind of bitch, that wants to get fucked up the arse!" he yells at you. You start to cry and say that you only wanted to please him, he looks at you and says, sighting, "Don''t cry sweetie, I believe you, but do not do it again."'
  85. elseif pcs_intel <= 40:
  86. husbizvradd = 0
  87. husbharmin = 0
  88. husbandMark = 0
  89. husband = 0
  90. divorced += 1
  91. fingal += 1
  92. minut += 120
  93. 'The next thing you feel is a powerful punch in the face. When you come back to your senses, you realize that your husband and his things are gone. He left a note, telling you he is going to file for divorce.'
  94. end
  95. end
  96. elseif harakHusb = 0:
  97. if husbanstrapon = 1:
  98. '"I''m sorry I will not get that drunk again, " he says and leaves the room.'
  99. elseif husbanstrapon = 2:
  100. husbizvradd += 1
  101. '"You''re so thoughtful, instead of scolding me, you still wanted to make me happy, thank you dear." he says and leaves the room.'
  102. elseif husbanstrapon = 3:
  103. husbizvradd += 1
  104. '"Did I really like it?" he asks. You nod.'
  105. '"Well then, thank you dear, but the next time you should ask me first!" he says and leaves the room.'
  106. end
  107. end
  108. act 'Finish':husbanstrapon = 0 & gt 'bedr'
  109. end
  110. end
  111. if husbandrink = 10 and hour > 20 and hour < 23 and husbanstrapon = 0:
  112. '<<$husName>> came home drunk and fell asleep on the bed.'
  113. '<i>That pig!</i>, you think, but an idea springs to your mind, <i>Maybe I should teach him a lesson, so he won''t get drunk again</i>'
  114. if analplug = 1:
  115. act 'Insert a butt plug in his ass':
  116. cla
  117. *clr
  118. husbandrinkday = daystart
  119. husbandrink = 11
  120. husbanstrapon = 1
  121. minut += 10
  122. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/h0.jpg"></center>'
  123. if analplugin = 1:'You pull the plug out of your own anus and shove it up his ass.'
  124. if analplugin = 0:'You go take an anal plug and put it into his ass.'
  125. '<<$husName>> moved, but he doesn''t wake up'
  126. if dildo > 0:
  127. act 'Insert a dildo into his ass':
  128. cla
  129. *clr
  130. husbanstrapon = 2
  131. swallow += 1
  132. spafinloc = 12
  133. gs 'cum_manage'
  134. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/h1.jpg"></center>'
  135. 'You pull out the plug and replace with it with a dildo, <<$husName>> did not even budge. You slowly move the dildo in and out, trying not to wake him up. You notice his cock starts to get rock hard, and <<$husName>> starts to moan softly, but is still asleep. With the dildo in his ass, his dick starts to throb, it seems like he is going to cum. You take his dick in your mouth and you don''t need to suck on it for long. He starts to cum, you swallow it and completely clean his cock. You carefully put back on his underpants.'
  136. gs 'arousal', 'bj', 20
  137. gs 'arousal', 'anal_dildo_give', 20
  138. minut -= 20
  139. gs 'arousal', 'end'
  140. gs 'stat'
  141. act 'Finish':gt 'bedr'
  142. end
  143. end
  144. if strapon > 0:
  145. act 'Use the strapon':
  146. cla
  147. *clr
  148. minut += 20
  149. husbanstrapon = 3
  150. swallow += 1
  151. spafinloc = 12
  152. gs 'cum_manage'
  153. pcs_horny += 30
  154. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/h2.jpg"></center>'
  155. 'You put on the strapon and pull out the butt plug. You gently move the shaft of the strapon inside his ass, <<$husName>> moves but doesn''t wake up. You continue to slowly move it in and out, trying not to wake him. You notice his cock is getting rock hard and <<$husName>> starts to moan softly, still not waking up. Hopeing that he won''t wake up, you increase your speed and push the entire length of the strapon into his has. You see his hard dick and you start to stroke it in addition to pounding him like a little bitch. Realizing he is not far from cumming, you pull out and funish him by giving him a blowjob. He cums inside it, you swallow it down and clean his cock. You carefully put back on his underpants.'
  156. gs 'arousal', 'bj', 20
  157. gs 'arousal', 'anal_strap_give', 20
  158. minut -= 20
  159. gs 'arousal', 'end'
  160. gs 'stat'
  161. act 'Finish':gt 'bedr'
  162. end
  163. end
  164. act 'Finish':gt 'bedr'
  165. end
  166. end
  167. end
  168. dynamic $wearpan
  169. dynamic $removepan
  170. if sick >= 1:
  171. act 'Go to sleep (You''re sick)':
  172. cla
  173. *clr
  174. minut += 240
  175. pcs_sleep += 40
  176. sick -= 1
  177. if sick < 0:sick = 0
  178. gs 'stat'
  179. picrand = rand(11, 17)
  180. '<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick<<picrand>>.jpg"></center>'
  181. 'You are lying in bed, coughing, sneezing and blowing your nose'
  182. act 'Measure temperature':gt 'bedr'
  183. end
  184. end
  185. if dur > 0:'You have hidden <<dur>> doses pale lady'
  186. if dur > 0 and narkday ! daystart:
  187. act 'Take some coke (0:05)':
  188. cla
  189. *clr
  190. minut += 5
  191. narkday = daystart
  192. pcs_health = pcs_vital * 10 + pcs_stren * 5
  193. pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
  194. pcs_mood = 100
  195. pcs_horny = 100
  196. nark += 10
  197. dur -= 1
  198. '<center><img <<$set_imgh>> src="images/shared/drugs/dur.jpg"></center>'
  199. 'You take a small dose of coke and not long after you just start to feel great.'
  200. act 'Leave':gt $curloc
  201. end
  202. end
  203. if pcs_horny >= 50:
  204. act 'Masturbate':gt 'selfplay', 'start'
  205. end
  206. if pornMagazine > 0:'Under your mattress you hide a porn magazine.'
  207. gs 'events', 'read_porn'
  208. gs 'subkid'
  209. if pcs_sleep <= 80:
  210. if succubusQW = 2:
  211. act 'Undress and go to sleep':
  212. if $clothingworntype ! 'nude': gs 'clothing', 'strip'
  213. gt 'bed2', 'succhoice'
  214. end
  215. else
  216. act 'Undress and go to sleep':
  217. if disable_autosave = 0:
  218. if StoryLine = 0:
  219. savegame 'autosave.sav'
  220. else
  221. savegame 'autosave_alt.sav'
  222. end
  223. end
  224. if $clothingworntype ! 'nude': gs 'clothing', 'strip'
  225. if magf2bdo = 2:
  226. gt 'bed2', 'magbstchoice'
  227. else
  228. gt 'bed2', 'sleep'
  229. end
  230. end
  231. end
  232. end
  233. --- bedr ---------------------------------