1
0

sitr.qsrc 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387
  1. # sitr
  2. CLOSE ALL
  3. $loc_arg = ''
  4. $loc = 'sitr'
  5. $menu_loc = 'sitr'
  6. $menu_arg = ''
  7. menu_off = 0
  8. $location_type = 'private'
  9. $locclass = 'livingr'
  10. act 'Go to the corridor':gt 'korr'
  11. clr
  12. minut += 1
  13. elektro += 1
  14. gs 'stat'
  15. gs 'themes', 'indoors'
  16. '<center><b><font color="maroon">Living room</font></b></center>'
  17. if remsitr = 0:
  18. if TV = 0 or komp = 0:
  19. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sitr.jpg"></center>'
  20. else
  21. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sitr1.jpg"></center>'
  22. end
  23. $zal = 'A cramped room'
  24. $zal2 = 'faded wall'
  25. elseif remsitr = 1:
  26. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/sitr2.jpg"></center>'
  27. $zal = 'A modern, bright room'
  28. $zal2 = 'papered walls with light'
  29. end
  30. if TV = 0:$TV = 'a great place for a TV, if you had one.'
  31. if TV = 1:$TV = 'an old CRT <a href="exec:gt ''TV'', ''start''">TV</a>'
  32. if TV = 2:$TV = 'a huge plasma <a href="exec:gt ''TV'', ''start''">TV</a>'
  33. ! WD: Missing Code to buy / Upgrade Sofa, Uninitialised ~ 'divan'
  34. if divan = 0:$divan = '<a href="exec:gt ''divan'', ''start''">an old sofa</a>'
  35. if divan = 1:$divan = '<a href="exec:gt ''divan'', ''start''">a luxurious leather sofa</a>'
  36. if komp = 0:$komp = ''
  37. if komp = 1:$komp = ' with a <a href="exec:gt ''Komp'', ''start''">computer</a> on top of it'
  38. ! WD: Missing Code to buy / Upgrade table, Uninitialised ~ 'stol'
  39. if stol = 0:$stol = 'an old wooden <a href="exec:gt ''stol'', ''start''">table</a>'
  40. if stol = 1:$stol = 'a new <a href="exec:gt ''stol'', ''start''">table</a>'
  41. if obruch > 0: '<br>Your hula hoop stands in a corner of the room. '
  42. if skak > 0: 'Your jump rope is on a shelf. '
  43. if bookYog > 0: 'Your yoga mat is rolled up in a corner. '
  44. '<<$zal>>, <<$divan>> stands next to the <<$zal2>>. In front of the sofa is <<$TV>>. In front of the window is <<$stol>><<$komp>>.'
  45. if mishka > 0: iif(mishka = 1, 'Your teddy bear is', 'Your <<mishka>> teddy bears are') + ' on a shelf.'
  46. *nl
  47. !gs'husb' - do not delete!
  48. gs'subkid'
  49. gs 'exercise', 'start'
  50. *nl
  51. !!housegostrand = rand(1, 20)
  52. !!if husband > 0 and husbandrink ! 10 and week = 5 and hour > 17 and hour < 21 and housegostrand > 15:gt 'sitr', 'guest'
  53. if husband > 0 and husbandrink ! 10 and husbandrinkday ! daystart:
  54. if (week >= 6 and hour > 7 and hour < 17) or (hour > 17 and hour <= 22):
  55. '<a href="exec:gt ''husb'', ''start''">Your husband sits on the couch and watches television.</a>'
  56. end
  57. end
  58. gs 'unicoursework', 'start', $loc
  59. if ml_guitar['carried'] = 1:
  60. act 'Place the guitar next to your desk':
  61. ml_guitar['carried'] = 0
  62. $ml_guitar['location'] = $curloc
  63. gt 'sitr'
  64. end
  65. elseif ml_guitar['hasguitar'] and ml_guitar['carried'] = 0:
  66. act 'Pick up the guitar':
  67. ml_guitar['carried'] = 1
  68. $ml_guitar['location'] = ''
  69. gt 'sitr'
  70. end
  71. end
  72. if ml_online['account'] = 0 and internet > 0:
  73. act 'Set up an online music account (0:30)': gt 'music_onlinemusic', 'setupAccount'
  74. end
  75. !!Uploading recorded music if there are any not uploaded yet
  76. if ml_uploadablemusic > 0 and internet > 0 and ml_online['account'] = 1:
  77. if pcs_inhib < 30:
  78. if pcs_inhib < 10:
  79. $diff = 'hard'
  80. elseif pcs_inhib < 20:
  81. $diff = 'medium'
  82. else
  83. $diff = 'easy'
  84. end
  85. gs 'willpower', 'skill', 'self', $diff
  86. will_cost = (will_cost * 2) - (pcs_perform)
  87. if will_cost <= pcs_willpwr:
  88. act 'Upload music (<<will_cost>> Willpower)': gt 'music_onlinemusic', 'uploadmusic'
  89. else
  90. act 'Upload music (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  91. end
  92. end
  93. act 'Upload music': gt 'music_onlinemusic', 'uploadallmusic'
  94. end
  95. if ml_uploadablemusic > 0:
  96. act 'Delete old recordings': gt 'music_onlinemusic', 'deleteoldmusic'
  97. end
  98. if hour > 8 and hour < 22:
  99. if ml_guitar['hasguitar'] = 1:
  100. act 'Play something on the guitar (10 minutes)':
  101. pcs_mood += 10
  102. minut += 10
  103. gs 'stat'
  104. 'You pick up your guitar and start to play some songs you know, just for your own entertainment.'
  105. 'You hum along the tune, relaxing into the music, just enjoying it. When you look up, a quarter of an hour has passed and you are in a much better mood.'
  106. end
  107. end
  108. if ml_guitar['hasguitar'] = 1 and (ml_guitar['chordbook'] = 1 or ml_guitarlesson['lessoncount'] > 0) and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and alko < 5:
  109. if sisterHere = 1 and pcs_inhib < 30:
  110. if pcs_inhib < 10:
  111. $diff = 'hard'
  112. elseif pcs_inhib < 20:
  113. $diff = 'medium'
  114. else
  115. $diff = 'easy'
  116. end
  117. gs 'willpower', 'skill', 'self', $diff
  118. will_cost = (will_cost * 3) - (pcs_perform)
  119. if will_cost <= pcs_willpwr:
  120. act 'Practice guitar (0:30) (<<will_cost>> Willpower)':
  121. inhib_exp += rand(1,2)
  122. gs 'willpower', 'pay', 'self'
  123. gs 'stat'
  124. gt 'music_bedroomPractice', 'guitar'
  125. end
  126. else
  127. act 'Practice guitar (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You feel too embarrassed to pick up your guitar in front of people</font>'
  128. end
  129. else
  130. act 'Practice guitar (0:30)': gt 'music_bedroomPractice', 'guitar'
  131. end
  132. end
  133. !! Streaming music
  134. if ml_guitar['hasguitar'] = 1 and ml_online['account'] = 1 and internet > 0 and sisterHere = 0 and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and ml_performance['max_perform_minutes'] >= 15 and alko < 5 and ml_streaming['lastday'] ! daystart:
  135. ml_streamtime = min((ml_performance['max_perform_minutes']-ml_performance['performed_minutes']), 60)
  136. if pcs_inhib < 30:
  137. if pcs_inhib < 10:
  138. $diff = 'hard'
  139. elseif pcs_inhib < 20:
  140. $diff = 'medium'
  141. else
  142. $diff = 'easy'
  143. end
  144. gs 'willpower', 'skill', 'self', $diff
  145. will_cost = (will_cost * 3) - (pcs_perform)
  146. if will_cost <= pcs_willpwr:
  147. act 'Live stream (<<ml_streamtime>> minutes) (<<will_cost>> Willpower)':
  148. inhib_exp += rand(1,3)
  149. gs 'willpower', 'pay', 'self'
  150. gs 'stat'
  151. gt 'music_onlinemusic', 'liveStream'
  152. end
  153. else
  154. act 'Live stream (<<ml_streamtime>> minutes) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  155. end
  156. else
  157. act 'Live stream (<<ml_streamtime>> minutes)': gt 'music_onlinemusic', 'liveStream'
  158. end
  159. end
  160. !! Recording music
  161. if ml_guitar['hasguitar'] = 1 and sisterHere = 0 and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and alko < 5:
  162. if pcs_inhib < 20:
  163. if pcs_inhib < 10:
  164. $diff = 'medium'
  165. elseif pcs_inhib < 20:
  166. $diff = 'easy'
  167. end
  168. gs 'willpower', 'skill', 'self', $diff
  169. if will_cost <= pcs_willpwr:
  170. act 'Record a song with your phone (0:30) (<<will_cost>> Willpower)':
  171. inhib_exp += rand(1,2)
  172. gs 'willpower', 'pay', 'self'
  173. gs 'stat'
  174. gt 'music_onlinemusic', 'recordSong'
  175. end
  176. if komp = 1 and webcamera = 1 and ml_studio['scarlet-3rd-gen'] = 1:
  177. act 'Record and edit a song (2:00) (<<will_cost>> Willpower)':
  178. inhib_exp += rand(1,2)
  179. gs 'willpower', 'pay', 'self'
  180. gs 'stat'
  181. gt 'music_onlinemusic', 'recordAndEditSong'
  182. end
  183. end
  184. else
  185. act 'Record a song (0:30) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  186. act 'Record and edit a song (1:30) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  187. end
  188. else
  189. act 'Record a song with your phone (0:30)': gt 'music_onlinemusic', 'recordSong'
  190. if komp = 1 and webcamera = 1 and ml_studio['scarlet-3rd-gen'] = 1:
  191. act 'Record and edit a song (2:00)': gt 'music_onlinemusic', 'recordAndEditSong'
  192. end
  193. end
  194. end
  195. end
  196. act 'Go out on the balcony': gt 'balkon','start'
  197. gs 'events', 'read'
  198. if dildo > 0 and pcs_horny >= 50:
  199. act 'Masturbate':
  200. *clr & cla
  201. minut += 30
  202. stat['mast'] += 1
  203. if pcs_inhib < 30:inhib_exp += rand(1,3)
  204. pcs_vag += 1
  205. if husband > 0 and husbandrink ! 10:
  206. if week > 5 or week < 6 and hour > 16:
  207. cla
  208. *clr
  209. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m11.jpg"></center>'
  210. 'You sit down on the couch and push a dildo into your pussy.'
  211. if hour > 17 and hour <= 22:'<<$husName>> looks at you, stunned by your sudden act of lewdness.'
  212. if hour = 16 or hour > 22:'<<$husName>> enters the room after he heard moans from outside.'
  213. if harakHusb = 0:
  214. '"What are you doing?" <<$husName>> asks.'
  215. '"I''m sorry dear, but I really need it, and you''re always busy," you reply without stopping masturbating.'
  216. '"And how often do you that?" he asks.'
  217. '"Every now and then, sometimes I put it in my ass too, would you like to watch me?" you ask him'
  218. if izvratH = 0:
  219. husband -= 1
  220. '"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.'
  221. pcs_horny = 0
  222. orgasm += 1
  223. act 'Finish':gt 'sitr'
  224. elseif izvratH = 1:
  225. '"Well, I''m... I''m not sure," he stutters.'
  226. '"So, what do you want?" you ask.'
  227. act 'Put on a show':
  228. cla
  229. *clr
  230. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m12.jpg"></center>'
  231. '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 his trousers.'
  232. '"Dear, is there anything else you want?" you ask, smiling at him.'
  233. '"Can I join?" he asks you, a little embarrassed.'
  234. act 'Together':
  235. cla
  236. *clr
  237. analorgasm += 1
  238. orgasm += 1
  239. pcs_horny = 0
  240. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m13.jpg"></center>'
  241. '<<$husName>> takes out his dick and starts to masturbate right in front of you. You''re surprised because you expected he''d fuck you or something along those lines. You sigh silently and continue to fuck your ass with the dildo. <<$husName>> now masturbates furiously, as your moaning becomes louder. Both of you realize it won''t be long until either of you cums.'
  242. '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 take 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.'
  243. act 'Finish':gt 'sitr'
  244. end
  245. end
  246. end
  247. elseif harakHusb = 1:
  248. '"I guess sex with me isn''t enough?" he asks.'
  249. '"I''m sorry dear, but I really need it, and you''re always busy," you reply without stopping masturbating.'
  250. '"Well then, why don''t you show me everything then? I''d love to watch," he says.'
  251. '"Do you want to see me putting it in my ass too?" you ask.'
  252. if izvratH = 0:
  253. husband += 1
  254. husbizvradd += 1
  255. '"No, not yet, what you''re doing is 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.'
  256. '"Anytime for such a lovely audience, but I need a quick break," you laugh and take the dildo out of your pussy.'
  257. pcs_horny = 0
  258. orgasm += 1
  259. act 'Finish':gt 'sitr'
  260. elseif izvratH = 1:
  261. husband += 1
  262. '"And what are you going to show me now?" he asks.'
  263. '"Whatever you would like to see," you answer.'
  264. act 'Put on a show':
  265. cla
  266. *clr
  267. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m12.jpg"></center>'
  268. 'You move your dildo slowly into your ass. <<$husName>> watches closely as the dildo moves in and out. You notice the bulge in his pants.'
  269. 'It''s hard for you not to look at it. Therefore, you ask him if he would like to participate somehow.'
  270. '"Now that you ask," he says, "you could blow me while pumping that toy into your ass." He unbuttons his pants and takes his cock out.'
  271. act 'Blowjob':
  272. cla
  273. *clr
  274. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m14.jpg"></center>'
  275. 'You start to suck on his flaccid penis while you continue to pleasure yourself by pumping the dildo in and out of your ass. After a short while, <<$husName>>''s dick becomes rock hard. When it finally is, he says, "Time for me to fuck that hole."'
  276. gs 'boyStat', $HusID
  277. act 'Anal sex':
  278. picrand = 88
  279. gt 'sex', 'anal'
  280. end
  281. end
  282. end
  283. end
  284. elseif harakHusb = 2:
  285. '"Is your hole itching?" he asks.'
  286. '"I''m sorry dear, but I really need it, and you''re always busy," you reply without stopping masturbating.'
  287. if izvratH = 0:
  288. husband += 1
  289. husbizvradd += 1
  290. '"Well then, open your mouth," he orders you, pulling out his cock and pushing 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."'
  291. gs 'boyStat', $HusID
  292. act 'Spread your legs':
  293. picrand = 88
  294. gt 'sex', 'vag'
  295. end
  296. elseif izvratH = 1:
  297. husband += 1
  298. SUB += 1
  299. '<<$husName>> orders you to put your toy into your ass, and you submissively oblige to do so. "Now open your mouth and suck me off," he tells you.'
  300. act 'Blowjob':
  301. cla
  302. *clr
  303. '<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m14.jpg"></center>'
  304. 'You start to suck on his flaccid penis while you continue to pleasure yourself by pumping the dildo in and out of your ass. After a short while, <<$husName>>''s dick becomes rock hard. When it finally is, he says, "Time for me to fuck your ass-pussy."'
  305. gs 'boyStat', $HusID
  306. act 'Anal Sex':
  307. picrand = 88
  308. gt 'sex', 'anal'
  309. end
  310. end
  311. end
  312. end
  313. else
  314. '<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
  315. '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 attaching the suction base of the dildo onto the floor before lowering yourself slowly to its tip.'
  316. 'Shivers run down your spine as you feel that thick head spreading your pussy-lips, and soon, the whole length begins 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.'
  317. '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...'
  318. '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!'
  319. $orgasm_or = 'yes'
  320. gs 'arousal', 'vaginal_dildo', 10
  321. gs 'arousal', 'end'
  322. act 'Breathe':gt 'sitr'
  323. end
  324. else
  325. '<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
  326. '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 attaching the suction base of the dildo onto the floor before lowering yourself slowly to its tip.'
  327. 'Shivers run down your spine as you feel that thick head spreading your pussy-lips, and soon, the whole length begins 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.'
  328. '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...'
  329. '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!'
  330. $orgasm_or = 'yes'
  331. gs 'arousal', 'vaginal_dildo', 10
  332. gs 'arousal', 'end'
  333. act 'Breathe':gt 'sitr'
  334. end
  335. end
  336. end
  337. --- sitr ---------------------------------